2017-06-11 11:48:06 +02:00
|
|
|
/*
|
|
|
|
This file is part of TALER
|
2018-04-02 14:24:45 +02:00
|
|
|
(C) 2016, 2017, 2018 Taler Systems SA
|
2017-06-11 11:48:06 +02:00
|
|
|
|
|
|
|
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 exchange/test_taler_exchange_wirewatch.c
|
|
|
|
* @brief Tests for taler-exchange-wirewatch and taler-exchange-aggregator logic;
|
|
|
|
* Performs an invalid wire transfer to the exchange, and then checks that
|
|
|
|
* wirewatch immediately sends the money back.
|
|
|
|
* Then performs a valid wire transfer, waits for the reserve to expire,
|
|
|
|
* and then checks that the aggregator sends the money back.
|
|
|
|
* @author Christian Grothoff <christian@grothoff.org>
|
|
|
|
*/
|
|
|
|
#include "platform.h"
|
|
|
|
#include "taler_util.h"
|
|
|
|
#include <gnunet/gnunet_json_lib.h>
|
2019-12-24 22:37:31 +01:00
|
|
|
#include <gnunet/gnunet_pq_lib.h>
|
2017-06-11 11:48:06 +02:00
|
|
|
#include "taler_json_lib.h"
|
|
|
|
#include <microhttpd.h>
|
|
|
|
#include "taler_fakebank_lib.h"
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Commands for the interpreter.
|
|
|
|
*/
|
2019-08-25 16:18:24 +02:00
|
|
|
enum OpCode
|
|
|
|
{
|
2017-06-11 11:48:06 +02:00
|
|
|
|
|
|
|
/**
|
|
|
|
* Terminate testcase with 'skipped' result.
|
|
|
|
*/
|
|
|
|
OPCODE_TERMINATE_SKIP,
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Run taler-exchange-aggregator.
|
|
|
|
*/
|
|
|
|
OPCODE_RUN_AGGREGATOR,
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Expect that we have exhaustively gone over all transactions.
|
|
|
|
*/
|
|
|
|
OPCODE_RUN_WIREWATCH,
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Send money from bank to exchange.
|
|
|
|
*/
|
|
|
|
OPCODE_RUN_TRANSFER,
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Wait a certain amount of time.
|
|
|
|
*/
|
|
|
|
OPCODE_WAIT,
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Expect that we have received the specified transfer.
|
|
|
|
*/
|
|
|
|
OPCODE_EXPECT_TRANSFER,
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Expect that we have 'expected' all wire transfers.
|
|
|
|
*/
|
|
|
|
OPCODE_EXPECT_TRANSFERS_EMPTY,
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Finish testcase with success.
|
|
|
|
*/
|
|
|
|
OPCODE_TERMINATE_SUCCESS
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Command state for the interpreter.
|
|
|
|
*/
|
|
|
|
struct Command
|
|
|
|
{
|
|
|
|
|
|
|
|
/**
|
|
|
|
* What instruction should we run?
|
|
|
|
*/
|
|
|
|
enum OpCode opcode;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Human-readable label for the command.
|
|
|
|
*/
|
|
|
|
const char *label;
|
|
|
|
|
2019-08-25 16:18:24 +02:00
|
|
|
union
|
|
|
|
{
|
2017-06-11 11:48:06 +02:00
|
|
|
|
|
|
|
/**
|
|
|
|
* If @e opcode is #OPCODE_EXPECT_TRANSFER, this
|
|
|
|
* specifies which transaction we expected. Note that
|
|
|
|
* the WTID will be set, not checked!
|
|
|
|
*/
|
2019-08-25 16:18:24 +02:00
|
|
|
struct
|
|
|
|
{
|
2017-06-11 11:48:06 +02:00
|
|
|
|
|
|
|
/**
|
|
|
|
* Amount to be transferred.
|
|
|
|
*/
|
|
|
|
const char *amount;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Account to debit.
|
|
|
|
*/
|
|
|
|
uint64_t debit_account;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Account to credit.
|
|
|
|
*/
|
|
|
|
uint64_t credit_account;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Expected base URL for the exchange.
|
|
|
|
*/
|
|
|
|
const char *exchange_base_url;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Subject of the transfer, set by the command.
|
|
|
|
*/
|
2020-01-12 18:20:47 +01:00
|
|
|
struct TALER_WireTransferIdentifierRawP wtid;
|
2017-06-11 11:48:06 +02:00
|
|
|
|
|
|
|
} expect_transfer;
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* If @e opcode is #OPCODE_RUN_TRANSFER, this
|
|
|
|
* specifies which transaction the bank should do.
|
|
|
|
*/
|
2019-08-25 16:18:24 +02:00
|
|
|
struct
|
|
|
|
{
|
2017-06-11 11:48:06 +02:00
|
|
|
|
|
|
|
/**
|
|
|
|
* Amount to be transferred.
|
|
|
|
*/
|
|
|
|
const char *amount;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Account to debit.
|
|
|
|
*/
|
|
|
|
uint64_t debit_account;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Account to credit.
|
|
|
|
*/
|
|
|
|
uint64_t credit_account;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Subject of the transfer, set by the command.
|
|
|
|
*/
|
2017-06-11 17:04:54 +02:00
|
|
|
const char *subject;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Serial ID of the wire transfer as assigned by the bank.
|
|
|
|
*/
|
|
|
|
uint64_t serial_id;
|
2017-06-11 11:48:06 +02:00
|
|
|
|
|
|
|
} run_transfer;
|
|
|
|
|
2019-08-25 16:18:24 +02:00
|
|
|
struct
|
|
|
|
{
|
2017-06-11 11:48:06 +02:00
|
|
|
|
|
|
|
/**
|
|
|
|
* The handle for the aggregator process that we are testing.
|
|
|
|
*/
|
|
|
|
struct GNUNET_OS_Process *aggregator_proc;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* ID of task called whenever we get a SIGCHILD.
|
|
|
|
*/
|
|
|
|
struct GNUNET_SCHEDULER_Task *child_death_task;
|
|
|
|
|
|
|
|
} aggregator;
|
|
|
|
|
2019-08-25 16:18:24 +02:00
|
|
|
struct
|
|
|
|
{
|
2017-06-11 11:48:06 +02:00
|
|
|
|
|
|
|
/**
|
|
|
|
* The handle for the wirewatch process that we are testing.
|
|
|
|
*/
|
|
|
|
struct GNUNET_OS_Process *wirewatch_proc;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* ID of task called whenever we get a SIGCHILD.
|
|
|
|
*/
|
|
|
|
struct GNUNET_SCHEDULER_Task *child_death_task;
|
|
|
|
|
|
|
|
} wirewatch;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* How long should we wait if the opcode is #OPCODE_WAIT.
|
|
|
|
*/
|
|
|
|
struct GNUNET_TIME_Relative wait_delay;
|
|
|
|
|
|
|
|
} details;
|
|
|
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* State of the interpreter.
|
|
|
|
*/
|
|
|
|
struct State
|
|
|
|
{
|
|
|
|
/**
|
|
|
|
* Array of commands to run.
|
|
|
|
*/
|
2019-08-25 16:18:24 +02:00
|
|
|
struct Command*commands;
|
2017-06-11 11:48:06 +02:00
|
|
|
|
|
|
|
/**
|
|
|
|
* Offset of the next command to be run.
|
|
|
|
*/
|
|
|
|
unsigned int ioff;
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Pipe used to communicate child death via signal.
|
|
|
|
*/
|
|
|
|
static struct GNUNET_DISK_PipeHandle *sigpipe;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* ID of task called whenever we time out.
|
|
|
|
*/
|
|
|
|
static struct GNUNET_SCHEDULER_Task *timeout_task;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Return value from main().
|
|
|
|
*/
|
|
|
|
static int result;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Name of the configuration file to use.
|
|
|
|
*/
|
|
|
|
static char *config_filename;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Task running the interpreter().
|
|
|
|
*/
|
|
|
|
static struct GNUNET_SCHEDULER_Task *int_task;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Handle for our fake bank.
|
|
|
|
*/
|
|
|
|
static struct TALER_FAKEBANK_Handle *fb;
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Interprets the commands from the test program.
|
|
|
|
*
|
|
|
|
* @param cls the `struct State` of the interpreter
|
|
|
|
*/
|
|
|
|
static void
|
|
|
|
interpreter (void *cls);
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Advance the IP and run the next command.
|
|
|
|
*
|
|
|
|
* @param state interpreter to advance.
|
|
|
|
*/
|
|
|
|
static void
|
|
|
|
next_command (struct State *state)
|
|
|
|
{
|
2017-06-11 17:04:54 +02:00
|
|
|
GNUNET_assert (NULL == int_task);
|
2017-06-11 11:48:06 +02:00
|
|
|
state->ioff++;
|
2017-06-11 17:04:54 +02:00
|
|
|
GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
|
|
|
|
"Advancing to command %s\n",
|
|
|
|
state->commands[state->ioff].label);
|
2017-06-11 11:48:06 +02:00
|
|
|
int_task = GNUNET_SCHEDULER_add_now (&interpreter,
|
|
|
|
state);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Fail the testcase at the current command.
|
|
|
|
*/
|
|
|
|
static void
|
|
|
|
fail (struct Command *cmd)
|
|
|
|
{
|
2017-06-11 17:04:54 +02:00
|
|
|
GNUNET_assert (NULL == int_task);
|
2017-06-11 11:48:06 +02:00
|
|
|
fprintf (stderr,
|
|
|
|
"Testcase failed at command `%s'\n",
|
|
|
|
cmd->label);
|
|
|
|
result = 2;
|
|
|
|
GNUNET_SCHEDULER_shutdown ();
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Task triggered whenever we are to shutdown.
|
|
|
|
*
|
|
|
|
* @param cls closure, NULL if we need to self-restart
|
|
|
|
*/
|
|
|
|
static void
|
|
|
|
timeout_action (void *cls)
|
|
|
|
{
|
|
|
|
timeout_task = NULL;
|
|
|
|
GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
|
|
|
|
"Test failed: timeout\n");
|
|
|
|
result = 2;
|
|
|
|
GNUNET_SCHEDULER_shutdown ();
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Task triggered whenever we are to shutdown.
|
|
|
|
*
|
|
|
|
* @param cls our `struct State`
|
|
|
|
*/
|
|
|
|
static void
|
|
|
|
shutdown_action (void *cls)
|
|
|
|
{
|
|
|
|
struct State *state = cls;
|
|
|
|
|
2017-06-11 17:04:54 +02:00
|
|
|
GNUNET_log (GNUNET_ERROR_TYPE_INFO,
|
|
|
|
"Running shutdown\n");
|
2017-06-11 11:48:06 +02:00
|
|
|
if (NULL != timeout_task)
|
|
|
|
{
|
|
|
|
GNUNET_SCHEDULER_cancel (timeout_task);
|
|
|
|
timeout_task = NULL;
|
|
|
|
}
|
|
|
|
if (NULL != int_task)
|
|
|
|
{
|
|
|
|
GNUNET_SCHEDULER_cancel (int_task);
|
|
|
|
int_task = NULL;
|
|
|
|
}
|
|
|
|
if (NULL != fb)
|
|
|
|
{
|
|
|
|
TALER_FAKEBANK_stop (fb);
|
|
|
|
fb = NULL;
|
|
|
|
}
|
2019-08-25 16:18:24 +02:00
|
|
|
for (unsigned int i = 0; i<=state->ioff; i++)
|
2017-06-11 11:48:06 +02:00
|
|
|
{
|
|
|
|
struct Command *cmd = &state->commands[i];
|
|
|
|
|
|
|
|
switch (cmd->opcode)
|
|
|
|
{
|
|
|
|
case OPCODE_TERMINATE_SKIP:
|
|
|
|
break;
|
|
|
|
case OPCODE_RUN_AGGREGATOR:
|
|
|
|
if (NULL != cmd->details.aggregator.child_death_task)
|
|
|
|
{
|
|
|
|
GNUNET_SCHEDULER_cancel (cmd->details.aggregator.child_death_task);
|
|
|
|
cmd->details.aggregator.child_death_task = NULL;
|
|
|
|
}
|
|
|
|
if (NULL != cmd->details.aggregator.aggregator_proc)
|
|
|
|
{
|
2019-08-25 16:18:24 +02:00
|
|
|
GNUNET_break (0 == GNUNET_OS_process_kill (
|
|
|
|
cmd->details.aggregator.aggregator_proc,
|
|
|
|
SIGKILL));
|
2017-06-11 11:48:06 +02:00
|
|
|
GNUNET_OS_process_wait (cmd->details.aggregator.aggregator_proc);
|
|
|
|
GNUNET_OS_process_destroy (cmd->details.aggregator.aggregator_proc);
|
|
|
|
cmd->details.aggregator.aggregator_proc = NULL;
|
|
|
|
}
|
|
|
|
break;
|
|
|
|
case OPCODE_RUN_WIREWATCH:
|
|
|
|
if (NULL != cmd->details.wirewatch.child_death_task)
|
|
|
|
{
|
|
|
|
GNUNET_SCHEDULER_cancel (cmd->details.wirewatch.child_death_task);
|
|
|
|
cmd->details.wirewatch.child_death_task = NULL;
|
|
|
|
}
|
|
|
|
if (NULL != cmd->details.wirewatch.wirewatch_proc)
|
|
|
|
{
|
2019-08-25 16:18:24 +02:00
|
|
|
GNUNET_break (0 == GNUNET_OS_process_kill (
|
|
|
|
cmd->details.wirewatch.wirewatch_proc,
|
|
|
|
SIGKILL));
|
2017-06-11 11:48:06 +02:00
|
|
|
GNUNET_OS_process_wait (cmd->details.wirewatch.wirewatch_proc);
|
|
|
|
GNUNET_OS_process_destroy (cmd->details.wirewatch.wirewatch_proc);
|
|
|
|
cmd->details.wirewatch.wirewatch_proc = NULL;
|
|
|
|
}
|
|
|
|
break;
|
|
|
|
case OPCODE_RUN_TRANSFER:
|
|
|
|
break;
|
|
|
|
case OPCODE_WAIT:
|
|
|
|
break;
|
|
|
|
case OPCODE_EXPECT_TRANSFER:
|
|
|
|
break;
|
|
|
|
case OPCODE_EXPECT_TRANSFERS_EMPTY:
|
|
|
|
break;
|
|
|
|
case OPCODE_TERMINATE_SUCCESS:
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Task triggered whenever we receive a SIGCHLD (child
|
|
|
|
* process died).
|
|
|
|
*
|
|
|
|
* @param cls our `struct State`
|
|
|
|
*/
|
|
|
|
static void
|
|
|
|
maint_child_death (void *cls)
|
|
|
|
{
|
|
|
|
struct State *state = cls;
|
|
|
|
const struct GNUNET_DISK_FileHandle *pr;
|
|
|
|
struct Command *cmd = &state->commands[state->ioff];
|
|
|
|
char c[16];
|
|
|
|
|
2017-06-11 17:04:54 +02:00
|
|
|
GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
|
|
|
|
"Child process died for command %s\n",
|
|
|
|
cmd->label);
|
2017-06-11 11:48:06 +02:00
|
|
|
pr = GNUNET_DISK_pipe_handle (sigpipe,
|
|
|
|
GNUNET_DISK_PIPE_END_READ);
|
|
|
|
GNUNET_break (0 < GNUNET_DISK_file_read (pr,
|
|
|
|
&c,
|
|
|
|
sizeof (c)));
|
|
|
|
switch (cmd->opcode)
|
|
|
|
{
|
|
|
|
case OPCODE_RUN_AGGREGATOR:
|
2017-06-11 17:04:54 +02:00
|
|
|
GNUNET_assert (NULL != cmd->details.aggregator.child_death_task);
|
2017-06-11 11:48:06 +02:00
|
|
|
cmd->details.aggregator.child_death_task = NULL;
|
|
|
|
GNUNET_OS_process_wait (cmd->details.aggregator.aggregator_proc);
|
|
|
|
GNUNET_OS_process_destroy (cmd->details.aggregator.aggregator_proc);
|
|
|
|
cmd->details.aggregator.aggregator_proc = NULL;
|
|
|
|
break;
|
|
|
|
case OPCODE_RUN_WIREWATCH:
|
2017-06-11 17:04:54 +02:00
|
|
|
GNUNET_assert (NULL != cmd->details.wirewatch.child_death_task);
|
2017-06-11 11:48:06 +02:00
|
|
|
cmd->details.wirewatch.child_death_task = NULL;
|
|
|
|
GNUNET_OS_process_wait (cmd->details.wirewatch.wirewatch_proc);
|
|
|
|
GNUNET_OS_process_destroy (cmd->details.wirewatch.wirewatch_proc);
|
|
|
|
cmd->details.wirewatch.wirewatch_proc = NULL;
|
|
|
|
break;
|
|
|
|
default:
|
|
|
|
fail (cmd);
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
next_command (state);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Interprets the commands from the test program.
|
|
|
|
*
|
|
|
|
* @param cls the `struct State` of the interpreter
|
|
|
|
*/
|
|
|
|
static void
|
|
|
|
interpreter (void *cls)
|
|
|
|
{
|
|
|
|
struct State *state = cls;
|
|
|
|
struct Command *cmd = &state->commands[state->ioff];
|
|
|
|
|
2017-06-11 17:04:54 +02:00
|
|
|
GNUNET_assert (NULL != int_task);
|
2017-06-11 11:48:06 +02:00
|
|
|
int_task = NULL;
|
|
|
|
GNUNET_log (GNUNET_ERROR_TYPE_INFO,
|
|
|
|
"Running command %u (%s)\n",
|
|
|
|
state->ioff,
|
|
|
|
cmd->label);
|
|
|
|
switch (cmd->opcode)
|
|
|
|
{
|
|
|
|
case OPCODE_TERMINATE_SKIP:
|
|
|
|
/* return skip: test not finished, but did not fail either */
|
|
|
|
result = 77;
|
|
|
|
GNUNET_SCHEDULER_shutdown ();
|
|
|
|
return;
|
|
|
|
case OPCODE_RUN_AGGREGATOR:
|
|
|
|
cmd->details.aggregator.child_death_task =
|
|
|
|
GNUNET_SCHEDULER_add_read_file (GNUNET_TIME_UNIT_FOREVER_REL,
|
|
|
|
GNUNET_DISK_pipe_handle (sigpipe,
|
|
|
|
GNUNET_DISK_PIPE_END_READ),
|
|
|
|
&maint_child_death,
|
|
|
|
state);
|
|
|
|
cmd->details.aggregator.aggregator_proc
|
|
|
|
= GNUNET_OS_start_process (GNUNET_NO,
|
|
|
|
GNUNET_OS_INHERIT_STD_ALL,
|
|
|
|
NULL, NULL, NULL,
|
|
|
|
"taler-exchange-aggregator",
|
|
|
|
"taler-exchange-aggregator",
|
|
|
|
"-c", config_filename,
|
|
|
|
"-t", /* enable temporary tables */
|
|
|
|
NULL);
|
|
|
|
if (NULL == cmd->details.aggregator.aggregator_proc)
|
|
|
|
{
|
|
|
|
GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
|
|
|
|
"Failed to start taler-exchange-aggregator. Check $PATH.\n");
|
|
|
|
GNUNET_break (0);
|
|
|
|
fail (cmd);
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
return;
|
|
|
|
case OPCODE_RUN_WIREWATCH:
|
|
|
|
cmd->details.wirewatch.child_death_task =
|
|
|
|
GNUNET_SCHEDULER_add_read_file (GNUNET_TIME_UNIT_FOREVER_REL,
|
|
|
|
GNUNET_DISK_pipe_handle (sigpipe,
|
|
|
|
GNUNET_DISK_PIPE_END_READ),
|
|
|
|
&maint_child_death,
|
|
|
|
state);
|
|
|
|
cmd->details.wirewatch.wirewatch_proc
|
|
|
|
= GNUNET_OS_start_process (GNUNET_NO,
|
|
|
|
GNUNET_OS_INHERIT_STD_ALL,
|
|
|
|
NULL, NULL, NULL,
|
|
|
|
"taler-exchange-wirewatch",
|
|
|
|
"taler-exchange-wirewatch",
|
|
|
|
"-c", config_filename,
|
2017-06-11 11:57:05 +02:00
|
|
|
"-T", /* run in test mode, exit instead of looping */
|
2017-06-11 11:48:06 +02:00
|
|
|
NULL);
|
|
|
|
if (NULL == cmd->details.wirewatch.wirewatch_proc)
|
|
|
|
{
|
|
|
|
GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
|
|
|
|
"Failed to start taler-exchange-wirewatch. Check $PATH.\n");
|
|
|
|
GNUNET_break (0);
|
|
|
|
fail (cmd);
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
return;
|
|
|
|
case OPCODE_RUN_TRANSFER:
|
2017-06-11 17:04:54 +02:00
|
|
|
{
|
|
|
|
struct TALER_Amount amount;
|
|
|
|
|
|
|
|
if (GNUNET_OK !=
|
|
|
|
TALER_string_to_amount (cmd->details.run_transfer.amount,
|
|
|
|
&amount))
|
|
|
|
{
|
|
|
|
GNUNET_break (0);
|
|
|
|
fail (cmd);
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
GNUNET_assert (NULL != cmd->details.run_transfer.subject);
|
|
|
|
cmd->details.run_transfer.serial_id
|
|
|
|
= TALER_FAKEBANK_make_transfer (fb,
|
|
|
|
cmd->details.run_transfer.debit_account,
|
|
|
|
cmd->details.run_transfer.credit_account,
|
|
|
|
&amount,
|
|
|
|
cmd->details.run_transfer.subject,
|
|
|
|
"https://exchange.taler.net/");
|
|
|
|
next_command (state);
|
|
|
|
return;
|
|
|
|
}
|
2017-06-11 11:48:06 +02:00
|
|
|
case OPCODE_WAIT:
|
2017-06-11 17:04:54 +02:00
|
|
|
state->ioff++;
|
|
|
|
GNUNET_assert (NULL == int_task);
|
|
|
|
int_task = GNUNET_SCHEDULER_add_delayed (cmd->details.wait_delay,
|
|
|
|
&interpreter,
|
|
|
|
state);
|
2017-06-11 11:48:06 +02:00
|
|
|
return;
|
|
|
|
case OPCODE_EXPECT_TRANSFER:
|
|
|
|
{
|
|
|
|
struct TALER_Amount want_amount;
|
|
|
|
|
|
|
|
if (GNUNET_OK !=
|
|
|
|
TALER_string_to_amount (cmd->details.expect_transfer.amount,
|
|
|
|
&want_amount))
|
|
|
|
{
|
|
|
|
GNUNET_break (0);
|
|
|
|
fail (cmd);
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
if (GNUNET_OK !=
|
2020-01-12 18:20:47 +01:00
|
|
|
TALER_FAKEBANK_check_debit (fb,
|
|
|
|
&want_amount,
|
|
|
|
cmd->details.expect_transfer.debit_account,
|
|
|
|
cmd->details.expect_transfer.
|
|
|
|
credit_account,
|
|
|
|
cmd->details.expect_transfer.
|
|
|
|
exchange_base_url,
|
|
|
|
&cmd->details.expect_transfer.wtid))
|
2017-06-11 11:48:06 +02:00
|
|
|
{
|
|
|
|
fail (cmd);
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
next_command (state);
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
case OPCODE_EXPECT_TRANSFERS_EMPTY:
|
|
|
|
if (GNUNET_OK != TALER_FAKEBANK_check_empty (fb))
|
|
|
|
{
|
|
|
|
fail (cmd);
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
next_command (state);
|
2017-06-11 17:04:54 +02:00
|
|
|
return;
|
2017-06-11 11:48:06 +02:00
|
|
|
case OPCODE_TERMINATE_SUCCESS:
|
|
|
|
result = 0;
|
|
|
|
GNUNET_SCHEDULER_shutdown ();
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Main function that will be run by the scheduler.
|
|
|
|
*
|
|
|
|
* @param cls closure with configuration
|
|
|
|
*/
|
|
|
|
static void
|
|
|
|
run (void *cls)
|
|
|
|
{
|
|
|
|
static struct Command commands[] = {
|
|
|
|
/* test running with empty DB */
|
2017-06-11 11:51:55 +02:00
|
|
|
{
|
|
|
|
.opcode = OPCODE_EXPECT_TRANSFERS_EMPTY,
|
|
|
|
.label = "expect-empty-transactions-on-start"
|
|
|
|
},
|
2017-06-11 11:48:06 +02:00
|
|
|
{
|
|
|
|
.opcode = OPCODE_RUN_AGGREGATOR,
|
2017-06-11 11:51:55 +02:00
|
|
|
.label = "run-aggregator-on-empty"
|
|
|
|
},
|
|
|
|
{
|
|
|
|
.opcode = OPCODE_RUN_WIREWATCH,
|
|
|
|
.label = "run-wirewatch-on-empty"
|
2017-06-11 11:48:06 +02:00
|
|
|
},
|
|
|
|
{
|
|
|
|
.opcode = OPCODE_EXPECT_TRANSFERS_EMPTY,
|
2017-06-11 11:51:55 +02:00
|
|
|
.label = "expect-empty-transactions-after-dry-run"
|
2017-06-11 11:48:06 +02:00
|
|
|
},
|
2017-06-11 17:04:54 +02:00
|
|
|
/* fill exchange's reserve at bank */
|
2017-06-11 11:48:06 +02:00
|
|
|
{
|
2017-06-11 17:04:54 +02:00
|
|
|
.opcode = OPCODE_RUN_TRANSFER,
|
|
|
|
.label = "run-transfer-good-to-exchange",
|
|
|
|
.details.run_transfer.debit_account = 4,
|
|
|
|
.details.run_transfer.credit_account = 3,
|
2019-08-25 16:18:24 +02:00
|
|
|
.details.run_transfer.subject =
|
|
|
|
"SRB8VQHNTNJWSSG7BXT24Z063ZSXN7T0MHCQCBAFC1V17BZH10D0",
|
2017-06-11 17:04:54 +02:00
|
|
|
.details.run_transfer.amount = "EUR:5.00"
|
|
|
|
},
|
|
|
|
/* creates reserve */
|
|
|
|
{
|
|
|
|
.opcode = OPCODE_RUN_WIREWATCH,
|
|
|
|
.label = "run-wirewatch-on-good-transfer"
|
|
|
|
},
|
|
|
|
/* clear first transfer from DLL */
|
|
|
|
{
|
|
|
|
.opcode = OPCODE_EXPECT_TRANSFER,
|
|
|
|
.label = "clear-good-transfer-to-exchange",
|
|
|
|
.details.expect_transfer.debit_account = 4,
|
|
|
|
.details.expect_transfer.credit_account = 3,
|
2019-08-25 16:18:24 +02:00
|
|
|
.details.expect_transfer.exchange_base_url =
|
|
|
|
"https://exchange.taler.net/",
|
2017-06-11 17:04:54 +02:00
|
|
|
.details.expect_transfer.amount = "EUR:5.00"
|
|
|
|
},
|
|
|
|
/* should do NOTHING, it is too early... */
|
|
|
|
{
|
|
|
|
.opcode = OPCODE_RUN_AGGREGATOR,
|
|
|
|
.label = "run-aggregator-non-expired-reserve"
|
|
|
|
},
|
|
|
|
/* check nothing happened */
|
|
|
|
{
|
|
|
|
.opcode = OPCODE_EXPECT_TRANSFERS_EMPTY,
|
|
|
|
.label = "expect-empty-transactions-1"
|
2017-06-11 11:48:06 +02:00
|
|
|
},
|
2017-06-11 17:04:54 +02:00
|
|
|
/* Configuration says reserves expire after 5s! */
|
|
|
|
{
|
|
|
|
.opcode = OPCODE_WAIT,
|
|
|
|
.label = "wait (5s)",
|
|
|
|
.details.wait_delay = { 1000LL * 1000 * 6 } /* 6s */
|
|
|
|
},
|
|
|
|
/* This time the reserve expired, so the money should go back... */
|
|
|
|
{
|
|
|
|
.opcode = OPCODE_RUN_AGGREGATOR,
|
|
|
|
.label = "run-aggregator-non-expired-reserve"
|
|
|
|
},
|
|
|
|
/* Check exchange sent money back, minus closing fee of EUR:0.01 */
|
2017-06-11 11:48:06 +02:00
|
|
|
{
|
|
|
|
.opcode = OPCODE_EXPECT_TRANSFER,
|
2017-06-11 17:04:54 +02:00
|
|
|
.label = "check-reserve-expiration-transfer",
|
2017-06-11 11:48:06 +02:00
|
|
|
.details.expect_transfer.debit_account = 3,
|
|
|
|
.details.expect_transfer.credit_account = 4,
|
2019-08-25 16:18:24 +02:00
|
|
|
.details.expect_transfer.exchange_base_url =
|
|
|
|
"https://exchange.taler.net/",
|
2017-06-11 17:04:54 +02:00
|
|
|
.details.expect_transfer.amount = "EUR:4.99"
|
2017-06-11 11:48:06 +02:00
|
|
|
},
|
2017-06-11 17:04:54 +02:00
|
|
|
/* check nothing else happened */
|
2017-06-11 11:48:06 +02:00
|
|
|
{
|
|
|
|
.opcode = OPCODE_EXPECT_TRANSFERS_EMPTY,
|
2017-06-11 17:04:54 +02:00
|
|
|
.label = "expect-empty-transactions-1"
|
|
|
|
},
|
|
|
|
/* This cannot work unless #5077 is implemented. */
|
|
|
|
#if TEST_5077
|
|
|
|
{
|
|
|
|
.opcode = OPCODE_RUN_TRANSFER,
|
|
|
|
.label = "run-transfer-bad-to-exchange",
|
|
|
|
.details.run_transfer.debit_account = 4,
|
|
|
|
.details.run_transfer.credit_account = 3,
|
|
|
|
.details.run_transfer.subject = "random junk",
|
|
|
|
.details.run_transfer.amount = "EUR:5.00"
|
|
|
|
},
|
|
|
|
{
|
|
|
|
.opcode = OPCODE_RUN_WIREWATCH,
|
|
|
|
.label = "run-wirewatch-on-bad-transfer"
|
|
|
|
},
|
|
|
|
{
|
|
|
|
.opcode = OPCODE_EXPECT_TRANSFER,
|
|
|
|
.label = "expect-bad-transfer-to-exchange",
|
|
|
|
.details.expect_transfer.debit_account = 4,
|
|
|
|
.details.expect_transfer.credit_account = 3,
|
2019-08-25 16:18:24 +02:00
|
|
|
.details.expect_transfer.exchange_base_url =
|
|
|
|
"https://exchange.taler.net/",
|
2017-06-11 17:04:54 +02:00
|
|
|
.details.expect_transfer.amount = "EUR:5.00"
|
|
|
|
},
|
|
|
|
{
|
|
|
|
.opcode = OPCODE_EXPECT_TRANSFER,
|
|
|
|
.label = "expect-rewire-transfer-from-exchange",
|
|
|
|
.details.expect_transfer.debit_account = 3,
|
|
|
|
.details.expect_transfer.credit_account = 4,
|
2019-08-25 16:18:24 +02:00
|
|
|
.details.expect_transfer.exchange_base_url =
|
|
|
|
"https://exchange.taler.net/",
|
2017-06-11 17:04:54 +02:00
|
|
|
.details.expect_transfer.amount = "EUR:5.00"
|
|
|
|
},
|
|
|
|
{
|
|
|
|
.opcode = OPCODE_EXPECT_TRANSFERS_EMPTY,
|
|
|
|
.label = "expect-empty-transactions-1"
|
2017-06-11 11:48:06 +02:00
|
|
|
},
|
2017-06-11 17:04:54 +02:00
|
|
|
#endif
|
|
|
|
|
2017-06-11 11:48:06 +02:00
|
|
|
{
|
|
|
|
.opcode = OPCODE_TERMINATE_SUCCESS,
|
|
|
|
.label = "testcase-complete-terminating-with-success"
|
|
|
|
}
|
|
|
|
};
|
|
|
|
static struct State state = {
|
|
|
|
.commands = commands
|
|
|
|
};
|
|
|
|
|
|
|
|
GNUNET_SCHEDULER_add_shutdown (&shutdown_action,
|
|
|
|
&state);
|
|
|
|
timeout_task = GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_MINUTES,
|
|
|
|
&timeout_action,
|
|
|
|
&state);
|
|
|
|
result = 1; /* test failed for undefined reason */
|
|
|
|
fb = TALER_FAKEBANK_start (8082);
|
|
|
|
if (NULL == fb)
|
|
|
|
{
|
|
|
|
GNUNET_SCHEDULER_shutdown ();
|
|
|
|
result = 77;
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
|
|
|
|
"Launching interpreter\n");
|
|
|
|
int_task = GNUNET_SCHEDULER_add_now (&interpreter,
|
|
|
|
&state);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Signal handler called for SIGCHLD. Triggers the
|
|
|
|
* respective handler by writing to the trigger pipe.
|
|
|
|
*/
|
|
|
|
static void
|
|
|
|
sighandler_child_death ()
|
|
|
|
{
|
|
|
|
static char c;
|
2019-08-25 16:18:24 +02:00
|
|
|
int old_errno = errno; /* back-up errno */
|
2017-06-11 11:48:06 +02:00
|
|
|
|
|
|
|
GNUNET_break (1 ==
|
2019-08-25 16:18:24 +02:00
|
|
|
GNUNET_DISK_file_write (GNUNET_DISK_pipe_handle
|
|
|
|
(sigpipe, GNUNET_DISK_PIPE_END_WRITE),
|
|
|
|
&c, sizeof (c)));
|
|
|
|
errno = old_errno; /* restore errno */
|
2017-06-11 11:48:06 +02:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
int
|
|
|
|
main (int argc,
|
|
|
|
char *const argv[])
|
|
|
|
{
|
|
|
|
const char *plugin_name;
|
|
|
|
char *testname;
|
|
|
|
struct GNUNET_OS_Process *proc;
|
|
|
|
struct GNUNET_CONFIGURATION_Handle *cfg;
|
|
|
|
struct GNUNET_SIGNAL_Context *shc_chld;
|
|
|
|
|
|
|
|
result = -1;
|
|
|
|
if (NULL == (plugin_name = strrchr (argv[0], (int) '-')))
|
|
|
|
{
|
|
|
|
GNUNET_break (0);
|
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
plugin_name++;
|
|
|
|
(void) GNUNET_asprintf (&testname,
|
|
|
|
"test-taler-exchange-wirewatch-%s",
|
|
|
|
plugin_name);
|
|
|
|
(void) GNUNET_asprintf (&config_filename,
|
|
|
|
"%s.conf",
|
|
|
|
testname);
|
|
|
|
/* these might get in the way */
|
|
|
|
unsetenv ("XDG_DATA_HOME");
|
|
|
|
unsetenv ("XDG_CONFIG_HOME");
|
|
|
|
GNUNET_log_setup ("test_taler_exchange_wirewatch",
|
|
|
|
"WARNING",
|
|
|
|
NULL);
|
2019-12-24 22:37:31 +01:00
|
|
|
/* check database is working */
|
|
|
|
{
|
|
|
|
struct GNUNET_PQ_Context *conn;
|
|
|
|
struct GNUNET_PQ_ExecuteStatement es[] = {
|
|
|
|
GNUNET_PQ_EXECUTE_STATEMENT_END
|
|
|
|
};
|
|
|
|
|
|
|
|
conn = GNUNET_PQ_connect ("postgres:///talercheck",
|
|
|
|
es,
|
|
|
|
NULL);
|
|
|
|
if (NULL == conn)
|
|
|
|
return 77;
|
|
|
|
GNUNET_PQ_disconnect (conn);
|
|
|
|
}
|
2017-06-11 11:48:06 +02:00
|
|
|
proc = GNUNET_OS_start_process (GNUNET_NO,
|
|
|
|
GNUNET_OS_INHERIT_STD_ALL,
|
|
|
|
NULL, NULL, NULL,
|
|
|
|
"taler-exchange-keyup",
|
|
|
|
"taler-exchange-keyup",
|
|
|
|
"-c", config_filename,
|
|
|
|
NULL);
|
|
|
|
if (NULL == proc)
|
|
|
|
{
|
|
|
|
GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
|
2019-08-25 16:18:24 +02:00
|
|
|
"Failed to run `taler-exchange-keyup`, is your PATH correct?\n");
|
2017-06-11 11:48:06 +02:00
|
|
|
return 77;
|
|
|
|
}
|
|
|
|
GNUNET_OS_process_wait (proc);
|
|
|
|
GNUNET_OS_process_destroy (proc);
|
2017-06-11 17:04:54 +02:00
|
|
|
proc = GNUNET_OS_start_process (GNUNET_NO,
|
|
|
|
GNUNET_OS_INHERIT_STD_ALL,
|
|
|
|
NULL, NULL, NULL,
|
|
|
|
"taler-exchange-dbinit",
|
|
|
|
"taler-exchange-dbinit",
|
|
|
|
"-c", config_filename,
|
|
|
|
"-r",
|
|
|
|
NULL);
|
|
|
|
if (NULL == proc)
|
|
|
|
{
|
|
|
|
GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
|
2019-08-25 16:18:24 +02:00
|
|
|
"Failed to run `taler-exchange-keyup`, is your PATH correct?\n");
|
2017-06-11 17:04:54 +02:00
|
|
|
return 77;
|
|
|
|
}
|
|
|
|
GNUNET_OS_process_wait (proc);
|
|
|
|
GNUNET_OS_process_destroy (proc);
|
2017-06-11 11:48:06 +02:00
|
|
|
if (GNUNET_OK !=
|
|
|
|
GNUNET_NETWORK_test_port_free (IPPROTO_TCP,
|
2019-08-25 16:18:24 +02:00
|
|
|
8082))
|
2017-06-11 11:48:06 +02:00
|
|
|
{
|
|
|
|
fprintf (stderr,
|
|
|
|
"Required port %u not available, skipping.\n",
|
2019-06-18 11:25:38 +02:00
|
|
|
(unsigned int) 8082);
|
2017-06-11 11:48:06 +02:00
|
|
|
return 77;
|
|
|
|
}
|
|
|
|
cfg = GNUNET_CONFIGURATION_create ();
|
|
|
|
if (GNUNET_OK !=
|
|
|
|
GNUNET_CONFIGURATION_parse (cfg,
|
|
|
|
config_filename))
|
|
|
|
{
|
|
|
|
GNUNET_break (0);
|
|
|
|
GNUNET_free (config_filename);
|
|
|
|
GNUNET_free (testname);
|
|
|
|
return 2;
|
|
|
|
}
|
|
|
|
sigpipe = GNUNET_DISK_pipe (GNUNET_NO, GNUNET_NO,
|
|
|
|
GNUNET_NO, GNUNET_NO);
|
|
|
|
GNUNET_assert (NULL != sigpipe);
|
|
|
|
shc_chld =
|
|
|
|
GNUNET_SIGNAL_handler_install (GNUNET_SIGCHLD,
|
|
|
|
&sighandler_child_death);
|
|
|
|
GNUNET_SCHEDULER_run (&run,
|
|
|
|
cfg);
|
|
|
|
GNUNET_SIGNAL_handler_uninstall (shc_chld);
|
|
|
|
GNUNET_DISK_pipe_close (sigpipe);
|
|
|
|
GNUNET_CONFIGURATION_destroy (cfg);
|
|
|
|
GNUNET_free (config_filename);
|
|
|
|
GNUNET_free (testname);
|
|
|
|
return result;
|
|
|
|
}
|
|
|
|
|
2019-10-31 12:59:50 +01:00
|
|
|
|
2017-06-11 11:48:06 +02:00
|
|
|
/* end of test_taler_exchange_wirewatch.c */
|