merchant

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

delete_order.c (3003B)

      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   check_connection (pg);
     52   // FIXME: replace two statements by stored procedure!
     53   TMH_PQ_prepare_anon (pg,
     54                        "WITH mc AS"
     55                        "(SELECT paid"
     56                        "   FROM merchant_contract_terms"
     57                        "  WHERE order_id=$1) "
     58                        "DELETE"
     59                        " FROM merchant_orders mo"
     60                        " WHERE order_id=$1"
     61                        "   AND (  (pay_deadline < $2)"
     62                        "       OR (NOT EXISTS (SELECT paid FROM mc))"
     63                        "       OR ($3 AND (FALSE=(SELECT paid FROM mc))) );");
     64   qs = GNUNET_PQ_eval_prepared_non_select (pg->conn,
     65                                            "",
     66                                            params);
     67   if ( (qs < 0) || (! force) )
     68     return qs;
     69   TMH_PQ_prepare_anon (pg,
     70                        "DELETE"
     71                        " FROM merchant_contract_terms"
     72                        " WHERE order_id=$1"
     73                        "   AND NOT paid;");
     74   qs2 = GNUNET_PQ_eval_prepared_non_select (pg->conn,
     75                                             "",
     76                                             params2);
     77   if (qs2 < 0)
     78     return qs2;
     79   if (qs2 > 0)
     80     return qs2;
     81   return qs;
     82 }