src/testbed/gnunet-testbed-profiler.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 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/gnunet-testbed-profiler.c
  23  * @brief Profiling driver for the testbed.
  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 "testbed_api_hosts.h"
  31
  32 /**
  33  * Generic loggins shorthand
  34  */
  35 #define LOG(kind,...)                                           \
  36   GNUNET_log (kind, __VA_ARGS__)
  37
  38
  39 /**
  40  * Handle to global configuration
  41  */
  42 struct GNUNET_CONFIGURATION_Handle *cfg;
  43
  44 /**
  45  * Peer linking - topology operation
  46  */
  47 struct GNUNET_TESTBED_Operation *topology_op;
  48
  49 /**
  50  * Name of the file with the hosts to run the test over (configuration option).
  51  * It will be NULL if ENABLE_LL is set
  52  */
  53 static char *hosts_file;
  54
  55 /**
  56  * Abort task identifier
  57  */
  58 static struct GNUNET_SCHEDULER_Task *abort_task;
  59
  60 /**
  61  * Global event mask for all testbed events
  62  */
  63 uint64_t event_mask;
  64
  65 /**
  66  * Number of peers to be started by the profiler
  67  */
  68 static unsigned int num_peers;
  69
  70 /**
  71  * Number of timeout failures to tolerate
  72  */
  73 static unsigned int num_cont_fails;
  74
  75 /**
  76  * Continuous failures during overlay connect operations
  77  */
  78 static unsigned int cont_fails;
  79
  80 /**
  81  * Links which are successfully established
  82  */
  83 static unsigned int established_links;
  84
  85 /**
  86  * Links which are not successfully established
  87  */
  88 static unsigned int failed_links;
  89
  90 /**
  91  * Global testing status
  92  */
  93 static int result;
  94
  95 /**
  96  * Are we running non interactively
  97  */
  98 static int noninteractive;
  99
 100
 101 /**
 102  * Shutdown nicely
 103  *
 104  * @param cls NULL
 105  */
 106 static void
 107 do_shutdown (void *cls)
 108 {
 109   if (NULL != abort_task)
 110   {
 111     GNUNET_SCHEDULER_cancel (abort_task);
 112     abort_task = NULL;
 113   }
 114   if (NULL != cfg)
 115   {
 116     GNUNET_CONFIGURATION_destroy (cfg);
 117     cfg = NULL;
 118   }
 119 }
 120
 121
 122 /**
 123  * abort task to run on test timed out
 124  *
 125  * @param cls NULL
 126  */
 127 static void
 128 do_abort (void *cls)
 129 {
 130   abort_task = NULL;
 131   LOG (GNUNET_ERROR_TYPE_WARNING,
 132        "Aborting\n");
 133   result = GNUNET_SYSERR;
 134   GNUNET_SCHEDULER_shutdown ();
 135 }
 136
 137
 138 /**
 139  * Function to print summary about how many overlay links we have made and how
 140  * many failed
 141  */
 142 static void
 143 print_overlay_links_summary ()
 144 {
 145   static int printed_already;
 146
 147   if (GNUNET_YES == printed_already)
 148     return;
 149   printed_already = GNUNET_YES;
 150   printf ("%u links succeeded\n", established_links);
 151   printf ("%u links failed due to timeouts\n", failed_links);
 152 }
 153
 154
 155 /**
 156  * Controller event callback
 157  *
 158  * @param cls NULL
 159  * @param event the controller event
 160  */
 161 static void
 162 controller_event_cb (void *cls,
 163                      const struct GNUNET_TESTBED_EventInformation *event)
 164 {
 165   switch (event->type)
 166   {
 167   case GNUNET_TESTBED_ET_OPERATION_FINISHED:
 168     /* Control reaches here when a peer linking operation fails */
 169     if (NULL != event->details.operation_finished.emsg)
 170     {
 171       printf ("F");
 172       fflush (stdout);
 173       failed_links++;
 174       if (++cont_fails > num_cont_fails)
 175       {
 176         printf ("\nAborting due to very high failure rate\n");
 177         print_overlay_links_summary ();
 178         GNUNET_SCHEDULER_shutdown ();
 179         return;
 180       }
 181     }
 182     break;
 183   case GNUNET_TESTBED_ET_CONNECT:
 184   {
 185     if (0 != cont_fails)
 186       cont_fails--;
 187     if (0 == established_links)
 188       printf ("Establishing links. Please wait\n");
 189     printf (".");
 190     fflush (stdout);
 191     established_links++;
 192   }
 193     break;
 194   default:
 195     GNUNET_break (0);
 196   }
 197 }
 198
 199
 200 /**
 201  * Signature of a main function for a testcase.
 202  *
 203  * @param cls closure
 204  * @param h the run handle
 205  * @param num_peers number of peers in 'peers'
 206  * @param peers handle to peers run in the testbed
 207  * @param links_succeeded the number of overlay link connection attempts that
 208  *          succeeded
 209  * @param links_failed the number of overlay link
 210  */
 211 static void
 212 test_run (void *cls,
 213           struct GNUNET_TESTBED_RunHandle *h,
 214           unsigned int num_peers, struct GNUNET_TESTBED_Peer **peers,
 215           unsigned int links_succeeded,
 216           unsigned int links_failed)
 217 {
 218   result = GNUNET_OK;
 219   fprintf (stdout, "\n");
 220   print_overlay_links_summary ();
 221   GNUNET_SCHEDULER_add_shutdown (&do_shutdown, NULL);
 222   if (noninteractive)
 223   {
 224     GNUNET_SCHEDULER_cancel (abort_task);
 225     abort_task = NULL;
 226     return;
 227   }
 228 #if (!ENABLE_SUPERMUC)
 229   fprintf (stdout, "Testbed running, waiting for keystroke to shut down\n");
 230   fflush (stdout);
 231   (void) getc (stdin);
 232 #endif
 233   fprintf (stdout, "Shutting down. Please wait\n");
 234   fflush (stdout);
 235   GNUNET_SCHEDULER_shutdown ();
 236 }
 237
 238
 239 /**
 240  * Main function that will be run by the scheduler.
 241  *
 242  * @param cls closure
 243  * @param args remaining command-line arguments
 244  * @param cfgfile name of the configuration file used (for saving, can be NULL!)
 245  * @param config configuration
 246  */
 247 static void
 248 run (void *cls, char *const *args, const char *cfgfile,
 249      const struct GNUNET_CONFIGURATION_Handle *config)
 250 {
 251   if (0 == num_peers)
 252   {
 253     LOG (GNUNET_ERROR_TYPE_ERROR, _("Exiting as the number of peers is %u\n"),
 254          num_peers);
 255     return;
 256   }
 257   cfg = GNUNET_CONFIGURATION_dup (config);
 258   event_mask = 0;
 259   event_mask |= (1LL << GNUNET_TESTBED_ET_CONNECT);
 260   event_mask |= (1LL << GNUNET_TESTBED_ET_OPERATION_FINISHED);
 261   GNUNET_TESTBED_run (hosts_file, cfg, num_peers, event_mask,
 262                       &controller_event_cb, NULL,
 263                       &test_run, NULL);
 264   abort_task =
 265       GNUNET_SCHEDULER_add_shutdown (&do_abort,
 266                                      NULL);
 267 }
 268
 269
 270 /**
 271  * Main function.
 272  *
 273  * @return 0 on success
 274  */
 275 int
 276 main (int argc, char *const *argv)
 277 {
 278   struct GNUNET_GETOPT_CommandLineOption options[] = {
 279     GNUNET_GETOPT_option_uint ('p',
 280                                "num-peers",
 281                                "COUNT",
 282                                gettext_noop ("create COUNT number of peers"),
 283                                &num_peers),
 284     GNUNET_GETOPT_option_uint ('e',
 285                                "num-errors",
 286                                "COUNT",
 287                                gettext_noop ("tolerate COUNT number of continious timeout failures"),
 288                                &num_cont_fails),
 289     GNUNET_GETOPT_option_flag ('n',
 290                                "non-interactive",
 291                                gettext_noop ("run profiler in non-interactive mode where upon "
 292                                              "testbed setup the profiler does not wait for a "
 293                                              "keystroke but continues to run until a termination "
 294                                              "signal is received"),
 295                                   &noninteractive),
 296 #if !ENABLE_SUPERMUC
 297     GNUNET_GETOPT_option_string ('H',
 298                                  "hosts",
 299                                  "FILENAME",
 300                                  gettext_noop ("name of the file with the login information for the testbed"),
 301                                  &hosts_file),
 302 #endif
 303     GNUNET_GETOPT_OPTION_END
 304   };
 305   const char *binaryHelp = "gnunet-testbed-profiler [OPTIONS]";
 306   int ret;
 307
 308   unsetenv ("XDG_DATA_HOME");
 309   unsetenv ("XDG_CONFIG_HOME");
 310   if (GNUNET_OK != GNUNET_STRINGS_get_utf8_args (argc, argv, &argc, &argv))
 311     return 2;
 312   result = GNUNET_SYSERR;
 313   ret =
 314       GNUNET_PROGRAM_run (argc, argv, "gnunet-testbed-profiler", binaryHelp,
 315                           options, &run, NULL);
 316   GNUNET_free ((void *) argv);
 317   if (GNUNET_OK != ret)
 318     return ret;
 319   if (GNUNET_OK != result)
 320     return 1;
 321   return 0;
 322 }