/*
This file is part of GNUnet.
- (C) 2004, 2005, 2006, 2007, 2009, 2011 Christian Grothoff (and other contributing authors)
+ Copyright (C) 2004, 2005, 2006, 2007, 2009, 2011 GNUnet e.V.
GNUnet is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published
You should have received a copy of the GNU General Public License
along with GNUnet; see the file COPYING. If not, write to the
- Free Software Foundation, Inc., 59 Temple Place - Suite 330,
- Boston, MA 02111-1307, USA.
+ Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+ Boston, MA 02110-1301, USA.
*/
/*
* @file perf_plugin_datastore.c
#include "gnunet_util_lib.h"
#include "gnunet_protocols.h"
#include "gnunet_datastore_plugin.h"
+#include "gnunet_testing_lib.h"
#include <gauger.h>
-#define VERBOSE GNUNET_NO
-
/**
* Target datastore size (in bytes). Realistic sizes are
* more like 16 GB (not the default of 16 MB); however,
* change in their disk utilization.
*
* @param cls closure (NULL)
- * @param delta change in disk utilization,
+ * @param delta change in disk utilization,
* 0 for "reset to empty"
*/
static void
static void
-putValue (struct GNUNET_DATASTORE_PluginFunctions *api, int i, int k)
+test (void *cls);
+
+
+/**
+ * Put continuation.
+ *
+ * @param cls closure
+ * @param key key for the item stored
+ * @param size size of the item stored
+ * @param status #GNUNET_OK or #GNUNET_SYSERROR
+ * @param msg error message on error
+ */
+static void
+put_continuation (void *cls,
+ const struct GNUNET_HashCode *key,
+ uint32_t size,
+ int status,
+ const char *msg)
+{
+ struct CpsRunContext *crc = cls;
+
+ if (GNUNET_OK != status)
+ {
+ FPRINTF (stderr, "ERROR: `%s'\n", msg);
+ }
+ else
+ {
+ stored_bytes += size;
+ stored_ops++;
+ stored_entries++;
+ }
+ GNUNET_SCHEDULER_add_now (&test, crc);
+}
+
+
+static void
+do_put (struct CpsRunContext *crc)
{
char value[65536];
size_t size;
- static GNUNET_HashCode key;
- static int ic;
- char *msg;
+ static struct GNUNET_HashCode key;
+ static int i;
unsigned int prio;
+ if (0 == i)
+ crc->start = GNUNET_TIME_absolute_get ();
+ if (PUT_10 == i)
+ {
+ i = 0;
+ crc->end = GNUNET_TIME_absolute_get ();
+ {
+ printf ("%s took %s for %llu items\n", "Storing an item",
+ GNUNET_STRINGS_relative_time_to_string (GNUNET_TIME_absolute_get_difference (crc->start,
+ crc->end),
+ GNUNET_YES),
+ PUT_10);
+ if (PUT_10 > 0)
+ GAUGER (category, "Storing an item",
+ (crc->end.abs_value_us - crc->start.abs_value_us) / 1000LL / PUT_10,
+ "ms/item");
+ }
+ crc->i++;
+ crc->start = GNUNET_TIME_absolute_get ();
+ crc->phase++;
+ GNUNET_SCHEDULER_add_now (&test, crc);
+ return;
+ }
/* most content is 32k */
size = 32 * 1024;
if (GNUNET_CRYPTO_random_u32 (GNUNET_CRYPTO_QUALITY_WEAK, 16) == 0) /* but some of it is less! */
size = size - (size & 7); /* always multiple of 8 */
/* generate random key */
- key.bits[0] = (unsigned int) GNUNET_TIME_absolute_get ().abs_value;
- GNUNET_CRYPTO_hash (&key, sizeof (GNUNET_HashCode), &key);
+ key.bits[0] = (unsigned int) GNUNET_TIME_absolute_get ().abs_value_us;
+ GNUNET_CRYPTO_hash (&key, sizeof (struct GNUNET_HashCode), &key);
memset (value, i, size);
if (i > 255)
memset (value, i - 255, size / 2);
- value[0] = k;
- memcpy (&value[4], &i, sizeof (i));
- msg = NULL;
+ value[0] = crc->i;
+ GNUNET_memcpy (&value[4], &i, sizeof (i));
prio = GNUNET_CRYPTO_random_u32 (GNUNET_CRYPTO_QUALITY_WEAK, 100);
- if (GNUNET_OK != api->put (api->cls, &key, size, value, 1 + i % 4 /* type */ ,
- prio, i % 4 /* anonymity */ ,
- 0 /* replication */ ,
- GNUNET_TIME_relative_to_absolute
- (GNUNET_TIME_relative_multiply
- (GNUNET_TIME_UNIT_MILLISECONDS,
- 60 * 60 * 60 * 1000 +
- GNUNET_CRYPTO_random_u32
- (GNUNET_CRYPTO_QUALITY_WEAK, 1000))), &msg))
- {
- fprintf (stderr, "ERROR: `%s'\n", msg);
- GNUNET_free_non_null (msg);
- return;
- }
- ic++;
- stored_bytes += size;
- stored_ops++;
- stored_entries++;
+ crc->api->put (crc->api->cls,
+ &key,
+ false /* absent */,
+ size,
+ value,
+ 1 + i % 4 /* type */ ,
+ prio,
+ i % 4 /* anonymity */ ,
+ 0 /* replication */ ,
+ GNUNET_TIME_relative_to_absolute
+ (GNUNET_TIME_relative_multiply
+ (GNUNET_TIME_UNIT_MILLISECONDS,
+ 60 * 60 * 60 * 1000 +
+ GNUNET_CRYPTO_random_u32
+ (GNUNET_CRYPTO_QUALITY_WEAK, 1000))),
+ put_continuation,
+ crc);
+ i++;
}
-static void test (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc);
-
static int
iterate_zeros (void *cls,
- const GNUNET_HashCode * key,
+ const struct GNUNET_HashCode *key,
uint32_t size,
const void *data,
enum GNUNET_BLOCK_Type type,
uint32_t priority,
uint32_t anonymity,
- struct GNUNET_TIME_Absolute expiration, uint64_t uid)
+ uint32_t replication,
+ struct GNUNET_TIME_Absolute expiration,
+ uint64_t uid)
{
struct CpsRunContext *crc = cls;
int i;
GNUNET_assert (key != NULL);
GNUNET_assert (size >= 8);
- memcpy (&i, &cdata[4], sizeof (i));
+ GNUNET_memcpy (&i, &cdata[4], sizeof (i));
hits[i / 8] |= (1 << (i % 8));
-#if VERBOSE
- fprintf (stderr, "Found result type=%u, priority=%u, size=%u, expire=%llu\n",
- type, priority, size, (unsigned long long) expiration.abs_value);
-#endif
+ GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+ "Found result %d type=%u, priority=%u, size=%u, expire=%s\n",
+ i,
+ type, priority, size,
+ GNUNET_STRINGS_absolute_time_to_string (expiration));
crc->cnt++;
if (crc->cnt == PUT_10 / 4 - 1)
{
bc++;
crc->end = GNUNET_TIME_absolute_get ();
- printf ("%s took %llu ms yielding %u/%u items\n",
+ printf ("%s took %s yielding %u/%u items\n",
"Select random zero-anonymity item",
- (unsigned long long) (crc->end.abs_value - crc->start.abs_value),
+ GNUNET_STRINGS_relative_time_to_string (GNUNET_TIME_absolute_get_difference (crc->start,
+ crc->end),
+ GNUNET_YES),
bc, crc->cnt);
if (crc->cnt > 0)
- GAUGER (category,
- "Select random zero-anonymity item",
- (crc->end.abs_value - crc->start.abs_value) / crc->cnt,
+ GAUGER (category, "Select random zero-anonymity item",
+ (crc->end.abs_value_us - crc->start.abs_value_us) / 1000LL / crc->cnt,
"ms/item");
memset (hits, 0, sizeof (hits));
crc->phase++;
static int
expiration_get (void *cls,
- const GNUNET_HashCode * key,
+ const struct GNUNET_HashCode *key,
uint32_t size,
const void *data,
enum GNUNET_BLOCK_Type type,
uint32_t priority,
uint32_t anonymity,
- struct GNUNET_TIME_Absolute expiration, uint64_t uid)
+ uint32_t replication,
+ struct GNUNET_TIME_Absolute expiration,
+ uint64_t uid)
{
struct CpsRunContext *crc = cls;
int i;
const char *cdata = data;
GNUNET_assert (size >= 8);
- memcpy (&i, &cdata[4], sizeof (i));
+ GNUNET_memcpy (&i, &cdata[4], sizeof (i));
hits[i / 8] |= (1 << (i % 8));
crc->cnt++;
if (PUT_10 <= crc->cnt)
bc++;
crc->end = GNUNET_TIME_absolute_get ();
- printf ("%s took %llu ms yielding %u/%u items\n",
+ printf ("%s took %s yielding %u/%u items\n",
"Selecting and deleting by expiration",
- (unsigned long long) (crc->end.abs_value - crc->start.abs_value),
+ GNUNET_STRINGS_relative_time_to_string (GNUNET_TIME_absolute_get_difference (crc->start,
+ crc->end),
+ GNUNET_YES),
bc, (unsigned int) PUT_10);
if (crc->cnt > 0)
- GAUGER (category,
- "Selecting and deleting by expiration",
- (crc->end.abs_value - crc->start.abs_value) / crc->cnt,
+ GAUGER (category, "Selecting and deleting by expiration",
+ (crc->end.abs_value_us - crc->start.abs_value_us) / 1000LL / crc->cnt,
"ms/item");
memset (hits, 0, sizeof (hits));
if (++crc->iter == ITERATIONS)
static int
replication_get (void *cls,
- const GNUNET_HashCode * key,
+ const struct GNUNET_HashCode *key,
uint32_t size,
const void *data,
enum GNUNET_BLOCK_Type type,
uint32_t priority,
uint32_t anonymity,
- struct GNUNET_TIME_Absolute expiration, uint64_t uid)
+ uint32_t replication,
+ struct GNUNET_TIME_Absolute expiration,
+ uint64_t uid)
{
struct CpsRunContext *crc = cls;
int i;
GNUNET_assert (NULL != key);
GNUNET_assert (size >= 8);
- memcpy (&i, &cdata[4], sizeof (i));
+ GNUNET_memcpy (&i, &cdata[4], sizeof (i));
hits[i / 8] |= (1 << (i % 8));
crc->cnt++;
if (PUT_10 <= crc->cnt)
bc++;
crc->end = GNUNET_TIME_absolute_get ();
- printf ("%s took %llu ms yielding %u/%u items\n",
+ printf ("%s took %s yielding %u/%u items\n",
"Selecting random item for replication",
- (unsigned long long) (crc->end.abs_value - crc->start.abs_value),
+ GNUNET_STRINGS_relative_time_to_string (GNUNET_TIME_absolute_get_difference (crc->start,
+ crc->end),
+ GNUNET_YES),
bc, (unsigned int) PUT_10);
if (crc->cnt > 0)
- GAUGER (category,
- "Selecting random item for replication",
- (crc->end.abs_value - crc->start.abs_value) / crc->cnt,
+ GAUGER (category, "Selecting random item for replication",
+ (crc->end.abs_value_us - crc->start.abs_value_us) / 1000LL / crc->cnt,
"ms/item");
memset (hits, 0, sizeof (hits));
crc->phase++;
char *libname;
if (GNUNET_OK !=
- GNUNET_CONFIGURATION_get_value_string (cfg,
- "DATASTORE", "DATABASE", &name))
+ GNUNET_CONFIGURATION_get_value_string (cfg, "DATASTORE", "DATABASE",
+ &name))
{
GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
- _("No `%s' specified for `%s' in configuration!\n"),
- "DATABASE", "DATASTORE");
+ _("No `%s' specified for `%s' in configuration!\n"), "DATABASE",
+ "DATASTORE");
return;
}
GNUNET_asprintf (&libname, "libgnunet_plugin_datastore_%s", name);
* the transport and core.
*/
static void
-cleaning_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
+cleaning_task (void *cls)
{
struct CpsRunContext *crc = cls;
static void
-test (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
+test (void *cls)
{
struct CpsRunContext *crc = cls;
- int j;
- if (0 != (tc->reason & GNUNET_SCHEDULER_REASON_SHUTDOWN))
- {
- GNUNET_break (0);
- crc->phase = RP_ERROR;
- }
-#if VERBOSE
- fprintf (stderr, "In phase %d, iteration %u\n", crc->phase, crc->cnt);
-#endif
+ GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+ "In phase %d, iteration %u\n", crc->phase, crc->cnt);
switch (crc->phase)
{
case RP_ERROR:
&cleaning_task, crc);
break;
case RP_PUT:
- crc->start = GNUNET_TIME_absolute_get ();
- for (j = 0; j < PUT_10; j++)
- putValue (crc->api, j, crc->i);
- crc->end = GNUNET_TIME_absolute_get ();
- {
- printf ("%s took %llu ms for %llu items\n",
- "Storing an item",
- (unsigned long long) (crc->end.abs_value - crc->start.abs_value),
- PUT_10);
- if (PUT_10 > 0)
- GAUGER (category,
- "Storing an item",
- (crc->end.abs_value - crc->start.abs_value) / PUT_10,
- "ms/item");
- }
- crc->i++;
- crc->start = GNUNET_TIME_absolute_get ();
- crc->phase++;
- GNUNET_SCHEDULER_add_now (&test, crc);
+ do_put (crc);
break;
case RP_REP_GET:
crc->api->get_replication (crc->api->cls, &replication_get, crc);
break;
case RP_ZA_GET:
- crc->api->get_zero_anonymity (crc->api->cls,
- crc->offset++, 1, &iterate_zeros, crc);
+ crc->api->get_zero_anonymity (crc->api->cls, crc->offset++, 1,
+ &iterate_zeros, crc);
break;
case RP_EXP_GET:
crc->api->get_expiration (crc->api->cls, &expiration_get, crc);
char *libname;
if (GNUNET_OK !=
- GNUNET_CONFIGURATION_get_value_string (cfg,
- "DATASTORE", "DATABASE", &name))
+ GNUNET_CONFIGURATION_get_value_string (cfg, "DATASTORE", "DATABASE",
+ &name))
{
GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
- _("No `%s' specified for `%s' in configuration!\n"),
- "DATABASE", "DATASTORE");
+ _("No `%s' specified for `%s' in configuration!\n"), "DATABASE",
+ "DATASTORE");
return NULL;
}
env.cfg = cfg;
env.duc = &disk_utilization_change_cb;
env.cls = NULL;
- GNUNET_log (GNUNET_ERROR_TYPE_INFO,
- _("Loading `%s' datastore plugin\n"), name);
+ GNUNET_log (GNUNET_ERROR_TYPE_INFO, _("Loading `%s' datastore plugin\n"),
+ name);
GNUNET_asprintf (&libname, "libgnunet_plugin_datastore_%s", name);
if (NULL == (ret = GNUNET_PLUGIN_load (libname, &env)))
{
- fprintf (stderr, "Failed to load plugin `%s'!\n", name);
+ FPRINTF (stderr, "Failed to load plugin `%s'!\n", name);
+ GNUNET_free (name);
+ GNUNET_free (libname);
return NULL;
}
GNUNET_free (libname);
static void
-run (void *cls,
- char *const *args,
- const char *cfgfile, const struct GNUNET_CONFIGURATION_Handle *c)
+run (void *cls, char *const *args, const char *cfgfile,
+ const struct GNUNET_CONFIGURATION_Handle *c)
{
struct GNUNET_DATASTORE_PluginFunctions *api;
struct CpsRunContext *crc;
+ if (NULL == c)
+ {
+ GNUNET_break (0);
+ return;
+ }
api = load_plugin (c);
if (api == NULL)
{
- fprintf (stderr,
- "Could not initialize plugin, assuming database not configured. Test not run!\n");
+ FPRINTF (stderr,
+ "%s", "Could not initialize plugin, assuming database not configured. Test not run!\n");
return;
}
- crc = GNUNET_malloc (sizeof (struct CpsRunContext));
+ crc = GNUNET_new (struct CpsRunContext);
crc->api = api;
crc->cfg = c;
crc->phase = RP_PUT;
}
-static int
-check ()
+int
+main (int argc, char *argv[])
{
+ char dir_name[128];
char cfg_name[128];
-
- char *const argv[] = {
+ char *const xargv[] = {
"perf-plugin-datastore",
"-c",
cfg_name,
-#if VERBOSE
- "-L", "DEBUG",
-#endif
NULL
};
struct GNUNET_GETOPT_CommandLineOption options[] = {
GNUNET_GETOPT_OPTION_END
};
- GNUNET_snprintf (category, sizeof (category), "DATASTORE-%s", plugin_name);
- GNUNET_snprintf (cfg_name,
- sizeof (cfg_name),
- "perf_plugin_datastore_data_%s.conf", plugin_name);
- GNUNET_PROGRAM_run ((sizeof (argv) / sizeof (char *)) - 1,
- argv, "perf-plugin-datastore", "nohelp",
- options, &run, NULL);
- if (ok != 0)
- fprintf (stderr, "Missed some testcases: %u\n", ok);
- return ok;
-}
-
-
-int
-main (int argc, char *argv[])
-{
- int ret;
- char *pos;
- char dir_name[128];
-
- sleep (1);
- /* determine name of plugin to use */
- plugin_name = argv[0];
- while (NULL != (pos = strstr (plugin_name, "_")))
- plugin_name = pos + 1;
- if (NULL != (pos = strstr (plugin_name, ".")))
- pos[0] = 0;
- else
- pos = (char *) plugin_name;
-
- GNUNET_snprintf (dir_name,
- sizeof (dir_name),
- "/tmp/perf-gnunet-datastore-%s", plugin_name);
+ plugin_name = GNUNET_TESTING_get_testname_from_underscore (argv[0]);
+ GNUNET_snprintf (dir_name, sizeof (dir_name), "/tmp/perf-gnunet-datastore-%s",
+ plugin_name);
GNUNET_DISK_directory_remove (dir_name);
GNUNET_log_setup ("perf-plugin-datastore",
-#if VERBOSE
- "DEBUG",
-#else
"WARNING",
-#endif
NULL);
- ret = check ();
- if (pos != plugin_name)
- pos[0] = '.';
+ GNUNET_snprintf (category, sizeof (category), "DATASTORE-%s", plugin_name);
+ GNUNET_snprintf (cfg_name, sizeof (cfg_name),
+ "perf_plugin_datastore_data_%s.conf", plugin_name);
+ GNUNET_PROGRAM_run ((sizeof (xargv) / sizeof (char *)) - 1, xargv,
+ "perf-plugin-datastore", "nohelp", options, &run, NULL);
+ if (ok != 0)
+ FPRINTF (stderr, "Missed some testcases: %u\n", ok);
GNUNET_DISK_directory_remove (dir_name);
- return ret;
+ return ok;
}
/* end of perf_plugin_datastore.c */
projects / oweals / gnunet.git / blobdiff