merchant

commit 69a320056c225d389ef4819529b9ab1cc425a867
parent 4beae60ba82d2ea5cd7997e6e142e4c2c0ded2f5
Author: Iván Ávalos <avalos@disroot.org>
Date:   Mon,  2 Nov 2026 14:13:49 +0100

log POST /pay subphases

Diffstat:
M
src/backend/taler-merchant-httpd_post-orders-ORDER_ID-pay.c
 | 
31
++++++++++++++++++++++++-------

1 file changed, 24 insertions(+), 7 deletions(-)
diff --git a/src/backend/taler-merchant-httpd_post-orders-ORDER_ID-pay.c b/src/backend/taler-merchant-httpd_post-orders-ORDER_ID-pay.c
@@ -945,9 +945,11 @@ resume_pay_with_response (struct PayContext *pc,
     MHD_destroy_response (pc->response);
   pc->response_code = response_code;
   pc->response = response;
-  GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
-              "Resuming /pay handling. HTTP status for our reply is %u.\n",
-              response_code);
+  GNUNET_log (
+    GNUNET_ERROR_TYPE_INFO,
+    "Processing /pay in phase %df: finalizing response with status %u\n",
+    (int) pc->phase,
+    response_code);
   for (unsigned int i = 0; i<pc->parse_pay.num_exchanges; i++)
   {
     struct ExchangeGroup *eg = pc->parse_pay.egs[i];
@@ -1369,8 +1371,8 @@ batch_deposit_cb (
   eg->bdh = NULL;
   pc->batch_deposits.pending_at_eg--;
   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
-              "Batch deposit completed with status %u\n",
-              dr->hr.http_status);
+              "Processing /pay in phase %dc: batch deposit response received\n",
+              (int) pc->phase);
   GNUNET_assert (GNUNET_YES == pc->suspended);
   switch (dr->hr.http_status)
   {
@@ -1379,6 +1381,10 @@ batch_deposit_cb (
                              dr);
     if (GNUNET_YES != pc->suspended)
       return; /* handle_batch_deposit_ok already resumed with an error */
+    GNUNET_log (
+      GNUNET_ERROR_TYPE_INFO,
+      "Processing /pay in phase %dd: batch deposit response persisted\n",
+      (int) pc->phase);
     do_batch_deposits (eg);
     return;
   case MHD_HTTP_UNAVAILABLE_FOR_LEGAL_REASONS:
@@ -1393,6 +1399,9 @@ batch_deposit_cb (
     }
     notify_kyc_required (eg);
     eg->got_451 = true;
+    GNUNET_log (GNUNET_ERROR_TYPE_INFO,
+                "Processing /pay in phase %dx: hit kyc requirement\n",
+                (int) pc->phase);
     pc->batch_deposits.got_451 = true;
     /* update pc->pay_transaction.pending */
     for (size_t i = 0; i<pc->parse_pay.coins_cnt; i++)
@@ -1657,7 +1666,8 @@ process_pay_with_keys (
   pc->batch_deposits.pending_at_eg--;
   GNUNET_SCHEDULER_begin_async_scope (&hc->async_scope_id);
   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
-              "Processing payment with keys from exchange %s\n",
+              "Processing /pay in phase %da: got keys from exchange %s\n",
+              (int) pc->phase,
               eg->exchange_url);
   GNUNET_assert (GNUNET_YES == pc->suspended);
   if (NULL == keys)
@@ -1885,6 +1895,9 @@ AGE_FAIL:
       return;
     }
   }
+  GNUNET_log (GNUNET_ERROR_TYPE_INFO,
+              "Processing /pay in phase %db: preparing batch deposit\n",
+              (int) pc->phase);
 
   do_batch_deposits (eg);
 }
@@ -1897,7 +1910,8 @@ force_keys (struct ExchangeGroup *eg)
 
   eg->tried_force_keys = true;
   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
-              "Forcing /keys download (once)\n");
+              "Processing /pay in phase %dy: forcing keys\n",
+              (int) pc->phase);
   eg->fo = TMH_EXCHANGES_keys4exchange (
     eg->exchange_url,
     true,
@@ -1926,6 +1940,9 @@ handle_pay_timeout (void *cls)
   struct PayContext *pc = cls;
 
   pc->batch_deposits.timeout_task = NULL;
+  GNUNET_log (GNUNET_ERROR_TYPE_INFO,
+              "Processing /pay in phase %dz: timeout\n",
+              (int) pc->phase);
   GNUNET_assert (GNUNET_YES == pc->suspended);
   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
               "Resuming pay with error after timeout\n");