src/util/program.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 /**
  22  * @file util/program.c
  23  * @brief standard code for GNUnet startup and shutdown
  24  * @author Christian Grothoff
  25  */
  26
  27 #include "platform.h"
  28 #include "gnunet_common.h"
  29 #include "gnunet_configuration_lib.h"
  30 #include "gnunet_crypto_lib.h"
  31 #include "gnunet_directories.h"
  32 #include "gnunet_getopt_lib.h"
  33 #include "gnunet_os_lib.h"
  34 #include "gnunet_program_lib.h"
  35 #include "gnunet_resolver_service.h"
  36 #include "gnunet_scheduler_lib.h"
  37 #include <gcrypt.h>
  38
  39 /**
  40  * Context for the command.
  41  */
  42 struct CommandContext
  43 {
  44   /**
  45    * Argv argument.
  46    */
  47   char *const *args;
  48
  49   /**
  50    * Name of the configuration file used, can be NULL!
  51    */
  52   char *cfgfile;
  53
  54   /**
  55    * Main function to run.
  56    */
  57   GNUNET_PROGRAM_Main task;
  58
  59   /**
  60    * Closure for task.
  61    */
  62   void *task_cls;
  63
  64   /**
  65    * Configuration to use.
  66    */
  67   const struct GNUNET_CONFIGURATION_Handle *cfg;
  68
  69 };
  70
  71
  72 /**
  73  * Initial task called by the scheduler for each
  74  * program.  Runs the program-specific main task.
  75  */
  76 static void
  77 program_main (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
  78 {
  79   struct CommandContext *cc = cls;
  80
  81   GNUNET_RESOLVER_connect (cc->cfg);
  82   cc->task (cc->task_cls, cc->args, cc->cfgfile, cc->cfg);
  83 }
  84
  85
  86 /**
  87  * Compare function for 'qsort' to sort command-line arguments by the
  88  * short option.
  89  *
  90  * @param a1 first command line option
  91  * @param a2 second command line option
  92  */
  93 static int
  94 cmd_sorter (__const void *a1, __const void *a2)
  95 {
  96   __const struct GNUNET_GETOPT_CommandLineOption *c1 = a1;
  97   __const struct GNUNET_GETOPT_CommandLineOption *c2 = a2;
  98   if (toupper ( (unsigned char) c1->shortName) > toupper ( (unsigned char) c2->shortName))
  99     return 1;
 100   if (toupper ( (unsigned char) c1->shortName) < toupper ( (unsigned char) c2->shortName))
 101     return -1;
 102   if (c1->shortName > c2->shortName)
 103     return 1;
 104   if (c1->shortName < c2->shortName)
 105     return -1;
 106   return 0;
 107 }
 108
 109
 110 /**
 111  * Run a standard GNUnet command startup sequence (initialize loggers
 112  * and configuration, parse options).
 113  *
 114  * @param argc number of command line arguments
 115  * @param argv command line arguments
 116  * @param binaryName our expected name
 117  * @param binaryHelp help text for the program
 118  * @param options command line options
 119  * @param task main function to run
 120  * @param task_cls closure for task
 121  * @return GNUNET_SYSERR on error, GNUNET_OK on success
 122  */
 123 int
 124 GNUNET_PROGRAM_run (int argc,
 125                     char *const *argv,
 126                     const char *binaryName,
 127                     const char *binaryHelp,
 128                     const struct GNUNET_GETOPT_CommandLineOption *options,
 129                     GNUNET_PROGRAM_Main task, void *task_cls)
 130 {
 131   struct CommandContext cc;
 132   char *path;
 133   char *loglev;
 134   char *logfile;
 135   int ret;
 136   unsigned int cnt;
 137   unsigned long long skew_offset;
 138   unsigned long long skew_variance;
 139   long long clock_offset;
 140   struct GNUNET_CONFIGURATION_Handle *cfg;
 141   struct GNUNET_GETOPT_CommandLineOption defoptions[] = {
 142     GNUNET_GETOPT_OPTION_CFG_FILE (&cc.cfgfile),
 143     GNUNET_GETOPT_OPTION_HELP (binaryHelp),
 144     GNUNET_GETOPT_OPTION_LOGLEVEL (&loglev),
 145     GNUNET_GETOPT_OPTION_LOGFILE (&logfile),
 146     GNUNET_GETOPT_OPTION_VERSION (PACKAGE_VERSION)
 147   };
 148   struct GNUNET_GETOPT_CommandLineOption *allopts;
 149   const char *gargs;
 150   char *lpfx;
 151   char *spc;
 152
 153   logfile = NULL;
 154   gargs = getenv ("GNUNET_ARGS");
 155   if (gargs != NULL)
 156     {
 157       char **gargv;
 158       unsigned int gargc;
 159       int i;
 160       char *tok;
 161       char *cargs;
 162
 163       gargv = NULL;
 164       gargc = 0;
 165       for (i=0;i<argc;i++)
 166         GNUNET_array_append (gargv, gargc, GNUNET_strdup (argv[i]));
 167       cargs = GNUNET_strdup (gargs);
 168       tok = strtok (cargs, " ");
 169       while (NULL != tok)
 170         {
 171           GNUNET_array_append (gargv, gargc, GNUNET_strdup (tok));
 172           tok = strtok (NULL, " ");
 173         }
 174       GNUNET_free (cargs);
 175       GNUNET_array_append (gargv, gargc, NULL);
 176       argv = (char *const *) gargv;
 177       argc = gargc - 1;
 178     }
 179   memset (&cc, 0, sizeof (cc));
 180   loglev = NULL;
 181   cc.task = task;
 182   cc.task_cls = task_cls;
 183   cc.cfg = cfg = GNUNET_CONFIGURATION_create ();
 184
 185   /* prepare */
 186 #if ENABLE_NLS
 187   setlocale (LC_ALL, "");
 188   path = GNUNET_OS_installation_get_path (GNUNET_OS_IPK_LOCALEDIR);
 189   if (path != NULL)
 190     {
 191       BINDTEXTDOMAIN ("GNUnet", path);
 192       GNUNET_free (path);
 193     }
 194   textdomain ("GNUnet");
 195 #endif
 196   cnt = 0;
 197   while (options[cnt].name != NULL)
 198     cnt++;
 199   allopts =
 200     GNUNET_malloc ((cnt +
 201                     1) * sizeof (struct GNUNET_GETOPT_CommandLineOption) +
 202                    sizeof (defoptions));
 203   memcpy (allopts, defoptions, sizeof (defoptions));
 204   memcpy (&allopts
 205           [sizeof (defoptions) /
 206            sizeof (struct GNUNET_GETOPT_CommandLineOption)], options,
 207           (cnt + 1) * sizeof (struct GNUNET_GETOPT_CommandLineOption));
 208   cnt +=
 209     sizeof (defoptions) / sizeof (struct GNUNET_GETOPT_CommandLineOption);
 210   qsort (allopts, cnt, sizeof (struct GNUNET_GETOPT_CommandLineOption),
 211          &cmd_sorter);
 212   loglev = GNUNET_strdup ("WARNING");
 213   cc.cfgfile = GNUNET_strdup (GNUNET_DEFAULT_USER_CONFIG_FILE);
 214   lpfx = GNUNET_strdup (binaryName);
 215   if (NULL != (spc = strstr (lpfx, " ")))
 216     *spc = '\0';
 217   if ((-1 == (ret = GNUNET_GETOPT_run (binaryName,
 218                                        allopts,
 219                                        (unsigned int) argc, argv))) ||
 220       ((GNUNET_OK !=
 221         GNUNET_log_setup (lpfx,
 222                           loglev,
 223                           logfile)) ||
 224        (GNUNET_OK != GNUNET_CONFIGURATION_load (cfg, cc.cfgfile))))
 225     {
 226       GNUNET_CONFIGURATION_destroy (cfg);
 227       GNUNET_free_non_null (cc.cfgfile);
 228       GNUNET_free (loglev);
 229       GNUNET_free (allopts);
 230       GNUNET_free (lpfx);
 231       return GNUNET_SYSERR;
 232     }
 233   GNUNET_free (allopts);
 234   GNUNET_free (lpfx);
 235   if (GNUNET_OK == GNUNET_CONFIGURATION_get_value_number(cc.cfg, "testing", "skew_offset", &skew_offset) &&
 236       (GNUNET_OK == GNUNET_CONFIGURATION_get_value_number(cc.cfg, "testing", "skew_variance", &skew_variance)))
 237     {
 238       clock_offset = skew_offset - skew_variance;
 239       GNUNET_TIME_set_offset(clock_offset);
 240     }
 241   /* run */
 242   cc.args = &argv[ret];
 243   GNUNET_SCHEDULER_run (&program_main, &cc);
 244
 245   /* clean up */
 246   GNUNET_CONFIGURATION_destroy (cfg);
 247   GNUNET_free_non_null (cc.cfgfile);
 248   GNUNET_free (loglev);
 249   return GNUNET_OK;
 250 }
 251
 252
 253 /* end of program.c */