From 6c1f631d7c34cfc72422537a390fa08425ba097d Mon Sep 17 00:00:00 2001
From: Carl Hetherington <cth@carlh.net>
Date: Tue, 1 Nov 2022 21:11:40 +0100
Subject: [PATCH] Enable some debug logging for TMS upload.

---
 src/lib/curl_uploader.cc | 20 ++++++++++++++++++++
 src/lib/curl_uploader.h  |  1 +
 2 files changed, 21 insertions(+)

diff --git a/src/lib/curl_uploader.cc b/src/lib/curl_uploader.cc
index 9416a17fb..284a21e2f 100644
--- a/src/lib/curl_uploader.cc
+++ b/src/lib/curl_uploader.cc
@@ -20,6 +20,7 @@
 
 
 #include "curl_uploader.h"
+#include "dcpomatic_log.h"
 #include "exceptions.h"
 #include "config.h"
 #include "cross.h"
@@ -43,6 +44,13 @@ read_callback (void* ptr, size_t size, size_t nmemb, void* object)
 }
 
 
+static int
+curl_debug_shim (CURL* curl, curl_infotype type, char* data, size_t size, void* userp)
+{
+	return reinterpret_cast<CurlUploader*>(userp)->debug(curl, type, data, size);
+}
+
+
 CurlUploader::CurlUploader (function<void (string)> set_status, function<void (float)> set_progress)
 	: Uploader (set_status, set_progress)
 {
@@ -61,6 +69,9 @@ CurlUploader::CurlUploader (function<void (string)> set_status, function<void (f
 	if (!Config::instance()->tms_passive()) {
 		curl_easy_setopt(_curl, CURLOPT_FTPPORT, "-");
 	}
+	curl_easy_setopt(_curl, CURLOPT_VERBOSE, 1L);
+	curl_easy_setopt(_curl, CURLOPT_DEBUGFUNCTION, curl_debug_shim);
+	curl_easy_setopt(_curl, CURLOPT_DEBUGDATA, this);
 }
 
 
@@ -116,3 +127,12 @@ CurlUploader::read_callback (void* ptr, size_t size, size_t nmemb)
 
 	return r;
 }
+
+
+int
+CurlUploader::debug(CURL *, curl_infotype, char* data, size_t size)
+{
+	LOG_GENERAL_NC(string(data, size));
+	return 0;
+}
+
diff --git a/src/lib/curl_uploader.h b/src/lib/curl_uploader.h
index ea017eb83..4ee221f08 100644
--- a/src/lib/curl_uploader.h
+++ b/src/lib/curl_uploader.h
@@ -31,6 +31,7 @@ public:
 	~CurlUploader ();
 
 	size_t read_callback (void* ptr, size_t size, size_t nmemb);
+	int debug(CURL* curl, curl_infotype type, char* data, size_t size);
 
 protected:
 	void create_directory (boost::filesystem::path directory) override;
-- 
2.30.2