report skipped tests, doxygen fixes
[oweals/gnunet.git] / src / datacache / perf_datacache.c
1 /*
2      This file is part of GNUnet.
3      Copyright (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., 51 Franklin Street, Fifth Floor,
18      Boston, MA 02110-1301, 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 "gnunet_testing_lib.h"
29 #include <gauger.h>
30
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,
48          const struct GNUNET_HashCode * key, size_t size, const char *data,
49          enum GNUNET_BLOCK_Type type,
50          struct GNUNET_TIME_Absolute exp,
51          unsigned int path_len,
52          const struct GNUNET_PeerIdentity *path)
53 {
54   if ((size == sizeof (struct GNUNET_HashCode)) && (0 == memcmp (data, cls, size)))
55     found++;
56   return GNUNET_OK;
57 }
58
59
60 static void
61 run (void *cls, char *const *args, const char *cfgfile,
62      const struct GNUNET_CONFIGURATION_Handle *cfg)
63 {
64   struct GNUNET_DATACACHE_Handle *h;
65   struct GNUNET_HashCode k;
66   struct GNUNET_HashCode n;
67   struct GNUNET_TIME_Absolute exp;
68   struct GNUNET_TIME_Absolute start;
69   unsigned int i;
70   char gstr[128];
71
72   ok = 0;
73   h = GNUNET_DATACACHE_create (cfg, "perfcache");
74
75   if (h == NULL)
76   {
77     FPRINTF (stderr, "%s", "Failed to initialize datacache.  Database likely not setup, skipping test.\n");
78     ok = 77; /* mark test as skipped */
79     return;
80   }
81   exp = GNUNET_TIME_relative_to_absolute (GNUNET_TIME_UNIT_HOURS);
82   start = GNUNET_TIME_absolute_get ();
83   memset (&k, 0, sizeof (struct GNUNET_HashCode));
84   for (i = 0; i < ITERATIONS; i++)
85   {
86     if (0 == i % (ITERATIONS / 80))
87       FPRINTF (stderr, "%s",  ".");
88     GNUNET_CRYPTO_hash (&k, sizeof (struct GNUNET_HashCode), &n);
89     ASSERT (GNUNET_OK ==
90             GNUNET_DATACACHE_put (h, &k, sizeof (struct GNUNET_HashCode),
91                                   (const char *) &n, 1 + i % 16, exp,
92                                   0, NULL));
93     k = n;
94   }
95   FPRINTF (stderr, "%s",  "\n");
96   FPRINTF (stdout, "Stored %u items in %s\n", ITERATIONS,
97            GNUNET_STRINGS_relative_time_to_string (GNUNET_TIME_absolute_get_duration (start), GNUNET_YES));
98   GNUNET_snprintf (gstr, sizeof (gstr), "DATACACHE-%s", plugin_name);
99   GAUGER (gstr, "Time to PUT item in datacache",
100           GNUNET_TIME_absolute_get_duration (start).rel_value_us / 1000LL / ITERATIONS,
101           "ms/item");
102   start = GNUNET_TIME_absolute_get ();
103   memset (&k, 0, sizeof (struct GNUNET_HashCode));
104   for (i = 0; i < ITERATIONS; i++)
105   {
106     if (0 == i % (ITERATIONS / 80))
107       FPRINTF (stderr, "%s",  ".");
108     GNUNET_CRYPTO_hash (&k, sizeof (struct GNUNET_HashCode), &n);
109     GNUNET_DATACACHE_get (h, &k, 1 + i % 16, &checkIt, &n);
110     k = n;
111   }
112   FPRINTF (stderr, "%s",  "\n");
113   FPRINTF (stdout,
114            "Found %u/%u items in %s (%u were deleted during storage processing)\n",
115            found, ITERATIONS,
116            GNUNET_STRINGS_relative_time_to_string (GNUNET_TIME_absolute_get_duration (start), GNUNET_YES),
117            ITERATIONS - found);
118   if (found > 0)
119     GAUGER (gstr, "Time to GET item from datacache",
120             GNUNET_TIME_absolute_get_duration (start).rel_value_us / 1000LL / found,
121             "ms/item");
122   GNUNET_DATACACHE_destroy (h);
123   ASSERT (ok == 0);
124   return;
125 FAILURE:
126   if (h != NULL)
127     GNUNET_DATACACHE_destroy (h);
128   ok = GNUNET_SYSERR;
129 }
130
131
132 int
133 main (int argc, char *argv[])
134 {
135   char cfg_name[128];
136   char *const xargv[] = {
137     "perf-datacache",
138     "-c",
139     cfg_name,
140     NULL
141   };
142   struct GNUNET_GETOPT_CommandLineOption options[] = {
143     GNUNET_GETOPT_OPTION_END
144   };
145
146   GNUNET_log_setup ("perf-datacache",
147                     "WARNING",
148                     NULL);
149   plugin_name = GNUNET_TESTING_get_testname_from_underscore (argv[0]);
150   GNUNET_snprintf (cfg_name, sizeof (cfg_name), "perf_datacache_data_%s.conf",
151                    plugin_name);
152   GNUNET_PROGRAM_run ((sizeof (xargv) / sizeof (char *)) - 1, xargv,
153                       "perf-datacache", "nohelp", options, &run, NULL);
154   if ( (0 != ok) && (77 != ok) )
155     FPRINTF (stderr, "Missed some perfcases: %d\n", ok);
156   return ok;
157 }
158
159 /* end of perf_datacache.c */