X-Git-Url: https://git.librecmc.org/?a=blobdiff_plain;f=init%2Finit.c;h=f7eb8f34ba3510d1b463e8acc1b1d18a97795e07;hb=ce34cccf28d3b46defbc048f8748d0c870ac3178;hp=5b80cc56180418606451013c6cd0cdd972e6cfbd;hpb=3fe39dce5d1a0b0946878c66bbd7f694c5aa38ea;p=oweals%2Fbusybox.git diff --git a/init/init.c b/init/init.c index 5b80cc561..f7eb8f34b 100644 --- a/init/init.c +++ b/init/init.c @@ -1,903 +1,999 @@ +/* vi: set sw=4 ts=4: */ /* * Mini init implementation for busybox * - * * Copyright (C) 1995, 1996 by Bruce Perens . + * Copyright (C) 1999-2004 by Erik Andersen * Adjusted by so many folks, it's impossible to keep track. * - * This program is free software; you can redistribute it and/or modify - * it under the terms of the GNU General Public License as published by - * the Free Software Foundation; either version 2 of the License, or - * (at your option) any later version. - * - * This program is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU - * General Public License for more details. - * - * You should have received a copy of the GNU General Public License - * along with this program; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - * + * Licensed under GPLv2 or later, see file LICENSE in this tarball for details. */ -#include "internal.h" -#include -#include -#include -#include -#include -#include -#include -#include +#include "libbb.h" #include -#include -#include -#include -#include -#include #include -#include -#include -#include /* for serial_struct */ -#include /* for vt_stat */ -#include -#include -#ifdef BB_SYSLOGD #include -#endif -#if ! defined BB_FEATURE_USE_PROCFS -#error Sorry, I depend on the /proc filesystem right now. -#endif - -#ifndef KERNEL_VERSION -#define KERNEL_VERSION(a,b,c) (((a) << 16) + ((b) << 8) + (c)) -#endif +#define INIT_BUFFS_SIZE 256 +#define CONSOLE_NAME_SIZE 32 +#define MAXENV 16 /* Number of env. vars */ +/* + * When a file named CORE_ENABLE_FLAG_FILE exists, setrlimit is called + * before processes are spawned to set core file size as unlimited. + * This is for debugging only. Don't use this is production, unless + * you want core dumps lying about.... + */ +#define CORE_ENABLE_FLAG_FILE "/.init_enable_core" +#include -#define VT_PRIMARY "/dev/tty1" /* Primary virtual console */ -#define VT_SECONDARY "/dev/tty2" /* Virtual console */ -#define VT_LOG "/dev/tty3" /* Virtual console */ -#define SERIAL_CON0 "/dev/ttyS0" /* Primary serial console */ -#define SERIAL_CON1 "/dev/ttyS1" /* Serial console */ -#define SHELL "/bin/sh" /* Default shell */ -#define INITTAB "/etc/inittab" /* inittab file location */ +#define INITTAB "/etc/inittab" /* inittab file location */ #ifndef INIT_SCRIPT -#define INIT_SCRIPT "/etc/init.d/rcS" /* Default sysinit script. */ +#define INIT_SCRIPT "/etc/init.d/rcS" /* Default sysinit script. */ #endif -#define LOG 0x1 -#define CONSOLE 0x2 - /* Allowed init action types */ -typedef enum { - SYSINIT=1, - RESPAWN, - ASKFIRST, - WAIT, - ONCE -} initActionEnum; - -/* And now a list of the actions we support in the version of init */ -typedef struct initActionType{ - const char* name; - initActionEnum action; -} initActionType; - -static const struct initActionType actions[] = { - {"sysinit", SYSINIT}, - {"respawn", RESPAWN}, - {"askfirst", ASKFIRST}, - {"wait", WAIT}, - {"once", ONCE}, - {0} +#define SYSINIT 0x001 +#define RESPAWN 0x002 +#define ASKFIRST 0x004 +#define WAIT 0x008 +#define ONCE 0x010 +#define CTRLALTDEL 0x020 +#define SHUTDOWN 0x040 +#define RESTART 0x080 + +#define STR_SYSINIT "\x01" +#define STR_RESPAWN "\x02" +#define STR_ASKFIRST "\x04" +#define STR_WAIT "\x08" +#define STR_ONCE "\x10" +#define STR_CTRLALTDEL "\x20" +#define STR_SHUTDOWN "\x40" +#define STR_RESTART "\x80" + +/* Set up a linked list of init_actions, to be read from inittab */ +struct init_action { + struct init_action *next; + pid_t pid; + uint8_t action; + char terminal[CONSOLE_NAME_SIZE]; + char command[INIT_BUFFS_SIZE]; }; -/* Set up a linked list of initactions, to be read from inittab */ -typedef struct initActionTag initAction; -struct initActionTag { - pid_t pid; - char process[256]; - char console[256]; - initAction *nextPtr; - initActionEnum action; -}; -initAction* initActionList = NULL; +/* Static variables */ +static struct init_action *init_action_list = NULL; +static const char *log_console = VC_5; +static sig_atomic_t got_cont = 0; -static char *secondConsole = VT_SECONDARY; -static char *log = VT_LOG; -static int kernelVersion = 0; -static char termType[32] = "TERM=ansi"; -static char console[32] = _PATH_CONSOLE; +enum { + L_LOG = 0x1, + L_CONSOLE = 0x2, +#if ENABLE_FEATURE_EXTRA_QUIET + MAYBE_CONSOLE = 0x0, +#else + MAYBE_CONSOLE = L_CONSOLE, +#endif -/* try to open up the specified device */ -int device_open(char *device, int mode) +#ifndef RB_HALT_SYSTEM + RB_HALT_SYSTEM = 0xcdef0123, /* FIXME: this overflows enum */ + RB_ENABLE_CAD = 0x89abcdef, + RB_DISABLE_CAD = 0, + RB_POWER_OFF = 0x4321fedc, + RB_AUTOBOOT = 0x01234567, +#endif +}; + +static const char *const environment[] = { + "HOME=/", + bb_PATH_root_path, + "SHELL=/bin/sh", + "USER=root", + NULL +}; + +/* Function prototypes */ +static void delete_init_action(struct init_action *a); +static void halt_reboot_pwoff(int sig) ATTRIBUTE_NORETURN; + +static void waitfor(pid_t pid) { - int m, f, fd = -1; - - m = mode | O_NONBLOCK; - - /* Retry up to 5 times */ - for (f = 0; f < 5; f++) - if ((fd = open(device, m)) >= 0) - break; - if (fd < 0) - return fd; - /* Reset original flags. */ - if (m != mode) - fcntl(fd, F_SETFL, mode); - return fd; + /* waitfor(run(x)): protect against failed fork inside run() */ + if (pid <= 0) + return; + + /* Wait for any child (prevent zombies from exiting orphaned processes) + * but exit the loop only when specified one has exited. */ + while (wait(NULL) != pid) + continue; } -/* print a message to the specified device: - * device may be bitwise-or'd from LOG | CONSOLE */ -void message(int device, char *fmt, ...) +static void loop_forever(void) ATTRIBUTE_NORETURN; +static void loop_forever(void) { - va_list arguments; - int fd; + while (1) + sleep(1); +} -#ifdef BB_SYSLOGD +/* Print a message to the specified device. + * Device may be bitwise-or'd from L_LOG | L_CONSOLE */ +#define messageD(...) do { if (ENABLE_DEBUG_INIT) message(__VA_ARGS__); } while (0) +static void message(int device, const char *fmt, ...) + __attribute__ ((format(printf, 2, 3))); +static void message(int device, const char *fmt, ...) +{ + static int log_fd = -1; + va_list arguments; + int l; + char msg[128]; - /* Log the message to syslogd */ - if (device & LOG ) { - char msg[1024]; + msg[0] = '\r'; va_start(arguments, fmt); - vsnprintf(msg, sizeof(msg), fmt, arguments); + vsnprintf(msg + 1, sizeof(msg) - 2, fmt, arguments); va_end(arguments); - openlog( "init", 0, LOG_DAEMON); - syslog(LOG_DAEMON|LOG_NOTICE, msg); - closelog(); - } + msg[sizeof(msg) - 2] = '\0'; + l = strlen(msg); + + if (ENABLE_FEATURE_INIT_SYSLOG) { + /* Log the message to syslogd */ + if (device & L_LOG) { + /* don't out "\r" */ + openlog(applet_name, 0, LOG_DAEMON); + syslog(LOG_INFO, "init: %s", msg + 1); + closelog(); + } + msg[l++] = '\n'; + msg[l] = '\0'; + } else { + msg[l++] = '\n'; + msg[l] = '\0'; + /* Take full control of the log tty, and never close it. + * It's mine, all mine! Muhahahaha! */ + if (log_fd < 0) { + if (!log_console) { + log_fd = 2; + } else { + log_fd = device_open(log_console, O_WRONLY | O_NONBLOCK | O_NOCTTY); + if (log_fd < 0) { + bb_error_msg("can't log to %s", log_console); + device = L_CONSOLE; + } else { + close_on_exec_on(log_fd); + } + } + } + if (device & L_LOG) { + full_write(log_fd, msg, l); + if (log_fd == 2) + return; /* don't print dup messages */ + } + } -#else - static int log_fd=-1; - - /* Take full control of the log tty, and never close it. - * It's mine, all mine! Muhahahaha! */ - if (log_fd < 0) { - if (log == NULL) { - /* don't even try to log, because there is no such console */ - log_fd = -2; - /* log to main console instead */ - device = CONSOLE; - } - else if ((log_fd = device_open(log, O_RDWR|O_NDELAY)) < 0) { - log_fd=-1; - fprintf(stderr, "Bummer, can't write to log on %s!\r\n", log); - fflush(stderr); - return; + if (device & L_CONSOLE) { + /* Send console messages to console so people will see them. */ + full_write(2, msg, l); } - } - if ( (device & LOG) && (log_fd >= 0) ) { - va_start(arguments, fmt); - vdprintf(log_fd, fmt, arguments); - va_end(arguments); - } -#endif +} - if (device & CONSOLE) { - /* Always send console messages to /dev/console so people will see them. */ - if ((fd = device_open(_PATH_CONSOLE, O_WRONLY|O_NOCTTY|O_NDELAY)) >= 0) { - va_start(arguments, fmt); - vdprintf(fd, fmt, arguments); - va_end(arguments); - close(fd); +/* From */ +struct serial_struct { + int type; + int line; + unsigned int port; + int irq; + int flags; + int xmit_fifo_size; + int custom_divisor; + int baud_base; + unsigned short close_delay; + char io_type; + char reserved_char[1]; + int hub6; + unsigned short closing_wait; /* time to wait before closing */ + unsigned short closing_wait2; /* no longer used... */ + unsigned char *iomem_base; + unsigned short iomem_reg_shift; + unsigned int port_high; + unsigned long iomap_base; /* cookie passed into ioremap */ + int reserved[1]; + /* Paranoia (imagine 64bit kernel overwriting 32bit userspace stack) */ + uint32_t bbox_reserved[16]; +}; +static void console_init(void) +{ + struct serial_struct sr; + char *s; + + s = getenv("CONSOLE"); + if (!s) s = getenv("console"); + if (s) { + int fd = open(s, O_RDWR | O_NONBLOCK | O_NOCTTY); + if (fd >= 0) { + dup2(fd, 0); + dup2(fd, 1); + dup2(fd, 2); + while (fd > 2) close(fd--); + } + messageD(L_LOG, "console='%s'", s); } else { - fprintf(stderr, "Bummer, can't print: "); - va_start(arguments, fmt); - vfprintf(stderr, fmt, arguments); - fflush(stderr); - va_end(arguments); + /* Make sure fd 0,1,2 are not closed */ + bb_sanitize_stdio(); } - } -} + s = getenv("TERM"); + if (ioctl(0, TIOCGSERIAL, &sr) == 0) { + /* Force the TERM setting to vt102 for serial console + * if TERM is set to linux (the default) */ + if (!s || strcmp(s, "linux") == 0) + putenv((char*)"TERM=vt102"); + if (!ENABLE_FEATURE_INIT_SYSLOG) + log_console = NULL; + } else if (!s) + putenv((char*)"TERM=linux"); +} /* Set terminal settings to reasonable defaults */ -void set_term( int fd) +static void set_sane_term(void) { - struct termios tty; - static const char control_characters[] = { - '\003', '\034', '\177', '\025', '\004', '\0', - '\1', '\0', '\021', '\023', '\032', '\0', '\022', - '\017', '\027', '\026', '\0' - }; + struct termios tty; - tcgetattr(fd, &tty); + tcgetattr(STDIN_FILENO, &tty); - /* set control chars */ - memcpy(tty.c_cc, control_characters, sizeof(control_characters)); + /* set control chars */ + tty.c_cc[VINTR] = 3; /* C-c */ + tty.c_cc[VQUIT] = 28; /* C-\ */ + tty.c_cc[VERASE] = 127; /* C-? */ + tty.c_cc[VKILL] = 21; /* C-u */ + tty.c_cc[VEOF] = 4; /* C-d */ + tty.c_cc[VSTART] = 17; /* C-q */ + tty.c_cc[VSTOP] = 19; /* C-s */ + tty.c_cc[VSUSP] = 26; /* C-z */ - /* use line dicipline 0 */ - tty.c_line = 0; + /* use line dicipline 0 */ + tty.c_line = 0; - /* Make it be sane */ - //tty.c_cflag &= CBAUD|CBAUDEX|CSIZE|CSTOPB|PARENB|PARODD; - //tty.c_cflag |= HUPCL|CLOCAL; + /* Make it be sane */ + tty.c_cflag &= CBAUD | CBAUDEX | CSIZE | CSTOPB | PARENB | PARODD; + tty.c_cflag |= CREAD | HUPCL | CLOCAL; - /* input modes */ - tty.c_iflag = ICRNL|IXON|IXOFF; + /* input modes */ + tty.c_iflag = ICRNL | IXON | IXOFF; - /* output modes */ - tty.c_oflag = OPOST|ONLCR; + /* output modes */ + tty.c_oflag = OPOST | ONLCR; - /* local modes */ - tty.c_lflag = ISIG|ICANON|ECHO|ECHOE|ECHOK|ECHOCTL|ECHOKE|IEXTEN; + /* local modes */ + tty.c_lflag = + ISIG | ICANON | ECHO | ECHOE | ECHOK | ECHOCTL | ECHOKE | IEXTEN; - tcsetattr(fd, TCSANOW, &tty); + tcsetattr(STDIN_FILENO, TCSANOW, &tty); } -/* How much memory does this machine have? */ -static int mem_total() +/* Open the new terminal device */ +static void open_stdio_to_tty(const char* tty_name, int exit_on_failure) { - char s[80]; - char *p = "/proc/meminfo"; - FILE *f; - const char pattern[] = "MemTotal:"; - - if ((f = fopen(p, "r")) < 0) { - message(LOG, "Error opening %s: %s\n", p, strerror( errno)); - return -1; - } - while (NULL != fgets(s, 79, f)) { - p = strstr(s, pattern); - if (NULL != p) { - fclose(f); - return (atoi(p + strlen(pattern))); + /* empty tty_name means "use init's tty", else... */ + if (tty_name[0]) { + int fd; + close(0); + /* fd can be only < 0 or 0: */ + fd = device_open(tty_name, O_RDWR); + if (fd) { + message(L_LOG | L_CONSOLE, "Can't open %s: %s", + tty_name, strerror(errno)); + if (exit_on_failure) + _exit(1); + if (ENABLE_DEBUG_INIT) + _exit(2); + halt_reboot_pwoff(SIGUSR1); /* halt the system */ + } + dup2(0, 1); + dup2(0, 2); } - } - return -1; + set_sane_term(); } -static void console_init() +/* Used only by run_actions */ +static pid_t run(const struct init_action *a) { - int fd; - int tried_devcons = 0; - int tried_vtprimary = 0; - struct serial_struct sr; - char *s; - - if ((s = getenv("TERM")) != NULL) { - snprintf(termType,sizeof(termType)-1,"TERM=%s",s); - } - - if ((s = getenv("CONSOLE")) != NULL) { - snprintf(console, sizeof(console)-1, "%s",s); - } -#if #cpu(sparc) - /* sparc kernel supports console=tty[ab] parameter which is also - * passed to init, so catch it here */ - else if ((s = getenv("console")) != NULL) { - /* remap tty[ab] to /dev/ttyS[01] */ - if (strcmp( s, "ttya" )==0) - snprintf(console, sizeof(console)-1, "%s", SERIAL_CON0); - else if (strcmp( s, "ttyb" )==0) - snprintf(console, sizeof(console)-1, "%s", SERIAL_CON1); - } -#endif - else { - struct vt_stat vt; - - /* 2.2 kernels: identify the real console backend and try to use it */ - if (ioctl(0, TIOCGSERIAL, &sr) == 0) { - /* this is a serial console */ - snprintf(console, sizeof(console)-1, "/dev/ttyS%d", sr.line); - } - else if (ioctl(0, VT_GETSTATE, &vt) == 0) { - /* this is linux virtual tty */ - snprintf(console, sizeof(console)-1, "/dev/tty%d", vt.v_active); - } else { - snprintf(console, sizeof(console)-1, "%s", _PATH_CONSOLE); - tried_devcons++; - } - } - - while ((fd = open(console, O_RDONLY | O_NONBLOCK)) < 0) { - /* Can't open selected console -- try /dev/console */ - if (!tried_devcons) { - tried_devcons++; - snprintf(console, sizeof(console)-1, "%s", _PATH_CONSOLE); - continue; - } - /* Can't open selected console -- try vt1 */ - if (!tried_vtprimary) { - tried_vtprimary++; - snprintf(console, sizeof(console)-1, "%s", VT_PRIMARY); - continue; - } - break; - } - if (fd < 0) { - /* Perhaps we should panic here? */ - snprintf(console, sizeof(console)-1, "/dev/null"); - } else { - /* check for serial console and disable logging to tty3 & running a - * shell to tty2 */ - if (ioctl(0,TIOCGSERIAL,&sr) == 0) { - message(LOG|CONSOLE, "serial console detected. Disabling virtual terminals.\r\n" ); - log = NULL; - secondConsole = NULL; - } - close(fd); - } - message(LOG, "console=%s\n", console ); -} + int i; + pid_t pid; + char *s, *tmpCmd, *cmdpath; + char *cmd[INIT_BUFFS_SIZE]; + char buf[INIT_BUFFS_SIZE + 6]; /* INIT_BUFFS_SIZE+strlen("exec ")+1 */ + sigset_t nmask, omask; + + /* Block sigchild while forking (why?) */ + sigemptyset(&nmask); + sigaddset(&nmask, SIGCHLD); + sigprocmask(SIG_BLOCK, &nmask, &omask); + pid = fork(); + sigprocmask(SIG_SETMASK, &omask, NULL); + + if (pid < 0) + message(L_LOG | L_CONSOLE, "Can't fork"); + if (pid) + return pid; + + /* Child */ + + /* Reset signal handlers that were set by the parent process */ + signal(SIGUSR1, SIG_DFL); + signal(SIGUSR2, SIG_DFL); + signal(SIGINT, SIG_DFL); + signal(SIGTERM, SIG_DFL); + signal(SIGHUP, SIG_DFL); + signal(SIGQUIT, SIG_DFL); + signal(SIGCONT, SIG_DFL); + signal(SIGSTOP, SIG_DFL); + signal(SIGTSTP, SIG_DFL); + + /* Create a new session and make ourself the process + * group leader */ + setsid(); -static pid_t run(char* command, - char *terminal, int get_enter) -{ - int i, fd; - pid_t pid; - char* tmpCmd; - char* cmd[255]; - static const char press_enter[] = - "\nPlease press Enter to activate this console. "; - char* environment[] = { - "HOME=/", - "PATH=/usr/bin:/bin:/usr/sbin:/sbin", - "SHELL=/bin/sh", - termType, - "USER=root", - 0 - }; + /* Open the new terminal device */ + open_stdio_to_tty(a->terminal, 1 /* - exit if open fails*/); + +#ifdef BUT_RUN_ACTIONS_ALREADY_DOES_WAITING + /* If the init Action requires us to wait, then force the + * supplied terminal to be the controlling tty. */ + if (a->action & (SYSINIT | WAIT | CTRLALTDEL | SHUTDOWN | RESTART)) { + /* Now fork off another process to just hang around */ + pid = fork(); + if (pid < 0) { + message(L_LOG | L_CONSOLE, "Can't fork"); + _exit(1); + } + if (pid > 0) { + /* Parent - wait till the child is done */ + signal(SIGINT, SIG_IGN); + signal(SIGTSTP, SIG_IGN); + signal(SIGQUIT, SIG_IGN); + signal(SIGCHLD, SIG_DFL); + + waitfor(pid); + /* See if stealing the controlling tty back is necessary */ + if (tcgetpgrp(0) != getpid()) + _exit(0); + + /* Use a temporary process to steal the controlling tty. */ + pid = fork(); + if (pid < 0) { + message(L_LOG | L_CONSOLE, "Can't fork"); + _exit(1); + } + if (pid == 0) { + setsid(); + ioctl(0, TIOCSCTTY, 1); + _exit(0); + } + waitfor(pid); + _exit(0); + } - if ((pid = fork()) == 0) { - pid_t shell_pgid = getpid (); + /* Child - fall though to actually execute things */ + } +#endif - /* Clean up */ - close(0); - close(1); - close(2); - setsid(); + /* See if any special /bin/sh requiring characters are present */ + if (strpbrk(a->command, "~`!$^&*()=|\\{}[];\"'<>?") != NULL) { + cmd[0] = (char*)DEFAULT_SHELL; + cmd[1] = (char*)"-c"; + cmd[2] = strcat(strcpy(buf, "exec "), a->command); + cmd[3] = NULL; + } else { + /* Convert command (char*) into cmd (char**, one word per string) */ + strcpy(buf, a->command); + s = buf; + for (tmpCmd = buf, i = 0; (tmpCmd = strsep(&s, " \t")) != NULL;) { + if (*tmpCmd != '\0') { + cmd[i] = tmpCmd; + i++; + } + } + cmd[i] = NULL; + } - /* Reset signal handlers set for parent process */ - signal(SIGUSR1, SIG_DFL); - signal(SIGUSR2, SIG_DFL); - signal(SIGINT, SIG_DFL); - signal(SIGTERM, SIG_DFL); + cmdpath = cmd[0]; + + /* + * Interactive shells want to see a dash in argv[0]. This + * typically is handled by login, argv will be setup this + * way if a dash appears at the front of the command path + * (like "-/bin/sh"). + */ + if (*cmdpath == '-') { + /* skip over the dash */ + ++cmdpath; + +#ifdef WHY_WE_DO_THIS_SHELL_MUST_HANDLE_THIS_ITSELF + /* find the last component in the command pathname */ + s = bb_get_last_path_component_nostrip(cmdpath); + /* make a new argv[0] */ + cmd[0] = malloc(strlen(s) + 2); + if (cmd[0] == NULL) { + message(L_LOG | L_CONSOLE, bb_msg_memory_exhausted); + cmd[0] = cmdpath; + } else { + cmd[0][0] = '-'; + strcpy(cmd[0] + 1, s); + } +#endif - if ((fd = device_open(terminal, O_RDWR)) < 0) { - message(LOG|CONSOLE, "Bummer, can't open %s\r\n", terminal); - exit(1); + /* _Attempt_ to make stdin a controlling tty. */ + if (ENABLE_FEATURE_INIT_SCTTY) + ioctl(0, TIOCSCTTY, 0 /*only try, don't steal*/); } - dup(fd); - dup(fd); - tcsetpgrp (0, getpgrp()); - set_term(0); - - if (get_enter==TRUE) { - /* - * Save memory by not exec-ing anything large (like a shell) - * before the user wants it. This is critical if swap is not - * enabled and the system has low memory. Generally this will - * be run on the second virtual console, and the first will - * be allowed to start a shell or whatever an init script - * specifies. - */ - char c; - message(LOG, "Waiting for enter to start '%s' (pid %d, console %s)\r\n", - command, shell_pgid, terminal ); - write(fileno(stdout), press_enter, sizeof(press_enter) - 1); - read(fileno(stdin), &c, 1); + + if (a->action & ASKFIRST) { + static const char press_enter[] ALIGN1 = +#ifdef CUSTOMIZED_BANNER +#include CUSTOMIZED_BANNER +#endif + "\nPlease press Enter to activate this console. "; + char c; + /* + * Save memory by not exec-ing anything large (like a shell) + * before the user wants it. This is critical if swap is not + * enabled and the system has low memory. Generally this will + * be run on the second virtual console, and the first will + * be allowed to start a shell or whatever an init script + * specifies. + */ + messageD(L_LOG, "waiting for enter to start '%s'" + "(pid %d, tty '%s')\n", + cmdpath, getpid(), a->terminal); + full_write(1, press_enter, sizeof(press_enter) - 1); + while (safe_read(0, &c, 1) == 1 && c != '\n') + continue; } /* Log the process name and args */ - message(LOG, "Starting pid %d, console %s: '", - shell_pgid, terminal, command); - - /* Convert command (char*) into cmd (char**, one word per string) */ - for (tmpCmd=command, i=0; (tmpCmd=strsep(&command, " \t")) != NULL;) { - if (*tmpCmd != '\0') { - cmd[i] = tmpCmd; - message(LOG, "%s ", tmpCmd); - tmpCmd++; - i++; - } + message(L_LOG, "starting pid %d, tty '%s': '%s'", + getpid(), a->terminal, cmdpath); + + if (ENABLE_FEATURE_INIT_COREDUMPS) { + struct stat sb; + if (stat(CORE_ENABLE_FLAG_FILE, &sb) == 0) { + struct rlimit limit; + + limit.rlim_cur = RLIM_INFINITY; + limit.rlim_max = RLIM_INFINITY; + setrlimit(RLIMIT_CORE, &limit); + } } - cmd[i] = NULL; - message(LOG, "'\r\n"); - /* Now run it. The new program will take over this PID, + /* Now run it. The new program will take over this PID, * so nothing further in init.c should be run. */ - execve(cmd[0], cmd, environment); + BB_EXECVP(cmdpath, cmd); /* We're still here? Some error happened. */ - message(LOG|CONSOLE, "Bummer, could not run '%s': %s\n", cmd[0], - strerror(errno)); - exit(-1); - } - return pid; + message(L_LOG | L_CONSOLE, "Cannot run '%s': %s", + cmdpath, strerror(errno)); + _exit(-1); } -static int waitfor(char* command, - char *terminal, int get_enter) +/* Run all commands of a particular type */ +static void run_actions(int action) { - int status, wpid; - int pid = run( command, terminal, get_enter); - - while (1) { - wpid = wait(&status); - if (wpid > 0 ) { - message(LOG, "Process '%s' (pid %d) exited.\n", - command, wpid); - break; + struct init_action *a, *tmp; + + for (a = init_action_list; a; a = tmp) { + tmp = a->next; + if (a->action == action) { + // Pointless: run() will error out if open of device fails. + ///* a->terminal of "" means "init's console" */ + //if (a->terminal[0] && access(a->terminal, R_OK | W_OK)) { + // //message(L_LOG | L_CONSOLE, "Device %s cannot be opened in RW mode", a->terminal /*, strerror(errno)*/); + // delete_init_action(a); + //} else + if (a->action & (SYSINIT | WAIT | CTRLALTDEL | SHUTDOWN | RESTART)) { + waitfor(run(a)); + delete_init_action(a); + } else if (a->action & ONCE) { + run(a); + delete_init_action(a); + } else if (a->action & (RESPAWN | ASKFIRST)) { + /* Only run stuff with pid==0. If they have + * a pid, that means it is still running */ + if (a->pid == 0) { + a->pid = run(a); + } + } + } } - if (wpid == pid ) - break; - } - return wpid; } -/* Make sure there is enough memory to do something useful. * - * Calls swapon if needed so be sure /proc is mounted. */ -static void check_memory() +static void init_reboot(unsigned long magic) { - struct stat statBuf; - - if (mem_total() > 3500) - return; - - if (stat("/etc/fstab", &statBuf) == 0) { - /* Try to turn on swap */ - waitfor("/bin/swapon swapon -a", log, FALSE); - if (mem_total() < 3500) - goto goodnight; - } else - goto goodnight; - return; - -goodnight: - message(CONSOLE, "Sorry, your computer does not have enough memory.\r\n"); - while (1) sleep(1); + pid_t pid; + /* We have to fork here, since the kernel calls do_exit(0) in + * linux/kernel/sys.c, which can cause the machine to panic when + * the init process is killed.... */ + pid = vfork(); + if (pid == 0) { /* child */ + reboot(magic); + _exit(0); + } + waitfor(pid); } -#ifndef DEBUG_INIT -static void shutdown_system(void) +static void kill_all_processes(void) { - /* Allow Ctrl-Alt-Del to reboot system. */ - reboot(RB_ENABLE_CAD); - message(CONSOLE, "\r\nThe system is going down NOW !!\r\n"); - sync(); - - /* Send signals to every process _except_ pid 1 */ - message(CONSOLE, "Sending SIGHUP to all processes.\r\n"); - kill(-1, SIGHUP); - sleep(2); - sync(); - - message(CONSOLE, "Sending SIGKILL to all processes.\r\n"); - kill(-1, SIGKILL); - sleep(1); - - message(CONSOLE, "Disabling swap.\r\n"); - waitfor( "swapoff -a", console, FALSE); - message(CONSOLE, "Unmounting filesystems.\r\n"); - waitfor("umount -a", console, FALSE); - sync(); - if (kernelVersion > 0 && kernelVersion <= 2 * 65536 + 2 * 256 + 11) { - /* bdflush, kupdate not needed for kernels >2.2.11 */ - bdflush(1, 0); + sigset_t block_signals; + + /* run everything to be run at "shutdown". This is done _prior_ + * to killing everything, in case people wish to use scripts to + * shut things down gracefully... */ + run_actions(SHUTDOWN); + + /* first disable all our signals */ + sigfillset(&block_signals); + /*sigemptyset(&block_signals); + sigaddset(&block_signals, SIGHUP); + sigaddset(&block_signals, SIGQUIT); + sigaddset(&block_signals, SIGCHLD); + sigaddset(&block_signals, SIGUSR1); + sigaddset(&block_signals, SIGUSR2); + sigaddset(&block_signals, SIGINT); + sigaddset(&block_signals, SIGTERM); + sigaddset(&block_signals, SIGCONT); + sigaddset(&block_signals, SIGSTOP); + sigaddset(&block_signals, SIGTSTP);*/ + sigprocmask(SIG_BLOCK, &block_signals, NULL); + + message(L_CONSOLE | L_LOG, "The system is going down NOW!"); + + /* Allow Ctrl-Alt-Del to reboot system. */ + init_reboot(RB_ENABLE_CAD); + + /* Send signals to every process _except_ pid 1 */ + message(L_CONSOLE | L_LOG, "Sending SIG%s to all processes", "TERM"); + kill(-1, SIGTERM); sync(); - } + sleep(1); + + message(L_CONSOLE | L_LOG, "Sending SIG%s to all processes", "KILL"); + kill(-1, SIGKILL); + sync(); + sleep(1); } -static void halt_signal(int sig) +static void halt_reboot_pwoff(int sig) { - shutdown_system(); - message(CONSOLE, "The system is halted. Press %s or turn off power\r\n", - (secondConsole == NULL) /* serial console */ - ? "Reset" : "CTRL-ALT-DEL"); - sync(); - - /* allow time for last message to reach serial console */ - sleep(2); - -#if LINUX_VERSION_CODE >= KERNEL_VERSION(2,2,0) - if (sig == SIGUSR2) - reboot(RB_POWER_OFF); - else -#endif - reboot(RB_HALT_SYSTEM); - exit(0); + const char *m; + int rb; + + kill_all_processes(); + + m = "halt"; + rb = RB_HALT_SYSTEM; + if (sig == SIGTERM) { + m = "reboot"; + rb = RB_AUTOBOOT; + } else if (sig == SIGUSR2) { + m = "poweroff"; + rb = RB_POWER_OFF; + } + message(L_CONSOLE | L_LOG, "Requesting system %s", m); + /* allow time for last message to reach serial console */ + sleep(2); + init_reboot(rb); + loop_forever(); } -static void reboot_signal(int sig) +/* Handler for HUP and QUIT - exec "restart" action, + * else (no such action defined) do nothing */ +static void exec_restart_action(int sig ATTRIBUTE_UNUSED) { - shutdown_system(); - message(CONSOLE, "Please stand by while rebooting the system.\r\n"); - sync(); - - /* allow time for last message to reach serial console */ - sleep(2); + struct init_action *a, *tmp; + sigset_t unblock_signals; + + for (a = init_action_list; a; a = tmp) { + tmp = a->next; + if (a->action & RESTART) { + kill_all_processes(); + + /* unblock all signals (blocked in kill_all_processes()) */ + sigfillset(&unblock_signals); + /*sigemptyset(&unblock_signals); + sigaddset(&unblock_signals, SIGHUP); + sigaddset(&unblock_signals, SIGQUIT); + sigaddset(&unblock_signals, SIGCHLD); + sigaddset(&unblock_signals, SIGUSR1); + sigaddset(&unblock_signals, SIGUSR2); + sigaddset(&unblock_signals, SIGINT); + sigaddset(&unblock_signals, SIGTERM); + sigaddset(&unblock_signals, SIGCONT); + sigaddset(&unblock_signals, SIGSTOP); + sigaddset(&unblock_signals, SIGTSTP);*/ + sigprocmask(SIG_UNBLOCK, &unblock_signals, NULL); + + /* Open the new terminal device */ + open_stdio_to_tty(a->terminal, 0 /* - halt if open fails */); + + messageD(L_CONSOLE | L_LOG, "Trying to re-exec %s", a->command); + BB_EXECLP(a->command, a->command, NULL); + + message(L_CONSOLE | L_LOG, "Cannot run '%s': %s", + a->command, strerror(errno)); + sleep(2); + init_reboot(RB_HALT_SYSTEM); + loop_forever(); + } + } +} - reboot(RB_AUTOBOOT); - exit(0); +static void ctrlaltdel_signal(int sig ATTRIBUTE_UNUSED) +{ + run_actions(CTRLALTDEL); } -#if defined BB_FEATURE_INIT_CHROOT -static void check_chroot(int sig) +/* The SIGSTOP & SIGTSTP handler */ +static void stop_handler(int sig ATTRIBUTE_UNUSED) { - char *argv_init[2] = { "init", NULL, }; - char *envp_init[3] = { "HOME=/", "TERM=linux", NULL, }; - char rootpath[256], *tc; - int fd; + int saved_errno = errno; - if ((fd = open("/proc/sys/kernel/init-chroot", O_RDONLY)) == -1) { - message(CONSOLE, "SIGHUP recived, but could not open proc file\r\n"); - sleep(2); - return; - } - if (read(fd, rootpath, sizeof(rootpath)) == -1) { - message(CONSOLE, "SIGHUP recived, but could not read proc file\r\n"); - sleep(2); - return; - } - close(fd); + got_cont = 0; + while (!got_cont) + pause(); - if (rootpath[0] == '\0') { - message(CONSOLE, "SIGHUP recived, but new root is not valid: %s\r\n", - rootpath); - sleep(2); - return; - } - - tc = strrchr(rootpath, '\n'); - *tc = '\0'; - - /* Ok, making it this far means we commit */ - message(CONSOLE, "Please stand by, changing root to `%s'.\r\n", rootpath); - - /* kill all other programs first */ - message(CONSOLE, "Sending SIGTERM to all processes.\r\n"); - kill(-1, SIGTERM); - sleep(2); - sync(); - - message(CONSOLE, "Sending SIGKILL to all processes.\r\n"); - kill(-1, SIGKILL); - sleep(2); - sync(); - - /* ok, we don't need /proc anymore. we also assume that the signaling - * process left the rest of the filesystems alone for us */ - umount("/proc"); - - /* Ok, now we chroot. Hopefully we only have two things mounted, the - * new chroot'd mount point, and the old "/" mount. s, - * we go ahead and unmount the old "/". This should trigger the kernel - * to set things up the Right Way(tm). */ - - if (!chroot(rootpath)) - umount("/dev/root"); - - /* If the chroot fails, we are already too far to turn back, so we - * continue and hope that executing init below will revive the system */ - - /* close all of our descriptors and open new ones */ - close(0); - close(1); - close(2); - open("/dev/console", O_RDWR, 0); - dup(0); - dup(0); - - message(CONSOLE, "Executing real init...\r\n"); - /* execute init in the (hopefully) new root */ - execve("/sbin/init",argv_init,envp_init); - - message(CONSOLE, "ERROR: Could not exec new init. Press %s to reboot.\r\n", - (secondConsole == NULL) /* serial console */ - ? "Reset" : "CTRL-ALT-DEL"); - return; -} -#endif /* BB_FEATURE_INIT_CHROOT */ - -#endif /* ! DEBUG_INIT */ - -void new_initAction (initActionEnum action, - char* process, char* cons) + errno = saved_errno; +} + +/* The SIGCONT handler */ +static void cont_handler(int sig ATTRIBUTE_UNUSED) +{ + got_cont = 1; +} + +static void new_init_action(uint8_t action, const char *command, const char *cons) { - initAction* newAction; - - if (*cons == '\0') - cons = console; - - /* If BusyBox detects that a serial console is in use, - * then entries not refering to the console or null devices will _not_ be run. - * The exception to this rule is the null device. - */ - if (secondConsole == NULL && strcmp(cons, console) && strcmp(cons, "/dev/null")) - return; - - newAction = calloc ((size_t)(1), sizeof(initAction)); - if (!newAction) { - message(LOG|CONSOLE,"Memory allocation failure\n"); - while (1) sleep(1); - } - newAction->nextPtr = initActionList; - initActionList = newAction; - strncpy( newAction->process, process, 255); - newAction->action = action; - strncpy(newAction->console, cons, 255); - newAction->pid = 0; -// message(LOG|CONSOLE, "process='%s' action='%d' console='%s'\n", -// newAction->process, newAction->action, newAction->console); + struct init_action *new_action, *a, *last; + + if (strcmp(cons, bb_dev_null) == 0 && (action & ASKFIRST)) + return; + + /* Append to the end of the list */ + for (a = last = init_action_list; a; a = a->next) { + /* don't enter action if it's already in the list, + * but do overwrite existing actions */ + if ((strcmp(a->command, command) == 0) + && (strcmp(a->terminal, cons) == 0) + ) { + a->action = action; + return; + } + last = a; + } + + new_action = xzalloc(sizeof(struct init_action)); + if (last) { + last->next = new_action; + } else { + init_action_list = new_action; + } + strcpy(new_action->command, command); + new_action->action = action; + strcpy(new_action->terminal, cons); + messageD(L_LOG | L_CONSOLE, "command='%s' action=%d tty='%s'\n", + new_action->command, new_action->action, new_action->terminal); } -void delete_initAction (initAction *action) +static void delete_init_action(struct init_action *action) { - initAction *a, *b=NULL; - for( a=initActionList ; a ; b=a, a=a->nextPtr) { - if (a == action) { - if (b==NULL) { - initActionList=a->nextPtr; - } else { - b->nextPtr=a->nextPtr; - } - free( a); - break; + struct init_action *a, *b = NULL; + + for (a = init_action_list; a; b = a, a = a->next) { + if (a == action) { + if (b == NULL) { + init_action_list = a->next; + } else { + b->next = a->next; + } + free(a); + break; + } } - } } -/* NOTE that if BB_FEATURE_USE_INITTAB is NOT defined, +/* NOTE that if CONFIG_FEATURE_USE_INITTAB is NOT defined, * then parse_inittab() simply adds in some default - * actions(i.e runs INIT_SCRIPT and then starts a pair - * of "askfirst" shells). If BB_FEATURE_USE_INITTAB - * _is_ defined, but /etc/inittab is missing, this + * actions(i.e., runs INIT_SCRIPT and then starts a pair + * of "askfirst" shells). If CONFIG_FEATURE_USE_INITTAB + * _is_ defined, but /etc/inittab is missing, this * results in the same set of default behaviors. - * */ -void parse_inittab(void) + */ +static void parse_inittab(void) { -#ifdef BB_FEATURE_USE_INITTAB - FILE* file; - char buf[256], lineAsRead[256], tmpConsole[256]; - char *p, *q, *r, *s; - const struct initActionType *a = actions; - int foundIt; + FILE *file; + char buf[INIT_BUFFS_SIZE]; + if (ENABLE_FEATURE_USE_INITTAB) + file = fopen(INITTAB, "r"); + else + file = NULL; - file = fopen(INITTAB, "r"); - if (file == NULL) { /* No inittab file -- set up some default behavior */ -#endif - /* Askfirst shell on tty1 */ - new_initAction( ASKFIRST, SHELL, console ); - /* Askfirst shell on tty2 */ - if (secondConsole != NULL) - new_initAction( ASKFIRST, SHELL, secondConsole ); - /* sysinit */ - new_initAction( SYSINIT, INIT_SCRIPT, console ); - - return; -#ifdef BB_FEATURE_USE_INITTAB - } - - while ( fgets(buf, 255, file) != NULL) { - foundIt=FALSE; - for(p = buf; *p == ' ' || *p == '\t'; p++); - if (*p == '#' || *p == '\n') continue; - - /* Trim the trailing \n */ - q = strrchr( p, '\n'); - if (q != NULL) - *q='\0'; - - /* Keep a copy around for posterity's sake (and error msgs) */ - strcpy(lineAsRead, buf); - - /* Grab the ID field */ - s=p; - p = strchr( p, ':'); - if ( p != NULL || *(p+1) != '\0' ) { - *p='\0'; - ++p; + if (file == NULL) { + /* Reboot on Ctrl-Alt-Del */ + new_init_action(CTRLALTDEL, "reboot", ""); + /* Umount all filesystems on halt/reboot */ + new_init_action(SHUTDOWN, "umount -a -r", ""); + /* Swapoff on halt/reboot */ + if (ENABLE_SWAPONOFF) + new_init_action(SHUTDOWN, "swapoff -a", ""); + /* Prepare to restart init when a HUP is received */ + new_init_action(RESTART, "init", ""); + /* Askfirst shell on tty1-4 */ + new_init_action(ASKFIRST, bb_default_login_shell, ""); + new_init_action(ASKFIRST, bb_default_login_shell, VC_2); + new_init_action(ASKFIRST, bb_default_login_shell, VC_3); + new_init_action(ASKFIRST, bb_default_login_shell, VC_4); + /* sysinit */ + new_init_action(SYSINIT, INIT_SCRIPT, ""); + + return; } - /* Now peal off the process field from the end - * of the string */ - q = strrchr( p, ':'); - if ( q == NULL || *(q+1) == '\0' ) { - message(LOG|CONSOLE,"Bad inittab entry: %s\n", lineAsRead); - continue; - } else { - *q='\0'; - ++q; + while (fgets(buf, INIT_BUFFS_SIZE, file) != NULL) { + static const char actions[] = + STR_SYSINIT "sysinit\0" + STR_RESPAWN "respawn\0" + STR_ASKFIRST "askfirst\0" + STR_WAIT "wait\0" + STR_ONCE "once\0" + STR_CTRLALTDEL "ctrlaltdel\0" + STR_SHUTDOWN "shutdown\0" + STR_RESTART "restart\0" + ; + char tmpConsole[CONSOLE_NAME_SIZE]; + char *id, *runlev, *action, *command; + const char *a; + + /* Skip leading spaces */ + id = skip_whitespace(buf); + /* Skip the line if it's a comment */ + if (*id == '#' || *id == '\n') + continue; + /* Trim the trailing '\n' */ + *strchrnul(id, '\n') = '\0'; + + /* Line is: "id:runlevel_ignored:action:command" */ + runlev = strchr(id, ':'); + if (runlev == NULL /*|| runlev[1] == '\0' - not needed */) + goto bad_entry; + action = strchr(runlev + 1, ':'); + if (action == NULL /*|| action[1] == '\0' - not needed */) + goto bad_entry; + command = strchr(action + 1, ':'); + if (command == NULL || command[1] == '\0') + goto bad_entry; + + *command = '\0'; /* action => ":action\0" now */ + for (a = actions; a[0]; a += strlen(a) + 1) { + if (strcmp(a + 1, action + 1) == 0) { + *runlev = '\0'; + if (*id != '\0') { + if (strncmp(id, "/dev/", 5) == 0) + id += 5; + strcpy(tmpConsole, "/dev/"); + safe_strncpy(tmpConsole + 5, id, + sizeof(tmpConsole) - 5); + id = tmpConsole; + } + new_init_action((uint8_t)a[0], command + 1, id); + goto next_line; + } + } + *command = ':'; + /* Choke on an unknown action */ + bad_entry: + message(L_LOG | L_CONSOLE, "Bad inittab entry: %s", id); + next_line: ; } + fclose(file); +} - /* Now peal off the action field */ - r = strrchr( p, ':'); - if ( r == NULL || *(r+1) == '\0') { - message(LOG|CONSOLE,"Bad inittab entry: %s\n", lineAsRead); - continue; - } else { - ++r; +static void reload_signal(int sig ATTRIBUTE_UNUSED) +{ + struct init_action *a, *tmp; + + message(L_LOG, "reloading /etc/inittab"); + + /* disable old entrys */ + for (a = init_action_list; a; a = a->next) { + a->action = ONCE; } - /* Ok, now process it */ - a = actions; - while (a->name != 0) { - if (strcmp(a->name, r) == 0) { - if (*s != '\0') { - struct stat statBuf; - strcpy(tmpConsole, "/dev/"); - strncat(tmpConsole, s, 200); - if (stat(tmpConsole, &statBuf) != 0) { - message(LOG|CONSOLE, "device '%s' does not exist. Did you read the directions?\n", tmpConsole); - break; - } - s = tmpConsole; + parse_inittab(); + + if (ENABLE_FEATURE_KILL_REMOVED) { + /* Be nice and send SIGTERM first */ + for (a = init_action_list; a; a = a->next) { + pid_t pid = a->pid; + if ((a->action & ONCE) && pid != 0) { + kill(pid, SIGTERM); + } } - new_initAction( a->action, q, s); - foundIt=TRUE; - } - a++; +#if CONFIG_FEATURE_KILL_DELAY + if (fork() == 0) { /* child */ + sleep(CONFIG_FEATURE_KILL_DELAY); + for (a = init_action_list; a; a = a->next) { + pid_t pid = a->pid; + if ((a->action & ONCE) && pid != 0) { + kill(pid, SIGKILL); + } + } + _exit(0); + } +#endif } - if (foundIt==TRUE) - continue; - else { - /* Choke on an unknown action */ - message(LOG|CONSOLE, "Bad inittab entry: %s\n", lineAsRead); + + /* remove unused entrys */ + for (a = init_action_list; a; a = tmp) { + tmp = a->next; + if ((a->action & (ONCE | SYSINIT | WAIT)) && a->pid == 0) { + delete_init_action(a); + } } - } - return; -#endif + run_actions(RESPAWN); } -extern int init_main(int argc, char **argv) +int init_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE; +int init_main(int argc, char **argv) { - initAction *a; - pid_t wpid; - int status; - -#ifndef DEBUG_INIT - /* Expect to be PID 1 if we are run as init (not linuxrc) */ - if (getpid() != 1 && strstr(argv[0], "init")!=NULL ) { - usage( "init\n\nInit is the parent of all processes.\n\n" - "This version of init is designed to be run only by the kernel\n"); - } - /* Fix up argv[0] to be certain we claim to be init */ - strncpy(argv[0], "init", strlen(argv[0])); - - /* Set up sig handlers -- be sure to - * clear all of these in run() */ - signal(SIGUSR1, halt_signal); - signal(SIGUSR2, reboot_signal); - signal(SIGINT, reboot_signal); - signal(SIGTERM, reboot_signal); -#if defined BB_FEATURE_INIT_CHROOT - signal(SIGHUP, check_chroot); -#endif + struct init_action *a; + pid_t wpid; - /* Turn off rebooting via CTL-ALT-DEL -- we get a - * SIGINT on CAD so we can shut things down gracefully... */ - reboot(RB_DISABLE_CAD); -#endif - - /* Figure out where the default console should be */ - console_init(); - - /* Close whatever files are open, and reset the console. */ - close(0); - close(1); - close(2); - set_term(0); - setsid(); - - /* Make sure PATH is set to something sane */ - putenv(_PATH_STDPATH); - - /* Hello world */ -#ifndef DEBUG_INIT - message(LOG|CONSOLE, - "init started: BusyBox v%s (%s) multi-call binary\r\n", - BB_VER, BB_BT); -#else - message(LOG|CONSOLE, - "init(%d) started: BusyBox v%s (%s) multi-call binary\r\n", - getpid(), BB_VER, BB_BT); -#endif + die_sleep = 30 * 24*60*60; /* if xmalloc will ever die... */ - - /* Mount /proc */ - if (mount ("proc", "/proc", "proc", 0, 0) == 0) { - message(LOG|CONSOLE, "Mounting /proc: done.\n"); - kernelVersion = get_kernel_revision(); - } else - message(LOG|CONSOLE, "Mounting /proc: failed!\n"); - - /* Make sure there is enough memory to do something useful. */ - check_memory(); - - /* Check if we are supposed to be in single user mode */ - if ( argc > 1 && (!strcmp(argv[1], "single") || - !strcmp(argv[1], "-s") || !strcmp(argv[1], "1"))) - { - /* Ask first then start a shell on tty2 */ - if (secondConsole != NULL) - new_initAction( ASKFIRST, SHELL, secondConsole); - /* Start a shell on tty1 */ - new_initAction( RESPAWN, SHELL, console); - } else { - /* Not in single user mode -- see what inittab says */ - - /* NOTE that if BB_FEATURE_USE_INITTAB is NOT defined, - * then parse_inittab() simply adds in some default - * actions(i.e runs INIT_SCRIPT and then starts a pair - * of "askfirst" shells */ - parse_inittab(); - } + if (argc > 1 && !strcmp(argv[1], "-q")) { + return kill(1, SIGHUP); + } - /* Now run everything that needs to be run */ + if (!ENABLE_DEBUG_INIT) { + /* Expect to be invoked as init with PID=1 or be invoked as linuxrc */ + if (getpid() != 1 + && (!ENABLE_FEATURE_INITRD || !strstr(applet_name, "linuxrc")) + ) { + bb_show_usage(); + } + /* Set up sig handlers -- be sure to + * clear all of these in run() */ + signal(SIGHUP, exec_restart_action); + signal(SIGQUIT, exec_restart_action); + signal(SIGUSR1, halt_reboot_pwoff); /* halt */ + signal(SIGUSR2, halt_reboot_pwoff); /* poweroff */ + signal(SIGTERM, halt_reboot_pwoff); /* reboot */ + signal(SIGINT, ctrlaltdel_signal); + signal(SIGCONT, cont_handler); + signal(SIGSTOP, stop_handler); + signal(SIGTSTP, stop_handler); + + /* Turn off rebooting via CTL-ALT-DEL -- we get a + * SIGINT on CAD so we can shut things down gracefully... */ + init_reboot(RB_DISABLE_CAD); + } - /* First run the sysinit command */ - for( a=initActionList ; a; a=a->nextPtr) { - if (a->action == SYSINIT) { - waitfor(a->process, a->console, FALSE); - /* Now remove the "sysinit" entry from the list */ - delete_initAction( a); + /* Figure out where the default console should be */ + console_init(); + set_sane_term(); + chdir("/"); + setsid(); + { + const char *const *e; + /* Make sure environs is set to something sane */ + for (e = environment; *e; e++) + putenv((char *) *e); } - } - /* Next run anything that wants to block */ - for( a=initActionList ; a; a=a->nextPtr) { - if (a->action == WAIT) { - waitfor(a->process, a->console, FALSE); - /* Now remove the "wait" entry from the list */ - delete_initAction( a); + + if (argc > 1) setenv("RUNLEVEL", argv[1], 1); + + /* Hello world */ + message(MAYBE_CONSOLE | L_LOG, "init started: %s", bb_banner); + + /* Make sure there is enough memory to do something useful. */ + if (ENABLE_SWAPONOFF) { + struct sysinfo info; + + if (!sysinfo(&info) && + (info.mem_unit ? : 1) * (long long)info.totalram < 1024*1024) + { + message(L_CONSOLE, "Low memory, forcing swapon"); + /* swapon -a requires /proc typically */ + new_init_action(SYSINIT, "mount -t proc proc /proc", ""); + /* Try to turn on swap */ + new_init_action(SYSINIT, "swapon -a", ""); + run_actions(SYSINIT); /* wait and removing */ + } } - } - /* Next run anything to be run only once */ - for( a=initActionList ; a; a=a->nextPtr) { - if (a->action == ONCE) { - run(a->process, a->console, FALSE); - /* Now remove the "once" entry from the list */ - delete_initAction( a); + + /* Check if we are supposed to be in single user mode */ + if (argc > 1 + && (!strcmp(argv[1], "single") || !strcmp(argv[1], "-s") || LONE_CHAR(argv[1], '1')) + ) { + /* Start a shell on console */ + new_init_action(RESPAWN, bb_default_login_shell, ""); + } else { + /* Not in single user mode -- see what inittab says */ + + /* NOTE that if CONFIG_FEATURE_USE_INITTAB is NOT defined, + * then parse_inittab() simply adds in some default + * actions(i.e., runs INIT_SCRIPT and then starts a pair + * of "askfirst" shells */ + parse_inittab(); } - } - /* If there is nothing else to do, stop */ - if (initActionList == NULL) { - message(LOG|CONSOLE, "No more tasks for init -- sleeping forever.\n"); - while (1) sleep(1); - } - - /* Now run the looping stuff for the rest of forever */ - while (1) { - for( a=initActionList ; a; a=a->nextPtr) { - /* Only run stuff with pid==0. If they have - * a pid, that means they are still running */ - if (a->pid == 0) { - switch(a->action) { - case RESPAWN: - /* run the respawn stuff */ - a->pid = run(a->process, a->console, FALSE); - break; - case ASKFIRST: - /* run the askfirst stuff */ - a->pid = run(a->process, a->console, TRUE); - break; - /* silence the compiler's incessant whining */ - default: - break; + +#if ENABLE_SELINUX + if (getenv("SELINUX_INIT") == NULL) { + int enforce = 0; + + putenv((char*)"SELINUX_INIT=YES"); + if (selinux_init_load_policy(&enforce) == 0) { + BB_EXECVP(argv[0], argv); + } else if (enforce > 0) { + /* SELinux in enforcing mode but load_policy failed */ + message(L_CONSOLE, "Cannot load SELinux Policy. " + "Machine is in enforcing mode. Halting now."); + exit(1); } - } } - /* Wait for a child process to exit */ - wpid = wait(&status); - if (wpid > 0 ) { - /* Find out who died and clean up their corpse */ - for( a=initActionList ; a; a=a->nextPtr) { - if (a->pid==wpid) { - a->pid=0; - message(LOG, "Process '%s' (pid %d) exited. Scheduling it for restart.\n", - a->process, wpid); +#endif /* CONFIG_SELINUX */ + + /* Make the command line just say "init" - thats all, nothing else */ + strncpy(argv[0], "init", strlen(argv[0])); + /* Wipe argv[1]-argv[N] so they don't clutter the ps listing */ + while (*++argv) + memset(*argv, 0, strlen(*argv)); + + /* Now run everything that needs to be run */ + + /* First run the sysinit command */ + run_actions(SYSINIT); + + /* Next run anything that wants to block */ + run_actions(WAIT); + + /* Next run anything to be run only once */ + run_actions(ONCE); + + /* Redefine SIGHUP to reread /etc/inittab */ + if (ENABLE_FEATURE_USE_INITTAB) + signal(SIGHUP, reload_signal); + else + signal(SIGHUP, SIG_IGN); + + /* Now run the looping stuff for the rest of forever */ + while (1) { + /* run the respawn stuff */ + run_actions(RESPAWN); + + /* run the askfirst stuff */ + run_actions(ASKFIRST); + + /* Don't consume all CPU time -- sleep a bit */ + sleep(1); + + /* Wait for any child process to exit */ + wpid = wait(NULL); + while (wpid > 0) { + /* Find out who died and clean up their corpse */ + for (a = init_action_list; a; a = a->next) { + if (a->pid == wpid) { + /* Set the pid to 0 so that the process gets + * restarted by run_actions() */ + a->pid = 0; + message(L_LOG, "process '%s' (pid %d) exited. " + "Scheduling it for restart.", + a->command, wpid); + } + } + /* see if anyone else is waiting to be reaped */ + wpid = wait_any_nohang(NULL); } - } } - sleep(1); - } } -