1329 lines
37 KiB
C
1329 lines
37 KiB
C
/*
|
|
This file is part of TALER
|
|
Copyright (C) 2014, 2015, 2016 GNUnet e.V. and INRIA
|
|
|
|
TALER is free software; you can redistribute it and/or modify it under the
|
|
terms of the GNU Lesser General Public License as published by the Free Software
|
|
Foundation; either version 2.1, 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 Lesser General Public License for more details.
|
|
|
|
You should have received a copy of the GNU Lesser General Public License along with
|
|
TALER; see the file COPYING.LGPL. If not, If not, see <http://www.gnu.org/licenses/>
|
|
*/
|
|
/**
|
|
* @file src/benchmark/taler-exchange-benchmark.c
|
|
* @brief exchange's benchmark
|
|
* @author Marcello Stanisci
|
|
* @author Christian Grothoff
|
|
*/
|
|
#include "platform.h"
|
|
#include "taler_util.h"
|
|
#include "taler_signatures.h"
|
|
#include "taler_exchange_service.h"
|
|
#include "taler_json_lib.h"
|
|
#include <gnunet/gnunet_util_lib.h>
|
|
#include <gnunet/gnunet_curl_lib.h>
|
|
#include <microhttpd.h>
|
|
#include <jansson.h>
|
|
|
|
/**
|
|
* Should we initialize and start the exchange, if #GNUNET_NO,
|
|
* we expect one to be already up and running.
|
|
*/
|
|
static int run_exchange;
|
|
|
|
/**
|
|
* How many coins the benchmark should operate on
|
|
*/
|
|
static unsigned int pool_size = 100;
|
|
|
|
/**
|
|
* Configuration file path
|
|
*/
|
|
static char *config_file;
|
|
|
|
/**
|
|
* Configuation object (used to get BANK_URI)
|
|
*/
|
|
static struct GNUNET_CONFIGURATION_Handle *cfg;
|
|
|
|
/**
|
|
* How many reserves ought to be created given the pool size
|
|
*/
|
|
static unsigned int nreserves;
|
|
|
|
/**
|
|
* How many coins are in the #coins array. This is needed
|
|
* as the number of coins is not always #nreserves * #COINS_PER_RESERVE
|
|
* due to refresh operations
|
|
*/
|
|
static unsigned int ncoins;
|
|
|
|
/**
|
|
* Bank details of who creates reserves
|
|
*/
|
|
static json_t *bank_details;
|
|
|
|
/**
|
|
* Bank details of who deposits coins
|
|
*/
|
|
static json_t *merchant_details;
|
|
|
|
|
|
/**
|
|
* Information needed by the /refresh/melt's callback
|
|
*/
|
|
struct RefreshRevealCls
|
|
{
|
|
|
|
/**
|
|
* The result of a #TALER_EXCHANGE_refresh_prepare() call
|
|
*/
|
|
const char *blob;
|
|
|
|
/**
|
|
* Size of @e blob
|
|
*/
|
|
size_t blob_size;
|
|
|
|
/**
|
|
* Which coin in the list are we melting
|
|
*/
|
|
unsigned int coin_index;
|
|
|
|
/**
|
|
* Array of denominations expected to get from melt
|
|
*/
|
|
struct TALER_Amount *denoms;
|
|
};
|
|
|
|
|
|
/**
|
|
* Needed information for a reserve. Other values are the same for all reserves, therefore defined in global variables
|
|
*/
|
|
struct Reserve
|
|
{
|
|
/**
|
|
* Set (by the interpreter) to the reserve's private key
|
|
* we used to fill the reserve.
|
|
*/
|
|
struct TALER_ReservePrivateKeyP reserve_priv;
|
|
|
|
/**
|
|
* Set to the API's handle during the operation.
|
|
*/
|
|
struct TALER_EXCHANGE_AdminAddIncomingHandle *aih;
|
|
|
|
/**
|
|
* Index of this reserve in the #reserves array.
|
|
*/
|
|
unsigned int reserve_index;
|
|
|
|
};
|
|
|
|
|
|
/**
|
|
* Array of denomination keys needed to perform the refresh operation
|
|
*/
|
|
static struct TALER_EXCHANGE_DenomPublicKey *refresh_pk;
|
|
|
|
/**
|
|
* Size of #refresh_pk
|
|
*/
|
|
static unsigned int refresh_pk_len;
|
|
|
|
/**
|
|
* Same blinding key for all coins
|
|
*/
|
|
static struct TALER_DenominationBlindingKeyP blinding_key;
|
|
|
|
/**
|
|
* Information regarding a coin
|
|
*/
|
|
struct Coin
|
|
{
|
|
|
|
/**
|
|
* Set (by the interpreter) to the exchange's signature over the
|
|
* coin's public key.
|
|
*/
|
|
struct TALER_DenominationSignature sig;
|
|
|
|
/**
|
|
* Set to the coin's private key.
|
|
*/
|
|
struct TALER_CoinSpendPrivateKeyP coin_priv;
|
|
|
|
/**
|
|
* This specifies the denomination key to use.
|
|
*/
|
|
const struct TALER_EXCHANGE_DenomPublicKey *pk;
|
|
|
|
/**
|
|
* Withdraw handle (while operation is running).
|
|
*/
|
|
struct TALER_EXCHANGE_ReserveWithdrawHandle *wsh;
|
|
|
|
/**
|
|
* Refresh melt handle
|
|
*/
|
|
struct TALER_EXCHANGE_RefreshMeltHandle *rmh;
|
|
|
|
/**
|
|
* Refresh reveal handle
|
|
*/
|
|
struct TALER_EXCHANGE_RefreshRevealHandle *rrh;
|
|
|
|
/**
|
|
* Deposit handle (while operation is running).
|
|
*/
|
|
struct TALER_EXCHANGE_DepositHandle *dh;
|
|
|
|
/**
|
|
* Flag indicating if the coin is going to be refreshed
|
|
*/
|
|
unsigned int refresh;
|
|
|
|
/**
|
|
* Index in the reserve's global array indicating which
|
|
* reserve this coin is to be retrieved. If the coin comes
|
|
* from a refresh, then this value is set to the melted coin's
|
|
* reserve index
|
|
*/
|
|
unsigned int reserve_index;
|
|
|
|
/**
|
|
* Index of this coin in the #coins array.
|
|
*/
|
|
unsigned int coin_index;
|
|
|
|
/**
|
|
* If the coin has to be refreshed, this value indicates
|
|
* how much is left on this coin
|
|
*/
|
|
struct TALER_Amount left;
|
|
|
|
};
|
|
|
|
/**
|
|
* Handle to the exchange's process
|
|
*/
|
|
static struct GNUNET_OS_Process *exchanged;
|
|
|
|
/**
|
|
* Context for running the #ctx's event loop.
|
|
*/
|
|
static struct GNUNET_CURL_RescheduleContext *rc;
|
|
|
|
/**
|
|
* Benchmark's task
|
|
*/
|
|
static struct GNUNET_SCHEDULER_Task *benchmark_task;
|
|
|
|
/**
|
|
* Main execution context for the main loop of the exchange.
|
|
*/
|
|
static struct GNUNET_CURL_Context *ctx;
|
|
|
|
/**
|
|
* Handle to access the exchange.
|
|
*/
|
|
static struct TALER_EXCHANGE_Handle *exchange;
|
|
|
|
/**
|
|
* The array of all reserves, of length #nreserves.
|
|
*/
|
|
static struct Reserve *reserves;
|
|
|
|
/**
|
|
* The array of all coins, of length #ncoins.
|
|
*/
|
|
static struct Coin *coins;
|
|
|
|
/**
|
|
* Transaction id counter, used in /deposit's
|
|
*/
|
|
static unsigned int transaction_id;
|
|
|
|
/**
|
|
* Transfer UUID counter, used in /admin/add/incoming
|
|
*/
|
|
static unsigned int transfer_uuid;
|
|
|
|
/**
|
|
* This key (usually provided by merchants) is needed when depositing coins,
|
|
* even though there is no merchant acting in the benchmark
|
|
*/
|
|
static struct TALER_MerchantPrivateKeyP merchant_priv;
|
|
|
|
/**
|
|
* URI under which the exchange is reachable during the benchmark.
|
|
*/
|
|
static char *exchange_uri;
|
|
|
|
/**
|
|
* URI under which the administrative exchange is reachable during the
|
|
* benchmark.
|
|
*/
|
|
static char *exchange_admin_uri;
|
|
|
|
/**
|
|
* How many coins (AKA withdraw operations) per reserve should be withdrawn
|
|
*/
|
|
#define COINS_PER_RESERVE 12
|
|
|
|
/**
|
|
* Used currency (read from /keys' output)
|
|
*/
|
|
static char *currency;
|
|
|
|
/**
|
|
* Large enough value to allow having 12 coins per reserve without parsing
|
|
* /keys in the first place
|
|
*/
|
|
#define RESERVE_VALUE 1000
|
|
|
|
/**
|
|
* The benchmark withdraws always the same denomination, since the calculation
|
|
* for refreshing is statically done (at least in its very first version).
|
|
*/
|
|
#define COIN_VALUE 8
|
|
|
|
/**
|
|
* Probability a coin can be spent
|
|
*/
|
|
#define SPEND_PROBABILITY 0.1
|
|
|
|
/**
|
|
* Probability a coin can be refreshed
|
|
*/
|
|
#define REFRESH_PROBABILITY 0.4
|
|
|
|
/**
|
|
* Refreshed once. For each batch of deposits, only one
|
|
* coin will be refreshed, according to #REFRESH_PROBABILITY
|
|
*/
|
|
static unsigned int refreshed_once;
|
|
|
|
/**
|
|
* List of coins to get in return to a melt operation. Just a
|
|
* static list for now as every melt operation is carried out
|
|
* on a 8 KUDOS coin whose only 1 KUDOS has been spent, thus
|
|
* 7 KUDOS melted. This structure must be changed with one holding
|
|
* TALER_Amount structs, as every time it's needed it requires
|
|
* too many operations before getting the desired TALER_Amount.
|
|
*/
|
|
static const char *refresh_denoms[] = {
|
|
"4",
|
|
"2",
|
|
"1",
|
|
NULL
|
|
};
|
|
|
|
|
|
/**
|
|
* Throw a weighted coin with @a probability.
|
|
*
|
|
* @reurn #GNUNET_OK with @a probability, #GNUNET_NO with 1 - @a probability
|
|
*/
|
|
static unsigned int
|
|
eval_probability (float probability)
|
|
{
|
|
uint64_t random;
|
|
float random_01;
|
|
|
|
random = GNUNET_CRYPTO_random_u64 (GNUNET_CRYPTO_QUALITY_WEAK,
|
|
UINT64_MAX);
|
|
random_01 = (double) random / UINT64_MAX;
|
|
return (random_01 <= probability) ? GNUNET_OK : GNUNET_NO;
|
|
}
|
|
|
|
|
|
/**
|
|
* Shutdown benchmark in case of errors
|
|
*
|
|
* @param msg error message to print in logs
|
|
*/
|
|
static void
|
|
fail (const char *msg)
|
|
{
|
|
if (NULL != msg)
|
|
GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
|
|
"%s\n",
|
|
msg);
|
|
GNUNET_SCHEDULER_shutdown ();
|
|
}
|
|
|
|
|
|
/**
|
|
* Find denomination key matching the given amount.
|
|
*
|
|
* @param keys array of keys to search
|
|
* @param amount coin value to look for
|
|
* @return NULL if no matching key was found
|
|
*/
|
|
static const struct TALER_EXCHANGE_DenomPublicKey *
|
|
find_pk (const struct TALER_EXCHANGE_Keys *keys,
|
|
const struct TALER_Amount *amount)
|
|
{
|
|
unsigned int i;
|
|
struct GNUNET_TIME_Absolute now;
|
|
struct TALER_EXCHANGE_DenomPublicKey *pk;
|
|
char *str;
|
|
|
|
now = GNUNET_TIME_absolute_get ();
|
|
for (i=0;i<keys->num_denom_keys;i++)
|
|
{
|
|
pk = &keys->denom_keys[i];
|
|
if ( (0 == TALER_amount_cmp (amount,
|
|
&pk->value)) &&
|
|
(now.abs_value_us >= pk->valid_from.abs_value_us) &&
|
|
(now.abs_value_us < pk->withdraw_valid_until.abs_value_us) )
|
|
return pk;
|
|
}
|
|
/* do 2nd pass to check if expiration times are to blame for failure */
|
|
str = TALER_amount_to_string (amount);
|
|
for (i=0;i<keys->num_denom_keys;i++)
|
|
{
|
|
pk = &keys->denom_keys[i];
|
|
if ( (0 == TALER_amount_cmp (amount,
|
|
&pk->value)) &&
|
|
( (now.abs_value_us < pk->valid_from.abs_value_us) ||
|
|
(now.abs_value_us > pk->withdraw_valid_until.abs_value_us) ) )
|
|
{
|
|
GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
|
|
"Have denomination key for `%s', but with wrong expiration range %llu vs [%llu,%llu)\n",
|
|
str,
|
|
(unsigned long long) now.abs_value_us,
|
|
(unsigned long long) pk->valid_from.abs_value_us,
|
|
(unsigned long long) pk->withdraw_valid_until.abs_value_us);
|
|
GNUNET_free (str);
|
|
return NULL;
|
|
}
|
|
}
|
|
GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
|
|
"No denomination key for amount %s found\n",
|
|
str);
|
|
GNUNET_free (str);
|
|
return NULL;
|
|
}
|
|
|
|
|
|
/**
|
|
* Function called with the result of the /refresh/reveal operation.
|
|
*
|
|
* @param cls closure with the `struct RefreshRevealCls *`
|
|
* @param http_status HTTP response code, #MHD_HTTP_OK (200) for successful status request
|
|
* 0 if the exchange's reply is bogus (fails to follow the protocol)
|
|
* @param num_coins number of fresh coins created, length of the @a sigs and @a coin_privs arrays, 0 if the operation failed
|
|
* @param coin_privs array of @a num_coins private keys for the coins that were created, NULL on error
|
|
* @param sigs array of signature over @a num_coins coins, NULL on error
|
|
* @param full_response full response from the exchange (for logging, in case of errors)
|
|
*/
|
|
static void
|
|
reveal_cb (void *cls,
|
|
unsigned int http_status,
|
|
unsigned int num_coins,
|
|
const struct TALER_CoinSpendPrivateKeyP *coin_privs,
|
|
const struct TALER_DenominationSignature *sigs,
|
|
const json_t *full_response)
|
|
{
|
|
struct RefreshRevealCls *rrcls = cls;
|
|
struct Coin *coin;
|
|
unsigned int i;
|
|
const struct TALER_EXCHANGE_Keys *keys;
|
|
|
|
coin = &coins[rrcls->coin_index];
|
|
coin->rrh = NULL;
|
|
if (MHD_HTTP_OK != http_status)
|
|
{
|
|
GNUNET_free (rrcls);
|
|
json_dumpf (full_response, stderr, 0);
|
|
fail ("Not all coins correctly revealed");
|
|
return;
|
|
}
|
|
else
|
|
{
|
|
GNUNET_log (GNUNET_ERROR_TYPE_INFO,
|
|
"Coin #%d revealed!\n",
|
|
rrcls->coin_index);
|
|
coin->left.value = 0;
|
|
}
|
|
|
|
keys = TALER_EXCHANGE_get_keys (exchange);
|
|
for (i=0; i<num_coins; i++)
|
|
{
|
|
struct Coin fresh_coin;
|
|
char *revealed_str;
|
|
|
|
revealed_str = TALER_amount_to_string (&rrcls->denoms[i]);
|
|
GNUNET_log (GNUNET_ERROR_TYPE_INFO,
|
|
"revealing %s "
|
|
"# of coins after refresh: %d\n",
|
|
revealed_str,
|
|
ncoins);
|
|
GNUNET_free (revealed_str);
|
|
|
|
fresh_coin.reserve_index = coin->reserve_index;
|
|
fresh_coin.pk = find_pk (keys, &rrcls->denoms[i]);
|
|
fresh_coin.sig = sigs[i];
|
|
GNUNET_array_append (coins,
|
|
ncoins,
|
|
fresh_coin);
|
|
}
|
|
GNUNET_free (rrcls);
|
|
}
|
|
|
|
|
|
/**
|
|
* Function called with the result of the /refresh/melt operation.
|
|
*
|
|
* @param cls closure with the `struct RefreshRevealCls *`
|
|
* @param http_status HTTP response code, never #MHD_HTTP_OK (200) as for successful intermediate response this callback is skipped.
|
|
* 0 if the exchange's reply is bogus (fails to follow the protocol)
|
|
* @param noreveal_index choice by the exchange in the cut-and-choose protocol,
|
|
* UINT16_MAX on error
|
|
* @param exchange_pub public key the exchange used for signing
|
|
* @param full_response full response from the exchange (for logging, in case of errors)
|
|
*/
|
|
static void
|
|
melt_cb (void *cls,
|
|
unsigned int http_status,
|
|
uint16_t noreveal_index,
|
|
const struct TALER_ExchangePublicKeyP *exchange_pub,
|
|
const json_t *full_response)
|
|
{
|
|
/* free'd in `reveal_cb` */
|
|
struct RefreshRevealCls *rrcls = cls;
|
|
struct Coin *coin;
|
|
|
|
coin = &coins[rrcls->coin_index];
|
|
coin->rmh = NULL;
|
|
if (MHD_HTTP_OK != http_status)
|
|
{
|
|
json_dumpf (full_response, stderr, 0);
|
|
fail ("Coin not correctly melted!");
|
|
return;
|
|
}
|
|
|
|
coin->rrh
|
|
= TALER_EXCHANGE_refresh_reveal (exchange,
|
|
rrcls->blob_size,
|
|
rrcls->blob,
|
|
noreveal_index,
|
|
&reveal_cb,
|
|
rrcls);
|
|
}
|
|
|
|
|
|
/**
|
|
* Function called upon completion of our /reserve/withdraw request.
|
|
* This is merely the function which spends withdrawn coins
|
|
*
|
|
* @param cls closure with the `struct Coin` we are withdrawing
|
|
* @param http_status HTTP response code, #MHD_HTTP_OK (200) for successful status request
|
|
* 0 if the exchange's reply is bogus (fails to follow the protocol)
|
|
* @param sig signature over the coin, NULL on error
|
|
* @param full_response full response from the exchange (for logging, in case of errors)
|
|
*/
|
|
static void
|
|
reserve_withdraw_cb (void *cls,
|
|
unsigned int http_status,
|
|
const struct TALER_DenominationSignature *sig,
|
|
const json_t *full_response);
|
|
|
|
|
|
/**
|
|
* Function called with the result of a /deposit operation.
|
|
*
|
|
* @param cls closure with the `struct Coin` that we are processing
|
|
* @param http_status HTTP response code, #MHD_HTTP_OK (200) for successful deposit;
|
|
* 0 if the exchange's reply is bogus (fails to follow the protocol)
|
|
* @param exchange_pub public key used by the exchange for signing
|
|
* @param obj the received JSON reply, should be kept as proof (and, in case of errors,
|
|
* be forwarded to the customer)
|
|
*/
|
|
static void
|
|
deposit_cb (void *cls,
|
|
unsigned int http_status,
|
|
const struct TALER_ExchangePublicKeyP *exchange_pub,
|
|
const json_t *obj)
|
|
{
|
|
struct Coin *coin = cls;
|
|
|
|
coin->dh = NULL;
|
|
if (MHD_HTTP_OK != http_status)
|
|
{
|
|
json_dumpf (obj, stderr, 0);
|
|
fail ("At least one coin has not been deposited, status: %d");
|
|
return;
|
|
}
|
|
GNUNET_log (GNUNET_ERROR_TYPE_INFO,
|
|
"Coin #%d correctly spent!\n",
|
|
coin->coin_index);
|
|
if (GNUNET_YES == coin->refresh)
|
|
{
|
|
struct RefreshRevealCls *rrcls;
|
|
char *blob;
|
|
size_t blob_size;
|
|
const struct TALER_EXCHANGE_Keys *keys;
|
|
struct TALER_Amount *denoms = NULL;
|
|
struct TALER_EXCHANGE_DenomPublicKey *dpks = NULL;
|
|
const struct TALER_EXCHANGE_DenomPublicKey *curr_dpk;
|
|
struct TALER_Amount curr;
|
|
unsigned int ndenoms = 0;
|
|
unsigned int ndenoms2 = 0;
|
|
unsigned long long acc_value;
|
|
|
|
TALER_amount_get_zero (currency, &curr);
|
|
acc_value = 0;
|
|
keys = TALER_EXCHANGE_get_keys (exchange);
|
|
for (curr.value = COIN_VALUE >> 1; curr.value > 0; curr.value = curr.value >> 1)
|
|
{
|
|
if (acc_value + curr.value <= coin->left.value)
|
|
{
|
|
GNUNET_array_append (denoms,
|
|
ndenoms,
|
|
curr);
|
|
GNUNET_assert (NULL != (curr_dpk = find_pk (keys, &curr)));
|
|
GNUNET_array_append (dpks, ndenoms2, *curr_dpk);
|
|
acc_value += curr.value;
|
|
}
|
|
}
|
|
GNUNET_log (GNUNET_ERROR_TYPE_INFO,
|
|
"# of coins to get in melt: %d\n",
|
|
ndenoms2);
|
|
blob = TALER_EXCHANGE_refresh_prepare (&coin->coin_priv,
|
|
&coin->left,
|
|
&coin->sig,
|
|
coin->pk,
|
|
GNUNET_YES,
|
|
ndenoms2,
|
|
dpks,
|
|
&blob_size);
|
|
if (NULL == blob)
|
|
{
|
|
fail ("Failed to prepare refresh");
|
|
return;
|
|
}
|
|
GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
|
|
"prepared blob %d\n",
|
|
(unsigned int) blob_size);
|
|
refreshed_once = GNUNET_YES;
|
|
|
|
rrcls = GNUNET_new (struct RefreshRevealCls);
|
|
rrcls->blob = blob;
|
|
rrcls->blob_size = blob_size;
|
|
rrcls->coin_index = coin->coin_index;
|
|
rrcls->denoms = denoms;
|
|
coin->rmh = TALER_EXCHANGE_refresh_melt (exchange,
|
|
blob_size,
|
|
blob,
|
|
&melt_cb,
|
|
rrcls);
|
|
if (NULL == coin->rmh)
|
|
{
|
|
fail ("Impossible to issue a melt request to the exchange");
|
|
return;
|
|
}
|
|
}
|
|
else
|
|
{ /* re-withdraw */
|
|
struct GNUNET_CRYPTO_EddsaPrivateKey *coin_priv;
|
|
|
|
coin_priv = GNUNET_CRYPTO_eddsa_key_create ();
|
|
coin->coin_priv.eddsa_priv = *coin_priv;
|
|
GNUNET_free (coin_priv);
|
|
coin->wsh =
|
|
TALER_EXCHANGE_reserve_withdraw (exchange,
|
|
coin->pk,
|
|
&reserves[coin->reserve_index].reserve_priv,
|
|
&coin->coin_priv,
|
|
&blinding_key,
|
|
&reserve_withdraw_cb,
|
|
coin);
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Function called upon completion of our /reserve/withdraw request.
|
|
* This is merely the function which spends withdrawn coins. For each
|
|
* spent coin, ti either refresh it or re-withdraw it.
|
|
*
|
|
* @param cls closure with our `struct Coin`
|
|
* @param http_status HTTP response code, #MHD_HTTP_OK (200) for successful status request
|
|
* 0 if the exchange's reply is bogus (fails to follow the protocol)
|
|
* @param sig signature over the coin, NULL on error
|
|
* @param full_response full response from the exchange (for logging, in case of errors)
|
|
*/
|
|
static void
|
|
reserve_withdraw_cb (void *cls,
|
|
unsigned int http_status,
|
|
const struct TALER_DenominationSignature *sig,
|
|
const json_t *full_response)
|
|
{
|
|
struct Coin *coin = cls;
|
|
|
|
coin->wsh = NULL;
|
|
if (MHD_HTTP_OK != http_status)
|
|
{
|
|
json_dumpf (full_response, stderr, 0);
|
|
fail ("At least one coin has not correctly been withdrawn");
|
|
return;
|
|
}
|
|
GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
|
|
"%d-th coin withdrawn\n",
|
|
coin->coin_index);
|
|
coin->sig.rsa_signature =
|
|
GNUNET_CRYPTO_rsa_signature_dup (sig->rsa_signature);
|
|
if (GNUNET_OK == eval_probability (SPEND_PROBABILITY))
|
|
{
|
|
struct TALER_Amount amount;
|
|
struct GNUNET_TIME_Absolute wire_deadline;
|
|
struct GNUNET_TIME_Absolute timestamp;
|
|
struct GNUNET_TIME_Absolute refund_deadline;
|
|
struct GNUNET_HashCode h_contract;
|
|
struct TALER_CoinSpendPublicKeyP coin_pub;
|
|
struct TALER_DepositRequestPS dr;
|
|
struct TALER_MerchantPublicKeyP merchant_pub;
|
|
struct TALER_CoinSpendSignatureP coin_sig;
|
|
|
|
GNUNET_CRYPTO_eddsa_key_get_public (&coin->coin_priv.eddsa_priv,
|
|
&coin_pub.eddsa_pub);
|
|
GNUNET_CRYPTO_random_block (GNUNET_CRYPTO_QUALITY_WEAK,
|
|
&h_contract,
|
|
sizeof (h_contract));
|
|
timestamp = GNUNET_TIME_absolute_get ();
|
|
wire_deadline = GNUNET_TIME_absolute_add (timestamp,
|
|
GNUNET_TIME_UNIT_WEEKS);
|
|
refund_deadline = GNUNET_TIME_absolute_add (timestamp,
|
|
GNUNET_TIME_UNIT_DAYS);
|
|
GNUNET_TIME_round_abs (×tamp);
|
|
GNUNET_TIME_round_abs (&wire_deadline);
|
|
GNUNET_TIME_round_abs (&refund_deadline);
|
|
GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
|
|
"Spending %d-th coin\n",
|
|
coin->coin_index);
|
|
|
|
if ( (GNUNET_YES == eval_probability (REFRESH_PROBABILITY)) &&
|
|
(GNUNET_NO == refreshed_once) )
|
|
{
|
|
/**
|
|
* Always spending 1 out of 8 KUDOS. To be improved by randomly
|
|
* picking the spent amount
|
|
*/
|
|
struct TALER_Amount one;
|
|
|
|
TALER_amount_get_zero (currency, &one);
|
|
one.value = 1;
|
|
|
|
TALER_amount_subtract (&amount,
|
|
&one,
|
|
&coin->pk->fee_deposit);
|
|
TALER_amount_subtract (&coin->left,
|
|
&coin->pk->value,
|
|
&one);
|
|
coin->refresh = GNUNET_YES;
|
|
refreshed_once = GNUNET_YES;
|
|
}
|
|
else
|
|
{
|
|
TALER_amount_subtract (&amount,
|
|
&coin->pk->value,
|
|
&coin->pk->fee_deposit);
|
|
}
|
|
memset (&dr, 0, sizeof (dr));
|
|
dr.purpose.size = htonl (sizeof (struct TALER_DepositRequestPS));
|
|
dr.purpose.purpose = htonl (TALER_SIGNATURE_WALLET_COIN_DEPOSIT);
|
|
dr.h_contract = h_contract;
|
|
TALER_JSON_hash (merchant_details,
|
|
&dr.h_wire);
|
|
|
|
dr.timestamp = GNUNET_TIME_absolute_hton (timestamp);
|
|
dr.refund_deadline = GNUNET_TIME_absolute_hton (refund_deadline);
|
|
dr.transaction_id = GNUNET_htonll (transaction_id);
|
|
|
|
TALER_amount_hton (&dr.amount_with_fee,
|
|
&amount);
|
|
TALER_amount_hton (&dr.deposit_fee,
|
|
&coin->pk->fee_deposit);
|
|
|
|
GNUNET_CRYPTO_eddsa_key_get_public (&merchant_priv.eddsa_priv,
|
|
&merchant_pub.eddsa_pub);
|
|
dr.merchant = merchant_pub;
|
|
dr.coin_pub = coin_pub;
|
|
GNUNET_assert (GNUNET_OK ==
|
|
GNUNET_CRYPTO_eddsa_sign (&coin->coin_priv.eddsa_priv,
|
|
&dr.purpose,
|
|
&coin_sig.eddsa_signature));
|
|
|
|
coin->dh = TALER_EXCHANGE_deposit (exchange,
|
|
&amount,
|
|
wire_deadline,
|
|
merchant_details,
|
|
&h_contract,
|
|
&coin_pub,
|
|
&coin->sig,
|
|
&coin->pk->key,
|
|
timestamp,
|
|
transaction_id,
|
|
&merchant_pub,
|
|
refund_deadline,
|
|
&coin_sig,
|
|
&deposit_cb,
|
|
coin);
|
|
if (NULL == coin->dh)
|
|
{
|
|
json_decref (merchant_details);
|
|
fail ("An error occurred while calling deposit API");
|
|
return;
|
|
}
|
|
transaction_id++;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Function called upon completion of our /admin/add/incoming request.
|
|
* Its duty is withdrawing coins on the freshly created reserve.
|
|
*
|
|
* @param cls closure with the `struct Reserve *`
|
|
* @param http_status HTTP response code, #MHD_HTTP_OK (200) for successful status request
|
|
* 0 if the exchange's reply is bogus (fails to follow the protocol)
|
|
* @param full_response full response from the exchange (for logging, in case of errors)
|
|
*/
|
|
static void
|
|
add_incoming_cb (void *cls,
|
|
unsigned int http_status,
|
|
const json_t *full_response)
|
|
{
|
|
struct Reserve *r = cls;
|
|
struct GNUNET_CRYPTO_EddsaPrivateKey *coin_priv;
|
|
unsigned int i;
|
|
unsigned int coin_index;
|
|
struct TALER_Amount amount;
|
|
const struct TALER_EXCHANGE_Keys *keys;
|
|
|
|
r->aih = NULL;
|
|
GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
|
|
"/admin/add/incoming callback called on %d-th reserve\n",
|
|
r->reserve_index);
|
|
if (MHD_HTTP_OK != http_status)
|
|
{
|
|
json_dumpf (full_response, stderr, 0);
|
|
fail ("At least one reserve failed in being created");
|
|
return;
|
|
}
|
|
|
|
keys = TALER_EXCHANGE_get_keys (exchange);
|
|
for (i=0; i < COINS_PER_RESERVE; i++)
|
|
{
|
|
struct Coin *coin;
|
|
|
|
coin_index = r->reserve_index * COINS_PER_RESERVE + i;
|
|
coin = &coins[coin_index];
|
|
coin->coin_index = coin_index;
|
|
coin_priv = GNUNET_CRYPTO_eddsa_key_create ();
|
|
coin->coin_priv.eddsa_priv = *coin_priv;
|
|
GNUNET_free (coin_priv);
|
|
coin->reserve_index = r->reserve_index;
|
|
TALER_amount_get_zero (currency,
|
|
&amount);
|
|
amount.value = COIN_VALUE;
|
|
GNUNET_assert (NULL != (coin->pk = find_pk (keys, &amount)));
|
|
coin->wsh =
|
|
TALER_EXCHANGE_reserve_withdraw (exchange,
|
|
coin->pk,
|
|
&r->reserve_priv,
|
|
&coin->coin_priv,
|
|
&blinding_key,
|
|
&reserve_withdraw_cb,
|
|
coin);
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Main task for the benchmark.
|
|
*
|
|
* @param cls NULL
|
|
*/
|
|
static void
|
|
benchmark_run (void *cls)
|
|
{
|
|
unsigned int i;
|
|
struct GNUNET_CRYPTO_EddsaPrivateKey *priv;
|
|
json_t *transfer_details;
|
|
struct TALER_ReservePublicKeyP reserve_pub;
|
|
struct GNUNET_TIME_Absolute execution_date;
|
|
struct TALER_Amount reserve_amount;
|
|
|
|
benchmark_task = NULL;
|
|
priv = GNUNET_CRYPTO_eddsa_key_create ();
|
|
merchant_priv.eddsa_priv = *priv;
|
|
GNUNET_free (priv);
|
|
|
|
GNUNET_CRYPTO_random_block (GNUNET_CRYPTO_QUALITY_WEAK,
|
|
&blinding_key,
|
|
sizeof (blinding_key));
|
|
TALER_amount_get_zero (currency, &reserve_amount);
|
|
reserve_amount.value = RESERVE_VALUE;
|
|
execution_date = GNUNET_TIME_absolute_get ();
|
|
GNUNET_TIME_round_abs (&execution_date);
|
|
nreserves = pool_size / COINS_PER_RESERVE;
|
|
GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
|
|
"Creating %d reserves\n",
|
|
nreserves);
|
|
|
|
reserves = GNUNET_new_array (nreserves,
|
|
struct Reserve);
|
|
ncoins = COINS_PER_RESERVE * nreserves;
|
|
coins = GNUNET_new_array (ncoins,
|
|
struct Coin);
|
|
|
|
for (i=0;i < nreserves;i++)
|
|
{
|
|
struct Reserve *r = &reserves[i];
|
|
|
|
priv = GNUNET_CRYPTO_eddsa_key_create ();
|
|
r->reserve_priv.eddsa_priv = *priv;
|
|
GNUNET_free (priv);
|
|
r->reserve_index = i;
|
|
transfer_details = json_pack ("{s:I}",
|
|
"uuid", (json_int_t) transfer_uuid++);
|
|
GNUNET_assert (NULL != transfer_details);
|
|
GNUNET_CRYPTO_eddsa_key_get_public (&r->reserve_priv.eddsa_priv,
|
|
&reserve_pub.eddsa_pub);
|
|
r->aih = TALER_EXCHANGE_admin_add_incoming (exchange,
|
|
exchange_admin_uri,
|
|
&reserve_pub,
|
|
&reserve_amount,
|
|
execution_date,
|
|
bank_details,
|
|
transfer_details,
|
|
&add_incoming_cb,
|
|
r);
|
|
GNUNET_assert (NULL != r->aih);
|
|
json_decref (transfer_details);
|
|
}
|
|
json_decref (bank_details);
|
|
bank_details = NULL;
|
|
transfer_details = NULL;
|
|
}
|
|
|
|
|
|
/**
|
|
* Populates the global array of denominations which will
|
|
* be withdrawn in a refresh operation. It sums up 4 #currency units,
|
|
* since that is the only amount refreshed so far by the benchmark
|
|
*
|
|
* @param NULL-terminated array of value.fraction pairs
|
|
* @return #GNUNET_OK if the array is correctly built, #GNUNET_SYSERR
|
|
* otherwise
|
|
*/
|
|
static unsigned int
|
|
build_refresh (const char *const*list)
|
|
{
|
|
char *amount_str;
|
|
struct TALER_Amount amount;
|
|
unsigned int i;
|
|
const struct TALER_EXCHANGE_DenomPublicKey *picked_denom;
|
|
const struct TALER_EXCHANGE_Keys *keys;
|
|
|
|
keys = TALER_EXCHANGE_get_keys (exchange);
|
|
for (i=0; NULL != list[i]; i++)
|
|
{
|
|
GNUNET_asprintf (&amount_str,
|
|
"%s:%s",
|
|
currency,
|
|
list[i]);
|
|
GNUNET_assert (GNUNET_OK ==
|
|
TALER_string_to_amount (amount_str,
|
|
&amount));
|
|
picked_denom = find_pk (keys,
|
|
&amount);
|
|
if (NULL == picked_denom)
|
|
{
|
|
GNUNET_break (0);
|
|
GNUNET_free (amount_str);
|
|
return GNUNET_SYSERR;
|
|
}
|
|
GNUNET_array_append (refresh_pk,
|
|
refresh_pk_len,
|
|
*picked_denom);
|
|
GNUNET_free (amount_str);
|
|
}
|
|
return GNUNET_OK;
|
|
}
|
|
|
|
|
|
/**
|
|
* Functions of this type are called to provide the retrieved signing and
|
|
* denomination keys of the exchange. No TALER_EXCHANGE_*() functions should be called
|
|
* in this callback.
|
|
*
|
|
* @param cls closure
|
|
* @param _keys information about keys of the exchange
|
|
*/
|
|
static void
|
|
cert_cb (void *cls,
|
|
const struct TALER_EXCHANGE_Keys *_keys)
|
|
{
|
|
/* check that keys is OK */
|
|
if (NULL == _keys)
|
|
{
|
|
fail ("Exchange returned no keys!");
|
|
return;
|
|
}
|
|
if ( (0 == _keys->num_sign_keys) ||
|
|
(0 == _keys->num_denom_keys) )
|
|
{
|
|
GNUNET_break (0);
|
|
fail ("Bad /keys response");
|
|
return;
|
|
}
|
|
GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
|
|
"Read %u signing keys and %u denomination keys\n",
|
|
_keys->num_sign_keys,
|
|
_keys->num_denom_keys);
|
|
if (NULL != currency)
|
|
return; /* we've been here before... */
|
|
currency = GNUNET_strdup (_keys->denom_keys[0].value.currency);
|
|
GNUNET_log (GNUNET_ERROR_TYPE_INFO,
|
|
"Using currency: %s\n",
|
|
currency);
|
|
if (GNUNET_SYSERR ==
|
|
build_refresh (refresh_denoms))
|
|
{
|
|
fail ("Initializing denominations failed");
|
|
return;
|
|
}
|
|
benchmark_task = GNUNET_SCHEDULER_add_now (&benchmark_run,
|
|
NULL);
|
|
}
|
|
|
|
|
|
/**
|
|
* Function run when the benchmark terminates (good or bad).
|
|
* Cleans up our state.
|
|
*
|
|
* @param cls the interpreter state.
|
|
*/
|
|
static void
|
|
do_shutdown (void *cls)
|
|
{
|
|
unsigned int i;
|
|
|
|
GNUNET_log (GNUNET_ERROR_TYPE_INFO,
|
|
"Shutting down...\n");
|
|
|
|
if (NULL != benchmark_task)
|
|
{
|
|
GNUNET_SCHEDULER_cancel (benchmark_task);
|
|
benchmark_task = NULL;
|
|
}
|
|
|
|
/**
|
|
* WARNING: all the non NULL handles must correspond to non completed
|
|
* calls (AKA calls for which the callback function has not been called).
|
|
* If not, it segfaults
|
|
*/
|
|
for (i=0; i<nreserves; i++)
|
|
{
|
|
if (NULL != reserves[i].aih)
|
|
{
|
|
GNUNET_log (GNUNET_ERROR_TYPE_INFO,
|
|
"Cancelling %d-th reserve\n",
|
|
i);
|
|
TALER_EXCHANGE_admin_add_incoming_cancel(reserves[i].aih);
|
|
reserves[i].aih = NULL;
|
|
}
|
|
}
|
|
for (i=0; i<COINS_PER_RESERVE * nreserves; i++)
|
|
{
|
|
if (NULL != coins[i].wsh)
|
|
{
|
|
GNUNET_log (GNUNET_ERROR_TYPE_INFO,
|
|
"Cancelling %d-th coin withdraw handle\n",
|
|
i);
|
|
TALER_EXCHANGE_reserve_withdraw_cancel(coins[i].wsh);
|
|
coins[i].wsh = NULL;
|
|
}
|
|
if (NULL != coins[i].dh)
|
|
{
|
|
GNUNET_log (GNUNET_ERROR_TYPE_INFO,
|
|
"Cancelling %d-th coin deposit handle\n",
|
|
i);
|
|
TALER_EXCHANGE_deposit_cancel(coins[i].dh);
|
|
coins[i].dh = NULL;
|
|
}
|
|
if (NULL != coins[i].rmh)
|
|
{
|
|
GNUNET_log (GNUNET_ERROR_TYPE_INFO,
|
|
"Cancelling %d-th coin melt handle\n",
|
|
i);
|
|
TALER_EXCHANGE_refresh_melt_cancel(coins[i].rmh);
|
|
coins[i].rmh = NULL;
|
|
}
|
|
if (NULL != coins[i].rrh)
|
|
{
|
|
GNUNET_log (GNUNET_ERROR_TYPE_INFO,
|
|
"Cancelling %d-th coin reveal handle\n",
|
|
i);
|
|
TALER_EXCHANGE_refresh_reveal_cancel(coins[i].rrh);
|
|
coins[i].rmh = NULL;
|
|
}
|
|
}
|
|
if (NULL != bank_details)
|
|
{
|
|
json_decref (bank_details);
|
|
bank_details = NULL;
|
|
}
|
|
if (NULL != merchant_details)
|
|
{
|
|
json_decref (merchant_details);
|
|
merchant_details = NULL;
|
|
}
|
|
GNUNET_free_non_null (reserves);
|
|
GNUNET_free_non_null (coins);
|
|
GNUNET_free_non_null (currency);
|
|
|
|
if (NULL != exchange)
|
|
{
|
|
GNUNET_log (GNUNET_ERROR_TYPE_INFO,
|
|
"Disconnecting from exchange\n");
|
|
TALER_EXCHANGE_disconnect (exchange);
|
|
exchange = NULL;
|
|
}
|
|
if (NULL != ctx)
|
|
{
|
|
GNUNET_log (GNUNET_ERROR_TYPE_INFO,
|
|
"Invoking GNUNET_CURL_fini()\n");
|
|
GNUNET_CURL_fini (ctx);
|
|
ctx = NULL;
|
|
}
|
|
if (NULL != rc)
|
|
{
|
|
GNUNET_log (GNUNET_ERROR_TYPE_INFO,
|
|
"Invoking GNUNET_CURL_gnunet_rc_destroy()\n");
|
|
GNUNET_CURL_gnunet_rc_destroy (rc);
|
|
rc = NULL;
|
|
}
|
|
GNUNET_CONFIGURATION_destroy (cfg);
|
|
cfg = NULL;
|
|
}
|
|
|
|
|
|
/**
|
|
* Main function that will be run by the scheduler.
|
|
*
|
|
* @param cls closure
|
|
*/
|
|
static void
|
|
run (void *cls)
|
|
{
|
|
char *bank_details_filename;
|
|
char *merchant_details_filename;
|
|
|
|
GNUNET_log (GNUNET_ERROR_TYPE_INFO,
|
|
"running run()\n");
|
|
GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
|
|
"gotten pool_size of %d\n",
|
|
pool_size);
|
|
if (NULL == config_file)
|
|
{
|
|
fail ("-c option is mandatory");
|
|
return;
|
|
}
|
|
|
|
cfg = GNUNET_CONFIGURATION_create ();
|
|
GNUNET_SCHEDULER_add_shutdown (&do_shutdown,
|
|
NULL);
|
|
if (GNUNET_SYSERR == GNUNET_CONFIGURATION_parse (cfg,
|
|
config_file))
|
|
{
|
|
fail ("Failed to parse configuration file");
|
|
return;
|
|
}
|
|
if (GNUNET_SYSERR ==
|
|
GNUNET_CONFIGURATION_get_value_filename (cfg,
|
|
"benchmark",
|
|
"bank_details",
|
|
&bank_details_filename))
|
|
{
|
|
GNUNET_log_config_missing (GNUNET_ERROR_TYPE_ERROR,
|
|
"benchmark",
|
|
"bank_details");
|
|
fail ("Failed to get BANK_DETAILS value");
|
|
return;
|
|
}
|
|
|
|
bank_details = json_load_file (bank_details_filename,
|
|
JSON_REJECT_DUPLICATES,
|
|
NULL);
|
|
if (NULL == bank_details)
|
|
{
|
|
fail ("Failed to parse file with BANK_DETAILS");
|
|
return;
|
|
}
|
|
if (GNUNET_SYSERR ==
|
|
GNUNET_CONFIGURATION_get_value_filename (cfg,
|
|
"benchmark",
|
|
"merchant_details",
|
|
&merchant_details_filename))
|
|
{
|
|
GNUNET_log_config_missing (GNUNET_ERROR_TYPE_ERROR,
|
|
"benchmark",
|
|
"merchant_details");
|
|
fail ("Failed to get MERCHANT_DETAILS value");
|
|
return;
|
|
}
|
|
merchant_details = json_load_file (merchant_details_filename,
|
|
JSON_REJECT_DUPLICATES,
|
|
NULL);
|
|
if (NULL == merchant_details)
|
|
{
|
|
fail ("Failed to parse file with MERCHANT_DETAILS");
|
|
return;
|
|
}
|
|
reserves = NULL;
|
|
coins = NULL;
|
|
ctx = GNUNET_CURL_init (&GNUNET_CURL_gnunet_scheduler_reschedule,
|
|
&rc);
|
|
GNUNET_assert (NULL != ctx);
|
|
rc = GNUNET_CURL_gnunet_rc_create (ctx);
|
|
GNUNET_assert (NULL != rc);
|
|
exchange = TALER_EXCHANGE_connect (ctx,
|
|
exchange_uri,
|
|
&cert_cb, NULL,
|
|
TALER_EXCHANGE_OPTION_END);
|
|
if (NULL == exchange)
|
|
{
|
|
fail ("Failed to connect to the exchange!");
|
|
return;
|
|
}
|
|
}
|
|
|
|
|
|
int
|
|
main (int argc,
|
|
char * const *argv)
|
|
{
|
|
struct GNUNET_OS_Process *proc;
|
|
unsigned int cnt;
|
|
const struct GNUNET_GETOPT_CommandLineOption options[] = {
|
|
{'a', "automate", NULL,
|
|
"Initialize and start the bank and exchange", GNUNET_NO,
|
|
&GNUNET_GETOPT_set_one, &run_exchange},
|
|
GNUNET_GETOPT_OPTION_CFG_FILE (&config_file),
|
|
GNUNET_GETOPT_OPTION_HELP ("tool to benchmark the Taler exchange"),
|
|
{'s', "pool-size", "SIZE",
|
|
"How many coins this benchmark should instantiate", GNUNET_YES,
|
|
&GNUNET_GETOPT_set_uint, &pool_size},
|
|
{'e', "exchange-uri", "URI",
|
|
"URI of the exchange", GNUNET_YES,
|
|
&GNUNET_GETOPT_set_string, &exchange_uri},
|
|
{'E', "exchange-admin-uri", "URI",
|
|
"URI of the administrative interface of the exchange", GNUNET_YES,
|
|
&GNUNET_GETOPT_set_string, &exchange_admin_uri},
|
|
GNUNET_GETOPT_OPTION_END
|
|
};
|
|
|
|
GNUNET_log_setup ("taler-exchange-benchmark",
|
|
"WARNING",
|
|
NULL);
|
|
GNUNET_assert (GNUNET_SYSERR !=
|
|
GNUNET_GETOPT_run ("taler-exchange-benchmark",
|
|
options, argc, argv));
|
|
if (NULL == exchange_uri)
|
|
exchange_uri = GNUNET_strdup ("http://localhost:8081/");
|
|
if (NULL == exchange_admin_uri)
|
|
exchange_admin_uri = GNUNET_strdup ("http://localhost:18080/");
|
|
if (run_exchange)
|
|
{
|
|
char *wget;
|
|
|
|
proc = GNUNET_OS_start_process (GNUNET_NO,
|
|
GNUNET_OS_INHERIT_STD_ALL,
|
|
NULL, NULL, NULL,
|
|
"taler-exchange-keyup",
|
|
"taler-exchange-keyup",
|
|
NULL);
|
|
if (NULL == proc)
|
|
{
|
|
fprintf (stderr,
|
|
"Failed to run taler-exchange-keyup. Check your PATH.\n");
|
|
return 77;
|
|
}
|
|
GNUNET_OS_process_wait (proc);
|
|
GNUNET_OS_process_destroy (proc);
|
|
|
|
proc = GNUNET_OS_start_process (GNUNET_NO,
|
|
GNUNET_OS_INHERIT_STD_ALL,
|
|
NULL, NULL, NULL,
|
|
"taler-exchange-dbinit",
|
|
"taler-exchange-dbinit",
|
|
"-r",
|
|
NULL);
|
|
if (NULL == proc)
|
|
{
|
|
fprintf (stderr,
|
|
"Failed to run taler-exchange-dbinit. Check your PATH.\n");
|
|
return 77;
|
|
}
|
|
GNUNET_OS_process_wait (proc);
|
|
GNUNET_OS_process_destroy (proc);
|
|
|
|
exchanged = GNUNET_OS_start_process (GNUNET_NO,
|
|
GNUNET_OS_INHERIT_STD_ALL,
|
|
NULL, NULL, NULL,
|
|
"taler-exchange-httpd",
|
|
"taler-exchange-httpd",
|
|
NULL);
|
|
if (NULL == exchanged)
|
|
{
|
|
fprintf (stderr,
|
|
"Failed to run taler-exchange-httpd. Check your PATH.\n");
|
|
return 77;
|
|
}
|
|
|
|
GNUNET_asprintf (&wget,
|
|
"wget -q -t 1 -T 1 %s keys -o /dev/null -O /dev/null",
|
|
exchange_uri);
|
|
cnt = 0;
|
|
do {
|
|
fprintf (stderr, ".");
|
|
sleep (1);
|
|
cnt++;
|
|
if (cnt > 60)
|
|
{
|
|
fprintf (stderr,
|
|
"\nFailed to start taler-exchange-httpd\n");
|
|
GNUNET_OS_process_kill (exchanged,
|
|
SIGKILL);
|
|
GNUNET_OS_process_wait (exchanged);
|
|
GNUNET_OS_process_destroy (exchanged);
|
|
return 77;
|
|
}
|
|
}
|
|
while (0 != system (wget));
|
|
GNUNET_free (wget);
|
|
fprintf (stderr, "\n");
|
|
}
|
|
GNUNET_SCHEDULER_run (&run, NULL);
|
|
if (run_exchange)
|
|
{
|
|
GNUNET_OS_process_kill (exchanged,
|
|
SIGTERM);
|
|
GNUNET_OS_process_wait (exchanged);
|
|
GNUNET_OS_process_destroy (exchanged);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
/* end of taler-exchange-benchmark.c */
|