src/arm/arm_api.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 arm/arm_api.c
  23  * @brief API for accessing the ARM service
  24  * @author Christian Grothoff
  25  */
  26 #include "platform.h"
  27 #include "gnunet_arm_service.h"
  28 #include "gnunet_client_lib.h"
  29 #include "gnunet_getopt_lib.h"
  30 #include "gnunet_os_lib.h"
  31 #include "gnunet_protocols.h"
  32 #include "gnunet_server_lib.h"
  33 #include "arm.h"
  34
  35
  36 /**
  37  * How long are we willing to wait for a service operation during the multi-operation
  38  * request processing?
  39  */
  40 #define MULTI_TIMEOUT  GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 5)
  41
  42
  43 /**
  44  * Handle for interacting with ARM.
  45  */
  46 struct GNUNET_ARM_Handle
  47 {
  48
  49   /**
  50    * Our connection to the ARM service.
  51    */
  52   struct GNUNET_CLIENT_Connection *client;
  53
  54   /**
  55    * The configuration that we are using.
  56    */
  57   struct GNUNET_CONFIGURATION_Handle *cfg;
  58
  59   /**
  60    * Scheduler to use.
  61    */
  62   struct GNUNET_SCHEDULER_Handle *sched;
  63
  64 };
  65
  66
  67 /**
  68  * Setup a context for communicating with ARM.  Note that this
  69  * can be done even if the ARM service is not yet running.
  70  *
  71  * @param cfg configuration to use (needed to contact ARM;
  72  *        the ARM service may internally use a different
  73  *        configuration to determine how to start the service).
  74  * @param sched scheduler to use
  75  * @param service service that *this* process is implementing/providing, can be NULL
  76  * @return context to use for further ARM operations, NULL on error
  77  */
  78 struct GNUNET_ARM_Handle *
  79 GNUNET_ARM_connect (const struct GNUNET_CONFIGURATION_Handle *cfg,
  80                     struct GNUNET_SCHEDULER_Handle *sched,
  81                     const char *service)
  82 {
  83   struct GNUNET_ARM_Handle *ret;
  84   struct GNUNET_CLIENT_Connection *client;
  85
  86   client = GNUNET_CLIENT_connect (sched, "arm", cfg);
  87   if (client == NULL)
  88     return NULL;
  89   ret = GNUNET_malloc (sizeof (struct GNUNET_ARM_Handle));
  90   ret->cfg = GNUNET_CONFIGURATION_dup (cfg);
  91   ret->sched = sched;
  92   ret->client = client;
  93   return ret;
  94 }
  95
  96
  97 /**
  98  * Disconnect from the ARM service.
  99  *
 100  * @param h the handle that was being used
 101  */
 102 void
 103 GNUNET_ARM_disconnect (struct GNUNET_ARM_Handle *h)
 104 {
 105   if (h->client != NULL)
 106     GNUNET_CLIENT_disconnect (h->client);
 107   GNUNET_CONFIGURATION_destroy (h->cfg);
 108   GNUNET_free (h);
 109 }
 110
 111
 112 /**
 113  * Internal state for a request with ARM.
 114  */
 115 struct RequestContext
 116 {
 117
 118   /**
 119    * Pointer to our handle with ARM.
 120    */
 121   struct GNUNET_ARM_Handle *h;
 122
 123   /**
 124    * Function to call with a status code for the requested operation.
 125    */
 126   GNUNET_ARM_Callback callback;
 127
 128   /**
 129    * Closure for "callback".
 130    */
 131   void *cls;
 132
 133   /**
 134    * Timeout for the operation.
 135    */
 136   struct GNUNET_TIME_Absolute timeout;
 137
 138   /**
 139    * Type of the request expressed as a message type (start or stop).
 140    */
 141   uint16_t type;
 142
 143 };
 144
 145
 146 /**
 147  * A client specifically requested starting of ARM itself.
 148  * This function is called with information about whether
 149  * or not ARM is running; if it is, report success.  If
 150  * it is not, start the ARM process.
 151  *
 152  * @param cls the context for the request that we will report on (struct RequestContext*)
 153  * @param tc why were we called (reason says if ARM is running)
 154  */
 155 static void
 156 arm_service_report (void *cls,
 157                     const struct GNUNET_SCHEDULER_TaskContext *tc)
 158 {
 159   struct RequestContext *pos = cls;
 160   pid_t pid;
 161   char *binary;
 162   char *config;
 163
 164   if (0 != (tc->reason & GNUNET_SCHEDULER_REASON_PREREQ_DONE))
 165     {
 166 #if DEBUG_ARM
 167       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 168                   "Looks like `%s' is already running.\n",
 169                   "gnunet-service-arm");
 170 #endif
 171       /* arm is running! */
 172       if (pos->callback != NULL)
 173         pos->callback (pos->cls, GNUNET_YES);
 174       GNUNET_free (pos);
 175       return;
 176     }
 177 #if DEBUG_ARM
 178   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 179               "Looks like `%s' is not running, will start it.\n",
 180               "gnunet-service-arm");
 181 #endif
 182   /* FIXME: should we check that HOSTNAME for 'arm' is localhost? */
 183   /* start service */
 184   if (GNUNET_OK !=
 185       GNUNET_CONFIGURATION_get_value_string (pos->h->cfg,
 186                                              "arm",
 187                                              "BINARY",
 188                                              &binary))
 189     {
 190       GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
 191                   _("Configuration failes to specify option `%s' in section `%s'!\n"),
 192                   "BINARY",
 193                   "arm");
 194       if (pos->callback != NULL)
 195         pos->callback (pos->cls, GNUNET_SYSERR);
 196       GNUNET_free (pos);
 197       return;
 198     }
 199   if (GNUNET_OK !=
 200       GNUNET_CONFIGURATION_get_value_filename (pos->h->cfg,
 201                                                "arm", "CONFIG", &config))
 202     {
 203       GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
 204                   _("Configuration fails to specify option `%s' in section `%s'!\n"),
 205                   "CONFIG",
 206                   "arm");
 207       if (pos->callback != NULL)
 208         pos->callback (pos->cls, GNUNET_SYSERR);
 209       GNUNET_free (binary);
 210       GNUNET_free (pos);
 211       return;
 212     }
 213   pid = GNUNET_OS_start_process (binary, binary, "-d", "-c", config,
 214 #if DEBUG_ARM
 215                                  "-L", "DEBUG",
 216 #endif
 217                                  NULL);
 218   GNUNET_free (binary);
 219   GNUNET_free (config);
 220   if (pid == -1)
 221     {
 222       if (pos->callback != NULL)
 223         pos->callback (pos->cls, GNUNET_SYSERR);
 224       GNUNET_free (pos);
 225       return;
 226     }
 227   if (pos->callback != NULL)
 228     pos->callback (pos->cls, GNUNET_YES);
 229   GNUNET_free (pos);
 230 }
 231
 232
 233 /**
 234  * Process a response from ARM to a request for a change in service
 235  * status.
 236  *
 237  * @param cls the request context
 238  * @param msg the response
 239  */
 240 static void
 241 handle_response (void *cls, const struct GNUNET_MessageHeader *msg)
 242 {
 243   struct RequestContext *sc = cls;
 244   int ret;
 245
 246   if (msg == NULL)
 247     {
 248       GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
 249                   _("Error receiving response to `%s' request from ARM service\n"),
 250                   (sc->type == GNUNET_MESSAGE_TYPE_ARM_START)
 251                   ? "START"
 252                   : "STOP");
 253       GNUNET_CLIENT_disconnect (sc->h->client);
 254       sc->h->client = GNUNET_CLIENT_connect (sc->h->sched,
 255                                              "arm",
 256                                              sc->h->cfg);
 257       GNUNET_assert (NULL != sc->h->client);
 258       if (sc->callback != NULL)
 259         sc->callback (sc->cls, GNUNET_SYSERR);
 260       GNUNET_free (sc);
 261       return;
 262     }
 263 #if DEBUG_ARM
 264   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 265               "Received response from ARM service: %u\n",
 266               ntohs(msg->type));
 267 #endif
 268   switch (ntohs (msg->type))
 269     {
 270     case GNUNET_MESSAGE_TYPE_ARM_IS_UP:
 271       ret = GNUNET_YES;
 272       break;
 273     case GNUNET_MESSAGE_TYPE_ARM_IS_DOWN:
 274       ret = GNUNET_NO;
 275       break;
 276     case GNUNET_MESSAGE_TYPE_ARM_IS_UNKNOWN:
 277       ret = GNUNET_SYSERR;
 278       break;
 279     default:
 280       GNUNET_break (0);
 281       ret = GNUNET_SYSERR;
 282     }
 283   if (sc->callback != NULL)
 284     sc->callback (sc->cls, ret);
 285   GNUNET_free (sc);
 286 }
 287
 288
 289 /**
 290  * Start or stop a service.
 291  *
 292  * @param h handle to ARM
 293  * @param service_name name of the service
 294  * @param timeout how long to wait before failing for good
 295  * @param cb callback to invoke when service is ready
 296  * @param cb_cls closure for callback
 297  * @param type type of the request
 298  */
 299 static void
 300 change_service (struct GNUNET_ARM_Handle *h,
 301                 const char *service_name,
 302                 struct GNUNET_TIME_Relative timeout,
 303                 GNUNET_ARM_Callback cb, void *cb_cls, uint16_t type)
 304 {
 305   struct RequestContext *sctx;
 306   size_t slen;
 307   struct GNUNET_MessageHeader *msg;
 308
 309   slen = strlen (service_name) + 1;
 310   if (slen + sizeof (struct GNUNET_MessageHeader) >
 311       GNUNET_SERVER_MAX_MESSAGE_SIZE)
 312     {
 313       GNUNET_break (0);
 314       if (cb != NULL)
 315         cb (cb_cls, GNUNET_NO);
 316       return;
 317     }
 318 #if DEBUG_ARM
 319   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 320               (type == GNUNET_MESSAGE_TYPE_ARM_START)
 321               ? _("Requesting start of service `%s'.\n")
 322               : _("Requesting termination of service `%s'.\n"),
 323               service_name);
 324 #endif
 325   sctx = GNUNET_malloc (sizeof (struct RequestContext) + slen);
 326   sctx->h = h;
 327   sctx->callback = cb;
 328   sctx->cls = cb_cls;
 329   sctx->timeout = GNUNET_TIME_relative_to_absolute (timeout);
 330   sctx->type = type;
 331   msg = GNUNET_malloc (sizeof (struct GNUNET_MessageHeader) + slen);
 332   msg->size = htons (sizeof (struct GNUNET_MessageHeader) + slen);
 333   msg->type = htons (sctx->type);
 334   memcpy (&msg[1], service_name, slen);
 335   if (GNUNET_OK !=
 336       GNUNET_CLIENT_transmit_and_get_response (sctx->h->client,
 337                                                msg,
 338                                                GNUNET_TIME_absolute_get_remaining (sctx->timeout),
 339                                                GNUNET_YES,
 340                                                &handle_response,
 341                                                sctx))
 342     {
 343       GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
 344                   _("Error while trying to transmit to ARM service\n"));
 345       if (cb != NULL)
 346         cb (cb_cls, GNUNET_SYSERR);
 347       GNUNET_free (sctx);
 348       GNUNET_free (msg);
 349       return;
 350     }
 351   GNUNET_free (msg);
 352 }
 353
 354
 355 /**
 356  * Start a service.
 357  *
 358  * @param h handle to ARM
 359  * @param service_name name of the service
 360  * @param timeout how long to wait before failing for good
 361  * @param cb callback to invoke when service is ready
 362  * @param cb_cls closure for callback
 363  */
 364 void
 365 GNUNET_ARM_start_service (struct GNUNET_ARM_Handle *h,
 366                           const char *service_name,
 367                           struct GNUNET_TIME_Relative timeout,
 368                           GNUNET_ARM_Callback cb, void *cb_cls)
 369 {
 370   struct RequestContext *sctx;
 371
 372   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 373               _("Starting service `%s'\n"), service_name);
 374   if (0 == strcasecmp ("arm", service_name))
 375     {
 376       sctx = GNUNET_malloc (sizeof (struct RequestContext));
 377       sctx->h = h;
 378       sctx->callback = cb;
 379       sctx->cls = cb_cls;
 380       sctx->timeout = GNUNET_TIME_relative_to_absolute (timeout);
 381       GNUNET_CLIENT_service_test (h->sched,
 382                                   "arm",
 383                                   h->cfg, timeout, &arm_service_report, sctx);
 384       return;
 385     }
 386   change_service (h, service_name, timeout, cb, cb_cls, GNUNET_MESSAGE_TYPE_ARM_START);
 387 }
 388
 389
 390 /**
 391  * Stop a service.
 392  *
 393  * @param h handle to ARM
 394  * @param service_name name of the service
 395  * @param timeout how long to wait before failing for good
 396  * @param cb callback to invoke when service is ready
 397  * @param cb_cls closure for callback
 398  */
 399 void
 400 GNUNET_ARM_stop_service (struct GNUNET_ARM_Handle *h,
 401                          const char *service_name,
 402                          struct GNUNET_TIME_Relative timeout,
 403                          GNUNET_ARM_Callback cb, void *cb_cls)
 404 {
 405   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 406               _("Stopping service `%s'\n"), service_name);
 407   if (0 == strcasecmp ("arm", service_name))
 408     {
 409       GNUNET_CLIENT_service_shutdown (h->client);
 410       h->client = NULL;
 411       if (cb != NULL)
 412         cb (cb_cls, GNUNET_NO);
 413       return;
 414     }
 415   change_service (h, service_name, timeout, cb, cb_cls, GNUNET_MESSAGE_TYPE_ARM_STOP);
 416 }
 417
 418
 419 /**
 420  * Function to call for each service.
 421  *
 422  * @param h handle to ARM
 423  * @param service_name name of the service
 424  * @param timeout how long to wait before failing for good
 425  * @param cb callback to invoke when service is ready
 426  * @param cb_cls closure for callback
 427  */
 428 typedef void (*ServiceOperation) (struct GNUNET_ARM_Handle *h,
 429                                   const char *service_name,
 430                                   struct GNUNET_TIME_Relative timeout,
 431                                   GNUNET_ARM_Callback cb, void *cb_cls);
 432
 433
 434 /**
 435  * Context for starting or stopping multiple services.
 436  */
 437 struct MultiContext
 438 {
 439   /**
 440    * NULL-terminated array of services to start or stop.
 441    */
 442   char **services;
 443
 444   /**
 445    * Our handle to ARM.
 446    */
 447   struct GNUNET_ARM_Handle *h;
 448
 449   /**
 450    * Identifies the operation (start or stop).
 451    */
 452   ServiceOperation op;
 453
 454   /**
 455    * Current position in "services".
 456    */
 457   unsigned int pos;
 458 };
 459
 460
 461 /**
 462  * Run the operation for the next service in the multi-service
 463  * request.
 464  *
 465  * @param cls the "struct MultiContext" that is being processed
 466  * @param success status of the previous operation (ignored)
 467  */
 468 static void
 469 next_operation (void *cls,
 470                 int success)
 471 {
 472   struct MultiContext *mc = cls;
 473   char *pos;
 474
 475   if (NULL == (pos = mc->services[mc->pos]))
 476     {
 477       GNUNET_free (mc->services);
 478       GNUNET_ARM_disconnect (mc->h);
 479       GNUNET_free (mc);
 480       return;
 481     }
 482   mc->pos++;
 483   mc->op (mc->h, pos, MULTI_TIMEOUT, &next_operation, mc);
 484   GNUNET_free (pos);
 485 }
 486
 487
 488 /**
 489  * Run a multi-service request.
 490  *
 491  * @param cfg configuration to use (needed to contact ARM;
 492  *        the ARM service may internally use a different
 493  *        configuration to determine how to start the service).
 494  * @param sched scheduler to use
 495  * @param op the operation to perform for each service
 496  * @param va NULL-terminated list of services
 497  */
 498 static void
 499 run_multi_request (const struct GNUNET_CONFIGURATION_Handle *cfg,
 500                    struct GNUNET_SCHEDULER_Handle *sched,
 501                    ServiceOperation op,
 502                    va_list va)
 503 {
 504   va_list cp;
 505   unsigned int total;
 506   struct MultiContext *mc;
 507   struct GNUNET_ARM_Handle *h;
 508   const char *c;
 509
 510   h = GNUNET_ARM_connect (cfg, sched, NULL);
 511   if (NULL == h)
 512     {
 513       GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
 514                   _("Error while trying to transmit to ARM service\n"));
 515       return;
 516     }
 517   total = 1;
 518   va_copy (cp, va);
 519   while (NULL != (va_arg (cp, const char*))) total++;
 520   va_end (cp);
 521   mc = GNUNET_malloc (sizeof(struct MultiContext));
 522   mc->services = GNUNET_malloc (total * sizeof (char*));
 523   mc->h = h;
 524   mc->op = op;
 525   total = 0;
 526   va_copy (cp, va);
 527   while (NULL != (c = va_arg (cp, const char*)))
 528     mc->services[total++] = GNUNET_strdup (c);
 529   va_end (cp);
 530   next_operation (mc, GNUNET_YES);
 531 }
 532
 533
 534 /**
 535  * Start multiple services in the specified order.  Convenience
 536  * function.  Works asynchronously, failures are not reported.
 537  *
 538  * @param cfg configuration to use (needed to contact ARM;
 539  *        the ARM service may internally use a different
 540  *        configuration to determine how to start the service).
 541  * @param sched scheduler to use
 542  * @param ... NULL-terminated list of service names (const char*)
 543  */
 544 void
 545 GNUNET_ARM_start_services (const struct GNUNET_CONFIGURATION_Handle *cfg,
 546                            struct GNUNET_SCHEDULER_Handle *sched,
 547                            ...)
 548 {
 549   va_list ap;
 550
 551   va_start (ap, sched);
 552   run_multi_request (cfg, sched, &GNUNET_ARM_start_service, ap);
 553   va_end (ap);
 554 }
 555
 556
 557 /**
 558  * Stop multiple services in the specified order.  Convenience
 559  * function.  Works asynchronously, failures are not reported.
 560  *
 561  * @param cfg configuration to use (needed to contact ARM;
 562  *        the ARM service may internally use a different
 563  *        configuration to determine how to start the service).
 564  * @param sched scheduler to use
 565  * @param ... NULL-terminated list of service names (const char*)
 566  */
 567 void
 568 GNUNET_ARM_stop_services (const struct GNUNET_CONFIGURATION_Handle *cfg,
 569                           struct GNUNET_SCHEDULER_Handle *sched,
 570                           ...)
 571 {
 572   va_list ap;
 573
 574   va_start (ap, sched);
 575   run_multi_request (cfg, sched, &GNUNET_ARM_stop_service, ap);
 576   va_end (ap);
 577 }
 578
 579
 580 /* end of arm_api.c */