2 * This file is part of GNUnet
3 * Copyright (C) 2013 GNUnet e.V.
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.
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.
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.
22 * @file multicast/test_multicast.c
23 * @brief Tests for the Multicast API.
24 * @author Gabor X Toth
30 #include "gnunet_crypto_lib.h"
31 #include "gnunet_common.h"
32 #include "gnunet_util_lib.h"
33 #include "gnunet_testing_lib.h"
34 #include "gnunet_core_service.h"
35 #include "gnunet_multicast_service.h"
37 #define TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 30)
40 * Return value from 'main'.
45 * Handle for task for timeout termination.
47 static struct GNUNET_SCHEDULER_Task * end_badly_task;
49 static const struct GNUNET_CONFIGURATION_Handle *cfg;
51 struct GNUNET_CORE_Handle *core;
52 struct GNUNET_PeerIdentity this_peer;
54 struct GNUNET_MULTICAST_Origin *origin;
55 struct GNUNET_MULTICAST_Member *member;
57 struct GNUNET_CRYPTO_EddsaPrivateKey *group_key;
58 struct GNUNET_CRYPTO_EddsaPublicKey group_pub_key;
60 struct GNUNET_CRYPTO_EcdsaPrivateKey *member_key;
61 struct GNUNET_CRYPTO_EcdsaPublicKey member_pub_key;
63 struct TransmitClosure {
64 struct GNUNET_MULTICAST_OriginTransmitHandle *orig_tmit;
65 struct GNUNET_MULTICAST_MemberTransmitHandle *mem_tmit;
67 uint8_t data_delay[16];
73 struct OriginClosure {
74 uint8_t msgs_expected;
78 struct MemberClosure {
79 uint8_t msgs_expected;
83 struct GNUNET_MessageHeader *join_req, *join_resp;
88 TEST_ORIGIN_START = 1,
89 TEST_MEMBER_JOIN_REFUSE = 2,
90 TEST_MEMBER_JOIN_ADMIT = 3,
91 TEST_ORIGIN_TO_ALL = 4,
92 TEST_ORIGIN_TO_ALL_RECV = 5,
93 TEST_MEMBER_TO_ORIGIN = 6,
94 TEST_MEMBER_REPLAY_ERROR = 7,
95 TEST_MEMBER_REPLAY_OK = 8,
97 TEST_ORIGIN_STOP = 10,
100 uint64_t replay_fragment_id;
101 uint64_t replay_flags;
108 * Clean up all resources used.
115 GNUNET_CORE_disconnect (core);
120 GNUNET_MULTICAST_member_part (member, NULL, NULL);
125 GNUNET_MULTICAST_origin_stop (origin, NULL, NULL);
132 * Terminate the test case (failure).
135 * @param tc scheduler context
138 end_badly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
142 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Test FAILED.\n");
147 * Terminate the test case (success).
150 * @param tc scheduler context
153 end_normally (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
157 GNUNET_log (GNUNET_ERROR_TYPE_WARNING, "Test PASSED.\n");
162 * Finish the test case (successfully).
167 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Ending tests.\n");
169 if (end_badly_task != NULL)
171 GNUNET_SCHEDULER_cancel (end_badly_task);
172 end_badly_task = NULL;
174 GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_MILLISECONDS,
175 &end_normally, NULL);
180 tmit_resume (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
182 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Transmission resumed.\n");
183 struct TransmitClosure *tmit = cls;
184 if (NULL != tmit->orig_tmit)
185 GNUNET_MULTICAST_origin_to_all_resume (tmit->orig_tmit);
186 else if (NULL != tmit->mem_tmit)
187 GNUNET_MULTICAST_member_to_origin_resume (tmit->mem_tmit);
192 tmit_notify (void *cls, size_t *data_size, void *data)
194 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
195 "Test #%u: origin_tmit_notify()\n", test);
196 struct TransmitClosure *tmit = cls;
198 if (0 == tmit->data_count)
204 uint16_t size = strlen (tmit->data[tmit->n]);
205 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
206 "Transmit notify data: %u bytes available, "
207 "processing fragment %u/%u (size %u).\n",
208 *data_size, tmit->n + 1, tmit->data_count, size);
209 if (*data_size < size)
213 return GNUNET_SYSERR;
216 if (GNUNET_YES != tmit->paused && 0 < tmit->data_delay[tmit->n])
218 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Transmission paused.\n");
219 tmit->paused = GNUNET_YES;
220 GNUNET_SCHEDULER_add_delayed (
221 GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS,
222 tmit->data_delay[tmit->n]),
227 tmit->paused = GNUNET_NO;
230 memcpy (data, tmit->data[tmit->n], size);
232 return ++tmit->n < tmit->data_count ? GNUNET_NO : GNUNET_YES;
237 member_recv_join_request (void *cls,
238 const struct GNUNET_CRYPTO_EcdsaPublicKey *member_key,
239 const struct GNUNET_MessageHeader *join_msg,
240 struct GNUNET_MULTICAST_JoinHandle *jh)
242 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
243 "Test #%u: member_recv_join_request()\n", test);
248 origin_stopped (void *cls)
250 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
251 "Test #%u: origin_stopped()\n", test);
257 schedule_origin_stop (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
259 test = TEST_ORIGIN_STOP;
260 GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
261 "Test #%u: origin_stop()\n", test);
262 GNUNET_MULTICAST_origin_stop (origin, origin_stopped, NULL);
268 member_parted (void *cls)
270 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
271 "Test #%u: member_parted()\n", test);
276 case TEST_MEMBER_JOIN_REFUSE:
277 member_join (TEST_MEMBER_JOIN_ADMIT);
280 case TEST_MEMBER_PART:
281 GNUNET_SCHEDULER_add_now (schedule_origin_stop, NULL);
285 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
286 "Invalid test #%d in member_recv_join_decision()\n", test);
293 schedule_member_part (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
295 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
296 "Test #%u: schedule_member_part()\n", test);
297 GNUNET_MULTICAST_member_part (member, member_parted, NULL);
304 test = TEST_MEMBER_PART;
305 GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
306 "Test #%u: member_part()\n", test);
307 GNUNET_SCHEDULER_add_now (schedule_member_part, NULL);
314 test = TEST_MEMBER_REPLAY_OK;
315 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
316 "Test #%u: member_replay_ok()\n", test);
317 replay_fragment_id = 1;
318 replay_flags = 1 | 1<<11;
319 GNUNET_MULTICAST_member_replay_fragment (member, replay_fragment_id,
325 member_replay_error ()
327 test = TEST_MEMBER_REPLAY_ERROR;
328 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
329 "Test #%u: member_replay_error()\n", test);
330 replay_fragment_id = 1234;
331 replay_flags = 11 | 1<<11;
332 GNUNET_MULTICAST_member_replay_fragment (member, replay_fragment_id,
338 origin_recv_replay_msg (void *cls,
339 const struct GNUNET_CRYPTO_EcdsaPublicKey *member_key,
341 uint64_t fragment_offset,
343 struct GNUNET_MULTICAST_ReplayHandle *rh)
345 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
346 "Test #%u: origin_recv_replay_msg()\n", test);
352 member_recv_replay_msg (void *cls,
353 const struct GNUNET_CRYPTO_EcdsaPublicKey *member_key,
355 uint64_t fragment_offset,
357 struct GNUNET_MULTICAST_ReplayHandle *rh)
359 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
360 "Test #%u: member_recv_replay_msg()\n", test);
366 origin_recv_replay_frag (void *cls,
367 const struct GNUNET_CRYPTO_EcdsaPublicKey *member_key,
368 uint64_t fragment_id,
370 struct GNUNET_MULTICAST_ReplayHandle *rh)
372 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
373 "Test #%u: origin_recv_replay_frag()"
374 " - fragment_id=%" PRIu64 " flags=%" PRIu64 "\n",
375 test, fragment_id, flags);
376 GNUNET_assert (replay_fragment_id == fragment_id && replay_flags == flags);
379 case TEST_MEMBER_REPLAY_ERROR:
380 GNUNET_MULTICAST_replay_response (rh, NULL, GNUNET_SYSERR);
384 case TEST_MEMBER_REPLAY_OK:
386 struct GNUNET_MULTICAST_MessageHeader mmsg = {
388 .type = htons (GNUNET_MESSAGE_TYPE_MULTICAST_MESSAGE),
389 .size = htons (sizeof (mmsg)),
391 .fragment_id = GNUNET_htonll (1),
392 .message_id = GNUNET_htonll (1),
393 .fragment_offset = 0,
394 .group_generation = GNUNET_htonll (1),
398 member_cls.msgs_expected = 1;
399 GNUNET_MULTICAST_replay_response (rh, &mmsg.header, GNUNET_MULTICAST_REC_OK);
400 GNUNET_MULTICAST_replay_response_end (rh);
405 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
406 "Invalid test #%d in origin_recv_replay_frag()\n", test);
413 member_recv_replay_frag (void *cls,
414 const struct GNUNET_CRYPTO_EcdsaPublicKey *member_key,
415 uint64_t fragment_id,
417 struct GNUNET_MULTICAST_ReplayHandle *rh)
419 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
420 "Test #%u: member_recv_replay_frag()\n", test);
426 origin_recv_request (void *cls,
427 const struct GNUNET_MULTICAST_RequestHeader *req)
429 struct OriginClosure *ocls = cls;
430 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
431 "Test #%u: origin_recv_request()\n", test);
432 if (++ocls->n != ocls->msgs_expected)
435 GNUNET_assert (0 == memcmp (&req->member_pub_key,
436 &member_pub_key, sizeof (member_pub_key)));
439 // FIXME: check message content
441 member_replay_error ();
448 test = TEST_MEMBER_TO_ORIGIN;
449 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
450 "Test #%u: member_to_origin()\n", test);
452 struct TransmitClosure *tmit = &tmit_cls;
453 *tmit = (struct TransmitClosure) {};
454 tmit->data[0] = "abc def";
455 tmit->data[1] = "ghi jkl mno";
456 tmit->data_delay[1] = 2;
457 tmit->data[2] = "pqr stuw xyz";
458 tmit->data_count = 3;
461 origin_cls.msgs_expected = 1;
463 tmit->mem_tmit = GNUNET_MULTICAST_member_to_origin (member, 1,
469 member_recv_message (void *cls,
470 const struct GNUNET_MULTICAST_MessageHeader *msg)
472 struct MemberClosure *mcls = cls;
473 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
474 "Test #%u: member_recv_message() %u/%u\n",
475 test, mcls->n + 1, mcls->msgs_expected);
476 if (++mcls->n != mcls->msgs_expected)
479 // FIXME: check message content
483 case TEST_ORIGIN_TO_ALL_RECV:
487 case TEST_MEMBER_REPLAY_OK:
488 GNUNET_assert (replay_fragment_id == GNUNET_ntohll (msg->fragment_id));
493 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
494 "Invalid test #%d in origin_recv_message()\n", test);
501 origin_recv_message (void *cls,
502 const struct GNUNET_MULTICAST_MessageHeader *msg)
504 struct OriginClosure *ocls = cls;
505 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
506 "Test #%u: origin_recv_message() %u/%u\n",
507 test, ocls->n + 1, ocls->msgs_expected);
508 if (++ocls->n != ocls->msgs_expected)
511 // FIXME: check message content
515 case TEST_ORIGIN_TO_ALL:
516 test = TEST_ORIGIN_TO_ALL_RECV;
520 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
521 "Invalid test #%d in origin_recv_message()\n", test);
530 test = TEST_ORIGIN_TO_ALL;
531 GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
532 "Test #%u: origin_to_all()\n", test);
534 struct TransmitClosure *tmit = &tmit_cls;
535 *tmit = (struct TransmitClosure) {};
536 tmit->data[0] = "ABC DEF";
537 tmit->data[1] = GNUNET_malloc (GNUNET_MULTICAST_FRAGMENT_MAX_PAYLOAD + 1);
539 for (i = 0; i < GNUNET_MULTICAST_FRAGMENT_MAX_PAYLOAD; i++)
540 tmit->data[1][i] = (0 == i % 10000) ? '0' + i / 10000 : '_';
541 tmit->data[2] = "GHI JKL MNO";
542 tmit->data_delay[2] = 2;
543 tmit->data[3] = "PQR STUW XYZ";
544 tmit->data_count = 4;
546 origin_cls.n = member_cls.n = 0;
547 origin_cls.msgs_expected = member_cls.msgs_expected = tmit->data_count;
549 tmit->orig_tmit = GNUNET_MULTICAST_origin_to_all (origin, 1, 1,
555 member_recv_join_decision (void *cls,
557 const struct GNUNET_PeerIdentity *peer,
558 uint16_t relay_count,
559 const struct GNUNET_PeerIdentity *relays,
560 const struct GNUNET_MessageHeader *join_msg)
562 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
563 "Test #%u: member_recv_join_decision() - is_admitted: %d\n",
566 GNUNET_assert (join_msg->size == join_resp->size);
567 GNUNET_assert (join_msg->type == join_resp->type);
568 GNUNET_assert (0 == memcmp (join_msg, join_resp, ntohs (join_resp->size)));
572 case TEST_MEMBER_JOIN_REFUSE:
573 GNUNET_assert (0 == relay_count);
574 GNUNET_SCHEDULER_add_now (schedule_member_part, NULL);
577 case TEST_MEMBER_JOIN_ADMIT:
578 GNUNET_assert (1 == relay_count);
579 GNUNET_assert (0 == memcmp (relays, &this_peer, sizeof (this_peer)));
584 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
585 "Invalid test #%d in member_recv_join_decision()\n", test);
592 origin_recv_join_request (void *cls,
593 const struct GNUNET_CRYPTO_EcdsaPublicKey *mem_key,
594 const struct GNUNET_MessageHeader *join_msg,
595 struct GNUNET_MULTICAST_JoinHandle *jh)
597 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
598 "Test #%u: origin_recv_join_request()\n", test);
600 GNUNET_assert (0 == memcmp (mem_key, &member_pub_key, sizeof (member_pub_key)));
601 GNUNET_assert (join_msg->size == join_req->size);
602 GNUNET_assert (join_msg->type == join_req->type);
603 GNUNET_assert (0 == memcmp (join_msg, join_req, ntohs (join_req->size)));
605 char data[] = "here's the decision";
606 uint8_t data_size = strlen (data) + 1;
607 join_resp = GNUNET_malloc (sizeof (join_resp) + data_size);
608 join_resp->size = htons (sizeof (join_resp) + data_size);
609 join_resp->type = htons (456);
610 memcpy (&join_resp[1], data, data_size);
614 case TEST_MEMBER_JOIN_REFUSE:
615 GNUNET_MULTICAST_join_decision (jh, GNUNET_NO, 0, NULL, join_resp);
618 case TEST_MEMBER_JOIN_ADMIT:
619 GNUNET_MULTICAST_join_decision (jh, GNUNET_YES, 1, &this_peer, join_resp);
623 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
624 "Invalid test #%d in origin_recv_join_request()\n", test);
635 GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
636 "Test #%u: member_join()\n", test);
638 member_key = GNUNET_CRYPTO_ecdsa_key_create ();
639 GNUNET_CRYPTO_ecdsa_key_get_public (member_key, &member_pub_key);
641 if (NULL != join_req)
642 GNUNET_free (join_req);
644 char data[] = "let me in!";
645 uint8_t data_size = strlen (data) + 1;
646 join_req = GNUNET_malloc (sizeof (join_req) + data_size);
647 join_req->size = htons (sizeof (join_req) + data_size);
648 join_req->type = htons (123);
649 memcpy (&join_req[1], data, data_size);
651 member = GNUNET_MULTICAST_member_join (cfg, &group_pub_key, member_key,
652 &this_peer, 1, &this_peer, join_req,
653 member_recv_join_request,
654 member_recv_join_decision,
655 member_recv_replay_frag,
656 member_recv_replay_msg,
665 test = TEST_ORIGIN_START;
666 GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
667 "Test #%u: origin_start()\n", test);
669 group_key = GNUNET_CRYPTO_eddsa_key_create ();
670 GNUNET_CRYPTO_eddsa_key_get_public (group_key, &group_pub_key);
672 origin = GNUNET_MULTICAST_origin_start (cfg, group_key, 0,
673 origin_recv_join_request,
674 origin_recv_replay_frag,
675 origin_recv_replay_msg,
679 member_join (TEST_MEMBER_JOIN_REFUSE);
684 core_connected (void *cls, const struct GNUNET_PeerIdentity *my_identity)
686 this_peer = *my_identity;
692 * Main function of the test, run from scheduler.
695 * @param cfg configuration we use (also to connect to Multicast service)
696 * @param peer handle to access more of the peer (not used)
699 #if DEBUG_TEST_MULTICAST
700 run (void *cls, char *const *args, const char *cfgfile,
701 const struct GNUNET_CONFIGURATION_Handle *c)
704 const struct GNUNET_CONFIGURATION_Handle *c,
705 struct GNUNET_TESTING_Peer *peer)
709 end_badly_task = GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly, NULL);
711 core = GNUNET_CORE_connect (cfg, NULL, &core_connected, NULL, NULL,
712 NULL, GNUNET_NO, NULL, GNUNET_NO, NULL);
717 main (int argc, char *argv[])
720 #if DEBUG_TEST_MULTICAST
721 const struct GNUNET_GETOPT_CommandLineOption opts[] = {
722 GNUNET_GETOPT_OPTION_END
724 if (GNUNET_OK != GNUNET_PROGRAM_run (argc, argv, "test-multicast",
725 "test-multicast [options]",
729 if (0 != GNUNET_TESTING_peer_run ("test-multicast", "test_multicast.conf", &run, NULL))
735 /* end of test_multicast.c */