last step to new cadet api
[oweals/gnunet.git] / src / testbed / test_testbed_api_barriers.c
1 /*
2       This file is part of GNUnet
3       Copyright (C) 2008--2013 GNUnet e.V.
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., 51 Franklin Street, Fifth Floor,
18       Boston, MA 02110-1301, USA.
19  */
20
21 /**
22  * @file testbed/test_testbed_api_barriers.c
23  * @brief testcase binary for testing testbed barriers API
24  * @author Sree Harsha Totakura <sreeharsha@totakura.in>
25  */
26
27 #include "platform.h"
28 #include "gnunet_util_lib.h"
29 #include "gnunet_testbed_service.h"
30 #include "test_testbed_api_barriers.h"
31
32
33 /**
34  * logging short hand
35  */
36 #define LOG(type,...) \
37   GNUNET_log (type, __VA_ARGS__);
38
39 /**
40  * Number of peers we start in this test case
41  */
42 #define NUM_PEERS 3
43
44
45 /**
46  * Our barrier
47  */
48 struct GNUNET_TESTBED_Barrier *barrier;
49
50 /**
51  * Identifier for the shutdown task
52  */
53 static struct GNUNET_SCHEDULER_Task *timeout_task;
54
55 /**
56  * Result of this test case
57  */
58 static int result;
59
60
61 /**
62  * Handle SIGINT and SIGTERM
63  */
64 static void
65 shutdown_handler(void *cls)
66 {
67   if (NULL != timeout_task)
68   {
69     GNUNET_SCHEDULER_cancel(timeout_task);
70     timeout_task = NULL;
71   }
72 }
73
74
75 /**
76  * Shutdown this test case when it takes too long
77  *
78  * @param cls NULL
79  */
80 static void
81 do_timeout (void *cls)
82 {
83   timeout_task = NULL;
84   if (barrier != NULL)
85       GNUNET_TESTBED_barrier_cancel (barrier);
86   GNUNET_SCHEDULER_shutdown ();
87 }
88
89
90 /**
91  * Functions of this type are to be given as callback argument to
92  * GNUNET_TESTBED_barrier_init().  The callback will be called when status
93  * information is available for the barrier.
94  *
95  * @param cls the closure given to GNUNET_TESTBED_barrier_init()
96  * @param name the name of the barrier
97  * @param barrier the barrier handle
98  * @param status status of the barrier; #GNUNET_OK if the barrier is crossed;
99  *   #GNUNET_SYSERR upon error
100  * @param emsg if the status were to be #GNUNET_SYSERR, this parameter has the
101  *   error messsage
102  */
103 static void
104 barrier_cb (void *cls,
105             const char *name,
106             struct GNUNET_TESTBED_Barrier *_barrier,
107             enum GNUNET_TESTBED_BarrierStatus status,
108             const char *emsg)
109 {
110   static enum GNUNET_TESTBED_BarrierStatus old_status;
111
112   GNUNET_assert (NULL == cls);
113   GNUNET_assert (_barrier == barrier);
114   switch (status)
115   {
116   case GNUNET_TESTBED_BARRIERSTATUS_INITIALISED:
117     LOG (GNUNET_ERROR_TYPE_INFO,
118          "Barrier initialised\n");
119     old_status = status;
120     return;
121   case GNUNET_TESTBED_BARRIERSTATUS_ERROR:
122     LOG (GNUNET_ERROR_TYPE_ERROR,
123          "Barrier initialisation failed: %s",
124          (NULL == emsg) ? "unknown reason" : emsg);
125     break;
126   case GNUNET_TESTBED_BARRIERSTATUS_CROSSED:
127     LOG (GNUNET_ERROR_TYPE_INFO,
128          "Barrier crossed\n");
129     if (old_status == GNUNET_TESTBED_BARRIERSTATUS_INITIALISED)
130       result = GNUNET_OK;
131     break;
132   default:
133     GNUNET_assert (0);
134     return;
135   }
136   barrier = NULL;
137   GNUNET_SCHEDULER_shutdown ();
138 }
139
140
141 /**
142  * Signature of a main function for a testcase.
143  *
144  * @param cls closure
145  * @param h the run handle
146  * @param num_peers number of peers in 'peers'
147  * @param peers_ handle to peers run in the testbed
148  * @param links_succeeded the number of overlay link connection attempts that
149  *          succeeded
150  * @param links_failed the number of overlay link connection attempts that
151  *          failed
152  */
153 static void
154 test_master (void *cls,
155              struct GNUNET_TESTBED_RunHandle *h,
156              unsigned int num_peers,
157              struct GNUNET_TESTBED_Peer **peers_,
158              unsigned int links_succeeded,
159              unsigned int links_failed)
160 {
161   struct GNUNET_TESTBED_Controller *c;
162
163   GNUNET_assert (NULL == cls);
164   if (NULL == peers_)
165   {
166     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
167                 "Failing test due to timeout\n");
168     return;
169   }
170   GNUNET_assert (NUM_PEERS == num_peers);
171   c = GNUNET_TESTBED_run_get_controller_handle (h);
172   barrier = GNUNET_TESTBED_barrier_init (c,
173                                          TEST_BARRIER_NAME,
174                                          100,
175                                          &barrier_cb,
176                                          NULL);
177   timeout_task =
178       GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_relative_multiply
179                                     (GNUNET_TIME_UNIT_SECONDS,
180                                      10 * (NUM_PEERS + 1)),
181                                     &do_timeout, NULL);
182   GNUNET_SCHEDULER_add_shutdown(&shutdown_handler, NULL);
183 }
184
185
186 #ifndef PATH_MAX
187 /**
188  * Assumed maximum path length (for the log file name).
189  */
190 #define PATH_MAX 4096
191 #endif
192
193
194 /**
195  * Main function
196  */
197 int
198 main (int argc, char **argv)
199 {
200   struct GNUNET_CONFIGURATION_Handle *cfg;
201   char pwd[PATH_MAX];
202   char *binary;
203   uint64_t event_mask;
204
205   result = GNUNET_SYSERR;
206   event_mask = 0;
207   cfg = GNUNET_CONFIGURATION_create ();
208   GNUNET_assert (GNUNET_YES ==
209                  GNUNET_CONFIGURATION_parse (cfg,
210                                              "test_testbed_api_barriers.conf.in"));
211   if (NULL == getcwd (pwd, PATH_MAX))
212     return 1;
213   GNUNET_assert (0 < GNUNET_asprintf (&binary, "%s/%s", pwd,
214                                       "gnunet-service-test-barriers"));
215   GNUNET_CONFIGURATION_set_value_string (cfg, "test-barriers","BINARY", binary);
216   GNUNET_assert (GNUNET_OK == GNUNET_CONFIGURATION_write
217                  (cfg, "test_testbed_api_barriers.conf"));
218   GNUNET_CONFIGURATION_destroy (cfg);
219   cfg = NULL;
220   GNUNET_free (binary);
221   binary = NULL;
222   (void) GNUNET_TESTBED_test_run ("test_testbed_api_barriers",
223                                   "test_testbed_api_barriers.conf", NUM_PEERS,
224                                   event_mask, NULL, NULL,
225                                   &test_master, NULL);
226   (void) unlink ("test_testbed_api_barriers.conf");
227   if (GNUNET_OK != result)
228     return 1;
229   return 0;
230 }