-implement purses_get CMD

This commit is contained in:
Christian Grothoff 2022-04-30 12:02:43 +02:00
parent c48b51be6f
commit 8e4969eb66
No known key found for this signature in database
GPG Key ID: 939E6BE1E29FC3CC
3 changed files with 395 additions and 6 deletions

View File

@ -2447,22 +2447,38 @@ TALER_TESTING_cmd_purse_merge (
/**
* Retrieve purse state by purse private key.
* Retrieve purse state.
*
* @param label command label
* @param expected_http_status what HTTP status do we expect to get returned from the exchange
* @param purse_ref reference to a command providing us with the purse private key
* @param merge_to how long to wait for a merge
* @param deposit_to how long to wait for a deposit
* @param expected_balance how much should be in the purse
* @param wait_for_merge true to wait for a merge event, otherwise wait for a deposit event
* @param timeout how long to wait
* @return the command
*/
struct TALER_TESTING_Command
TALER_TESTING_cmd_purse_get (
TALER_TESTING_cmd_purse_poll (
const char *label,
unsigned int expected_http_status,
const char *purse_ref,
struct GNUNET_TIME_Relative merge_to,
struct GNUNET_TIME_Relative deposit_to);
const char *expected_balance,
bool wait_for_merge,
struct GNUNET_TIME_Relative timeout);
/**
* Wait for the poll command to complete.
*
* @param label command label
* @param timeout how long to wait at most
* @param poll_reference which poll command to wait for
* @return the command
*/
struct TALER_TESTING_Command
TALER_TESTING_cmd_purse_poll_finish (const char *label,
struct GNUNET_TIME_Relative timeout,
const char *poll_reference);
/**

View File

@ -74,6 +74,7 @@ libtalertesting_la_SOURCES = \
testing_api_cmd_offline_sign_extensions.c \
testing_api_cmd_purse_create_deposit.c \
testing_api_cmd_purse_deposit.c \
testing_api_cmd_purse_get.c \
testing_api_cmd_purse_merge.c \
testing_api_cmd_set_wire_fee.c \
testing_api_cmd_recoup.c \

View File

@ -0,0 +1,372 @@
/*
This file is part of TALER
Copyright (C) 2014-2022 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 testing/testing_api_cmd_purse_get.c
* @brief Implement the GET /purse/$RID test command.
* @author Marcello Stanisci
*/
#include "platform.h"
#include "taler_json_lib.h"
#include <gnunet/gnunet_curl_lib.h>
#include "taler_testing_lib.h"
/**
* State for a "poll" CMD.
*/
struct PollState
{
/**
* How long do we give the exchange to respond?
*/
struct GNUNET_TIME_Relative timeout;
/**
* Label to the command which created the purse to check,
* needed to resort the purse key.
*/
const char *poll_reference;
/**
* Timeout to wait for at most.
*/
struct GNUNET_SCHEDULER_Task *tt;
/**
* The interpreter we are using.
*/
struct TALER_TESTING_Interpreter *is;
};
/**
* State for a "status" CMD.
*/
struct StatusState
{
/**
* How long do we give the exchange to respond?
*/
struct GNUNET_TIME_Relative timeout;
/**
* Poller waiting for us.
*/
struct PollState *ps;
/**
* Label to the command which created the purse to check,
* needed to resort the purse key.
*/
const char *purse_reference;
/**
* Handle to the "purse status" operation.
*/
struct TALER_EXCHANGE_PurseGetHandle *pgh;
/**
* Expected purse balance.
*/
const char *expected_balance;
/**
* Private key of the purse being analyzed.
*/
const struct TALER_PurseContractPrivateKeyP *purse_priv;
/**
* Interpreter state.
*/
struct TALER_TESTING_Interpreter *is;
/**
* Expected HTTP response code.
*/
unsigned int expected_response_code;
/**
* Are we waiting for a merge or a deposit?
*/
bool wait_for_merge;
};
/**
* Check that the purse balance and HTTP response code are
* both acceptable.
*
* @param cls closure.
* @param rs HTTP response details
*/
static void
purse_status_cb (void *cls,
const struct TALER_EXCHANGE_PurseGetResponse *rs)
{
struct StatusState *ss = cls;
struct TALER_TESTING_Interpreter *is = ss->is;
ss->pgh = NULL;
if (ss->expected_response_code != rs->hr.http_status)
{
GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
"Unexpected HTTP response code: %d in %s:%u\n",
rs->hr.http_status,
__FILE__,
__LINE__);
json_dumpf (rs->hr.reply,
stderr,
0);
TALER_TESTING_interpreter_fail (ss->is);
return;
}
if (MHD_HTTP_OK == ss->expected_response_code)
{
#if 0
struct TALER_Amount eb;
GNUNET_assert (GNUNET_OK ==
TALER_string_to_amount (ss->expected_balance,
&eb));
if (0 != TALER_amount_cmp (&eb,
&rs->details.success.balance))
{
GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
"Unexpected amount in purse: %s\n",
TALER_amount_to_string (&rs->details.ok.balance));
TALER_TESTING_interpreter_fail (ss->is);
return;
}
#endif
}
if (NULL != ss->ps)
{
/* force continuation on long poller */
GNUNET_SCHEDULER_cancel (ss->ps->tt);
ss->ps->tt = NULL;
TALER_TESTING_interpreter_next (is);
return;
}
if (GNUNET_TIME_relative_is_zero (ss->timeout))
TALER_TESTING_interpreter_next (is);
}
/**
* Run the command.
*
* @param cls closure.
* @param cmd the command being executed.
* @param is the interpreter state.
*/
static void
status_run (void *cls,
const struct TALER_TESTING_Command *cmd,
struct TALER_TESTING_Interpreter *is)
{
struct StatusState *ss = cls;
const struct TALER_TESTING_Command *create_purse;
ss->is = is;
create_purse
= TALER_TESTING_interpreter_lookup_command (is,
ss->purse_reference);
if (NULL == create_purse)
{
GNUNET_break (0);
TALER_TESTING_interpreter_fail (is);
return;
}
if (GNUNET_OK !=
TALER_TESTING_get_trait_purse_priv (create_purse,
&ss->purse_priv))
{
GNUNET_break (0);
TALER_LOG_ERROR ("Failed to find purse_priv for status query\n");
TALER_TESTING_interpreter_fail (is);
return;
}
ss->pgh = TALER_EXCHANGE_purse_get (is->exchange,
ss->purse_priv,
ss->timeout,
ss->wait_for_merge,
&purse_status_cb,
ss);
if (! GNUNET_TIME_relative_is_zero (ss->timeout))
{
TALER_TESTING_interpreter_next (is);
return;
}
}
/**
* Cleanup the state from a "purse status" CMD, and possibly
* cancel a pending operation thereof.
*
* @param cls closure.
* @param cmd the command which is being cleaned up.
*/
static void
status_cleanup (void *cls,
const struct TALER_TESTING_Command *cmd)
{
struct StatusState *ss = cls;
if (NULL != ss->pgh)
{
GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
"Command %u (%s) did not complete\n",
ss->is->ip,
cmd->label);
TALER_EXCHANGE_purse_get_cancel (ss->pgh);
ss->pgh = NULL;
}
GNUNET_free (ss);
}
struct TALER_TESTING_Command
TALER_TESTING_cmd_purse_poll (
const char *label,
unsigned int expected_http_status,
const char *purse_ref,
const char *expected_balance,
bool wait_for_merge,
struct GNUNET_TIME_Relative timeout)
{
struct StatusState *ss;
GNUNET_assert (NULL != purse_ref);
ss = GNUNET_new (struct StatusState);
ss->purse_reference = purse_ref;
ss->expected_balance = expected_balance;
ss->expected_response_code = expected_http_status;
ss->timeout = timeout;
{
struct TALER_TESTING_Command cmd = {
.cls = ss,
.label = label,
.run = &status_run,
.cleanup = &status_cleanup
};
return cmd;
}
}
/**
* Long poller timed out. Fail the test.
*
* @param cls a `struct PollState`
*/
static void
finish_timeout (void *cls)
{
struct PollState *ps = cls;
ps->tt = NULL;
GNUNET_break (0);
TALER_TESTING_interpreter_fail (ps->is);
}
/**
* Run the command.
*
* @param cls closure.
* @param cmd the command being executed.
* @param is the interpreter state.
*/
static void
finish_run (void *cls,
const struct TALER_TESTING_Command *cmd,
struct TALER_TESTING_Interpreter *is)
{
struct PollState *ps = cls;
const struct TALER_TESTING_Command *poll_purse;
struct StatusState *ss;
ps->is = is;
poll_purse
= TALER_TESTING_interpreter_lookup_command (is,
ps->poll_reference);
GNUNET_assert (poll_purse->run == &status_run);
ss = poll_purse->cls;
if (NULL == ss->pgh)
{
TALER_TESTING_interpreter_next (is);
return;
}
GNUNET_assert (NULL == ss->ps);
ss->ps = ps;
ps->tt = GNUNET_SCHEDULER_add_delayed (ps->timeout,
&finish_timeout,
ps);
}
/**
* Cleanup the state from a "purse finish" CMD.
*
* @param cls closure.
* @param cmd the command which is being cleaned up.
*/
static void
finish_cleanup (void *cls,
const struct TALER_TESTING_Command *cmd)
{
struct PollState *ps = cls;
if (NULL != ps->tt)
{
GNUNET_SCHEDULER_cancel (ps->tt);
ps->tt = NULL;
}
GNUNET_free (ps);
}
struct TALER_TESTING_Command
TALER_TESTING_cmd_purse_poll_finish (const char *label,
struct GNUNET_TIME_Relative timeout,
const char *poll_reference)
{
struct PollState *ps;
GNUNET_assert (NULL != poll_reference);
ps = GNUNET_new (struct PollState);
ps->timeout = timeout;
ps->poll_reference = poll_reference;
{
struct TALER_TESTING_Command cmd = {
.cls = ps,
.label = label,
.run = &finish_run,
.cleanup = &finish_cleanup
};
return cmd;
}
}