Line data    Source code

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