-trying to fix #2391: limit connect rate from topology
[oweals/gnunet.git] / src / gns / test_gns_dht_threepeer.c
1 /*
2      This file is part of GNUnet.
3      (C) 2009 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., 59 Temple Place - Suite 330,
18      Boston, MA 02111-1307, USA.
19 */
20 /**
21  * @file gns/test_gns_dht_threepeer.c
22  * @brief tests dht lookup over 3 peers
23  *
24  * topology:
25  * alice <----> bob <-----> dave
26  *
27  * alice queries for www.buddy.bob.gnunet
28  *
29  */
30 #include "platform.h"
31 #include "gnunet_disk_lib.h"
32 #include "gnunet_testing_lib.h"
33 #include "gnunet_core_service.h"
34 #include "gnunet_dht_service.h"
35 #include "block_dns.h"
36 #include "gnunet_signatures.h"
37 #include "gnunet_namestore_service.h"
38 #include "gnunet_dnsparser_lib.h"
39 #include "gnunet_gns_service.h"
40
41 /* DEFINES */
42 #define VERBOSE GNUNET_YES
43
44 /* Timeout for entire testcase */
45 #define TIMEOUT GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_SECONDS, 180)
46 #define ZONE_PUT_WAIT_TIME GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_SECONDS, 30)
47
48 /* If number of peers not in config file, use this number */
49 #define DEFAULT_NUM_PEERS 2
50
51 #define TEST_DOMAIN "www.buddy.bob.gnunet"
52 #define TEST_IP "1.1.1.1"
53 #define TEST_DAVE_PSEU "hagbard"
54 #define TEST_NUM_PEERS 3
55 #define TEST_NUM_CON 3
56
57 /* Globals */
58
59 /**
60  * Directory to store temp data in, defined in config file
61  */
62 static char *test_directory;
63
64 /**
65  * Variable used to store the number of connections we should wait for.
66  */
67 static unsigned int expected_connections;
68
69 /**
70  * Variable used to keep track of how many peers aren't yet started.
71  */
72 static unsigned long long peers_left;
73
74 struct GNUNET_TESTING_Daemon *d1;
75 struct GNUNET_TESTING_Daemon *d2;
76 struct GNUNET_TESTING_Daemon *d3;
77
78
79 /**
80  * Total number of peers to run, set based on config file.
81  */
82 static unsigned long long num_peers;
83
84 /**
85  * Global used to count how many connections we have currently
86  * been notified about (how many times has topology_callback been called
87  * with success?)
88  */
89 static unsigned int total_connections;
90
91 /**
92  * Global used to count how many failed connections we have
93  * been notified about (how many times has topology_callback
94  * been called with failure?)
95  */
96 static unsigned int failed_connections;
97
98 /* Task handle to use to schedule test failure */
99 GNUNET_SCHEDULER_TaskIdentifier die_task;
100
101 GNUNET_SCHEDULER_TaskIdentifier bob_task;
102
103 /* Global return value (0 for success, anything else for failure) */
104 static int ok;
105
106 int bob_online, alice_online, dave_online;
107
108 const struct GNUNET_CONFIGURATION_Handle *alice_cfg;
109 struct GNUNET_CONFIGURATION_Handle *cfg_bob;
110 struct GNUNET_CONFIGURATION_Handle *cfg_dave;
111
112 struct GNUNET_CRYPTO_ShortHashCode bob_hash;
113 struct GNUNET_CRYPTO_ShortHashCode dave_hash;
114 struct GNUNET_TESTING_Daemon *alice_daemon;
115 struct GNUNET_TESTING_Daemon *bob_daemon;
116 struct GNUNET_TESTING_Daemon *dave_daemon;
117
118 struct GNUNET_TESTING_PeerGroup *pg;
119 struct GNUNET_GNS_Handle *gh;
120
121 /**
122  * Function scheduled to be run on the successful completion of this
123  * testcase.  Specifically, called when our get request completes.
124  */
125 static void
126 finish_testing (void *cls, const char *emsg)
127 {
128   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Test finished! (ret=%d)\n", ok);
129 }
130
131 /**
132  * Continuation for the GNUNET_DHT_get_stop call, so that we don't shut
133  * down the peers without freeing memory associated with GET request.
134  */
135 static void
136 end_badly_cont (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
137 {
138   die_task = GNUNET_SCHEDULER_NO_TASK;
139   GNUNET_TESTING_daemons_stop (pg, TIMEOUT, &finish_testing, NULL);
140 }
141
142 /**
143  * Check if the get_handle is being used, if so stop the request.  Either
144  * way, schedule the end_badly_cont function which actually shuts down the
145  * test.
146  */
147 static void
148 end_badly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
149 {
150   die_task = GNUNET_SCHEDULER_NO_TASK;
151   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Failing test with error: `%s'!\n",
152               (char *) cls);
153   die_task = GNUNET_SCHEDULER_add_now (&end_badly_cont, NULL);
154   ok = 1;
155 }
156
157
158 static void
159 on_lookup_result(void *cls, uint32_t rd_count,
160                  const struct GNUNET_NAMESTORE_RecordData *rd)
161 {
162   int i;
163   char* string_val;
164   const char* typename;
165
166   if (rd_count == 0)
167   {
168     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
169                 "Lookup failed!\n");
170     ok = 2;
171   }
172   else
173   {
174     ok = 1;
175     GNUNET_log (GNUNET_ERROR_TYPE_INFO, "name: %s\n", (char*)cls);
176     for (i=0; i<rd_count; i++)
177     {
178       typename = GNUNET_NAMESTORE_number_to_typename (rd[i].record_type);
179       string_val = GNUNET_NAMESTORE_value_to_string(rd[i].record_type,
180                                                     rd[i].data,
181                                                     rd[i].data_size);
182       printf("Got %s record: %s\n", typename, string_val);
183       if (0 == strcmp(string_val, TEST_IP))
184       {
185         GNUNET_log (GNUNET_ERROR_TYPE_INFO,
186                     "%s correctly resolved to %s!\n", TEST_DOMAIN, string_val);
187         ok = 0;
188       }
189     }
190   }
191   GNUNET_GNS_disconnect(gh);
192   GNUNET_SCHEDULER_cancel(die_task);
193   die_task = GNUNET_SCHEDULER_NO_TASK;
194   GNUNET_TESTING_daemons_stop (pg, TIMEOUT, &finish_testing, NULL);
195   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Shutting down!\n");
196
197 }
198
199 static void
200 commence_testing(void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
201 {
202   
203
204   gh = GNUNET_GNS_connect(alice_cfg);
205
206   GNUNET_GNS_lookup(gh, TEST_DOMAIN, GNUNET_GNS_RECORD_TYPE_A,
207                     &on_lookup_result, TEST_DOMAIN);
208   die_task =
209     GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly, "from lookup");
210 }
211
212
213 /**
214  * This function is called whenever a connection attempt is finished between two of
215  * the started peers (started with GNUNET_TESTING_daemons_start).  The total
216  * number of times this function is called should equal the number returned
217  * from the GNUNET_TESTING_connect_topology call.
218  *
219  * The emsg variable is NULL on success (peers connected), and non-NULL on
220  * failure (peers failed to connect).
221  */
222 void
223 daemon_connected (void *cls, const struct GNUNET_PeerIdentity *first,
224                    const struct GNUNET_PeerIdentity *second, uint32_t distance,
225                    const struct GNUNET_CONFIGURATION_Handle *first_cfg,
226                    const struct GNUNET_CONFIGURATION_Handle *second_cfg,
227                    struct GNUNET_TESTING_Daemon *first_daemon,
228                    struct GNUNET_TESTING_Daemon *second_daemon,
229                    const char *emsg)
230 {
231   if (emsg == NULL)
232   {
233     total_connections++;
234 #if VERBOSE
235     GNUNET_log (GNUNET_ERROR_TYPE_INFO,
236                 "connected peer %s to peer %s, distance %u\n",
237                 first_daemon->shortname, second_daemon->shortname, distance);
238 #endif
239   }
240 #if VERBOSE
241   else
242   {
243     failed_connections++;
244     GNUNET_log (GNUNET_ERROR_TYPE_INFO,
245                 "Failed to connect peer %s to peer %s with error :\n%s\n",
246                 first_daemon->shortname, second_daemon->shortname, emsg);
247   }
248 #endif
249
250   if (total_connections == expected_connections)
251   {
252 #if VERBOSE
253     GNUNET_log (GNUNET_ERROR_TYPE_INFO,
254                 "Created %d total connections, which is our target number!  Starting next phase of testing.\n",
255                 total_connections);
256 #endif
257     GNUNET_SCHEDULER_cancel (die_task);
258     die_task = GNUNET_SCHEDULER_NO_TASK;
259     //die_task =
260     //    GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly, "from connect");
261    
262     //commence_testing();
263     
264   }
265   else if (total_connections + failed_connections == expected_connections)
266   {
267     GNUNET_SCHEDULER_cancel (die_task);
268     die_task =
269         GNUNET_SCHEDULER_add_now (&end_badly,
270                                   "from topology_callback (too many failed connections)");
271   }
272 }
273
274 void
275 all_connected(void *cls, const char *emsg)
276 {
277   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
278               "Created all connections!  Starting next phase of testing.\n");
279   GNUNET_SCHEDULER_add_delayed (ZONE_PUT_WAIT_TIME, &commence_testing, NULL);
280 }
281
282 void
283 ns_create_cont(void *cls, int32_t s, const char *emsg)
284 {
285   GNUNET_NAMESTORE_disconnect((struct GNUNET_NAMESTORE_Handle *)cls, 0);
286 }
287
288 static void
289 daemon_started (void *cls, const struct GNUNET_PeerIdentity *id,
290                 const struct GNUNET_CONFIGURATION_Handle *cfg,
291                 struct GNUNET_TESTING_Daemon *d, const char *emsg)
292 {
293   struct GNUNET_NAMESTORE_Handle *ns;
294   char* keyfile;
295   struct GNUNET_CRYPTO_RsaPrivateKey *key;
296   struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded pkey;
297   struct in_addr *web;
298   struct GNUNET_NAMESTORE_RecordData rd;
299
300   rd.flags = GNUNET_NAMESTORE_RF_AUTHORITY | GNUNET_NAMESTORE_RF_NONE;
301   rd.expiration = GNUNET_TIME_UNIT_FOREVER_ABS;
302   
303   if (NULL == dave_daemon)
304   {
305     if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_filename (cfg, "gns",
306                                                               "ZONEKEY",
307                                                               &keyfile))
308     {
309       GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to get key from cfg\n");
310       ok = -1;
311       return;
312     }
313     dave_daemon = d;
314
315     key = GNUNET_CRYPTO_rsa_key_create_from_file (keyfile);
316
317     GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "This is now dave\n");
318     ns = GNUNET_NAMESTORE_connect(cfg);
319     
320     GNUNET_CRYPTO_rsa_key_get_public (key, &pkey);
321     GNUNET_CRYPTO_short_hash(&pkey, sizeof(pkey), &dave_hash);
322     
323     web = GNUNET_malloc(sizeof(struct in_addr));
324     GNUNET_assert(1 == inet_pton (AF_INET, TEST_IP, web));
325     rd.data_size = sizeof(struct in_addr);
326     rd.data = web;
327     rd.record_type = GNUNET_GNS_RECORD_TYPE_A;
328
329     GNUNET_NAMESTORE_record_create (ns, key, "www", &rd, NULL, NULL);
330
331     rd.data_size = strlen(TEST_DAVE_PSEU);
332     rd.data = TEST_DAVE_PSEU;
333     rd.record_type = GNUNET_GNS_RECORD_PSEU;
334
335     GNUNET_NAMESTORE_record_create (ns, key, "+", &rd, ns_create_cont, ns);
336
337     GNUNET_CRYPTO_rsa_key_free(key);
338     GNUNET_free(keyfile);
339     GNUNET_free(web);
340
341     return;
342   }
343   
344   
345   if (NULL == bob_daemon)
346   {
347     if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_filename (cfg, "gns",
348                                                               "ZONEKEY",
349                                                               &keyfile))
350     {
351       GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to get key from cfg\n");
352       ok = -1;
353       return;
354     }
355     bob_daemon = d;
356
357     key = GNUNET_CRYPTO_rsa_key_create_from_file (keyfile);
358
359     GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "This is now bob\n");
360     ns = GNUNET_NAMESTORE_connect(cfg);
361     
362     GNUNET_CRYPTO_rsa_key_get_public (key, &pkey);
363     GNUNET_CRYPTO_short_hash(&pkey, sizeof(pkey), &bob_hash);
364     
365     rd.data_size = sizeof(struct GNUNET_CRYPTO_ShortHashCode);
366     rd.data = &dave_hash;
367     rd.record_type = GNUNET_GNS_RECORD_PKEY;
368
369     GNUNET_NAMESTORE_record_create (ns, key, "buddy", &rd, ns_create_cont, ns);
370
371     GNUNET_CRYPTO_rsa_key_free(key);
372     GNUNET_free(keyfile);
373
374     return;
375   }
376
377   
378   
379   if (NULL == alice_daemon)
380   {
381
382     if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_filename (cfg, "gns",
383                                                               "ZONEKEY",
384                                                               &keyfile))
385     {
386       GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to get key from cfg\n");
387       ok = -1;
388       return;
389     }
390     alice_daemon = d;
391     alice_cfg = cfg;
392
393     key = GNUNET_CRYPTO_rsa_key_create_from_file (keyfile);
394
395     GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "This is now alice\n");
396     ns = GNUNET_NAMESTORE_connect(cfg);
397     
398     rd.data_size = sizeof(struct GNUNET_CRYPTO_ShortHashCode);
399     rd.data = &bob_hash;
400     rd.record_type = GNUNET_GNS_RECORD_PKEY;
401
402     GNUNET_NAMESTORE_record_create (ns, key, "bob", &rd, ns_create_cont, ns);
403
404     GNUNET_CRYPTO_rsa_key_free(key);
405     GNUNET_free(keyfile);
406
407     GNUNET_TESTING_connect_topology (pg, GNUNET_TESTING_TOPOLOGY_CLIQUE,
408                                      GNUNET_TESTING_TOPOLOGY_OPTION_ALL,
409                                      0,
410                                      TIMEOUT,
411                                      3,
412                                      &all_connected, NULL);
413     return;
414
415   }
416
417   
418
419   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "This is a random guy\n");
420 }
421
422 static void
423 run (void *cls, char *const *args, const char *cfgfile,
424      const struct GNUNET_CONFIGURATION_Handle *cfg)
425 {
426
427   /* Get path from configuration file */
428   if (GNUNET_YES !=
429       GNUNET_CONFIGURATION_get_value_string (cfg, "paths", "servicehome",
430                                              &test_directory))
431   {
432     ok = 404;
433     return;
434   }
435
436   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "starting\n");
437
438   /* Get number of peers to start from configuration (should be two) */
439   if (GNUNET_SYSERR ==
440       GNUNET_CONFIGURATION_get_value_number (cfg, "testing", "num_peers",
441                                              &num_peers))
442     num_peers = DEFAULT_NUM_PEERS;
443
444   /* Set peers_left so we know when all peers started */
445   peers_left = num_peers;
446   
447   bob_daemon = NULL;
448   dave_daemon = NULL;
449   alice_daemon = NULL;
450
451   pg = GNUNET_TESTING_daemons_start (cfg, TEST_NUM_PEERS, TEST_NUM_CON,
452                                 TEST_NUM_CON, TIMEOUT, NULL, NULL, &daemon_started, NULL,
453                                 &daemon_connected, NULL, NULL);
454   
455   /* Set up a task to end testing if peer start fails */
456   die_task =
457       GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly,
458                                     "didn't start all daemons in reasonable amount of time!!!");
459   
460   alice_online = 0;
461   bob_online = 0;
462   dave_online = 0;
463   expected_connections = 2;
464   
465   /* Start alice */
466   //d1 = GNUNET_TESTING_daemon_start(cfg_alice, TIMEOUT, GNUNET_NO, NULL, NULL, 0,
467   //                                 NULL, NULL, NULL, &alice_started, NULL);
468   
469   
470
471
472 }
473
474 static int
475 check ()
476 {
477   int ret;
478
479   /* Arguments for GNUNET_PROGRAM_run */
480   char *const argv[] = { "test-gns-twopeer",    /* Name to give running binary */
481     "-c",
482     "test_gns_dht_default.conf",       /* Config file to use */
483 #if VERBOSE
484     "-L", "DEBUG",
485 #endif
486     NULL
487   };
488   struct GNUNET_GETOPT_CommandLineOption options[] = {
489     GNUNET_GETOPT_OPTION_END
490   };
491   /* Run the run function as a new program */
492   ret =
493       GNUNET_PROGRAM_run ((sizeof (argv) / sizeof (char *)) - 1, argv,
494                           "test-gns-threepeer", "nohelp", options, &run,
495                           &ok);
496   if (ret != GNUNET_OK)
497   {
498     GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
499                 "`test-gns-threepeer': Failed with error code %d\n", ret);
500   }
501   return ok;
502 }
503
504 int
505 main (int argc, char *argv[])
506 {
507   int ret;
508
509   GNUNET_log_setup ("test-gns-threepeer",
510 #if VERBOSE
511                     "DEBUG",
512 #else
513                     "WARNING",
514 #endif
515                     NULL);
516   ret = check ();
517   /**
518    * Need to remove base directory, subdirectories taken care
519    * of by the testing framework.
520    */
521   return ret;
522 }
523
524 /* end of test_gns_threepeer.c */