-next test
[oweals/gnunet.git] / src / testbed / test_testbed_api_2peers.c
1 /*
2       This file is part of GNUnet
3       (C) 2008--2012 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 /**
22  * @file testbed/test_testbed_api_2peers.c
23  * @brief testcases for the testbed api: 2 peers are configured, started and
24  *          connected together
25  * @author Sree Harsha Totakura
26  */
27
28 #include "platform.h"
29 #include "gnunet_util_lib.h"
30 #include "gnunet_testing_lib-new.h"
31 #include "gnunet_testbed_service.h"
32
33
34 /**
35  * Generic logging shortcut
36  */
37 #define LOG(kind,...)                           \
38   GNUNET_log (kind, __VA_ARGS__)
39
40 /**
41  * Relative time seconds shorthand
42  */
43 #define TIME_REL_SECS(sec) \
44   GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, sec)
45
46
47 /**
48  * Peer context
49  */
50 struct PeerContext
51 {
52   /**
53    * The peer handle
54    */
55   struct GNUNET_TESTBED_Peer *peer;
56
57   /**
58    * Operations involving this peer
59    */
60   struct GNUNET_TESTBED_Operation *operation;
61
62   /**
63    * set to GNUNET_YES when peer is started
64    */
65   int is_running;
66 };
67
68 /**
69  * Our localhost
70  */
71 static struct GNUNET_TESTBED_Host *host;
72
73 /**
74  * The controller process
75  */
76 static struct GNUNET_TESTBED_ControllerProc *cp;
77
78 /**
79  * The controller handle
80  */
81 static struct GNUNET_TESTBED_Controller *controller;
82
83 /**
84  * A neighbouring host
85  */
86 static struct GNUNET_TESTBED_Host *neighbour;
87
88 /**
89  * Handle for neighbour registration
90  */
91 static struct GNUNET_TESTBED_HostRegistrationHandle *reg_handle;
92
93 /**
94  * peer 1
95  */
96 static struct PeerContext peer1;
97
98 /**
99  * peer2
100  */
101 static struct PeerContext peer2;
102
103 /**
104  * Handle to configuration
105  */
106 static struct GNUNET_CONFIGURATION_Handle *cfg;
107
108 /**
109  * Handle to operations involving both peers
110  */
111 static struct GNUNET_TESTBED_Operation *common_operation;
112
113 /**
114  * Abort task identifier
115  */
116 static GNUNET_SCHEDULER_TaskIdentifier abort_task;
117
118 /**
119  * Different stages in testing
120  */
121 enum Stage
122 {
123
124     /**
125      * Initial stage
126      */
127   INIT,
128
129     /**
130      * peers are created
131      */
132   PEERS_CREATED,
133
134     /**
135      * peers are started
136      */
137   PEERS_STARTED,
138
139     /**
140      * peers are connected
141      */
142   PEERS_CONNECTED,
143
144     /**
145      * peers are stopped
146      */
147   PEERS_STOPPED,
148
149     /**
150      * Final success stage
151      */
152   SUCCESS
153 };
154
155 /**
156  * The testing result
157  */
158 static enum Stage result;
159
160
161 /**
162  * Shutdown nicely
163  *
164  * @param cls NULL
165  * @param tc the task context
166  */
167 static void
168 do_shutdown (void *cls, const const struct GNUNET_SCHEDULER_TaskContext *tc)
169 {
170   if (GNUNET_SCHEDULER_NO_TASK != abort_task)
171     GNUNET_SCHEDULER_cancel (abort_task);
172   if (NULL != reg_handle)
173     GNUNET_TESTBED_cancel_registration (reg_handle);
174   GNUNET_TESTBED_controller_disconnect (controller);
175   GNUNET_CONFIGURATION_destroy (cfg);
176   if (NULL != cp)
177     GNUNET_TESTBED_controller_stop (cp);
178   GNUNET_TESTBED_host_destroy (neighbour);
179   GNUNET_TESTBED_host_destroy (host);
180 }
181
182
183 /**
184  * abort task to run on test timed out
185  *
186  * @param cls NULL
187  * @param tc the task context
188  */
189 static void
190 do_abort (void *cls, const const struct GNUNET_SCHEDULER_TaskContext *tc)
191 {
192   LOG (GNUNET_ERROR_TYPE_WARNING, "Test timedout -- Aborting\n");
193   abort_task = GNUNET_SCHEDULER_NO_TASK;
194   do_shutdown (cls, tc);
195 }
196
197
198 /**
199  * Signature of the event handler function called by the
200  * respective event controller.
201  *
202  * @param cls closure
203  * @param event information about the event
204  */
205 static void
206 controller_cb (void *cls, const struct GNUNET_TESTBED_EventInformation *event)
207 {
208   switch (event->type)
209   {
210   case GNUNET_TESTBED_ET_OPERATION_FINISHED:   /* Will be reached when we destroy peers */
211     GNUNET_assert (PEERS_STOPPED == result);
212     GNUNET_assert (NULL == event->details.operation_finished.op_cls);
213     GNUNET_assert (NULL == event->details.operation_finished.emsg);
214     GNUNET_assert (GNUNET_TESTBED_PIT_GENERIC ==
215                    event->details.operation_finished.pit);
216     GNUNET_assert (NULL == event->details.operation_finished.op_result.generic);
217     if (event->details.operation_finished.operation == peer1.operation)
218     {
219       GNUNET_TESTBED_operation_done (peer1.operation);
220       peer1.operation = NULL;
221       peer1.peer = NULL;
222     }
223     else if (event->details.operation_finished.operation == peer2.operation)
224     {
225       GNUNET_TESTBED_operation_done (peer2.operation);
226       peer2.operation = NULL;
227       peer2.peer = NULL;
228     }
229     else
230       GNUNET_assert (0);
231     if ((NULL == peer1.peer) && (NULL == peer2.peer))
232     {
233       result = SUCCESS;
234       GNUNET_SCHEDULER_add_now (&do_shutdown, NULL);
235     }
236     break;
237   case GNUNET_TESTBED_ET_PEER_START:
238     GNUNET_assert (INIT == result);
239     GNUNET_assert (event->details.peer_start.host == host);
240     if (event->details.peer_start.peer == peer1.peer)
241     {
242       peer1.is_running = GNUNET_YES;
243       GNUNET_TESTBED_operation_done (peer1.operation);
244       peer1.operation = NULL;
245     }
246     else if (event->details.peer_start.peer == peer2.peer)
247     {
248       peer2.is_running = GNUNET_YES;
249       GNUNET_TESTBED_operation_done (peer2.operation);
250       peer2.operation = NULL;
251     }
252     else
253       GNUNET_assert (0);
254     if ((GNUNET_YES == peer1.is_running) && (GNUNET_YES == peer2.is_running))
255     {
256       result = PEERS_STARTED;
257       common_operation =
258           GNUNET_TESTBED_overlay_connect (NULL, peer1.peer, peer2.peer);
259     }
260     break;
261   case GNUNET_TESTBED_ET_PEER_STOP:
262     GNUNET_assert (PEERS_CONNECTED == result);
263     if (event->details.peer_stop.peer == peer1.peer)
264     {
265       peer1.is_running = GNUNET_NO;
266       GNUNET_TESTBED_operation_done (peer1.operation);
267       peer1.operation = GNUNET_TESTBED_peer_destroy (peer1.peer);
268     }
269     else if (event->details.peer_stop.peer == peer2.peer)
270     {
271       peer2.is_running = GNUNET_NO;
272       GNUNET_TESTBED_operation_done (peer2.operation);
273       peer2.operation = GNUNET_TESTBED_peer_destroy (peer2.peer);
274     }
275     else
276       GNUNET_assert (0);
277     if ((GNUNET_NO == peer1.is_running) && (GNUNET_NO == peer2.is_running))
278       result = PEERS_STOPPED;
279     break;
280   case GNUNET_TESTBED_ET_CONNECT:
281     GNUNET_assert (PEERS_STARTED == result);
282     GNUNET_assert (NULL == peer1.operation);
283     GNUNET_assert (NULL == peer2.operation);
284     GNUNET_assert (NULL != common_operation);
285     GNUNET_assert ((event->details.peer_connect.peer1 == peer1.peer) &&
286                    (event->details.peer_connect.peer2 == peer2.peer));
287     GNUNET_TESTBED_operation_done (common_operation);
288     common_operation = NULL;
289     result = PEERS_CONNECTED;
290     LOG (GNUNET_ERROR_TYPE_DEBUG, "Peers connected\n");
291     peer1.operation = GNUNET_TESTBED_peer_stop (peer1.peer);
292     peer2.operation = GNUNET_TESTBED_peer_stop (peer2.peer);
293     break;
294   default:
295     GNUNET_assert (0);
296   };
297 }
298
299
300 /**
301  * Functions of this signature are called when a peer has been successfully
302  * created
303  *
304  * @param cls the closure from GNUNET_TESTBED_peer_create()
305  * @param peer the handle for the created peer; NULL on any error during
306  *          creation
307  * @param emsg NULL if peer is not NULL; else MAY contain the error description
308  */
309 static void
310 peer_create_cb (void *cls, struct GNUNET_TESTBED_Peer *peer, const char *emsg)
311 {
312   struct PeerContext *pc = cls;
313
314   GNUNET_assert (NULL != pc->operation);
315   GNUNET_assert (NULL != peer);
316   GNUNET_assert (NULL == pc->peer);
317   pc->peer = peer;
318   GNUNET_TESTBED_operation_done (pc->operation);
319   pc->operation = GNUNET_TESTBED_peer_start (pc->peer);
320 }
321
322
323 /**
324  * Callback which will be called to after a host registration succeeded or failed
325  *
326  * @param cls the host which has been registered
327  * @param emsg the error message; NULL if host registration is successful
328  */
329 static void
330 registration_comp (void *cls, const char *emsg)
331 {
332   GNUNET_assert (cls == neighbour);
333   reg_handle = NULL;
334   peer1.operation =
335       GNUNET_TESTBED_peer_create (controller, host, cfg, &peer_create_cb,
336                                   &peer1);
337   peer2.operation =
338       GNUNET_TESTBED_peer_create (controller, host, cfg, &peer_create_cb,
339                                   &peer2);
340   GNUNET_assert (NULL != peer1.operation);
341   GNUNET_assert (NULL != peer2.operation);
342 }
343
344
345 /**
346  * Callback to signal successfull startup of the controller process
347  *
348  * @param cls the closure from GNUNET_TESTBED_controller_start()
349  * @param cfg the configuration with which the controller has been started;
350  *          NULL if status is not GNUNET_OK
351  * @param status GNUNET_OK if the startup is successfull; GNUNET_SYSERR if not,
352  *          GNUNET_TESTBED_controller_stop() shouldn't be called in this case
353  */
354 static void
355 status_cb (void *cls, const struct GNUNET_CONFIGURATION_Handle *cfg, int status)
356 {
357   uint64_t event_mask;
358
359   GNUNET_assert (GNUNET_OK == status);
360   event_mask = 0;
361   event_mask |= (1L << GNUNET_TESTBED_ET_PEER_START);
362   event_mask |= (1L << GNUNET_TESTBED_ET_PEER_STOP);
363   event_mask |= (1L << GNUNET_TESTBED_ET_CONNECT);
364   event_mask |= (1L << GNUNET_TESTBED_ET_OPERATION_FINISHED);
365   controller =
366       GNUNET_TESTBED_controller_connect (cfg, host, event_mask, &controller_cb,
367                                          NULL);
368   GNUNET_assert (NULL != controller);
369   neighbour = GNUNET_TESTBED_host_create ("localhost", NULL, 0);
370   GNUNET_assert (NULL != neighbour);
371   reg_handle =
372       GNUNET_TESTBED_register_host (controller, neighbour, &registration_comp,
373                                     neighbour);
374   GNUNET_assert (NULL != reg_handle);
375 }
376
377
378
379 /**
380  * Main run function.
381  *
382  * @param cls NULL
383  * @param args arguments passed to GNUNET_PROGRAM_run
384  * @param cfgfile the path to configuration file
385  * @param cfg the configuration file handle
386  */
387 static void
388 run (void *cls, char *const *args, const char *cfgfile,
389      const struct GNUNET_CONFIGURATION_Handle *config)
390 {
391   host = GNUNET_TESTBED_host_create (NULL, NULL, 0);
392   GNUNET_assert (NULL != host);
393   cfg = GNUNET_CONFIGURATION_dup (config);
394   cp = GNUNET_TESTBED_controller_start ("127.0.0.1", host, cfg, status_cb,
395                                         NULL);
396   abort_task =
397       GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_relative_multiply
398                                     (GNUNET_TIME_UNIT_MINUTES, 30), &do_abort,
399                                     NULL);
400 }
401
402
403 /**
404  * Main function
405  */
406 int
407 main (int argc, char **argv)
408 {
409   int ret;
410
411   char *const argv2[] = { "test_testbed_api_2peers",
412     "-c", "test_testbed_api.conf",
413     NULL
414   };
415   struct GNUNET_GETOPT_CommandLineOption options[] = {
416     GNUNET_GETOPT_OPTION_END
417   };
418   result = INIT;
419   ret =
420       GNUNET_PROGRAM_run ((sizeof (argv2) / sizeof (char *)) - 1, argv2,
421                           "test_testbed_api_2peers", "nohelp", options, &run,
422                           NULL);
423   if ((GNUNET_OK != ret) || (SUCCESS != result))
424     return 1;
425   return 0;
426 }