src/datacache/perf_datacache.c

   1 /*
   2      This file is part of GNUnet.
   3      (C) 2006, 2009, 2010 Christian Grothoff (and other contributing authors)
   4
   5      GNUnet is free software; you can redistribute it and/or modify
   6      it under the terms of the GNU General Public License as published
   7      by the Free Software Foundation; either version 3, or (at your
   8      option) any later version.
   9
  10      GNUnet is distributed in the hope that it will be useful, but
  11      WITHOUT ANY WARRANTY; without even the implied warranty of
  12      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13      General Public License for more details.
  14
  15      You should have received a copy of the GNU General Public License
  16      along with GNUnet; see the file COPYING.  If not, write to the
  17      Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  18      Boston, MA 02111-1307, USA.
  19 */
  20 /*
  21  * @file datacache/perf_datacache.c
  22  * @brief Performance evaluation for the datacache implementations.
  23  * @author Nils Durner
  24  */
  25 #include "platform.h"
  26 #include "gnunet_util_lib.h"
  27 #include "gnunet_datacache_lib.h"
  28 #include <gauger.h>
  29
  30 #define VERBOSE GNUNET_NO
  31
  32 #define ASSERT(x) do { if (! (x)) { printf("Error at %s:%d\n", __FILE__, __LINE__); goto FAILURE;} } while (0)
  33
  34 #define ITERATIONS 10000
  35
  36 static int ok;
  37
  38 static unsigned int found;
  39
  40 /**
  41  * Name of plugin under test.
  42  */
  43 static const char *plugin_name;
  44
  45
  46 static int
  47 checkIt (void *cls, struct GNUNET_TIME_Absolute exp,
  48          const GNUNET_HashCode * key, size_t size, const char *data,
  49          enum GNUNET_BLOCK_Type type)
  50 {
  51   if ((size == sizeof (GNUNET_HashCode)) && (0 == memcmp (data, cls, size)))
  52     found++;
  53   return GNUNET_OK;
  54 }
  55
  56
  57 static void
  58 run (void *cls, char *const *args, const char *cfgfile,
  59      const struct GNUNET_CONFIGURATION_Handle *cfg)
  60 {
  61   struct GNUNET_DATACACHE_Handle *h;
  62   GNUNET_HashCode k;
  63   GNUNET_HashCode n;
  64   struct GNUNET_TIME_Absolute exp;
  65   struct GNUNET_TIME_Absolute start;
  66   unsigned int i;
  67   char gstr[128];
  68
  69   ok = 0;
  70   h = GNUNET_DATACACHE_create (cfg, "perfcache");
  71
  72   if (h == NULL)
  73   {
  74     FPRINTF (stderr, "%s", "Failed to initialize datacache.  Database likely not setup, skipping test.\n");
  75     return;
  76   }
  77   exp = GNUNET_TIME_relative_to_absolute (GNUNET_TIME_UNIT_HOURS);
  78   start = GNUNET_TIME_absolute_get ();
  79   memset (&k, 0, sizeof (GNUNET_HashCode));
  80   for (i = 0; i < ITERATIONS; i++)
  81   {
  82     if (0 == i % (ITERATIONS / 80))
  83       FPRINTF (stderr, "%s",  ".");
  84     GNUNET_CRYPTO_hash (&k, sizeof (GNUNET_HashCode), &n);
  85     ASSERT (GNUNET_OK ==
  86             GNUNET_DATACACHE_put (h, &k, sizeof (GNUNET_HashCode),
  87                                   (const char *) &n, 1 + i % 16, exp));
  88     k = n;
  89   }
  90   FPRINTF (stderr, "%s",  "\n");
  91   FPRINTF (stdout, "Stored %u items in %llums\n", ITERATIONS,
  92            (unsigned long long)
  93            GNUNET_TIME_absolute_get_duration (start).rel_value);
  94   GNUNET_snprintf (gstr, sizeof (gstr), "DATACACHE-%s", plugin_name);
  95   GAUGER (gstr, "Time to PUT item in datacache",
  96           GNUNET_TIME_absolute_get_duration (start).rel_value / ITERATIONS,
  97           "ms/item");
  98   start = GNUNET_TIME_absolute_get ();
  99   memset (&k, 0, sizeof (GNUNET_HashCode));
 100   for (i = 0; i < ITERATIONS; i++)
 101   {
 102     if (0 == i % (ITERATIONS / 80))
 103       FPRINTF (stderr, "%s",  ".");
 104     GNUNET_CRYPTO_hash (&k, sizeof (GNUNET_HashCode), &n);
 105     GNUNET_DATACACHE_get (h, &k, 1 + i % 16, &checkIt, &n);
 106     k = n;
 107   }
 108   FPRINTF (stderr, "%s",  "\n");
 109   FPRINTF (stdout,
 110            "Found %u/%u items in %llums (%u were deleted during storage processing)\n",
 111            found, ITERATIONS,
 112            (unsigned long long)
 113            GNUNET_TIME_absolute_get_duration (start).rel_value,
 114            ITERATIONS - found);
 115   if (found > 0)
 116     GAUGER (gstr, "Time to GET item from datacache",
 117             GNUNET_TIME_absolute_get_duration (start).rel_value / found,
 118             "ms/item");
 119   GNUNET_DATACACHE_destroy (h);
 120   ASSERT (ok == 0);
 121   return;
 122 FAILURE:
 123   if (h != NULL)
 124     GNUNET_DATACACHE_destroy (h);
 125   ok = GNUNET_SYSERR;
 126 }
 127
 128
 129 int
 130 main (int argc, char *argv[])
 131 {
 132   char *pos;
 133   char cfg_name[128];
 134
 135   char *const xargv[] = {
 136     "perf-datacache",
 137     "-c",
 138     cfg_name,
 139 #if VERBOSE
 140     "-L", "DEBUG",
 141 #endif
 142     NULL
 143   };
 144   struct GNUNET_GETOPT_CommandLineOption options[] = {
 145     GNUNET_GETOPT_OPTION_END
 146   };
 147
 148   GNUNET_log_setup ("perf-datacache",
 149 #if VERBOSE
 150                     "DEBUG",
 151 #else
 152                     "WARNING",
 153 #endif
 154                     NULL);
 155   /* determine name of plugin to use */
 156   plugin_name = argv[0];
 157   while (NULL != (pos = strstr (plugin_name, "_")))
 158     plugin_name = pos + 1;
 159   if (NULL != (pos = strstr (plugin_name, ".")))
 160     pos[0] = 0;
 161   else
 162     pos = (char *) plugin_name;
 163
 164   GNUNET_snprintf (cfg_name, sizeof (cfg_name), "perf_datacache_data_%s.conf",
 165                    plugin_name);
 166   if (pos != plugin_name)
 167     pos[0] = '.';
 168   GNUNET_PROGRAM_run ((sizeof (xargv) / sizeof (char *)) - 1, xargv,
 169                       "perf-datacache", "nohelp", options, &run, NULL);
 170   if (ok != 0)
 171     FPRINTF (stderr, "Missed some perfcases: %d\n", ok);
 172   return ok;
 173 }
 174
 175 /* end of perf_datacache.c */