summaryrefslogtreecommitdiff
path: root/src/auditor
diff options
context:
space:
mode:
authorChristian Grothoff <christian@grothoff.org>2017-03-20 03:58:51 +0100
committerChristian Grothoff <christian@grothoff.org>2017-03-20 03:58:51 +0100
commit9fe8da0cc6253f21e8aead7a600ae8f41b9f2693 (patch)
tree03414d79d11b4c1aeed3abdb2b406e9e50c2bd02 /src/auditor
parent4599b25895394ddbabfa0f5d3f9ee07895a60f6c (diff)
downloadexchange-9fe8da0cc6253f21e8aead7a600ae8f41b9f2693.tar.gz
exchange-9fe8da0cc6253f21e8aead7a600ae8f41b9f2693.tar.bz2
exchange-9fe8da0cc6253f21e8aead7a600ae8f41b9f2693.zip
deal with aggregation fee lookup and calculations in auditor
Diffstat (limited to 'src/auditor')
-rw-r--r--src/auditor/taler-auditor.c164
1 files changed, 160 insertions, 4 deletions
diff --git a/src/auditor/taler-auditor.c b/src/auditor/taler-auditor.c
index 98c101631..24228da5f 100644
--- a/src/auditor/taler-auditor.c
+++ b/src/auditor/taler-auditor.c
@@ -268,6 +268,26 @@ report_reserve_balance (const struct TALER_Amount *total_balance,
/**
+ * Report on the aggregation fees the exchange made.
+ *
+ * Note that this is for the "ongoing" reporting period. Historic
+ * revenue (as stored via the "insert_historic_reserve_revenue")
+ * is not included in the @a total_fee_balance.
+ *
+ * @param total_fee_balance how much money (in total) did the reserve
+ * make from aggregation fees
+ */
+static void
+report_aggregation_fee_balance (const struct TALER_Amount *total_fee_balance)
+{
+ // TODO: implement proper reporting logic writing to file.
+ GNUNET_log (GNUNET_ERROR_TYPE_MESSAGE,
+ _("Total aggregation fees are at %s\n"),
+ TALER_amount2s (total_fee_balance));
+}
+
+
+/**
* Report state of denomination processing.
*
* @param total_balance total value of outstanding coins
@@ -1093,6 +1113,40 @@ struct WirePlugin
/**
+ * Information about wire fees charged by the exchange.
+ */
+struct WireFeeInfo
+{
+
+ /**
+ * Kept in a DLL.
+ */
+ struct WireFeeInfo *next;
+
+ /**
+ * Kept in a DLL.
+ */
+ struct WireFeeInfo *prev;
+
+ /**
+ * When does the fee go into effect (inclusive).
+ */
+ struct GNUNET_TIME_Absolute start_date;
+
+ /**
+ * When does the fee stop being in effect (exclusive).
+ */
+ struct GNUNET_TIME_Absolute end_date;
+
+ /**
+ * How high is the fee.
+ */
+ struct TALER_Amount wire_fee;
+
+};
+
+
+/**
* Closure for callbacks during #analyze_merchants().
*/
struct AggregationContext
@@ -1109,6 +1163,16 @@ struct AggregationContext
struct WirePlugin *wire_tail;
/**
+ * DLL of wire fees charged by the exchange.
+ */
+ struct WireFeeInfo *fee_head;
+
+ /**
+ * DLL of wire fees charged by the exchange.
+ */
+ struct WireFeeInfo *fee_tail;
+
+ /**
* How much did we make in aggregation fees.
*/
struct TALER_Amount total_aggregation_fees;
@@ -1607,15 +1671,96 @@ wire_transfer_information_cb (void *cls,
* Lookup the wire fee that the exchange charges at @a timestamp.
*
* @param ac context for caching the result
+ * @param type type of the wire plugin
* @param timestamp time for which we need the fee
* @return NULL on error (fee unknown)
*/
static const struct TALER_Amount *
get_wire_fee (struct AggregationContext *ac,
+ const char *type,
struct GNUNET_TIME_Absolute timestamp)
{
- GNUNET_break (0); /* not implemented! */
- return NULL;
+ struct WireFeeInfo *wfi;
+ struct WireFeeInfo *pos;
+ struct TALER_MasterSignatureP master_sig;
+
+ /* Check if fee is already loaded in cache */
+ for (pos = ac->fee_head; NULL != pos; pos = pos->next)
+ {
+ if ( (pos->start_date.abs_value_us <= timestamp.abs_value_us) &&
+ (pos->end_date.abs_value_us > timestamp.abs_value_us) )
+ return &pos->wire_fee;
+ if (pos->start_date.abs_value_us > timestamp.abs_value_us)
+ break;
+ }
+
+ /* Lookup fee in exchange database */
+ wfi = GNUNET_new (struct WireFeeInfo);
+ if (GNUNET_OK !=
+ edb->get_wire_fee (edb->cls,
+ esession,
+ type,
+ timestamp,
+ &wfi->start_date,
+ &wfi->end_date,
+ &wfi->wire_fee,
+ &master_sig))
+ {
+ GNUNET_break (0);
+ GNUNET_free (wfi);
+ return NULL;
+ }
+
+ /* Check signature (not terribly meaningful as the exchange can
+ easily make this one up, but it means that we have proof that
+ the master key was used for inconsistent wire fees if a
+ merchant complains. */
+ {
+ struct TALER_MasterWireFeePS wp;
+
+ wp.purpose.purpose = htonl (TALER_SIGNATURE_MASTER_WIRE_FEES);
+ wp.purpose.size = htonl (sizeof (wp));
+ GNUNET_CRYPTO_hash (type,
+ strlen (type) + 1,
+ &wp.h_wire_method);
+ wp.start_date = GNUNET_TIME_absolute_hton (wfi->start_date);
+ wp.end_date = GNUNET_TIME_absolute_hton (wfi->end_date);
+ TALER_amount_hton (&wp.wire_fee,
+ &wfi->wire_fee);
+ if (GNUNET_OK !=
+ GNUNET_CRYPTO_eddsa_verify (TALER_SIGNATURE_MASTER_WIRE_FEES,
+ &wp.purpose,
+ &master_sig.eddsa_signature,
+ &master_pub.eddsa_pub))
+ {
+ GNUNET_break (0);
+ GNUNET_free (wfi);
+ return NULL;
+ }
+ }
+
+ /* Established fee, keep in sorted list */
+ GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+ "Wire fee is %s starting at %s\n",
+ TALER_amount2s (&wfi->wire_fee),
+ GNUNET_STRINGS_absolute_time_to_string (wfi->start_date));
+ if ( (NULL == pos) ||
+ (NULL == pos->prev) )
+ GNUNET_CONTAINER_DLL_insert (ac->fee_head,
+ ac->fee_tail,
+ wfi);
+ else
+ GNUNET_CONTAINER_DLL_insert_after (ac->fee_head,
+ ac->fee_tail,
+ pos->prev,
+ wfi);
+ /* Check non-overlaping fee invariant */
+ /* TODO: maybe report problems more nicely? */
+ if (NULL != wfi->prev)
+ GNUNET_break (wfi->prev->end_date.abs_value_us <= wfi->start_date.abs_value_us);
+ if (NULL != wfi->next)
+ GNUNET_break (wfi->next->start_date.abs_value_us >= wfi->end_date.abs_value_us);
+ return &wfi->wire_fee;
}
@@ -1688,6 +1833,7 @@ check_wire_out_cb (void *cls,
/* Subtract aggregation fee from total */
wire_fee = get_wire_fee (ac,
+ wcc.method,
date);
if (NULL == wire_fee)
{
@@ -1750,7 +1896,7 @@ check_wire_out_cb (void *cls,
/* Check that calculated amount matches actual amount */
if (0 != TALER_amount_cmp (amount,
- &wcc.total_deposits))
+ &final_amount))
{
report_wire_out_inconsistency (wire,
rowid,
@@ -1776,12 +1922,15 @@ analyze_aggregations (void *cls)
{
struct AggregationContext ac;
struct WirePlugin *wc;
+ struct WireFeeInfo *wfi;
GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
"Analyzing aggregations\n");
ac.ret = GNUNET_OK;
ac.wire_head = NULL;
ac.wire_tail = NULL;
+ ac.fee_head = NULL;
+ ac.fee_tail = NULL;
/* FIXME: load existing value from DB! */
GNUNET_assert (GNUNET_OK ==
TALER_amount_get_zero (currency,
@@ -1805,13 +1954,20 @@ analyze_aggregations (void *cls)
GNUNET_free (wc->type);
GNUNET_free (wc);
}
+ while (NULL != (wfi = ac.fee_head))
+ {
+ GNUNET_CONTAINER_DLL_remove (ac.fee_head,
+ ac.fee_tail,
+ wfi);
+ GNUNET_free (wfi);
+ }
if (GNUNET_OK != ac.ret)
{
GNUNET_break (0);
return GNUNET_SYSERR;
}
/* FIXME: store aggregation fee total to DB! */
- /* FIXME: report aggregation fee total */
+ report_aggregation_fee_balance (&ac.total_aggregation_fees);
return ac.ret;
}