2 This file is part of GNUnet.
3 (C) 2009, 2010, 2012 Christian Grothoff (and other contributing authors)
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.
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.
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.
23 * @brief API for accessing the ARM service
24 * @author Christian Grothoff
27 #include "gnunet_arm_service.h"
28 #include "gnunet_util_lib.h"
29 #include "gnunet_protocols.h"
32 #define LOG(kind,...) GNUNET_log_from (kind, "arm-api",__VA_ARGS__)
35 * Handle for interacting with ARM.
37 struct GNUNET_ARM_Handle
41 * Our connection to the ARM service.
43 struct GNUNET_CLIENT_Connection *client;
46 * The configuration that we are using.
48 struct GNUNET_CONFIGURATION_Handle *cfg;
53 * Context for handling the shutdown of a service.
55 struct ShutdownContext
58 * Connection to the service that is being shutdown.
60 struct GNUNET_CLIENT_Connection *sock;
63 * Time allowed for shutdown to happen.
65 struct GNUNET_TIME_Absolute timeout;
68 * Task set up to cancel the shutdown request on timeout.
70 GNUNET_SCHEDULER_TaskIdentifier cancel_task;
73 * Task to call once shutdown complete
75 GNUNET_CLIENT_ShutdownTask cont;
78 * Closure for shutdown continuation
83 * Handle for transmission request.
85 struct GNUNET_CLIENT_TransmitHandle *th;
91 * Handler receiving response to service shutdown requests.
92 * First call with NULL: service misbehaving, or something.
93 * First call with GNUNET_MESSAGE_TYPE_ARM_SHUTDOWN_ACK:
94 * - service will shutdown
95 * Second call with NULL:
96 * - service has now really shut down.
99 * @param msg NULL, indicating socket closure.
102 service_shutdown_handler (void *cls, const struct GNUNET_MessageHeader *msg)
104 struct ShutdownContext *shutdown_ctx = cls;
108 /* We just expected a disconnect! Report the error and be done with it... */
110 shutdown_ctx->cont (shutdown_ctx->cont_cls, GNUNET_ARM_PROCESS_COMMUNICATION_ERROR);
111 GNUNET_SCHEDULER_cancel (shutdown_ctx->cancel_task);
112 GNUNET_CLIENT_disconnect (shutdown_ctx->sock);
113 GNUNET_free (shutdown_ctx);
116 if (NULL != shutdown_ctx->cont)
117 /* shutdown is now complete, as we waited for the network disconnect... */
118 shutdown_ctx->cont (shutdown_ctx->cont_cls, GNUNET_ARM_PROCESS_DOWN);
119 GNUNET_SCHEDULER_cancel (shutdown_ctx->cancel_task);
120 GNUNET_CLIENT_disconnect (shutdown_ctx->sock);
121 GNUNET_free (shutdown_ctx);
126 * Shutting down took too long, cancel receive and return error.
129 * @param tc context information (why was this task triggered now)
132 service_shutdown_cancel (void *cls,
133 const struct GNUNET_SCHEDULER_TaskContext *tc)
135 struct ShutdownContext *shutdown_ctx = cls;
137 shutdown_ctx->cont (shutdown_ctx->cont_cls, GNUNET_ARM_PROCESS_COMMUNICATION_TIMEOUT);
138 GNUNET_CLIENT_disconnect (shutdown_ctx->sock);
139 GNUNET_free (shutdown_ctx);
144 * If possible, write a shutdown message to the target
145 * buffer and destroy the client connection.
147 * @param cls the "struct GNUNET_CLIENT_Connection" to destroy
148 * @param size number of bytes available in buf
149 * @param buf NULL on error, otherwise target buffer
150 * @return number of bytes written to buf
153 write_shutdown (void *cls, size_t size, void *buf)
155 struct ShutdownContext *shutdown_ctx = cls;
156 struct GNUNET_MessageHeader *msg;
158 shutdown_ctx->th = NULL;
159 if (size < sizeof (struct GNUNET_MessageHeader))
161 LOG (GNUNET_ERROR_TYPE_WARNING,
162 _("Failed to transmit shutdown request to client.\n"));
163 shutdown_ctx->cont (shutdown_ctx->cont_cls, GNUNET_ARM_PROCESS_COMMUNICATION_ERROR);
164 GNUNET_CLIENT_disconnect (shutdown_ctx->sock);
165 GNUNET_free (shutdown_ctx);
166 return 0; /* client disconnected */
168 GNUNET_CLIENT_receive (shutdown_ctx->sock, &service_shutdown_handler,
169 shutdown_ctx, GNUNET_TIME_UNIT_FOREVER_REL);
170 shutdown_ctx->cancel_task =
171 GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_absolute_get_remaining
172 (shutdown_ctx->timeout),
173 &service_shutdown_cancel, shutdown_ctx);
174 msg = (struct GNUNET_MessageHeader *) buf;
175 msg->type = htons (GNUNET_MESSAGE_TYPE_ARM_SHUTDOWN);
176 msg->size = htons (sizeof (struct GNUNET_MessageHeader));
177 return sizeof (struct GNUNET_MessageHeader);
182 * Request that the service should shutdown.
183 * Afterwards, the connection will automatically be
184 * disconnected. Hence the "sock" should not
185 * be used by the caller after this call
186 * (calling this function frees "sock" after a while).
188 * @param sock the socket connected to the service
189 * @param timeout how long to wait before giving up on transmission
190 * @param cont continuation to call once the service is really down
191 * @param cont_cls closure for continuation
195 arm_service_shutdown (struct GNUNET_CLIENT_Connection *sock,
196 struct GNUNET_TIME_Relative timeout,
197 GNUNET_CLIENT_ShutdownTask cont, void *cont_cls)
199 struct ShutdownContext *shutdown_ctx;
201 shutdown_ctx = GNUNET_malloc (sizeof (struct ShutdownContext));
202 shutdown_ctx->cont = cont;
203 shutdown_ctx->cont_cls = cont_cls;
204 shutdown_ctx->sock = sock;
205 shutdown_ctx->timeout = GNUNET_TIME_relative_to_absolute (timeout);
206 shutdown_ctx->th = GNUNET_CLIENT_notify_transmit_ready (sock,
207 sizeof (struct GNUNET_MessageHeader),
208 timeout, GNUNET_NO, &write_shutdown,
214 * Setup a context for communicating with ARM. Note that this
215 * can be done even if the ARM service is not yet running.
217 * @param cfg configuration to use (needed to contact ARM;
218 * the ARM service may internally use a different
219 * configuration to determine how to start the service).
220 * @param service service that *this* process is implementing/providing, can be NULL
221 * @return context to use for further ARM operations, NULL on error
223 struct GNUNET_ARM_Handle *
224 GNUNET_ARM_connect (const struct GNUNET_CONFIGURATION_Handle *cfg,
227 struct GNUNET_ARM_Handle *ret;
229 ret = GNUNET_malloc (sizeof (struct GNUNET_ARM_Handle));
230 ret->cfg = GNUNET_CONFIGURATION_dup (cfg);
236 * Disconnect from the ARM service.
238 * @param h the handle that was being used
241 GNUNET_ARM_disconnect (struct GNUNET_ARM_Handle *h)
243 if (h->client != NULL)
244 GNUNET_CLIENT_disconnect (h->client);
245 GNUNET_CONFIGURATION_destroy (h->cfg);
250 struct ARM_ShutdownContext
253 * Callback to call once shutdown complete.
255 GNUNET_ARM_Callback cb;
258 * Closure for callback.
265 * Internal state for a request with ARM.
267 struct RequestContext
271 * Pointer to our handle with ARM.
273 struct GNUNET_ARM_Handle *h;
276 * Function to call with a status code for the requested operation.
278 GNUNET_ARM_Callback callback;
281 * Closure for "callback".
286 * Timeout for the operation.
288 struct GNUNET_TIME_Absolute timeout;
291 * Type of the request expressed as a message type (start or stop).
296 * Flags for passing std descriptors to ARM (when starting ARM).
298 enum GNUNET_OS_InheritStdioFlags std_inheritance;
302 #include "do_start_process.c"
306 * A client specifically requested starting of ARM itself.
307 * This function is called with information about whether
308 * or not ARM is running; if it is, report success. If
309 * it is not, start the ARM process.
311 * @param cls the context for the request that we will report on (struct RequestContext*)
312 * @param tc why were we called (reason says if ARM is running)
315 arm_service_report (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
317 struct RequestContext *pos = cls;
318 struct GNUNET_OS_Process *proc;
325 if (0 != (tc->reason & GNUNET_SCHEDULER_REASON_PREREQ_DONE))
327 LOG (GNUNET_ERROR_TYPE_DEBUG, "Looks like `%s' is already running.\n",
328 "gnunet-service-arm");
329 /* arm is running! */
330 if (pos->callback != NULL)
331 pos->callback (pos->cls, GNUNET_ARM_PROCESS_ALREADY_RUNNING);
335 LOG (GNUNET_ERROR_TYPE_DEBUG,
336 "Looks like `%s' is not running, will start it.\n",
337 "gnunet-service-arm");
339 GNUNET_CONFIGURATION_get_value_string (pos->h->cfg, "arm", "PREFIX",
341 loprefix = GNUNET_strdup ("");
343 GNUNET_CONFIGURATION_get_value_string (pos->h->cfg, "arm", "OPTIONS",
345 lopostfix = GNUNET_strdup ("");
347 GNUNET_CONFIGURATION_get_value_string (pos->h->cfg, "arm", "BINARY",
350 GNUNET_log_config_missing (GNUNET_ERROR_TYPE_WARNING,
352 if (pos->callback != NULL)
353 pos->callback (pos->cls, GNUNET_ARM_PROCESS_UNKNOWN);
355 GNUNET_free (loprefix);
356 GNUNET_free (lopostfix);
360 GNUNET_CONFIGURATION_get_value_filename (pos->h->cfg, "arm", "CONFIG",
363 GNUNET_log_config_missing (GNUNET_ERROR_TYPE_WARNING,
365 if (pos->callback != NULL)
366 pos->callback (pos->cls, GNUNET_ARM_PROCESS_UNKNOWN);
367 GNUNET_free (cbinary);
369 GNUNET_free (loprefix);
370 GNUNET_free (lopostfix);
373 binary = GNUNET_OS_get_libexec_binary_path (cbinary);
374 GNUNET_free (cbinary);
376 GNUNET_CONFIGURATION_have_value (pos->h->cfg, "TESTING", "WEAKRANDOM"))
378 GNUNET_CONFIGURATION_get_value_yesno (pos->h->cfg, "TESTING",
381 GNUNET_CONFIGURATION_have_value (pos->h->cfg, "TESTING",
384 /* Means we are ONLY running locally */
385 /* we're clearly running a test, don't daemonize */
386 proc = do_start_process (GNUNET_NO, pos->std_inheritance,
387 NULL, loprefix, binary, "-c", config,
388 /* no daemonization! */
393 proc = do_start_process (GNUNET_NO, pos->std_inheritance,
394 NULL, loprefix, binary, "-c", config,
395 "-d", lopostfix, NULL);
397 GNUNET_free (binary);
398 GNUNET_free (config);
399 GNUNET_free (loprefix);
400 GNUNET_free (lopostfix);
403 if (pos->callback != NULL)
404 pos->callback (pos->cls, GNUNET_ARM_PROCESS_FAILURE);
408 if (pos->callback != NULL)
409 pos->callback (pos->cls, GNUNET_ARM_PROCESS_STARTING);
416 * Process a response from ARM to a request for a change in service
419 * @param cls the request context
420 * @param msg the response
423 handle_response (void *cls, const struct GNUNET_MessageHeader *msg)
425 struct RequestContext *sc = cls;
426 const struct GNUNET_ARM_ResultMessage *res;
427 enum GNUNET_ARM_ProcessStatus status;
430 (ntohs (msg->size) != sizeof (struct GNUNET_ARM_ResultMessage)))
433 GNUNET_CLIENT_disconnect (sc->h->client);
434 sc->h->client = GNUNET_CLIENT_connect ("arm", sc->h->cfg);
435 GNUNET_assert (NULL != sc->h->client);
436 if (sc->callback != NULL)
437 sc->callback (sc->cls, GNUNET_ARM_PROCESS_COMMUNICATION_ERROR);
441 res = (const struct GNUNET_ARM_ResultMessage *) msg;
442 LOG (GNUNET_ERROR_TYPE_DEBUG,
443 "Received response from ARM for service `%s': %u\n",
444 (const char *) &sc[1], ntohs (msg->type));
445 status = (enum GNUNET_ARM_ProcessStatus) ntohl (res->status);
446 if (sc->callback != NULL)
447 sc->callback (sc->cls, status);
453 * Start or stop a service.
455 * @param h handle to ARM
456 * @param service_name name of the service
457 * @param timeout how long to wait before failing for good
458 * @param cb callback to invoke when service is ready
459 * @param cb_cls closure for callback
460 * @param type type of the request
463 change_service (struct GNUNET_ARM_Handle *h, const char *service_name,
464 struct GNUNET_TIME_Relative timeout, GNUNET_ARM_Callback cb,
465 void *cb_cls, uint16_t type)
467 struct RequestContext *sctx;
469 struct GNUNET_MessageHeader *msg;
471 slen = strlen (service_name) + 1;
472 if (slen + sizeof (struct GNUNET_MessageHeader) >=
473 GNUNET_SERVER_MAX_MESSAGE_SIZE)
477 cb (cb_cls, GNUNET_NO);
480 LOG (GNUNET_ERROR_TYPE_DEBUG,
482 GNUNET_MESSAGE_TYPE_ARM_START) ?
483 "Requesting start of service `%s'.\n" :
484 "Requesting termination of service `%s'.\n", service_name);
485 sctx = GNUNET_malloc (sizeof (struct RequestContext) + slen);
489 sctx->timeout = GNUNET_TIME_relative_to_absolute (timeout);
491 memcpy (&sctx[1], service_name, slen);
492 msg = GNUNET_malloc (sizeof (struct GNUNET_MessageHeader) + slen);
493 msg->size = htons (sizeof (struct GNUNET_MessageHeader) + slen);
494 msg->type = htons (sctx->type);
495 memcpy (&msg[1], service_name, slen);
497 GNUNET_CLIENT_transmit_and_get_response (sctx->h->client, msg,
498 GNUNET_TIME_absolute_get_remaining
499 (sctx->timeout), GNUNET_YES,
500 &handle_response, sctx))
504 cb (cb_cls, GNUNET_SYSERR);
516 * @param h handle to ARM
517 * @param service_name name of the service
518 * @param std_inheritance inheritance of std streams
519 * @param timeout how long to wait before failing for good
520 * @param cb callback to invoke when service is ready
521 * @param cb_cls closure for callback
524 GNUNET_ARM_start_service (struct GNUNET_ARM_Handle *h,
525 const char *service_name,
526 enum GNUNET_OS_InheritStdioFlags std_inheritance,
527 struct GNUNET_TIME_Relative timeout,
528 GNUNET_ARM_Callback cb, void *cb_cls)
530 struct RequestContext *sctx;
531 struct GNUNET_CLIENT_Connection *client;
534 LOG (GNUNET_ERROR_TYPE_DEBUG,
535 "Asked to start service `%s' within %s\n", service_name,
536 GNUNET_STRINGS_relative_time_to_string (timeout, GNUNET_NO));
537 if (0 == strcasecmp ("arm", service_name))
539 slen = strlen ("arm") + 1;
540 sctx = GNUNET_malloc (sizeof (struct RequestContext) + slen);
544 sctx->timeout = GNUNET_TIME_relative_to_absolute (timeout);
545 sctx->std_inheritance = std_inheritance;
546 memcpy (&sctx[1], service_name, slen);
547 GNUNET_CLIENT_service_test ("arm", h->cfg, timeout, &arm_service_report,
551 if (NULL == h->client)
553 client = GNUNET_CLIENT_connect ("arm", h->cfg);
556 LOG (GNUNET_ERROR_TYPE_DEBUG,
557 "arm_api, GNUNET_CLIENT_connect returned NULL\n");
558 cb (cb_cls, GNUNET_ARM_PROCESS_COMMUNICATION_ERROR);
561 LOG (GNUNET_ERROR_TYPE_DEBUG,
562 "arm_api, GNUNET_CLIENT_connect returned non-NULL\n");
565 LOG (GNUNET_ERROR_TYPE_DEBUG, "arm_api, h->client non-NULL\n");
566 change_service (h, service_name, timeout, cb, cb_cls,
567 GNUNET_MESSAGE_TYPE_ARM_START);
572 * Callback from the arm stop service call, indicates that the arm service
573 * is well and truly dead, won't die, or an error occurred.
575 * @param cls closure for the callback
576 * @param reason reason for callback
579 arm_shutdown_callback (void *cls, enum GNUNET_ARM_ProcessStatus reason)
581 struct ARM_ShutdownContext *arm_shutdown_ctx = cls;
583 if (arm_shutdown_ctx->cb != NULL)
584 arm_shutdown_ctx->cb (arm_shutdown_ctx->cb_cls, reason);
585 GNUNET_free (arm_shutdown_ctx);
592 * @param h handle to ARM
593 * @param service_name name of the service
594 * @param timeout how long to wait before failing for good
595 * @param cb callback to invoke when service is ready
596 * @param cb_cls closure for callback
599 GNUNET_ARM_stop_service (struct GNUNET_ARM_Handle *h,
600 const char *service_name,
601 struct GNUNET_TIME_Relative timeout,
602 GNUNET_ARM_Callback cb, void *cb_cls)
604 struct ARM_ShutdownContext *arm_shutdown_ctx;
605 struct GNUNET_CLIENT_Connection *client;
607 LOG (GNUNET_ERROR_TYPE_DEBUG,
608 "Stopping service `%s' within %s\n",
610 GNUNET_STRINGS_relative_time_to_string (timeout, GNUNET_NO));
611 if (h->client == NULL)
613 client = GNUNET_CLIENT_connect ("arm", h->cfg);
616 cb (cb_cls, GNUNET_SYSERR);
621 if (0 == strcasecmp ("arm", service_name))
623 arm_shutdown_ctx = GNUNET_malloc (sizeof (struct ARM_ShutdownContext));
624 arm_shutdown_ctx->cb = cb;
625 arm_shutdown_ctx->cb_cls = cb_cls;
626 arm_service_shutdown (h->client, timeout, &arm_shutdown_callback,
631 change_service (h, service_name, timeout, cb, cb_cls,
632 GNUNET_MESSAGE_TYPE_ARM_STOP);
637 * Internal state for a list request with ARM.
639 struct ListRequestContext
643 * Pointer to our handle with ARM.
645 struct GNUNET_ARM_Handle *h;
648 * Function to call with a status code for the requested operation.
650 GNUNET_ARM_List_Callback callback;
653 * Closure for "callback".
658 * Timeout for the operation.
660 struct GNUNET_TIME_Absolute timeout;
665 * Process a response from ARM for the list request.
667 * @param cls the list request context
668 * @param msg the response
671 handle_list_response (void *cls, const struct GNUNET_MessageHeader *msg)
673 struct ListRequestContext *sc = cls;
674 const struct GNUNET_ARM_ListResultMessage *res;
683 GNUNET_CLIENT_disconnect (sc->h->client);
684 sc->h->client = GNUNET_CLIENT_connect ("arm", sc->h->cfg);
685 GNUNET_assert (NULL != sc->h->client);
686 if (sc->callback != NULL)
687 sc->callback (sc->cls, GNUNET_ARM_PROCESS_COMMUNICATION_ERROR, 0, NULL);
692 if (NULL == sc->callback)
698 msize = ntohs (msg->size);
699 if ( (msize < sizeof ( struct GNUNET_ARM_ListResultMessage)) ||
700 (ntohs (msg->type) != GNUNET_MESSAGE_TYPE_ARM_LIST_RESULT) )
703 sc->callback (sc->cls, GNUNET_NO, 0, NULL);
708 res = (const struct GNUNET_ARM_ListResultMessage *) msg;
709 rcount = ntohs (res->count);
711 const char *list[rcount];
714 pos = (const char *)&res[1];
715 for (i=0; i<rcount; i++)
717 const char *end = memchr (pos, 0, msize - size_check);
721 sc->callback (sc->cls, GNUNET_NO, 0, NULL);
726 size_check += (end - pos) + 1;
729 sc->callback (sc->cls, GNUNET_YES, rcount, list);
736 * List all running services.
738 * @param h handle to ARM
739 * @param timeout how long to wait before failing for good
740 * @param cb callback to invoke when service is ready
741 * @param cb_cls closure for callback
744 GNUNET_ARM_list_running_services (struct GNUNET_ARM_Handle *h,
745 struct GNUNET_TIME_Relative timeout,
746 GNUNET_ARM_List_Callback cb, void *cb_cls)
748 struct ListRequestContext *sctx;
749 struct GNUNET_MessageHeader msg;
750 struct GNUNET_CLIENT_Connection *client;
752 if (h->client == NULL)
754 client = GNUNET_CLIENT_connect ("arm", h->cfg);
758 cb (cb_cls, GNUNET_ARM_PROCESS_COMMUNICATION_ERROR, 0, NULL);
764 sctx = GNUNET_malloc (sizeof (struct RequestContext));
768 sctx->timeout = GNUNET_TIME_relative_to_absolute (timeout);
769 msg.size = htons (sizeof (struct GNUNET_MessageHeader));
770 msg.type = htons (GNUNET_MESSAGE_TYPE_ARM_LIST);
772 LOG (GNUNET_ERROR_TYPE_DEBUG,
773 "Requesting LIST from ARM service with timeout: %s\n",
774 GNUNET_STRINGS_relative_time_to_string (timeout, GNUNET_YES));
777 GNUNET_CLIENT_transmit_and_get_response (sctx->h->client,
779 GNUNET_TIME_absolute_get_remaining
782 &handle_list_response,
787 cb (cb_cls, GNUNET_SYSERR, 0, NULL);
793 /* end of arm_api.c */