1012 lines
30 KiB
C++
1012 lines
30 KiB
C++
/*
|
|
* Copyright (C) 2010 The Android Open Source Project
|
|
*
|
|
* 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.
|
|
*/
|
|
|
|
#include <ctype.h>
|
|
#include <errno.h>
|
|
#include <fcntl.h>
|
|
#include <inttypes.h>
|
|
#include <stdarg.h>
|
|
#include <stddef.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <unistd.h>
|
|
|
|
#include "init.h"
|
|
#include "parser.h"
|
|
#include "init_parser.h"
|
|
#include "log.h"
|
|
#include "property_service.h"
|
|
#include "util.h"
|
|
|
|
#include <cutils/iosched_policy.h>
|
|
#include <cutils/list.h>
|
|
|
|
static list_declare(service_list);
|
|
static list_declare(action_list);
|
|
static list_declare(action_queue);
|
|
|
|
struct import {
|
|
struct listnode list;
|
|
const char *filename;
|
|
};
|
|
|
|
static void *parse_service(struct parse_state *state, int nargs, char **args);
|
|
static void parse_line_service(struct parse_state *state, int nargs, char **args);
|
|
|
|
static void *parse_action(struct parse_state *state, int nargs, char **args);
|
|
static void parse_line_action(struct parse_state *state, int nargs, char **args);
|
|
|
|
#define SECTION 0x01
|
|
#define COMMAND 0x02
|
|
#define OPTION 0x04
|
|
|
|
#include "keywords.h"
|
|
|
|
#define KEYWORD(symbol, flags, nargs, func) \
|
|
[ K_##symbol ] = { #symbol, func, nargs + 1, flags, },
|
|
|
|
static struct {
|
|
const char *name;
|
|
int (*func)(int nargs, char **args);
|
|
unsigned char nargs;
|
|
unsigned char flags;
|
|
} keyword_info[KEYWORD_COUNT] = {
|
|
[ K_UNKNOWN ] = { "unknown", 0, 0, 0 },
|
|
#include "keywords.h"
|
|
};
|
|
#undef KEYWORD
|
|
|
|
#define kw_is(kw, type) (keyword_info[kw].flags & (type))
|
|
#define kw_name(kw) (keyword_info[kw].name)
|
|
#define kw_func(kw) (keyword_info[kw].func)
|
|
#define kw_nargs(kw) (keyword_info[kw].nargs)
|
|
|
|
void dump_parser_state() {
|
|
if (false) {
|
|
struct listnode* node;
|
|
list_for_each(node, &service_list) {
|
|
service* svc = node_to_item(node, struct service, slist);
|
|
INFO("service %s\n", svc->name);
|
|
INFO(" class '%s'\n", svc->classname);
|
|
INFO(" exec");
|
|
for (int n = 0; n < svc->nargs; n++) {
|
|
INFO(" '%s'", svc->args[n]);
|
|
}
|
|
INFO("\n");
|
|
for (socketinfo* si = svc->sockets; si; si = si->next) {
|
|
INFO(" socket %s %s 0%o\n", si->name, si->type, si->perm);
|
|
}
|
|
}
|
|
|
|
list_for_each(node, &action_list) {
|
|
action* act = node_to_item(node, struct action, alist);
|
|
INFO("on ");
|
|
char name_str[256] = "";
|
|
build_triggers_string(name_str, sizeof(name_str), act);
|
|
INFO("%s", name_str);
|
|
INFO("\n");
|
|
|
|
struct listnode* node2;
|
|
list_for_each(node2, &act->commands) {
|
|
command* cmd = node_to_item(node2, struct command, clist);
|
|
INFO(" %p", cmd->func);
|
|
for (int n = 0; n < cmd->nargs; n++) {
|
|
INFO(" %s", cmd->args[n]);
|
|
}
|
|
INFO("\n");
|
|
}
|
|
INFO("\n");
|
|
}
|
|
}
|
|
}
|
|
|
|
static int lookup_keyword(const char *s)
|
|
{
|
|
switch (*s++) {
|
|
case 'b':
|
|
if (!strcmp(s, "ootchart_init")) return K_bootchart_init;
|
|
break;
|
|
case 'c':
|
|
if (!strcmp(s, "opy")) return K_copy;
|
|
if (!strcmp(s, "lass")) return K_class;
|
|
if (!strcmp(s, "lass_start")) return K_class_start;
|
|
if (!strcmp(s, "lass_stop")) return K_class_stop;
|
|
if (!strcmp(s, "lass_reset")) return K_class_reset;
|
|
if (!strcmp(s, "onsole")) return K_console;
|
|
if (!strcmp(s, "hown")) return K_chown;
|
|
if (!strcmp(s, "hmod")) return K_chmod;
|
|
if (!strcmp(s, "ritical")) return K_critical;
|
|
break;
|
|
case 'd':
|
|
if (!strcmp(s, "isabled")) return K_disabled;
|
|
if (!strcmp(s, "omainname")) return K_domainname;
|
|
break;
|
|
case 'e':
|
|
if (!strcmp(s, "nable")) return K_enable;
|
|
if (!strcmp(s, "xec")) return K_exec;
|
|
if (!strcmp(s, "xport")) return K_export;
|
|
break;
|
|
case 'g':
|
|
if (!strcmp(s, "roup")) return K_group;
|
|
break;
|
|
case 'h':
|
|
if (!strcmp(s, "ostname")) return K_hostname;
|
|
break;
|
|
case 'i':
|
|
if (!strcmp(s, "oprio")) return K_ioprio;
|
|
if (!strcmp(s, "fup")) return K_ifup;
|
|
if (!strcmp(s, "nsmod")) return K_insmod;
|
|
if (!strcmp(s, "mport")) return K_import;
|
|
if (!strcmp(s, "nstallkey")) return K_installkey;
|
|
break;
|
|
case 'k':
|
|
if (!strcmp(s, "eycodes")) return K_keycodes;
|
|
break;
|
|
case 'l':
|
|
if (!strcmp(s, "oglevel")) return K_loglevel;
|
|
if (!strcmp(s, "oad_persist_props")) return K_load_persist_props;
|
|
if (!strcmp(s, "oad_system_props")) return K_load_system_props;
|
|
break;
|
|
case 'm':
|
|
if (!strcmp(s, "kdir")) return K_mkdir;
|
|
if (!strcmp(s, "ount_all")) return K_mount_all;
|
|
if (!strcmp(s, "ount")) return K_mount;
|
|
break;
|
|
case 'o':
|
|
if (!strcmp(s, "n")) return K_on;
|
|
if (!strcmp(s, "neshot")) return K_oneshot;
|
|
if (!strcmp(s, "nrestart")) return K_onrestart;
|
|
break;
|
|
case 'p':
|
|
if (!strcmp(s, "owerctl")) return K_powerctl;
|
|
break;
|
|
case 'r':
|
|
if (!strcmp(s, "estart")) return K_restart;
|
|
if (!strcmp(s, "estorecon")) return K_restorecon;
|
|
if (!strcmp(s, "estorecon_recursive")) return K_restorecon_recursive;
|
|
if (!strcmp(s, "mdir")) return K_rmdir;
|
|
if (!strcmp(s, "m")) return K_rm;
|
|
break;
|
|
case 's':
|
|
if (!strcmp(s, "eclabel")) return K_seclabel;
|
|
if (!strcmp(s, "ervice")) return K_service;
|
|
if (!strcmp(s, "etenv")) return K_setenv;
|
|
if (!strcmp(s, "etprop")) return K_setprop;
|
|
if (!strcmp(s, "etrlimit")) return K_setrlimit;
|
|
if (!strcmp(s, "ocket")) return K_socket;
|
|
if (!strcmp(s, "tart")) return K_start;
|
|
if (!strcmp(s, "top")) return K_stop;
|
|
if (!strcmp(s, "wapon_all")) return K_swapon_all;
|
|
if (!strcmp(s, "ymlink")) return K_symlink;
|
|
if (!strcmp(s, "ysclktz")) return K_sysclktz;
|
|
break;
|
|
case 't':
|
|
if (!strcmp(s, "rigger")) return K_trigger;
|
|
break;
|
|
case 'u':
|
|
if (!strcmp(s, "ser")) return K_user;
|
|
break;
|
|
case 'v':
|
|
if (!strcmp(s, "erity_load_state")) return K_verity_load_state;
|
|
if (!strcmp(s, "erity_update_state")) return K_verity_update_state;
|
|
break;
|
|
case 'w':
|
|
if (!strcmp(s, "rite")) return K_write;
|
|
if (!strcmp(s, "ritepid")) return K_writepid;
|
|
if (!strcmp(s, "ait")) return K_wait;
|
|
break;
|
|
}
|
|
return K_UNKNOWN;
|
|
}
|
|
|
|
static void parse_line_no_op(struct parse_state*, int, char**) {
|
|
}
|
|
|
|
static int push_chars(char **dst, int *len, const char *chars, int cnt)
|
|
{
|
|
if (cnt > *len)
|
|
return -1;
|
|
|
|
memcpy(*dst, chars, cnt);
|
|
*dst += cnt;
|
|
*len -= cnt;
|
|
|
|
return 0;
|
|
}
|
|
|
|
int expand_props(char *dst, const char *src, int dst_size)
|
|
{
|
|
char *dst_ptr = dst;
|
|
const char *src_ptr = src;
|
|
int ret = 0;
|
|
int left = dst_size - 1;
|
|
|
|
if (!src || !dst || dst_size == 0)
|
|
return -1;
|
|
|
|
/* - variables can either be $x.y or ${x.y}, in case they are only part
|
|
* of the string.
|
|
* - will accept $$ as a literal $.
|
|
* - no nested property expansion, i.e. ${foo.${bar}} is not supported,
|
|
* bad things will happen
|
|
*/
|
|
while (*src_ptr && left > 0) {
|
|
char *c;
|
|
char prop[PROP_NAME_MAX + 1];
|
|
char prop_val[PROP_VALUE_MAX];
|
|
int prop_len = 0;
|
|
int prop_val_len;
|
|
|
|
c = strchr(src_ptr, '$');
|
|
if (!c) {
|
|
while (left-- > 0 && *src_ptr)
|
|
*(dst_ptr++) = *(src_ptr++);
|
|
break;
|
|
}
|
|
|
|
memset(prop, 0, sizeof(prop));
|
|
|
|
ret = push_chars(&dst_ptr, &left, src_ptr, c - src_ptr);
|
|
if (ret < 0)
|
|
goto err_nospace;
|
|
c++;
|
|
|
|
if (*c == '$') {
|
|
*(dst_ptr++) = *(c++);
|
|
src_ptr = c;
|
|
left--;
|
|
continue;
|
|
} else if (*c == '\0') {
|
|
break;
|
|
}
|
|
|
|
if (*c == '{') {
|
|
c++;
|
|
while (*c && *c != '}' && prop_len < PROP_NAME_MAX)
|
|
prop[prop_len++] = *(c++);
|
|
if (*c != '}') {
|
|
/* failed to find closing brace, abort. */
|
|
if (prop_len == PROP_NAME_MAX)
|
|
ERROR("prop name too long during expansion of '%s'\n",
|
|
src);
|
|
else if (*c == '\0')
|
|
ERROR("unexpected end of string in '%s', looking for }\n",
|
|
src);
|
|
goto err;
|
|
}
|
|
prop[prop_len] = '\0';
|
|
c++;
|
|
} else if (*c) {
|
|
while (*c && prop_len < PROP_NAME_MAX)
|
|
prop[prop_len++] = *(c++);
|
|
if (prop_len == PROP_NAME_MAX && *c != '\0') {
|
|
ERROR("prop name too long in '%s'\n", src);
|
|
goto err;
|
|
}
|
|
prop[prop_len] = '\0';
|
|
ERROR("using deprecated syntax for specifying property '%s', use ${name} instead\n",
|
|
prop);
|
|
}
|
|
|
|
if (prop_len == 0) {
|
|
ERROR("invalid zero-length prop name in '%s'\n", src);
|
|
goto err;
|
|
}
|
|
|
|
prop_val_len = property_get(prop, prop_val);
|
|
if (!prop_val_len) {
|
|
ERROR("property '%s' doesn't exist while expanding '%s'\n",
|
|
prop, src);
|
|
goto err;
|
|
}
|
|
|
|
ret = push_chars(&dst_ptr, &left, prop_val, prop_val_len);
|
|
if (ret < 0)
|
|
goto err_nospace;
|
|
src_ptr = c;
|
|
continue;
|
|
}
|
|
|
|
*dst_ptr = '\0';
|
|
return 0;
|
|
|
|
err_nospace:
|
|
ERROR("destination buffer overflow while expanding '%s'\n", src);
|
|
err:
|
|
return -1;
|
|
}
|
|
|
|
static void parse_import(struct parse_state *state, int nargs, char **args)
|
|
{
|
|
struct listnode *import_list = (listnode*) state->priv;
|
|
char conf_file[PATH_MAX];
|
|
int ret;
|
|
|
|
if (nargs != 2) {
|
|
ERROR("single argument needed for import\n");
|
|
return;
|
|
}
|
|
|
|
ret = expand_props(conf_file, args[1], sizeof(conf_file));
|
|
if (ret) {
|
|
ERROR("error while handling import on line '%d' in '%s'\n",
|
|
state->line, state->filename);
|
|
return;
|
|
}
|
|
|
|
struct import* import = (struct import*) calloc(1, sizeof(struct import));
|
|
import->filename = strdup(conf_file);
|
|
list_add_tail(import_list, &import->list);
|
|
INFO("Added '%s' to import list\n", import->filename);
|
|
}
|
|
|
|
static void parse_new_section(struct parse_state *state, int kw,
|
|
int nargs, char **args)
|
|
{
|
|
printf("[ %s %s ]\n", args[0],
|
|
nargs > 1 ? args[1] : "");
|
|
switch(kw) {
|
|
case K_service:
|
|
state->context = parse_service(state, nargs, args);
|
|
if (state->context) {
|
|
state->parse_line = parse_line_service;
|
|
return;
|
|
}
|
|
break;
|
|
case K_on:
|
|
state->context = parse_action(state, nargs, args);
|
|
if (state->context) {
|
|
state->parse_line = parse_line_action;
|
|
return;
|
|
}
|
|
break;
|
|
case K_import:
|
|
parse_import(state, nargs, args);
|
|
break;
|
|
}
|
|
state->parse_line = parse_line_no_op;
|
|
}
|
|
|
|
static void parse_config(const char *fn, const std::string& data)
|
|
{
|
|
struct listnode import_list;
|
|
struct listnode *node;
|
|
char *args[INIT_PARSER_MAXARGS];
|
|
|
|
int nargs = 0;
|
|
|
|
parse_state state;
|
|
state.filename = fn;
|
|
state.line = 0;
|
|
state.ptr = strdup(data.c_str()); // TODO: fix this code!
|
|
state.nexttoken = 0;
|
|
state.parse_line = parse_line_no_op;
|
|
|
|
list_init(&import_list);
|
|
state.priv = &import_list;
|
|
|
|
for (;;) {
|
|
switch (next_token(&state)) {
|
|
case T_EOF:
|
|
state.parse_line(&state, 0, 0);
|
|
goto parser_done;
|
|
case T_NEWLINE:
|
|
state.line++;
|
|
if (nargs) {
|
|
int kw = lookup_keyword(args[0]);
|
|
if (kw_is(kw, SECTION)) {
|
|
state.parse_line(&state, 0, 0);
|
|
parse_new_section(&state, kw, nargs, args);
|
|
} else {
|
|
state.parse_line(&state, nargs, args);
|
|
}
|
|
nargs = 0;
|
|
}
|
|
break;
|
|
case T_TEXT:
|
|
if (nargs < INIT_PARSER_MAXARGS) {
|
|
args[nargs++] = state.text;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
|
|
parser_done:
|
|
list_for_each(node, &import_list) {
|
|
struct import* import = node_to_item(node, struct import, list);
|
|
if (!init_parse_config_file(import->filename)) {
|
|
ERROR("could not import file '%s' from '%s': %s\n",
|
|
import->filename, fn, strerror(errno));
|
|
}
|
|
}
|
|
}
|
|
|
|
bool init_parse_config_file(const char* path) {
|
|
INFO("Parsing %s...\n", path);
|
|
Timer t;
|
|
std::string data;
|
|
if (!read_file(path, &data)) {
|
|
return false;
|
|
}
|
|
|
|
data.push_back('\n'); // TODO: fix parse_config.
|
|
parse_config(path, data);
|
|
dump_parser_state();
|
|
|
|
NOTICE("(Parsing %s took %.2fs.)\n", path, t.duration());
|
|
return true;
|
|
}
|
|
|
|
static int valid_name(const char *name)
|
|
{
|
|
if (strlen(name) > 16) {
|
|
return 0;
|
|
}
|
|
while (*name) {
|
|
if (!isalnum(*name) && (*name != '_') && (*name != '-')) {
|
|
return 0;
|
|
}
|
|
name++;
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
struct service *service_find_by_name(const char *name)
|
|
{
|
|
struct listnode *node;
|
|
struct service *svc;
|
|
list_for_each(node, &service_list) {
|
|
svc = node_to_item(node, struct service, slist);
|
|
if (!strcmp(svc->name, name)) {
|
|
return svc;
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
struct service *service_find_by_pid(pid_t pid)
|
|
{
|
|
struct listnode *node;
|
|
struct service *svc;
|
|
list_for_each(node, &service_list) {
|
|
svc = node_to_item(node, struct service, slist);
|
|
if (svc->pid == pid) {
|
|
return svc;
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
struct service *service_find_by_keychord(int keychord_id)
|
|
{
|
|
struct listnode *node;
|
|
struct service *svc;
|
|
list_for_each(node, &service_list) {
|
|
svc = node_to_item(node, struct service, slist);
|
|
if (svc->keychord_id == keychord_id) {
|
|
return svc;
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
void service_for_each(void (*func)(struct service *svc))
|
|
{
|
|
struct listnode *node;
|
|
struct service *svc;
|
|
list_for_each(node, &service_list) {
|
|
svc = node_to_item(node, struct service, slist);
|
|
func(svc);
|
|
}
|
|
}
|
|
|
|
void service_for_each_class(const char *classname,
|
|
void (*func)(struct service *svc))
|
|
{
|
|
struct listnode *node;
|
|
struct service *svc;
|
|
list_for_each(node, &service_list) {
|
|
svc = node_to_item(node, struct service, slist);
|
|
if (!strcmp(svc->classname, classname)) {
|
|
func(svc);
|
|
}
|
|
}
|
|
}
|
|
|
|
void service_for_each_flags(unsigned matchflags,
|
|
void (*func)(struct service *svc))
|
|
{
|
|
struct listnode *node;
|
|
struct service *svc;
|
|
list_for_each(node, &service_list) {
|
|
svc = node_to_item(node, struct service, slist);
|
|
if (svc->flags & matchflags) {
|
|
func(svc);
|
|
}
|
|
}
|
|
}
|
|
|
|
void action_for_each_trigger(const char *trigger,
|
|
void (*func)(struct action *act))
|
|
{
|
|
struct listnode *node, *node2;
|
|
struct action *act;
|
|
struct trigger *cur_trigger;
|
|
|
|
list_for_each(node, &action_list) {
|
|
act = node_to_item(node, struct action, alist);
|
|
list_for_each(node2, &act->triggers) {
|
|
cur_trigger = node_to_item(node2, struct trigger, nlist);
|
|
if (!strcmp(cur_trigger->name, trigger)) {
|
|
func(act);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
void queue_property_triggers(const char *name, const char *value)
|
|
{
|
|
struct listnode *node, *node2;
|
|
struct action *act;
|
|
struct trigger *cur_trigger;
|
|
bool match;
|
|
int name_length;
|
|
|
|
list_for_each(node, &action_list) {
|
|
act = node_to_item(node, struct action, alist);
|
|
match = !name;
|
|
list_for_each(node2, &act->triggers) {
|
|
cur_trigger = node_to_item(node2, struct trigger, nlist);
|
|
if (!strncmp(cur_trigger->name, "property:", strlen("property:"))) {
|
|
const char *test = cur_trigger->name + strlen("property:");
|
|
if (!match) {
|
|
name_length = strlen(name);
|
|
if (!strncmp(name, test, name_length) &&
|
|
test[name_length] == '=' &&
|
|
(!strcmp(test + name_length + 1, value) ||
|
|
!strcmp(test + name_length + 1, "*"))) {
|
|
match = true;
|
|
continue;
|
|
}
|
|
} else {
|
|
const char* equals = strchr(test, '=');
|
|
if (equals) {
|
|
char prop_name[PROP_NAME_MAX + 1];
|
|
char value[PROP_VALUE_MAX];
|
|
int length = equals - test;
|
|
if (length <= PROP_NAME_MAX) {
|
|
int ret;
|
|
memcpy(prop_name, test, length);
|
|
prop_name[length] = 0;
|
|
|
|
/* does the property exist, and match the trigger value? */
|
|
ret = property_get(prop_name, value);
|
|
if (ret > 0 && (!strcmp(equals + 1, value) ||
|
|
!strcmp(equals + 1, "*"))) {
|
|
continue;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
match = false;
|
|
break;
|
|
}
|
|
if (match) {
|
|
action_add_queue_tail(act);
|
|
}
|
|
}
|
|
}
|
|
|
|
void queue_all_property_triggers()
|
|
{
|
|
queue_property_triggers(NULL, NULL);
|
|
}
|
|
|
|
void queue_builtin_action(int (*func)(int nargs, char **args), const char *name)
|
|
{
|
|
action* act = (action*) calloc(1, sizeof(*act));
|
|
trigger* cur_trigger = (trigger*) calloc(1, sizeof(*cur_trigger));
|
|
cur_trigger->name = name;
|
|
list_init(&act->triggers);
|
|
list_add_tail(&act->triggers, &cur_trigger->nlist);
|
|
list_init(&act->commands);
|
|
list_init(&act->qlist);
|
|
|
|
command* cmd = (command*) calloc(1, sizeof(*cmd));
|
|
cmd->func = func;
|
|
cmd->args[0] = const_cast<char*>(name);
|
|
cmd->nargs = 1;
|
|
list_add_tail(&act->commands, &cmd->clist);
|
|
|
|
list_add_tail(&action_list, &act->alist);
|
|
action_add_queue_tail(act);
|
|
}
|
|
|
|
void action_add_queue_tail(struct action *act)
|
|
{
|
|
if (list_empty(&act->qlist)) {
|
|
list_add_tail(&action_queue, &act->qlist);
|
|
}
|
|
}
|
|
|
|
struct action *action_remove_queue_head(void)
|
|
{
|
|
if (list_empty(&action_queue)) {
|
|
return 0;
|
|
} else {
|
|
struct listnode *node = list_head(&action_queue);
|
|
struct action *act = node_to_item(node, struct action, qlist);
|
|
list_remove(node);
|
|
list_init(node);
|
|
return act;
|
|
}
|
|
}
|
|
|
|
int action_queue_empty()
|
|
{
|
|
return list_empty(&action_queue);
|
|
}
|
|
|
|
service* make_exec_oneshot_service(int nargs, char** args) {
|
|
// Parse the arguments: exec [SECLABEL [UID [GID]*] --] COMMAND ARGS...
|
|
// SECLABEL can be a - to denote default
|
|
int command_arg = 1;
|
|
for (int i = 1; i < nargs; ++i) {
|
|
if (strcmp(args[i], "--") == 0) {
|
|
command_arg = i + 1;
|
|
break;
|
|
}
|
|
}
|
|
if (command_arg > 4 + NR_SVC_SUPP_GIDS) {
|
|
ERROR("exec called with too many supplementary group ids\n");
|
|
return NULL;
|
|
}
|
|
|
|
int argc = nargs - command_arg;
|
|
char** argv = (args + command_arg);
|
|
if (argc < 1) {
|
|
ERROR("exec called without command\n");
|
|
return NULL;
|
|
}
|
|
|
|
service* svc = (service*) calloc(1, sizeof(*svc) + sizeof(char*) * argc);
|
|
if (svc == NULL) {
|
|
ERROR("Couldn't allocate service for exec of '%s': %s", argv[0], strerror(errno));
|
|
return NULL;
|
|
}
|
|
|
|
if ((command_arg > 2) && strcmp(args[1], "-")) {
|
|
svc->seclabel = args[1];
|
|
}
|
|
if (command_arg > 3) {
|
|
svc->uid = decode_uid(args[2]);
|
|
}
|
|
if (command_arg > 4) {
|
|
svc->gid = decode_uid(args[3]);
|
|
svc->nr_supp_gids = command_arg - 1 /* -- */ - 4 /* exec SECLABEL UID GID */;
|
|
for (size_t i = 0; i < svc->nr_supp_gids; ++i) {
|
|
svc->supp_gids[i] = decode_uid(args[4 + i]);
|
|
}
|
|
}
|
|
|
|
static int exec_count; // Every service needs a unique name.
|
|
char* name = NULL;
|
|
asprintf(&name, "exec %d (%s)", exec_count++, argv[0]);
|
|
if (name == NULL) {
|
|
ERROR("Couldn't allocate name for exec service '%s'\n", argv[0]);
|
|
free(svc);
|
|
return NULL;
|
|
}
|
|
svc->name = name;
|
|
svc->classname = "default";
|
|
svc->flags = SVC_EXEC | SVC_ONESHOT;
|
|
svc->nargs = argc;
|
|
memcpy(svc->args, argv, sizeof(char*) * svc->nargs);
|
|
svc->args[argc] = NULL;
|
|
list_add_tail(&service_list, &svc->slist);
|
|
return svc;
|
|
}
|
|
|
|
static void *parse_service(struct parse_state *state, int nargs, char **args)
|
|
{
|
|
if (nargs < 3) {
|
|
parse_error(state, "services must have a name and a program\n");
|
|
return 0;
|
|
}
|
|
if (!valid_name(args[1])) {
|
|
parse_error(state, "invalid service name '%s'\n", args[1]);
|
|
return 0;
|
|
}
|
|
|
|
service* svc = (service*) service_find_by_name(args[1]);
|
|
if (svc) {
|
|
parse_error(state, "ignored duplicate definition of service '%s'\n", args[1]);
|
|
return 0;
|
|
}
|
|
|
|
nargs -= 2;
|
|
svc = (service*) calloc(1, sizeof(*svc) + sizeof(char*) * nargs);
|
|
if (!svc) {
|
|
parse_error(state, "out of memory\n");
|
|
return 0;
|
|
}
|
|
svc->name = strdup(args[1]);
|
|
svc->classname = "default";
|
|
memcpy(svc->args, args + 2, sizeof(char*) * nargs);
|
|
trigger* cur_trigger = (trigger*) calloc(1, sizeof(*cur_trigger));
|
|
svc->args[nargs] = 0;
|
|
svc->nargs = nargs;
|
|
list_init(&svc->onrestart.triggers);
|
|
cur_trigger->name = "onrestart";
|
|
list_add_tail(&svc->onrestart.triggers, &cur_trigger->nlist);
|
|
list_init(&svc->onrestart.commands);
|
|
list_add_tail(&service_list, &svc->slist);
|
|
return svc;
|
|
}
|
|
|
|
static void parse_line_service(struct parse_state *state, int nargs, char **args)
|
|
{
|
|
struct service *svc = (service*) state->context;
|
|
struct command *cmd;
|
|
int i, kw, kw_nargs;
|
|
|
|
if (nargs == 0) {
|
|
return;
|
|
}
|
|
|
|
svc->ioprio_class = IoSchedClass_NONE;
|
|
|
|
kw = lookup_keyword(args[0]);
|
|
switch (kw) {
|
|
case K_class:
|
|
if (nargs != 2) {
|
|
parse_error(state, "class option requires a classname\n");
|
|
} else {
|
|
svc->classname = args[1];
|
|
}
|
|
break;
|
|
case K_console:
|
|
svc->flags |= SVC_CONSOLE;
|
|
break;
|
|
case K_disabled:
|
|
svc->flags |= SVC_DISABLED;
|
|
svc->flags |= SVC_RC_DISABLED;
|
|
break;
|
|
case K_ioprio:
|
|
if (nargs != 3) {
|
|
parse_error(state, "ioprio optin usage: ioprio <rt|be|idle> <ioprio 0-7>\n");
|
|
} else {
|
|
svc->ioprio_pri = strtoul(args[2], 0, 8);
|
|
|
|
if (svc->ioprio_pri < 0 || svc->ioprio_pri > 7) {
|
|
parse_error(state, "priority value must be range 0 - 7\n");
|
|
break;
|
|
}
|
|
|
|
if (!strcmp(args[1], "rt")) {
|
|
svc->ioprio_class = IoSchedClass_RT;
|
|
} else if (!strcmp(args[1], "be")) {
|
|
svc->ioprio_class = IoSchedClass_BE;
|
|
} else if (!strcmp(args[1], "idle")) {
|
|
svc->ioprio_class = IoSchedClass_IDLE;
|
|
} else {
|
|
parse_error(state, "ioprio option usage: ioprio <rt|be|idle> <0-7>\n");
|
|
}
|
|
}
|
|
break;
|
|
case K_group:
|
|
if (nargs < 2) {
|
|
parse_error(state, "group option requires a group id\n");
|
|
} else if (nargs > NR_SVC_SUPP_GIDS + 2) {
|
|
parse_error(state, "group option accepts at most %d supp. groups\n",
|
|
NR_SVC_SUPP_GIDS);
|
|
} else {
|
|
int n;
|
|
svc->gid = decode_uid(args[1]);
|
|
for (n = 2; n < nargs; n++) {
|
|
svc->supp_gids[n-2] = decode_uid(args[n]);
|
|
}
|
|
svc->nr_supp_gids = n - 2;
|
|
}
|
|
break;
|
|
case K_keycodes:
|
|
if (nargs < 2) {
|
|
parse_error(state, "keycodes option requires atleast one keycode\n");
|
|
} else {
|
|
svc->keycodes = (int*) malloc((nargs - 1) * sizeof(svc->keycodes[0]));
|
|
if (!svc->keycodes) {
|
|
parse_error(state, "could not allocate keycodes\n");
|
|
} else {
|
|
svc->nkeycodes = nargs - 1;
|
|
for (i = 1; i < nargs; i++) {
|
|
svc->keycodes[i - 1] = atoi(args[i]);
|
|
}
|
|
}
|
|
}
|
|
break;
|
|
case K_oneshot:
|
|
svc->flags |= SVC_ONESHOT;
|
|
break;
|
|
case K_onrestart:
|
|
nargs--;
|
|
args++;
|
|
kw = lookup_keyword(args[0]);
|
|
if (!kw_is(kw, COMMAND)) {
|
|
parse_error(state, "invalid command '%s'\n", args[0]);
|
|
break;
|
|
}
|
|
kw_nargs = kw_nargs(kw);
|
|
if (nargs < kw_nargs) {
|
|
parse_error(state, "%s requires %d %s\n", args[0], kw_nargs - 1,
|
|
kw_nargs > 2 ? "arguments" : "argument");
|
|
break;
|
|
}
|
|
|
|
cmd = (command*) malloc(sizeof(*cmd) + sizeof(char*) * nargs);
|
|
cmd->func = kw_func(kw);
|
|
cmd->nargs = nargs;
|
|
memcpy(cmd->args, args, sizeof(char*) * nargs);
|
|
list_add_tail(&svc->onrestart.commands, &cmd->clist);
|
|
break;
|
|
case K_critical:
|
|
svc->flags |= SVC_CRITICAL;
|
|
break;
|
|
case K_setenv: { /* name value */
|
|
if (nargs < 3) {
|
|
parse_error(state, "setenv option requires name and value arguments\n");
|
|
break;
|
|
}
|
|
svcenvinfo* ei = (svcenvinfo*) calloc(1, sizeof(*ei));
|
|
if (!ei) {
|
|
parse_error(state, "out of memory\n");
|
|
break;
|
|
}
|
|
ei->name = args[1];
|
|
ei->value = args[2];
|
|
ei->next = svc->envvars;
|
|
svc->envvars = ei;
|
|
break;
|
|
}
|
|
case K_socket: {/* name type perm [ uid gid context ] */
|
|
if (nargs < 4) {
|
|
parse_error(state, "socket option requires name, type, perm arguments\n");
|
|
break;
|
|
}
|
|
if (strcmp(args[2],"dgram") && strcmp(args[2],"stream")
|
|
&& strcmp(args[2],"seqpacket")) {
|
|
parse_error(state, "socket type must be 'dgram', 'stream' or 'seqpacket'\n");
|
|
break;
|
|
}
|
|
socketinfo* si = (socketinfo*) calloc(1, sizeof(*si));
|
|
if (!si) {
|
|
parse_error(state, "out of memory\n");
|
|
break;
|
|
}
|
|
si->name = args[1];
|
|
si->type = args[2];
|
|
si->perm = strtoul(args[3], 0, 8);
|
|
if (nargs > 4)
|
|
si->uid = decode_uid(args[4]);
|
|
if (nargs > 5)
|
|
si->gid = decode_uid(args[5]);
|
|
if (nargs > 6)
|
|
si->socketcon = args[6];
|
|
si->next = svc->sockets;
|
|
svc->sockets = si;
|
|
break;
|
|
}
|
|
case K_user:
|
|
if (nargs != 2) {
|
|
parse_error(state, "user option requires a user id\n");
|
|
} else {
|
|
svc->uid = decode_uid(args[1]);
|
|
}
|
|
break;
|
|
case K_seclabel:
|
|
if (nargs != 2) {
|
|
parse_error(state, "seclabel option requires a label string\n");
|
|
} else {
|
|
svc->seclabel = args[1];
|
|
}
|
|
break;
|
|
case K_writepid:
|
|
if (nargs < 2) {
|
|
parse_error(state, "writepid option requires at least one filename\n");
|
|
break;
|
|
}
|
|
svc->writepid_files_ = new std::vector<std::string>;
|
|
for (int i = 1; i < nargs; ++i) {
|
|
svc->writepid_files_->push_back(args[i]);
|
|
}
|
|
break;
|
|
|
|
default:
|
|
parse_error(state, "invalid option '%s'\n", args[0]);
|
|
}
|
|
}
|
|
|
|
static void *parse_action(struct parse_state *state, int nargs, char **args)
|
|
{
|
|
struct trigger *cur_trigger;
|
|
int i;
|
|
if (nargs < 2) {
|
|
parse_error(state, "actions must have a trigger\n");
|
|
return 0;
|
|
}
|
|
|
|
action* act = (action*) calloc(1, sizeof(*act));
|
|
list_init(&act->triggers);
|
|
|
|
for (i = 1; i < nargs; i++) {
|
|
if (!(i % 2)) {
|
|
if (strcmp(args[i], "&&")) {
|
|
struct listnode *node;
|
|
struct listnode *node2;
|
|
parse_error(state, "& is the only symbol allowed to concatenate actions\n");
|
|
list_for_each_safe(node, node2, &act->triggers) {
|
|
struct trigger *trigger = node_to_item(node, struct trigger, nlist);
|
|
free(trigger);
|
|
}
|
|
free(act);
|
|
return 0;
|
|
} else
|
|
continue;
|
|
}
|
|
cur_trigger = (trigger*) calloc(1, sizeof(*cur_trigger));
|
|
cur_trigger->name = args[i];
|
|
list_add_tail(&act->triggers, &cur_trigger->nlist);
|
|
}
|
|
|
|
list_init(&act->commands);
|
|
list_init(&act->qlist);
|
|
list_add_tail(&action_list, &act->alist);
|
|
/* XXX add to hash */
|
|
return act;
|
|
}
|
|
|
|
static void parse_line_action(struct parse_state* state, int nargs, char **args)
|
|
{
|
|
struct action *act = (action*) state->context;
|
|
int kw, n;
|
|
|
|
if (nargs == 0) {
|
|
return;
|
|
}
|
|
|
|
kw = lookup_keyword(args[0]);
|
|
if (!kw_is(kw, COMMAND)) {
|
|
parse_error(state, "invalid command '%s'\n", args[0]);
|
|
return;
|
|
}
|
|
|
|
n = kw_nargs(kw);
|
|
if (nargs < n) {
|
|
parse_error(state, "%s requires %d %s\n", args[0], n - 1,
|
|
n > 2 ? "arguments" : "argument");
|
|
return;
|
|
}
|
|
command* cmd = (command*) malloc(sizeof(*cmd) + sizeof(char*) * nargs);
|
|
cmd->func = kw_func(kw);
|
|
cmd->line = state->line;
|
|
cmd->filename = state->filename;
|
|
cmd->nargs = nargs;
|
|
memcpy(cmd->args, args, sizeof(char*) * nargs);
|
|
list_add_tail(&act->commands, &cmd->clist);
|
|
}
|