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