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 : }
|
