From 94f05e79b7060301aabc293e35611861b6c23915 Mon Sep 17 00:00:00 2001
From: Christian Grothoff <christian@grothoff.org>
Date: Mon, 11 Nov 2019 19:27:37 +0100
Subject: log keys

---
 src/backend/taler-merchant-httpd_check-payment.c | 5 +++--
 src/backend/taler-merchant-httpd_pay.c           | 9 +++++++++
 src/backend/taler-merchant-httpd_poll-payment.c  | 5 +++--
 3 files changed, 15 insertions(+), 4 deletions(-)

diff --git a/src/backend/taler-merchant-httpd_check-payment.c b/src/backend/taler-merchant-httpd_check-payment.c
index 1ae03359..85f2d3ea 100644
--- a/src/backend/taler-merchant-httpd_check-payment.c
+++ b/src/backend/taler-merchant-httpd_check-payment.c
@@ -188,11 +188,12 @@ send_pay_request (struct CheckPaymentRequestContext *cprc)
   if (0 != remaining.rel_value_us)
   {
     /* long polling: do not queue a response, suspend connection instead */
-    GNUNET_log (GNUNET_ERROR_TYPE_INFO,
-                "Suspending /check-payment\n");
     TMH_compute_pay_key (cprc->order_id,
                          &cprc->mi->pubkey,
                          &cprc->sc.key);
+    GNUNET_log (GNUNET_ERROR_TYPE_INFO,
+                "Suspending /check-payment on key %s\n",
+                GNUNET_h2s (&cprc->sc.key));
     TMH_long_poll_suspend (&cprc->sc);
     return MHD_YES;
   }
diff --git a/src/backend/taler-merchant-httpd_pay.c b/src/backend/taler-merchant-httpd_pay.c
index e9c6e69d..e3ecbb6d 100644
--- a/src/backend/taler-merchant-httpd_pay.c
+++ b/src/backend/taler-merchant-httpd_pay.c
@@ -427,6 +427,9 @@ resume_operation (void *cls,
   struct TMH_SuspendedConnection *sc = value;
 
   (void) cls;
+  GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+              "Resuming operation suspended pending payment on key %s\n",
+              GNUNET_h2s (key));
   GNUNET_assert (GNUNET_YES ==
                  GNUNET_CONTAINER_multihashmap_remove (payment_trigger_map,
                                                        key,
@@ -455,10 +458,16 @@ resume_suspended_payment_checks (const char *order_id,
   TMH_compute_pay_key (order_id,
                        mpub,
                        &key);
+  GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+              "Resuming operations suspended pending payment on key %s\n",
+              GNUNET_h2s (&key));
   GNUNET_CONTAINER_multihashmap_get_multiple (payment_trigger_map,
                                               &key,
                                               &resume_operation,
                                               NULL);
+  GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+              "%u operations remain suspended pending payment\n",
+              GNUNET_CONTAINER_multihashmap_size (payment_trigger_map));
 }
 
 
diff --git a/src/backend/taler-merchant-httpd_poll-payment.c b/src/backend/taler-merchant-httpd_poll-payment.c
index 165a0b58..91ff4a5b 100644
--- a/src/backend/taler-merchant-httpd_poll-payment.c
+++ b/src/backend/taler-merchant-httpd_poll-payment.c
@@ -188,11 +188,12 @@ send_pay_request (struct PollPaymentRequestContext *pprc)
   if (0 != remaining.rel_value_us)
   {
     /* long polling: do not queue a response, suspend connection instead */
-    GNUNET_log (GNUNET_ERROR_TYPE_INFO,
-                "Suspending /poll-payment\n");
     TMH_compute_pay_key (pprc->order_id,
                          &pprc->mi->pubkey,
                          &pprc->sc.key);
+    GNUNET_log (GNUNET_ERROR_TYPE_INFO,
+                "Suspending /poll-payment on key %s\n",
+                GNUNET_h2s (&pprc->sc.key));
     TMH_long_poll_suspend (&pprc->sc);
     return MHD_YES;
   }
-- 
cgit v1.2.3