aboutsummaryrefslogtreecommitdiff
path: root/src/dht/test_dht_topo.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/dht/test_dht_topo.c')
-rw-r--r--src/dht/test_dht_topo.c532
1 files changed, 0 insertions, 532 deletions
diff --git a/src/dht/test_dht_topo.c b/src/dht/test_dht_topo.c
deleted file mode 100644
index 7f737ea03..000000000
--- a/src/dht/test_dht_topo.c
+++ /dev/null
@@ -1,532 +0,0 @@
1/*
2 This file is part of GNUnet.
3 Copyright (C) 2012, 2016 GNUnet e.V.
4
5 GNUnet is free software: you can redistribute it and/or modify it
6 under the terms of the GNU Affero General Public License as published
7 by the Free Software Foundation, either version 3 of the License,
8 or (at your 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 Affero General Public License for more details.
14
15 You should have received a copy of the GNU Affero General Public License
16 along with this program. If not, see <http://www.gnu.org/licenses/>.
17
18 SPDX-License-Identifier: AGPL3.0-or-later
19 */
20/**
21 * @file dht/test_dht_topo.c
22 * @author Christian Grothoff
23 * @brief Test for the dht service: store and retrieve in various topologies.
24 * Each peer stores a value from the DHT and then each peer tries to get each
25 * value from each other peer.
26 */
27#include "platform.h"
28#include "gnunet_util_lib.h"
29#include "gnunet_dht_service.h"
30#include "dht_test_lib.h"
31
32/**
33 * How long until we give up on fetching the data?
34 */
35#define GET_TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, \
36 120)
37
38/**
39 * How frequently do we execute the PUTs?
40 */
41#define PUT_FREQUENCY GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, \
42 5)
43
44
45/**
46 * Information we keep for each GET operation.
47 */
48struct GetOperation
49{
50 /**
51 * DLL.
52 */
53 struct GetOperation *next;
54
55 /**
56 * DLL.
57 */
58 struct GetOperation *prev;
59
60 /**
61 * Handle for the operation.
62 */
63 struct GNUNET_DHT_GetHandle *get;
64};
65
66
67/**
68 * Result of the test.
69 */
70static int ok = 1;
71
72/**
73 * Task to do DHT_puts
74 */
75static struct GNUNET_SCHEDULER_Task *put_task;
76
77/**
78 * Task to do DHT_gets
79 */
80static struct GNUNET_SCHEDULER_Task *get_task;
81
82/**
83 * Task to time out / regular shutdown.
84 */
85static struct GNUNET_SCHEDULER_Task *timeout_task;
86
87/**
88 * Head of list of active GET operations.
89 */
90static struct GetOperation *get_head;
91
92/**
93 * Tail of list of active GET operations.
94 */
95static struct GetOperation *get_tail;
96
97/**
98 * Array of the testbed's peers.
99 */
100static struct GNUNET_TESTBED_Peer **my_peers;
101
102/**
103 * Number of peers to run.
104 */
105static unsigned int NUM_PEERS;
106
107
108/**
109 * Statistics we print out.
110 */
111static struct
112{
113 const char *subsystem;
114 const char *name;
115 unsigned long long total;
116} stats[] = {
117 { "core", "# bytes decrypted", 0 },
118 { "core", "# bytes encrypted", 0 },
119 { "core", "# type maps received", 0 },
120 { "core", "# session keys confirmed via PONG", 0 },
121 { "core", "# peers connected", 0 },
122 { "core", "# key exchanges initiated", 0 },
123 { "core", "# send requests dropped (disconnected)", 0 },
124 { "core", "# transmissions delayed due to corking", 0 },
125 { "core", "# messages discarded (expired prior to transmission)", 0 },
126 { "core", "# messages discarded (disconnected)", 0 },
127 { "core", "# discarded CORE_SEND requests", 0 },
128 { "core", "# discarded lower priority CORE_SEND requests", 0 },
129 { "transport", "# bytes received via TCP", 0 },
130 { "transport", "# bytes transmitted via TCP", 0 },
131 { "dht", "# PUT messages queued for transmission", 0 },
132 { "dht", "# P2P PUT requests received", 0 },
133 { "dht", "# GET messages queued for transmission", 0 },
134 { "dht", "# P2P GET requests received", 0 },
135 { "dht", "# RESULT messages queued for transmission", 0 },
136 { "dht", "# P2P RESULTS received", 0 },
137 { "dht", "# Queued messages discarded (peer disconnected)", 0 },
138 { "dht", "# Peers excluded from routing due to Bloomfilter", 0 },
139 { "dht", "# Peer selection failed", 0 },
140 { "dht", "# FIND PEER requests ignored due to Bloomfilter", 0 },
141 { "dht", "# FIND PEER requests ignored due to lack of HELLO", 0 },
142 { "dht", "# P2P FIND PEER requests processed", 0 },
143 { "dht", "# P2P GET requests ONLY routed", 0 },
144 { "dht", "# Preference updates given to core", 0 },
145 { "dht", "# REPLIES ignored for CLIENTS (no match)", 0 },
146 { "dht", "# GET requests from clients injected", 0 },
147 { "dht", "# GET requests received from clients", 0 },
148 { "dht", "# GET STOP requests received from clients", 0 },
149 { "dht", "# ITEMS stored in datacache", 0 },
150 { "dht", "# Good RESULTS found in datacache", 0 },
151 { "dht", "# GET requests given to datacache", 0 },
152 { NULL, NULL, 0 }
153};
154
155
156static struct GNUNET_DHT_TEST_Context *
157stop_ops ()
158{
159 struct GetOperation *get_op;
160 struct GNUNET_DHT_TEST_Context *ctx = NULL;
161
162 if (NULL != timeout_task)
163 {
164 ctx = GNUNET_SCHEDULER_cancel (timeout_task);
165 timeout_task = NULL;
166 }
167 if (NULL != put_task)
168 {
169 GNUNET_SCHEDULER_cancel (put_task);
170 put_task = NULL;
171 }
172 if (NULL != get_task)
173 {
174 GNUNET_SCHEDULER_cancel (get_task);
175 get_task = NULL;
176 }
177 while (NULL != (get_op = get_tail))
178 {
179 GNUNET_DHT_get_stop (get_op->get);
180 GNUNET_CONTAINER_DLL_remove (get_head,
181 get_tail,
182 get_op);
183 GNUNET_free (get_op);
184 }
185 return ctx;
186}
187
188
189/**
190 * Function called once we're done processing stats.
191 *
192 * @param cls the test context
193 * @param op the stats operation
194 * @param emsg error message on failure
195 */
196static void
197stats_finished (void *cls,
198 struct GNUNET_TESTBED_Operation *op,
199 const char *emsg)
200{
201 struct GNUNET_DHT_TEST_Context *ctx = cls;
202 unsigned int i;
203
204 if (NULL != op)
205 GNUNET_TESTBED_operation_done (op);
206 if (NULL != emsg)
207 {
208 fprintf (stderr,
209 _ ("Gathering statistics failed: %s\n"),
210 emsg);
211 GNUNET_SCHEDULER_cancel (put_task);
212 GNUNET_DHT_TEST_cleanup (ctx);
213 return;
214 }
215 for (i = 0; NULL != stats[i].name; i++)
216 fprintf (stderr,
217 "%6s/%60s = %12llu\n",
218 stats[i].subsystem,
219 stats[i].name,
220 stats[i].total);
221 GNUNET_DHT_TEST_cleanup (ctx);
222 GNUNET_SCHEDULER_shutdown ();
223}
224
225
226/**
227 * Function called to process statistic values from all peers.
228 *
229 * @param cls closure
230 * @param peer the peer the statistic belong to
231 * @param subsystem name of subsystem that created the statistic
232 * @param name the name of the datum
233 * @param value the current value
234 * @param is_persistent #GNUNET_YES if the value is persistent, #GNUNET_NO if not
235 * @return #GNUNET_OK to continue, #GNUNET_SYSERR to abort iteration
236 */
237static int
238handle_stats (void *cls,
239 const struct GNUNET_TESTBED_Peer *peer,
240 const char *subsystem,
241 const char *name,
242 uint64_t value,
243 int is_persistent)
244{
245 unsigned int i;
246
247 for (i = 0; NULL != stats[i].name; i++)
248 if ((0 == strcasecmp (subsystem,
249 stats[i].subsystem)) &&
250 (0 == strcasecmp (name,
251 stats[i].name)))
252 stats[i].total += value;
253 return GNUNET_OK;
254}
255
256
257/**
258 * Task run on shutdown to clean up. Terminates active get operations
259 * and shuts down the testbed.
260 *
261 * @param cls the 'struct GNUNET_DHT_TestContext'
262 */
263static void
264shutdown_task (void *cls)
265{
266 (void) stop_ops ();
267}
268
269
270/**
271 * Task run on timeout to clean up. Terminates active get operations
272 * and shuts down the testbed.
273 *
274 * @param cls the `struct GNUNET_DHT_TestContext`
275 */
276static void
277timeout_cb (void *cls)
278{
279 timeout_task = NULL;
280 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
281 "Timeout\n");
282 GNUNET_SCHEDULER_shutdown ();
283}
284
285
286/**
287 * Iterator called on each result obtained for a DHT
288 * operation that expects a reply
289 *
290 * @param cls closure with our 'struct GetOperation'
291 * @param exp when will this value expire
292 * @param key key of the result
293 * @param get_path peers on reply path (or NULL if not recorded)
294 * @param get_path_length number of entries in @a get_path
295 * @param put_path peers on the PUT path (or NULL if not recorded)
296 * @param put_path_length number of entries in @a put_path
297 * @param type type of the result
298 * @param size number of bytes in @a data
299 * @param data pointer to the result data
300 */
301static void
302dht_get_handler (void *cls,
303 struct GNUNET_TIME_Absolute exp,
304 const struct GNUNET_HashCode *key,
305 const struct GNUNET_PeerIdentity *get_path,
306 unsigned int get_path_length,
307 const struct GNUNET_PeerIdentity *put_path,
308 unsigned int put_path_length,
309 enum GNUNET_BLOCK_Type type,
310 size_t size,
311 const void *data)
312{
313 struct GetOperation *get_op = cls;
314 struct GNUNET_HashCode want;
315 struct GNUNET_DHT_TEST_Context *ctx;
316
317 if (sizeof(struct GNUNET_HashCode) != size)
318 {
319 GNUNET_break (0);
320 return;
321 }
322 GNUNET_CRYPTO_hash (key,
323 sizeof(*key),
324 &want);
325 if (0 != memcmp (&want,
326 data,
327 sizeof(want)))
328 {
329 GNUNET_break (0);
330 return;
331 }
332 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
333 "Get successful\n");
334#if 0
335 {
336 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
337 "PATH: (get %u, put %u)\n",
338 get_path_length,
339 put_path_length);
340 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
341 " LOCAL\n");
342 for (int i = get_path_length - 1; i >= 0; i--)
343 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
344 " %s\n",
345 GNUNET_i2s (&get_path[i]));
346 for (int i = put_path_length - 1; i >= 0; i--)
347 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
348 " %s\n",
349 GNUNET_i2s (&put_path[i]));
350 }
351#endif
352 GNUNET_DHT_get_stop (get_op->get);
353 GNUNET_CONTAINER_DLL_remove (get_head,
354 get_tail,
355 get_op);
356 GNUNET_free (get_op);
357 if (NULL != get_head)
358 return;
359 /* all DHT GET operations successful; get stats! */
360 GNUNET_log (GNUNET_ERROR_TYPE_INFO,
361 "All DHT operations successful. Obtaining stats!\n");
362 ok = 0;
363 ctx = stop_ops ();
364 GNUNET_assert (NULL != ctx);
365 (void) GNUNET_TESTBED_get_statistics (NUM_PEERS,
366 my_peers,
367 NULL, NULL,
368 &handle_stats,
369 &stats_finished,
370 ctx);
371}
372
373
374/**
375 * Task to put the id of each peer into the DHT.
376 *
377 * @param cls array with NUM_PEERS DHT handles
378 * @param tc Task context
379 */
380static void
381do_puts (void *cls)
382{
383 struct GNUNET_DHT_Handle **hs = cls;
384 struct GNUNET_HashCode key;
385 struct GNUNET_HashCode value;
386
387 put_task = NULL;
388 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
389 "Putting values into DHT\n");
390 for (unsigned int i = 0; i < NUM_PEERS; i++)
391 {
392 GNUNET_CRYPTO_hash (&i,
393 sizeof(i),
394 &key);
395 GNUNET_CRYPTO_hash (&key,
396 sizeof(key),
397 &value);
398 GNUNET_DHT_put (hs[i],
399 &key,
400 10U,
401 GNUNET_DHT_RO_RECORD_ROUTE
402 | GNUNET_DHT_RO_DEMULTIPLEX_EVERYWHERE,
403 GNUNET_BLOCK_TYPE_TEST,
404 sizeof(value),
405 &value,
406 GNUNET_TIME_UNIT_FOREVER_ABS,
407 NULL,
408 NULL);
409 }
410 put_task = GNUNET_SCHEDULER_add_delayed (PUT_FREQUENCY,
411 &do_puts,
412 hs);
413}
414
415
416/**
417 * Start GET operations.
418 */
419static void
420start_get (void *cls)
421{
422 struct GNUNET_DHT_Handle **dhts = cls;
423 unsigned int i;
424 unsigned int j;
425 struct GNUNET_HashCode key;
426 struct GetOperation *get_op;
427
428 get_task = NULL;
429 for (i = 0; i < NUM_PEERS; i++)
430 {
431 GNUNET_CRYPTO_hash (&i, sizeof(i), &key);
432 for (j = 0; j < NUM_PEERS; j++)
433 {
434 get_op = GNUNET_new (struct GetOperation);
435 GNUNET_CONTAINER_DLL_insert (get_head,
436 get_tail,
437 get_op);
438 get_op->get = GNUNET_DHT_get_start (dhts[j],
439 GNUNET_BLOCK_TYPE_TEST, /* type */
440 &key, /*key to search */
441 4U, /* replication level */
442 GNUNET_DHT_RO_RECORD_ROUTE
443 | GNUNET_DHT_RO_DEMULTIPLEX_EVERYWHERE,
444 NULL, /* xquery */
445 0, /* xquery bits */
446 &dht_get_handler,
447 get_op);
448 }
449 }
450}
451
452
453/**
454 * Main function of the test.
455 *
456 * @param cls closure (NULL)
457 * @param ctx argument to give to #GNUNET_DHT_TEST_cleanup on test end
458 * @param num_peers number of @a peers that are running
459 * @param peers array of peers
460 * @param dhts handle to each of the DHTs of the peers
461 */
462static void
463run (void *cls,
464 struct GNUNET_DHT_TEST_Context *ctx,
465 unsigned int num_peers,
466 struct GNUNET_TESTBED_Peer **peers,
467 struct GNUNET_DHT_Handle **dhts)
468{
469 GNUNET_assert (NUM_PEERS == num_peers);
470 my_peers = peers;
471 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
472 "Peers setup, starting test\n");
473 put_task = GNUNET_SCHEDULER_add_now (&do_puts,
474 dhts);
475 get_task = GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_SECONDS,
476 &start_get,
477 dhts);
478 timeout_task = GNUNET_SCHEDULER_add_delayed (GET_TIMEOUT,
479 &timeout_cb,
480 ctx);
481 GNUNET_SCHEDULER_add_shutdown (&shutdown_task,
482 ctx);
483}
484
485
486/**
487 * Main: start test
488 */
489int
490main (int xargc, char *xargv[])
491{
492 const char *cfg_filename;
493 const char *test_name;
494
495 if (NULL != strstr (xargv[0], "test_dht_2dtorus"))
496 {
497 cfg_filename = "test_dht_2dtorus.conf";
498 test_name = "test-dht-2dtorus";
499 NUM_PEERS = 16;
500 }
501 else if (NULL != strstr (xargv[0], "test_dht_line"))
502 {
503 cfg_filename = "test_dht_line.conf";
504 test_name = "test-dht-line";
505 NUM_PEERS = 5;
506 }
507 else if (NULL != strstr (xargv[0], "test_dht_twopeer"))
508 {
509 cfg_filename = "test_dht_line.conf";
510 test_name = "test-dht-twopeer";
511 NUM_PEERS = 2;
512 }
513 else if (NULL != strstr (xargv[0], "test_dht_multipeer"))
514 {
515 cfg_filename = "test_dht_multipeer.conf";
516 test_name = "test-dht-multipeer";
517 NUM_PEERS = 10;
518 }
519 else
520 {
521 GNUNET_break (0);
522 return 1;
523 }
524 GNUNET_DHT_TEST_run (test_name,
525 cfg_filename,
526 NUM_PEERS,
527 &run, NULL);
528 return ok;
529}
530
531
532/* end of test_dht_topo.c */