Rename afb-config to afb-args

With the introduction of more compilation flags,
it becomes interesting to use a configuration
file.

The configuration file is usually "config.h".
So that renaming avoids future ambiguity.
It also reflects better what the module does.

Change-Id: I952adc1e1bf469132dc224900bd9140ccc51c58b
Signed-off-by: José Bollo <jose.bollo@iot.bzh>

1 files changed, 1057 insertions, 0 deletions

diff --git a/src/afb-args.c b/src/afb-args.c
new file mode 100644
index 00000000..05a88655
--- /dev/null
+++ b/src/afb-args.c
@@ -0,0 +1,1057 @@
+/*
+ * Copyright (C) 2015-2019 "IoT.bzh"
+ * Author José Bollo <jose.bollo@iot.bzh>
+ *
+ * Licensed under the Apache License, Version 2.0 (the "License");
+ * you may not use this file except in compliance with the License.
+ * You may obtain a copy of the License at
+ *
+ *   http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * Unless required by applicable law or agreed to in writing, software
+ * distributed under the License is distributed on an "AS IS" BASIS,
+ * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ * See the License for the specific language governing permissions and
+ * limitations under the License.
+ */
+
+#define _GNU_SOURCE
+
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+#include <getopt.h>
+#include <limits.h>
+#include <unistd.h>
+#include <ctype.h>
+
+#include <json-c/json.h>
+#if !defined(JSON_C_TO_STRING_NOSLASHESCAPE)
+#define JSON_C_TO_STRING_NOSLASHESCAPE 0
+#endif
+
+#include "verbose.h"
+#include "afb-args.h"
+#include "afb-hook-flags.h"
+#include "wrap-json.h"
+
+#define _d2s_(x)  #x
+#define d2s(x)    _d2s_(x)
+
+#if !defined(BINDING_INSTALL_DIR)
+#error "you should define BINDING_INSTALL_DIR"
+#endif
+#if !defined(AFB_VERSION)
+#error "you should define AFB_VERSION"
+#endif
+
+/**
+ * The default timeout of sessions in seconds
+ */
+#define DEFAULT_SESSION_TIMEOUT		32000000
+
+/**
+ * The default timeout of api calls in seconds
+ */
+#define DEFAULT_API_TIMEOUT		20
+
+/**
+ * The default timeout of cache in seconds
+ */
+#define DEFAULT_CACHE_TIMEOUT		100000
+
+/**
+ * The default maximum count of sessions
+ */
+#define DEFAULT_MAX_SESSION_COUNT       200
+
+/**
+ * The default HTTP port to serve
+ */
+#define DEFAULT_HTTP_PORT		1234
+
+// Define command line option
+#define SET_BACKGROUND       1
+#define SET_FOREGROUND       2
+#define SET_ROOT_DIR         3
+#define SET_ROOT_BASE        4
+#define SET_ROOT_API         5
+#define ADD_ALIAS            6
+
+#define SET_CACHE_TIMEOUT    7
+
+#define AUTO_WS              8
+#define AUTO_LINK            9
+
+#define ADD_LDPATH          10
+#define SET_API_TIMEOUT     11
+#define SET_SESSION_TIMEOUT 12
+#define ADD_WEAK_LDPATH     13
+#define SET_NO_LDPATH       14
+
+#define SET_SESSIONMAX      15
+
+#define ADD_WS_CLIENT       16
+#define ADD_WS_SERVICE      17
+
+#define SET_ROOT_HTTP       18
+
+#define SET_NO_HTTPD        19
+
+#define SET_TRACEEVT        20
+#define SET_TRACESES        21
+#define SET_TRACEREQ        22
+#define SET_TRACEAPI        23
+#define SET_TRACEGLOB       24
+#if !defined(REMOVE_LEGACY_TRACE)
+#define SET_TRACEDITF       25
+#define SET_TRACESVC        26
+#endif
+#define SET_TRAP_FAULTS     27
+#define ADD_CALL            28
+#if defined(WITH_DBUS_TRANSPARENCY)
+#   define ADD_DBUS_CLIENT  30
+#   define ADD_DBUS_SERVICE 31
+#endif
+
+#define ADD_AUTO_API       'A'
+#define ADD_BINDING        'b'
+#define SET_CONFIG         'C'
+#define SET_COLOR          'c'
+#define SET_DAEMON         'D'
+#define SET_EXEC           'e'
+#define GET_HELP           'h'
+#define SET_LOG            'l'
+#if defined(WITH_MONITORING_OPTION)
+#define SET_MONITORING     'M'
+#endif
+#define SET_NAME           'n'
+#define SET_OUTPUT         'o'
+#define SET_PORT           'p'
+#define SET_QUIET          'q'
+#define SET_RANDOM_TOKEN   'r'
+#define ADD_SET            's'
+#define SET_TOKEN          't'
+#define SET_UPLOAD_DIR     'u'
+#define GET_VERSION        'V'
+#define SET_VERBOSE        'v'
+#define SET_WORK_DIR       'w'
+#define DUMP_CONFIG        'Z'
+
+/* structure for defining of options */
+struct option_desc {
+	int id;		/* id of the option         */
+	int has_arg;	/* is a value required      */
+	char *name;	/* long name of the option  */
+	char *help;	/* help text                */
+};
+
+/* definition of options */
+static struct option_desc optdefs[] = {
+/* *INDENT-OFF* */
+	{SET_VERBOSE,         0, "verbose",     "Verbose Mode, repeat to increase verbosity"},
+	{SET_COLOR,           0, "color",       "Colorize the ouput"},
+	{SET_QUIET,           0, "quiet",       "Quiet Mode, repeat to decrease verbosity"},
+	{SET_LOG,             1, "log",         "Tune log level"},
+
+	{SET_FOREGROUND,      0, "foreground",  "Get all in foreground mode"},
+	{SET_BACKGROUND,      0, "background",  "Get all in background mode"},
+	{SET_DAEMON,          0, "daemon",      "Get all in background mode"},
+
+	{SET_NAME,            1, "name",        "Set the visible name"},
+
+	{SET_PORT,            1, "port",        "HTTP listening TCP port  [default " d2s(DEFAULT_HTTP_PORT) "]"},
+	{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]"},
+	{ADD_ALIAS,           1, "alias",       "Multiple url map outside of rootdir [eg: --alias=/icons:/usr/share/icons]"},
+
+	{SET_API_TIMEOUT,     1, "apitimeout",  "Binding API timeout in seconds [default " d2s(DEFAULT_API_TIMEOUT) "]"},
+	{SET_SESSION_TIMEOUT, 1, "cntxtimeout", "Client Session Context Timeout [default " d2s(DEFAULT_SESSION_TIMEOUT) "]"},
+	{SET_CACHE_TIMEOUT,   1, "cache-eol",   "Client cache end of live [default " d2s(DEFAULT_CACHE_TIMEOUT) "]"},
+
+	{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] relative to workdir"},
+	{SET_ROOT_DIR,        1, "rootdir",     "Root Directory of the application [default: workdir] relative to workdir"},
+
+	{ADD_LDPATH,          1, "ldpaths",     "Load bindings from dir1:dir2:... [default = " BINDING_INSTALL_DIR "]"},
+	{ADD_BINDING,         1, "binding",     "Load the binding of path"},
+	{ADD_WEAK_LDPATH,     1, "weak-ldpaths","Same as --ldpaths but ignore errors"},
+	{SET_NO_LDPATH,       0, "no-ldpaths",  "Discard default ldpaths loading"},
+
+	{SET_TOKEN,           1, "token",       "Initial Secret [default=random, use --token="" to allow any token]"},
+	{SET_RANDOM_TOKEN,    0, "random-token","Enforce a random token"},
+
+	{GET_VERSION,         0, "version",     "Display version and copyright"},
+	{GET_HELP,            0, "help",        "Display this help"},
+
+#if defined(WITH_DBUS_TRANSPARENCY)
+	{ADD_DBUS_CLIENT,     1, "dbus-client", "Bind to an afb service through dbus"},
+	{ADD_DBUS_SERVICE,    1, "dbus-server", "Provide an afb service through dbus"},
+#endif
+	{ADD_WS_CLIENT,       1, "ws-client",   "Bind to an afb service through websocket"},
+	{ADD_WS_SERVICE,      1, "ws-server",   "Provide an afb service through websockets"},
+
+	{ADD_AUTO_API,        1, "auto-api",    "Automatic load of api of the given directory"},
+
+	{SET_SESSIONMAX,      1, "session-max", "Max count of session simultaneously [default " d2s(DEFAULT_MAX_SESSION_COUNT) "]"},
+
+#if WITH_AFB_HOOK
+	{SET_TRACEREQ,        1, "tracereq",    "Log the requests: none, common, extra, all"},
+	{SET_TRACEEVT,        1, "traceevt",    "Log the events: none, common, extra, all"},
+	{SET_TRACESES,        1, "traceses",    "Log the sessions: none, all"},
+	{SET_TRACEAPI,        1, "traceapi",    "Log the apis: none, common, api, event, all"},
+	{SET_TRACEGLOB,       1, "traceglob",   "Log the globals: none, all"},
+#if !defined(REMOVE_LEGACY_TRACE)
+	{SET_TRACEDITF,       1, "traceditf",   "Log the daemons: no, common, all"},
+	{SET_TRACESVC,        1, "tracesvc",    "Log the services: no, all"},
+#endif
+#endif
+
+	{ADD_CALL,            1, "call",        "Call at start, format of val: API/VERB:json-args"},
+
+	{SET_NO_HTTPD,        0, "no-httpd",    "Forbid HTTP service"},
+	{SET_EXEC,            0, "exec",        "Execute the remaining arguments"},
+
+#if defined(WITH_MONITORING_OPTION)
+	{SET_MONITORING,      0, "monitoring",  "Enable HTTP monitoring at <ROOT>/monitoring/"},
+#endif
+
+	{SET_CONFIG,          1, "config",      "Load options from the given config file"},
+	{DUMP_CONFIG,         0, "dump-config", "Dump the config to stdout and exit"},
+
+	{ADD_SET,             1, "set",         "Set parameters ([API]/[KEY]:JSON or {\"API\":{\"KEY\":JSON}}" },
+	{SET_OUTPUT,          1, "output",      "Redirect stdout and stderr to output file (when --daemon)"},
+
+	{SET_TRAP_FAULTS,     1, "trap-faults", "Trap faults: on, off, yes, no, true, false, 1, 0 (default: true)"},
+
+	{0, 0, NULL, NULL}
+/* *INDENT-ON* */
+};
+
+#if defined(WITH_MONITORING_OPTION)
+static const char MONITORING_ALIAS[] = "/monitoring:"BINDING_INSTALL_DIR"/monitoring";
+#endif
+
+static const struct {
+	int optid;
+	int valdef;
+} default_optint_values[] = {
+	{ SET_PORT,		DEFAULT_HTTP_PORT },
+	{ SET_API_TIMEOUT,	DEFAULT_API_TIMEOUT },
+	{ SET_CACHE_TIMEOUT,	DEFAULT_CACHE_TIMEOUT },
+	{ SET_SESSION_TIMEOUT,	DEFAULT_SESSION_TIMEOUT },
+	{ SET_SESSIONMAX,	DEFAULT_MAX_SESSION_COUNT }
+};
+
+static const struct {
+	int optid;
+	const char *valdef;
+} default_optstr_values[] = {
+	{ SET_WORK_DIR,		"." },
+	{ SET_ROOT_DIR,		"." },
+	{ SET_UPLOAD_DIR,	"." },
+	{ SET_ROOT_BASE,	"/opa" },
+	{ SET_ROOT_API,		"/api" }
+};
+
+/**********************************
+* preparing items
+***********************************/
+
+static char *shortopts = NULL;
+static int *id2idx = NULL;
+
+static void *oomchk(void *ptr)
+{
+	if (!ptr) {
+		ERROR("Out of memory");
+		exit(1);
+	}
+	return ptr;
+}
+
+static char is_short_option(int val)
+{
+	return (val >= 'a' && val <= 'z') || (val >= 'A' && val <= 'Z') || (val >= '0' && val <= '9');
+}
+
+static void init_options()
+{
+	int i, ns, mi, id;
+
+	if (!shortopts) {
+		ns = 2;
+		mi = -1;
+		for (i = 0 ; optdefs[i].name ; i++) {
+			id = optdefs[i].id;
+			if (id > mi)
+				mi = id;
+			if (is_short_option(id))
+				ns += 1 + !!optdefs[i].has_arg;
+		}
+		shortopts = oomchk(malloc(2 + ns));
+		id2idx = oomchk(calloc(1 + mi, sizeof *id2idx));
+		shortopts[ns = 0] = ':';
+		for (i = 0 ; optdefs[i].name ; i++) {
+			id = optdefs[i].id;
+			id2idx[id] = i;
+			if (is_short_option(id)) {
+				shortopts[++ns] = (char)id;
+				if (optdefs[i].has_arg)
+					shortopts[++ns] = ':';
+			}
+		}
+		shortopts[++ns] = 0;
+	}
+}
+
+static const char *name_of_optid(int optid)
+{
+	return optdefs[id2idx[optid]].name;
+}
+
+static int get_enum_val(const char *name, int optid, int (*func)(const char*))
+{
+	int i;
+
+	i = func(name);
+	if (i < 0) {
+		ERROR("option [--%s] bad value (found %s)",
+			name_of_optid(optid), name);
+		exit(1);
+	}
+	return i;
+}
+
+
+/*----------------------------------------------------------
+ | printversion
+ |   print version and copyright
+ +--------------------------------------------------------- */
+static void printVersion(FILE * file)
+{
+	fprintf(file,
+		"\n"
+		"  AGL Framework Binder [AFB %s] "
+
+#if defined(WITH_DBUS_TRANSPARENCY)
+		"+"
+#else
+		"-"
+#endif
+		"DBUS "
+
+#if defined(WITH_MONITORING_OPTION)
+		"+"
+#else
+		"-"
+#endif
+		"MONITOR "
+#if defined(WITH_SUPERVISION)
+		"+"
+#else
+		"-"
+#endif
+		"SUPERVISION "
+
+#if WITH_AFB_HOOK
+		"+"
+#else
+		"-"
+#endif
+		"HOOK "
+
+#if WITH_TRACE
+		"+"
+#else
+		"-"
+#endif
+		"TRACE "
+
+		"[BINDINGS "
+#if defined(WITH_LEGACY_BINDING_V1)
+		"+"
+#else
+		"-"
+#endif
+		"V1 "
+#if defined(WITH_LEGACY_BINDING_VDYN)
+		"+"
+#else
+		"-"
+#endif
+		"VDYN +V2 +V3]\n"
+		"\n",
+		AFB_VERSION
+	);
+	fprintf(file,
+		"  Copyright (C) 2015-2019 \"IoT.bzh\"\n"
+		"  AFB comes with ABSOLUTELY NO WARRANTY.\n"
+		"  Licence Apache 2\n"
+		"\n");
+}
+
+/*----------------------------------------------------------
+ | printHelp
+ |   print information from long option array
+ +--------------------------------------------------------- */
+
+static void printHelp(FILE * file, const char *name)
+{
+	int ind;
+	char command[50], sht[4];
+
+	fprintf(file, "%s:\nallowed options\n", strrchr(name, '/') ? strrchr(name, '/') + 1 : name);
+	sht[3] = 0;
+	for (ind = 0; optdefs[ind].name != NULL; ind++) {
+		if (is_short_option(optdefs[ind].id)) {
+			sht[0] = '-';
+			sht[1] = (char)optdefs[ind].id;
+			sht[2] = ',';
+		} else {
+			sht[0] = sht[1] = sht[2] = ' ';
+		}
+		strcpy(command, optdefs[ind].name);
+		if (optdefs[ind].has_arg)
+			strcat(command, "=xxxx");
+		fprintf(file, " %s --%-17s %s\n", sht, command, optdefs[ind].help);
+	}
+	fprintf(file,
+		"Example:\n  %s  --verbose --port="
+		d2s(DEFAULT_HTTP_PORT)
+		" --token='azerty' --ldpaths=build/bindings:/usr/lib64/agl/bindings\n",
+		name);
+}
+
+static void dump(struct json_object *config, FILE *file, const char *prefix, const char *title)
+{
+	const char *head, *tail;
+
+	if (title)
+		fprintf(file, "%s----BEGIN OF %s-----\n", prefix ?: "", title);
+
+	head = json_object_to_json_string_ext(config, JSON_C_TO_STRING_PRETTY
+		|JSON_C_TO_STRING_SPACED|JSON_C_TO_STRING_NOSLASHESCAPE);
+
+	if (!prefix)
+		fprintf(file, "%s\n", head);
+	else {
+		while(*head) {
+			for (tail = head ; *tail && *tail != '\n' ; tail++);
+			fprintf(file, "%s %.*s\n", prefix, (int)(tail - head), head);
+			head = tail + !!*tail;
+		}
+	}
+
+	if (title)
+		fprintf(file, "%s----END OF %s-----\n", prefix ?: "", title);
+}
+
+/**********************************
+* json helpers
+***********************************/
+
+static struct json_object *joomchk(struct json_object *value)
+{
+	return oomchk(value);
+}
+
+static struct json_object *to_jstr(const char *value)
+{
+	return joomchk(json_object_new_string(value));
+}
+
+static struct json_object *to_jint(int value)
+{
+	return joomchk(json_object_new_int(value));
+}
+
+static struct json_object *to_jbool(int value)
+{
+	return joomchk(json_object_new_boolean(value));
+}
+
+/**********************************
+* arguments helpers
+***********************************/
+
+static int string_to_bool(const char *value)
+{
+	static const char true_names[] = "1\0yes\0true\0on";
+	static const char false_names[] = "0\0no\0false\0off";
+	size_t pos;
+
+	pos = 0;
+	while (pos < sizeof true_names)
+		if (strcasecmp(value, &true_names[pos]))
+			pos += 1 + strlen(&true_names[pos]);
+		else
+			return 1;
+
+	pos = 0;
+	while (pos < sizeof false_names)
+		if (strcasecmp(value, &false_names[pos]))
+			pos += 1 + strlen(&false_names[pos]);
+		else
+			return 0;
+
+	return -1;
+}
+
+static void noarg(int optid)
+{
+	if (optarg) {
+		ERROR("option [--%s] need no value (found %s)", name_of_optid(optid), optarg);
+		exit(1);
+	}
+}
+
+static const char *get_arg(int optid)
+{
+	if (optarg == 0) {
+		ERROR("option [--%s] needs a value i.e. --%s=xxx",
+				name_of_optid(optid), name_of_optid(optid));
+		exit(1);
+	}
+	return optarg;
+}
+
+static int get_arg_bool(int optid)
+{
+	int value = string_to_bool(get_arg(optid));
+	if (value < 0) {
+		ERROR("option [--%s] needs a boolean value: yes/no, true/false, on/off, 1/0",
+				name_of_optid(optid));
+		exit(1);
+	}
+	return value;
+}
+
+static void config_del(struct json_object *config, int optid)
+{
+	return json_object_object_del(config, name_of_optid(optid));
+}
+
+static int config_has(struct json_object *config, int optid)
+{
+	return json_object_object_get_ex(config, name_of_optid(optid), NULL);
+}
+
+static int config_has_bool(struct json_object *config, int optid)
+{
+	struct json_object *x;
+	return json_object_object_get_ex(config, name_of_optid(optid), &x)
+		&& json_object_get_boolean(x);
+}
+
+static int config_has_str(struct json_object *config, int optid, const char *val)
+{
+	int i, n;
+	struct json_object *a;
+
+	if (!json_object_object_get_ex(config, name_of_optid(optid), &a))
+		return 0;
+
+	if (!json_object_is_type(a, json_type_array))
+		return !strcmp(val, json_object_get_string(a));
+
+	n = (int)json_object_array_length(a);
+	for (i = 0 ; i < n ; i++) {
+		if (!strcmp(val, json_object_get_string(json_object_array_get_idx(a, i))))
+			return 1;
+	}
+	return 0;
+}
+
+static void config_set(struct json_object *config, int optid, struct json_object *val)
+{
+	json_object_object_add(config, name_of_optid(optid), val);
+}
+
+static void config_set_str(struct json_object *config, int optid, const char *val)
+{
+	config_set(config, optid, to_jstr(val));
+}
+
+static void config_set_optstr(struct json_object *config, int optid)
+{
+	config_set_str(config, optid, get_arg(optid));
+}
+
+static void config_set_int(struct json_object *config, int optid, int value)
+{
+	config_set(config, optid, to_jint(value));
+}
+
+static void config_set_bool(struct json_object *config, int optid, int value)
+{
+	config_set(config, optid, to_jbool(value));
+}
+
+static void config_set_optint_base(struct json_object *config, int optid, int mini, int maxi, int base)
+{
+	const char *beg, *end;
+	long int val;
+
+	beg = get_arg(optid);
+	val = strtol(beg, (char**)&end, base);
+	if (*end || end == beg) {
+		ERROR("option [--%s] requires a valid integer (found %s)",
+			name_of_optid(optid), beg);
+		exit(1);
+	}
+	if (val < (long int)mini || val > (long int)maxi) {
+		ERROR("option [--%s] value %ld out of bounds (not in [%d , %d])",
+			name_of_optid(optid), val, mini, maxi);
+		exit(1);
+	}
+	config_set_int(config, optid, (int)val);
+}
+
+static void config_set_optint(struct json_object *config, int optid, int mini, int maxi)
+{
+	return config_set_optint_base(config, optid, mini, maxi, 10);
+}
+
+__attribute__((unused))
+static void config_set_optenum(struct json_object *config, int optid, int (*func)(const char*))
+{
+	const char *name = get_arg(optid);
+	get_enum_val(name, optid, func);
+	config_set_str(config, optid, name);
+}
+
+static void config_add(struct json_object *config, int optid, struct json_object *val)
+{
+	struct json_object *a;
+	if (!json_object_object_get_ex(config, name_of_optid(optid), &a)) {
+		a = joomchk(json_object_new_array());
+		json_object_object_add(config, name_of_optid(optid), a);
+	}
+	json_object_array_add(a, val);
+}
+
+static void config_add_str(struct json_object *config, int optid, const char *val)
+{
+	config_add(config, optid, to_jstr(val));
+}
+
+static void config_add_optstr(struct json_object *config, int optid)
+{
+	config_add_str(config, optid, get_arg(optid));
+}
+
+static void config_mix2_cb(void *closure, struct json_object *obj, const char *name)
+{
+	struct json_object *dest, *base = closure;
+
+	if (!name)
+		name = "";
+
+	if (!json_object_object_get_ex(base, name, &dest)) {
+		dest = joomchk(json_object_new_object());
+		json_object_object_add(base, name, dest);
+	}
+	if (json_object_is_type(obj, json_type_object))
+		wrap_json_object_add(dest, obj);
+	else
+		json_object_object_add(dest, "", json_object_get(obj));
+}
+
+static void config_mix2(struct json_object *config, int optid, struct json_object *val)
+{
+	struct json_object *obj;
+
+	if (!json_object_object_get_ex(config, name_of_optid(optid), &obj)) {
+		obj = joomchk(json_object_new_object());
+		json_object_object_add(config, name_of_optid(optid), obj);
+	}
+	wrap_json_for_all(val, config_mix2_cb, obj);
+}
+
+static void config_mix2_str(struct json_object *config, int optid, const char *val)
+{
+	size_t st1, st2;
+	const char *api, *key;
+	struct json_object *obj, *sub;
+	enum json_tokener_error jerr;
+
+	st1 = strcspn(val, "/:{[\"");
+	st2 = strcspn(&val[st1], ":{[\"");
+	if (val[st1] != '/' || val[st1 + st2] != ':') {
+		obj = json_tokener_parse_verbose(val, &jerr);
+		if (jerr != json_tokener_success)
+			obj = json_object_new_string(val);
+	} else {
+		api = st1 == 0 ? "*" : strndupa(val, st1);
+		val += st1 + 1;
+		key = st2 <= 1 || (st2 == 2 && *val == '*') ? NULL : strndupa(val, st2 - 1);
+		val += st2;
+		sub = json_tokener_parse_verbose(val, &jerr);
+		if (jerr != json_tokener_success)
+			sub = json_object_new_string(val);
+
+		if (key) {
+			obj = json_object_new_object();
+			json_object_object_add(obj, key, sub);
+			sub = obj;
+		}
+		obj = json_object_new_object();
+		json_object_object_add(obj, api, sub);
+	}
+	config_mix2(config, optid, obj);
+	json_object_put(obj);
+}
+
+static void config_mix2_optstr(struct json_object *config, int optid)
+{
+	config_mix2_str(config, optid, get_arg(optid));
+}
+
+/*---------------------------------------------------------
+ |   set the log levels
+ +--------------------------------------------------------- */
+
+static void set_log(const char *args)
+{
+	char o = 0, s, *p, *i = strdupa(args);
+	int lvl;
+
+	for(;;) switch (*i) {
+	case 0:
+		return;
+	case '+':
+	case '-':
+		o = *i;
+		/*@fallthrough@*/
+	case ' ':
+	case ',':
+		i++;
+		break;
+	default:
+		p = i;
+		while (isalpha(*p)) p++;
+		s = *p;
+		*p = 0;
+		lvl = verbose_level_of_name(i);
+		if (lvl < 0) {
+			i = strdupa(i);
+			*p = s;
+			ERROR("Bad log name '%s' in %s", i, args);
+			exit(1);
+		}
+		*p = s;
+		i = p;
+		if (o == '-')
+			verbose_sub(lvl);
+		else {
+			if (!o) {
+				verbose_clear();
+				o = '+';
+			}
+			verbose_add(lvl);
+		}
+		break;
+	}
+}
+
+/*---------------------------------------------------------
+ |   Parse option and launch action
+ +--------------------------------------------------------- */
+
+static void parse_arguments_inner(int argc, char **argv, struct json_object *config, struct option *options)
+{
+	struct json_object *conf;
+	int optid, cind, dodump = 0;
+
+	for (;;) {
+		cind = optind;
+		optid = getopt_long(argc, argv, shortopts, options, NULL);
+		if (optid < 0) {
+			/* end of options */
+			break;
+		}
+		switch (optid) {
+		case SET_VERBOSE:
+			verbose_inc();
+			break;
+
+		case SET_COLOR:
+			verbose_colorize();
+			break;
+
+		case SET_QUIET:
+			verbose_dec();
+			break;
+
+		case SET_LOG:
+			set_log(get_arg(optid));
+			break;
+
+		case SET_PORT:
+			config_set_optint(config, optid, 1024, 32767);
+			break;
+
+		case SET_API_TIMEOUT:
+		case SET_SESSION_TIMEOUT:
+		case SET_CACHE_TIMEOUT:
+			config_set_optint(config, optid, 0, INT_MAX);
+			break;
+
+		case SET_SESSIONMAX:
+			config_set_optint(config, optid, 1, INT_MAX);
+			break;
+
+		case SET_ROOT_DIR:
+		case SET_ROOT_HTTP:
+		case SET_ROOT_BASE:
+		case SET_ROOT_API:
+		case SET_TOKEN:
+		case SET_UPLOAD_DIR:
+		case SET_WORK_DIR:
+		case SET_NAME:
+			config_set_optstr(config, optid);
+			break;
+
+#if defined(WITH_DBUS_TRANSPARENCY)
+		case ADD_DBUS_CLIENT:
+		case ADD_DBUS_SERVICE:
+#endif
+		case ADD_ALIAS:
+		case ADD_LDPATH:
+		case ADD_WEAK_LDPATH:
+		case ADD_CALL:
+		case ADD_WS_CLIENT:
+		case ADD_WS_SERVICE:
+		case ADD_BINDING:
+		case ADD_AUTO_API:
+			config_add_optstr(config, optid);
+			break;
+
+		case ADD_SET:
+			config_mix2_optstr(config, optid);
+			break;
+
+#if defined(WITH_MONITORING_OPTION)
+		case SET_MONITORING:
+#endif
+		case SET_RANDOM_TOKEN:
+		case SET_NO_HTTPD:
+		case SET_NO_LDPATH:
+			noarg(optid);
+			config_set_bool(config, optid, 1);
+			break;
+
+
+		case SET_FOREGROUND:
+		case SET_BACKGROUND:
+		case SET_DAEMON:
+			noarg(optid);
+			config_set_bool(config, SET_DAEMON, optid != SET_FOREGROUND);
+			break;
+
+		case SET_TRAP_FAULTS:
+			config_set_bool(config, optid, get_arg_bool(optid));
+			break;
+
+
+#if WITH_AFB_HOOK
+		case SET_TRACEREQ:
+			config_set_optenum(config, optid, afb_hook_flags_xreq_from_text);
+			break;
+
+		case SET_TRACEEVT:
+			config_set_optenum(config, optid, afb_hook_flags_evt_from_text);
+			break;
+
+		case SET_TRACESES:
+			config_set_optenum(config, optid, afb_hook_flags_session_from_text);
+			break;
+
+		case SET_TRACEAPI:
+			config_set_optenum(config, optid, afb_hook_flags_api_from_text);
+			break;
+
+		case SET_TRACEGLOB:
+			config_set_optenum(config, optid, afb_hook_flags_global_from_text);
+			break;
+
+#if !defined(REMOVE_LEGACY_TRACE)
+		case SET_TRACEDITF:
+			config_set_optenum(config, optid, afb_hook_flags_legacy_ditf_from_text);
+			break;
+
+		case SET_TRACESVC:
+			config_set_optenum(config, optid, afb_hook_flags_legacy_svc_from_text);
+			break;
+#endif
+#endif
+
+		case SET_EXEC:
+			if (optind == argc) {
+				ERROR("The option --exec requires arguments");
+				exit(1);
+			}
+			while (optind != argc)
+				config_add_str(config, optid, argv[optind++]);
+			break;
+
+		case SET_CONFIG:
+			conf = json_object_from_file(get_arg(optid));
+			if (!conf) {
+				ERROR("Can't read config file %s", get_arg(optid));
+				exit(1);
+			}
+			wrap_json_object_add(config, conf);
+			json_object_put(conf);
+			break;
+
+		case DUMP_CONFIG:
+			noarg(optid);
+			dodump = 1;
+			break;
+
+		case GET_VERSION:
+			noarg(optid);
+			printVersion(stdout);
+			exit(0);
+
+		case GET_HELP:
+			printHelp(stdout, argv[0]);
+			exit(0);
+
+		default:
+			ERROR("Bad option detected, check %s", argv[cind]);
+			exit(1);
+		}
+	}
+	/* TODO: check for extra value */
+
+	if (dodump) {
+		dump(config, stdout, NULL, NULL);
+		exit(0);
+	}
+}
+
+static void parse_arguments(int argc, char **argv, struct json_object *config)
+{
+	int ind;
+	struct option *options;
+
+	/* create GNU getopt options from optdefs */
+	options = malloc((sizeof optdefs / sizeof * optdefs) * sizeof * options);
+	for (ind = 0; optdefs[ind].name; ind++) {
+		options[ind].name = optdefs[ind].name;
+		options[ind].has_arg = optdefs[ind].has_arg;
+		options[ind].flag = NULL;
+		options[ind].val = optdefs[ind].id;
+	}
+	memset(&options[ind], 0, sizeof options[ind]);
+
+	/* parse the arguments */
+	parse_arguments_inner(argc, argv, config, options);
+
+	/* release the memory of options */
+	free(options);
+}
+
+static void fulfill_config(struct json_object *config)
+{
+	int i;
+
+	for (i = 0 ; i < sizeof default_optint_values / sizeof * default_optint_values ; i++)
+		if (!config_has(config, default_optint_values[i].optid))
+			config_set_int(config, default_optint_values[i].optid, default_optint_values[i].valdef);
+
+	for (i = 0 ; i < sizeof default_optstr_values / sizeof * default_optstr_values ; i++)
+		if (!config_has(config, default_optstr_values[i].optid))
+			config_set_str(config, default_optstr_values[i].optid, default_optstr_values[i].valdef);
+
+	// default AUTH_TOKEN
+	if (config_has_bool(config, SET_RANDOM_TOKEN))
+		config_del(config, SET_TOKEN);
+
+	if (!config_has(config, ADD_LDPATH) && !config_has(config, ADD_WEAK_LDPATH) && !config_has_bool(config, SET_NO_LDPATH))
+		config_add_str(config, ADD_LDPATH, BINDING_INSTALL_DIR);
+
+#if defined(WITH_MONITORING_OPTION)
+	if (config_has_bool(config, SET_MONITORING) && !config_has_str(config, ADD_ALIAS, MONITORING_ALIAS))
+		config_add_str(config, ADD_ALIAS, MONITORING_ALIAS);
+#endif
+
+#if !defined(REMOVE_LEGACY_TRACE) && 0
+	config->traceapi |= config->traceditf | config->tracesvc;
+#endif
+}
+
+static void on_environment(struct json_object *config, int optid, const char *name, void (*func)(struct json_object*, int, const char*))
+{
+	char *value = secure_getenv(name);
+
+	if (value && *value)
+		func(config, optid, value);
+}
+
+__attribute__((unused))
+static void on_environment_enum(struct json_object *config, int optid, const char *name, int (*func)(const char*))
+{
+	char *value = secure_getenv(name);
+
+	if (value) {
+		if (func(value) == -1)
+			WARNING("Unknown value %s for environment variable %s, ignored", value, name);
+		else
+			config_set_str(config, optid, value);
+	}
+}
+
+static void on_environment_bool(struct json_object *config, int optid, const char *name)
+{
+	char *value = secure_getenv(name);
+	int asbool;
+
+	if (value) {
+		asbool = string_to_bool(value);
+		if (asbool < 0)
+			WARNING("Unknown value %s for environment variable %s, ignored", value, name);
+		else
+			config_set_bool(config, optid, asbool);
+	}
+}
+
+static void parse_environment(struct json_object *config)
+{
+#if WITH_AFB_HOOK
+	on_environment_enum(config, SET_TRACEREQ, "AFB_TRACEREQ", afb_hook_flags_xreq_from_text);
+	on_environment_enum(config, SET_TRACEEVT, "AFB_TRACEEVT", afb_hook_flags_evt_from_text);
+	on_environment_enum(config, SET_TRACESES, "AFB_TRACESES", afb_hook_flags_session_from_text);
+	on_environment_enum(config, SET_TRACEAPI, "AFB_TRACEAPI", afb_hook_flags_api_from_text);
+	on_environment_enum(config, SET_TRACEGLOB, "AFB_TRACEGLOB", afb_hook_flags_global_from_text);
+#if !defined(REMOVE_LEGACY_TRACE)
+	on_environment_enum(config, SET_TRACEDITF, "AFB_TRACEDITF", afb_hook_flags_legacy_ditf_from_text);
+	on_environment_enum(config, SET_TRACESVC, "AFB_TRACESVC", afb_hook_flags_legacy_svc_from_text);
+#endif
+#endif
+	on_environment(config, ADD_LDPATH, "AFB_LDPATHS", config_add_str);
+	on_environment(config, ADD_SET, "AFB_SET", config_mix2_str);
+	on_environment_bool(config, SET_TRAP_FAULTS, "AFB_TRAP_FAULTS");
+}
+
+struct json_object *afb_args_parse(int argc, char **argv)
+{
+	struct json_object *result;
+
+	init_options();
+
+	result = json_object_new_object();
+
+	parse_environment(result);
+	parse_arguments(argc, argv, result);
+	fulfill_config(result);
+	if (verbose_wants(Log_Level_Info))
+		dump(result, stderr, "--", "CONFIG");
+	return result;
+}
+
+