src/multicast/test_multicast_2peers.c

   1 /*
   2  * This file is part of GNUnet
   3  * Copyright (C) 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 multicast/test_multicast_2peers.c
  23  * @brief Tests for the Multicast API with two peers doing the ping
  24  *        pong test.
  25  * @author xrs
  26  */
  27
  28 #include <inttypes.h>
  29
  30 #include "platform.h"
  31 #include "gnunet_crypto_lib.h"
  32 #include "gnunet_common.h"
  33 #include "gnunet_util_lib.h"
  34 #include "gnunet_testbed_service.h"
  35 #include "gnunet_multicast_service.h"
  36
  37 #define NUM_PEERS 2
  38
  39 static struct GNUNET_TESTBED_Operation *op0;
  40 static struct GNUNET_TESTBED_Operation *op1;
  41 static struct GNUNET_TESTBED_Operation *pi_op0;
  42 static struct GNUNET_TESTBED_Operation *pi_op1;
  43
  44 static struct GNUNET_TESTBED_Peer **peers;
  45 const struct GNUNET_PeerIdentity *peer_id[2];
  46
  47 static struct GNUNET_SCHEDULER_Task *timeout_tid;
  48
  49 static struct GNUNET_MULTICAST_Origin *origin;
  50 static struct GNUNET_MULTICAST_Member *member;
  51
  52 struct GNUNET_CRYPTO_EddsaPrivateKey *group_key;
  53 struct GNUNET_CRYPTO_EddsaPublicKey group_pub_key;
  54
  55 struct GNUNET_CRYPTO_EcdsaPrivateKey *member_key;
  56 struct GNUNET_CRYPTO_EcdsaPublicKey member_pub_key;
  57
  58 /**
  59  * Global result for testcase.
  60  */
  61 static int result;
  62
  63
  64 /**
  65  * Function run on CTRL-C or shutdown (i.e. success/timeout/etc.).
  66  * Cleans up.
  67  */
  68 static void
  69 shutdown_task (void *cls)
  70 {
  71   if (NULL != op0)
  72   {
  73     GNUNET_TESTBED_operation_done (op0);
  74     op0 = NULL;
  75   }
  76   if (NULL != op1)
  77   {
  78     GNUNET_TESTBED_operation_done (op1);
  79     op1 = NULL;
  80   }
  81   if (NULL != pi_op0)
  82   {
  83     GNUNET_TESTBED_operation_done (pi_op0);
  84     pi_op0 = NULL;
  85   }
  86   if (NULL != pi_op1)
  87   {
  88     GNUNET_TESTBED_operation_done (pi_op1);
  89     pi_op1 = NULL;
  90   }
  91   if (NULL != timeout_tid)
  92     {
  93       GNUNET_SCHEDULER_cancel (timeout_tid);
  94       timeout_tid = NULL;
  95     }
  96 }
  97
  98
  99 static void
 100 timeout_task (void *cls)
 101 {
 102   GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
 103               "Timeout!\n");
 104   result = GNUNET_SYSERR;
 105   GNUNET_SCHEDULER_shutdown ();
 106 }
 107
 108
 109 static void
 110 member_join_request (void *cls,
 111                      const struct GNUNET_CRYPTO_EcdsaPublicKey *member_pub_key,
 112                      const struct GNUNET_MessageHeader *join_msg,
 113                      struct GNUNET_MULTICAST_JoinHandle *jh)
 114 {
 115   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 116               "Member sent a join request.\n");
 117
 118 }
 119
 120
 121 static int
 122 notify (void *cls,
 123         size_t *data_size,
 124         void *data)
 125 {
 126
 127   char text[] = "ping";
 128   *data_size = strlen(text)+1;
 129   GNUNET_memcpy(data, text, *data_size);
 130
 131   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 132               "Member sents message to origin: %s\n", text);
 133
 134   return GNUNET_YES;
 135 }
 136
 137
 138 static void
 139 member_join_decision (void *cls,
 140                       int is_admitted,
 141                       const struct GNUNET_PeerIdentity *peer,
 142                       uint16_t relay_count,
 143                       const struct GNUNET_PeerIdentity *relays,
 144                       const struct GNUNET_MessageHeader *join_msg)
 145 {
 146   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 147               "Member received a decision from origin: %s\n",
 148               (GNUNET_YES == is_admitted)
 149               ? "accepted"
 150               : "rejected");
 151
 152   if (GNUNET_YES == is_admitted)
 153   {
 154     struct GNUNET_MULTICAST_MemberTransmitHandle *req;
 155
 156     // FIXME: move to MQ-style API!
 157     req = GNUNET_MULTICAST_member_to_origin (member,
 158                                              0,
 159                                              &notify,
 160                                              NULL);
 161   }
 162 }
 163
 164
 165 static void
 166 member_message (void *cls,
 167                 const struct GNUNET_MULTICAST_MessageHeader *msg)
 168 {
 169   if (0 != strncmp ("pong", (char *)&msg[1], 4))
 170   {
 171     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "member did not receive pong\n");
 172     result = GNUNET_SYSERR;
 173     GNUNET_SCHEDULER_shutdown ();
 174   }
 175
 176   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 177               "member receives: %s\n", (char *)&msg[1]);
 178
 179   // Testcase ends here.
 180   result = GNUNET_YES;
 181   GNUNET_SCHEDULER_shutdown ();
 182 }
 183
 184
 185 static void
 186 origin_join_request (void *cls,
 187                  const struct GNUNET_CRYPTO_EcdsaPublicKey *member_pub_key,
 188                  const struct GNUNET_MessageHeader *join_msg,
 189                  struct GNUNET_MULTICAST_JoinHandle *jh)
 190 {
 191   struct GNUNET_MessageHeader *join_resp;
 192
 193   uint8_t data_size = ntohs (join_msg->size);
 194
 195   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 196               "origin got a join request...\n");
 197   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 198               "origin receives: '%s'\n", (char *)&join_msg[1]);
 199
 200   const char data[] = "Come in!";
 201   data_size = strlen (data) + 1;
 202   join_resp = GNUNET_malloc (sizeof (join_resp) + data_size);
 203   join_resp->size = htons (sizeof (join_resp) + data_size);
 204   join_resp->type = htons (123);
 205   GNUNET_memcpy (&join_resp[1], data, data_size);
 206
 207   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 208               "origin sends: '%s'\n", data);
 209
 210   GNUNET_MULTICAST_join_decision (jh,
 211                                   GNUNET_YES,
 212                                   0,
 213                                   NULL,
 214                                   join_resp);
 215   GNUNET_free (join_resp);
 216   result = GNUNET_OK;
 217 }
 218
 219
 220 int
 221 origin_notify (void *cls,
 222                size_t *data_size,
 223                void *data)
 224 {
 225   char text[] = "pong";
 226   *data_size = strlen(text)+1;
 227   memcpy(data, text, *data_size);
 228
 229   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "origin sends (to all): %s\n", text);
 230
 231   return GNUNET_YES;
 232 }
 233
 234
 235 static void
 236 origin_request (void *cls,
 237                 const struct GNUNET_MULTICAST_RequestHeader *req)
 238 {
 239   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "origin receives: %s\n", (char *)&req[1]);
 240
 241   if (0 != strncmp ("ping", (char *)&req[1], 4))
 242     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "origin didn't reveice a correct request");
 243
 244   GNUNET_MULTICAST_origin_to_all (origin,
 245                                   0,
 246                                   0,
 247                                   origin_notify,
 248                                   NULL);
 249 }
 250
 251
 252 static void
 253 origin_message (void *cls,
 254                 const struct GNUNET_MULTICAST_MessageHeader *msg)
 255 {
 256   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "origin message msg\n");
 257 }
 258
 259
 260 static void
 261 service_connect1 (void *cls,
 262                   struct GNUNET_TESTBED_Operation *op,
 263                   void *ca_result,
 264                   const char *emsg)
 265 {
 266   member = ca_result;
 267
 268   if (NULL == member)
 269   {
 270     result = GNUNET_SYSERR;
 271     GNUNET_SCHEDULER_shutdown ();
 272   }
 273   else
 274   {
 275     GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Connected to multicast service of member\n");
 276   }
 277 }
 278
 279
 280 static void
 281 multicast_da1 (void *cls,
 282                void * op_result)
 283 {
 284   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 285               "Member parting from multicast group\n");
 286
 287   GNUNET_MULTICAST_member_part (member, NULL, NULL);
 288 }
 289
 290
 291 static void *
 292 multicast_ca1 (void *cls,
 293                const struct GNUNET_CONFIGURATION_Handle *cfg)
 294 {
 295   struct GNUNET_MessageHeader *join_msg;
 296   void *ret;
 297
 298   // Get members keys
 299   member_key = GNUNET_CRYPTO_ecdsa_key_create ();
 300   GNUNET_CRYPTO_ecdsa_key_get_public (member_key, &member_pub_key);
 301
 302   char data[] = "Hi, can I enter?";
 303   uint8_t data_size = strlen (data) + 1;
 304   join_msg = GNUNET_malloc (sizeof (join_msg) + data_size);
 305   join_msg->size = htons (sizeof (join_msg) + data_size);
 306   join_msg->type = htons (123);
 307   GNUNET_memcpy (&join_msg[1], data, data_size);
 308
 309   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 310               "Members tries to join multicast group\n");
 311
 312   ret = GNUNET_MULTICAST_member_join (cfg,
 313                                        &group_pub_key,
 314                                        member_key,
 315                                        peer_id[0],
 316                                        0,
 317                                        NULL,
 318                                        join_msg, /* join message */
 319                                        member_join_request,
 320                                        member_join_decision,
 321                                        NULL, /* no test for member_replay_frag */
 322                                        NULL, /* no test for member_replay_msg */
 323                                        member_message,
 324                                        NULL);
 325   GNUNET_free (join_msg);
 326   return ret;
 327 }
 328
 329
 330 static void
 331 peer_information_cb (void *cls,
 332                      struct GNUNET_TESTBED_Operation *op,
 333                      const struct GNUNET_TESTBED_PeerInformation *pinfo,
 334                      const char *emsg)
 335 {
 336   int i = (int) (long) cls;
 337
 338   if (NULL == pinfo)
 339   {
 340     result = GNUNET_SYSERR;
 341     GNUNET_SCHEDULER_shutdown ();
 342   }
 343
 344   peer_id[i] = pinfo->result.id;
 345
 346   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 347               "Got peer information of %s (%s)\n", (0==i)?"origin":"member" ,GNUNET_i2s(pinfo->result.id));
 348
 349   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 350               "Create member peer\n");
 351
 352   if (0 == i)
 353   {
 354     /* connect to multicast service of member */
 355     op1 = GNUNET_TESTBED_service_connect (NULL,                    /* Closure for operation */
 356                                           peers[1],                /* The peer whose service to connect to */
 357                                           "multicast",             /* The name of the service */
 358                                           service_connect1,   /* callback to call after a handle to service
 359                                                                  is opened */
 360                                           NULL,                    /* closure for the above callback */
 361                                           multicast_ca1,      /* callback to call with peer's configuration;
 362                                                                  this should open the needed service connection */
 363                                           multicast_da1,     /* callback to be called when closing the
 364                                                                 opened service connection */
 365                                           NULL);                   /* closure for the above two callbacks */
 366   }
 367 }
 368
 369
 370 /**
 371  * Test logic of peer "0" being origin starts here.
 372  *
 373  * @param cls closure, for the example: NULL
 374  * @param op should be equal to "dht_op"
 375  * @param ca_result result of the connect operation, the
 376  *        connection to the DHT service
 377  * @param emsg error message, if testbed somehow failed to
 378  *        connect to the DHT.
 379  */
 380 static void
 381 service_connect0 (void *cls,
 382                   struct GNUNET_TESTBED_Operation *op,
 383                   void *ca_result,
 384                   const char *emsg)
 385 {
 386   origin = ca_result;
 387
 388   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 389               "Connected to multicast service of origin\n");
 390
 391   // Get GNUnet identity of origin
 392   pi_op0 = GNUNET_TESTBED_peer_get_information (peers[0],
 393                                                GNUNET_TESTBED_PIT_IDENTITY,
 394                                                peer_information_cb,
 395                                                (void *) 0);
 396   // Get GNUnet identity of member
 397   pi_op1 = GNUNET_TESTBED_peer_get_information (peers[1],
 398                                                GNUNET_TESTBED_PIT_IDENTITY,
 399                                                peer_information_cb,
 400                                                (void *) 1);
 401
 402   /* Connection to service successful. Here we'd usually do something with
 403    * the service. */
 404   result = GNUNET_OK;
 405   //GNUNET_SCHEDULER_shutdown (); /* Also kills the testbed */
 406 }
 407
 408
 409
 410 /**
 411  * Function run when service multicast has started and is providing us
 412  * with a configuration file.
 413  */
 414 static void *
 415 multicast_ca0 (void *cls,
 416                const struct GNUNET_CONFIGURATION_Handle *cfg)
 417 {
 418   group_key = GNUNET_CRYPTO_eddsa_key_create ();
 419   GNUNET_CRYPTO_eddsa_key_get_public (group_key, &group_pub_key);
 420
 421   return GNUNET_MULTICAST_origin_start (cfg,
 422                                         group_key,
 423                                         0,
 424                                         origin_join_request,
 425                                         NULL, /* no test for origin_replay_frag */
 426                                         NULL, /* no test for origin_replay_msg */
 427                                         origin_request,
 428                                         origin_message,
 429                                         NULL);
 430 }
 431
 432 static void
 433 multicast_da0 (void *cls,
 434                void *op_result)
 435 {
 436   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 437               "Origin closes multicast group\n");
 438
 439   GNUNET_MULTICAST_origin_stop (origin, NULL, NULL);
 440 }
 441
 442
 443 /**
 444  * Main function inovked from TESTBED once all of the
 445  * peers are up and running.  This one then connects
 446  * just to the multicast service of peer 0 and 1.
 447  * Peer 0 is going to be origin.
 448  * Peer 1 is going to be one member.
 449  * Origin will start a multicast group and the member will try to join it.
 450  * After that we execute some multicast test.
 451  *
 452  * @param cls closure
 453  * @param h the run handle
 454  * @param peers started peers for the test
 455  * @param num_peers size of the 'peers' array
 456  * @param links_succeeded number of links between peers that were created
 457  * @param links_failed number of links testbed was unable to establish
 458  */
 459 static void
 460 testbed_master (void *cls,
 461      struct GNUNET_TESTBED_RunHandle *h,
 462      unsigned int num_peers,
 463      struct GNUNET_TESTBED_Peer **p,
 464      unsigned int links_succeeded,
 465      unsigned int links_failed)
 466 {
 467   /* Testbed is ready with peers running and connected in a pre-defined overlay
 468      topology (FIXME)  */
 469   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 470               "Connected to testbed_master()\n");
 471
 472   peers = p;
 473
 474   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 475               "Create origin peer\n");
 476   op0 = GNUNET_TESTBED_service_connect (NULL,                    /* Closure for operation */
 477                                         peers[0],                /* The peer whose service to connect to */
 478                                         "multicast",             /* The name of the service */
 479                                         service_connect0,   /* callback to call after a handle to service
 480                                                                is opened */
 481                                         NULL,                    /* closure for the above callback */
 482                                         multicast_ca0,      /* callback to call with peer's configuration;
 483                                                                this should open the needed service connection */
 484                                         multicast_da0,     /* callback to be called when closing the
 485                                                               opened service connection */
 486                                         NULL);                   /* closure for the above two callbacks */
 487
 488   GNUNET_SCHEDULER_add_shutdown (&shutdown_task, NULL); /* Schedule a new task on shutdown */
 489
 490   /* Schedule the shutdown task with a delay of a few Seconds */
 491   timeout_tid = GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_SECONDS, 50),
 492                                               &timeout_task, NULL);
 493 }
 494
 495
 496 int
 497 main (int argc, char *argv[])
 498 {
 499   int ret;
 500
 501   result = GNUNET_SYSERR;
 502   ret = GNUNET_TESTBED_test_run
 503       ("test-multicast-2peers",  /* test case name */
 504        "test_multicast.conf", /* template configuration */
 505        NUM_PEERS,       /* number of peers to start */
 506        0LL, /* Event mask - set to 0 for no event notifications */
 507        NULL, /* Controller event callback */
 508        NULL, /* Closure for controller event callback */
 509        testbed_master, /* continuation callback to be called when testbed setup is complete */
 510        NULL); /* Closure for the test_master callback */
 511   if ( (GNUNET_OK != ret) || (GNUNET_OK != result) )
 512     return 1;
 513   return 0;
 514 }
 515
 516
 517 /* end of test_multicast_2peers.c */