2 * Copyright (C) 2015, 2016, 2017 "IoT.bzh"
3 * Author "Fulup Ar Foll"
4 * Author José Bollo <jose.bollo@iot.bzh>
6 * Licensed under the Apache License, Version 2.0 (the "License");
7 * you may not use this file except in compliance with the License.
8 * You may obtain a copy of the License at
10 * http://www.apache.org/licenses/LICENSE-2.0
12 * Unless required by applicable law or agreed to in writing, software
13 * distributed under the License is distributed on an "AS IS" BASIS,
14 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
15 * See the License for the specific language governing permissions and
16 * limitations under the License.
20 #define NO_BINDING_VERBOSE_MACRO
30 #include <systemd/sd-event.h>
31 #include <systemd/sd-daemon.h>
33 #include <afb/afb-binding.h>
35 #include "afb-config.h"
36 #include "afb-hswitch.h"
38 #include "afb-api-so.h"
39 #include "afb-api-dbus.h"
40 #include "afb-api-ws.h"
42 #include "afb-context.h"
45 #include "afb-session.h"
47 #include "afb-common.h"
52 if SELF_PGROUP == 0 the launched command is the group leader
53 if SELF_PGROUP != 0 afb-daemon is the group leader
57 static struct afb_config *config;
58 static pid_t childpid;
60 /*----------------------------------------------------------
61 | helpers for handling list of arguments
62 +--------------------------------------------------------- */
65 * Calls the callback 'run' for each value of the 'list'
66 * until the callback returns 0 or the end of the list is reached.
67 * Returns either NULL if the end of the list is reached or a pointer
68 * to the item whose value made 'run' return 0.
69 * 'closure' is used for passing user data.
71 static struct afb_config_list *run_for_list(struct afb_config_list *list,
72 int (*run) (void *closure, char *value),
75 while (list && run(closure, list->value))
80 static int run_start(void *closure, char *value)
82 int (*starter) (const char *value) = closure;
83 return starter(value) >= 0;
86 static void start_list(struct afb_config_list *list,
87 int (*starter) (const char *value), const char *message)
89 list = run_for_list(list, run_start, starter);
91 ERROR("can't start %s %s", message, list->value);
96 /*----------------------------------------------------------
98 | Handles on exit specific actions
99 +--------------------------------------------------------- */
100 static void exit_handler()
102 struct sigaction siga;
104 memset(&siga, 0, sizeof siga);
105 siga.sa_handler = SIG_IGN;
106 sigaction(SIGTERM, &siga, NULL);
110 else if (childpid > 0)
111 killpg(childpid, SIGTERM);
114 static void on_sigterm(int signum, siginfo_t *info, void *uctx)
116 NOTICE("Received SIGTERM");
120 static void on_sighup(int signum, siginfo_t *info, void *uctx)
122 NOTICE("Received SIGHUP");
126 static void setup_daemon()
128 struct sigaction siga;
130 /* install signal handlers */
131 memset(&siga, 0, sizeof siga);
132 siga.sa_flags = SA_SIGINFO;
134 siga.sa_sigaction = on_sigterm;
135 sigaction(SIGTERM, &siga, NULL);
137 siga.sa_sigaction = on_sighup;
138 sigaction(SIGHUP, &siga, NULL);
141 atexit(exit_handler);
143 /* ignore any SIGPIPE */
144 signal(SIGPIPE, SIG_IGN);
147 /*----------------------------------------------------------
149 | set the process in background
150 +--------------------------------------------------------- */
151 static void daemonize()
156 // open /dev/console to redirect output messAFBes
157 consoleFD = open(config->console, O_WRONLY | O_APPEND | O_CREAT, 0640);
159 ERROR("AFB-daemon cannot open /dev/console (use --foreground)");
162 // fork process when running background mode
165 // if fail nothing much to do
167 ERROR("AFB-daemon Failed to fork son process");
170 // if in father process, just leave
174 // son process get all data in standalone mode
175 NOTICE("background mode [pid:%d console:%s]", getpid(),
178 // redirect default I/O on console
180 dup(consoleFD); // redirect stderr
182 dup(consoleFD); // redirect stdout
183 close(0); // no need for stdin
187 setsid(); // allow father process to fully exit
188 sleep(2); // allow main to leave and release port
192 /*---------------------------------------------------------
194 | Handles the HTTP server
195 +--------------------------------------------------------- */
196 static int init_alias(void *closure, char *spec)
198 struct afb_hsrv *hsrv = closure;
199 char *path = strchr(spec, ':');
202 ERROR("Missing ':' in alias %s. Alias ignored", spec);
206 INFO("Alias for url=%s to path=%s", spec, path);
207 return afb_hsrv_add_alias(hsrv, spec, afb_common_rootdir_get_fd(), path,
211 static int init_http_server(struct afb_hsrv *hsrv)
213 if (!afb_hsrv_add_handler
214 (hsrv, config->rootapi, afb_hswitch_websocket_switch, NULL, 20))
217 if (!afb_hsrv_add_handler
218 (hsrv, config->rootapi, afb_hswitch_apis, NULL, 10))
221 if (run_for_list(config->aliases, init_alias, hsrv))
224 if (config->roothttp != NULL) {
225 if (!afb_hsrv_add_alias
226 (hsrv, "", afb_common_rootdir_get_fd(), config->roothttp,
231 if (!afb_hsrv_add_handler
232 (hsrv, config->rootbase, afb_hswitch_one_page_api_redirect, NULL,
239 static struct afb_hsrv *start_http_server()
242 struct afb_hsrv *hsrv;
244 if (afb_hreq_init_download_path(config->uploaddir)) {
245 ERROR("unable to set the upload directory %s", config->uploaddir);
249 hsrv = afb_hsrv_create();
251 ERROR("memory allocation failure");
255 if (!afb_hsrv_set_cache_timeout(hsrv, config->cacheTimeout)
256 || !init_http_server(hsrv)) {
257 ERROR("initialisation of httpd failed");
262 NOTICE("Waiting port=%d rootdir=%s", config->httpdPort, config->rootdir);
263 NOTICE("Browser URL= http://localhost:%d", config->httpdPort);
265 rc = afb_hsrv_start(hsrv, (uint16_t) config->httpdPort, 15);
267 ERROR("starting of httpd failed");
275 /*---------------------------------------------------------
278 +--------------------------------------------------------- */
280 static void on_sigchld(int signum, siginfo_t *info, void *uctx)
282 if (info->si_pid == childpid) {
283 switch (info->si_code) {
289 killpg(info->si_pid, SIGKILL);
290 waitpid(info->si_pid, NULL, 0);
302 #define SUBST_CHAR '@'
303 #define SUBST_STR "@"
305 static char *instanciate_string(char *arg, const char *port, const char *token)
307 char *resu, *it, *wr;
310 /* get the changes */
313 it = strchrnul(arg, SUBST_CHAR);
316 case 'p': chg++; dif += (int)strlen(port) - 2; break;
317 case 't': chg++; dif += (int)strlen(token) - 2; break;
318 case SUBST_CHAR: it++; chg++; dif--; break;
321 it = strchrnul(it, SUBST_CHAR);
324 /* return arg when no change */
328 /* allocates the result */
329 resu = malloc((it - arg) + dif + 1);
331 ERROR("out of memory");
335 /* instanciate the arguments */
338 it = strchrnul(arg, SUBST_CHAR);
339 wr = mempcpy(wr, arg, it - arg);
343 case 'p': wr = stpcpy(wr, port); break;
344 case 't': wr = stpcpy(wr, token); break;
345 default: *wr++ = SUBST_CHAR;
346 case SUBST_CHAR: *wr++ = *it;
355 static int instanciate_environ(const char *port, const char *token)
357 extern char **environ;
361 /* instanciate the environment */
362 for (i = 0 ; environ[i] ; i++) {
363 repl = instanciate_string(environ[i], port, token);
371 static int instanciate_command_args(const char *port, const char *token)
376 /* instanciate the arguments */
377 for (i = 0 ; config->exec[i] ; i++) {
378 repl = instanciate_string(config->exec[i], port, token);
381 config->exec[i] = repl;
386 static int execute_command()
388 struct sigaction siga;
392 /* check whether a command is to execute or not */
393 if (!config->exec || !config->exec[0])
399 /* install signal handler */
400 memset(&siga, 0, sizeof siga);
401 siga.sa_sigaction = on_sigchld;
402 siga.sa_flags = SA_SIGINFO;
403 sigaction(SIGCHLD, &siga, NULL);
410 /* compute the string for port */
411 if (config->httpdPort)
412 rc = snprintf(port, sizeof port, "%d", config->httpdPort);
414 rc = snprintf(port, sizeof port, "%cp", SUBST_CHAR);
415 if (rc < 0 || rc >= (int)(sizeof port)) {
416 ERROR("port->txt failed");
419 /* instanciate arguments and environment */
420 if (instanciate_command_args(port, config->token) >= 0
421 && instanciate_environ(port, config->token) >= 0) {
425 execv(config->exec[0], config->exec);
426 ERROR("can't launch %s: %m", config->exec[0]);
433 /*---------------------------------------------------------
434 | job for starting the daemon
435 +--------------------------------------------------------- */
439 struct afb_hsrv *hsrv;
441 // ------------------ sanity check ----------------------------------------
442 if (config->httpdPort <= 0) {
443 ERROR("no port is defined");
447 /* set the directories */
448 mkdir(config->workdir, S_IRWXU | S_IRGRP | S_IXGRP);
449 if (chdir(config->workdir) < 0) {
450 ERROR("Can't enter working dir %s", config->workdir);
453 if (afb_common_rootdir_set(config->rootdir) < 0) {
454 ERROR("failed to set common root directory");
458 /* configure the daemon */
459 afb_apis_set_timeout(config->apiTimeout);
460 afb_session_init(config->nbSessionMax, config->cntxTimeout, config->token);
461 if (!afb_hreq_init_cookie(config->httpdPort, config->rootapi, config->cntxTimeout)) {
462 ERROR("initialisation of cookies failed");
467 if (config->tracereq)
468 afb_hook_create_xreq(NULL, NULL, NULL, config->tracereq, NULL, NULL);
469 if (config->traceditf)
470 afb_hook_create_ditf(NULL, config->traceditf, NULL, NULL);
473 start_list(config->dbus_clients, afb_api_dbus_add_client, "the afb-dbus client");
474 start_list(config->ws_clients, afb_api_ws_add_client, "the afb-websocket client");
475 start_list(config->ldpaths, afb_api_so_add_pathset, "the binding path set");
476 start_list(config->so_bindings, afb_api_so_add_binding, "the binding");
478 start_list(config->dbus_servers, afb_api_dbus_add_server, "the afb-dbus service");
479 start_list(config->ws_servers, afb_api_ws_add_server, "the afb-websocket service");
481 DEBUG("Init config done");
483 /* start the services */
484 if (afb_apis_start_all_services(1) < 0)
487 /* start the HTTP server */
488 if (!config->noHttpd) {
489 hsrv = start_http_server();
494 /* run the command */
495 if (execute_command() < 0)
499 sd_notify(1, "READY=1");
505 /*---------------------------------------------------------
507 | Parse option and launch action
508 +--------------------------------------------------------- */
510 int main(int argc, char *argv[])
512 // let's run this program with a low priority
517 // ------------- Build session handler & init config -------
518 config = afb_config_parse_arguments(argc, argv);
519 INFO("running with pid %d", getpid());
521 // --------- run -----------
522 if (config->background) {
523 // --------- in background mode -----------
524 INFO("entering background mode");
527 // ---- in foreground mode --------------------
528 INFO("entering foreground mode");
531 /* set the daemon environment */
534 /* enter job processing */
535 jobs_start(3, 0, 50, start);
536 WARNING("hoops returned from jobs_enter! [report bug]");