afb-config: Check environment variables
[src/app-framework-binder.git] / src / afb-config.c
index c48c480..f4aed05 100644 (file)
  */
 
 #define _GNU_SOURCE
-#define NO_BINDING_VERBOSE_MACRO
 
 #include <stdlib.h>
 #include <stdio.h>
 #include <string.h>
 #include <getopt.h>
 #include <limits.h>
-
-#include <uuid/uuid.h>
+#include <unistd.h>
 
 #include "verbose.h"
 #include "afb-config.h"
 #include "afb-hook.h"
 
-#include <afb/afb-binding.h>
+#include <afb/afb-binding-v1.h>
 
 #if !defined(BINDING_INSTALL_DIR)
 #error "you should define BINDING_INSTALL_DIR"
 #endif
-
-#define AFB_VERSION    "0.5"
+#if !defined(AFB_VERSION)
+#error "you should define AFB_VERSION"
+#endif
 
 // default
 #define DEFLT_CNTX_TIMEOUT  3600       // default Client Connection
@@ -46,7 +45,6 @@
 #define DEFLT_CACHE_TIMEOUT 100000     // default Static File Chache
                                        // [Client Side Cache
                                        // 100000~=1day]
-#define DEFLT_AUTH_TOKEN    NULL       // expect for debug should == NULL
 #define CTX_NBCLIENTS       10         // allow a default of 10 authenticated
                                        // clients
 
@@ -55,7 +53,6 @@
 #define SET_BACKGROUND     2
 #define SET_FORGROUND      3
 
-#define SET_TCP_PORT       5
 #define SET_ROOT_DIR       6
 #define SET_ROOT_BASE      7
 #define SET_ROOT_API       8
 #define SET_LDPATH         13
 #define SET_APITIMEOUT     14
 #define SET_CNTXTIMEOUT    15
-
+#define SET_WEAK_LDPATH    16
+#define NO_LDPATH          17
 
 #define SET_MODE           18
-#define SET_READYFD        19
 
 #define DBUS_CLIENT        20
 #define DBUS_SERVICE       21
 
 #define SET_NO_HTTPD       28
 
+#define ADD_CALL           'c'
+#define SET_TRACEDITF      'D'
+#define SET_TRACEEVT       'E'
 #define SET_EXEC           'e'
 #define DISPLAY_HELP       'h'
+#if defined(WITH_MONITORING_OPTION)
+#define SET_MONITORING     'M'
+#endif
+#define SET_NAME           'n'
+#define SET_TCP_PORT       'p'
 #define SET_QUIET          'q'
 #define SET_RNDTOKEN       'r'
+#define SET_TRACESVC       'S'
 #define SET_TRACEREQ       'T'
 #define SET_AUTH_TOKEN     't'
+#define SET_UPLOAD_DIR     'u'
 #define DISPLAY_VERSION    'V'
 #define SET_VERBOSE        'v'
+#define SET_WORK_DIR       'w'
 
-#define SHORTOPTS      "ehqrT:t:Vv"
+const char shortopts[] =
+       "c:D:E:ehn:p:qrT:t:u:Vvw:"
+#if defined(WITH_MONITORING_OPTION)
+       "M"
+#endif
+;
 
 // Command line structure hold cli --command + help text
 typedef struct {
@@ -113,42 +126,56 @@ static AFB_options cliOptions[] = {
        {SET_FORGROUND,     0, "foreground",  "Get all in foreground mode"},
        {SET_BACKGROUND,    0, "daemon",      "Get all in background mode"},
 
+       {SET_NAME,          1, "name",        "Set the visible name"},
+
        {SET_TCP_PORT,      1, "port",        "HTTP listening TCP port  [default 1234]"},
-       {SET_ROOT_DIR,      1, "rootdir",     "Root Directory [default $HOME/.AFB]"},
-       {SET_ROOT_HTTP,     1, "roothttp",    "HTTP Root Directory [default rootdir]"},
+       {SET_ROOT_HTTP,     1, "roothttp",    "HTTP Root Directory [default no root http (files not served but apis still available)]"},
        {SET_ROOT_BASE,     1, "rootbase",    "Angular Base Root URL [default /opa]"},
        {SET_ROOT_API,      1, "rootapi",     "HTML Root API URL [default /api]"},
-       {SET_ALIAS,         1, "alias",       "Muliple url map outside of rootdir [eg: --alias=/icons:/usr/share/icons]"},
+       {SET_ALIAS,         1, "alias",       "Multiple url map outside of rootdir [eg: --alias=/icons:/usr/share/icons]"},
 
        {SET_APITIMEOUT,    1, "apitimeout",  "Binding API timeout in seconds [default 10]"},
        {SET_CNTXTIMEOUT,   1, "cntxtimeout", "Client Session Context Timeout [default 900]"},
        {SET_CACHE_TIMEOUT, 1, "cache-eol",   "Client cache end of live [default 3600]"},
 
-       {SET_SESSION_DIR,   1, "sessiondir",  "Sessions file path [default rootdir/sessions]"},
+       {SET_WORK_DIR,      1, "workdir",     "Set the working directory [default: $PWD or current working directory]"},
+       {SET_UPLOAD_DIR,    1, "uploaddir",   "Directory for uploading files [default: workdir]"},
+       {SET_ROOT_DIR,      1, "rootdir",     "Root Directory of the application [default: workdir]"},
+       {SET_SESSION_DIR,   1, "sessiondir",  "OBSOLETE (was: Sessions file path)"},
 
        {SET_LDPATH,        1, "ldpaths",     "Load bindings from dir1:dir2:... [default = " BINDING_INSTALL_DIR "]"},
+       {SO_BINDING,        1, "binding",     "Load the binding of path"},
+       {SET_WEAK_LDPATH,   1, "weak-ldpaths","Same as --ldpaths but ignore errors"},
+       {NO_LDPATH,         0, "no-ldpaths",  "Discard default ldpaths loading"},
+
        {SET_AUTH_TOKEN,    1, "token",       "Initial Secret [default=no-session, --token= for session without authentication]"},
+       {SET_RNDTOKEN,      0, "random-token","Enforce a random token"},
 
        {DISPLAY_VERSION,   0, "version",     "Display version and copyright"},
        {DISPLAY_HELP,      0, "help",        "Display this help"},
 
        {SET_MODE,          1, "mode",        "Set the mode: either local, remote or global"},
-       {SET_READYFD,       1, "readyfd",     "Set the #fd to signal when ready"},
 
        {DBUS_CLIENT,       1, "dbus-client", "Bind to an afb service through dbus"},
        {DBUS_SERVICE,      1, "dbus-server", "Provides an afb service through dbus"},
        {WS_CLIENT,         1, "ws-client",   "Bind to an afb service through websocket"},
        {WS_SERVICE,        1, "ws-server",   "Provides an afb service through websockets"},
-       {SO_BINDING,        1, "binding",     "Load the binding of path"},
 
        {SET_SESSIONMAX,    1, "session-max", "Max count of session simultaneously [default 10]"},
 
        {SET_TRACEREQ,      1, "tracereq",    "Log the requests: no, common, extra, all"},
+       {SET_TRACEDITF,     1, "traceditf",   "Log the requests: no, common, extra, all"},
+       {SET_TRACESVC,      1, "tracesvc",    "Log the requests: no, all"},
+       {SET_TRACEEVT,      1, "traceevt",    "Log the requests: no, common, extra, all"},
+
+       {ADD_CALL,          1, "call",        "call at start format of val: API/VERB:json-args"},
 
        {SET_NO_HTTPD,      0, "no-httpd",    "Forbids HTTP service"},
        {SET_EXEC,          0, "exec",        "Execute the remaining arguments"},
-       {SET_RNDTOKEN,      0, "random-token","creates a random token"},
 
+#if defined(WITH_MONITORING_OPTION)
+       {SET_MONITORING,    0, "monitoring",  "enable HTTP monitoring at <ROOT>/monitoring/"},
+#endif
        {0, 0, NULL, NULL}
 /* *INDENT-ON* */
 };
@@ -168,6 +195,28 @@ static struct enumdesc tracereq_desc[] = {
        { NULL, 0 }
 };
 
+static struct enumdesc traceditf_desc[] = {
+       { "no",     0 },
+       { "common", afb_hook_flags_ditf_common },
+       { "extra",  afb_hook_flags_ditf_extra },
+       { "all",    afb_hook_flags_ditf_all },
+       { NULL, 0 }
+};
+
+static struct enumdesc tracesvc_desc[] = {
+       { "no",     0 },
+       { "all",    afb_hook_flags_svc_all },
+       { NULL, 0 }
+};
+
+static struct enumdesc traceevt_desc[] = {
+       { "no",     0 },
+       { "common", afb_hook_flags_evt_common },
+       { "extra",  afb_hook_flags_evt_extra },
+       { "all",    afb_hook_flags_evt_all },
+       { NULL, 0 }
+};
+
 static struct enumdesc mode_desc[] = {
        { "local",  AFB_MODE_LOCAL },
        { "remote", AFB_MODE_REMOTE },
@@ -181,14 +230,16 @@ static struct enumdesc mode_desc[] = {
  +--------------------------------------------------------- */
 static void printVersion(FILE * file)
 {
-       fprintf(file, "\n----------------------------------------- \n");
-       fprintf(file, "  AFB [Application Framework Binder] version=%s |\n",
-               AFB_VERSION);
-       fprintf(file, " \n");
-       fprintf(file,
-               "  Copyright (C) 2015, 2016, 2017 \"IoT.bzh\" [fulup -at- iot.bzh]\n");
-       fprintf(file, "  AFB comes with ABSOLUTELY NO WARRANTY.\n");
-       fprintf(file, "  Licence Apache 2\n\n");
+       static const char version[] =
+               "\n"
+               "  AFB [Application Framework Binder] version="AFB_VERSION"\n"
+               "\n"
+               "  Copyright (C) 2015, 2016, 2017 \"IoT.bzh\"\n"
+               "  AFB comes with ABSOLUTELY NO WARRANTY.\n"
+               "  Licence Apache 2\n"
+               "\n";
+
+       fprintf(file, "%s", version);
 }
 
 /*----------------------------------------------------------
@@ -214,18 +265,6 @@ static void printHelp(FILE * file, const char *name)
 }
 
 
-/*----------------------------------------------------------
- |   adds a string to the list
- +--------------------------------------------------------- */
-static char *random_token()
-{
-       static char uuidstr[37];
-       uuid_t uuid;
-       uuid_generate_random(uuid);
-       uuid_unparse(uuid, uuidstr);
-       return uuidstr;
-}
-
 /*----------------------------------------------------------
  |   adds a string to the list
  +--------------------------------------------------------- */
@@ -234,7 +273,7 @@ static void list_add(struct afb_config_list **head, char *value)
        struct afb_config_list *item;
 
        /*
-        * search tail 
+        * search tail
         */
        item = *head;
        while (item != NULL) {
@@ -243,7 +282,7 @@ static void list_add(struct afb_config_list **head, char *value)
        }
 
        /*
-        * alloc the item 
+        * alloc the item
         */
        item = malloc(sizeof *item);
        if (item == NULL) {
@@ -252,7 +291,7 @@ static void list_add(struct afb_config_list **head, char *value)
        }
 
        /*
-        * init the item 
+        * init the item
         */
        *head = item;
        item->value = value;
@@ -263,7 +302,7 @@ static void list_add(struct afb_config_list **head, char *value)
  |   helpers for argument scanning
  +--------------------------------------------------------- */
 
-static const char *optname(int optc)
+static const char *name_of_option(int optc)
 {
        AFB_options *o = cliOptions;
        while (o->name && o->val != optc)
@@ -271,21 +310,32 @@ static const char *optname(int optc)
        return o->name ? : "<unknown-option-name>";
 }
 
-static char *argvalstr(int optc)
+static const char *current_argument(int optc)
 {
        if (optarg == 0) {
                ERROR("option [--%s] needs a value i.e. --%s=xxx",
-                     optname(optc), optname(optc));
+                     name_of_option(optc), name_of_option(optc));
                exit(1);
        }
        return optarg;
 }
 
+static char *argvalstr(int optc)
+{
+       char *result = strdup(current_argument(optc));
+       if (result == NULL) {
+               ERROR("can't alloc memory");
+               exit(1);
+       }
+       return result;
+}
+
 static int argvalenum(int optc, struct enumdesc *desc)
 {
        int i;
        size_t len;
-       char *list, *name = argvalstr(optc);
+       char *list;
+       const char *name = current_argument(optc);
 
        i = 0;
        while(desc[i].name && strcmp(desc[i].name, name))
@@ -298,14 +348,14 @@ static int argvalenum(int optc, struct enumdesc *desc)
                list = malloc(len + i + i);
                if (!i || !list)
                        ERROR("option [--%s] bad value (found %s)",
-                               optname(optc), name);
+                               name_of_option(optc), name);
                else {
                        i = 0;
                        strcpy(list, desc[i].name ? : "");
                        while(desc[++i].name)
                                strcat(strcat(list, ", "), desc[i].name);
                        ERROR("option [--%s] bad value, only accepts values %s (found %s)",
-                               optname(optc), list, name);
+                               name_of_option(optc), list, name);
                }
                free(list);
                exit(1);
@@ -315,18 +365,18 @@ static int argvalenum(int optc, struct enumdesc *desc)
 
 static int argvalint(int optc, int mini, int maxi, int base)
 {
-       char *beg, *end;
+       const char *beg, *end;
        long int val;
-       beg = argvalstr(optc);
-       val = strtol(beg, &end, base);
+       beg = current_argument(optc);
+       val = strtol(beg, (char**)&end, base);
        if (*end || end == beg) {
                ERROR("option [--%s] requires a valid integer (found %s)",
-                       optname(optc), beg);
+                       name_of_option(optc), beg);
                exit(1);
        }
        if (val < (long int)mini || val > (long int)maxi) {
                ERROR("option [--%s] value out of bounds (not %d<=%ld<=%d)",
-                       optname(optc), mini, val, maxi);
+                       name_of_option(optc), mini, val, maxi);
                exit(1);
        }
        return (int)val;
@@ -340,9 +390,34 @@ static int argvalintdec(int optc, int mini, int maxi)
 static void noarg(int optc)
 {
        if (optarg != 0) {
-               ERROR("option [--%s] need no value (found %s)", optname(optc), optarg);
+               ERROR("option [--%s] need no value (found %s)", name_of_option(optc), optarg);
+               exit(1);
+       }
+}
+
+static char **make_exec(char **argv)
+{
+       char **result, *iter;
+       size_t length;
+       int i;
+
+       length = 0;
+       for (i = 0 ; argv[i] ; i++)
+               length += strlen(argv[i]) + 1;
+
+       result = malloc(length + ((unsigned)(i + 1)) * sizeof *result);
+       if (result == NULL) {
+               ERROR("can't alloc memory");
                exit(1);
        }
+
+       iter = (char*)&result[i+1];
+       for (i = 0 ; argv[i] ; i++) {
+               result[i] = iter;
+               iter = stpcpy(iter, argv[i]) + 1;
+       }
+       result[i] = NULL;
+       return result;
 }
 
 /*---------------------------------------------------------
@@ -369,7 +444,7 @@ static void parse_arguments(int argc, char **argv, struct afb_config *config)
        }
 
        // get all options from command line
-       while ((optc = getopt_long(argc, argv, SHORTOPTS, gnuOptions, NULL)) != EOF) {
+       while ((optc = getopt_long(argc, argv, shortopts, gnuOptions, NULL)) != EOF) {
                switch (optc) {
                case SET_VERBOSE:
                        verbosity++;
@@ -423,8 +498,30 @@ static void parse_arguments(int argc, char **argv, struct afb_config *config)
                        list_add(&config->ldpaths, argvalstr(optc));
                        break;
 
+               case SET_WEAK_LDPATH:
+                       list_add(&config->weak_ldpaths, argvalstr(optc));
+                       break;
+
+               case NO_LDPATH:
+                       noarg(optc);
+                       config->no_ldpaths = 1;
+                       break;
+
+               case ADD_CALL:
+                       list_add(&config->calls, argvalstr(optc));
+                       break;
+
                case SET_SESSION_DIR:
-                       config->sessiondir = argvalstr(optc);
+                       /* config->sessiondir = argvalstr(optc); */
+                       WARNING("Obsolete option %s ignored", name_of_option(optc));
+                       break;
+
+               case SET_UPLOAD_DIR:
+                       config->uploaddir = argvalstr(optc);
+                       break;
+
+               case SET_WORK_DIR:
+                       config->workdir = argvalstr(optc);
                        break;
 
                case SET_CACHE_TIMEOUT:
@@ -445,12 +542,12 @@ static void parse_arguments(int argc, char **argv, struct afb_config *config)
                        config->background = 1;
                        break;
 
-               case SET_MODE:
-                       config->mode = argvalenum(optc, mode_desc);
+               case SET_NAME:
+                       config->name = argvalstr(optc);
                        break;
 
-               case SET_READYFD:
-                       config->readyfd = argvalintdec(optc, 0, INT_MAX);
+               case SET_MODE:
+                       config->mode = argvalenum(optc, mode_desc);
                        break;
 
                case DBUS_CLIENT:
@@ -477,20 +574,38 @@ static void parse_arguments(int argc, char **argv, struct afb_config *config)
                        config->tracereq = argvalenum(optc, tracereq_desc);
                        break;
 
+               case SET_TRACEDITF:
+                       config->traceditf = argvalenum(optc, traceditf_desc);
+                       break;
+
+               case SET_TRACESVC:
+                       config->tracesvc = argvalenum(optc, tracesvc_desc);
+                       break;
+
+               case SET_TRACEEVT:
+                       config->traceevt = argvalenum(optc, traceevt_desc);
+                       break;
+
                case SET_NO_HTTPD:
                        noarg(optc);
                        config->noHttpd = 1;
                        break;
 
                case SET_EXEC:
-                       config->exec = &argv[optind];
-                       optind = argc;
+                       config->exec = make_exec(&argv[optind]);
+                       optind = argc; /* stop option scanning */
                        break;
 
                case SET_RNDTOKEN:
-                       config->token = random_token();
+                       config->random_token = 1;
                        break;
 
+#if defined(WITH_MONITORING_OPTION)
+               case SET_MONITORING:
+                       config->monitoring = 1;
+                       break;
+#endif
+
                case DISPLAY_VERSION:
                        noarg(optc);
                        printVersion(stdout);
@@ -507,8 +622,7 @@ static void parse_arguments(int argc, char **argv, struct afb_config *config)
        free(gnuOptions);
 }
 
-// load config from disk and merge with CLI option
-static void config_set_default(struct afb_config *config)
+static void fulfill_config(struct afb_config *config)
 {
        // default HTTP port
        if (config->httpdPort == 0)
@@ -519,8 +633,8 @@ static void config_set_default(struct afb_config *config)
                config->apiTimeout = DEFLT_API_TIMEOUT;
 
        // default AUTH_TOKEN
-       if (config->token == NULL)
-               config->token = DEFLT_AUTH_TOKEN;
+       if (config->random_token)
+               config->token = NULL;
 
        // cache timeout default one hour
        if (config->cacheTimeout == 0)
@@ -534,14 +648,16 @@ static void config_set_default(struct afb_config *config)
        if (config->nbSessionMax == 0)
                config->nbSessionMax = CTX_NBCLIENTS;
 
-       if (config->rootdir == NULL) {
-               config->rootdir = getenv("AFBDIR");
-               if (config->rootdir == NULL) {
-                       config->rootdir = malloc(512);
-                       strncpy(config->rootdir, getenv("HOME"), 512);
-                       strncat(config->rootdir, "/.AFB", 512);
-               }
-       }
+       /* set directories */
+       if (config->workdir == NULL)
+               config->workdir = ".";
+
+       if (config->rootdir == NULL)
+               config->rootdir = ".";
+
+       if (config->uploaddir == NULL)
+               config->uploaddir = ".";
+
        // if no Angular/HTML5 rootbase let's try '/' as default
        if (config->rootbase == NULL)
                config->rootbase = "/opa";
@@ -549,19 +665,18 @@ static void config_set_default(struct afb_config *config)
        if (config->rootapi == NULL)
                config->rootapi = "/api";
 
-       if (config->ldpaths == NULL)
+       if (config->ldpaths == NULL && config->weak_ldpaths == NULL && !config->no_ldpaths)
                list_add(&config->ldpaths, BINDING_INSTALL_DIR);
 
-       // if no session dir create a default path from rootdir
-       if (config->sessiondir == NULL) {
-               config->sessiondir = malloc(512);
-               strncpy(config->sessiondir, config->rootdir, 512);
-               strncat(config->sessiondir, "/sessions", 512);
-       }
-       // if no config dir create a default path from sessiondir
+#if defined(WITH_MONITORING_OPTION)
+       if (config->monitoring)
+               list_add(&config->aliases, strdup("/monitoring:"BINDING_INSTALL_DIR"/monitoring"));
+#endif
+
+       // if no config dir create a default path from uploaddir
        if (config->console == NULL) {
                config->console = malloc(512);
-               strncpy(config->console, config->sessiondir, 512);
+               strncpy(config->console, config->uploaddir, 512);
                strncat(config->console, "/AFB-console.out", 512);
        }
 }
@@ -590,8 +705,10 @@ void afb_config_dump(struct afb_config *config)
        S(roothttp)
        S(rootbase)
        S(rootapi)
-       S(sessiondir)
+       S(workdir)
+       S(uploaddir)
        S(token)
+       S(name)
 
        L(aliases)
        L(dbus_clients)
@@ -600,19 +717,28 @@ void afb_config_dump(struct afb_config *config)
        L(ws_servers)
        L(so_bindings)
        L(ldpaths)
+       L(weak_ldpaths)
+       L(calls)
 
        V(exec)
 
        D(httpdPort)
-       B(background)
-       D(readyfd)
        D(cacheTimeout)
        D(apiTimeout)
        D(cntxTimeout)
        D(nbSessionMax)
+
        E(mode,mode_desc)
        E(tracereq,tracereq_desc)
+       E(traceditf,traceditf_desc)
+       E(tracesvc,tracesvc_desc)
+       E(traceevt,traceevt_desc)
+
+       B(no_ldpaths)
        B(noHttpd)
+       B(background)
+       B(monitoring)
+       B(random_token)
        P("---END-OF-CONFIG---\n");
 
 #undef V
@@ -628,14 +754,49 @@ void afb_config_dump(struct afb_config *config)
 #undef NN
 }
 
+static void on_environment_list(struct afb_config_list **to, const char *name)
+{
+       char *value = getenv(name);
+
+       if (value)
+               list_add(to, value);
+}
+
+static void on_environment_enum(int *to, const char *name, struct enumdesc *desc)
+{
+       char *value = getenv(name);
+
+       if (value) {
+               while (desc->name) {
+                       if (strcmp(desc->name, value))
+                               desc++;
+                       else {
+                               *to = desc->value;
+                               return;
+                       }
+               }
+               WARNING("Unknown value %s for environment variable %s, ignored", value, name);
+       }
+}
+
+static void parse_environment(struct afb_config *config)
+{
+       on_environment_enum(&config->tracereq, "AFB_TRACEREQ", tracereq_desc);
+       on_environment_enum(&config->traceditf, "AFB_TRACEDITF", traceditf_desc);
+       on_environment_enum(&config->tracesvc, "AFB_TRACESVC", tracesvc_desc);
+       on_environment_enum(&config->traceevt, "AFB_TRACEEVT", traceevt_desc);
+       on_environment_list(&config->ldpaths, "AFB_LDPATHS");
+}
+
 struct afb_config *afb_config_parse_arguments(int argc, char **argv)
 {
        struct afb_config *result;
 
        result = calloc(1, sizeof *result);
 
+       parse_environment(result);
        parse_arguments(argc, argv, result);
-       config_set_default(result);
+       fulfill_config(result);
        if (verbosity >= 3)
                afb_config_dump(result);
        return result;