2 * Copyright (C) 2013 Felix Fietkau <nbd@openwrt.org>
3 * Copyright (C) 2013 John Crispin <blogic@openwrt.org>
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU Lesser General Public License version 2.1
7 * as published by the Free Software Foundation
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
16 #include <sys/types.h>
18 #include <sys/ioctl.h>
27 #include <libubox/utils.h>
28 #include <libubox/list.h>
30 #include "utils/utils.h"
35 #define O_PATH 010000000
50 void (*cb
) (struct init_action
*a
);
55 struct list_head list
;
61 struct init_handler
*handler
;
62 struct uloop_process proc
;
65 struct uloop_timeout tout
;
68 static const char *tab
= "/etc/inittab";
69 static char *ask
= "/sbin/askfirst";
71 static LIST_HEAD(actions
);
73 static int dev_exist(const char *dev
)
77 dfd
= open("/dev", O_PATH
|O_DIRECTORY
);
82 fd
= openat(dfd
, dev
, O_RDONLY
);
92 static void fork_worker(struct init_action
*a
)
100 if (patch_stdio(a
->id
))
101 ERROR("Failed to setup i/o redirection\n");
103 ioctl(STDIN_FILENO
, TIOCSCTTY
, 1);
104 tcsetpgrp(STDIN_FILENO
, p
);
106 execvp(a
->argv
[0], a
->argv
);
107 ERROR("Failed to execute %s: %m\n", a
->argv
[0]);
111 if (a
->proc
.pid
> 0) {
112 DEBUG(4, "Launched new %s action, pid=%d\n",
115 uloop_process_add(&a
->proc
);
119 static void child_exit(struct uloop_process
*proc
, int ret
)
121 struct init_action
*a
= container_of(proc
, struct init_action
, proc
);
123 DEBUG(4, "pid:%d, exitcode:%d\n", proc
->pid
, ret
);
126 if (!dev_exist(a
->id
)) {
127 DEBUG(4, "Skipping respawn: device '%s' does not exist anymore\n", a
->id
);
131 uloop_timeout_set(&a
->tout
, a
->respawn
);
134 static void respawn(struct uloop_timeout
*tout
)
136 struct init_action
*a
= container_of(tout
, struct init_action
, tout
);
141 static void rcdone(struct runqueue
*q
)
146 static void runrc(struct init_action
*a
)
148 if (!a
->argv
[1] || !a
->argv
[2]) {
149 ERROR("valid format is rcS <S|K> <param>\n");
153 /* proceed even if no init or shutdown scripts run */
154 if (rcS(a
->argv
[1], a
->argv
[2], rcdone
))
158 static void askfirst(struct init_action
*a
)
162 if (!dev_exist(a
->id
) || (console
&& !strcmp(console
, a
->id
))) {
163 DEBUG(4, "Skipping %s\n", a
->id
);
167 a
->tout
.cb
= respawn
;
168 /* shift arguments only if not yet done */
169 if (a
->argv
[0] != ask
) {
170 for (i
= MAX_ARGS
- 1; i
>= 1; i
--)
171 a
->argv
[i
] = a
->argv
[i
- 1];
176 a
->proc
.cb
= child_exit
;
181 static void askconsole(struct init_action
*a
)
183 char line
[256], *tty
, *split
;
186 /* First, try console= on the kernel command line,
187 * then fallback to /sys/class/tty/console/active,
188 * which should work when linux,stdout-path (or equivalent)
189 * is in the device tree
191 tty
= get_cmdline_val("console", line
, sizeof(line
));
193 if (dev_exist("console"))
196 tty
= get_active_console(line
, sizeof(line
));
199 split
= strchr(tty
, ',');
203 if (!dev_exist(tty
)) {
204 DEBUG(4, "skipping %s\n", tty
);
208 console
= strdup(tty
);
216 a
->tout
.cb
= respawn
;
217 /* shift arguments only if not yet done */
218 if (a
->argv
[0] != ask
) {
219 for (i
= MAX_ARGS
- 1; i
>= 1; i
--)
220 a
->argv
[i
] = a
->argv
[i
- 1];
225 a
->proc
.cb
= child_exit
;
230 static void rcrespawn(struct init_action
*a
)
232 a
->tout
.cb
= respawn
;
235 a
->proc
.cb
= child_exit
;
240 static struct init_handler handlers
[] = {
252 .name
= "askconsole",
260 .name
= "askconsolelate",
264 .name
= "respawnlate",
270 static int add_action(struct init_action
*a
, const char *name
)
274 for (i
= 0; i
< ARRAY_SIZE(handlers
); i
++)
275 if (!strcmp(handlers
[i
].name
, name
)) {
276 a
->handler
= &handlers
[i
];
277 list_add_tail(&a
->list
, &actions
);
280 ERROR("Unknown init handler %s\n", name
);
284 void procd_inittab_run(const char *handler
)
286 struct init_action
*a
;
288 list_for_each_entry(a
, &actions
, list
)
289 if (!strcmp(a
->handler
->name
, handler
)) {
291 if (!a
->handler
->multi
)
296 void procd_inittab(void)
299 FILE *fp
= fopen(tab
, "r");
300 struct init_action
*a
;
302 regmatch_t matches
[5];
306 ERROR("Failed to open %s: %m\n", tab
);
310 regcomp(&pat_inittab
, "([a-zA-Z0-9]*):([a-zA-Z0-9]*):([a-zA-Z0-9]*):(.*)", REG_EXTENDED
);
311 line
= malloc(LINE_LEN
);
312 a
= calloc(1, sizeof(struct init_action
));
314 while (fgets(line
, LINE_LEN
, fp
)) {
315 char *tags
[TAG_PROCESS
+ 1];
318 int len
= strlen(line
);
320 while (isspace(line
[len
- 1]))
327 if (regexec(&pat_inittab
, line
, 5, matches
, 0))
330 DEBUG(4, "Parsing inittab - %s\n", line
);
332 for (i
= TAG_ID
; i
<= TAG_PROCESS
; i
++) {
333 line
[matches
[i
].rm_eo
] = '\0';
334 tags
[i
] = &line
[matches
[i
+ 1].rm_so
];
337 tok
= strtok(tags
[TAG_PROCESS
], " ");
338 for (i
= 0; i
< (MAX_ARGS
- 1) && tok
; i
++) {
340 tok
= strtok(NULL
, " ");
343 a
->id
= tags
[TAG_ID
];
346 if (add_action(a
, tags
[TAG_ACTION
]))
348 line
= malloc(LINE_LEN
);
349 a
= calloc(1, sizeof(struct init_action
));
355 regfree(&pat_inittab
);