2 This file is part of GNUnet.
3 (C) 2004, 2005, 2006, 2007, 2009 Christian Grothoff (and other contributing authors)
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.
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.
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.
21 * @file datastore/perf_datastore_api.c
22 * @brief performance measurement for the datastore implementation
23 * @author Christian Grothoff
25 * This testcase inserts a bunch of (variable size) data and then
26 * deletes data until the (reported) database size drops below a given
27 * threshold. This is iterated 10 times, with the actual size of the
28 * content stored and the number of operations performed being printed
29 * for each iteration. The code also prints a "I" for every 40 blocks
30 * inserted and a "D" for every 40 blocks deleted. The deletion
31 * strategy uses the "random" iterator. Priorities and expiration
32 * dates are set using a pseudo-random value within a realistic range.
36 #include "gnunet_util_lib.h"
37 #include "gnunet_protocols.h"
38 #include "gnunet_datastore_service.h"
40 #define VERBOSE GNUNET_NO
43 * How long until we give up on transmitting the message?
45 #define TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 15)
47 static const char *plugin_name;
49 static struct GNUNET_DATASTORE_Handle *datastore;
52 * Target datastore size (in bytes).
54 #define MAX_SIZE 1024LL * 1024 * 4
57 * Report progress outside of major reports? Should probably be GNUNET_YES if
60 #define REPORT_ID GNUNET_YES
63 * Number of put operations equivalent to 1/3rd of MAX_SIZE
65 #define PUT_10 MAX_SIZE / 32 / 1024 / 3
68 * Total number of iterations (each iteration doing
69 * PUT_10 put operations); we report full status every
70 * 10 iterations. Abort with CTRL-C.
75 static unsigned long long stored_bytes;
77 static unsigned long long stored_entries;
79 static unsigned long long stored_ops;
81 static struct GNUNET_TIME_Absolute start_time;
96 const struct GNUNET_CONFIGURATION_Handle *cfg;
99 unsigned long long size;
110 run_continuation (void *cls,
111 const struct GNUNET_SCHEDULER_TaskContext *tc);
117 check_success (void *cls,
121 struct CpsRunContext *crc = cls;
122 if (GNUNET_OK != success)
123 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
125 GNUNET_assert (GNUNET_OK == success);
127 fprintf (stderr, "I");
129 stored_bytes += crc->size;
133 if (crc->j == PUT_10)
137 if (crc->i == ITERATIONS)
138 crc->phase = RP_DONE;
142 GNUNET_SCHEDULER_add_continuation (&run_continuation,
144 GNUNET_SCHEDULER_REASON_PREREQ_DONE);
149 * Continuation called to notify client about result of the
153 * @param success GNUNET_SYSERR on failure
154 * @param msg NULL on success, otherwise an error message
157 remove_next(void *cls,
161 struct CpsRunContext *crc = cls;
164 fprintf (stderr, "D");
166 GNUNET_assert (GNUNET_OK == success);
167 GNUNET_SCHEDULER_add_continuation (&run_continuation,
169 GNUNET_SCHEDULER_REASON_PREREQ_DONE);
175 do_delete (void *cls,
176 const struct GNUNET_SCHEDULER_TaskContext *tc)
178 struct CpsRunContext *crc = cls;
180 stored_bytes -= crc->esize;
183 GNUNET_DATASTORE_remove (datastore,
195 delete_value (void *cls,
196 const GNUNET_HashCode * key,
199 enum GNUNET_BLOCK_Type type,
202 struct GNUNET_TIME_Absolute
203 expiration, uint64_t uid)
205 struct CpsRunContext *crc = cls;
209 if (stored_bytes < MAX_SIZE)
211 crc->phase = RP_REPORT;
212 GNUNET_SCHEDULER_add_continuation (&run_continuation,
214 GNUNET_SCHEDULER_REASON_PREREQ_DONE);
217 GNUNET_SCHEDULER_add_with_priority (GNUNET_SCHEDULER_PRIORITY_HIGH,
223 if (stored_bytes < MAX_SIZE)
225 GNUNET_DATASTORE_get_next (datastore, GNUNET_YES);
230 memcpy (crc->data, data, size);
231 GNUNET_DATASTORE_get_next (datastore, GNUNET_YES);
236 run_continuation (void *cls,
237 const struct GNUNET_SCHEDULER_TaskContext *tc)
239 struct CpsRunContext *crc = cls;
241 static GNUNET_HashCode key;
242 static char data[65536];
247 ok = (int) crc->phase;
251 memset (&key, 256 - crc->i, sizeof (GNUNET_HashCode));
254 /* most content is 32k */
256 if (GNUNET_CRYPTO_random_u32 (GNUNET_CRYPTO_QUALITY_WEAK, 16) == 0) /* but some of it is less! */
257 size = GNUNET_CRYPTO_random_u32 (GNUNET_CRYPTO_QUALITY_WEAK, 32 * 1024);
258 crc->size = size = size - (size & 7); /* always multiple of 8 */
259 GNUNET_CRYPTO_hash (&key, sizeof (GNUNET_HashCode), &key);
260 memset (data, i, size);
262 memset (data, i - 255, size / 2);
264 GNUNET_DATASTORE_put (datastore,
270 GNUNET_CRYPTO_random_u32 (GNUNET_CRYPTO_QUALITY_WEAK, 100),
272 GNUNET_TIME_relative_to_absolute
273 (GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS,
274 GNUNET_CRYPTO_random_u32 (GNUNET_CRYPTO_QUALITY_WEAK, 1000))),
280 /* trim down below MAX_SIZE again */
281 GNUNET_DATASTORE_get_random (datastore,
291 "Stored %llu kB / %lluk ops / %llu ops/s\n",
292 stored_bytes / 1024, /* used size in k */
293 stored_ops / 1024, /* total operations (in k) */
294 1000 * stored_ops / (1 + GNUNET_TIME_absolute_get_duration(start_time).rel_value));
297 start = GNUNET_TIME_absolute_get ();
298 GNUNET_SCHEDULER_add_continuation (&run_continuation,
300 GNUNET_SCHEDULER_REASON_PREREQ_DONE);
303 GNUNET_snprintf (gstr, sizeof (gstr),
304 "PUT operations in %s-datastore_op/s",
306 if (crc->i == ITERATIONS)
307 GAUGER (1000 * stored_ops / (1 + GNUNET_TIME_absolute_get_duration(start_time).rel_value),
309 GNUNET_DATASTORE_disconnect (datastore, GNUNET_YES);
321 run_tests (void *cls,
325 struct CpsRunContext *crc = cls;
327 if (success != GNUNET_YES)
330 "Test 'put' operation failed with error `%s' database likely not setup, skipping test.",
335 GNUNET_SCHEDULER_add_continuation (&run_continuation,
337 GNUNET_SCHEDULER_REASON_PREREQ_DONE);
345 const struct GNUNET_CONFIGURATION_Handle *cfg)
347 struct CpsRunContext *crc;
348 static GNUNET_HashCode zkey;
350 datastore = GNUNET_DATASTORE_connect (cfg);
351 start_time = GNUNET_TIME_absolute_get ();
352 crc = GNUNET_malloc(sizeof(struct CpsRunContext));
356 GNUNET_DATASTORE_put (datastore, 0,
358 GNUNET_BLOCK_TYPE_TEST,
359 0, 0, GNUNET_TIME_relative_to_absolute (GNUNET_TIME_UNIT_SECONDS),
360 0, 1, GNUNET_TIME_UNIT_MINUTES,
364 "Test 'put' operation failed.\n");
374 struct GNUNET_OS_Process *proc;
376 char *const argv[] = {
377 "perf-datastore-api",
385 struct GNUNET_GETOPT_CommandLineOption options[] = {
386 GNUNET_GETOPT_OPTION_END
389 GNUNET_snprintf (cfg_name,
391 "test_datastore_api_data_%s.conf",
393 proc = GNUNET_OS_start_process (NULL, NULL, "gnunet-service-arm",
394 "gnunet-service-arm",
398 "-c", cfg_name, NULL);
399 GNUNET_assert (NULL != proc);
400 GNUNET_PROGRAM_run ((sizeof (argv) / sizeof (char *)) - 1,
401 argv, "perf-datastore-api", "nohelp",
402 options, &run, NULL);
403 if (0 != GNUNET_OS_process_kill (proc, SIGTERM))
405 GNUNET_log_strerror (GNUNET_ERROR_TYPE_WARNING, "kill");
408 GNUNET_OS_process_wait (proc);
409 GNUNET_OS_process_close (proc);
416 main (int argc, char *argv[])
422 /* determine name of plugin to use */
423 plugin_name = argv[0];
424 while (NULL != (pos = strstr(plugin_name, "_")))
426 if (NULL != (pos = strstr(plugin_name, ".")))
429 pos = (char *) plugin_name;
431 GNUNET_snprintf (dir_name,
433 "/tmp/test-gnunet-datastore-%s",
435 GNUNET_DISK_directory_remove (dir_name);
436 GNUNET_log_setup ("perf-datastore-api",
444 if (pos != plugin_name)
447 fprintf (stderr, "\n");
449 GNUNET_DISK_directory_remove (dir_name);
453 /* end of perf_datastore_api.c */