merchant

Merchant backend to process payments, run by merchants
Log | Files | Refs | Submodules | README | LICENSE

pg_check_money_pots.c (2463B)

      1 /*
      2    This file is part of TALER
      3    Copyright (C) 2025 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 backenddb/pg_check_money_pots.c
     18  * @brief Implementation of the check_money_pots 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_check_money_pots.h"
     26 #include "pg_helper.h"
     27 
     28 
     29 enum GNUNET_DB_QueryStatus
     30 TMH_PG_check_money_pots (void *cls,
     31                          const char *instance_id,
     32                          unsigned int pots_len,
     33                          uint64_t pots[static pots_len],
     34                          uint64_t *pot_missing)
     35 {
     36   struct PostgresClosure *pg = cls;
     37   struct GNUNET_PQ_QueryParam params[] = {
     38     GNUNET_PQ_query_param_string (instance_id),
     39     GNUNET_PQ_query_param_array_uint64 (pots_len,
     40                                         pots,
     41                                         pg->conn),
     42     GNUNET_PQ_query_param_end
     43   };
     44   struct GNUNET_PQ_ResultSpec rs[] = {
     45     GNUNET_PQ_result_spec_uint64 ("out_missing",
     46                                   pot_missing),
     47     GNUNET_PQ_result_spec_end
     48   };
     49   enum GNUNET_DB_QueryStatus qs;
     50 
     51   check_connection (pg);
     52   PREPARE (pg,
     53            "check_money_pots",
     54            "SELECT n AS out_missing"
     55            "  FROM UNNEST($2::INT8[]) AS n"
     56            " WHERE NOT EXISTS ("
     57            "  SELECT 1"
     58            "    FROM merchant_money_pots mmp"
     59            "    JOIN merchant_instances mi"
     60            "      USING (merchant_serial)"
     61            "   WHERE mmp.money_pot_serial=n"
     62            "     AND mi.merchant_id=$1"
     63            " )"
     64            " LIMIT 1;");
     65   qs = GNUNET_PQ_eval_prepared_singleton_select (
     66     pg->conn,
     67     "check_money_pots",
     68     params,
     69     rs);
     70   GNUNET_PQ_cleanup_query_params_closures (params);
     71   return qs;
     72 }