Line data Source code
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/get_missing_money_pot.c
18 : * @brief Implementation of the get_missing_money_pot 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/get_missing_money_pot.h"
26 : #include "helper.h"
27 :
28 :
29 : enum GNUNET_DB_QueryStatus
30 2 : TALER_MERCHANTDB_get_missing_money_pot (
31 : struct TALER_MERCHANTDB_PostgresContext *pg,
32 : const char *instance_id,
33 : unsigned int pots_len,
34 : uint64_t pots[static pots_len],
35 : uint64_t *pot_missing)
36 2 : {
37 2 : struct GNUNET_PQ_QueryParam params[] = {
38 2 : GNUNET_PQ_query_param_array_uint64 (pots_len,
39 : pots,
40 : pg->conn),
41 : GNUNET_PQ_query_param_end
42 : };
43 2 : struct GNUNET_PQ_ResultSpec rs[] = {
44 2 : 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 2 : GNUNET_assert (NULL != pg->current_merchant_id);
51 2 : GNUNET_assert (0 == strcmp (instance_id,
52 : pg->current_merchant_id));
53 2 : TMH_PQ_prepare_anon (pg,
54 : "SELECT n AS out_missing"
55 : " FROM UNNEST($1::INT8[]) AS n"
56 : " WHERE NOT EXISTS ("
57 : " SELECT 1"
58 : " FROM merchant_money_pots mmp"
59 : " WHERE mmp.money_pot_serial=n"
60 : " )"
61 : " LIMIT 1;");
62 2 : qs = GNUNET_PQ_eval_prepared_singleton_select (
63 : pg->conn,
64 : "",
65 : params,
66 : rs);
67 2 : GNUNET_PQ_cleanup_query_params_closures (params);
68 2 : return qs;
69 : }
|