diff options
author | Sergey Poznyakoff <gray@gnu.org.ua> | 2012-12-30 15:36:56 +0200 |
---|---|---|
committer | Sergey Poznyakoff <gray@gnu.org.ua> | 2013-01-04 12:29:27 +0200 |
commit | cf14c349fad774e477a80d1c5e6572f21f17ced1 (patch) | |
tree | d8d73b072902cadc5aea5583119ec9e4e8ced2bc | |
parent | 64c343ff8f11c8379ec21916ba915a2894495797 (diff) | |
download | pies-cf14c349fad774e477a80d1c5e6572f21f17ced1.tar.gz pies-cf14c349fad774e477a80d1c5e6572f21f17ced1.tar.bz2 |
Initial support for running as init process.
* grecs: Upgrade.
* lib/Makefile.am: Use AM_CPPFLAGS instead of INCLUDES.
* src/Makefile.am: Likewise.
* src/acl.c: Update grecs_keyword definitions.
* src/inetd.c (inetd_conf_file): Bugfix. The ws structure could
be free'd prior to initialization.
* src/pies.c: Update grecs_keyword definitions.
(init_process,initdefault,dfl_level): New globals.
(modetab) <once>: New keyword.
(component_keywords)<runlevels,initdefault>: New keywords.
(main): Initial support for init(8) mode.
* src/pies.h (pies_comp_mode) <pies_comp_exec_once>: New constant.
(component)<runlevels>: New member.
(init_process,console_device,initdefault): New externs.
* src/progman.c (prog_status)<status_finished>: New status.
(prog)<runlevels>: New member.
(progman_running_p): New function.
(prog_start): Special handling for init process mode.
(progman_start): Likewise. Take into account runlevels.
(progman_dump_stats): New flag 'f' for status_finished.
m--------- | grecs | 0 | ||||
-rw-r--r-- | lib/Makefile.am | 2 | ||||
-rw-r--r-- | src/Makefile.am | 10 | ||||
-rw-r--r-- | src/acl.c | 4 | ||||
-rw-r--r-- | src/inetd.c | 13 | ||||
-rw-r--r-- | src/pies.c | 509 | ||||
-rw-r--r-- | src/pies.h | 53 | ||||
-rw-r--r-- | src/progman.c | 185 |
8 files changed, 567 insertions, 209 deletions
diff --git a/grecs b/grecs -Subproject a52ab6c6c38e1dca047ada4d60249fb323942f0 +Subproject 5596f7cdcdc1983021185c5e0900d5fcba7f328 diff --git a/lib/Makefile.am b/lib/Makefile.am index 2569bd1..5883021 100644 --- a/lib/Makefile.am +++ b/lib/Makefile.am @@ -25,5 +25,5 @@ libpies_a_SOURCES=\ libpies_a_LIBADD=$(LIBOBJS) -INCLUDES = -I$(top_srcdir)/gnu -I../gnu +AM_CPPFLAGS = -I$(top_srcdir)/gnu -I../gnu diff --git a/src/Makefile.am b/src/Makefile.am index 455b2c2..44e0a8d 100644 --- a/src/Makefile.am +++ b/src/Makefile.am @@ -54,12 +54,6 @@ SUFFIXES=.opt .c .h cmdline.h: cmdline.opt -INCLUDES = \ - -I$(top_srcdir)/lib\ - -I$(top_srcdir)/gnu\ - -I$(top_builddir)/gnu\ - @GRECS_INCLUDES@ - LDADD = \ ../lib/libpies.a\ @GRECS_LDADD@\ @@ -69,6 +63,10 @@ LDADD = \ pkgstatedir=$(localstatedir)/pies AM_CPPFLAGS=\ + -I$(top_srcdir)/lib\ + -I$(top_srcdir)/gnu\ + -I$(top_builddir)/gnu\ + @GRECS_INCLUDES@\ -DDEFAULT_PREPROCESSOR="$(DEFAULT_PREPROCESSOR)"\ -DDEFAULT_VERSION_INCLUDE_DIR=\"$(incdir)\"\ -DDEFAULT_INCLUDE_DIR=\"$(pkgdatadir)/include\"\ @@ -482,12 +482,12 @@ struct grecs_keyword acl_keywords[] = { /* TRANSLATORS: only words within angle brackets are translatable */ { "allow", N_("[all|authenticated|group <grp: list>] [from <addr: list>]"), N_("Allow access"), - grecs_type_string, NULL, 0, + grecs_type_string, GRECS_MULT, NULL, 0, allow_cb }, /* TRANSLATORS: only words within angle brackets are translatable */ { "deny", N_("[all|authenticated|group <grp: list>] [from <addr: list>]"), N_("Deny access"), - grecs_type_string, NULL, 0, + grecs_type_string, GRECS_MULT, NULL, 0, deny_cb }, { NULL } }; diff --git a/src/inetd.c b/src/inetd.c index 1d7798d..febd84e 100644 --- a/src/inetd.c +++ b/src/inetd.c @@ -84,6 +84,7 @@ inetd_conf_file (const char *file) size_t line_no = 0; struct wordsplit ws; char *dfl_address = NULL; + int wsflags; fp = fopen (file, "r"); if (!fp) @@ -94,6 +95,7 @@ inetd_conf_file (const char *file) return 1; } + wsflags = WRDSF_NOVAR | WRDSF_NOCMD | WRDSF_WS | WRDSF_SQUEEZE_DELIMS; while (getline (&buf, &size, fp) >= 0) { char *p; @@ -111,9 +113,6 @@ inetd_conf_file (const char *file) struct inetd_builtin *builtin; char *tag; - if (line_no) - wordsplit_free (&ws); - line_no++; for (p = buf; *p && c_isblank (*p); p++) ; @@ -121,14 +120,12 @@ inetd_conf_file (const char *file) if (!p || *p == '\n' || *p == '#') continue; - if (wordsplit (p, &ws, - WRDSF_NOVAR | WRDSF_NOCMD | WRDSF_WS | - WRDSF_SQUEEZE_DELIMS)) + if (wordsplit (p, &ws, wsflags)) { logmsg (LOG_ERR, "wordsplit: %s", strerror (errno)); continue; } - + wsflags |= WRDSF_REUSE; if (ws.ws_wordc == 1) { size_t len = strlen (ws.ws_wordv[IFLD_SERVICE]); @@ -308,7 +305,7 @@ inetd_conf_file (const char *file) register_prog (comp); } - if (line_no) + if (wsflags & WRDSF_REUSE) wordsplit_free (&ws); free (dfl_address); free (buf); @@ -26,6 +26,7 @@ int log_facility = LOG_USER; char *log_tag; struct pies_privs pies_privs; int foreground; +int init_process; enum pies_command { COM_START, @@ -38,6 +39,8 @@ enum pies_command { }; enum pies_command command; +int initdefault; /* Default runlevel */ +int dfl_level; char *statedir = DEFAULT_STATE_DIR; char *instance; char *pidfile; @@ -95,8 +98,8 @@ str_to_config_syntax (const char *str, enum config_syntax *psynt) for (p = config_syntax_tab; p->name; p++) if (strcmp (p->name, str) == 0) { - *psynt = p->type; - return 0; + *psynt = p->type; + return 0; } return 1; } @@ -131,7 +134,7 @@ add_pp_option (const char *opt, const char *arg) { char *qarg; size_t qlen; - + if (!pp_qopt) { pp_qopt = clone_quoting_options (NULL); @@ -158,19 +161,19 @@ stderr_closed_p () int assert_grecs_value_type (grecs_locus_t *locus, - const grecs_value_t *value, int type) + const grecs_value_t *value, int type) { if (GRECS_VALUE_EMPTY_P (value)) { grecs_error (locus, 0, _("expected %s"), - grecs_data_type_string (type)); + grecs_data_type_string (type)); return 1; } if (value->type != type) { grecs_error (locus, 0, _("expected %s, but found %s"), - grecs_data_type_string (type), - grecs_data_type_string (value->type)); + grecs_data_type_string (type), + grecs_data_type_string (value->type)); return 1; } return 0; @@ -190,8 +193,8 @@ assert_scalar_stmt (grecs_locus_t *locus, enum grecs_callback_command cmd) static int _cb_action (enum grecs_callback_command cmd, - grecs_locus_t *locus, - void *varptr, grecs_value_t *value, void *cb_data) + grecs_locus_t *locus, + void *varptr, grecs_value_t *value, void *cb_data) { enum return_action *pact = varptr; static struct tokendef actab[] = { @@ -219,24 +222,27 @@ struct grecs_keyword return_code_keywords[] = { N_("arg: {disable | restart}"), N_("Specifies action to take when a component finishes with this " "return code."), - grecs_type_string, NULL, offsetof (struct component, act_temp.act), + grecs_type_string, GRECS_DFLT, + NULL, offsetof (struct component, act_temp.act), _cb_action, }, {"notify", N_("arg: emails"), N_("Notify this address when a component terminates."), - grecs_type_string, NULL, offsetof (struct component, act_temp.addr) + grecs_type_string, GRECS_DFLT, + NULL, offsetof (struct component, act_temp.addr) }, {"message", NULL, N_("Notification message text (with headers)."), - grecs_type_string, NULL, offsetof (struct component, act_temp.message), + grecs_type_string, GRECS_DFLT, + NULL, offsetof (struct component, act_temp.message), NULL}, {"exec", NULL, N_("Execute this command."), - grecs_type_string, NULL, - offsetof (struct component, act_temp.command), + grecs_type_string, GRECS_DFLT, + NULL, offsetof (struct component, act_temp.command), NULL, }, {NULL} @@ -326,9 +332,9 @@ static struct tokendef sig_tokendef[] = { static struct action * create_action (struct component *comp, - grecs_locus_t *locus, - grecs_value_t *val, int argc, - const char *(*getarg) (grecs_value_t *, int, grecs_locus_t *)) + grecs_locus_t *locus, + grecs_value_t *val, int argc, + const char *(*getarg) (grecs_value_t *, int, grecs_locus_t *)) { int i; unsigned *retv; @@ -346,7 +352,7 @@ create_action (struct component *comp, unsigned n; const char *arg = getarg (val, i, locus); size_t len = strlen (arg); - + if (isdigit (arg[0])) { char *p; @@ -381,12 +387,12 @@ create_action (struct component *comp, grecs_error (locus, 0, _("%s: not a return code"), arg); continue; } - + /* Alles in ordnung */ retv[retc++] = n; } } - + if (retc == 0 && !allflag) { free (retv); @@ -442,9 +448,9 @@ _get_list_arg (grecs_value_t *val, int num, grecs_locus_t *locus) static int return_code_section_parser (enum grecs_callback_command cmd, - grecs_locus_t *locus, - void *varptr, - grecs_value_t *value, void *cb_data) + grecs_locus_t *locus, + void *varptr, + grecs_value_t *value, void *cb_data) { struct component *comp = varptr; size_t count; @@ -458,18 +464,18 @@ return_code_section_parser (enum grecs_callback_command cmd, grecs_error (locus, 0, _("missing tag")); return 1; } - + switch (value->type) { case GRECS_TYPE_STRING: act = create_action (comp, locus, value, 1, _get_string_arg); break; - + case GRECS_TYPE_ARRAY: act = create_action (comp, locus, value, value->v.arg.c, _get_array_arg); break; - + case GRECS_TYPE_LIST: count = grecs_list_size (value->v.list); act = create_action (comp, locus, value, count, _get_list_arg); @@ -479,7 +485,7 @@ return_code_section_parser (enum grecs_callback_command cmd, return 1; memset (&comp->act_temp, 0, sizeof (comp->act_temp)); break; - + case grecs_callback_section_end: act = comp->act_tail; act->act = comp->act_temp.act; @@ -500,7 +506,7 @@ config_array_to_argv (grecs_value_t *val, grecs_locus_t *locus, size_t *pargc) int i, j; int argc; char **argv; - + argc = val->v.arg.c; argv = xcalloc (argc + 1, sizeof (argv[0])); for (i = j = 0; i < argc; i++) @@ -517,8 +523,8 @@ config_array_to_argv (grecs_value_t *val, grecs_locus_t *locus, size_t *pargc) static int _cb_command (enum grecs_callback_command cmd, - grecs_locus_t *locus, - void *varptr, grecs_value_t *value, void *cb_data) + grecs_locus_t *locus, + void *varptr, grecs_value_t *value, void *cb_data) { struct component *comp = varptr; struct wordsplit ws; @@ -534,7 +540,7 @@ _cb_command (enum grecs_callback_command cmd, comp->argc = ws.ws_wordc; comp->argv = ws.ws_wordv; break; - + case GRECS_TYPE_ARRAY: comp->argv = config_array_to_argv (value, locus, &comp->argc); break; @@ -548,8 +554,8 @@ _cb_command (enum grecs_callback_command cmd, static int _cb_umask (enum grecs_callback_command cmd, - grecs_locus_t *locus, - void *varptr, grecs_value_t *value, void *cb_data) + grecs_locus_t *locus, + void *varptr, grecs_value_t *value, void *cb_data) { mode_t *pmode = varptr; char *p; @@ -570,8 +576,8 @@ _cb_umask (enum grecs_callback_command cmd, static int _cb_env (enum grecs_callback_command cmd, - grecs_locus_t *locus, - void *varptr, grecs_value_t *value, void *cb_data) + grecs_locus_t *locus, + void *varptr, grecs_value_t *value, void *cb_data) { int argc; char **argv; @@ -655,8 +661,8 @@ string_to_syslog_facility (const char *key, int *pres) static int cb_syslog_facility (enum grecs_callback_command cmd, - grecs_locus_t *locus, - void *varptr, grecs_value_t *value, void *cb_data) + grecs_locus_t *locus, + void *varptr, grecs_value_t *value, void *cb_data) { const char *str; @@ -680,8 +686,8 @@ cb_syslog_facility (enum grecs_callback_command cmd, static int _cb_redir (enum grecs_callback_command cmd, - grecs_locus_t *locus, - void *varptr, grecs_value_t *value, void *cb_data) + grecs_locus_t *locus, + void *varptr, grecs_value_t *value, void *cb_data) { struct redirector *rp = varptr; static struct tokendef redirtab[] = { @@ -691,7 +697,7 @@ _cb_redir (enum grecs_callback_command cmd, {NULL} }; int res; - + switch (value->type) { case GRECS_TYPE_STRING: @@ -708,7 +714,7 @@ _cb_redir (enum grecs_callback_command cmd, return 0; } break; - + case GRECS_TYPE_ARRAY: if (assert_grecs_value_type (locus, value->v.arg.v[0], GRECS_TYPE_STRING)) @@ -728,12 +734,12 @@ _cb_redir (enum grecs_callback_command cmd, if (assert_grecs_value_type (locus, value->v.arg.v[1], GRECS_TYPE_STRING)) return 0; - + switch (res) { case redir_null: break; - + case redir_syslog: if (string_to_syslog_priority (value->v.arg.v[1]->v.string, &rp->v.prio)) @@ -744,7 +750,7 @@ _cb_redir (enum grecs_callback_command cmd, return 0; } break; - + case redir_file: rp->v.file = xstrdup (value->v.arg.v[1]->v.string); break; @@ -753,18 +759,18 @@ _cb_redir (enum grecs_callback_command cmd, rp->type = res; } break; - + default: grecs_error (locus, 0, _("unexpected list")); } - + return 0; } static int _cb_url (enum grecs_callback_command cmd, - grecs_locus_t *locus, - void *varptr, grecs_value_t *value, void *cb_data) + grecs_locus_t *locus, + void *varptr, grecs_value_t *value, void *cb_data) { struct pies_url *url; @@ -774,7 +780,7 @@ _cb_url (enum grecs_callback_command cmd, if (pies_url_create (&url, value->v.string)) { grecs_error (locus, 0, _("%s: cannot create URL: %s"), - value->v.string, strerror (errno)); + value->v.string, strerror (errno)); return 0; } *(struct pies_url **) varptr = url; @@ -807,8 +813,8 @@ socket_type_to_str (int socket_type, const char **pres) static int _cb_socket_type (enum grecs_callback_command cmd, - grecs_locus_t *locus, - void *varptr, grecs_value_t *value, void *cb_data) + grecs_locus_t *locus, + void *varptr, grecs_value_t *value, void *cb_data) { if (assert_scalar_stmt (locus, cmd) || assert_grecs_value_type (locus, value, GRECS_TYPE_STRING)) @@ -822,6 +828,7 @@ _cb_socket_type (enum grecs_callback_command cmd, static struct tokendef modetab[] = { {"exec", pies_comp_exec}, {"wait", pies_comp_exec}, + {"once", pies_comp_once}, {"accept", pies_comp_accept}, {"inetd", pies_comp_inetd}, {"nostartaccept", pies_comp_inetd}, @@ -832,8 +839,8 @@ static struct tokendef modetab[] = { static int _cb_mode (enum grecs_callback_command cmd, - grecs_locus_t *locus, - void *varptr, grecs_value_t *value, void *cb_data) + grecs_locus_t *locus, + void *varptr, grecs_value_t *value, void *cb_data) { int res; @@ -849,8 +856,8 @@ _cb_mode (enum grecs_callback_command cmd, static int _cb_limits (enum grecs_callback_command cmd, - grecs_locus_t *locus, - void *varptr, grecs_value_t *value, void *cb_data) + grecs_locus_t *locus, + void *varptr, grecs_value_t *value, void *cb_data) { limits_record_t *plrec = varptr; char *p; @@ -882,7 +889,7 @@ str_to_cf (const char *string, int *flags) { "siggroup", CF_SIGGROUP }, { NULL } }; - + if (len > 2 && memcmp (string, "no", 2) == 0) { neg++; @@ -901,11 +908,11 @@ str_to_cf (const char *string, int *flags) static int _cb_flags (enum grecs_callback_command cmd, - grecs_locus_t *locus, - void *varptr, grecs_value_t *value, void *cb_data) + grecs_locus_t *locus, + void *varptr, grecs_value_t *value, void *cb_data) { int *flags = varptr; - + switch (value->type) { case GRECS_TYPE_STRING: @@ -915,11 +922,11 @@ _cb_flags (enum grecs_callback_command cmd, return 1; } break; - + case GRECS_TYPE_LIST: { struct grecs_list_entry *ep; - + for (ep = value->v.list->head; ep; ep = ep->next) { const grecs_value_t *vp = ep->data; @@ -934,7 +941,7 @@ _cb_flags (enum grecs_callback_command cmd, } } break; - + case GRECS_TYPE_ARRAY: grecs_error (locus, 0, _("too many arguments")); return 1; @@ -942,6 +949,53 @@ _cb_flags (enum grecs_callback_command cmd, return 0; } +static const char valid_runlevels[] = "0123456Ss"; + +static int +_cb_initdefault (enum grecs_callback_command cmd, + grecs_locus_t *locus, + void *varptr, grecs_value_t *value, void *cb_data) +{ + int *val = varptr; + + if (assert_grecs_value_type (locus, value, GRECS_TYPE_STRING)) + return 1; + if (strlen (value->v.string) != 1) + { + grecs_error (locus, 0, _("argument must be a single character")); + return 1; + } + if (!strchr (valid_runlevels, value->v.string[0])) + { + grecs_error (locus, 0, _("not a valid runlevel")); + return 1; + } + *val = toupper (value->v.string[0]); + return 0; +} + +static int +_cb_runlevels (enum grecs_callback_command cmd, + grecs_locus_t *locus, + void *varptr, grecs_value_t *value, void *cb_data) +{ + char **sptr = varptr, *p; + + if (assert_grecs_value_type (locus, value, GRECS_TYPE_STRING)) + return 1; + for (p = value->v.string; *p; p++) + { + if (!strchr (valid_runlevels, *p)) + { + grecs_error (locus, 0, _("not a valid runlevel: %c")); + return 1; + } + } + *sptr = grecs_strdup(value->v.string); + for (p = *sptr; *p; p++) + *p = toupper (*p); + return 0; +} struct grecs_keyword component_keywords[] = { {"mode", @@ -950,119 +1004,130 @@ struct grecs_keyword component_keywords[] = { N_ ("mode: {exec | wait | accept | inetd | nostartaccept | pass-fd | pass}"), N_("Component execution mode."), - grecs_type_string, NULL, offsetof (struct component, mode), + grecs_type_string, GRECS_DFLT, + NULL, offsetof (struct component, mode), _cb_mode, }, {"program", NULL, N_("Full name of the program."), - grecs_type_string, NULL, - offsetof (struct component, program), + grecs_type_string, GRECS_DFLT, + NULL, offsetof (struct component, program), NULL, }, {"command", NULL, N_("Command line."), - grecs_type_string, NULL, 0, + grecs_type_string, GRECS_DFLT, + NULL, 0, _cb_command, }, {"prerequisites", N_("list"), N_("List of prerequisites."), - grecs_type_string | GRECS_LIST, NULL, offsetof (struct component, prereq), + grecs_type_string, GRECS_LIST, NULL, offsetof (struct component, prereq), NULL, }, {"dependents", N_("list"), N_("List of components for which this one is a prerequisite."), - grecs_type_string | GRECS_LIST, NULL, offsetof (struct component, depend), + grecs_type_string, GRECS_LIST, NULL, offsetof (struct component, depend), NULL, }, {"flags", N_("list"), N_("List of flags."), - grecs_type_string | GRECS_LIST, NULL, offsetof (struct component, flags), + grecs_type_string, GRECS_LIST, NULL, offsetof (struct component, flags), _cb_flags }, + {"runlevels", + N_("chars"), + N_("Runlevels to start that component in."), + grecs_type_string, GRECS_DFLT, + NULL, offsetof (struct component, runlevels), + _cb_runlevels }, {"pass-fd-timeout", NULL, N_("Time to wait for pass-fd socket to become available."), - grecs_type_uint, NULL, - offsetof (struct component, pass_fd_timeout), + grecs_type_uint, GRECS_DFLT, + NULL, offsetof (struct component, pass_fd_timeout), NULL, }, {"max-instances", NULL, N_("Maximum number of running instances."), - grecs_type_size, NULL, - offsetof (struct component, max_instances), + grecs_type_size, GRECS_DFLT, + NULL, offsetof (struct component, max_instances), NULL }, {"max-instances-message", NULL, N_("Text to send back if max-instances is reached (inetd-components only)."), - grecs_type_string, NULL, - offsetof (struct component, max_instances_message), + grecs_type_string, GRECS_DFLT, + NULL, offsetof (struct component, max_instances_message), NULL }, {"max-ip-connections", NULL, N_("Maximum number of simultaneous connections per IP address (inetd only)."), - grecs_type_size, NULL, - offsetof (struct component, max_ip_connections), + grecs_type_size, GRECS_DFLT, + NULL, offsetof (struct component, max_ip_connections), NULL }, {"max-ip-connections-message", NULL, N_("Text to send back if max-ip-connections-message is reached (inetd only)."), - grecs_type_string, NULL, - offsetof (struct component, max_ip_connections_message), + grecs_type_string, GRECS_DFLT, + NULL, offsetof (struct component, max_ip_connections_message), NULL }, - + {"max-rate", NULL, N_("Maximum number of times an inetd component can be invoked in one minute."), - grecs_type_size, NULL, - offsetof (struct component, max_rate), + grecs_type_size, GRECS_DFLT, + NULL, offsetof (struct component, max_rate), NULL }, {"socket", N_("url: string"), N_("Listen on the given url."), - grecs_type_string, NULL, - offsetof (struct component, socket_url), + grecs_type_string, GRECS_DFLT, + NULL, offsetof (struct component, socket_url), _cb_url, }, {"socket-type", /* TRANSLATORS: words after `type:' are keywords. */ N_("type: {stream | dgram | raw | rdm | seqpacket}"), N_("Set socket type."), - grecs_type_int, NULL, - offsetof (struct component, socket_type), + grecs_type_int, GRECS_DFLT, + NULL, offsetof (struct component, socket_type), _cb_socket_type }, {"pass-fd-socket", N_("name"), N_("Pass fd through this socket."), - grecs_type_string, NULL, - offsetof (struct component, pass_fd_socket), + grecs_type_string, GRECS_DFLT, + NULL, offsetof (struct component, pass_fd_socket), NULL, }, {"acl", N_("name: string"), N_("Set ACL."), - grecs_type_section, NULL, offsetof (struct component, acl), + grecs_type_section, GRECS_DFLT, + NULL, offsetof (struct component, acl), acl_section_parser, NULL, acl_keywords}, {"access-denied-message", NULL, N_("Text to send back if access is denied (inetd-components only)."), - grecs_type_string, NULL, - offsetof (struct component, access_denied_message), + grecs_type_string, GRECS_DFLT, + NULL, offsetof (struct component, access_denied_message), NULL }, {"remove-file", N_("file"), N_("Remove file before starting the component."), - grecs_type_string, NULL, offsetof (struct component, rmfile), + grecs_type_string, GRECS_DFLT, + NULL, offsetof (struct component, rmfile), NULL, }, {"facility", N_("arg"), N_("Override default syslog facility for this component."), - grecs_type_string, NULL, offsetof (struct component, facility), + grecs_type_string, GRECS_DFLT, + NULL, offsetof (struct component, facility), cb_syslog_facility, }, {"stdout", @@ -1070,7 +1135,8 @@ struct grecs_keyword component_keywords[] = { N_("type: {file | syslog}> <channel: string"), N_("Redirect program's standard output to the given file or " "syslog priority."), - grecs_type_string, NULL, offsetof (struct component, redir[RETR_OUT]), + grecs_type_string, GRECS_DFLT, + NULL, offsetof (struct component, redir[RETR_OUT]), _cb_redir, }, {"stderr", @@ -1078,67 +1144,77 @@ struct grecs_keyword component_keywords[] = { N_("type: {file | syslog}> <channel: string"), N_("Redirect program's standard error to the given file or " "syslog priority."), - grecs_type_string, NULL, offsetof (struct component, redir[RETR_ERR]), + grecs_type_string, GRECS_DFLT, + NULL, offsetof (struct component, redir[RETR_ERR]), _cb_redir, }, {"user", NULL, N_("Run with this user privileges."), - grecs_type_string, NULL, offsetof (struct component, privs.user), + grecs_type_string, GRECS_DFLT, + NULL, offsetof (struct component, privs.user), NULL, }, {"group", NULL, N_("Retain supplementary group."), - grecs_type_string | GRECS_LIST, NULL, offsetof (struct component, - privs.groups), + grecs_type_string, GRECS_LIST, + NULL, offsetof (struct component, privs.groups), NULL, }, {"allgroups", NULL, N_("Retain all supplementary groups of which user is a member."), - grecs_type_bool, NULL, offsetof (struct component, privs.allgroups), + grecs_type_bool, GRECS_DFLT, + NULL, offsetof (struct component, privs.allgroups), NULL, }, {"umask", N_("arg: number"), N_("Force this umask."), - grecs_type_string, NULL, offsetof (struct component, umask), + grecs_type_string, GRECS_DFLT, + NULL, offsetof (struct component, umask), _cb_umask, }, {"limits", NULL, N_("Set system limits"), - grecs_type_string, NULL, offsetof (struct component, limits), + grecs_type_string, GRECS_DFLT, + NULL, offsetof (struct component, limits), _cb_limits, }, {"env", N_("arg: list"), N_("Set program environment. Argument is a list of assignments " "separated by white space."), - grecs_type_string, NULL, offsetof (struct component, env), + grecs_type_string, GRECS_DFLT, + NULL, offsetof (struct component, env), _cb_env, }, {"chdir", N_("dir"), N_("Change to this directory before executing the component."), - grecs_type_string, NULL, offsetof (struct component, dir), + grecs_type_string, GRECS_DFLT, + NULL, offsetof (struct component, dir), NULL, }, {"return-code", N_("tag: exit-code-list"), N_("Define what to do when the component finishes."), - grecs_type_section, NULL, 0, + grecs_type_section, GRECS_DFLT, + NULL, 0, return_code_section_parser, NULL, return_code_keywords}, {"service", N_("name"), N_("Service name for inetd component."), - grecs_type_string, NULL, offsetof (struct component, service), + grecs_type_string, GRECS_DFLT, + NULL, offsetof (struct component, service), NULL }, {"tcpmux-master", N_("tag"), N_("Tag of master TCPMUX component."), - grecs_type_string, NULL, offsetof (struct component, tcpmux), + grecs_type_string, GRECS_DFLT, + NULL, offsetof (struct component, tcpmux), NULL }, {NULL} }; @@ -1210,7 +1286,7 @@ component_verify (struct component *comp, grecs_locus_t *locus) else if (!comp->argv) COMPERR (grecs_error, "%s", _("missing command line")); - + if (ISCF_TCPMUX (comp->flags)) { comp->mode = pies_comp_inetd; @@ -1234,7 +1310,7 @@ component_verify (struct component *comp, grecs_locus_t *locus) COMPERR (grecs_error, "%s", _("socket ignored: wrong mode")); break; - + case pies_comp_pass_fd: if (!comp->pass_fd_socket) COMPERR (grecs_error, @@ -1253,7 +1329,7 @@ component_verify (struct component *comp, grecs_locus_t *locus) "file name or chdir must be specified")); } /* Fall through */ - + case pies_comp_accept: if (!comp->socket_url) { @@ -1306,7 +1382,7 @@ component_verify (struct component *comp, grecs_locus_t *locus) COMPERR (grecs_error, "%s", _("wait is useless in this mode")); comp->flags &= ~CF_WAIT; } - + if (comp->mode != pies_comp_exec && comp->redir[RETR_OUT].type != redir_null) { @@ -1314,7 +1390,7 @@ component_verify (struct component *comp, grecs_locus_t *locus) "%s", _("stdout translation invalid in this mode")); comp->redir[RETR_OUT].type = redir_null; } - + for (i = RETR_OUT; i <= RETR_ERR; i++) { if (comp->redir[i].type == redir_file @@ -1333,7 +1409,7 @@ component_verify (struct component *comp, grecs_locus_t *locus) comp->redir[i].v.file); } } - + return header; #undef COMPERR } @@ -1401,14 +1477,17 @@ static struct grecs_keyword syslog_kw[] = { N_("Set syslog facility. Arg is one of the following: user, daemon, " "auth, authpriv, mail, cron, local0 through local7 (case-insensitive), " "or a facility number."), - grecs_type_string, &log_facility, 0, cb_syslog_facility}, + grecs_type_string, GRECS_DFLT, + &log_facility, 0, cb_syslog_facility}, {"tag", N_("string"), N_("Tag syslog messages with this string"), - grecs_type_string, &log_tag}, + grecs_type_string, GRECS_DFLT, + &log_tag}, #if 0 /* This is reserved for future use */ { "print-priority", N_("arg"), N_("Prefix each message with its priority"), - grecs_type_bool, &syslog_include_prio}, + grecs_type_bool, GRECS_DFLT, + &syslog_include_prio}, #endif {NULL}, }; @@ -1441,124 +1520,153 @@ struct grecs_keyword pies_keywords[] = { {"component", N_("tag: string"), N_("Define a component"), - grecs_type_section, NULL, 0, + grecs_type_section, GRECS_DFLT, + NULL, 0, component_section_parser, NULL, component_keywords}, {"syslog", NULL, N_("Configure syslog logging"), - grecs_type_section, NULL, 0, NULL, NULL, syslog_kw}, + grecs_type_section, GRECS_DFLT, + NULL, 0, NULL, NULL, syslog_kw}, {"debug", NULL, N_("Set debug verbosity level."), - grecs_type_uint, &debug_level, 0, NULL}, + grecs_type_uint, GRECS_DFLT, + &debug_level, 0, NULL}, {"source-info", NULL, N_("Show source info with debugging messages."), - grecs_type_bool, &source_info_option, 0, NULL}, + grecs_type_bool, GRECS_DFLT, + &source_info_option, 0, NULL}, {"state-directory", NULL, N_("Full file name of the program state directory."), - grecs_type_string, &statedir, 0, NULL}, + grecs_type_string, GRECS_DFLT, + &statedir, 0, NULL}, {"pidfile", NULL, N_("Write PID to this file."), - grecs_type_string, &pidfile, 0, + grecs_type_string, GRECS_DFLT, + &pidfile, 0, NULL, }, {"control-file", NULL, N_("Set location of the control file."), - grecs_type_string, &ctlfile, 0, + grecs_type_string, GRECS_DFLT, + &ctlfile, 0, NULL, }, {"stat-file", NULL, N_("Set location of the statistics output file."), - grecs_type_string, &statfile, 0, + grecs_type_string, GRECS_DFLT, + &statfile, 0, NULL, }, {"qotd-file", NULL, N_("Set location of the QOTD file."), - grecs_type_string, &qotdfile, 0, + grecs_type_string, GRECS_DFLT, + &qotdfile, 0, NULL }, {"user", NULL, N_("Run with this user privileges."), - grecs_type_string, &pies_privs.user, 0, + grecs_type_string, GRECS_DFLT, + &pies_privs.user, 0, NULL, }, {"group", NULL, N_("Retain supplementary group."), - grecs_type_string | GRECS_LIST, &pies_privs.groups, 0, + grecs_type_string, GRECS_LIST, + &pies_privs.groups, 0, NULL, }, {"allgroups", NULL, N_("Retain all supplementary groups of which user is a member."), - grecs_type_bool, &pies_privs.allgroups, 0, + grecs_type_bool, GRECS_DFLT, + &pies_privs.allgroups, 0, NULL, }, {"umask", N_("arg: number"), N_("Force this umask."), - grecs_type_string, &pies_umask, 0, + grecs_type_string, GRECS_DFLT, + &pies_umask, 0, _cb_umask, }, {"limits", NULL, N_("Set global system limits."), - grecs_type_string, &pies_limits, 0, _cb_limits, + grecs_type_string, GRECS_DFLT, + &pies_limits, 0, _cb_limits, }, + {"initdefault", + N_("arg: char"), + N_("Default runlevel"), + grecs_type_string, GRECS_DFLT, + &initdefault, 0, _cb_initdefault, + }, {"shutdown-timeout", "n", N_("Wait <n> seconds for all components to shut down."), - grecs_type_uint, &shutdown_timeout, 0, + grecs_type_uint, GRECS_DFLT, + &shutdown_timeout, 0, NULL, }, {"return-code", N_("tag: exit-code-list"), N_("Define what to do when the component finishes."), - grecs_type_section, &default_component, 0, + grecs_type_section, GRECS_DFLT, + &default_component, 0, return_code_section_parser, NULL, return_code_keywords}, {"acl", N_("name: string"), N_("Set global ACL."), - grecs_type_section, &pies_acl, 0, |