merchant

Merchant backend to process payments, run by merchants
Log | Files | Refs | Submodules | README | LICENSE

delete_order.c (2978B)

      1 /*
      2    This file is part of TALER
      3    Copyright (C) 2022, 2026 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/delete_order.c
     18  * @brief Implementation of the delete_order function for Postgres
     19  * @author Iván Ávalos
     20  */
     21 #include "platform.h"
     22 #include <taler/taler_pq_lib.h>
     23 #include "merchant-database/delete_order.h"
     24 #include "helper.h"
     25 
     26 
     27 enum GNUNET_DB_QueryStatus
     28 TALER_MERCHANTDB_delete_order (
     29   struct TALER_MERCHANTDB_PostgresContext *pg,
     30   const char *instance_id,
     31   const char *order_id,
     32   bool force)
     33 {
     34   struct GNUNET_TIME_Absolute now = GNUNET_TIME_absolute_get ();
     35   struct GNUNET_PQ_QueryParam params[] = {
     36     GNUNET_PQ_query_param_string (order_id),
     37     GNUNET_PQ_query_param_absolute_time (&now),
     38     GNUNET_PQ_query_param_bool (force),
     39     GNUNET_PQ_query_param_end
     40   };
     41   struct GNUNET_PQ_QueryParam params2[] = {
     42     GNUNET_PQ_query_param_string (order_id),
     43     GNUNET_PQ_query_param_end
     44   };
     45   enum GNUNET_DB_QueryStatus qs;
     46   enum GNUNET_DB_QueryStatus qs2;
     47 
     48   GNUNET_assert (NULL != pg->current_merchant_id);
     49   GNUNET_assert (0 == strcmp (instance_id,
     50                               pg->current_merchant_id));
     51   // FIXME: replace two statements by stored procedure!
     52   TMH_PQ_prepare_anon (pg,
     53                        "WITH mc AS"
     54                        "(SELECT paid"
     55                        "   FROM merchant_contract_terms"
     56                        "  WHERE order_id=$1) "
     57                        "DELETE"
     58                        " FROM merchant_orders mo"
     59                        " WHERE order_id=$1"
     60                        "   AND (  (pay_deadline < $2)"
     61                        "       OR (NOT EXISTS (SELECT paid FROM mc))"
     62                        "       OR ($3 AND (FALSE=(SELECT paid FROM mc))) );");
     63   qs = GNUNET_PQ_eval_prepared_non_select (pg->conn,
     64                                            "",
     65                                            params);
     66   if ( (qs < 0) || (! force) )
     67     return qs;
     68   TMH_PQ_prepare_anon (pg,
     69                        "DELETE"
     70                        " FROM merchant_contract_terms"
     71                        " WHERE order_id=$1"
     72                        "   AND NOT paid;");
     73   qs2 = GNUNET_PQ_eval_prepared_non_select (pg->conn,
     74                                             "",
     75                                             params2);
     76   if (qs2 < 0)
     77     return qs2;
     78   if (qs2 > 0)
     79     return qs2;
     80   return qs;
     81 }