exchange

Base system with REST service to issue digital coins, run by the payment service provider
Log | Files | Refs | Submodules | README | LICENSE

pg_test_aml_officer.c (1934B)


      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 exchangedb/pg_test_aml_officer.c
     18  * @brief Implementation of the test_aml_officer function for Postgres
     19  * @author Christian Grothoff
     20  */
     21 #include "taler/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_test_aml_officer.h"
     26 #include "pg_helper.h"
     27 
     28 
     29 enum GNUNET_DB_QueryStatus
     30 TEH_PG_test_aml_officer (
     31   void *cls,
     32   const struct TALER_AmlOfficerPublicKeyP *decider_pub,
     33   bool *read_only)
     34 {
     35   struct PostgresClosure *pg = cls;
     36   struct GNUNET_PQ_QueryParam params[] = {
     37     GNUNET_PQ_query_param_auto_from_type (decider_pub),
     38     GNUNET_PQ_query_param_end
     39   };
     40   struct GNUNET_PQ_ResultSpec rs[] = {
     41     GNUNET_PQ_result_spec_bool ("read_only",
     42                                 read_only),
     43     GNUNET_PQ_result_spec_end
     44   };
     45 
     46   PREPARE (pg,
     47            "test_aml_staff",
     48            "SELECT read_only"
     49            "  FROM aml_staff"
     50            " WHERE decider_pub=$1"
     51            "   AND is_active;");
     52   return GNUNET_PQ_eval_prepared_singleton_select (pg->conn,
     53                                                    "test_aml_staff",
     54                                                    params,
     55                                                    rs);
     56 }