afb-api-ws: Make weak ws-client by default (to be fixed)
[src/app-framework-binder.git] / src / main.c
index ac93de4..df35d88 100644 (file)
  */
 
 #define _GNU_SOURCE
-#define NO_BINDING_VERBOSE_MACRO
 
 #include <stdlib.h>
 #include <stdio.h>
+#include <stdint.h>
+#include <signal.h>
 #include <string.h>
 #include <unistd.h>
 #include <fcntl.h>
 #include <sys/stat.h>
+#include <sys/wait.h>
 
-#include <systemd/sd-event.h>
+#if !defined(NO_CALL_PERSONALITY)
+#include <sys/personality.h>
+#endif
+
+#include <json-c/json.h>
+
+#include <systemd/sd-daemon.h>
 
 #include "afb-config.h"
 #include "afb-hswitch.h"
-#include "afb-apis.h"
+#include "afb-apiset.h"
 #include "afb-api-so.h"
 #include "afb-api-dbus.h"
 #include "afb-api-ws.h"
 #include "afb-hsrv.h"
-#include "afb-context.h"
 #include "afb-hreq.h"
-#include "afb-sig-handler.h"
-#include "afb-thread.h"
+#include "afb-xreq.h"
+#include "jobs.h"
 #include "afb-session.h"
 #include "verbose.h"
 #include "afb-common.h"
+#include "afb-monitor.h"
 #include "afb-hook.h"
+#include "sd-fds.h"
+#include "afb-debug.h"
+#include "process-name.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
 
-#include <afb/afb-binding.h>
+struct afb_apiset *main_apiset;
+
+static struct afb_config *config;
+static pid_t childpid;
 
 /*----------------------------------------------------------
  |   helpers for handling list of arguments
@@ -68,12 +88,12 @@ static struct afb_config_list *run_for_list(struct afb_config_list *list,
 
 static int run_start(void *closure, char *value)
 {
-       int (*starter) (const char *value) = closure;
-       return starter(value) >= 0;
+       int (*starter) (const char *value, struct afb_apiset *apiset) = closure;
+       return starter(value, main_apiset) >= 0;
 }
 
-static void start_list(struct afb_config_list *list,
-                      int (*starter) (const char *value), const char *message)
+static void apiset_start_list(struct afb_config_list *list,
+                      int (*starter) (const char *value, struct afb_apiset *apiset), const char *message)
 {
        list = run_for_list(list, run_start, starter);
        if (list) {
@@ -83,19 +103,61 @@ 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 sigaction siga;
+
+       memset(&siga, 0, sizeof siga);
+       siga.sa_handler = SIG_IGN;
+       sigaction(SIGTERM, &siga, NULL);
+
+       if (SELF_PGROUP)
+               killpg(0, SIGTERM);
+       else if (childpid > 0)
+               killpg(childpid, SIGTERM);
+}
+
+static void on_sigterm(int signum, siginfo_t *info, void *uctx)
 {
-       /* struct afb_config *config = data; */
+       NOTICE("Received SIGTERM");
+       exit(0);
+}
+
+static void on_sighup(int signum, siginfo_t *info, void *uctx)
+{
+       NOTICE("Received SIGHUP");
+       /* TODO */
+}
+
+static void setup_daemon()
+{
+       struct sigaction siga;
+
+       /* install signal handlers */
+       memset(&siga, 0, sizeof siga);
+       siga.sa_flags = SA_SIGINFO;
+
+       siga.sa_sigaction = on_sigterm;
+       sigaction(SIGTERM, &siga, NULL);
+
+       siga.sa_sigaction = on_sighup;
+       sigaction(SIGHUP, &siga, NULL);
+
+       /* handle groups */
+       atexit(exit_handler);
+
+       /* ignore any SIGPIPE */
+       signal(SIGPIPE, SIG_IGN);
 }
 
 /*----------------------------------------------------------
  | daemonize
  |   set the process in background
  +--------------------------------------------------------- */
-static void daemonize(struct afb_config *config)
+static void daemonize()
 {
        int consoleFD;
        int pid;
@@ -155,14 +217,14 @@ 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))
+           (hsrv, config->rootapi, afb_hswitch_websocket_switch, main_apiset, 20))
                return 0;
 
        if (!afb_hsrv_add_handler
-           (hsrv, config->rootapi, afb_hswitch_apis, NULL, 10))
+           (hsrv, config->rootapi, afb_hswitch_apis, main_apiset, 10))
                return 0;
 
        if (run_for_list(config->aliases, init_alias, hsrv))
@@ -183,13 +245,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,15 +262,14 @@ 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("Browser URL= http:/*localhost:%d", config->httpdPort);
+       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);
        if (!rc) {
@@ -221,106 +282,400 @@ 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   "@"
 
-       // ------------------ sanity check ----------------------------------------
-       if (config->httpdPort <= 0) {
-               ERROR("no port is defined");
+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; /*@fallthrough@*/
+               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];
+       const char *token;
+       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 */
+               token = afb_session_initial_token();
+               if (instanciate_command_args(port, token) >= 0
+                && instanciate_environ(port, 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;
+}
+
+/*---------------------------------------------------------
+ | startup calls
+ +--------------------------------------------------------- */
+
+struct startup_req
+{
+       struct afb_xreq xreq;
+       char *api;
+       char *verb;
+       struct afb_config_list *current;
+       struct afb_session *session;
+};
+
+static void startup_call_reply(struct afb_xreq *xreq, int status, struct json_object *obj)
+{
+       struct startup_req *sreq = CONTAINER_OF_XREQ(struct startup_req, xreq);
+
+       if (status >= 0)
+               NOTICE("startup call %s returned %s", sreq->current->value, json_object_get_string(obj));
+       else {
+               ERROR("startup call %s ERROR! %s", sreq->current->value, json_object_get_string(obj));
                exit(1);
        }
+}
 
-       afb_session_init(config->nbSessionMax, config->cntxTimeout,
-                        config->token, afb_apis_count());
+static void startup_call_current(struct startup_req *sreq);
 
-       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");
-       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");
+static void startup_call_unref(struct afb_xreq *xreq)
+{
+       struct startup_req *sreq = CONTAINER_OF_XREQ(struct startup_req, xreq);
+
+       free(sreq->api);
+       free(sreq->verb);
+       json_object_put(sreq->xreq.json);
+       sreq->current = sreq->current->next;
+       if (sreq->current)
+               startup_call_current(sreq);
+       else {
+               afb_session_close(sreq->session);
+               afb_session_unref(sreq->session);
+               free(sreq);
+       }
+}
 
-       if (!afb_hreq_init_cookie
-           (config->httpdPort, config->rootapi, config->cntxTimeout)) {
-               ERROR("initialisation of cookies failed");
+static struct afb_xreq_query_itf startup_xreq_itf =
+{
+       .reply = startup_call_reply,
+       .unref = startup_call_unref
+};
+
+static void startup_call_current(struct startup_req *sreq)
+{
+       char *api, *verb, *json;
+
+       api = sreq->current->value;
+       verb = strchr(api, '/');
+       if (verb) {
+               json = strchr(verb, ':');
+               if (json) {
+                       afb_xreq_init(&sreq->xreq, &startup_xreq_itf);
+                       afb_context_init(&sreq->xreq.context, sreq->session, NULL);
+                       sreq->xreq.context.validated = 1;
+                       sreq->api = strndup(api, verb - api);
+                       sreq->verb = strndup(verb + 1, json - verb - 1);
+                       sreq->xreq.request.api = sreq->api;
+                       sreq->xreq.request.verb = sreq->verb;
+                       sreq->xreq.json = json_tokener_parse(json + 1);
+                       if (sreq->api && sreq->verb && sreq->xreq.json) {
+                               afb_xreq_process(&sreq->xreq, main_apiset);
+                               return;
+                       }
+               }
+       }
+       ERROR("Bad call specification %s", sreq->current->value);
+       exit(1);
+}
+
+static void run_startup_calls()
+{
+       struct afb_config_list *list;
+       struct startup_req *sreq;
+
+       list = config->calls;
+       if (list) {
+               sreq = calloc(1, sizeof *sreq);
+               sreq->session = afb_session_create(3600);
+               sreq->current = list;
+               startup_call_current(sreq);
+       }
+}
+
+/*---------------------------------------------------------
+ | job for starting the daemon
+ +--------------------------------------------------------- */
+
+static void start(int signum)
+{
+       struct afb_hsrv *hsrv;
+
+       afb_debug("start-entry");
+
+       if (signum) {
+               ERROR("start aborted: received signal %s", strsignal(signum));
                exit(1);
        }
 
-       if (afb_sig_handler_init() < 0) {
-               ERROR("failed to initialise signal handlers");
-               return 1;
+       // ------------------ sanity check ----------------------------------------
+       if (config->httpdPort <= 0) {
+               ERROR("no port is defined");
+               goto error;
+       }
+
+       /* set the directories */
+       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;
        }
-       // if directory does not exist createit
-       mkdir(config->rootdir, O_RDWR | S_IRWXU | S_IRGRP);
        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;
+       /* configure the daemon */
+       afb_session_init(config->nbSessionMax, config->cntxTimeout, config->token);
+       if (!afb_hreq_init_cookie(config->httpdPort, config->rootapi, config->cntxTimeout)) {
+               ERROR("initialisation of cookies failed");
+               goto error;
+       }
+       main_apiset = afb_apiset_create("main", config->apiTimeout);
+       if (!main_apiset) {
+               ERROR("can't create main api set");
+               goto error;
+       }
+       if (afb_monitor_init() < 0) {
+               ERROR("failed to setup monitor");
+               goto error;
+       }
+
+       /* install hooks */
+       if (config->tracereq)
+               afb_hook_create_xreq(NULL, NULL, NULL, config->tracereq, NULL, NULL);
+       if (config->traceditf)
+               afb_hook_create_ditf(NULL, config->traceditf, NULL, NULL);
+       if (config->tracesvc)
+               afb_hook_create_svc(NULL, config->tracesvc, NULL, NULL);
+       if (config->traceevt)
+               afb_hook_create_evt(NULL, config->traceevt, NULL, NULL);
+
+       /* load bindings */
+       afb_debug("start-load");
+       apiset_start_list(config->so_bindings, afb_api_so_add_binding, "the binding");
+       apiset_start_list(config->dbus_clients, afb_api_dbus_add_client, "the afb-dbus client");
+       apiset_start_list(config->ws_clients, afb_api_ws_add_client_weak, "the afb-websocket client");
+       apiset_start_list(config->ldpaths, afb_api_so_add_pathset_fails, "the binding path set");
+       apiset_start_list(config->weak_ldpaths, afb_api_so_add_pathset_nofails, "the weak binding path set");
+
+       apiset_start_list(config->dbus_servers, afb_api_dbus_add_server, "the afb-dbus service");
+       apiset_start_list(config->ws_servers, afb_api_ws_add_server, "the afb-websocket service");
+
+       DEBUG("Init config done");
+
+       /* start the services */
+       afb_debug("start-start");
+#if !defined(NO_CALL_PERSONALITY)
+       personality((unsigned long)-1L);
+#endif
+       if (afb_apiset_start_all_services(main_apiset, 1) < 0)
+               goto error;
+
+       /* start the HTTP server */
+       afb_debug("start-http");
+       if (!config->noHttpd) {
+               hsrv = start_http_server();
+               if (hsrv == NULL)
+                       goto error;
        }
+
+       /* run the startup calls */
+       afb_debug("start-call");
+       run_startup_calls();
+
+       /* run the command */
+       afb_debug("start-exec");
+       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[])
+{
+       afb_debug("main-entry");
+
        // 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;
+       sd_fds_init();
 
-       DEBUG("Init config done");
+       // ------------- Build session handler & init config -------
+       config = afb_config_parse_arguments(argc, argv);
+       if (config->name) {
+               verbose_set_name(config->name, 0);
+               process_name_set_name(config->name);
+               process_name_replace_cmdline(argv, config->name);
+       }
+       afb_debug("main-args");
 
        // --------- run -----------
        if (config->background) {
                // --------- in background mode -----------
                INFO("entering background mode");
-               daemonize(config);
+               daemonize();
        } else {
                // ---- in foreground mode --------------------
                INFO("entering foreground mode");
        }
+       INFO("running with pid %d", getpid());
 
-       /* 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);
+       /* set the daemon environment */
+       setup_daemon();
 
-       /* start the HTTP server */
-       hsrv = start_http_server(config);
-       if (hsrv == NULL)
-               exit(1);
+       afb_debug("main-start");
 
-       /* start the services */
-       if (afb_apis_start_all_services(1) < 0)
-               exit(1);
-
-       if (config->readyfd != 0) {
-               static const char readystr[] = "READY=1";
-               write(config->readyfd, readystr, sizeof(readystr) - 1);
-               close(config->readyfd);
-       }
-       // infinite loop
-       eventloop = afb_common_get_event_loop();
-       for (;;)
-               sd_event_run(eventloop, 30000000);
-
-       WARNING("hoops returned from infinite loop [report bug]");
-
-       return 0;
+       /* enter job processing */
+       jobs_start(3, 0, 50, start);
+       WARNING("hoops returned from jobs_enter! [report bug]");
+       return 1;
 }
+