diff options
Diffstat (limited to 'src/lib/testing_api_cmd_bank_check.c')
-rw-r--r-- | src/lib/testing_api_cmd_bank_check.c | 306 |
1 files changed, 0 insertions, 306 deletions
diff --git a/src/lib/testing_api_cmd_bank_check.c b/src/lib/testing_api_cmd_bank_check.c deleted file mode 100644 index e8bd415b3..000000000 --- a/src/lib/testing_api_cmd_bank_check.c +++ /dev/null @@ -1,306 +0,0 @@ -/* - This file is part of TALER - Copyright (C) 2018-2020 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 - <http://www.gnu.org/licenses/> -*/ -/** - * @file lib/testing_api_cmd_bank_check.c - * @brief command to check if a particular wire transfer took - * place. - * @author Marcello Stanisci - */ -#include "platform.h" -#include "taler_json_lib.h" -#include <gnunet/gnunet_curl_lib.h> -#include "exchange_api_handle.h" -#include "taler_testing_lib.h" -#include "taler_fakebank_lib.h" - - -/** - * State for a "bank check" CMD. - */ -struct BankCheckState -{ - - /** - * Base URL of the exchange supposed to be - * involved in the bank transaction. - */ - const char *exchange_base_url; - - /** - * Expected transferred amount. - */ - const char *amount; - - /** - * Expected debit bank account. - */ - const char *debit_payto; - - /** - * Expected credit bank account. - */ - const char *credit_payto; - - /** - * Binary form of the wire transfer subject. - */ - struct TALER_WireTransferIdentifierRawP wtid; - - /** - * Interpreter state. - */ - struct TALER_TESTING_Interpreter *is; - - /** - * Reference to a CMD that provides all the data - * needed to issue the bank check. If NULL, that data - * must exist here in the state. - */ - const char *deposit_reference; -}; - -/** - * Run the command. - * - * @param cls closure. - * @param cmd the command to execute. - * @param is the interpreter state. - */ -static void -check_bank_transfer_run (void *cls, - const struct TALER_TESTING_Command *cmd, - struct TALER_TESTING_Interpreter *is) -{ - struct BankCheckState *bcs = cls; - struct TALER_Amount amount; - char *debit_account; - char *credit_account; - const char *exchange_base_url; - const char *debit_payto; - const char *credit_payto; - - if (NULL == bcs->deposit_reference) - { - TALER_LOG_INFO ("Deposit reference NOT given\n"); - debit_payto = bcs->debit_payto; - credit_payto = bcs->credit_payto; - exchange_base_url = bcs->exchange_base_url; - - if (GNUNET_OK != - TALER_string_to_amount (bcs->amount, - &amount)) - { - GNUNET_log (GNUNET_ERROR_TYPE_ERROR, - "Failed to parse amount `%s' at %u\n", - bcs->amount, - is->ip); - TALER_TESTING_interpreter_fail (is); - return; - } - } - else - { - const struct TALER_TESTING_Command *deposit_cmd; - const struct TALER_Amount *amount_ptr; - - TALER_LOG_INFO ("`%s' uses reference (%s/%p)\n", - TALER_TESTING_interpreter_get_current_label - (is), - bcs->deposit_reference, - bcs->deposit_reference); - deposit_cmd - = TALER_TESTING_interpreter_lookup_command (is, - bcs->deposit_reference); - if (NULL == deposit_cmd) - TALER_TESTING_FAIL (is); - if ( (GNUNET_OK != - TALER_TESTING_get_trait_amount_obj (deposit_cmd, - 0, - &amount_ptr)) || - (GNUNET_OK != - TALER_TESTING_get_trait_payto (deposit_cmd, - TALER_TESTING_PT_DEBIT, - &debit_payto)) || - (GNUNET_OK != - TALER_TESTING_get_trait_payto (deposit_cmd, - TALER_TESTING_PT_CREDIT, - &credit_payto)) || - (GNUNET_OK != - TALER_TESTING_get_trait_url (deposit_cmd, - TALER_TESTING_UT_EXCHANGE_BASE_URL, - &exchange_base_url)) ) - TALER_TESTING_FAIL (is); - amount = *amount_ptr; - } - - - debit_account = TALER_xtalerbank_account_from_payto (debit_payto); - credit_account = TALER_xtalerbank_account_from_payto (credit_payto); - - GNUNET_log (GNUNET_ERROR_TYPE_INFO, - "converted debit_payto (%s) to debit_account (%s)\n", - debit_payto, - debit_account); - - GNUNET_log (GNUNET_ERROR_TYPE_INFO, - "converted credit_payto (%s) to credit_account (%s)\n", - credit_payto, - credit_account); - - if (GNUNET_OK != - TALER_FAKEBANK_check_debit (is->fakebank, - &amount, - debit_account, - credit_account, - exchange_base_url, - &bcs->wtid)) - { - GNUNET_break (0); - GNUNET_free (credit_account); - GNUNET_free (debit_account); - TALER_TESTING_interpreter_fail (is); - return; - } - GNUNET_free (credit_account); - GNUNET_free (debit_account); - TALER_TESTING_interpreter_next (is); -} - - -/** - * Free the state of a "bank check" CMD. - * - * @param cls closure. - * @param cmd the command which is being cleaned up. - */ -static void -check_bank_transfer_cleanup (void *cls, - const struct TALER_TESTING_Command *cmd) -{ - struct BankCheckState *bcs = cls; - - GNUNET_free (bcs); -} - - -/** - * Offer internal data from a "bank check" CMD state. - * - * @param cls closure. - * @param[out] ret result. - * @param trait name of the trait. - * @param index index number of the object to offer. - * @return #GNUNET_OK on success. - */ -static int -check_bank_transfer_traits (void *cls, - const void **ret, - const char *trait, - unsigned int index) -{ - struct BankCheckState *bcs = cls; - struct TALER_WireTransferIdentifierRawP *wtid_ptr = &bcs->wtid; - struct TALER_TESTING_Trait traits[] = { - TALER_TESTING_make_trait_wtid (0, - wtid_ptr), - TALER_TESTING_make_trait_url (TALER_TESTING_UT_EXCHANGE_BASE_URL, - bcs->exchange_base_url), - TALER_TESTING_trait_end () - }; - - return TALER_TESTING_get_trait (traits, - ret, - trait, - index); -} - - -/** - * Make a "bank check" CMD. It checks whether a - * particular wire transfer has been made or not. - * - * @param label the command label. - * @param exchange_base_url base url of the exchange involved in - * the wire transfer. - * @param amount the amount expected to be transferred. - * @param debit_payto the account that gave money. - * @param credit_payto the account that received money. - * - * @return the command - */ -struct TALER_TESTING_Command -TALER_TESTING_cmd_check_bank_transfer (const char *label, - const char *exchange_base_url, - const char *amount, - const char *debit_payto, - const char *credit_payto) -{ - struct BankCheckState *bcs; - - bcs = GNUNET_new (struct BankCheckState); - bcs->exchange_base_url = exchange_base_url; - bcs->amount = amount; - bcs->debit_payto = debit_payto; - bcs->credit_payto = credit_payto; - bcs->deposit_reference = NULL; - { - struct TALER_TESTING_Command cmd = { - .label = label, - .cls = bcs, - .run = &check_bank_transfer_run, - .cleanup = &check_bank_transfer_cleanup, - .traits = &check_bank_transfer_traits - }; - - return cmd; - } -} - - -/** - * Define a "bank check" CMD that takes the input - * data from another CMD that offers it. - * - * @param label command label. - * @param deposit_reference reference to a CMD that is - * able to provide the "check bank transfer" operation - * input data. - * @return the command. - */ -struct TALER_TESTING_Command -TALER_TESTING_cmd_check_bank_transfer_with_ref - (const char *label, - const char *deposit_reference) -{ - struct BankCheckState *bcs; - - bcs = GNUNET_new (struct BankCheckState); - bcs->deposit_reference = deposit_reference; - { - struct TALER_TESTING_Command cmd = { - .label = label, - .cls = bcs, - .run = &check_bank_transfer_run, - .cleanup = &check_bank_transfer_cleanup, - .traits = &check_bank_transfer_traits - }; - - return cmd; - } -} |