Fix concurrency issues on event manager
[src/app-framework-binder.git] / src / main.c
index ac93de4..9c2f3c5 100644 (file)
 #include <unistd.h>
 #include <fcntl.h>
 #include <sys/stat.h>
+#include <sys/wait.h>
 
 #include <systemd/sd-event.h>
+#include <systemd/sd-daemon.h>
+
+#include <afb/afb-binding.h>
 
 #include "afb-config.h"
 #include "afb-hswitch.h"
 #include "afb-hsrv.h"
 #include "afb-context.h"
 #include "afb-hreq.h"
-#include "afb-sig-handler.h"
-#include "afb-thread.h"
+#include "sig-monitor.h"
+#include "jobs.h"
 #include "afb-session.h"
 #include "verbose.h"
 #include "afb-common.h"
 #include "afb-hook.h"
+#include "sd-fds.h"
 
-#include <afb/afb-binding.h>
+/*
+   if SELF_PGROUP == 0 the launched command is the group leader
+   if SELF_PGROUP != 0 afb-daemon is the group leader
+*/
+#define SELF_PGROUP 1
+
+static struct afb_config *config;
+static pid_t childpid;
 
 /*----------------------------------------------------------
  |   helpers for handling list of arguments
@@ -83,19 +95,23 @@ static void start_list(struct afb_config_list *list,
 }
 
 /*----------------------------------------------------------
- | closeSession
- |   try to close everything before leaving
+ | exit_handler
+ |   Handles on exit specific actions
  +--------------------------------------------------------- */
-static void closeSession(int status, void *data)
+static void exit_handler()
 {
-       /* struct afb_config *config = data; */
+       /* TODO: check whether using SIGHUP isn't better */
+       if (SELF_PGROUP)
+               killpg(0, SIGKILL);
+       else if (childpid > 0)
+               killpg(childpid, SIGKILL);
 }
 
 /*----------------------------------------------------------
  | daemonize
  |   set the process in background
  +--------------------------------------------------------- */
-static void daemonize(struct afb_config *config)
+static void daemonize()
 {
        int consoleFD;
        int pid;
@@ -155,7 +171,7 @@ static int init_alias(void *closure, char *spec)
                                  0, 0);
 }
 
-static int init_http_server(struct afb_hsrv *hsrv, struct afb_config *config)
+static int init_http_server(struct afb_hsrv *hsrv)
 {
        if (!afb_hsrv_add_handler
            (hsrv, config->rootapi, afb_hswitch_websocket_switch, NULL, 20))
@@ -183,13 +199,13 @@ static int init_http_server(struct afb_hsrv *hsrv, struct afb_config *config)
        return 1;
 }
 
-static struct afb_hsrv *start_http_server(struct afb_config *config)
+static struct afb_hsrv *start_http_server()
 {
        int rc;
        struct afb_hsrv *hsrv;
 
-       if (afb_hreq_init_download_path("/tmp")) {      /* TODO: sessiondir? */
-               ERROR("unable to set the tmp directory");
+       if (afb_hreq_init_download_path(config->uploaddir)) {
+               ERROR("unable to set the upload directory %s", config->uploaddir);
                return NULL;
        }
 
@@ -200,14 +216,13 @@ static struct afb_hsrv *start_http_server(struct afb_config *config)
        }
 
        if (!afb_hsrv_set_cache_timeout(hsrv, config->cacheTimeout)
-           || !init_http_server(hsrv, config)) {
+           || !init_http_server(hsrv)) {
                ERROR("initialisation of httpd failed");
                afb_hsrv_put(hsrv);
                return NULL;
        }
 
-       NOTICE("Waiting port=%d rootdir=%s", config->httpdPort,
-              config->rootdir);
+       NOTICE("Waiting port=%d rootdir=%s", config->httpdPort, config->rootdir);
        NOTICE("Browser URL= http:/*localhost:%d", config->httpdPort);
 
        rc = afb_hsrv_start(hsrv, (uint16_t) config->httpdPort, 15);
@@ -221,106 +236,286 @@ static struct afb_hsrv *start_http_server(struct afb_config *config)
 }
 
 /*---------------------------------------------------------
- | main
- |   Parse option and launch action
+ | execute_command
+ |   
  +--------------------------------------------------------- */
 
-int main(int argc, char *argv[])
+static void on_sigchld(int signum, siginfo_t *info, void *uctx)
 {
-       struct afb_hsrv *hsrv;
-       struct afb_config *config;
-       struct sd_event *eventloop;
+       if (info->si_pid == childpid) {
+               switch (info->si_code) {
+               case CLD_EXITED:
+               case CLD_KILLED:
+               case CLD_DUMPED:
+                       childpid = 0;
+                       if (!SELF_PGROUP)
+                               killpg(info->si_pid, SIGKILL);
+                       waitpid(info->si_pid, NULL, 0);
+                       exit(0);
+               }
+       }
+}
 
-       LOGAUTH("afb-daemon");
+/*
+# @@ @
+# @p port
+# @t token
+*/
 
-       // ------------- Build session handler & init config -------
-       config = afb_config_parse_arguments(argc, argv);
-       on_exit(closeSession, config);
+#define SUBST_CHAR  '@'
+#define SUBST_STR   "@"
+
+static char *instanciate_string(char *arg, const char *port, const char *token)
+{
+       char *resu, *it, *wr;
+       int chg, dif;
+
+       /* get the changes */
+       chg = 0;
+       dif = 0;
+       it = strchrnul(arg, SUBST_CHAR);
+       while (*it) {
+               switch(*++it) {
+               case 'p': chg++; dif += (int)strlen(port) - 2; break;
+               case 't': chg++; dif += (int)strlen(token) - 2; break;
+               case SUBST_CHAR: it++; chg++; dif--; break;
+               default: break;
+               }
+               it = strchrnul(it, SUBST_CHAR);
+       }
+
+       /* return arg when no change */
+       if (!chg)
+               return arg;
+
+       /* allocates the result */
+       resu = malloc((it - arg) + dif + 1);
+       if (!resu) {
+               ERROR("out of memory");
+               return NULL;
+       }
+
+       /* instanciate the arguments */
+       wr = resu;
+       for (;;) {
+               it = strchrnul(arg, SUBST_CHAR);
+               wr = mempcpy(wr, arg, it - arg);
+               if (!*it)
+                       break;
+               switch(*++it) {
+               case 'p': wr = stpcpy(wr, port); break;
+               case 't': wr = stpcpy(wr, token); break;
+               default: *wr++ = SUBST_CHAR;
+               case SUBST_CHAR: *wr++ = *it;
+               }
+               arg = ++it;
+       }
+
+       *wr = 0;
+       return resu;
+}
+
+static int instanciate_environ(const char *port, const char *token)
+{
+       extern char **environ;
+       char *repl;
+       int i;
+
+       /* instanciate the environment */
+       for (i = 0 ; environ[i] ; i++) {
+               repl = instanciate_string(environ[i], port, token);
+               if (!repl)
+                       return -1;
+               environ[i] = repl;
+       }
+       return 0;
+}
+
+static int instanciate_command_args(const char *port, const char *token)
+{
+       char *repl;
+       int i;
+
+       /* instanciate the arguments */
+       for (i = 0 ; config->exec[i] ; i++) {
+               repl = instanciate_string(config->exec[i], port, token);
+               if (!repl)
+                       return -1;
+               config->exec[i] = repl;
+       }
+       return 0;
+}
+
+static int execute_command()
+{
+       struct sigaction siga;
+       char port[20];
+       int rc;
+
+       /* check whether a command is to execute or not */
+       if (!config->exec || !config->exec[0])
+               return 0;
+
+       if (SELF_PGROUP)
+               setpgid(0, 0);
+
+       /* install signal handler */
+       memset(&siga, 0, sizeof siga);
+       siga.sa_sigaction = on_sigchld;
+       siga.sa_flags = SA_SIGINFO;
+       sigaction(SIGCHLD, &siga, NULL);
+
+       /* fork now */
+       childpid = fork();
+       if (childpid)
+               return 0;
+
+       /* compute the string for port */
+       if (config->httpdPort)
+               rc = snprintf(port, sizeof port, "%d", config->httpdPort);
+       else
+               rc = snprintf(port, sizeof port, "%cp", SUBST_CHAR);
+       if (rc < 0 || rc >= (int)(sizeof port)) {
+               ERROR("port->txt failed");
+       }
+       else {
+               /* instanciate arguments and environment */
+               if (instanciate_command_args(port, config->token) >= 0
+                && instanciate_environ(port, config->token) >= 0) {
+                       /* run */
+                       if (!SELF_PGROUP)
+                               setpgid(0, 0);
+                       execv(config->exec[0], config->exec);
+                       ERROR("can't launch %s: %m", config->exec[0]);
+               }
+       }
+       exit(1);
+       return -1;
+}
+
+/*---------------------------------------------------------
+ | job for starting the daemon
+ +--------------------------------------------------------- */
+
+static void start(int signum)
+{
+       struct afb_hsrv *hsrv;
 
        // ------------------ sanity check ----------------------------------------
        if (config->httpdPort <= 0) {
                ERROR("no port is defined");
-               exit(1);
+               goto error;
        }
 
-       afb_session_init(config->nbSessionMax, config->cntxTimeout,
-                        config->token, afb_apis_count());
+       mkdir(config->workdir, S_IRWXU | S_IRGRP | S_IXGRP);
+       if (chdir(config->workdir) < 0) {
+               ERROR("Can't enter working dir %s", config->workdir);
+               goto error;
+       }
 
        afb_api_so_set_timeout(config->apiTimeout);
        start_list(config->dbus_clients, afb_api_dbus_add_client, "the afb-dbus client");
        start_list(config->ws_clients, afb_api_ws_add_client, "the afb-websocket client");
        start_list(config->ldpaths, afb_api_so_add_pathset, "the binding path set");
        start_list(config->so_bindings, afb_api_so_add_binding, "the binding");
+
+       afb_session_init(config->nbSessionMax, config->cntxTimeout, config->token);
+
        start_list(config->dbus_servers, afb_api_dbus_add_server, "the afb-dbus service");
        start_list(config->ws_servers, afb_api_ws_add_server, "the afb-websocket service");
 
-       if (!afb_hreq_init_cookie
-           (config->httpdPort, config->rootapi, config->cntxTimeout)) {
+       if (!afb_hreq_init_cookie(config->httpdPort, config->rootapi, config->cntxTimeout)) {
                ERROR("initialisation of cookies failed");
-               exit(1);
+               goto error;
        }
 
-       if (afb_sig_handler_init() < 0) {
-               ERROR("failed to initialise signal handlers");
-               return 1;
-       }
-       // if directory does not exist createit
-       mkdir(config->rootdir, O_RDWR | S_IRWXU | S_IRGRP);
+       // set the root dir
        if (afb_common_rootdir_set(config->rootdir) < 0) {
                ERROR("failed to set common root directory");
-               return 1;
+               goto error;
        }
 
-       if (afb_thread_init(3, 1, 20) < 0) {
-               ERROR("failed to initialise threading");
-               return 1;
+       DEBUG("Init config done");
+
+       /* install trace of requests */
+       if (config->tracereq)
+               afb_hook_req_create(NULL, NULL, NULL, config->tracereq, NULL, NULL);
+
+       /* start the services */
+       if (afb_apis_start_all_services(1) < 0)
+               goto error;
+
+       /* start the HTTP server */
+       if (!config->noHttpd) {
+               hsrv = start_http_server();
+               if (hsrv == NULL)
+                       goto error;
        }
+
+       /* run the command */
+       if (execute_command() < 0)
+               goto error;
+
+       /* ready */
+       sd_notify(1, "READY=1");
+       return;
+error:
+       exit(1);
+}
+/*---------------------------------------------------------
+ | main
+ |   Parse option and launch action
+ +--------------------------------------------------------- */
+
+int main(int argc, char *argv[])
+{
        // let's run this program with a low priority
        nice(20);
 
-       // ------------------ Finaly Process Commands -----------------------------
-       // let's not take the risk to run as ROOT
-       //if (getuid() == 0)  goto errorNoRoot;
+       LOGAUTH("afb-daemon");
 
-       DEBUG("Init config done");
+       sd_fds_init();
+
+       // ------------- Build session handler & init config -------
+       config = afb_config_parse_arguments(argc, argv);
 
        // --------- run -----------
        if (config->background) {
                // --------- in background mode -----------
                INFO("entering background mode");
-               daemonize(config);
+               daemonize();
        } else {
                // ---- in foreground mode --------------------
                INFO("entering foreground mode");
        }
 
+       /* handle groups */
+       atexit(exit_handler);
+
        /* ignore any SIGPIPE */
        signal(SIGPIPE, SIG_IGN);
 
-       /* install trace of requests */
-       if (config->tracereq)
-               afb_hook_req_create(NULL, NULL, NULL, config->tracereq, NULL, NULL);
-
-       /* start the HTTP server */
-       hsrv = start_http_server(config);
-       if (hsrv == NULL)
-               exit(1);
-
-       /* start the services */
-       if (afb_apis_start_all_services(1) < 0)
-               exit(1);
+       /* start */
+       if (sig_monitor_init() < 0) {
+               ERROR("failed to initialise signal handlers");
+               return 1;
+       }
 
-       if (config->readyfd != 0) {
-               static const char readystr[] = "READY=1";
-               write(config->readyfd, readystr, sizeof(readystr) - 1);
-               close(config->readyfd);
+       /* init job processing */
+       if (jobs_init(3, 1, 20) < 0) {
+               ERROR("failed to initialise threading");
+               return 1;
        }
-       // infinite loop
-       eventloop = afb_common_get_event_loop();
-       for (;;)
-               sd_event_run(eventloop, 30000000);
 
-       WARNING("hoops returned from infinite loop [report bug]");
+       /* queue the start job */
+       if (jobs_queue0(NULL, 0, start) < 0) {
+               ERROR("failed to start runnning jobs");
+               return 1;
+       }
 
+       /* turn as processing thread */
+       jobs_add_me();
+       WARNING("hoops returned from jobs_add_me! [report bug]");
        return 0;
 }
+