check_money_pots.c (2518B)
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 src/backenddb/check_money_pots.c 18 * @brief Implementation of the check_money_pots function for Postgres 19 * @author Christian Grothoff 20 */ 21 #include "platform.h" 22 #include <taler/taler_error_codes.h> 23 #include <taler/taler_dbevents.h> 24 #include <taler/taler_pq_lib.h> 25 #include "merchant-database/check_money_pots.h" 26 #include "helper.h" 27 28 29 enum GNUNET_DB_QueryStatus 30 TALER_MERCHANTDB_check_money_pots (struct TALER_MERCHANTDB_PostgresContext *pg, 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 GNUNET_PQ_QueryParam params[] = { 37 GNUNET_PQ_query_param_string (instance_id), 38 GNUNET_PQ_query_param_array_uint64 (pots_len, 39 pots, 40 pg->conn), 41 GNUNET_PQ_query_param_end 42 }; 43 struct GNUNET_PQ_ResultSpec rs[] = { 44 GNUNET_PQ_result_spec_uint64 ("out_missing", 45 pot_missing), 46 GNUNET_PQ_result_spec_end 47 }; 48 enum GNUNET_DB_QueryStatus qs; 49 50 check_connection (pg); 51 PREPARE (pg, 52 "check_money_pots", 53 "SELECT n AS out_missing" 54 " FROM UNNEST($2::INT8[]) AS n" 55 " WHERE NOT EXISTS (" 56 " SELECT 1" 57 " FROM merchant_money_pots mmp" 58 " JOIN merchant_instances mi" 59 " USING (merchant_serial)" 60 " WHERE mmp.money_pot_serial=n" 61 " AND mi.merchant_id=$1" 62 " )" 63 " LIMIT 1;"); 64 qs = GNUNET_PQ_eval_prepared_singleton_select ( 65 pg->conn, 66 "check_money_pots", 67 params, 68 rs); 69 GNUNET_PQ_cleanup_query_params_closures (params); 70 return qs; 71 }