Line data Source code
1 : /*
2 : This file is part of TALER
3 : Copyright (C) 2024 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/update_to_aml_locked.c
18 : * @brief Implementation of the update_to_aml_locked function for Postgres
19 : * @author Christian Grothoff
20 : */
21 : #include "taler/taler_pq_lib.h"
22 : #include "exchange-database/update_to_aml_locked.h"
23 : #include "helper.h"
24 :
25 :
26 : enum GNUNET_DB_QueryStatus
27 4 : TALER_EXCHANGEDB_update_to_aml_locked (
28 : struct TALER_EXCHANGEDB_PostgresContext *pg,
29 : const struct TALER_NormalizedPaytoHashP *h_payto,
30 : struct GNUNET_TIME_Relative lock_duration,
31 : struct GNUNET_TIME_Absolute *existing_lock)
32 : {
33 :
34 : struct GNUNET_TIME_Absolute expires
35 4 : = GNUNET_TIME_relative_to_absolute (lock_duration);
36 : struct GNUNET_TIME_Absolute now
37 4 : = GNUNET_TIME_absolute_get ();
38 4 : struct GNUNET_PQ_QueryParam params[] = {
39 4 : GNUNET_PQ_query_param_auto_from_type (h_payto),
40 4 : GNUNET_PQ_query_param_absolute_time (&now),
41 4 : GNUNET_PQ_query_param_absolute_time (&expires),
42 : GNUNET_PQ_query_param_end
43 : };
44 : bool nx; /* true if the *account* is not known */
45 4 : struct GNUNET_PQ_ResultSpec rs[] = {
46 4 : GNUNET_PQ_result_spec_allow_null (
47 : GNUNET_PQ_result_spec_absolute_time ("out_aml_program_lock_timeout",
48 : existing_lock),
49 : &nx),
50 : GNUNET_PQ_result_spec_end
51 : };
52 : enum GNUNET_DB_QueryStatus qs;
53 :
54 4 : PREPARE (pg,
55 : "update_to_aml_locked",
56 : "SELECT out_aml_program_lock_timeout"
57 : " FROM exchange_do_set_aml_lock($1,$2,$3);");
58 4 : qs = GNUNET_PQ_eval_prepared_singleton_select (pg->conn,
59 : "update_to_aml_locked",
60 : params,
61 : rs);
62 4 : if (qs <= 0)
63 0 : return qs;
64 4 : if (nx)
65 : {
66 1 : *existing_lock = GNUNET_TIME_UNIT_ZERO_ABS;
67 1 : return GNUNET_DB_STATUS_SUCCESS_NO_RESULTS;
68 : }
69 3 : return qs;
70 : }
|