Fixed reconnect
[oweals/gnunet.git] / src / testing / test_testing_topology_churn.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 testing/test_testing_topology_churn.c
22  * @brief base testcase for testing simple churn functionality
23  */
24 #include "platform.h"
25 #include "gnunet_testing_lib.h"
26 #include "gnunet_core_service.h"
27
28 #define VERBOSE GNUNET_YES
29
30 /**
31  * How long until we fail the whole testcase?
32  */
33 #define TEST_TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 600)
34
35 /**
36  * How long until we give up on starting the peers? (Must be longer than the connect timeout!)
37  */
38 #define TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 300)
39
40 #define DEFAULT_NUM_PEERS 4
41
42 static int ok;
43
44 static unsigned long long num_peers;
45
46 static unsigned int expected_connections;
47
48 static unsigned int expected_failed_connections;
49
50 static unsigned long long peers_left;
51
52 static struct GNUNET_TESTING_PeerGroup *pg;
53
54 const struct GNUNET_CONFIGURATION_Handle *main_cfg;
55
56 GNUNET_SCHEDULER_TaskIdentifier die_task;
57
58 static char *test_directory;
59
60 #define MTYPE 12345
61
62 struct GNUNET_TestMessage
63 {
64   /**
65    * Header of the message
66    */
67   struct GNUNET_MessageHeader header;
68
69   /**
70    * Unique identifier for this message.
71    */
72   uint32_t uid;
73 };
74
75 /**
76  * Check whether peers successfully shut down.
77  */
78 void
79 shutdown_callback (void *cls, const char *emsg)
80 {
81   if (emsg != NULL)
82   {
83 #if VERBOSE
84     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Shutdown of peers failed!\n");
85 #endif
86     if (ok == 0)
87       ok = 666;
88   }
89   else
90   {
91 #if VERBOSE
92     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "All peers successfully shut down!\n");
93 #endif
94   }
95 }
96
97 static void
98 finish_testing ()
99 {
100   GNUNET_assert (pg != NULL);
101
102   if (die_task != GNUNET_SCHEDULER_NO_TASK)
103     GNUNET_SCHEDULER_cancel (die_task);
104
105 #if VERBOSE
106   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
107               "Called finish testing, stopping daemons.\n");
108 #endif
109
110 #if VERBOSE
111   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Calling daemons_stop\n");
112 #endif
113   GNUNET_TESTING_daemons_stop (pg, TIMEOUT, &shutdown_callback, NULL);
114 #if VERBOSE
115   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "daemons_stop finished\n");
116 #endif
117
118   ok = 0;
119 }
120
121 static void
122 end_badly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
123 {
124   char *msg = cls;
125
126   GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
127               "End badly was called (%s)... stopping daemons.\n", msg);
128
129   if (pg != NULL)
130   {
131     GNUNET_TESTING_daemons_stop (pg, TIMEOUT, &shutdown_callback, NULL);
132     ok = 7331;                  /* Opposite of leet */
133   }
134   else
135     ok = 401;                   /* Never got peers started */
136
137 }
138
139 struct ChurnTestContext
140 {
141   GNUNET_SCHEDULER_Task next_task;
142
143 };
144
145 static struct ChurnTestContext churn_ctx;
146
147 /**
148  * Churn callback, report on success or failure of churn operation.
149  *
150  * @param cls closure
151  * @param emsg NULL on success
152  */
153 void
154 churn_callback (void *cls, const char *emsg)
155 {
156   if (emsg == NULL)
157   {
158     GNUNET_log (GNUNET_ERROR_TYPE_WARNING, "Successfully churned peers!\n",
159                 emsg);
160     GNUNET_SCHEDULER_add_now (churn_ctx.next_task, NULL);
161   }
162   else
163   {
164     GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
165                 "Failed to churn peers with error `%s'\n", emsg);
166     GNUNET_SCHEDULER_cancel (die_task);
167     die_task = GNUNET_SCHEDULER_add_now (&end_badly, NULL);
168   }
169 }
170
171
172 static void
173 churn_peers_both ()
174 {
175   churn_ctx.next_task = &finish_testing;
176   GNUNET_TESTING_daemons_churn (pg, NULL, 1, 1, TIMEOUT, &churn_callback, NULL);
177 }
178
179 static void
180 churn_peers_off_again ()
181 {
182   churn_ctx.next_task = &churn_peers_both;
183   GNUNET_TESTING_daemons_churn (pg, NULL, 2, 0, TIMEOUT, &churn_callback, NULL);
184 }
185
186 static void
187 churn_peers_on ()
188 {
189   churn_ctx.next_task = &churn_peers_off_again;
190   GNUNET_TESTING_daemons_churn (pg, NULL, 0, 2, TIMEOUT, &churn_callback, NULL);
191 }
192
193 static void
194 churn_peers_off ()
195 {
196   churn_ctx.next_task = &churn_peers_on;
197   GNUNET_TESTING_daemons_churn (pg, NULL, 2, 0, TIMEOUT, &churn_callback, NULL);
198 }
199
200 static void
201 peers_started_callback (void *cls, const struct GNUNET_PeerIdentity *id,
202                         const struct GNUNET_CONFIGURATION_Handle *cfg,
203                         struct GNUNET_TESTING_Daemon *d, const char *emsg)
204 {
205   if (emsg != NULL)
206   {
207     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
208                 "Failed to start daemon with error: `%s'\n", emsg);
209     return;
210   }
211   GNUNET_assert (id != NULL);
212 #if VERBOSE
213   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Started daemon %llu out of %llu\n",
214               (num_peers - peers_left) + 1, num_peers);
215 #endif
216   peers_left--;
217   if (peers_left == 0)
218   {
219 #if VERBOSE
220     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
221                 "All %d daemons started, now testing churn!\n", num_peers);
222 #endif
223     GNUNET_SCHEDULER_cancel (die_task);
224     /* Set up task in case topology creation doesn't finish
225      * within a reasonable amount of time */
226     die_task =
227         GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_relative_multiply
228                                       (GNUNET_TIME_UNIT_MINUTES, 5), &end_badly,
229                                       "from peers_started_callback");
230     churn_peers_off ();
231     ok = 0;
232   }
233 }
234
235
236 static void
237 run (void *cls, char *const *args, const char *cfgfile,
238      const struct GNUNET_CONFIGURATION_Handle *cfg)
239 {
240   ok = 1;
241
242 #if VERBOSE
243   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
244               "Starting daemons based on config file %s\n", cfgfile);
245 #endif
246
247   if (GNUNET_YES !=
248       GNUNET_CONFIGURATION_get_value_string (cfg, "paths", "servicehome",
249                                              &test_directory))
250   {
251     ok = 404;
252     return;
253   }
254
255   if (GNUNET_SYSERR ==
256       GNUNET_CONFIGURATION_get_value_number (cfg, "testing", "num_peers",
257                                              &num_peers))
258     num_peers = DEFAULT_NUM_PEERS;
259
260   main_cfg = cfg;
261
262   peers_left = num_peers;
263   GNUNET_assert (num_peers > 0 && num_peers < (unsigned int) -1);
264
265   /* For this specific test we only really want a CLIQUE topology as the
266    * overlay allowed topology, and a RING topology as the underlying connection
267    * allowed topology.  So we will expect only num_peers * 2 connections to
268    * work, and (num_peers * (num_peers - 1)) - (num_peers * 2) to fail.
269    */
270   expected_connections = num_peers * (num_peers - 1);
271   expected_failed_connections = expected_connections - (num_peers * 2);
272
273
274   /* Set up a task to end testing if peer start fails */
275   die_task =
276       GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_relative_multiply
277                                     (GNUNET_TIME_UNIT_MINUTES, 5), &end_badly,
278                                     "didn't start all daemons in reasonable amount of time!!!");
279
280   pg = GNUNET_TESTING_daemons_start (cfg, peers_left, peers_left, peers_left,
281                                      TIMEOUT, NULL, NULL,
282                                      &peers_started_callback, NULL, NULL, NULL,
283                                      NULL);
284
285 }
286
287 static int
288 check ()
289 {
290   int ret;
291
292   char *const argv[] = { "test-testing-topology-churn",
293     "-c",
294     "test_testing_data_topology_churn.conf",
295 #if VERBOSE
296     "-L", "DEBUG",
297 #endif
298     NULL
299   };
300   struct GNUNET_GETOPT_CommandLineOption options[] = {
301     GNUNET_GETOPT_OPTION_END
302   };
303   ret =
304       GNUNET_PROGRAM_run ((sizeof (argv) / sizeof (char *)) - 1, argv,
305                           "test-testing-topology-churn", "nohelp", options,
306                           &run, &ok);
307   if (ret != GNUNET_OK)
308   {
309     GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
310                 "`test-testing-topology-churn': Failed with error code %d\n",
311                 ret);
312   }
313
314   return ok;
315 }
316
317 int
318 main (int argc, char *argv[])
319 {
320   int ret;
321
322   GNUNET_log_setup ("test_testing_topology_churn",
323 #if VERBOSE
324                     "DEBUG",
325 #else
326                     "WARNING",
327 #endif
328                     NULL);
329   ret = check ();
330
331   /**
332    * Need to remove base directory, subdirectories taken care
333    * of by the testing framework.
334    */
335   if (test_directory != NULL)
336   {
337     if (GNUNET_DISK_directory_remove (test_directory) != GNUNET_OK)
338     {
339       GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
340                   "Failed to remove testing directory %s\n", test_directory);
341     }
342   }
343
344   return ret;
345 }
346
347 /* end of test_testing_topology_churn.c */