2 This file is part of GNUnet.
3 (C) 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 gns/test_gns_dht_threepeer.c
22 * @brief tests dht lookup over 3 peers
25 * alice <----> bob <-----> dave
27 * alice queries for www.buddy.bob.gads
31 #include "gnunet_common.h"
32 #include "gnunet_disk_lib.h"
33 #include "gnunet_testing_lib.h"
34 #include "gnunet_testbed_service.h"
35 #include "gnunet_core_service.h"
36 #include "gnunet_dht_service.h"
37 #include "block_dns.h"
38 #include "gnunet_signatures.h"
39 #include "gnunet_namestore_service.h"
40 #include "gnunet_dnsparser_lib.h"
41 #include "gnunet_gns_service.h"
43 #define ZONE_PUT_WAIT_TIME GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_SECONDS, 10)
45 #define TEST_DOMAIN "www.buddy.bob.gads"
46 #define TEST_IP "1.1.1.1"
47 #define TEST_DAVE_PSEU "hagbard"
50 /* Timeout for entire testcase */
51 #define TIMEOUT GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_SECONDS, 60)
52 #define SETUP_TIMEOUT GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_SECONDS, 60)
54 /* Global return value (0 for success, anything else for failure) */
57 /* Task handle to use to schedule test failure */
58 static GNUNET_SCHEDULER_TaskIdentifier die_task;
60 static GNUNET_SCHEDULER_TaskIdentifier wait_task;
62 static GNUNET_SCHEDULER_TaskIdentifier setup_task;
64 static struct GNUNET_CRYPTO_ShortHashCode dave_hash;
66 static struct GNUNET_CRYPTO_ShortHashCode bob_hash;
68 static struct GNUNET_TESTBED_Peer **cpeers;
70 static struct GNUNET_GNS_Handle *gh;
71 static struct GNUNET_GNS_LookupRequest *lookup_handle;
73 static struct GNUNET_TESTBED_Operation *get_cfg_ops[3];
74 static struct GNUNET_TESTBED_Operation *topology_op;
75 static struct GNUNET_CONFIGURATION_Handle *cfg_handles[3];
76 static struct GNUNET_NAMESTORE_Handle *nh[3];
78 static int dave_is_setup;
79 static int bob_is_setup;
80 static int alice_is_setup;
83 * Check if the get_handle is being used, if so stop the request. Either
84 * way, schedule the end_badly_cont function which actually shuts down the
88 end_badly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
90 die_task = GNUNET_SCHEDULER_NO_TASK;
93 if (GNUNET_SCHEDULER_NO_TASK != wait_task)
95 GNUNET_SCHEDULER_cancel (wait_task);
96 wait_task = GNUNET_SCHEDULER_NO_TASK;
99 for (c = 0; c < 3; c++)
103 GNUNET_NAMESTORE_disconnect(nh[c]);
107 if (NULL != get_cfg_ops[c])
109 GNUNET_TESTBED_operation_done(get_cfg_ops[c]);
110 get_cfg_ops[c] = NULL;
112 if (NULL != cfg_handles[c])
114 GNUNET_CONFIGURATION_destroy (cfg_handles[c]);
115 cfg_handles[c] = NULL;
118 if (NULL != topology_op)
120 GNUNET_TESTBED_operation_done (topology_op);
123 if (NULL != lookup_handle)
125 GNUNET_GNS_cancel_lookup_request (lookup_handle);
126 lookup_handle = NULL;
130 GNUNET_GNS_disconnect(gh);
134 GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Test failed \n");
135 GNUNET_SCHEDULER_shutdown ();
140 end (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
142 GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Finished\n");
144 if (GNUNET_SCHEDULER_NO_TASK != die_task)
146 GNUNET_SCHEDULER_cancel (die_task);
147 die_task = GNUNET_SCHEDULER_NO_TASK;
150 for (c = 0; c < 3; c++)
154 GNUNET_NAMESTORE_disconnect(nh[c]);
157 if (NULL != cfg_handles[c])
159 GNUNET_CONFIGURATION_destroy (cfg_handles[c]);
160 cfg_handles[c] = NULL;
166 GNUNET_GNS_disconnect(gh);
171 GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Test ended successful\n");
173 GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Test failed\n");
174 GNUNET_SCHEDULER_shutdown ();
178 setup_end_badly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
180 setup_task = GNUNET_SCHEDULER_NO_TASK;
181 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Timeout during setup, test failed\n");
183 if (NULL != topology_op)
185 GNUNET_TESTBED_operation_done (topology_op);
188 GNUNET_SCHEDULER_shutdown ();
195 GNUNET_SCHEDULER_add_now (&end, NULL);
200 disconnect_ns (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
203 GNUNET_NAMESTORE_disconnect (cls);
214 cont_ns (void* cls, int32_t s, const char* emsg)
216 GNUNET_SCHEDULER_add_now (&disconnect_ns, cls);
220 on_lookup_result(void *cls, uint32_t rd_count,
221 const struct GNUNET_NAMESTORE_RecordData *rd)
228 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
235 GNUNET_log (GNUNET_ERROR_TYPE_INFO, "name: %s\n", (char*)cls);
236 for (i=0; i<rd_count; i++)
238 string_val = GNUNET_NAMESTORE_value_to_string(rd[i].record_type,
241 if (0 == strcmp(string_val, TEST_IP))
243 GNUNET_log (GNUNET_ERROR_TYPE_INFO,
244 "%s correctly resolved to %s!\n", TEST_DOMAIN, string_val);
247 GNUNET_free (string_val);
254 commence_testing(void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
258 if ((ZONE_PUT_WAIT_TIME.rel_value / 1000) == wait)
260 fprintf (stderr, "\n");
261 wait_task = GNUNET_SCHEDULER_NO_TASK;
262 lookup_handle = GNUNET_GNS_lookup(gh, TEST_DOMAIN, GNUNET_GNS_RECORD_A,
265 &on_lookup_result, TEST_DOMAIN);
266 if (GNUNET_SCHEDULER_NO_TASK != die_task)
267 GNUNET_SCHEDULER_cancel(die_task);
268 die_task = GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly, "from lookup");
272 fprintf (stderr, ".");
273 wait_task = GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_SECONDS, &commence_testing, NULL);
280 GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Created all connections! Waiting for PUTs\n");
281 if (GNUNET_SCHEDULER_NO_TASK != setup_task)
283 GNUNET_SCHEDULER_cancel (setup_task);
284 setup_task = GNUNET_SCHEDULER_NO_TASK;
286 wait_task = GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_SECONDS, &commence_testing, NULL);
290 static void connect_peers ()
296 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "All peers started\n");
299 GNUNET_TESTBED_overlay_configure_topology (NULL, 3, cpeers,
301 GNUNET_TESTBED_TOPOLOGY_RING,
302 GNUNET_TESTBED_TOPOLOGY_OPTION_END);
307 setup_dave (const struct GNUNET_CONFIGURATION_Handle * cfg)
310 struct GNUNET_CRYPTO_RsaPrivateKey *key;
311 struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded pkey;
313 struct GNUNET_NAMESTORE_RecordData rd;
315 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Setting up dave\n");
316 cfg_handles[0] = GNUNET_CONFIGURATION_dup (cfg);
317 GNUNET_assert (NULL != cfg_handles[0]);
318 if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_filename (cfg, "gns",
322 GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to get key from cfg\n");
323 return GNUNET_SYSERR;
326 key = GNUNET_CRYPTO_rsa_key_create_from_file (keyfile);
330 GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to get key from cfg\n");
331 GNUNET_free (keyfile);
332 return GNUNET_SYSERR;
334 nh[0] = GNUNET_NAMESTORE_connect (cfg_handles[0]);
337 GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to connect to namestore\n");
338 GNUNET_CRYPTO_rsa_key_free (key);
339 GNUNET_free (keyfile);
340 return GNUNET_SYSERR;
343 GNUNET_CRYPTO_rsa_key_get_public (key, &pkey);
344 GNUNET_CRYPTO_short_hash(&pkey, sizeof(pkey), &dave_hash);
346 rd.expiration_time = UINT64_MAX;
348 web = GNUNET_malloc(sizeof(struct in_addr));
349 GNUNET_assert(1 == inet_pton (AF_INET, TEST_IP, web));
350 rd.data_size = sizeof(struct in_addr);
352 rd.record_type = GNUNET_GNS_RECORD_A;
353 rd.flags = GNUNET_NAMESTORE_RF_AUTHORITY;
355 GNUNET_NAMESTORE_record_create (nh[0], key, "www", &rd, NULL, NULL);
357 rd.data_size = strlen(TEST_DAVE_PSEU);
358 rd.data = TEST_DAVE_PSEU;
359 rd.record_type = GNUNET_GNS_RECORD_PSEU;
362 GNUNET_NAMESTORE_record_create (nh[0], key, GNUNET_GNS_MASTERZONE_STR, &rd, &cont_ns, nh[0]);
364 GNUNET_CRYPTO_rsa_key_free(key);
365 GNUNET_free(keyfile);
367 dave_is_setup = GNUNET_YES;
368 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Setting up dave done\n");
373 setup_bob (const struct GNUNET_CONFIGURATION_Handle * cfg)
376 struct GNUNET_CRYPTO_RsaPrivateKey *key;
377 struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded pkey;
378 struct GNUNET_NAMESTORE_RecordData rd;
380 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Setting up bob\n");
381 cfg_handles[1] = GNUNET_CONFIGURATION_dup (cfg);
382 GNUNET_assert (NULL != cfg_handles[1]);
383 if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_filename (cfg, "gns",
387 GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to get key from cfg\n");
388 return GNUNET_SYSERR;
391 key = GNUNET_CRYPTO_rsa_key_create_from_file (keyfile);
395 GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to get key from cfg\n");
396 GNUNET_free (keyfile);
397 return GNUNET_SYSERR;
400 nh[1] = GNUNET_NAMESTORE_connect (cfg_handles[1]);
403 GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to connect to namestore\n");
404 GNUNET_CRYPTO_rsa_key_free (key);
405 GNUNET_free (keyfile);
406 return GNUNET_SYSERR;
409 GNUNET_CRYPTO_rsa_key_get_public (key, &pkey);
410 GNUNET_CRYPTO_short_hash(&pkey, sizeof(pkey), &bob_hash);
412 rd.expiration_time = UINT64_MAX;
413 rd.data_size = sizeof(struct GNUNET_CRYPTO_ShortHashCode);
414 rd.data = &dave_hash;
415 rd.record_type = GNUNET_GNS_RECORD_PKEY;
416 rd.flags = GNUNET_NAMESTORE_RF_AUTHORITY;
418 GNUNET_NAMESTORE_record_create (nh[1], key, "buddy", &rd, &cont_ns, nh[1]);
420 GNUNET_CRYPTO_rsa_key_free(key);
421 GNUNET_free(keyfile);
422 bob_is_setup = GNUNET_YES;
423 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Setting up bob done\n");
428 setup_alice (const struct GNUNET_CONFIGURATION_Handle * cfg)
431 struct GNUNET_CRYPTO_RsaPrivateKey *key;
432 struct GNUNET_NAMESTORE_RecordData rd;
434 cfg_handles[2] = GNUNET_CONFIGURATION_dup (cfg);
435 GNUNET_assert (NULL != cfg);
436 if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_filename (cfg, "gns",
440 GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to get key from cfg\n");
441 return GNUNET_SYSERR;
444 key = GNUNET_CRYPTO_rsa_key_create_from_file (keyfile);
448 GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to get key from cfg\n");
449 GNUNET_free (keyfile);
450 return GNUNET_SYSERR;
453 nh[2] = GNUNET_NAMESTORE_connect (cfg_handles[2]);
456 GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to connect to namestore\n");
457 GNUNET_CRYPTO_rsa_key_free (key);
458 GNUNET_free (keyfile);
459 return GNUNET_SYSERR;
462 rd.expiration_time = UINT64_MAX;
463 rd.data_size = sizeof(struct GNUNET_CRYPTO_ShortHashCode);
465 rd.record_type = GNUNET_GNS_RECORD_PKEY;
466 rd.flags = GNUNET_NAMESTORE_RF_AUTHORITY;
468 GNUNET_NAMESTORE_record_create (nh[2], key, "bob", &rd, &cont_ns, nh[2]);
470 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Setting up alice gns\n");
471 gh = GNUNET_GNS_connect (cfg_handles[2]);
474 GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to connect to gns\n");
475 GNUNET_CRYPTO_rsa_key_free (key);
476 GNUNET_free (keyfile);
477 return GNUNET_SYSERR;
480 GNUNET_CRYPTO_rsa_key_free (key);
481 GNUNET_free (keyfile);
482 alice_is_setup = GNUNET_YES;
483 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Setting up alice done\n");
490 if (GNUNET_SCHEDULER_NO_TASK != die_task)
491 GNUNET_SCHEDULER_cancel (die_task);
492 die_task = GNUNET_SCHEDULER_add_now (&end_badly, NULL);
497 * Callback to be called when the requested peer information is available
499 * @param cb_cls the closure from GNUNET_TETSBED_peer_get_information()
500 * @param op the operation this callback corresponds to
501 * @param pinfo the result; will be NULL if the operation has failed
502 * @param emsg error message if the operation has failed; will be NULL if the
503 * operation is successfull
506 peerinfo_cb (void *cb_cls, struct GNUNET_TESTBED_Operation *op,
507 const struct GNUNET_TESTBED_PeerInformation *pinfo,
511 GNUNET_assert (GNUNET_TESTBED_PIT_CONFIGURATION == pinfo->pit);
512 if (GNUNET_NO == dave_is_setup)
513 res = setup_dave (pinfo->result.cfg);
514 else if (GNUNET_NO == bob_is_setup)
515 res = setup_bob (pinfo->result.cfg);
517 res = setup_alice (pinfo->result.cfg);
519 if (get_cfg_ops[0] == op)
520 get_cfg_ops[0] = NULL;
521 else if (get_cfg_ops[1] == op)
522 get_cfg_ops[1] = NULL;
524 get_cfg_ops[2] = NULL;
525 GNUNET_TESTBED_operation_done (op);
527 if (GNUNET_SYSERR == res)
529 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Failed to setup peer \n");
534 /*if (get_cfg_ops[0] == op)
536 GNUNET_assert (GNUNET_TESTBED_PIT_CONFIGURATION == pinfo->pit);
537 res = setup_dave (pinfo->result.cfg);
538 GNUNET_TESTBED_operation_done (get_cfg_ops[0]);
539 get_cfg_ops[0] = NULL;
540 if (GNUNET_SYSERR == res)
542 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Failed to setup dave \n");
550 else if (get_cfg_ops[1] == op)
552 GNUNET_assert (GNUNET_TESTBED_PIT_CONFIGURATION == pinfo->pit);
553 res = setup_bob (pinfo->result.cfg);
554 GNUNET_TESTBED_operation_done (get_cfg_ops[1]);
555 get_cfg_ops[1] = NULL;
556 if (GNUNET_SYSERR == res)
558 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Failed to setup dave \n");
566 else if (get_cfg_ops[2] == op)
568 GNUNET_assert (GNUNET_TESTBED_PIT_CONFIGURATION == pinfo->pit);
569 res = setup_alice (pinfo->result.cfg);
570 GNUNET_TESTBED_operation_done (get_cfg_ops[2]);
571 get_cfg_ops[2] = NULL;
572 if (GNUNET_SYSERR == res)
574 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Failed to setup dave \n");
585 void testbed_master (void *cls,
586 unsigned int num_peers,
587 struct GNUNET_TESTBED_Peer **peers)
589 GNUNET_assert (NULL != peers);
592 setup_task = GNUNET_SCHEDULER_add_delayed (SETUP_TIMEOUT, &setup_end_badly, NULL);
595 GNUNET_assert (NULL != peers[0]);
596 get_cfg_ops[0] = GNUNET_TESTBED_peer_get_information (peers[0],
597 GNUNET_TESTBED_PIT_CONFIGURATION,
601 GNUNET_assert (NULL != peers[1]);
602 get_cfg_ops[1] = GNUNET_TESTBED_peer_get_information (peers[1],
603 GNUNET_TESTBED_PIT_CONFIGURATION,
604 &peerinfo_cb, NULL );
607 GNUNET_assert (NULL != peers[2]);
608 get_cfg_ops[2] = GNUNET_TESTBED_peer_get_information (peers[2],
609 GNUNET_TESTBED_PIT_CONFIGURATION,
614 void testbed_controller_cb (void *cls, const struct GNUNET_TESTBED_EventInformation *event)
616 static int connections = 0;
620 case GNUNET_TESTBED_ET_OPERATION_FINISHED:
621 /* This part will still be called when
622 GNUNET_TESTBED_peer_get_information() succeeds. However, the code is
623 now more relevant in operation completion callback */
625 case GNUNET_TESTBED_ET_CONNECT:
627 if (connections == 3)
629 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "All peers connected\n");
630 GNUNET_TESTBED_operation_done (topology_op);
642 main (int argc, char *argv[])
647 event_mask |= (1LL << GNUNET_TESTBED_ET_CONNECT);
648 event_mask |= (1LL << GNUNET_TESTBED_ET_OPERATION_FINISHED);
649 (void) GNUNET_TESTBED_test_run ("test_gns_dht_three_peers", "test_gns_dht_default.conf",
651 &testbed_controller_cb, NULL,
652 &testbed_master, NULL);
653 if (GNUNET_SYSERR == ok)
658 /* end of test_gns_dht_three_peers.c */