1 files changed, 127 insertions, 0 deletions

diff --git a/src/lib/util/test_speedup.c b/src/lib/util/test_speedup.c
new file mode 100644
index 000000000..58d78641b
--- /dev/null
+++ b/src/lib/util/test_speedup.c
@@ -0,0 +1,127 @@
+/*
+     This file is part of GNUnet.
+     Copyright (C) 2011-2013 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 util/test_speedup.c
+ * @brief testcase for speedup.c
+ */
+
+#include "platform.h"
+#include "gnunet_util_lib.h"
+
+/**
+ * Start time of the testcase
+ */
+static struct GNUNET_TIME_Absolute start;
+
+/**
+ * End-time of the testcase (affected by speed-up)
+ */
+static struct GNUNET_TIME_Absolute end;
+
+/**
+ * Number of cycles we have spent in 'run'.
+ */
+static unsigned int cycles;
+
+
+/**
+ * Main task that is scheduled with the speed-up.
+ *
+ * @param cls NULL
+ * @param tc scheduler context, unused
+ */
+static void
+run (void *cls)
+{
+  cycles++;
+  fprintf (stderr, "..%u", cycles);
+  if (cycles <= 5)
+  {
+    GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_SECONDS,
+                                  &run,
+                                  NULL);
+    return;
+  }
+  end = GNUNET_TIME_absolute_get ();
+  fprintf (stderr, "\n");
+  fflush (stdout);
+}
+
+
+/**
+ *
+ */
+static void
+check (void *cls,
+       char *const *args,
+       const char *cfgfile,
+       const struct GNUNET_CONFIGURATION_Handle *cfg)
+{
+  fprintf (stderr, "0");
+  fflush (stdout);
+  GNUNET_SCHEDULER_add_now (&run, NULL);
+}
+
+
+int
+main (int argc, char *argv[])
+{
+  static char *const argvn[] = {
+    "test-speedup",
+    "-c", "test_speedup_data.conf",
+    NULL
+  };
+  static struct GNUNET_GETOPT_CommandLineOption options[] = {
+    GNUNET_GETOPT_OPTION_END
+  };
+  time_t start_real;
+  time_t end_real;
+  struct GNUNET_TIME_Relative delta;
+
+  start_real = time (NULL);
+  start = GNUNET_TIME_absolute_get ();
+  GNUNET_PROGRAM_run ((sizeof(argvn) / sizeof(char *)) - 1, argvn,
+                      "test-speedup",
+                      "nohelp", options, &check, NULL);
+
+  end_real = time (NULL);
+  delta = GNUNET_TIME_absolute_get_difference (start, end);
+
+  if (delta.rel_value_us > ((end_real - start_real) * 1500LL * 1000LL))
+  {
+    GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+                "Execution time in GNUnet time: %s\n",
+                GNUNET_STRINGS_relative_time_to_string (delta, GNUNET_YES));
+    GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+                "Execution time in system time: %llu ms\n",
+                (unsigned long long) ((end_real - start_real) * 1000LL));
+    return 0;
+  }
+  GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+              "Execution time in GNUnet time: %s\n",
+              GNUNET_STRINGS_relative_time_to_string (delta, GNUNET_YES));
+  GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+              "Execution time in system time: %llu ms\n",
+              (unsigned long long) ((end_real - start_real) * 1000LL));
+  return 1;
+}
+
+
+/* end of test_speedup.c */