anastasis

Credential backup and recovery protocol and service
Log | Files | Refs | Submodules | README | LICENSE

get_challenge_payment.c (3022B)

      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/get_challenge_payment.c
     18  * @brief Anastasis database: get challenge payment
     19  * @author Christian Grothoff
     20  */
     21 #include "platform.h"
     22 #include "anastasis-db_pg.h"
     23 #include "anastasis/anastasis-database/get_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  * @param[out] amount set to the amount that was paid, in the currency it was
     37  *             paid in; only meaningful if @a paid is true, as the row still
     38  *             carries the asking price until the payment is confirmed
     39  * @return transaction status
     40  */
     41 enum GNUNET_DB_QueryStatus
     42 ANASTASIS_DB_get_challenge_payment (
     43   const struct ANASTASIS_PaymentSecretP *payment_secret,
     44   const struct ANASTASIS_CRYPTO_TruthUUIDP *truth_uuid,
     45   bool *paid,
     46   struct TALER_Amount *amount)
     47 {
     48   struct GNUNET_PQ_QueryParam params[] = {
     49     GNUNET_PQ_query_param_auto_from_type (payment_secret),
     50     GNUNET_PQ_query_param_auto_from_type (truth_uuid),
     51     GNUNET_PQ_query_param_end
     52   };
     53   struct GNUNET_PQ_ResultSpec rs[] = {
     54     GNUNET_PQ_result_spec_bool ("paid",
     55                                 paid),
     56     TALER_PQ_result_spec_amount_with_currency ("amount",
     57                                                amount),
     58     GNUNET_PQ_result_spec_end
     59   };
     60 
     61   /* The amount is read back because a refund has to return what was
     62      actually paid: with several currencies on offer the configured price
     63      no longer identifies it. */
     64   PREPARE ("get_challenge_payment",
     65            "SELECT"
     66            "  paid"
     67            " ,amount"
     68            "  FROM anastasis_challenge_payment"
     69            " WHERE payment_identifier=$1"
     70            "   AND truth_uuid=$2"
     71            "   AND refunded=FALSE"
     72            "   AND counter>0;");
     73   return GNUNET_PQ_eval_prepared_singleton_select (
     74     pg->conn,
     75     "get_challenge_payment",
     76     params,
     77     rs);
     78 }
     79 
     80 
     81 /* end of get_challenge_payment.c */