exchange

exchange_api_delete-purses-PURSE_PUB.c (7867B)

---

 /*
    This file is part of TALER
    Copyright (C) 2022-2026 Taler Systems SA
 
    TALER is free software; you can redistribute it and/or modify it under the
    terms of the GNU General Public License as published by the Free Software
    Foundation; either version 3, or (at your option) any later version.
 
    TALER is distributed in the hope that it will be useful, but WITHOUT ANY
    WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
    A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
 
    You should have received a copy of the GNU General Public License along with
    TALER; see the file COPYING.  If not, see
    <http://www.gnu.org/licenses/>
  */
 /**
  * @file lib/exchange_api_delete-purses-PURSE_PUB.c
  * @brief Implementation of the client to delete a purse
  * @author Christian Grothoff
  */
 #include "taler/platform.h"
 #include <jansson.h>
 #include <microhttpd.h> /* just for HTTP status codes */
 #include <gnunet/gnunet_util_lib.h>
 #include <gnunet/gnunet_json_lib.h>
 #include <gnunet/gnunet_curl_lib.h>
 #include "taler/taler_json_lib.h"
 #include "taler/taler_exchange_service.h"
 #include "exchange_api_handle.h"
 #include "exchange_api_common.h"
 #include "taler/taler_signatures.h"
 #include "exchange_api_curl_defaults.h"
 
 
 /**
  * @brief A purse delete handle
  */
 struct TALER_EXCHANGE_DeletePursesHandle
 {
 
   /**
    * The base url for this request.
    */
   char *base_url;
 
   /**
    * The full url for this request, set during _start.
    */
   char *url;
 
   /**
    * Handle for the request.
    */
   struct GNUNET_CURL_Job *job;
 
   /**
    * Function to call with the result.
    */
   TALER_EXCHANGE_DeletePursesCallback cb;
 
   /**
    * Closure for @a cb.
    */
   TALER_EXCHANGE_DELETE_PURSES_RESULT_CLOSURE *cb_cls;
 
   /**
    * Reference to the execution context.
    */
   struct GNUNET_CURL_Context *ctx;
 
   /**
    * Header with the purse_sig.
    */
   struct curl_slist *xhdr;
 
   /**
    * Public key of the purse (derived from private key in _create).
    */
   struct TALER_PurseContractPublicKeyP purse_pub;
 };
 
 
 /**
  * Function called when we're done processing the
  * HTTP DELETE /purse/$PID request.
  *
  * @param cls the `struct TALER_EXCHANGE_DeletePursesHandle`
  * @param response_code HTTP response code, 0 on error
  * @param response parsed JSON result, NULL on error
  */
 static void
 handle_purse_delete_finished (void *cls,
                               long response_code,
                               const void *response)
 {
   struct TALER_EXCHANGE_DeletePursesHandle *dph = cls;
   const json_t *j = response;
   struct TALER_EXCHANGE_DeletePursesResponse dr = {
     .hr.reply = j,
     .hr.http_status = (unsigned int) response_code
   };
 
   dph->job = NULL;
   switch (response_code)
   {
   case 0:
     dr.hr.ec = TALER_EC_GENERIC_INVALID_RESPONSE;
     break;
   case MHD_HTTP_NO_CONTENT:
     break;
   case MHD_HTTP_BAD_REQUEST:
     /* This should never happen, either us or the exchange is buggy
        (or API version conflict); just pass JSON reply to the application */
     dr.hr.ec = TALER_JSON_get_error_code (j);
     dr.hr.hint = TALER_JSON_get_error_hint (j);
     break;
   case MHD_HTTP_FORBIDDEN:
     dr.hr.ec = TALER_JSON_get_error_code (j);
     dr.hr.hint = TALER_JSON_get_error_hint (j);
     /* Nothing really to verify, exchange says one of the signatures is
        invalid; as we checked them, this should never happen, we
        should pass the JSON reply to the application */
     break;
   case MHD_HTTP_NOT_FOUND:
     dr.hr.ec = TALER_JSON_get_error_code (j);
     dr.hr.hint = TALER_JSON_get_error_hint (j);
     /* Nothing really to verify, this should never
        happen, we should pass the JSON reply to the application */
     break;
   case MHD_HTTP_CONFLICT:
     dr.hr.ec = TALER_JSON_get_error_code (j);
     dr.hr.hint = TALER_JSON_get_error_hint (j);
     break;
   case MHD_HTTP_INTERNAL_SERVER_ERROR:
     dr.hr.ec = TALER_JSON_get_error_code (j);
     dr.hr.hint = TALER_JSON_get_error_hint (j);
     /* Server had an internal issue; we should retry, but this API
        leaves this to the application */
     break;
   default:
     /* unexpected response code */
     dr.hr.ec = TALER_JSON_get_error_code (j);
     dr.hr.hint = TALER_JSON_get_error_hint (j);
     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
                 "Unexpected response code %u/%d for exchange purse delete\n",
                 (unsigned int) response_code,
                 dr.hr.ec);
     GNUNET_break_op (0);
     break;
   }
   dph->cb (dph->cb_cls,
            &dr);
   TALER_EXCHANGE_delete_purses_cancel (dph);
 }
 
 
 struct TALER_EXCHANGE_DeletePursesHandle *
 TALER_EXCHANGE_delete_purses_create (
   struct GNUNET_CURL_Context *ctx,
   const char *url,
   const struct TALER_PurseContractPrivateKeyP *purse_priv)
 {
   struct TALER_EXCHANGE_DeletePursesHandle *dph;
   struct TALER_PurseContractSignatureP purse_sig;
 
   dph = GNUNET_new (struct TALER_EXCHANGE_DeletePursesHandle);
   dph->ctx = ctx;
   dph->base_url = GNUNET_strdup (url);
   GNUNET_CRYPTO_eddsa_key_get_public (&purse_priv->eddsa_priv,
                                       &dph->purse_pub.eddsa_pub);
   TALER_wallet_purse_delete_sign (purse_priv,
                                   &purse_sig);
   {
     char *delete_str;
     char *xhdr;
 
     delete_str =
       GNUNET_STRINGS_data_to_string_alloc (&purse_sig,
                                            sizeof (purse_sig));
     GNUNET_asprintf (&xhdr,
                      "Taler-Purse-Signature: %s",
                      delete_str);
     GNUNET_free (delete_str);
     dph->xhdr = curl_slist_append (NULL,
                                    xhdr);
     GNUNET_free (xhdr);
   }
   return dph;
 }
 
 
 enum TALER_ErrorCode
 TALER_EXCHANGE_delete_purses_start (
   struct TALER_EXCHANGE_DeletePursesHandle *dph,
   TALER_EXCHANGE_DeletePursesCallback cb,
   TALER_EXCHANGE_DELETE_PURSES_RESULT_CLOSURE *cb_cls)
 {
   CURL *eh;
   char arg_str[sizeof (dph->purse_pub) * 2 + 32];
 
   dph->cb = cb;
   dph->cb_cls = cb_cls;
   {
     char pub_str[sizeof (dph->purse_pub) * 2];
     char *end;
 
     end = GNUNET_STRINGS_data_to_string (&dph->purse_pub,
                                          sizeof (dph->purse_pub),
                                          pub_str,
                                          sizeof (pub_str));
     *end = '\0';
     GNUNET_snprintf (arg_str,
                      sizeof (arg_str),
                      "purses/%s",
                      pub_str);
   }
   dph->url = TALER_url_join (dph->base_url,
                              arg_str,
                              NULL);
   if (NULL == dph->url)
   {
     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
                 "Could not construct request URL.\n");
     return TALER_EC_GENERIC_CONFIGURATION_INVALID;
   }
   eh = TALER_EXCHANGE_curl_easy_get_ (dph->url);
   if (NULL == eh)
   {
     GNUNET_break (0);
     return TALER_EC_GENERIC_INTERNAL_INVARIANT_FAILURE;
   }
   GNUNET_assert (CURLE_OK ==
                  curl_easy_setopt (eh,
                                    CURLOPT_CUSTOMREQUEST,
                                    MHD_HTTP_METHOD_DELETE));
   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
               "URL for purse delete: `%s'\n",
               dph->url);
   dph->job = GNUNET_CURL_job_add2 (dph->ctx,
                                    eh,
                                    dph->xhdr,
                                    &handle_purse_delete_finished,
                                    dph);
   if (NULL == dph->job)
     return TALER_EC_GENERIC_INTERNAL_INVARIANT_FAILURE;
   return TALER_EC_NONE;
 }
 
 
 void
 TALER_EXCHANGE_delete_purses_cancel (
   struct TALER_EXCHANGE_DeletePursesHandle *dph)
 {
   if (NULL != dph->job)
   {
     GNUNET_CURL_job_cancel (dph->job);
     dph->job = NULL;
   }
   curl_slist_free_all (dph->xhdr);
   GNUNET_free (dph->url);
   GNUNET_free (dph->base_url);
   GNUNET_free (dph);
 }
 
 
 /* end of exchange_api_delete-purses-PURSE_PUB.c */