Line data    Source code

       1             : /*
       2             :   This file is part of TALER
       3             :   Copyright (C) 2018-2020, 2024 Taler Systems SA
       4             : 
       5             :   TALER is free software; you can redistribute it and/or modify
       6             :   it under the terms of the GNU General Public License as
       7             :   published by the Free Software Foundation; either version 3, or
       8             :   (at your option) any later version.
       9             : 
      10             :   TALER is distributed in the hope that it will be useful, but
      11             :   WITHOUT ANY WARRANTY; without even the implied warranty of
      12             :   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
      13             :   GNU General Public License for more details.
      14             : 
      15             :   You should have received a copy of the GNU General Public
      16             :   License along with TALER; see the file COPYING.  If not, see
      17             :   <http://www.gnu.org/licenses/>
      18             : */
      19             : /**
      20             :  * @file testing/testing_api_cmd_bank_admin_check.c
      21             :  * @brief command to check if a particular admin/add-incoming transfer took
      22             :  *        place.
      23             :  * @author Christian Grothoff
      24             :  */
      25             : #include "taler/platform.h"
      26             : #include "taler/taler_json_lib.h"
      27             : #include <gnunet/gnunet_curl_lib.h>
      28             : #include "taler/taler_testing_lib.h"
      29             : #include "taler/taler_fakebank_lib.h"
      30             : 
      31             : 
      32             : /**
      33             :  * State for a "bank check" CMD.
      34             :  */
      35             : struct BankAdminCheckState
      36             : {
      37             : 
      38             :   /**
      39             :    * Expected transferred amount.
      40             :    */
      41             :   const char *amount;
      42             : 
      43             :   /**
      44             :    * Expected debit bank account.
      45             :    */
      46             :   struct TALER_FullPayto debit_payto;
      47             : 
      48             :   /**
      49             :    * Expected credit bank account.
      50             :    */
      51             :   struct TALER_FullPayto credit_payto;
      52             : 
      53             :   /**
      54             :    * Command providing the reserve public key trait to use.
      55             :    */
      56             :   const char *reserve_pub_ref;
      57             : 
      58             :   /**
      59             :    * Interpreter state.
      60             :    */
      61             :   struct TALER_TESTING_Interpreter *is;
      62             : 
      63             : };
      64             : 
      65             : /**
      66             :  * Run the command.
      67             :  *
      68             :  * @param cls closure.
      69             :  * @param cmd the command to execute.
      70             :  * @param is the interpreter state.
      71             :  */
      72             : static void
      73          45 : check_bank_admin_transfer_run (void *cls,
      74             :                                const struct TALER_TESTING_Command *cmd,
      75             :                                struct TALER_TESTING_Interpreter *is)
      76             : {
      77          45 :   struct BankAdminCheckState *bcs = cls;
      78             :   struct TALER_Amount amount;
      79             :   char *debit_account;
      80             :   char *credit_account;
      81             :   struct TALER_FullPayto debit_payto;
      82             :   struct TALER_FullPayto credit_payto;
      83             :   const struct TALER_ReservePublicKeyP *reserve_pub;
      84             :   const struct TALER_TESTING_Command *cmd_ref;
      85             :   struct TALER_FAKEBANK_Handle *fakebank;
      86             : 
      87             :   (void) cmd;
      88             :   {
      89             :     const struct TALER_TESTING_Command *fakebank_cmd;
      90             : 
      91             :     fakebank_cmd
      92          45 :       = TALER_TESTING_interpreter_get_command (is,
      93             :                                                "fakebank");
      94          45 :     if (NULL == fakebank_cmd)
      95             :     {
      96           0 :       GNUNET_break (0);
      97           0 :       TALER_TESTING_interpreter_fail (is);
      98           0 :       return;
      99             :     }
     100          45 :     if (GNUNET_OK !=
     101          45 :         TALER_TESTING_get_trait_fakebank (fakebank_cmd,
     102             :                                           &fakebank))
     103             :     {
     104           0 :       GNUNET_break (0);
     105           0 :       TALER_TESTING_interpreter_fail (is);
     106           0 :       return;
     107             :     }
     108             :   }
     109             :   cmd_ref
     110          45 :     = TALER_TESTING_interpreter_lookup_command (is,
     111             :                                                 bcs->reserve_pub_ref);
     112          45 :   if (NULL == cmd_ref)
     113             :   {
     114           0 :     GNUNET_break (0);
     115           0 :     TALER_TESTING_interpreter_fail (is);
     116           0 :     return;
     117             :   }
     118          45 :   if (GNUNET_OK !=
     119          45 :       TALER_TESTING_get_trait_reserve_pub (cmd_ref,
     120             :                                            &reserve_pub))
     121             :   {
     122           0 :     GNUNET_break (0);
     123           0 :     TALER_LOG_ERROR ("Command reference fails to provide reserve public key\n");
     124           0 :     TALER_TESTING_interpreter_fail (is);
     125           0 :     return;
     126             :   }
     127          45 :   debit_payto = bcs->debit_payto;
     128          45 :   credit_payto = bcs->credit_payto;
     129          45 :   if (GNUNET_OK !=
     130          45 :       TALER_string_to_amount (bcs->amount,
     131             :                               &amount))
     132             :   {
     133           0 :     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
     134             :                 "Failed to parse amount `%s' at %s\n",
     135             :                 bcs->amount,
     136             :                 TALER_TESTING_interpreter_get_current_label (is));
     137           0 :     TALER_TESTING_interpreter_fail (is);
     138           0 :     return;
     139             :   }
     140          45 :   debit_account = TALER_xtalerbank_account_from_payto (debit_payto);
     141          45 :   credit_account = TALER_xtalerbank_account_from_payto (credit_payto);
     142          45 :   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
     143             :               "converted debit_payto (%s) to debit_account (%s)\n",
     144             :               debit_payto.full_payto,
     145             :               debit_account);
     146          45 :   if (GNUNET_OK !=
     147          45 :       TALER_FAKEBANK_check_credit (fakebank,
     148             :                                    &amount,
     149             :                                    debit_account,
     150             :                                    credit_account,
     151             :                                    reserve_pub))
     152             :   {
     153           0 :     GNUNET_break (0);
     154           0 :     GNUNET_free (credit_account);
     155           0 :     GNUNET_free (debit_account);
     156           0 :     TALER_TESTING_interpreter_fail (is);
     157           0 :     return;
     158             :   }
     159          45 :   GNUNET_free (credit_account);
     160          45 :   GNUNET_free (debit_account);
     161          45 :   TALER_TESTING_interpreter_next (is);
     162             : }
     163             : 
     164             : 
     165             : /**
     166             :  * Free the state of a "bank check" CMD.
     167             :  *
     168             :  * @param cls closure.
     169             :  * @param cmd the command which is being cleaned up.
     170             :  */
     171             : static void
     172          45 : check_bank_admin_transfer_cleanup (void *cls,
     173             :                                    const struct TALER_TESTING_Command *cmd)
     174             : {
     175          45 :   struct BankAdminCheckState *bcs = cls;
     176             : 
     177             :   (void) cmd;
     178          45 :   GNUNET_free (bcs);
     179          45 : }
     180             : 
     181             : 
     182             : /**
     183             :  * Make a "bank check" CMD.  It checks whether a particular wire transfer to
     184             :  * the exchange (credit) has been made or not.
     185             :  *
     186             :  * @param label the command label.
     187             :  * @param amount the amount expected to be transferred.
     188             :  * @param debit_payto the account that gave money.
     189             :  * @param credit_payto the account that received money.
     190             :  * @param reserve_pub_ref command that provides the reserve public key to expect
     191             :  * @return the command
     192             :  */
     193             : struct TALER_TESTING_Command
     194          45 : TALER_TESTING_cmd_check_bank_admin_transfer (
     195             :   const char *label,
     196             :   const char *amount,
     197             :   struct TALER_FullPayto debit_payto,
     198             :   struct TALER_FullPayto credit_payto,
     199             :   const char *reserve_pub_ref)
     200             : {
     201             :   struct BankAdminCheckState *bcs;
     202             : 
     203          45 :   bcs = GNUNET_new (struct BankAdminCheckState);
     204          45 :   bcs->amount = amount;
     205          45 :   bcs->debit_payto = debit_payto;
     206          45 :   bcs->credit_payto = credit_payto;
     207          45 :   bcs->reserve_pub_ref = reserve_pub_ref;
     208             :   {
     209          45 :     struct TALER_TESTING_Command cmd = {
     210             :       .label = label,
     211             :       .cls = bcs,
     212             :       .run = &check_bank_admin_transfer_run,
     213             :       .cleanup = &check_bank_admin_transfer_cleanup
     214             :     };
     215             : 
     216          45 :     return cmd;
     217             :   }
     218             : }