merchant

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

pg_expire_locks.c (2711B)

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