aboutsummaryrefslogtreecommitdiff
path: root/src/testbed/test_testbed_api.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/testbed/test_testbed_api.c')
-rw-r--r--src/testbed/test_testbed_api.c515
1 files changed, 0 insertions, 515 deletions
diff --git a/src/testbed/test_testbed_api.c b/src/testbed/test_testbed_api.c
deleted file mode 100644
index a46a7596a..000000000
--- a/src/testbed/test_testbed_api.c
+++ /dev/null
@@ -1,515 +0,0 @@
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 it
6 under the terms of the GNU Affero General Public License as published
7 by the Free Software Foundation, either version 3 of the License,
8 or (at your 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 Affero General Public License for more details.
14
15 You should have received a copy of the GNU Affero General Public License
16 along with this program. If not, see <http://www.gnu.org/licenses/>.
17
18 SPDX-License-Identifier: AGPL3.0-or-later
19 */
20
21/**
22 * @file testbed/test_testbed_api.c
23 * @brief testcases for the testbed api
24 * @author Sree Harsha Totakura
25 */
26
27#include "platform.h"
28#include "gnunet_util_lib.h"
29#include "gnunet_arm_service.h"
30#include "gnunet_testing_lib.h"
31#include "gnunet_testbed_service.h"
32
33/**
34 * Generic logging shortcut
35 */
36#define LOG(kind, ...) \
37 GNUNET_log (kind, __VA_ARGS__)
38
39/**
40 * Relative time seconds shorthand
41 */
42#define TIME_REL_SECS(sec) \
43 GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, sec)
44
45/**
46 * Our localhost
47 */
48static struct GNUNET_TESTBED_Host *host;
49
50/**
51 * The controller process
52 */
53static struct GNUNET_TESTBED_ControllerProc *cp;
54
55/**
56 * The controller handle
57 */
58static struct GNUNET_TESTBED_Controller *controller;
59
60/**
61 * A neighbouring host
62 */
63static struct GNUNET_TESTBED_Host *neighbour;
64
65/**
66 * Handle for neighbour registration
67 */
68static struct GNUNET_TESTBED_HostRegistrationHandle *reg_handle;
69
70/**
71 * Handle for a peer
72 */
73static struct GNUNET_TESTBED_Peer *peer;
74
75/**
76 * Handle to configuration
77 */
78static struct GNUNET_CONFIGURATION_Handle *cfg;
79
80/**
81 * Handle to operation
82 */
83static struct GNUNET_TESTBED_Operation *operation;
84
85/**
86 * Handle to peer's ARM service
87 */
88static struct GNUNET_ARM_Handle *arm_handle;
89
90/**
91 * Abort task identifier
92 */
93static struct GNUNET_SCHEDULER_Task *abort_task;
94
95/**
96 * The testing result
97 */
98static int result;
99
100
101/**
102 * Enumeration of sub testcases
103 */
104enum Test
105{
106 /**
107 * Test cases which are not covered by the below ones
108 */
109 OTHER,
110
111 /**
112 * Test where we get a peer config from controller
113 */
114 PEER_GETCONFIG,
115
116 /**
117 * Test where we connect to a service running on the peer
118 */
119 PEER_SERVICE_CONNECT,
120
121 /**
122 * Test where we get a peer's identity from controller
123 */
124 PEER_DESTROY
125};
126
127/**
128 * Testing status
129 */
130static enum Test sub_test;
131
132/**
133 * Shutdown nicely
134 *
135 * @param cls NULL
136 * @param tc the task context
137 */
138static void
139do_shutdown (void *cls)
140{
141 LOG (GNUNET_ERROR_TYPE_DEBUG, "Shutting down...\n");
142 if (NULL != abort_task)
143 GNUNET_SCHEDULER_cancel (abort_task);
144 if (NULL != reg_handle)
145 GNUNET_TESTBED_cancel_registration (reg_handle);
146 if (NULL != controller)
147 GNUNET_TESTBED_controller_disconnect (controller);
148 if (NULL != cfg)
149 GNUNET_CONFIGURATION_destroy (cfg);
150 if (NULL != cp)
151 GNUNET_TESTBED_controller_stop (cp);
152 if (NULL != neighbour)
153 GNUNET_TESTBED_host_destroy (neighbour);
154 if (NULL != host)
155 GNUNET_TESTBED_host_destroy (host);
156}
157
158
159/**
160 * shortcut to exit during failure
161 */
162#define FAIL_TEST(cond, ret) do { \
163 if (! (cond)) { \
164 GNUNET_break (0); \
165 if (NULL != abort_task) \
166 GNUNET_SCHEDULER_cancel (abort_task); \
167 abort_task = NULL; \
168 GNUNET_SCHEDULER_add_now (do_shutdown, NULL); \
169 ret; \
170 } \
171} while (0)
172
173
174/**
175 * abort task to run on test timed out
176 *
177 * @param cls NULL
178 * @param tc the task context
179 */
180static void
181do_abort (void *cls)
182{
183 LOG (GNUNET_ERROR_TYPE_WARNING, "Test timedout -- Aborting\n");
184 abort_task = NULL;
185 do_shutdown (cls);
186}
187
188
189/**
190 * Adapter function called to establish a connection to
191 * a service.
192 *
193 * @param cls closure
194 * @param cfg configuration of the peer to connect to; will be available until
195 * GNUNET_TESTBED_operation_done() is called on the operation returned
196 * from GNUNET_TESTBED_service_connect()
197 * @return service handle to return in 'op_result', NULL on error
198 */
199static void *
200arm_connect_adapter (void *cls,
201 const struct GNUNET_CONFIGURATION_Handle *cfg)
202{
203 FAIL_TEST (NULL == cls, return NULL);
204 FAIL_TEST (OTHER == sub_test, return NULL);
205 sub_test = PEER_SERVICE_CONNECT;
206 arm_handle = GNUNET_ARM_connect (cfg, NULL, NULL);
207 return arm_handle;
208}
209
210
211/**
212 * Adapter function called to destroy a connection to
213 * a service.
214 *
215 * @param cls closure
216 * @param op_result service handle returned from the connect adapter
217 */
218static void
219arm_disconnect_adapter (void *cls,
220 void *op_result)
221{
222 FAIL_TEST (NULL != op_result, return );
223 FAIL_TEST (op_result == arm_handle, return );
224 GNUNET_ARM_disconnect (arm_handle);
225 arm_handle = NULL;
226 FAIL_TEST (PEER_SERVICE_CONNECT == sub_test, return );
227 FAIL_TEST (NULL != operation, return );
228 operation = GNUNET_TESTBED_peer_stop (NULL, peer, NULL, NULL);
229 FAIL_TEST (NULL != operation, return );
230}
231
232
233/**
234 * Callback to be called when a service connect operation is completed
235 *
236 * @param cls the callback closure from functions generating an operation
237 * @param op the operation that has been finished
238 * @param ca_result the service handle returned from GNUNET_TESTBED_ConnectAdapter()
239 * @param emsg error message in case the operation has failed; will be NULL if
240 * operation has executed successfully.
241 */
242static void
243service_connect_comp_cb (void *cls,
244 struct GNUNET_TESTBED_Operation *op,
245 void *ca_result,
246 const char *emsg)
247{
248 switch (sub_test)
249 {
250 case PEER_SERVICE_CONNECT:
251 FAIL_TEST (operation == op, return );
252 FAIL_TEST (NULL == emsg, return );
253 FAIL_TEST (NULL == cls, return );
254 FAIL_TEST (ca_result == arm_handle, return );
255 GNUNET_TESTBED_operation_done (operation); /* This results in call to
256 * disconnect adapter */
257 break;
258
259 default:
260 FAIL_TEST (0, return );
261 }
262}
263
264
265/**
266 * Callback to be called when the requested peer information is available
267 *
268 * @param cb_cls the closure from GNUNET_TETSBED_peer_get_information()
269 * @param op the operation this callback corresponds to
270 * @param pinfo the result; will be NULL if the operation has failed
271 * @param emsg error message if the operation has failed; will be NULL if the
272 * operation is successful
273 */
274static void
275peerinfo_cb (void *cb_cls,
276 struct GNUNET_TESTBED_Operation *op,
277 const struct GNUNET_TESTBED_PeerInformation *pinfo,
278 const char *emsg)
279{
280 switch (sub_test)
281 {
282 case PEER_GETCONFIG:
283 FAIL_TEST (NULL != pinfo, return );
284 FAIL_TEST (NULL == emsg, return );
285 FAIL_TEST (NULL == cb_cls, return );
286 FAIL_TEST (operation == op, return );
287 FAIL_TEST (GNUNET_TESTBED_PIT_CONFIGURATION == pinfo->pit, return );
288 FAIL_TEST (NULL != pinfo->result.cfg, return );
289 sub_test = PEER_DESTROY;
290 GNUNET_TESTBED_operation_done (operation);
291 operation = GNUNET_TESTBED_peer_destroy (peer);
292 break;
293
294 default:
295 FAIL_TEST (0, return );
296 }
297}
298
299
300/**
301 * Signature of the event handler function called by the
302 * respective event controller.
303 *
304 * @param cls closure
305 * @param event information about the event
306 */
307static void
308controller_cb (void *cls,
309 const struct GNUNET_TESTBED_EventInformation *event)
310{
311 switch (event->type)
312 {
313 case GNUNET_TESTBED_ET_OPERATION_FINISHED:
314 switch (sub_test)
315 {
316 case PEER_DESTROY:
317 FAIL_TEST (event->op == operation, return );
318 FAIL_TEST (NULL == event->op_cls, return );
319 FAIL_TEST (NULL == event->details.operation_finished.emsg, return );
320 FAIL_TEST (NULL == event->details.operation_finished.generic, return );
321 GNUNET_TESTBED_operation_done (operation);
322 GNUNET_SCHEDULER_add_now (&do_shutdown, NULL);
323 break;
324
325 case PEER_SERVICE_CONNECT:
326 FAIL_TEST (event->op == operation, return );
327 FAIL_TEST (NULL == event->op_cls, return );
328 FAIL_TEST (NULL == event->details.operation_finished.emsg, return );
329 FAIL_TEST (NULL != arm_handle, return );
330 FAIL_TEST (event->details.operation_finished.generic == arm_handle,
331 return );
332 break;
333
334 default:
335 FAIL_TEST (0, return );
336 break;
337 }
338 break;
339
340 case GNUNET_TESTBED_ET_PEER_START:
341 FAIL_TEST (event->details.peer_start.host == host, return );
342 FAIL_TEST (event->details.peer_start.peer == peer, return );
343 FAIL_TEST (OTHER == sub_test, return );
344 GNUNET_TESTBED_operation_done (operation);
345 operation =
346 GNUNET_TESTBED_service_connect (NULL, peer, "dht",
347 &service_connect_comp_cb, NULL,
348 &arm_connect_adapter,
349 &arm_disconnect_adapter, NULL);
350 FAIL_TEST (NULL != operation, return );
351 break;
352
353 case GNUNET_TESTBED_ET_PEER_STOP:
354 FAIL_TEST (event->details.peer_stop.peer == peer, return );
355 FAIL_TEST (PEER_SERVICE_CONNECT == sub_test, return );
356 result = GNUNET_YES;
357 sub_test = PEER_GETCONFIG;
358 GNUNET_TESTBED_operation_done (operation);
359 operation =
360 GNUNET_TESTBED_peer_get_information (peer,
361 GNUNET_TESTBED_PIT_CONFIGURATION,
362 &peerinfo_cb, NULL);
363 break;
364
365 default:
366 FAIL_TEST (0, return ); /* We should never reach this state */
367 }
368}
369
370
371/**
372 * Functions of this signature are called when a peer has been successfully
373 * created
374 *
375 * @param cls the closure from GNUNET_TESTBED_peer_create()
376 * @param peer the handle for the created peer; NULL on any error during
377 * creation
378 * @param emsg NULL if peer is not NULL; else MAY contain the error description
379 */
380static void
381peer_create_cb (void *cls,
382 struct GNUNET_TESTBED_Peer *peer,
383 const char *emsg)
384{
385 struct GNUNET_TESTBED_Peer **peer_ptr;
386
387 peer_ptr = cls;
388 FAIL_TEST (NULL != peer, return );
389 FAIL_TEST (NULL != peer_ptr, return );
390 *peer_ptr = peer;
391 GNUNET_TESTBED_operation_done (operation);
392 operation = GNUNET_TESTBED_peer_start (NULL,
393 peer,
394 NULL,
395 NULL);
396 FAIL_TEST (NULL != operation, return );
397}
398
399
400/**
401 * Callback which will be called to after a host registration succeeded or failed
402 *
403 * @param cls the host which has been registered
404 * @param emsg the error message; NULL if host registration is successful
405 */
406static void
407registration_comp (void *cls,
408 const char *emsg)
409{
410 FAIL_TEST (cls == neighbour, return );
411 reg_handle = NULL;
412 operation =
413 GNUNET_TESTBED_peer_create (controller,
414 host,
415 cfg,
416 &peer_create_cb,
417 &peer);
418 FAIL_TEST (NULL != operation, return );
419}
420
421
422/**
423 * Callback to signal successful startup of the controller process
424 *
425 * @param cls the closure from GNUNET_TESTBED_controller_start()
426 * @param cfg the configuration with which the controller has been started;
427 * NULL if status is not #GNUNET_OK
428 * @param status #GNUNET_OK if the startup is successful; #GNUNET_SYSERR if not,
429 * GNUNET_TESTBED_controller_stop() shouldn't be called in this case
430 */
431static void
432status_cb (void *cls,
433 const struct GNUNET_CONFIGURATION_Handle *cfg_,
434 int status)
435{
436 uint64_t event_mask;
437
438 if (GNUNET_OK != status)
439 {
440 cp = NULL;
441 FAIL_TEST (0, return );
442 return;
443 }
444 event_mask = 0;
445 event_mask |= (1L << GNUNET_TESTBED_ET_PEER_START);
446 event_mask |= (1L << GNUNET_TESTBED_ET_PEER_STOP);
447 event_mask |= (1L << GNUNET_TESTBED_ET_CONNECT);
448 event_mask |= (1L << GNUNET_TESTBED_ET_OPERATION_FINISHED);
449 controller =
450 GNUNET_TESTBED_controller_connect (host, event_mask, &controller_cb,
451 NULL);
452 FAIL_TEST (NULL != controller, return );
453 neighbour = GNUNET_TESTBED_host_create ("localhost", NULL, cfg, 0);
454 FAIL_TEST (NULL != neighbour, return );
455 reg_handle =
456 GNUNET_TESTBED_register_host (controller, neighbour, &registration_comp,
457 neighbour);
458 FAIL_TEST (NULL != reg_handle, return );
459}
460
461
462/**
463 * Main run function.
464 *
465 * @param cls NULL
466 * @param args arguments passed to #GNUNET_PROGRAM_run()
467 * @param cfgfile the path to configuration file
468 * @param cfg the configuration file handle
469 */
470static void
471run (void *cls,
472 char *const *args,
473 const char *cfgfile,
474 const struct GNUNET_CONFIGURATION_Handle *config)
475{
476 cfg = GNUNET_CONFIGURATION_dup (config);
477 host = GNUNET_TESTBED_host_create (NULL, NULL, cfg, 0);
478 FAIL_TEST (NULL != host, return );
479 cp = GNUNET_TESTBED_controller_start ("127.0.0.1", host,
480 &status_cb,
481 NULL);
482 abort_task =
483 GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_relative_multiply
484 (GNUNET_TIME_UNIT_MINUTES, 5),
485 &do_abort,
486 NULL);
487}
488
489
490/**
491 * Main function
492 */
493int
494main (int argc, char **argv)
495{
496 int ret;
497
498 char *const argv2[] = { "test_testbed_api",
499 "-c", "test_testbed_api.conf",
500 NULL };
501 struct GNUNET_GETOPT_CommandLineOption options[] = {
502 GNUNET_GETOPT_OPTION_END
503 };
504
505 result = GNUNET_SYSERR;
506 ret =
507 GNUNET_PROGRAM_run ((sizeof(argv2) / sizeof(char *)) - 1, argv2,
508 "test_testbed_api", "nohelp", options, &run, NULL);
509 if ((GNUNET_OK != ret) || (GNUNET_OK != result))
510 return 1;
511 return 0;
512}
513
514
515/* end of test_testbed_api.c */