-update testing cmd to new bank API

src/testing/testing_api_cmd_bank_history_credit.c

@@ -370,99 +370,86 @@ check_result (struct History *h,
  * finally check it against what the bank returned.
  *
  * @param cls closure.
- * @param http_status HTTP response code, #MHD_HTTP_OK (200)
+ * @param chr http response details
- *        for successful status request 0 if the bank's reply is
- *        bogus (fails to follow the protocol),
- *        #MHD_HTTP_NO_CONTENT if there are no more results; on
- *        success the last callback is always of this status
- *        (even if `abs(num_results)` were already returned).
- * @param ec taler status code.
- * @param row_id monotonically increasing counter corresponding to
- *        the transaction.
- * @param details details about the wire transfer.
- * @param json detailed response from the HTTPD, or NULL if
- *        reply was not in JSON.
- * @return #GNUNET_OK to continue, #GNUNET_SYSERR to abort iteration
  */
-static enum GNUNET_GenericReturnValue
+static void
 history_cb (void *cls,
-            unsigned int http_status,
+            const struct TALER_BANK_CreditHistoryResponse *chr)
-            enum TALER_ErrorCode ec,
-            uint64_t row_id,
-            const struct TALER_BANK_CreditDetails *details,
-            const json_t *json)
 {
   struct TALER_TESTING_Interpreter *is = cls;
   struct HistoryState *hs = is->commands[is->ip].cls;
 
-  (void) row_id;
+  hs->hh = NULL;
-  if (NULL == details)
+  switch (chr->http_status)
   {
-    hs->hh = NULL;
+  case 0:
-    if ( (MHD_HTTP_NOT_FOUND == http_status) &&
+    GNUNET_break (0);
-         (0 == hs->total) )
+    goto error;
+  case MHD_HTTP_OK:
+    for (unsigned int i = 0; i<chr->details.success.details_length; i++)
+    {
+      const struct TALER_BANK_CreditDetails *cd =
+        &chr->details.success.details[i];
+
+      /* check current element */
+      if (GNUNET_OK !=
+          check_result (hs->h,
+                        hs->total,
+                        hs->results_obtained,
+                        cd))
+      {
+        GNUNET_break (0);
+        json_dumpf (chr->response,
+                    stderr,
+                    JSON_COMPACT);
+        hs->failed = true;
+        hs->hh = NULL;
+        TALER_TESTING_interpreter_fail (is);
+        return;
+      }
+      hs->results_obtained++;
+    }
+    TALER_TESTING_interpreter_next (is);
+    return;
+  case MHD_HTTP_NO_CONTENT:
+    if (0 == hs->total)
     {
       /* not found is OK for empty history */
       TALER_TESTING_interpreter_next (is);
-      return GNUNET_OK;
+      return;
     }
-    if ( (hs->results_obtained != hs->total) ||
+    GNUNET_break (0);
-         (hs->failed) ||
+    goto error;
-         (MHD_HTTP_NO_CONTENT != http_status) )
+  case MHD_HTTP_NOT_FOUND:
+    if (0 == hs->total)
     {
-      GNUNET_break (0);
+      /* not found is OK for empty history */
-      GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+      TALER_TESTING_interpreter_next (is);
-                  "Expected history of length %u, got %llu;"
+      return;
-                  " HTTP status code: %u/%d, failed: %d\n",
-                  hs->total,
-                  (unsigned long long) hs->results_obtained,
-                  http_status,
-                  (int) ec,
-                  hs->failed ? 1 : 0);
-      print_expected (hs->h,
-                      hs->total,
-                      UINT_MAX);
-      TALER_TESTING_interpreter_fail (is);
-      return GNUNET_SYSERR;
     }
-    TALER_TESTING_interpreter_next (is);
+    GNUNET_break (0);
-    return GNUNET_OK;
+    goto error;
-  }
+  default:
-  if (MHD_HTTP_OK != http_status)
-  {
     hs->hh = NULL;
     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
                 "Unwanted response code from /history/incoming: %u\n",
-                http_status);
+                chr->http_status);
     TALER_TESTING_interpreter_fail (is);
-    return GNUNET_SYSERR;
+    return;
   }
-
+error:
-  /* check current element */
+  GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
-  if (GNUNET_OK !=
+              "Expected history of length %u, got %llu;"
-      check_result (hs->h,
+              " HTTP status code: %u/%d, failed: %d\n",
-                    hs->total,
+              hs->total,
-                    hs->results_obtained,
+              (unsigned long long) hs->results_obtained,
-                    details))
+              chr->http_status,
-  {
+              (int) chr->ec,
-    char *acc;
+              hs->failed ? 1 : 0);
-
+  print_expected (hs->h,
-    GNUNET_break (0);
+                  hs->total,
-    acc = json_dumps (json,
+                  UINT_MAX);
-                      JSON_COMPACT);
+  TALER_TESTING_interpreter_fail (is);
-    GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
-                "Result %u was `%s'\n",
-                (unsigned int) hs->results_obtained++,
-                acc);
-    if (NULL != acc)
-      free (acc);
-    hs->failed = true;
-    hs->hh = NULL;
-    TALER_TESTING_interpreter_fail (is);
-    return GNUNET_SYSERR;
-  }
-  hs->results_obtained++;
-  return GNUNET_OK;
 }