merchant

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

expire_locks.c (2732B)

      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/expire_locks.c
     18  * @brief Implementation of the expire_locks 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/expire_locks.h"
     26 #include "helper.h"
     27 
     28 
     29 enum GNUNET_DB_QueryStatus
     30 TALER_MERCHANTDB_expire_locks (struct TALER_MERCHANTDB_PostgresContext *pg)
     31 {
     32   struct GNUNET_TIME_Absolute now = GNUNET_TIME_absolute_get ();
     33   struct GNUNET_PQ_QueryParam params[] = {
     34     GNUNET_PQ_query_param_absolute_time (&now),
     35     GNUNET_PQ_query_param_end
     36   };
     37   enum GNUNET_DB_QueryStatus qs1;
     38   enum GNUNET_DB_QueryStatus qs2;
     39   enum GNUNET_DB_QueryStatus qs3;
     40 
     41   check_connection (pg);
     42   PREPARE (pg,
     43            "unlock_products",
     44            "DELETE FROM merchant_inventory_locks"
     45            " WHERE expiration < $1");
     46   qs1 = GNUNET_PQ_eval_prepared_non_select (pg->conn,
     47                                             "unlock_products",
     48                                             params);
     49   if (qs1 < 0)
     50   {
     51     GNUNET_break (0);
     52     return qs1;
     53   }
     54   PREPARE (pg,
     55            "unlock_orders",
     56            "DELETE FROM merchant_orders"
     57            " WHERE pay_deadline < $1");
     58   qs2 = GNUNET_PQ_eval_prepared_non_select (pg->conn,
     59                                             "unlock_orders",
     60                                             params);
     61   if (qs2 < 0)
     62   {
     63     GNUNET_break (0);
     64     return qs2;
     65   }
     66   PREPARE (pg,
     67            "unlock_contracts",
     68            "DELETE FROM merchant_contract_terms"
     69            " WHERE NOT paid"
     70            "   AND pay_deadline < $1");
     71   qs3 = GNUNET_PQ_eval_prepared_non_select (pg->conn,
     72                                             "unlock_contracts",
     73                                             params);
     74   if (qs3 < 0)
     75   {
     76     GNUNET_break (0);
     77     return qs3;
     78   }
     79   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
     80               "Released %d+%d+%d locks\n",
     81               qs1,
     82               qs2,
     83               qs3);
     84   return qs1 + qs2 + qs3;
     85 }