1 files changed, 219 insertions, 0 deletions

diff --git a/src/contrib/service/auction/gnunet-auction-create.c b/src/contrib/service/auction/gnunet-auction-create.c
new file mode 100644
index 000000000..93947b89c
--- /dev/null
+++ b/src/contrib/service/auction/gnunet-auction-create.c
@@ -0,0 +1,219 @@
+/*
+   This file is part of GNUnet.
+   Copyright (C) 2001, 2002, 2004, 2005, 2006, 2007, 2009 GNUnet e.V.
+
+   GNUnet 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 of the License,
+   or (at your option) any later version.
+
+   GNUnet 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 this program.  If not, see <http://www.gnu.org/licenses/>.
+
+     SPDX-License-Identifier: AGPL3.0-or-later
+ */
+
+/**
+ * @file auction/gnunet-auction-create.c
+ * @brief tool to create a new auction
+ * @author Markus Teich
+ */
+#include "platform.h"
+
+#include <float.h>
+
+#include "gnunet_util_lib.h"
+#include <jansson.h>
+/* #include "gnunet_auction_service.h" */
+
+#define FIRST_PRICE 0
+#define OUTCOME_PRIVATE 0
+#define OUTCOME_PUBLIC 1
+
+static int ret; /** Final status code. */
+static char *fndesc; /** filename of the item description */
+static char *fnprices; /** filename of the price map */
+static struct GNUNET_TIME_Relative dround; /** max round duration */
+static struct GNUNET_TIME_Relative dstart; /** time until auction starts */
+static unsigned int m = FIRST_PRICE; /** auction parameter m */
+static int outcome = OUTCOME_PRIVATE; /** outcome */
+static int interactive; /** keep running in foreground */
+
+
+/**
+ * Main function that will be run by the scheduler.
+ *
+ * @param cls closure
+ * @param args remaining command-line arguments
+ * @param cfgfile name of the configuration file used (for saving, can be NULL!)
+ * @param cfg configuration
+ */
+static void
+run (void *cls,
+     char *const *args,
+     const char *cfgfile,
+     const struct GNUNET_CONFIGURATION_Handle *cfg)
+{
+  unsigned int i;
+  double cur, prev = DBL_MAX;
+  json_t *pmap;
+  json_t *parray;
+  json_t *pnode;
+  json_error_t jerr;
+
+  /* cmdline parsing */
+  if (GNUNET_TIME_UNIT_ZERO.rel_value_us == dstart.rel_value_us)
+  {
+    GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+                "required argument --regtime missing or invalid (zero)\n");
+    goto fail;
+  }
+  if (GNUNET_TIME_UNIT_ZERO.rel_value_us == dround.rel_value_us)
+  {
+    GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+                "required argument --roundtime missing or invalid (zero)\n");
+    goto fail;
+  }
+  if (! fndesc)
+  {
+    GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+                "required argument --description missing\n");
+    goto fail;
+  }
+  if (! fnprices)
+  {
+    GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+                "required argument --pricemap missing\n");
+    goto fail;
+  }
+
+  /* parse and check pricemap validity */
+  if (! (pmap = json_load_file (fnprices, JSON_DECODE_INT_AS_REAL, &jerr)))
+  {
+    GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+                "parsing pricemap json at %d:%d: %s\n",
+                jerr.line, jerr.column, jerr.text);
+    goto fail;
+  }
+  if (-1 == json_unpack_ex (pmap, &jerr, JSON_VALIDATE_ONLY,
+                            "{s:s, s:[]}", "currency", "prices"))
+  {
+    GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+                "validating pricemap: %s\n", jerr.text);
+    goto fail;
+  }
+  if (! (parray = json_object_get (pmap, "prices")) || ! json_is_array (parray))
+  {
+    GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+                "could not get `prices` array node from pricemap\n");
+    goto fail;
+  }
+  if (0 == json_array_size (parray))
+  {
+    GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "empty pricemap array\n");
+    goto fail;
+  }
+  json_array_foreach (parray, i, pnode)
+  {
+    if (-1 == json_unpack_ex (pnode, &jerr, 0, "F", &cur))
+    {
+      GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+                  "validating pricearray index %d: %s\n", i, jerr.text);
+      goto fail;
+    }
+    if (prev <= cur)
+    {
+      GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+                  "validating pricearray index %d: "
+                  "prices must be strictly monotonically decreasing\n",
+                  i);
+      goto fail;
+    }
+    prev = cur;
+  }
+
+  return;
+
+fail:
+  ret = 1;
+  return;
+}
+
+
+/**
+ * The main function.
+ *
+ * @param argc number of arguments from the command line
+ * @param argv command line arguments
+ * @return 0 ok, 1 on error
+ */
+int
+main (int argc, char *const *argv)
+{
+  struct GNUNET_GETOPT_CommandLineOption options[] = {
+    GNUNET_GETOPT_option_filename ('d',
+                                   "description",
+                                   "FILE",
+                                   gettext_noop (
+                                     "description of the item to be sold"),
+                                   &fndesc),
+
+    GNUNET_GETOPT_option_filename ('p',
+                                   "pricemap",
+                                   "FILE",
+                                   gettext_noop ("mapping of possible prices"),
+                                   &fnprices),
+
+    GNUNET_GETOPT_option_relative_time ('r',
+                                        "roundtime",
+                                        "DURATION",
+                                        gettext_noop ("max duration per round"),
+                                        &dround),
+
+    GNUNET_GETOPT_option_relative_time ('s',
+                                        "regtime",
+                                        "DURATION",
+                                        gettext_noop (
+                                          "duration until auction starts"),
+                                        &dstart),
+    GNUNET_GETOPT_option_uint ('m',
+                               "m",
+                               "NUMBER",
+                               gettext_noop ("number of items to sell\n"
+                                             "0 for first price auction\n"
+                                             ">0 for vickrey/M+1st price auction"),
+                               &m),
+
+    GNUNET_GETOPT_option_flag ('u',
+                               "public",
+                               gettext_noop ("public auction outcome"),
+                               &outcome),
+
+    GNUNET_GETOPT_option_flag ('i',
+                               "interactive",
+                               gettext_noop (
+                                 "keep running in foreground until auction completes"),
+                               &interactive),
+
+    GNUNET_GETOPT_OPTION_END
+  };
+
+  if (GNUNET_OK != GNUNET_STRINGS_get_utf8_args (argc, argv, &argc, &argv))
+    return 2;
+
+  ret = (GNUNET_OK ==
+         GNUNET_PROGRAM_run (argc, argv,
+                             "gnunet-auction-create",
+                             gettext_noop ("create a new auction and "
+                                           "start listening for bidders"),
+                             options,
+                             &run,
+                             NULL)) ? ret : 1;
+  GNUNET_free_nz ((void *) argv);
+  return ret;
+}