-first sketch of persona kyclogic

3 files changed, 1496 insertions, 23 deletions

diff --git a/src/kyclogic/Makefile.am b/src/kyclogic/Makefile.am
index c77abd876..7b442bcf1 100644
--- a/src/kyclogic/Makefile.am
+++ b/src/kyclogic/Makefile.am
@@ -57,6 +57,7 @@ plugindir = $(libdir)/taler
 plugin_LTLIBRARIES = \
   libtaler_plugin_kyclogic_kycaid.la \
   libtaler_plugin_kyclogic_oauth2.la \
+  libtaler_plugin_kyclogic_persona.la \
   libtaler_plugin_kyclogic_template.la
 
 libtaler_plugin_kyclogic_template_la_SOURCES = \
@@ -90,4 +91,18 @@ libtaler_plugin_kyclogic_kycaid_la_LDFLAGS = \
   -lcurl \
   $(XLIB)
 
+libtaler_plugin_kyclogic_persona_la_SOURCES = \
+  plugin_kyclogic_persona.c
+libtaler_plugin_kyclogic_persona_la_LIBADD = \
+  $(LTLIBINTL)
+libtaler_plugin_kyclogic_persona_la_LDFLAGS = \
+  $(TALER_PLUGIN_LDFLAGS) \
+  $(top_builddir)/src/json/libtalerjson.la \
+  $(top_builddir)/src/curl/libtalercurl.la \
+  $(top_builddir)/src/util/libtalerutil.la \
+  -lgnunetutil \
+  -ljansson \
+  -lcurl \
+  $(XLIB)
+
 AM_TESTS_ENVIRONMENT=export TALER_PREFIX=$${TALER_PREFIX:-@libdir@};export PATH=$${TALER_PREFIX:-@prefix@}/bin:$$PATH;
diff --git a/src/kyclogic/plugin_kyclogic_kycaid.c b/src/kyclogic/plugin_kyclogic_kycaid.c
index 449dac51b..8a5714e72 100644
--- a/src/kyclogic/plugin_kyclogic_kycaid.c
+++ b/src/kyclogic/plugin_kyclogic_kycaid.c
@@ -86,11 +86,6 @@ struct TALER_KYCLOGIC_ProviderDetails
   char *form_id;
 
   /**
-   * Where to redirect the client upon completion.
-   */
-  char *post_kyc_redirect_url;
-
-  /**
    * Validity time for a successful KYC process.
    */
   struct GNUNET_TIME_Relative validity;
@@ -283,7 +278,6 @@ kycaid_unload_configuration (struct TALER_KYCLOGIC_ProviderDetails *pd)
   GNUNET_free (pd->auth_token);
   GNUNET_free (pd->form_id);
   GNUNET_free (pd->section);
-  GNUNET_free (pd->post_kyc_redirect_url);
   GNUNET_free (pd);
 }
 
@@ -332,18 +326,6 @@ kycaid_load_configuration (void *cls,
   if (GNUNET_OK !=
       GNUNET_CONFIGURATION_get_value_string (ps->cfg,
                                              provider_section_name,
-                                             "KYC_KYCAID_POST_URL",
-                                             &pd->post_kyc_redirect_url))
-  {
-    GNUNET_log_config_missing (GNUNET_ERROR_TYPE_ERROR,
-                               provider_section_name,
-                               "KYC_KYCAID_POST_URL");
-    kycaid_unload_configuration (pd);
-    return NULL;
-  }
-  if (GNUNET_OK !=
-      GNUNET_CONFIGURATION_get_value_string (ps->cfg,
-                                             provider_section_name,
                                              "KYC_KYCAID_FORM_ID",
                                              &pd->form_id))
   {
@@ -577,8 +559,6 @@ kycaid_initiate (void *cls,
                    "https://api.kycaid.com/forms/%s/urls",
                    pd->form_id);
   body = GNUNET_JSON_PACK (
-    GNUNET_JSON_pack_string ("redirect_url",
-                             pd->post_kyc_redirect_url),
     GNUNET_JSON_pack_data64_auto ("external_applicant_id",
                                   account_id)
     );
@@ -1019,8 +999,6 @@ async_webhook_reply (void *cls)
 {
   struct TALER_KYCLOGIC_WebhookHandle *wh = cls;
 
-  fprintf (stderr,
-           "async reply\n");
   wh->cb (wh->cb_cls,
           wh->legi_row,
           (0 == wh->legi_row)
@@ -1172,7 +1150,7 @@ kycaid_webhook (void *cls,
     GNUNET_break (0);
     wh->resp = TALER_MHD_make_error (
       TALER_EC_GENERIC_ALLOCATION_FAILURE,
-      verification_id);
+      NULL);
     wh->response_code = MHD_HTTP_INTERNAL_SERVER_ERROR;
     wh->task = GNUNET_SCHEDULER_add_now (&async_webhook_reply,
                                          wh);
diff --git a/src/kyclogic/plugin_kyclogic_persona.c b/src/kyclogic/plugin_kyclogic_persona.c
new file mode 100644
index 000000000..220aaeb12
--- /dev/null
+++ b/src/kyclogic/plugin_kyclogic_persona.c
@@ -0,0 +1,1480 @@
+/*
+  This file is part of GNU Taler
+  Copyright (C) 2022 Taler Systems SA
+
+  Taler is free software; you can redistribute it and/or modify it under the
+  terms of the GNU Affero 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 Affero General Public License for more details.
+
+  You should have received a copy of the GNU Affero General Public License along with
+  Taler; see the file COPYING.GPL.  If not, see <http://www.gnu.org/licenses/>
+*/
+/**
+ * @file plugin_kyclogic_persona.c
+ * @brief persona for an authentication flow logic
+ * @author Christian Grothoff
+ */
+#include "platform.h"
+#include "taler_kyclogic_plugin.h"
+#include "taler_mhd_lib.h"
+#include "taler_curl_lib.h"
+#include "taler_json_lib.h"
+#include <regex.h>
+#include "taler_util.h"
+
+/**
+ * Which version of the persona API are we implementing?
+ */
+#define PERSONA_VERSION "2021-07-05"
+
+/**
+ * Saves the state of a plugin.
+ */
+struct PluginState
+{
+
+  /**
+   * Our base URL.
+   */
+  char *exchange_base_url;
+
+  /**
+   * Our global configuration.
+   */
+  const struct GNUNET_CONFIGURATION_Handle *cfg;
+
+  /**
+   * Context for CURL operations (useful to the event loop)
+   */
+  struct GNUNET_CURL_Context *curl_ctx;
+
+  /**
+   * Context for integrating @e curl_ctx with the
+   * GNUnet event loop.
+   */
+  struct GNUNET_CURL_RescheduleContext *curl_rc;
+
+};
+
+
+/**
+ * Keeps the plugin-specific state for
+ * a given configuration section.
+ */
+struct TALER_KYCLOGIC_ProviderDetails
+{
+
+  /**
+   * Overall plugin state.
+   */
+  struct PluginState *ps;
+
+  /**
+   * Configuration section that configured us.
+   */
+  char *section;
+
+  /**
+   * Authorization token to use when talking
+   * to the service.
+   */
+  char *auth_token;
+
+  /**
+   * Template ID for the KYC check to perform.
+   */
+  char *template_id;
+
+  /**
+   * Subdomain to use.
+   */
+  char *subdomain;
+
+  /**
+   * Where to redirect the client upon completion.
+   */
+  char *post_kyc_redirect_url;
+
+  /**
+   * Validity time for a successful KYC process.
+   */
+  struct GNUNET_TIME_Relative validity;
+
+  /**
+   * Curl-ready authentication header to use.
+   */
+  struct curl_slist *slist;
+
+};
+
+
+/**
+ * Handle for an initiation operation.
+ */
+struct TALER_KYCLOGIC_InitiateHandle
+{
+
+  /**
+   * Hash of the payto:// URI we are initiating the KYC for.
+   */
+  struct TALER_PaytoHashP h_payto;
+
+  /**
+   * UUID being checked.
+   */
+  uint64_t legitimization_uuid;
+
+  /**
+   * Our configuration details.
+   */
+  const struct TALER_KYCLOGIC_ProviderDetails *pd;
+
+  /**
+   * Continuation to call.
+   */
+  TALER_KYCLOGIC_InitiateCallback cb;
+
+  /**
+   * Closure for @a cb.
+   */
+  void *cb_cls;
+
+  /**
+   * Context for #TEH_curl_easy_post(). Keeps the data that must
+   * persist for Curl to make the upload.
+   */
+  struct TALER_CURL_PostContext ctx;
+
+  /**
+   * Handle for the request.
+   */
+  struct GNUNET_CURL_Job *job;
+
+  /**
+   * URL of the cURL request.
+   */
+  char *url;
+
+};
+
+
+/**
+ * Handle for an KYC proof operation.
+ */
+struct TALER_KYCLOGIC_ProofHandle
+{
+
+  /**
+   * Overall plugin state.
+   */
+  struct PluginState *ps;
+
+  /**
+   * Our configuration details.
+   */
+  const struct TALER_KYCLOGIC_ProviderDetails *pd;
+
+  /**
+   * Continuation to call.
+   */
+  TALER_KYCLOGIC_ProofCallback cb;
+
+  /**
+   * Closure for @e cb.
+   */
+  void *cb_cls;
+
+  /**
+   * Connection we are handling.
+   */
+  struct MHD_Connection *connection;
+
+  /**
+   * Task for asynchronous execution.
+   */
+  struct GNUNET_SCHEDULER_Task *task;
+
+  /**
+   * Handle for the request.
+   */
+  struct GNUNET_CURL_Job *job;
+
+  /**
+   * URL of the cURL request.
+   */
+  char *url;
+
+  /**
+   * Hash of the payto:// URI we are checking the KYC for.
+   */
+  struct TALER_PaytoHashP h_payto;
+
+  /**
+   * UUID being checked.
+   */
+  uint64_t legitimization_uuid;
+
+  /**
+   * Account ID at the provider.
+   */
+  char *provider_user_id;
+
+  /**
+   * Inquiry ID at the provider.
+   */
+  char *provider_legitimization_id;
+};
+
+
+/**
+ * Handle for an KYC Web hook operation.
+ */
+struct TALER_KYCLOGIC_WebhookHandle
+{
+
+  /**
+   * Continuation to call when done.
+   */
+  TALER_KYCLOGIC_WebhookCallback cb;
+
+  /**
+   * Closure for @a cb.
+   */
+  void *cb_cls;
+
+  /**
+   * Task for asynchronous execution.
+   */
+  struct GNUNET_SCHEDULER_Task *task;
+
+  /**
+   * Overall plugin state.
+   */
+  struct PluginState *ps;
+
+  /**
+   * Our configuration details.
+   */
+  const struct TALER_KYCLOGIC_ProviderDetails *pd;
+
+  /**
+   * Connection we are handling.
+   */
+  struct MHD_Connection *connection;
+
+  /**
+   * Verification ID from the service.
+   */
+  char *inquiry_id;
+
+  /**
+   * URL of the cURL request.
+   */
+  char *url;
+
+  /**
+   * Handle for the request.
+   */
+  struct GNUNET_CURL_Job *job;
+
+  /**
+   * Response to return asynchronously.
+   */
+  struct MHD_Response *resp;
+
+  /**
+   * Our account ID.
+   */
+  struct TALER_PaytoHashP h_payto;
+
+  /**
+   * Row in legitimizations for the given
+   * @e verification_id.
+   */
+  uint64_t legi_row;
+
+  /**
+   * HTTP response code to return asynchronously.
+   */
+  unsigned int response_code;
+};
+
+
+/**
+ * Release configuration resources previously loaded
+ *
+ * @param[in] pd configuration to release
+ */
+static void
+persona_unload_configuration (struct TALER_KYCLOGIC_ProviderDetails *pd)
+{
+  curl_slist_free_all (pd->slist);
+  GNUNET_free (pd->auth_token);
+  GNUNET_free (pd->template_id);
+  GNUNET_free (pd->section);
+  GNUNET_free (pd->post_kyc_redirect_url);
+  GNUNET_free (pd);
+}
+
+
+/**
+ * Load the configuration of the KYC provider.
+ *
+ * @param cls closure
+ * @param provider_section_name configuration section to parse
+ * @return NULL if configuration is invalid
+ */
+static struct TALER_KYCLOGIC_ProviderDetails *
+persona_load_configuration (void *cls,
+                            const char *provider_section_name)
+{
+  struct PluginState *ps = cls;
+  struct TALER_KYCLOGIC_ProviderDetails *pd;
+
+  pd = GNUNET_new (struct TALER_KYCLOGIC_ProviderDetails);
+  pd->ps = ps;
+  pd->section = GNUNET_strdup (provider_section_name);
+  if (GNUNET_OK !=
+      GNUNET_CONFIGURATION_get_value_time (ps->cfg,
+                                           provider_section_name,
+                                           "PERSONA_VALIDITY",
+                                           &pd->validity))
+  {
+    GNUNET_log_config_missing (GNUNET_ERROR_TYPE_ERROR,
+                               provider_section_name,
+                               "PERSONA_VALIDITY");
+    persona_unload_configuration (pd);
+    return NULL;
+  }
+  if (GNUNET_OK !=
+      GNUNET_CONFIGURATION_get_value_string (ps->cfg,
+                                             provider_section_name,
+                                             "PERSONA_AUTH_TOKEN",
+                                             &pd->auth_token))
+  {
+    GNUNET_log_config_missing (GNUNET_ERROR_TYPE_ERROR,
+                               provider_section_name,
+                               "PERSONA_AUTH_TOKEN");
+    persona_unload_configuration (pd);
+    return NULL;
+  }
+  if (GNUNET_OK !=
+      GNUNET_CONFIGURATION_get_value_string (ps->cfg,
+                                             provider_section_name,
+                                             "PERSONA_SUBDOMAIN",
+                                             &pd->subdomain))
+  {
+    GNUNET_log_config_missing (GNUNET_ERROR_TYPE_ERROR,
+                               provider_section_name,
+                               "PERSONA_SUBDOMAIN");
+    persona_unload_configuration (pd);
+    return NULL;
+  }
+  if (GNUNET_OK !=
+      GNUNET_CONFIGURATION_get_value_string (ps->cfg,
+                                             provider_section_name,
+                                             "KYC_POST_URL",
+                                             &pd->post_kyc_redirect_url))
+  {
+    GNUNET_log_config_missing (GNUNET_ERROR_TYPE_ERROR,
+                               provider_section_name,
+                               "KYC_POST_URL");
+    persona_unload_configuration (pd);
+    return NULL;
+  }
+  if (GNUNET_OK !=
+      GNUNET_CONFIGURATION_get_value_string (ps->cfg,
+                                             provider_section_name,
+                                             "PERSONA_TEMPLATE_ID",
+                                             &pd->template_id))
+  {
+    GNUNET_log_config_missing (GNUNET_ERROR_TYPE_ERROR,
+                               provider_section_name,
+                               "PERSONA_TEMPLATE_ID");
+    persona_unload_configuration (pd);
+    return NULL;
+  }
+  {
+    char *auth;
+
+    GNUNET_asprintf (&auth,
+                     "%s: Bearer %s",
+                     MHD_HTTP_HEADER_AUTHORIZATION,
+                     pd->auth_token);
+    pd->slist = curl_slist_append (NULL,
+                                   auth);
+    GNUNET_free (auth);
+    GNUNET_asprintf (&auth,
+                     "%s: %s",
+                     MHD_HTTP_HEADER_ACCEPT,
+                     "application/json");
+    pd->slist = curl_slist_append (pd->slist,
+                                   "Persona-Version: "
+                                   PERSONA_VERSION);
+    GNUNET_free (auth);
+  }
+  return pd;
+}
+
+
+/**
+ * Cancel KYC check initiation.
+ *
+ * @param[in] ih handle of operation to cancel
+ */
+static void
+persona_initiate_cancel (struct TALER_KYCLOGIC_InitiateHandle *ih)
+{
+  if (NULL != ih->job)
+  {
+    GNUNET_CURL_job_cancel (ih->job);
+    ih->job = NULL;
+  }
+  GNUNET_free (ih->url);
+  GNUNET_free (ih);
+}
+
+
+/**
+ * Function called when we're done processing the
+ * HTTP POST "/api/v1/inquiries" request.
+ *
+ * @param cls the `struct TALER_KYCLOGIC_InitiateHandle`
+ * @param response_code HTTP response code, 0 on error
+ * @param response parsed JSON result, NULL on error
+ */
+static void
+handle_initiate_finished (void *cls,
+                          long response_code,
+                          const void *response)
+{
+  struct TALER_KYCLOGIC_InitiateHandle *ih = cls;
+  const struct TALER_KYCLOGIC_ProviderDetails *pd = ih->pd;
+  const json_t *j = response;
+  char *url;
+  json_t *data;
+  const char *type;
+  const char *inquiry_id;
+  const char *persona_account_id;
+  const char *ename;
+  unsigned int eline;
+  struct GNUNET_JSON_Specification spec[] = {
+    GNUNET_JSON_spec_string ("type",
+                             &type),
+    GNUNET_JSON_spec_string ("id",
+                             &inquiry_id),
+    GNUNET_JSON_spec_end ()
+  };
+
+  ih->job = NULL;
+  switch (response_code)
+  {
+  case MHD_HTTP_CREATED:
+    /* handled below */
+    break;
+  case MHD_HTTP_UNAUTHORIZED:
+  case MHD_HTTP_FORBIDDEN:
+    {
+      const char *msg;
+
+      msg = json_string_value (
+        json_object_get (
+          json_array_get (
+            json_object_get (j,
+                             "errors"),
+            0),
+          "title"));
+
+      ih->cb (ih->cb_cls,
+              TALER_EC_EXCHANGE_KYC_CHECK_AUTHORIZATION_FAILED,
+              NULL,
+              NULL,
+              NULL,
+              msg);
+      persona_initiate_cancel (ih);
+      return;
+    }
+  case MHD_HTTP_NOT_FOUND:
+  case MHD_HTTP_CONFLICT:
+    {
+      const char *msg;
+
+      msg = json_string_value (
+        json_object_get (
+          json_array_get (
+            json_object_get (j,
+                             "errors"),
+            0),
+          "title"));
+
+      ih->cb (ih->cb_cls,
+              TALER_EC_EXCHANGE_KYC_GENERIC_PROVIDER_UNEXPECTED_REPLY,
+              NULL,
+              NULL,
+              NULL,
+              msg);
+      persona_initiate_cancel (ih);
+      return;
+    }
+  default:
+    {
+      char *err;
+
+      GNUNET_break_op (0);
+      json_dumpf (j,
+                  stderr,
+                  JSON_INDENT (2));
+      GNUNET_asprintf (&err,
+                       "Unexpected HTTP status %u from Persona\n",
+                       (unsigned int) response_code);
+      ih->cb (ih->cb_cls,
+              TALER_EC_NONE,
+              NULL,
+              NULL,
+              NULL,
+              err);
+      GNUNET_free (err);
+      persona_initiate_cancel (ih);
+      return;
+    }
+  }
+  data = json_object_get (j,
+                          "data");
+  if (NULL == data)
+  {
+    GNUNET_break_op (0);
+    json_dumpf (j,
+                stderr,
+                JSON_INDENT (2));
+    persona_initiate_cancel (ih);
+    return;
+  }
+
+  if (GNUNET_OK !=
+      GNUNET_JSON_parse (data,
+                         spec,
+                         &ename,
+                         &eline))
+  {
+    GNUNET_break_op (0);
+    json_dumpf (j,
+                stderr,
+                JSON_INDENT (2));
+    ih->cb (ih->cb_cls,
+            TALER_EC_EXCHANGE_KYC_GENERIC_PROVIDER_UNEXPECTED_REPLY,
+            NULL,
+            NULL,
+            NULL,
+            ename);
+    persona_initiate_cancel (ih);
+    return;
+  }
+  persona_account_id
+    = json_string_value (
+        json_object_get (
+          json_object_get (
+            json_object_get (
+              json_object_get (data,
+                               "relationships"),
+              "account"),
+            "data"),
+          "id"));
+  GNUNET_log (GNUNET_ERROR_TYPE_INFO,
+              "Starting inquiry %s for Persona account %s\n",
+              inquiry_id,
+              persona_account_id);
+  GNUNET_asprintf (&url,
+                   "https://%s.withpersona.com/verify"
+                   "?inquiry-id=%s",
+                   pd->subdomain,
+                   inquiry_id);
+  ih->cb (ih->cb_cls,
+          TALER_EC_NONE,
+          url,
+          persona_account_id,
+          inquiry_id,
+          NULL);
+  GNUNET_free (url);
+  persona_initiate_cancel (ih);
+}
+
+
+/**
+ * Initiate KYC check.
+ *
+ * @param cls the @e cls of this struct with the plugin-specific state
+ * @param pd provider configuration details
+ * @param account_id which account to trigger process for
+ * @param legitimization_uuid unique ID for the legitimization process
+ * @param cb function to call with the result
+ * @param cb_cls closure for @a cb
+ * @return handle to cancel operation early
+ */
+static struct TALER_KYCLOGIC_InitiateHandle *
+persona_initiate (void *cls,
+                  const struct TALER_KYCLOGIC_ProviderDetails *pd,
+                  const struct TALER_PaytoHashP *account_id,
+                  uint64_t legitimization_uuid,
+                  TALER_KYCLOGIC_InitiateCallback cb,
+                  void *cb_cls)
+{
+  struct PluginState *ps = cls;
+  struct TALER_KYCLOGIC_InitiateHandle *ih;
+  json_t *body;
+  CURL *eh;
+
+  eh = curl_easy_init ();
+  if (NULL == eh)
+  {
+    GNUNET_break (0);
+    return NULL;
+  }
+  ih = GNUNET_new (struct TALER_KYCLOGIC_InitiateHandle);
+  ih->legitimization_uuid = legitimization_uuid;
+  ih->cb = cb;
+  ih->cb_cls = cb_cls;
+  ih->h_payto = *account_id;
+  ih->pd = pd;
+  GNUNET_asprintf (&ih->url,
+                   "https://withpersona.com/api/v1/inquiries");
+  {
+    char *payto_s;
+    char *proof_url;
+    char ref_s[24];
+
+    GNUNET_snprintf (ref_s,
+                     sizeof (ref_s),
+                     "%llu",
+                     (unsigned long long) ih->legitimization_uuid);
+    payto_s = GNUNET_STRINGS_data_to_string_alloc (&ih->h_payto,
+                                                   sizeof (ih->h_payto));
+    GNUNET_asprintf (&proof_url,
+                     "%s/kyc-proof/%s/%s",
+                     pd->ps->exchange_base_url,
+                     payto_s,
+                     pd->section);
+    body = GNUNET_JSON_PACK (
+      GNUNET_JSON_pack_string ("inquiry_template_id",
+                               pd->template_id),
+      GNUNET_JSON_pack_string ("account_id",
+                               payto_s),
+      GNUNET_JSON_pack_string ("reference_id",
+                               ref_s),
+      GNUNET_JSON_pack_string ("redirect_uri",
+                               proof_url)
+      );
+    GNUNET_free (payto_s);
+    GNUNET_free (proof_url);
+  }
+  GNUNET_break (CURLE_OK ==
+                curl_easy_setopt (eh,
+                                  CURLOPT_VERBOSE,
+                                  1));
+  GNUNET_assert (CURLE_OK ==
+                 curl_easy_setopt (eh,
+                                   CURLOPT_MAXREDIRS,
+                                   1L));
+  GNUNET_break (CURLE_OK ==
+                curl_easy_setopt (eh,
+                                  CURLOPT_URL,
+                                  ih->url));
+  if (GNUNET_OK !=
+      TALER_curl_easy_post (&ih->ctx,
+                            eh,
+                            body))
+  {
+    GNUNET_break (0);
+    GNUNET_free (ih->url);
+    GNUNET_free (ih);
+    curl_easy_cleanup (eh);
+    json_decref (body);
+    return NULL;
+  }
+  ih->job = GNUNET_CURL_job_add2 (ps->curl_ctx,
+                                  eh,
+                                  ih->ctx.headers,
+                                  &handle_initiate_finished,
+                                  ih);
+  GNUNET_CURL_extend_headers (ih->job,
+                              pd->slist);
+  return ih;
+}
+
+
+/**
+ * Cancel KYC proof.
+ *
+ * @param[in] ph handle of operation to cancel
+ */
+static void
+persona_proof_cancel (struct TALER_KYCLOGIC_ProofHandle *ph)
+{
+  if (NULL != ph->job)
+  {
+    GNUNET_CURL_job_cancel (ph->job);
+    ph->job = NULL;
+  }
+  GNUNET_free (ph->url);
+  GNUNET_free (ph->provider_user_id);
+  GNUNET_free (ph->provider_legitimization_id);
+  GNUNET_free (ph);
+}
+
+
+/**
+ * Function called when we're done processing the
+ * HTTP "/api/v1/verifications/{verification-id}" request.
+ *
+ * @param cls the `struct TALER_KYCLOGIC_InitiateHandle`
+ * @param response_code HTTP response code, 0 on error
+ * @param response parsed JSON result, NULL on error
+ */
+static void
+handle_proof_finished (void *cls,
+                       long response_code,
+                       const void *response)
+{
+  struct TALER_KYCLOGIC_ProofHandle *ph = cls;
+  const json_t *j = response;
+
+  ph->job = NULL;
+  json_dumpf (j,
+              stderr,
+              JSON_INDENT (2));
+#if 0
+  switch (response_code)
+  {
+  case MHD_HTTP_OK:
+    {
+      const char *verification_id;
+      const char *form_url;
+      struct GNUNET_JSON_Specification spec[] = {
+        GNUNET_JSON_spec_string ("verification_id",
+                                 &verification_id),
+        GNUNET_JSON_spec_string ("form_url",
+                                 &form_url),
+        GNUNET_JSON_spec_end ()
+      };
+
+      if (GNUNET_OK !=
+          GNUNET_JSON_parse (j,
+                             spec,
+                             NULL, NULL))
+      {
+        GNUNET_break_op (0);
+        json_dumpf (j,
+                    stderr,
+                    JSON_INDENT (2));
+        ph->cb (ph->cb_cls,
+                TALER_EC_EXCHANGE_KYC_GENERIC_PROVIDER_UNEXPECTED_REPLY,
+                NULL,
+                NULL,
+                NULL,
+                json_string_value (json_object_get (j,
+                                                    "type")));
+        break;
+      }
+      ph->cb (ph->cb_cls,
+              TALER_EC_NONE,
+              form_url,
+              NULL, /* no provider_user_id */
+              verification_id,
+              NULL /* no error */);
+      GNUNET_JSON_parse_free (spec);
+    }
+    break;
+  case MHD_HTTP_BAD_REQUEST:
+  case MHD_HTTP_NOT_FOUND:
+  case MHD_HTTP_CONFLICT:
+    GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+                "PERSONA failed with response %u:\n",
+                (unsigned int) response_code);
+    json_dumpf (j,
+                stderr,
+                JSON_INDENT (2));
+    ph->cb (ph->cb_cls,
+            TALER_EC_EXCHANGE_KYC_GENERIC_LOGIC_BUG,
+            NULL,
+            NULL,
+            NULL,
+            json_string_value (json_object_get (j,
+                                                "type")));
+    break;
+  case MHD_HTTP_UNAUTHORIZED:
+  case MHD_HTTP_PAYMENT_REQUIRED:
+    GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+                "Refused access with HTTP status code %u\n",
+                (unsigned int) response_code);
+    ph->cb (ph->cb_cls,
+            TALER_EC_EXCHANGE_KYC_GENERIC_PROVIDER_ACCESS_REFUSED,
+            NULL,
+            NULL,
+            NULL,
+            json_string_value (json_object_get (j,
+                                                "type")));
+    break;
+  case MHD_HTTP_REQUEST_TIMEOUT:
+    ph->cb (ph->cb_cls,
+            TALER_EC_EXCHANGE_KYC_GENERIC_PROVIDER_TIMEOUT,
+            NULL,
+            NULL,
+            NULL,
+            json_string_value (json_object_get (j,
+                                                "type")));
+    break;
+  case MHD_HTTP_UNPROCESSABLE_ENTITY: /* validation */
+    GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+                "PERSONA failed with response %u:\n",
+                (unsigned int) response_code);
+    json_dumpf (j,
+                stderr,
+                JSON_INDENT (2));
+    ph->cb (ph->cb_cls,
+            TALER_EC_EXCHANGE_KYC_GENERIC_PROVIDER_UNEXPECTED_REPLY,
+            NULL,
+            NULL,
+            NULL,
+            json_string_value (json_object_get (j,
+                                                "type")));
+    break;
+  case MHD_HTTP_TOO_MANY_REQUESTS:
+    ph->cb (ph->cb_cls,
+            TALER_EC_EXCHANGE_KYC_GENERIC_PROVIDER_RATE_LIMIT_EXCEEDED,
+            NULL,
+            NULL,
+            NULL,
+            json_string_value (json_object_get (j,
+                                                "type")));
+    break;
+  case MHD_HTTP_INTERNAL_SERVER_ERROR:
+    ph->cb (ph->cb_cls,
+            TALER_EC_EXCHANGE_KYC_GENERIC_PROVIDER_UNEXPECTED_REPLY,
+            NULL,
+            NULL,
+            NULL,
+            json_string_value (json_object_get (j,
+                                                "type")));
+    break;
+  default:
+    GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+                "Unexpected PERSONA response %u:\n",
+                (unsigned int) response_code);
+    json_dumpf (j,
+                stderr,
+                JSON_INDENT (2));
+    ph->cb (ph->cb_cls,
+            TALER_EC_EXCHANGE_KYC_GENERIC_PROVIDER_UNEXPECTED_REPLY,
+            NULL,
+            NULL,
+            NULL,
+            json_string_value (json_object_get (j,
+                                                "type")));
+    break;
+  }
+#endif
+  persona_proof_cancel (ph);
+}
+
+
+/**
+ * Check KYC status and return final result to human.
+ *
+ * @param cls the @e cls of this struct with the plugin-specific state
+ * @param pd provider configuration details
+ * @param url_path rest of the URL after `/kyc-webhook/`
+ * @param connection MHD connection object (for HTTP headers)
+ * @param account_id which account to trigger process for
+ * @param legi_row row in the table the legitimization is for
+ * @param provider_user_id user ID (or NULL) the proof is for
+ * @param provider_legitimization_id legitimization ID the proof is for
+ * @param cb function to call with the result
+ * @param cb_cls closure for @a cb
+ * @return handle to cancel operation early
+ */
+static struct TALER_KYCLOGIC_ProofHandle *
+persona_proof (void *cls,
+               const struct TALER_KYCLOGIC_ProviderDetails *pd,
+               const char *const url_path[],
+               struct MHD_Connection *connection,
+               const struct TALER_PaytoHashP *account_id,
+               uint64_t legi_row,
+               const char *provider_user_id,
+               const char *provider_legitimization_id,
+               TALER_KYCLOGIC_ProofCallback cb,
+               void *cb_cls)
+{
+  struct PluginState *ps = cls;
+  struct TALER_KYCLOGIC_ProofHandle *ph;
+  CURL *eh;
+
+  eh = curl_easy_init ();
+  if (NULL == eh)
+  {
+    GNUNET_break (0);
+    return NULL;
+  }
+  ph = GNUNET_new (struct TALER_KYCLOGIC_ProofHandle);
+  ph->ps = ps;
+  ph->pd = pd;
+  ph->cb = cb;
+  ph->cb_cls = cb_cls;
+  ph->connection = connection;
+  ph->legitimization_uuid = legi_row;
+  ph->h_payto = *account_id;
+  if (NULL != provider_user_id)
+    ph->provider_user_id = GNUNET_strdup (provider_user_id);
+  if (NULL != provider_legitimization_id)
+    ph->provider_legitimization_id = GNUNET_strdup (provider_legitimization_id);
+  GNUNET_asprintf (&ph->url,
+                   "https://withpersona.com/api/v1/inquiries/%s",
+                   provider_legitimization_id);
+  GNUNET_break (CURLE_OK ==
+                curl_easy_setopt (eh,
+                                  CURLOPT_VERBOSE,
+                                  1));
+  GNUNET_assert (CURLE_OK ==
+                 curl_easy_setopt (eh,
+                                   CURLOPT_MAXREDIRS,
+                                   1L));
+  GNUNET_break (CURLE_OK ==
+                curl_easy_setopt (eh,
+                                  CURLOPT_URL,
+                                  ph->url));
+  ph->job = GNUNET_CURL_job_add2 (ps->curl_ctx,
+                                  eh,
+                                  pd->slist,
+                                  &handle_proof_finished,
+                                  ph);
+  return ph;
+}
+
+
+/**
+ * Cancel KYC webhook execution.
+ *
+ * @param[in] wh handle of operation to cancel
+ */
+static void
+persona_webhook_cancel (struct TALER_KYCLOGIC_WebhookHandle *wh)
+{
+  if (NULL != wh->task)
+  {
+    GNUNET_SCHEDULER_cancel (wh->task);
+    wh->task = NULL;
+  }
+  if (NULL != wh->job)
+  {
+    GNUNET_CURL_job_cancel (wh->job);
+    wh->job = NULL;
+  }
+  GNUNET_free (wh->inquiry_id);
+  GNUNET_free (wh->url);
+  GNUNET_free (wh);
+}
+
+
+/**
+ * Function called when we're done processing the
+ * HTTP "/verifications/{verification_id}" request.
+ *
+ * @param cls the `struct TALER_KYCLOGIC_WebhookHandle`
+ * @param response_code HTTP response code, 0 on error
+ * @param response parsed JSON result, NULL on error
+ */
+static void
+handle_webhook_finished (void *cls,
+                         long response_code,
+                         const void *response)
+{
+  struct TALER_KYCLOGIC_WebhookHandle *wh = cls;
+  const json_t *j = response;
+
+  wh->job = NULL;
+  json_dumpf (j,
+              stderr,
+              JSON_INDENT (2));
+#if 0
+  struct MHD_Response *resp;
+
+  switch (response_code)
+  {
+  case MHD_HTTP_OK:
+    {
+      const char *applicant_id;
+      const char *verification_id;
+      const char *status;
+      bool verified;
+      json_t *verifications;
+      struct GNUNET_JSON_Specification spec[] = {
+        GNUNET_JSON_spec_string ("applicant_id",
+                                 &applicant_id),
+        GNUNET_JSON_spec_string ("verification_id",
+                                 &verification_id),
+        GNUNET_JSON_spec_string ("status",
+                                 &status), /* completed, pending, ... */
+        GNUNET_JSON_spec_bool ("verified",
+                               &verified),
+        GNUNET_JSON_spec_json ("verifications",
+                               &verifications),
+        GNUNET_JSON_spec_end ()
+      };
+      struct GNUNET_TIME_Absolute expiration;
+
+      if (GNUNET_OK !=
+          GNUNET_JSON_parse (j,
+                             spec,
+                             NULL, NULL))
+      {
+        GNUNET_break_op (0);
+        json_dumpf (j,
+                    stderr,
+                    JSON_INDENT (2));
+        resp = TALER_MHD_MAKE_JSON_PACK (
+          GNUNET_JSON_pack_uint64 ("persona_http_status",
+                                   response_code),
+          GNUNET_JSON_pack_object_incref ("persona_body",
+                                          (json_t *) j));
+        wh->cb (wh->cb_cls,
+                wh->legi_row,
+                &wh->h_payto,
+                wh->applicant_id,
+                wh->verification_id,
+                TALER_KYCLOGIC_STATUS_PROVIDER_FAILED,
+                GNUNET_TIME_UNIT_ZERO_ABS, /* expiration */
+                MHD_HTTP_BAD_GATEWAY,
+                resp);
+        break;
+      }
+      if (! verified)
+      {
+        log_failure (verifications);
+      }
+      resp = MHD_create_response_from_buffer (0,
+                                              "",
+                                              MHD_RESPMEM_PERSISTENT);
+      if (verified)
+      {
+        expiration = GNUNET_TIME_relative_to_absolute (wh->pd->validity);
+        wh->cb (wh->cb_cls,
+                wh->legi_row,
+                &wh->h_payto,
+                wh->applicant_id,
+                wh->verification_id,
+                TALER_KYCLOGIC_STATUS_SUCCESS,
+                expiration,
+                MHD_HTTP_NO_CONTENT,
+                resp);
+      }
+      else
+      {
+        wh->cb (wh->cb_cls,
+                wh->legi_row,
+                &wh->h_payto,
+                wh->applicant_id,
+                wh->verification_id,
+                TALER_KYCLOGIC_STATUS_USER_ABORTED,
+                GNUNET_TIME_UNIT_ZERO_ABS,
+                MHD_HTTP_NO_CONTENT,
+                resp);
+      }
+      GNUNET_JSON_parse_free (spec);
+    }
+    break;
+  case MHD_HTTP_BAD_REQUEST:
+  case MHD_HTTP_NOT_FOUND:
+  case MHD_HTTP_CONFLICT:
+    GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+                "PERSONA failed with response %u:\n",
+                (unsigned int) response_code);
+    json_dumpf (j,
+                stderr,
+                JSON_INDENT (2));
+    resp = TALER_MHD_MAKE_JSON_PACK (
+      GNUNET_JSON_pack_uint64 ("persona_http_status",
+                               response_code));
+    wh->cb (wh->cb_cls,
+            wh->legi_row,
+            &wh->h_payto,
+            wh->applicant_id,
+            wh->verification_id,
+            TALER_KYCLOGIC_STATUS_PROVIDER_FAILED,
+            GNUNET_TIME_UNIT_ZERO_ABS, /* expiration */
+            MHD_HTTP_INTERNAL_SERVER_ERROR,
+            resp);
+    break;
+  case MHD_HTTP_UNAUTHORIZED:
+  case MHD_HTTP_PAYMENT_REQUIRED:
+    GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+                "Refused access with HTTP status code %u\n",
+                (unsigned int) response_code);
+    resp = TALER_MHD_MAKE_JSON_PACK (
+      GNUNET_JSON_pack_uint64 ("persona_http_status",
+                               response_code),
+      GNUNET_JSON_pack_object_incref ("persona_body",
+                                      (json_t *) j));
+    wh->cb (wh->cb_cls,
+            wh->legi_row,
+            &wh->h_payto,
+            wh->applicant_id,
+            wh->verification_id,
+            TALER_KYCLOGIC_STATUS_PROVIDER_FAILED,
+            GNUNET_TIME_UNIT_ZERO_ABS, /* expiration */
+            MHD_HTTP_NETWORK_AUTHENTICATION_REQUIRED,
+            resp);
+    break;
+  case MHD_HTTP_REQUEST_TIMEOUT:
+    resp = TALER_MHD_MAKE_JSON_PACK (
+      GNUNET_JSON_pack_uint64 ("persona_http_status",
+                               response_code),
+      GNUNET_JSON_pack_object_incref ("persona_body",
+                                      (json_t *) j));
+    wh->cb (wh->cb_cls,
+            wh->legi_row,
+            &wh->h_payto,
+            wh->applicant_id,
+            wh->verification_id,
+            TALER_KYCLOGIC_STATUS_PROVIDER_FAILED,
+            GNUNET_TIME_UNIT_ZERO_ABS, /* expiration */
+            MHD_HTTP_GATEWAY_TIMEOUT,
+            resp);
+    break;
+  case MHD_HTTP_UNPROCESSABLE_ENTITY: /* validation */
+    GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+                "PERSONA failed with response %u:\n",
+                (unsigned int) response_code);
+    json_dumpf (j,
+                stderr,
+                JSON_INDENT (2));
+    resp = TALER_MHD_MAKE_JSON_PACK (
+      GNUNET_JSON_pack_uint64 ("persona_http_status",
+                               response_code),
+      GNUNET_JSON_pack_object_incref ("persona_body",
+                                      (json_t *) j));
+    wh->cb (wh->cb_cls,
+            wh->legi_row,
+            &wh->h_payto,
+            wh->applicant_id,
+            wh->verification_id,
+            TALER_KYCLOGIC_STATUS_PROVIDER_FAILED,
+            GNUNET_TIME_UNIT_ZERO_ABS, /* expiration */
+            MHD_HTTP_BAD_GATEWAY,
+            resp);
+    break;
+  case MHD_HTTP_TOO_MANY_REQUESTS:
+    resp = TALER_MHD_MAKE_JSON_PACK (
+      GNUNET_JSON_pack_uint64 ("persona_http_status",
+                               response_code),
+      GNUNET_JSON_pack_object_incref ("persona_body",
+                                      (json_t *) j));
+    wh->cb (wh->cb_cls,
+            wh->legi_row,
+            &wh->h_payto,
+            wh->applicant_id,
+            wh->verification_id,
+            TALER_KYCLOGIC_STATUS_PROVIDER_FAILED,
+            GNUNET_TIME_UNIT_ZERO_ABS, /* expiration */
+            MHD_HTTP_SERVICE_UNAVAILABLE,
+            resp);
+    break;
+  case MHD_HTTP_INTERNAL_SERVER_ERROR:
+    resp = TALER_MHD_MAKE_JSON_PACK (
+      GNUNET_JSON_pack_uint64 ("persona_http_status",
+                               response_code),
+      GNUNET_JSON_pack_object_incref ("persona_body",
+                                      (json_t *) j));
+    wh->cb (wh->cb_cls,
+            wh->legi_row,
+            &wh->h_payto,
+            wh->applicant_id,
+            wh->verification_id,
+            TALER_KYCLOGIC_STATUS_PROVIDER_FAILED,
+            GNUNET_TIME_UNIT_ZERO_ABS, /* expiration */
+            MHD_HTTP_BAD_GATEWAY,
+            resp);
+    break;
+  default:
+    resp = TALER_MHD_MAKE_JSON_PACK (
+      GNUNET_JSON_pack_uint64 ("persona_http_status",
+                               response_code),
+      GNUNET_JSON_pack_object_incref ("persona_body",
+                                      (json_t *) j));
+    GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+                "Unexpected PERSONA response %u:\n",
+                (unsigned int) response_code);
+    json_dumpf (j,
+                stderr,
+                JSON_INDENT (2));
+    wh->cb (wh->cb_cls,
+            wh->legi_row,
+            &wh->h_payto,
+            wh->applicant_id,
+            wh->verification_id,
+            TALER_KYCLOGIC_STATUS_PROVIDER_FAILED,
+            GNUNET_TIME_UNIT_ZERO_ABS, /* expiration */
+            MHD_HTTP_BAD_GATEWAY,
+            resp);
+    break;
+  }
+#endif
+  persona_webhook_cancel (wh);
+}
+
+
+/**
+ * Asynchronously return a reply for the webhook.
+ *
+ * @param cls a `struct TALER_KYCLOGIC_WebhookHandle *`
+ */
+static void
+async_webhook_reply (void *cls)
+{
+  struct TALER_KYCLOGIC_WebhookHandle *wh = cls;
+
+  wh->cb (wh->cb_cls,
+          wh->legi_row,
+          (0 == wh->legi_row)
+          ? NULL
+          : &wh->h_payto,
+          NULL, /* FIXME: never known here, but maybe prevent clearing it in the DB as it should already be there? */
+          wh->inquiry_id, /* provider legi ID */
+          TALER_KYCLOGIC_STATUS_PROVIDER_FAILED,
+          GNUNET_TIME_UNIT_ZERO_ABS, /* expiration */
+          wh->response_code,
+          wh->resp);
+  persona_webhook_cancel (wh);
+}
+
+
+/**
+ * Check KYC status and return result for Webhook.  We do NOT implement the
+ * authentication check proposed by the PERSONA documentation, as it would
+ * allow an attacker who learns the access token to easily bypass the KYC
+ * checks. Instead, we insist on explicitly requesting the KYC status from the
+ * provider (at least on success).
+ *
+ * @param cls the @e cls of this struct with the plugin-specific state
+ * @param pd provider configuration details
+ * @param plc callback to lookup accounts with
+ * @param plc_cls closure for @a plc
+ * @param http_method HTTP method used for the webhook
+ * @param url_path rest of the URL after `/kyc-webhook/`
+ * @param connection MHD connection object (for HTTP headers)
+ * @param body HTTP request body
+ * @param cb function to call with the result
+ * @param cb_cls closure for @a cb
+ * @return handle to cancel operation early
+ */
+static struct TALER_KYCLOGIC_WebhookHandle *
+persona_webhook (void *cls,
+                 const struct TALER_KYCLOGIC_ProviderDetails *pd,
+                 TALER_KYCLOGIC_ProviderLookupCallback plc,
+                 void *plc_cls,
+                 const char *http_method,
+                 const char *const url_path[],
+                 struct MHD_Connection *connection,
+                 const json_t *body,
+                 TALER_KYCLOGIC_WebhookCallback cb,
+                 void *cb_cls)
+{
+  struct PluginState *ps = cls;
+  struct TALER_KYCLOGIC_WebhookHandle *wh;
+  CURL *eh;
+  enum GNUNET_DB_QueryStatus qs;
+  const char *persona_inquiry_id;
+
+  wh = GNUNET_new (struct TALER_KYCLOGIC_WebhookHandle);
+  wh->cb = cb;
+  wh->cb_cls = cb_cls;
+  wh->ps = ps;
+  wh->pd = pd;
+  wh->connection = connection;
+
+  persona_inquiry_id
+    = json_string_value (
+        json_object_get (
+          json_object_get (
+            json_object_get (
+              json_object_get (
+                json_object_get (
+                  body,
+                  "data"),
+                "attributes"),
+              "payload"),
+            "data"),
+          "id"));
+  if (NULL == persona_inquiry_id)
+  {
+    GNUNET_break_op (0);
+    json_dumpf (body,
+                stderr,
+                JSON_INDENT (2));
+    wh->resp = TALER_MHD_MAKE_JSON_PACK (
+      GNUNET_JSON_pack_object_incref ("webhook_body",
+                                      (json_t *) body));
+    wh->response_code = MHD_HTTP_BAD_REQUEST;
+    wh->task = GNUNET_SCHEDULER_add_now (&async_webhook_reply,
+                                         wh);
+    return wh;
+  }
+  qs = plc (plc_cls,
+            pd->section,
+            persona_inquiry_id,
+            &wh->h_payto,
+            &wh->legi_row);
+  if (qs < 0)
+  {
+    wh->resp = TALER_MHD_make_error (TALER_EC_GENERIC_DB_FETCH_FAILED,
+                                     "provider-legitimization-lookup");
+    wh->response_code = MHD_HTTP_INTERNAL_SERVER_ERROR;
+    wh->task = GNUNET_SCHEDULER_add_now (&async_webhook_reply,
+                                         wh);
+    return wh;
+  }
+  if (GNUNET_DB_STATUS_SUCCESS_NO_RESULTS == qs)
+  {
+    GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
+                "Received webhook for unknown verification ID `%s'\n",
+                persona_inquiry_id);
+    wh->resp = TALER_MHD_make_error (
+      TALER_EC_EXCHANGE_KYC_PROOF_REQUEST_UNKNOWN,
+      persona_inquiry_id);
+    wh->response_code = MHD_HTTP_NOT_FOUND;
+    wh->task = GNUNET_SCHEDULER_add_now (&async_webhook_reply,
+                                         wh);
+    return wh;
+  }
+  wh->inquiry_id = GNUNET_strdup (persona_inquiry_id);
+
+  eh = curl_easy_init ();
+  if (NULL == eh)
+  {
+    GNUNET_break (0);
+    wh->resp = TALER_MHD_make_error (
+      TALER_EC_GENERIC_ALLOCATION_FAILURE,
+      NULL);
+    wh->response_code = MHD_HTTP_INTERNAL_SERVER_ERROR;
+    wh->task = GNUNET_SCHEDULER_add_now (&async_webhook_reply,
+                                         wh);
+    return wh;
+  }
+
+  GNUNET_asprintf (&wh->url,
+                   "https://withpersona.com/api/v1/inquiries/%s",
+                   persona_inquiry_id);
+  GNUNET_break (CURLE_OK ==
+                curl_easy_setopt (eh,
+                                  CURLOPT_VERBOSE,
+                                  1));
+  GNUNET_assert (CURLE_OK ==
+                 curl_easy_setopt (eh,
+                                   CURLOPT_MAXREDIRS,
+                                   1L));
+  GNUNET_break (CURLE_OK ==
+                curl_easy_setopt (eh,
+                                  CURLOPT_URL,
+                                  wh->url));
+  wh->job = GNUNET_CURL_job_add2 (ps->curl_ctx,
+                                  eh,
+                                  pd->slist,
+                                  &handle_webhook_finished,
+                                  wh);
+  return wh;
+}
+
+
+/**
+ * Initialize persona logic plugin
+ *
+ * @param cls a configuration instance
+ * @return NULL on error, otherwise a `struct TALER_KYCLOGIC_Plugin`
+ */
+void *
+libtaler_plugin_kyclogic_persona_init (void *cls)
+{
+  const struct GNUNET_CONFIGURATION_Handle *cfg = cls;
+  struct TALER_KYCLOGIC_Plugin *plugin;
+  struct PluginState *ps;
+
+  ps = GNUNET_new (struct PluginState);
+  ps->cfg = cfg;
+  if (GNUNET_OK !=
+      GNUNET_CONFIGURATION_get_value_string (cfg,
+                                             "exchange",
+                                             "BASE_URL",
+                                             &ps->exchange_base_url))
+  {
+    GNUNET_log_config_missing (GNUNET_ERROR_TYPE_ERROR,
+                               "exchange",
+                               "BASE_URL");
+    GNUNET_free (ps);
+    return NULL;
+  }
+
+  ps->curl_ctx
+    = GNUNET_CURL_init (&GNUNET_CURL_gnunet_scheduler_reschedule,
+                        &ps->curl_rc);
+  if (NULL == ps->curl_ctx)
+  {
+    GNUNET_break (0);
+    GNUNET_free (ps->exchange_base_url);
+    GNUNET_free (ps);
+    return NULL;
+  }
+  ps->curl_rc = GNUNET_CURL_gnunet_rc_create (ps->curl_ctx);
+
+  plugin = GNUNET_new (struct TALER_KYCLOGIC_Plugin);
+  plugin->cls = ps;
+  plugin->load_configuration
+    = &persona_load_configuration;
+  plugin->unload_configuration
+    = &persona_unload_configuration;
+  plugin->initiate
+    = &persona_initiate;
+  plugin->initiate_cancel
+    = &persona_initiate_cancel;
+  plugin->proof
+    = &persona_proof;
+  plugin->proof_cancel
+    = &persona_proof_cancel;
+  plugin->webhook
+    = &persona_webhook;
+  plugin->webhook_cancel
+    = &persona_webhook_cancel;
+  return plugin;
+}
+
+
+/**
+ * Unload authorization plugin
+ *
+ * @param cls a `struct TALER_KYCLOGIC_Plugin`
+ * @return NULL (always)
+ */
+void *
+libtaler_plugin_kyclogic_persona_done (void *cls)
+{
+  struct TALER_KYCLOGIC_Plugin *plugin = cls;
+  struct PluginState *ps = plugin->cls;
+
+  if (NULL != ps->curl_ctx)
+  {
+    GNUNET_CURL_fini (ps->curl_ctx);
+    ps->curl_ctx = NULL;
+  }
+  if (NULL != ps->curl_rc)
+  {
+    GNUNET_CURL_gnunet_rc_destroy (ps->curl_rc);
+    ps->curl_rc = NULL;
+  }
+  GNUNET_free (ps->exchange_base_url);
+  GNUNET_free (ps);
+  GNUNET_free (plugin);
+  return NULL;
+}
+
+
+/* end of plugin_kyclogic_persona.c */