diff --git a/src/testing/testing_api_cmd_check_aml_decisions.c b/src/testing/testing_api_cmd_check_aml_decisions.c new file mode 100644 index 000000000..92c21e549 --- /dev/null +++ b/src/testing/testing_api_cmd_check_aml_decisions.c @@ -0,0 +1,197 @@ +/* + This file is part of TALER + Copyright (C) 2023 Taler Systems SA + + TALER is free software; you can redistribute it and/or modify it + under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 3, or (at your + option) any later version. + + TALER is distributed in the hope that it will be useful, but + WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + General Public License for more details. + + You should have received a copy of the GNU General Public + License along with TALER; see the file COPYING. If not, see + +*/ +/** + * @file testing/testing_api_cmd_check_aml_decisions.c + * @brief command for testing /aml/$OFFICER/decisions/$FILTER + * @author Christian Grothoff + */ +#include "platform.h" +#include "taler_json_lib.h" +#include +#include "taler_testing_lib.h" +#include "taler_signatures.h" +#include "backoff.h" + + +/** + * State for a "check_aml_decision" CMD. + */ +struct AmlCheckState +{ + + /** + * Handle while operation is running. + */ + struct TALER_EXCHANGE_LookupAmlDecisions *dh; + + /** + * Our interpreter. + */ + struct TALER_TESTING_Interpreter *is; + + /** + * Reference to command to previous set officer. + */ + const char *ref_officer; + + /** + * Which states to filter by. + */ + enum TALER_AmlDecisionState filter; + + /** + * Expected HTTP status. + */ + unsigned int expected_http_status; + +}; + + +/** + * Callback to analyze the /aml/$OFFICER_PUB/$decisions/$FILTER response, just used to check + * if the response code is acceptable. + * + * @param cls closure. + * @param adr response details + */ +static void +check_aml_decisions_cb (void *cls, + const struct TALER_EXCHANGE_AmlDecisionsResponse *adr) +{ + struct AmlCheckState *ds = cls; + + ds->dh = NULL; + if (ds->expected_http_status != adr->hr.http_status) + { + GNUNET_log (GNUNET_ERROR_TYPE_WARNING, + "Unexpected response code %u to command %s in %s:%u\n", + adr->hr.http_status, + ds->is->commands[ds->is->ip].label, + __FILE__, + __LINE__); + json_dumpf (adr->hr.reply, + stderr, + 0); + TALER_TESTING_interpreter_fail (ds->is); + return; + } + TALER_TESTING_interpreter_next (ds->is); +} + + +/** + * Run the command. + * + * @param cls closure. + * @param cmd the command to execute. + * @param is the interpreter state. + */ +static void +check_aml_decisions_run (void *cls, + const struct TALER_TESTING_Command *cmd, + struct TALER_TESTING_Interpreter *is) +{ + struct AmlCheckState *ds = cls; + const struct TALER_AmlOfficerPrivateKeyP *officer_priv; + const struct TALER_TESTING_Command *ref; + + (void) cmd; + ds->is = is; + ref = TALER_TESTING_interpreter_lookup_command (is, + ds->ref_officer); + if (NULL == ref) + { + GNUNET_break (0); + TALER_TESTING_interpreter_fail (is); + return; + } + GNUNET_assert (GNUNET_OK == + TALER_TESTING_get_trait_officer_priv (ref, + &officer_priv)); + ds->dh = TALER_EXCHANGE_lookup_aml_decisions ( + is->ctx, + is->exchange_url, + INT64_MAX, + -1, /* return last one for testing */ + ds->filter, + officer_priv, + &check_aml_decisions_cb, + ds); + if (NULL == ds->dh) + { + GNUNET_break (0); + TALER_TESTING_interpreter_fail (is); + return; + } +} + + +/** + * Free the state of a "check_aml_decisions" CMD, and possibly cancel a + * pending operation thereof. + * + * @param cls closure, must be a `struct AmlCheckState`. + * @param cmd the command which is being cleaned up. + */ +static void +check_aml_decisions_cleanup (void *cls, + const struct TALER_TESTING_Command *cmd) +{ + struct AmlCheckState *ds = cls; + + if (NULL != ds->dh) + { + GNUNET_log (GNUNET_ERROR_TYPE_WARNING, + "Command %u (%s) did not complete\n", + ds->is->ip, + cmd->label); + TALER_EXCHANGE_lookup_aml_decisions_cancel (ds->dh); + ds->dh = NULL; + } + GNUNET_free (ds); +} + + +struct TALER_TESTING_Command +TALER_TESTING_cmd_check_aml_decisions ( + const char *label, + const char *ref_officer, + enum TALER_AmlDecisionState filter, + unsigned int expected_http_status) +{ + struct AmlCheckState *ds; + + ds = GNUNET_new (struct AmlCheckState); + ds->ref_officer = ref_officer; + ds->filter = filter; + ds->expected_http_status = expected_http_status; + { + struct TALER_TESTING_Command cmd = { + .cls = ds, + .label = label, + .run = &check_aml_decisions_run, + .cleanup = &check_aml_decisions_cleanup + }; + + return cmd; + } +} + + +/* end of testing_api_cmd_check_aml_decisions.c */