delete_order.c (3353B)
1 /* 2 This file is part of TALER 3 Copyright (C) 2022 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_error_codes.h> 23 #include <taler/taler_dbevents.h> 24 #include <taler/taler_pq_lib.h> 25 #include "merchant-database/delete_order.h" 26 #include "helper.h" 27 28 enum GNUNET_DB_QueryStatus 29 TALER_MERCHANTDB_delete_order (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 (instance_id), 37 GNUNET_PQ_query_param_string (order_id), 38 GNUNET_PQ_query_param_absolute_time (&now), 39 GNUNET_PQ_query_param_bool (force), 40 GNUNET_PQ_query_param_end 41 }; 42 struct GNUNET_PQ_QueryParam params2[] = { 43 GNUNET_PQ_query_param_string (instance_id), 44 GNUNET_PQ_query_param_string (order_id), 45 GNUNET_PQ_query_param_end 46 }; 47 enum GNUNET_DB_QueryStatus qs; 48 enum GNUNET_DB_QueryStatus qs2; 49 50 check_connection (pg); 51 PREPARE (pg, 52 "delete_order", 53 "WITH ms AS" 54 "(SELECT merchant_serial " 55 " FROM merchant_instances" 56 " WHERE merchant_id=$1)" 57 ", mc AS" 58 "(SELECT paid" 59 " FROM merchant_contract_terms" 60 " JOIN ms USING (merchant_serial)" 61 " WHERE order_id=$2) " 62 "DELETE" 63 " FROM merchant_orders mo" 64 " WHERE order_id=$2" 65 " AND merchant_serial=(SELECT merchant_serial FROM ms)" 66 " AND ( (pay_deadline < $3)" 67 " OR (NOT EXISTS (SELECT paid FROM mc))" 68 " OR ($4 AND (FALSE=(SELECT paid FROM mc))) );"); 69 qs = GNUNET_PQ_eval_prepared_non_select (pg->conn, 70 "delete_order", 71 params); 72 if ( (qs < 0) || (! force) ) 73 return qs; 74 PREPARE (pg, 75 "delete_contract", 76 "DELETE" 77 " FROM merchant_contract_terms" 78 " WHERE order_id=$2 AND" 79 " merchant_serial=" 80 " (SELECT merchant_serial " 81 " FROM merchant_instances" 82 " WHERE merchant_id=$1)" 83 " AND NOT paid;"); 84 qs2 = GNUNET_PQ_eval_prepared_non_select (pg->conn, 85 "delete_contract", 86 params2); 87 if (qs2 < 0) 88 return qs2; 89 if (qs2 > 0) 90 return qs2; 91 return qs; 92 }