exchange

Base system with REST service to issue digital coins, run by the payment service provider
Log | Files | Refs | Submodules | README | LICENSE

pg_do_melt.c (3010B)

      1 /*
      2    This file is part of TALER
      3    Copyright (C) 2022 Taler Systems SA
      4 
      5    TALER is free software; you can redistribute it and/or modify it under the
      6    terms of the GNU General Public License as published by the Free Software
      7    Foundation; either version 3, or (at your option) any later version.
      8 
      9    TALER is distributed in the hope that it will be useful, but WITHOUT ANY
     10    WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
     11    A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
     12 
     13    You should have received a copy of the GNU General Public License along with
     14    TALER; see the file COPYING.  If not, see <http://www.gnu.org/licenses/>
     15  */
     16 /**
     17  * @file exchangedb/pg_do_melt.c
     18  * @brief Implementation of the do_melt function for Postgres
     19  * @author Christian Grothoff
     20  */
     21 #include "taler/platform.h"
     22 #include "taler/taler_error_codes.h"
     23 #include "taler/taler_dbevents.h"
     24 #include "taler/taler_pq_lib.h"
     25 #include "pg_do_melt.h"
     26 #include "pg_helper.h"
     27 
     28 
     29 enum GNUNET_DB_QueryStatus
     30 TEH_PG_do_melt (
     31   void *cls,
     32   const struct TALER_RefreshMasterSecretP *rms,
     33   struct TALER_EXCHANGEDB_Refresh *refresh,
     34   uint64_t known_coin_id,
     35   bool *zombie_required,
     36   bool *balance_ok)
     37 {
     38   struct PostgresClosure *pg = cls;
     39   struct GNUNET_PQ_QueryParam params[] = {
     40     NULL == rms
     41     ? GNUNET_PQ_query_param_null ()
     42     : GNUNET_PQ_query_param_auto_from_type (rms),
     43     TALER_PQ_query_param_amount (pg->conn,
     44                                  &refresh->amount_with_fee),
     45     GNUNET_PQ_query_param_auto_from_type (&refresh->rc),
     46     GNUNET_PQ_query_param_auto_from_type (&refresh->coin.coin_pub),
     47     GNUNET_PQ_query_param_auto_from_type (&refresh->coin_sig),
     48     GNUNET_PQ_query_param_uint64 (&known_coin_id),
     49     GNUNET_PQ_query_param_uint32 (&refresh->noreveal_index),
     50     GNUNET_PQ_query_param_bool (*zombie_required),
     51     GNUNET_PQ_query_param_end
     52   };
     53   bool is_null;
     54   struct GNUNET_PQ_ResultSpec rs[] = {
     55     GNUNET_PQ_result_spec_bool ("balance_ok",
     56                                 balance_ok),
     57     GNUNET_PQ_result_spec_bool ("zombie_required",
     58                                 zombie_required),
     59     GNUNET_PQ_result_spec_allow_null (
     60       GNUNET_PQ_result_spec_uint32 ("noreveal_index",
     61                                     &refresh->noreveal_index),
     62       &is_null),
     63     GNUNET_PQ_result_spec_end
     64   };
     65   enum GNUNET_DB_QueryStatus qs;
     66 
     67   PREPARE (pg,
     68            "call_melt",
     69            "SELECT "
     70            " out_balance_ok AS balance_ok"
     71            ",out_zombie_bad AS zombie_required"
     72            ",out_noreveal_index AS noreveal_index"
     73            " FROM exchange_do_melt"
     74            " ($1,$2,$3,$4,$5,$6,$7,$8);");
     75   qs = GNUNET_PQ_eval_prepared_singleton_select (pg->conn,
     76                                                  "call_melt",
     77                                                  params,
     78                                                  rs);
     79   if (is_null)
     80     refresh->noreveal_index = UINT32_MAX; /* set to very invalid value */
     81   return qs;
     82 }