hacking overlay connect
[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:
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 ==
217                   event->details.operation_finished.op_result.generic);
218    if (event->details.operation_finished.operation == peer1.operation)
219    {
220      GNUNET_TESTBED_operation_done (peer1.operation);
221      peer1.operation = NULL;
222      peer1.peer = NULL;
223    }
224    else if (event->details.operation_finished.operation == peer2.operation)
225    {
226      GNUNET_TESTBED_operation_done (peer2.operation);
227      peer2.operation = NULL;
228      peer2.peer = NULL;
229    }
230    else
231      GNUNET_assert (0);
232    result = GNUNET_YES;  
233    GNUNET_SCHEDULER_add_now (&do_shutdown, NULL);
234    break;
235  case GNUNET_TESTBED_ET_PEER_START:
236    GNUNET_assert (INIT == result);
237    GNUNET_assert (event->details.peer_start.host == host);
238    if (event->details.peer_start.peer == peer1.peer)
239    {
240      peer1.is_running = GNUNET_YES;
241      GNUNET_TESTBED_operation_done (peer1.operation);
242      peer1.operation = NULL;
243    }
244    else if (event->details.peer_start.peer == peer2.peer)
245    {
246      peer2.is_running = GNUNET_YES;
247      GNUNET_TESTBED_operation_done (peer2.operation);
248      peer2.operation = NULL;
249    }
250    else
251      GNUNET_assert (0);
252    if ((GNUNET_YES == peer1.is_running) && (GNUNET_YES == peer2.is_running))
253    {
254      result = PEERS_STARTED;
255      common_operation =
256        GNUNET_TESTBED_overlay_connect (NULL, peer1.peer, peer2.peer);
257    }
258    break;
259  case GNUNET_TESTBED_ET_PEER_STOP:
260    GNUNET_assert (PEERS_CONNECTED == result);
261    if (event->details.peer_stop.peer == peer1.peer)
262    {
263      peer1.is_running = GNUNET_NO;
264      GNUNET_TESTBED_operation_done (peer1.operation);
265      peer1.operation = GNUNET_TESTBED_peer_destroy (peer1.peer);
266    }
267    else if (event->details.peer_stop.peer == peer2.peer)
268    {
269      peer2.is_running = GNUNET_NO;
270      GNUNET_TESTBED_operation_done (peer2.operation);
271      peer2.operation = GNUNET_TESTBED_peer_destroy (peer2.peer);
272    }
273    else
274      GNUNET_assert (0);
275    if ((GNUNET_NO == peer1.is_running) && (GNUNET_NO == peer2.is_running))
276      result = PEERS_STOPPED;
277    break;
278  case GNUNET_TESTBED_ET_CONNECT:
279    GNUNET_assert (PEERS_STARTED == result);
280    GNUNET_assert (NULL == peer1.operation);
281    GNUNET_assert (NULL == peer2.operation);
282    GNUNET_assert (NULL != common_operation);
283    GNUNET_assert ((event->details.peer_connect.peer1 == peer1.peer) 
284                   && (event->details.peer_connect.peer2 == peer2.peer));
285    GNUNET_TESTBED_operation_done (common_operation);
286    common_operation = NULL;
287    result = PEERS_CONNECTED;
288    peer1.operation = GNUNET_TESTBED_peer_stop (peer1.peer);
289    peer2.operation = GNUNET_TESTBED_peer_stop (peer2.peer);  
290    break;
291  default:
292    GNUNET_assert (0);
293  };
294 }
295
296
297 /**
298  * Functions of this signature are called when a peer has been successfully
299  * created
300  *
301  * @param cls the closure from GNUNET_TESTBED_peer_create()
302  * @param peer the handle for the created peer; NULL on any error during
303  *          creation
304  * @param emsg NULL if peer is not NULL; else MAY contain the error description
305  */
306 static void
307 peer_create_cb (void *cls,
308                 struct GNUNET_TESTBED_Peer *peer, const char *emsg)
309 {
310   struct PeerContext *pc = cls;
311
312   GNUNET_assert (NULL != pc->operation);
313   GNUNET_assert (NULL != peer);
314   GNUNET_assert (NULL == pc->peer);
315   pc->peer = peer;
316   GNUNET_TESTBED_operation_done (pc->operation);
317   pc->operation = GNUNET_TESTBED_peer_start (pc->peer);
318 }
319
320
321 /**
322  * Callback which will be called to after a host registration succeeded or failed
323  *
324  * @param cls the host which has been registered
325  * @param emsg the error message; NULL if host registration is successful
326  */
327 static void 
328 registration_comp (void *cls, const char *emsg)
329 {
330   GNUNET_assert (cls == neighbour);
331   reg_handle = NULL;  
332   peer1.operation = GNUNET_TESTBED_peer_create (controller, host, cfg,
333                                                 &peer_create_cb, &peer1);
334   peer2.operation = GNUNET_TESTBED_peer_create (controller, host, cfg,
335                                                 &peer_create_cb, &peer2);
336   GNUNET_assert (NULL != peer1.operation);
337   GNUNET_assert (NULL != peer2.operation);
338 }
339
340
341 /**
342  * Callback to signal successfull startup of the controller process
343  *
344  * @param cls the closure from GNUNET_TESTBED_controller_start()
345  * @param cfg the configuration with which the controller has been started;
346  *          NULL if status is not GNUNET_OK
347  * @param status GNUNET_OK if the startup is successfull; GNUNET_SYSERR if not,
348  *          GNUNET_TESTBED_controller_stop() shouldn't be called in this case
349  */
350 static void 
351 status_cb (void *cls, 
352            const struct GNUNET_CONFIGURATION_Handle *cfg, int status)
353 {
354   uint64_t event_mask;
355
356   GNUNET_assert (GNUNET_OK == status);
357   event_mask = 0;
358   event_mask |= (1L << GNUNET_TESTBED_ET_PEER_START);
359   event_mask |= (1L << GNUNET_TESTBED_ET_PEER_STOP);
360   event_mask |= (1L << GNUNET_TESTBED_ET_CONNECT);
361   event_mask |= (1L << GNUNET_TESTBED_ET_OPERATION_FINISHED);
362   controller = GNUNET_TESTBED_controller_connect (cfg, host, event_mask,
363                                                   &controller_cb, NULL);
364   GNUNET_assert (NULL != controller);
365   neighbour = GNUNET_TESTBED_host_create ("localhost", NULL, 0);
366   GNUNET_assert (NULL != neighbour);
367   reg_handle = 
368     GNUNET_TESTBED_register_host (controller, neighbour, &registration_comp,
369                                   neighbour);
370   GNUNET_assert (NULL != reg_handle);
371 }
372
373
374
375 /**
376  * Main run function. 
377  *
378  * @param cls NULL
379  * @param args arguments passed to GNUNET_PROGRAM_run
380  * @param cfgfile the path to configuration file
381  * @param cfg the configuration file handle
382  */
383 static void
384 run (void *cls, char *const *args, const char *cfgfile,
385      const struct GNUNET_CONFIGURATION_Handle *config)
386 {
387   host = GNUNET_TESTBED_host_create (NULL, NULL, 0);
388   GNUNET_assert (NULL != host);
389   cfg = GNUNET_CONFIGURATION_dup (config);
390   cp = GNUNET_TESTBED_controller_start ("127.0.0.1", host, cfg, status_cb, NULL);
391   abort_task = GNUNET_SCHEDULER_add_delayed 
392     (GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_MINUTES, 30), &do_abort, NULL);
393 }
394
395
396 /**
397  * Main function
398  */
399 int main (int argc, char **argv)
400 {
401   int ret;
402
403   char *const argv2[] = { "test_testbed_api",
404                           "-c", "test_testbed_api.conf",
405                           NULL
406   };
407   struct GNUNET_GETOPT_CommandLineOption options[] = {
408     GNUNET_GETOPT_OPTION_END
409   };
410   result = INIT;
411   ret = GNUNET_PROGRAM_run ((sizeof (argv2) / sizeof (char *)) - 1, argv2,
412                             "test_testbed_api_2peers", "nohelp", options, &run,
413                             NULL);
414   if ((GNUNET_OK != ret) || (SUCCESS != result))
415     return 1;
416   return 0;
417 }