1 files changed, 179 insertions, 0 deletions
diff --git a/src/anastasis/anastasis-gtk_handle-policy-version-changed.c b/src/anastasis/anastasis-gtk_handle-policy-version-changed.c
new file mode 100644
index 0000000..3f4a14a
--- /dev/null
+++ b/src/anastasis/anastasis-gtk_handle-policy-version-changed.c
@@ -0,0 +1,179 @@
+/*
+     This file is part of anastasis-gtk.
+     Copyright (C) 2020 Anastasis SARL
+
+     Anastasis 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.
+
+     Anastasis 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 Anastasis; see the file COPYING.  If not, write to the
+     Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+     Boston, MA 02110-1301, USA.
+*/
+/**
+ * @file src/anastasis/anastasis-gtk_handle-policy-version-changed.c
+ * @brief
+ * @author Christian Grothoff
+ */
+#include <gnunet/platform.h>
+#include <gnunet/gnunet_util_lib.h>
+#include "anastasis-gtk_helper.h"
+#include "anastasis-gtk_action.h"
+#include "anastasis-gtk_attributes.h"
+#include "anastasis-gtk_handle-identity-changed.h"
+#include <jansson.h>
+
+
+/**
+ * Function called with the results of #ANASTASIS_redux_action.
+ *
+ * @param cls closure
+ * @param error_code Error code
+ * @param response new state as result or config information of a provider
+ */
+static void
+change_action_cb (void *cls,
+                  enum TALER_ErrorCode error_code,
+                  json_t *response)
+{
+  (void) cls;
+  AG_ra = NULL;
+  if (TALER_EC_NONE != error_code)
+  {
+    AG_error ("Error: %s (%d)\n",
+              TALER_ErrorCode_get_hint (error_code),
+              error_code);
+    AG_insensitive ("anastasis_gtk_main_window_forward_button");
+    return;
+  }
+  AG_action_cb (NULL,
+                TALER_EC_NONE,
+                response);
+}
+
+
+/**
+ * The version or provider URL was edited by the user. Try to
+ * download the specified version from the specified provider.
+ */
+static void
+update_policy (void)
+{
+  GtkSpinButton *sb;
+  GtkEntry *ge;
+  gint version;
+  const char *provider_url;
+  GtkWidget *toplevel;
+
+  if (AG_in_action)
+    return;
+  toplevel = gtk_widget_get_toplevel (
+    GTK_WIDGET (GCG_get_main_window_object (
+                  "anastasis_gtk_main_window")));
+  if (NULL != AG_ra)
+  {
+    ANASTASIS_redux_action_cancel (AG_ra);
+    AG_ra = NULL;
+  }
+
+  if (NULL !=
+      json_object_get (AG_redux_state,
+                       "challenge_feedback"))
+  {
+    GtkWidget *diag;
+    gint ret;
+
+    diag = gtk_message_dialog_new (
+      GTK_WINDOW (toplevel),
+      GTK_DIALOG_MODAL,
+      GTK_MESSAGE_QUESTION,
+      GTK_BUTTONS_OK_CANCEL,
+      _ ("This action will reset all of your challenge solving progress!"));
+    ret = gtk_dialog_run (GTK_DIALOG (diag));
+    gtk_widget_destroy (diag);
+    switch (ret)
+    {
+    case GTK_RESPONSE_OK:
+      break;
+    default:
+      {
+        /* call action to reset view */
+        json_t *cp = json_incref (AG_redux_state);
+
+        AG_action_cb (NULL,
+                      TALER_EC_NONE,
+                      cp);
+        json_decref (cp);
+      }
+      /* user aborted */
+      return;
+    }
+  }
+
+  sb = GTK_SPIN_BUTTON (GCG_get_main_window_object (
+                          "anastasis_gtk_policy_version_spin_button"));
+  ge = GTK_ENTRY (GCG_get_main_window_object (
+                    "anastasis_gtk_provider_url_entry"));
+  provider_url = gtk_entry_get_text (ge);
+  if (! ( ( (0 == strncasecmp (provider_url,
+                               "https://",
+                               strlen ("https://"))) &&
+            (strlen (provider_url) >= strlen ("https://X/")) ) ||
+          ( (0 == strncasecmp (provider_url,
+                               "http://",
+                               strlen ("http://"))) &&
+            (strlen (provider_url) >= strlen ("http://X/")) ) ) )
+  {
+    AG_error ("Notice: URL must begin with 'http://' or 'https://'.");
+    AG_insensitive ("anastasis_gtk_main_window_forward_button");
+    return;
+  }
+  if ( (0 == strlen (provider_url)) ||
+       ('/' != provider_url[strlen (provider_url) - 1]) )
+  {
+    AG_error ("Notice: URL must end with '/'.");
+    AG_insensitive ("anastasis_gtk_main_window_forward_button");
+    return;
+  }
+  version = gtk_spin_button_get_value_as_int (sb);
+
+  {
+    json_t *args;
+
+    args = json_pack ("{s:I, s:s}",
+                      "version",
+                      (json_int_t) version,
+                      "provider_url",
+                      provider_url);
+    GNUNET_assert (NULL != args);
+    AG_ra = ANASTASIS_redux_action (AG_redux_state,
+                                    "change_version",
+                                    args,
+                                    &change_action_cb,
+                                    NULL);
+    json_decref (args);
+  }
+}
+
+
+void
+anastasis_gtk_policy_version_spin_button_changed_cb (GtkEditable *entry,
+                                                     gpointer user_data)
+{
+  update_policy ();
+}
+
+
+void
+anastasis_gtk_provider_url_entry_changed_cb (GtkEditable *entry,
+                                             gpointer user_data)
+{
+  update_policy ();
+}