added controller link testcase to default tests
[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 ==
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    if ((NULL == peer1.peer) && (NULL == peer2.peer))
233    {
234      result = SUCCESS;
235      GNUNET_SCHEDULER_add_now (&do_shutdown, NULL);
236    }
237    break;
238  case GNUNET_TESTBED_ET_PEER_START:
239    GNUNET_assert (INIT == result);
240    GNUNET_assert (event->details.peer_start.host == host);
241    if (event->details.peer_start.peer == peer1.peer)
242    {
243      peer1.is_running = GNUNET_YES;
244      GNUNET_TESTBED_operation_done (peer1.operation);
245      peer1.operation = NULL;
246    }
247    else if (event->details.peer_start.peer == peer2.peer)
248    {
249      peer2.is_running = GNUNET_YES;
250      GNUNET_TESTBED_operation_done (peer2.operation);
251      peer2.operation = NULL;
252    }
253    else
254      GNUNET_assert (0);
255    if ((GNUNET_YES == peer1.is_running) && (GNUNET_YES == peer2.is_running))
256    {
257      result = PEERS_STARTED;
258      common_operation =
259        GNUNET_TESTBED_overlay_connect (NULL, peer1.peer, peer2.peer);
260    }
261    break;
262  case GNUNET_TESTBED_ET_PEER_STOP:
263    GNUNET_assert (PEERS_CONNECTED == result);
264    if (event->details.peer_stop.peer == peer1.peer)
265    {
266      peer1.is_running = GNUNET_NO;
267      GNUNET_TESTBED_operation_done (peer1.operation);
268      peer1.operation = GNUNET_TESTBED_peer_destroy (peer1.peer);
269    }
270    else if (event->details.peer_stop.peer == peer2.peer)
271    {
272      peer2.is_running = GNUNET_NO;
273      GNUNET_TESTBED_operation_done (peer2.operation);
274      peer2.operation = GNUNET_TESTBED_peer_destroy (peer2.peer);
275    }
276    else
277      GNUNET_assert (0);
278    if ((GNUNET_NO == peer1.is_running) && (GNUNET_NO == peer2.is_running))
279      result = PEERS_STOPPED;
280    break;
281  case GNUNET_TESTBED_ET_CONNECT:
282    GNUNET_assert (PEERS_STARTED == result);
283    GNUNET_assert (NULL == peer1.operation);
284    GNUNET_assert (NULL == peer2.operation);
285    GNUNET_assert (NULL != common_operation);
286    GNUNET_assert ((event->details.peer_connect.peer1 == peer1.peer) 
287                   && (event->details.peer_connect.peer2 == peer2.peer));
288    GNUNET_TESTBED_operation_done (common_operation);
289    common_operation = NULL;
290    result = PEERS_CONNECTED;
291    LOG (GNUNET_ERROR_TYPE_DEBUG, "Peers connected\n");
292    peer1.operation = GNUNET_TESTBED_peer_stop (peer1.peer);
293    peer2.operation = GNUNET_TESTBED_peer_stop (peer2.peer);  
294    break;
295  default:
296    GNUNET_assert (0);
297  };
298 }
299
300
301 /**
302  * Functions of this signature are called when a peer has been successfully
303  * created
304  *
305  * @param cls the closure from GNUNET_TESTBED_peer_create()
306  * @param peer the handle for the created peer; NULL on any error during
307  *          creation
308  * @param emsg NULL if peer is not NULL; else MAY contain the error description
309  */
310 static void
311 peer_create_cb (void *cls,
312                 struct GNUNET_TESTBED_Peer *peer, const char *emsg)
313 {
314   struct PeerContext *pc = cls;
315
316   GNUNET_assert (NULL != pc->operation);
317   GNUNET_assert (NULL != peer);
318   GNUNET_assert (NULL == pc->peer);
319   pc->peer = peer;
320   GNUNET_TESTBED_operation_done (pc->operation);
321   pc->operation = GNUNET_TESTBED_peer_start (pc->peer);
322 }
323
324
325 /**
326  * Callback which will be called to after a host registration succeeded or failed
327  *
328  * @param cls the host which has been registered
329  * @param emsg the error message; NULL if host registration is successful
330  */
331 static void 
332 registration_comp (void *cls, const char *emsg)
333 {
334   GNUNET_assert (cls == neighbour);
335   reg_handle = NULL;  
336   peer1.operation = GNUNET_TESTBED_peer_create (controller, host, cfg,
337                                                 &peer_create_cb, &peer1);
338   peer2.operation = GNUNET_TESTBED_peer_create (controller, host, cfg,
339                                                 &peer_create_cb, &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, 
356            const struct GNUNET_CONFIGURATION_Handle *cfg, int status)
357 {
358   uint64_t event_mask;
359
360   GNUNET_assert (GNUNET_OK == status);
361   event_mask = 0;
362   event_mask |= (1L << GNUNET_TESTBED_ET_PEER_START);
363   event_mask |= (1L << GNUNET_TESTBED_ET_PEER_STOP);
364   event_mask |= (1L << GNUNET_TESTBED_ET_CONNECT);
365   event_mask |= (1L << GNUNET_TESTBED_ET_OPERATION_FINISHED);
366   controller = GNUNET_TESTBED_controller_connect (cfg, host, event_mask,
367                                                   &controller_cb, 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, NULL);
395   abort_task = GNUNET_SCHEDULER_add_delayed 
396     (GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_MINUTES, 30), &do_abort, NULL);
397 }
398
399
400 /**
401  * Main function
402  */
403 int main (int argc, char **argv)
404 {
405   int ret;
406
407   char *const argv2[] = { "test_testbed_api_2peers",
408                           "-c", "test_testbed_api.conf",
409                           NULL
410   };
411   struct GNUNET_GETOPT_CommandLineOption options[] = {
412     GNUNET_GETOPT_OPTION_END
413   };
414   result = INIT;
415   ret = GNUNET_PROGRAM_run ((sizeof (argv2) / sizeof (char *)) - 1, argv2,
416                             "test_testbed_api_2peers", "nohelp", options, &run,
417                             NULL);
418   if ((GNUNET_OK != ret) || (SUCCESS != result))
419     return 1;
420   return 0;
421 }