anastasis-db_check_challenge_payment.c (2496B)
1 /* 2 This file is part of Anastasis 3 Copyright (C) 2020-2022 Anastasis SARL 4 5 Anastasis is free software; you can redistribute it and/or modify it under the 6 terms of the GNU Affero General Public License as published by the Free Software 7 Foundation; either version 3, or (at your option) any later version. 8 9 Anastasis 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 Affero General Public License for more details. 12 13 You should have received a copy of the GNU Affero General Public License along with 14 Anastasis; see the file COPYING.GPL. If not, see <http://www.gnu.org/licenses/> 15 */ 16 /** 17 * @file stasis/anastasis-db_check_challenge_payment.c 18 * @brief Anastasis database: check challenge payment 19 * @author Christian Grothoff 20 */ 21 #include "platform.h" 22 #include "anastasis-db_pg.h" 23 #include "anastasis/anastasis-database/check_challenge_payment.h" 24 #include "anastasis/anastasis-database/transaction.h" 25 #include "anastasis/anastasis-database/preflight.h" 26 #include <taler/taler_pq_lib.h> 27 28 29 /** 30 * Check payment identifier. Used to check if a payment identifier given by 31 * the user is valid (existing and paid). 32 * 33 * @param payment_secret payment secret which the user must provide with every upload 34 * @param truth_uuid which truth should we check the payment status of 35 * @param[out] paid bool value to show if payment is paid 36 * @return transaction status 37 */ 38 enum GNUNET_DB_QueryStatus 39 ANASTASIS_DB_check_challenge_payment ( 40 const struct ANASTASIS_PaymentSecretP *payment_secret, 41 const struct ANASTASIS_CRYPTO_TruthUUIDP *truth_uuid, 42 bool *paid) 43 { 44 struct GNUNET_PQ_QueryParam params[] = { 45 GNUNET_PQ_query_param_auto_from_type (payment_secret), 46 GNUNET_PQ_query_param_auto_from_type (truth_uuid), 47 GNUNET_PQ_query_param_end 48 }; 49 struct GNUNET_PQ_ResultSpec rs[] = { 50 GNUNET_PQ_result_spec_bool ("paid", 51 paid), 52 GNUNET_PQ_result_spec_end 53 }; 54 55 PREPARE ("challenge_payment_select", 56 "SELECT" 57 " paid" 58 " FROM anastasis_challenge_payment" 59 " WHERE payment_identifier=$1" 60 " AND truth_uuid=$2" 61 " AND refunded=FALSE" 62 " AND counter>0;"); 63 return GNUNET_PQ_eval_prepared_singleton_select ( 64 pg->conn, 65 "challenge_payment_select", 66 params, 67 rs); 68 } 69 70 71 /* end of anastasis-db_check_challenge_payment.c */