src/hostlist/test_gnunet_daemon_hostlist.c

   1 /*
   2      This file is part of GNUnet
   3      (C) 2009 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 2, 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  * @file hostlist/test_gnunet_daemon_hostlist.c
  22  * @brief test for gnunet_daemon_hostslist.c
  23  * @author Christian Grothoff
  24  */
  25 #include "platform.h"
  26 #include "gnunet_util_lib.h"
  27 #include "gnunet_arm_service.h"
  28 #include "gnunet_transport_service.h"
  29
  30 #define VERBOSE GNUNET_YES
  31
  32 #define START_ARM GNUNET_YES
  33
  34
  35 /**
  36  * How long until we give up on transmitting the message?
  37  */
  38 #define TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 150)
  39
  40 static int ok;
  41
  42 static struct GNUNET_SCHEDULER_Handle *sched;
  43
  44 static GNUNET_SCHEDULER_TaskIdentifier timeout_task;
  45
  46 struct PeerContext
  47 {
  48   struct GNUNET_CONFIGURATION_Handle *cfg;
  49   struct GNUNET_TRANSPORT_Handle *th;
  50   struct GNUNET_MessageHeader *hello;
  51   struct GNUNET_ARM_Handle *arm;
  52 #if START_ARM
  53   pid_t arm_pid;
  54 #endif
  55 };
  56
  57 static struct PeerContext p1;
  58
  59 static struct PeerContext p2;
  60
  61
  62 static void
  63 clean_up (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
  64 {
  65   if (p1.th != NULL)
  66     {
  67       GNUNET_TRANSPORT_disconnect (p1.th);
  68       p1.th = NULL;
  69     }
  70   if (p2.th != NULL)
  71     {
  72       GNUNET_TRANSPORT_disconnect (p2.th);
  73       p2.th = NULL;
  74     }
  75   GNUNET_SCHEDULER_shutdown (sched);
  76 }
  77
  78 /**
  79  * Timeout, give up.
  80  */
  81 static void
  82 timeout_error (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
  83 {
  84   timeout_task = GNUNET_SCHEDULER_NO_TASK;
  85   GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
  86               "Timeout trying to connect peers, test failed.\n");
  87   clean_up (NULL, tc);
  88 }
  89
  90
  91 /**
  92  * Function called to notify transport users that another
  93  * peer connected to us.
  94  *
  95  * @param cls closure
  96  * @param peer the peer that connected
  97  * @param latency current latency of the connection
  98  */
  99 static void
 100 notify_connect (void *cls,
 101                 const struct GNUNET_PeerIdentity * peer,
 102                 struct GNUNET_TIME_Relative latency)
 103 {
 104   if (peer == NULL)
 105     return;
 106   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 107               "Peers connected, shutting down.\n");
 108   ok = 0;
 109   if (timeout_task != GNUNET_SCHEDULER_NO_TASK)
 110     {
 111       GNUNET_SCHEDULER_cancel (sched,
 112                                timeout_task);
 113       timeout_task = GNUNET_SCHEDULER_NO_TASK;
 114     }
 115   GNUNET_SCHEDULER_add_delayed (sched,
 116                                 GNUNET_TIME_UNIT_MINUTES,
 117                                 &clean_up, NULL);
 118 }
 119
 120
 121 static void
 122 process_hello (void *cls,
 123                struct GNUNET_TIME_Relative latency,
 124                const struct GNUNET_PeerIdentity *peer,
 125                const struct GNUNET_MessageHeader *message)
 126 {
 127   struct PeerContext *p = cls;
 128
 129   if (message == NULL)
 130     return;
 131   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 132               "Received HELLO, starting hostlist service.\n");
 133   GNUNET_ARM_start_services (p->cfg, sched, "hostlist", NULL);
 134 }
 135
 136
 137 static void
 138 setup_peer (struct PeerContext *p, const char *cfgname)
 139 {
 140   p->cfg = GNUNET_CONFIGURATION_create ();
 141 #if START_ARM
 142   p->arm_pid = GNUNET_OS_start_process ("gnunet-service-arm",
 143                                         "gnunet-service-arm",
 144 #if VERBOSE
 145                                         "-L", "DEBUG",
 146 #endif
 147                                         "-c", cfgname, NULL);
 148 #endif
 149   GNUNET_assert (GNUNET_OK == GNUNET_CONFIGURATION_load (p->cfg, cfgname));
 150   GNUNET_ARM_start_services (p->cfg, sched, "core", NULL);
 151   p->th = GNUNET_TRANSPORT_connect (sched, p->cfg, p, NULL,
 152                                     &notify_connect, NULL);
 153   GNUNET_assert (p->th != NULL);
 154   GNUNET_TRANSPORT_get_hello (p->th, TIMEOUT, &process_hello, p);
 155 }
 156
 157
 158 static void
 159 waitpid_task (void *cls,
 160               const struct GNUNET_SCHEDULER_TaskContext *tc)
 161 {
 162   struct PeerContext *p = cls;
 163
 164 #if START_ARM
 165   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 166               "Killing ARM process.\n");
 167   if (0 != PLIBC_KILL (p->arm_pid, SIGTERM))
 168     GNUNET_log_strerror (GNUNET_ERROR_TYPE_WARNING, "kill");
 169   if (GNUNET_OS_process_wait(p->arm_pid) != GNUNET_OK)
 170     GNUNET_log_strerror (GNUNET_ERROR_TYPE_WARNING, "waitpid");
 171   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 172               "ARM process %u stopped\n", p->arm_pid);
 173 #endif
 174   GNUNET_CONFIGURATION_destroy (p->cfg);
 175 }
 176
 177
 178 static void
 179 stop_cb (void *cls,
 180          int success)
 181 {
 182   struct PeerContext *p = cls;
 183
 184   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 185               success
 186               ? "ARM stopped core service\n"
 187               : "ARM failed to stop core service\n");
 188   GNUNET_ARM_disconnect (p->arm);
 189   p->arm = NULL;
 190   /* make sure this runs after all other tasks are done */
 191   GNUNET_SCHEDULER_add_delayed (sched,
 192                                 GNUNET_TIME_UNIT_SECONDS,
 193                                 &waitpid_task, p);
 194 }
 195
 196
 197 static void
 198 stop_arm (struct PeerContext *p)
 199 {
 200   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 201               "Asking ARM to stop core service\n");
 202   p->arm = GNUNET_ARM_connect (p->cfg, sched, NULL);
 203   GNUNET_ARM_stop_service (p->arm, "core", GNUNET_TIME_UNIT_SECONDS,
 204                            &stop_cb, p);
 205 }
 206
 207
 208 /**
 209  * Try again to connect to transport service.
 210  */
 211 static void
 212 shutdown_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
 213 {
 214   stop_arm (&p1);
 215   stop_arm (&p2);
 216 }
 217
 218
 219 static void
 220 run (void *cls,
 221      struct GNUNET_SCHEDULER_Handle *s,
 222      char *const *args,
 223      const char *cfgfile,
 224      const struct GNUNET_CONFIGURATION_Handle *cfg)
 225 {
 226   GNUNET_assert (ok == 1);
 227   ok++;
 228   sched = s;
 229   timeout_task = GNUNET_SCHEDULER_add_delayed (sched,
 230                                                GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS,
 231                                                                               15),
 232                                                &timeout_error,
 233                                                NULL);
 234   GNUNET_SCHEDULER_add_delayed (sched,
 235                                 GNUNET_TIME_UNIT_FOREVER_REL,
 236                                 &shutdown_task,
 237                                 NULL);
 238   setup_peer (&p1, "test_gnunet_daemon_hostlist_peer1.conf");
 239   setup_peer (&p2, "test_gnunet_daemon_hostlist_peer2.conf");
 240 }
 241
 242
 243 static int
 244 check ()
 245 {
 246   char *const argv[] = { "test-gnunet-daemon-hostlist",
 247     "-c", "test_gnunet_daemon_hostlist_data.conf",
 248 #if VERBOSE
 249     "-L", "DEBUG",
 250 #endif
 251     NULL
 252   };
 253   struct GNUNET_GETOPT_CommandLineOption options[] = {
 254     GNUNET_GETOPT_OPTION_END
 255   };
 256   ok = 1;
 257   GNUNET_PROGRAM_run ((sizeof (argv) / sizeof (char *)) - 1,
 258                       argv, "test-gnunet-daemon-hostlist",
 259                       "nohelp", options, &run, &ok);
 260   return ok;
 261 }
 262
 263
 264 int
 265 main (int argc, char *argv[])
 266 {
 267
 268   int ret;
 269
 270   GNUNET_DISK_directory_remove ("/tmp/test-gnunetd-hostlist-peer-1");
 271   GNUNET_DISK_directory_remove ("/tmp/test-gnunetd-hostlist-peer-2");
 272   GNUNET_log_setup ("test-gnunet-daemon-hostlist",
 273 #if VERBOSE
 274                     "DEBUG",
 275 #else
 276                     "WARNING",
 277 #endif
 278                     NULL);
 279   ret = check ();
 280   GNUNET_DISK_directory_remove ("/tmp/test-gnunetd-hostlist-peer-1");
 281   GNUNET_DISK_directory_remove ("/tmp/test-gnunetd-hostlist-peer-2");
 282   return ret;
 283 }
 284
 285 /* end of test_gnunet_daemon_hostlist.c */