src/fs/gnunet-fs-profiler.c

   1 /*
   2      This file is part of GNUnet.
   3      (C) 2012 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 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., 59 Temple Place - Suite 330,
  18      Boston, MA 02111-1307, USA.
  19 */
  20
  21 /**
  22  * @file fs/gnunet-fs-profiler.c
  23  * @brief tool to benchmark/profile file-sharing
  24  * @author Christian Grothoff
  25  */
  26 #include "platform.h"
  27 #include "gnunet_util_lib.h"
  28 #include "gnunet_testbed_service.h"
  29
  30 /**
  31  * Final status code.
  32  */
  33 static int ret;
  34
  35 /**
  36  * Data file with the hosts for the testbed.
  37  */
  38 static char *host_filename;
  39
  40 /**
  41  * Number of peers to run in the experiment.
  42  */
  43 static unsigned int num_peers;
  44
  45 /**
  46  * After how long do we abort the test?
  47  */
  48 static struct GNUNET_TIME_Relative timeout;
  49
  50 /**
  51  * Handle to the task run during termination.
  52  */
  53 static GNUNET_SCHEDULER_TaskIdentifier terminate_taskid;
  54
  55
  56 /**
  57  * Function called after we've collected the statistics.
  58  *
  59  * @param cls NULL
  60  * @param op the operation that has been finished
  61  * @param emsg error message in case the operation has failed; will be NULL if
  62  *          operation has executed successfully.
  63  */
  64 static void
  65 shutdown_task (void *cls,
  66                struct GNUNET_TESTBED_Operation *op,
  67                const char *emsg)
  68 {
  69   if (NULL != emsg)
  70     fprintf (stderr,
  71              "Error collecting statistics: %s\n",
  72              emsg);
  73   GNUNET_SCHEDULER_shutdown ();
  74 }
  75
  76
  77 /**
  78  * Callback function to process statistic values from all peers.
  79  * Prints them out.
  80  *
  81  * @param cls closure
  82  * @param peer the peer the statistic belong to
  83  * @param subsystem name of subsystem that created the statistic
  84  * @param name the name of the datum
  85  * @param value the current value
  86  * @param is_persistent GNUNET_YES if the value is persistent, GNUNET_NO if not
  87  * @return GNUNET_OK to continue, GNUNET_SYSERR to abort iteration
  88  */
  89 static int
  90 process_stats (void *cls,
  91                const struct GNUNET_TESTBED_Peer *peer,
  92                const char *subsystem,
  93                const char *name,
  94                uint64_t value,
  95                int is_persistent)
  96 {
  97   fprintf (stdout,
  98            "%p-%s: %s = %llu\n",
  99            peer,
 100            subsystem,
 101            name,
 102            (unsigned long long) value);
 103   return GNUNET_OK;
 104 }
 105
 106
 107 /**
 108  * Task run on timeout to terminate.  Triggers printing out
 109  * all statistics.
 110  *
 111  * @param cls NULL
 112  * @param tc unused
 113  */
 114 static void
 115 terminate_task (void *cls,
 116                 const struct GNUNET_SCHEDULER_TaskContext *tc)
 117 {
 118   terminate_taskid = GNUNET_SCHEDULER_NO_TASK;
 119   GNUNET_TESTBED_get_statistics (0, NULL,
 120                                  &process_stats,
 121                                  &shutdown_task,
 122                                  NULL);
 123 }
 124
 125
 126 /**
 127  * The testbed has been started, now begin the experiment.
 128  *
 129  * @param cls configuration handle
 130  * @param tc scheduler context
 131  */
 132 static void
 133 master_task (void *cls,
 134              const struct GNUNET_SCHEDULER_TaskContext *tc)
 135 {
 136   // const struct GNUNET_CONFIGURATION_Handle *cfg = cls;
 137   // FIXME: enable clients to signal 'completion' before timeout;
 138   // in that case, run the 'terminate_task' "immediately"
 139
 140   if (0 != timeout.rel_value)
 141     terminate_taskid = GNUNET_SCHEDULER_add_delayed (timeout,
 142                                                      &terminate_task, NULL);
 143   else
 144     terminate_taskid = GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_FOREVER_REL,
 145                                                      &terminate_task,
 146                                                      NULL);
 147 }
 148
 149
 150 /**
 151  * Main function that will be run by the scheduler.
 152  *
 153  * @param cls closure
 154  * @param args remaining command-line arguments
 155  * @param cfgfile name of the configuration file used (for saving, can be NULL!)
 156  * @param cfg configuration
 157  */
 158 static void
 159 run (void *cls, char *const *args, const char *cfgfile,
 160      const struct GNUNET_CONFIGURATION_Handle *cfg)
 161 {
 162   GNUNET_TESTBED_run (host_filename,
 163                       cfg,
 164                       num_peers,
 165                       0, NULL, NULL,
 166                       &master_task, (void *) cfg);
 167 }
 168
 169
 170 /**
 171  * Program to run a file-sharing testbed.
 172  *
 173  * @param argc number of arguments from the command line
 174  * @param argv command line arguments
 175  * @return 0 ok, 1 on error
 176  */
 177 int
 178 main (int argc, char *const *argv)
 179 {
 180   static const struct GNUNET_GETOPT_CommandLineOption options[] = {
 181     {'n', "num-peers", "COUNT",
 182      gettext_noop ("run the experiment with COUNT peers"),
 183      1, &GNUNET_GETOPT_set_uint, &num_peers},
 184     {'H', "hosts", "HOSTFILE",
 185      gettext_noop ("specifies name of a file with the HOSTS the testbed should use"),
 186      1, &GNUNET_GETOPT_set_string, &host_filename},
 187     {'t', "timeout", "DELAY",
 188      gettext_noop ("automatically terminate experiment after DELAY"),
 189      1, &GNUNET_GETOPT_set_relative_time, &timeout},
 190     GNUNET_GETOPT_OPTION_END
 191   };
 192   if (GNUNET_OK != GNUNET_STRINGS_get_utf8_args (argc, argv, &argc, &argv))
 193     return 2;
 194
 195   ret = (GNUNET_OK ==
 196          GNUNET_PROGRAM_run (argc, argv, "gnunet-fs-profiler",
 197                              gettext_noop ("run a testbed to measure file-sharing performance"), options, &run,
 198                              NULL)) ? ret : 1;
 199   GNUNET_free ((void*) argv);
 200   return ret;
 201 }
 202
 203 /* end of gnunet-fs-profiler.c */