X-Git-Url: https://git.librecmc.org/?a=blobdiff_plain;f=init%2Finit.c;h=1caf45b8d40e51803ec0d92350bd9e7ff1a37874;hb=15437e3e2a0cc9e4ba25066fd562b2862d38799b;hp=145452ff3ad3a31ef7871356253a071fc99dcc86;hpb=7f1978570fb8f27c05d7b0cf2a964ded5db41ee7;p=oweals%2Fbusybox.git diff --git a/init/init.c b/init/init.c index 145452ff3..1caf45b8d 100644 --- a/init/init.c +++ b/init/init.c @@ -2,281 +2,254 @@ /* * 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. */ -/* Turn this on to disable all the dangerous - rebooting stuff when debugging. -#define DEBUG_INIT -*/ - -#include -#include -#include +#include "libbb.h" +#include #include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include "busybox.h" -#define bb_need_full_version -#define BB_DECLARE_EXTERN -#include "messages.c" -#ifdef BB_SYSLOGD -# include -#endif - - -/* From */ -struct vt_stat { - unsigned short v_active; /* active vt */ - unsigned short v_signal; /* signal to send */ - unsigned short v_state; /* vt bitmask */ -}; -static const int VT_GETSTATE = 0x5603; /* get global vt state info */ - -/* From */ -struct serial_struct { - int type; - int line; - int port; - int irq; - int flags; - int xmit_fifo_size; - int custom_divisor; - int baud_base; - unsigned short close_delay; - char reserved_char[2]; - int hub6; - unsigned short closing_wait; /* time to wait before closing */ - unsigned short closing_wait2; /* no longer used... */ - int reserved[4]; -}; - - - -#ifndef RB_HALT_SYSTEM -static const int RB_HALT_SYSTEM = 0xcdef0123; -static const int RB_ENABLE_CAD = 0x89abcdef; -static const int RB_DISABLE_CAD = 0; -#define RB_POWER_OFF 0x4321fedc -static const int RB_AUTOBOOT = 0x01234567; -#if defined(__GLIBC__) || defined (__UCLIBC__) #include - #define init_reboot(magic) reboot(magic) -#else - #define init_reboot(magic) reboot(0xfee1dead, 672274793, magic) -#endif -#endif -#ifndef _PATH_STDPATH -#define _PATH_STDPATH "/usr/bin:/bin:/usr/sbin:/sbin" -#endif +/* Was a CONFIG_xxx option. A lot of people were building + * not fully functional init by switching it on! */ +#define DEBUG_INIT 0 +#define COMMAND_SIZE 256 +#define CONSOLE_NAME_SIZE 32 +#define MAXENV 16 /* Number of env. vars */ -#if defined BB_FEATURE_INIT_COREDUMPS /* - * When a file named CORE_ENABLE_FLAG_FILE exists, setrlimit is called + * 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 -#include -#endif - -#define KERNEL_VERSION(a,b,c) (((a) << 16) + ((b) << 8) + (c)) -#if defined(__GLIBC__) -#include -#else -#include -#include -static _syscall2(int, bdflush, int, func, int, data); -#endif /* __GLIBC__ */ - - -#define VT_PRIMARY "/dev/tty1" /* Primary virtual console */ -#define VT_SECONDARY "/dev/tty2" /* Virtual console */ -#define VT_THIRD "/dev/tty3" /* Virtual console */ -#define VT_FOURTH "/dev/tty4" /* Virtual console */ -#define VT_LOG "/dev/tty5" /* 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 MAXENV 16 /* Number of env. vars */ -//static const int MAXENV = 16; /* Number of env. vars */ -static const int LOG = 0x1; -static const int CONSOLE = 0x2; - /* Allowed init action types */ -typedef enum { - SYSINIT = 1, - RESPAWN, - ASKFIRST, - WAIT, - ONCE, - CTRLALTDEL -} initActionEnum; - -/* A mapping between "inittab" action name strings and action type codes. */ -typedef struct initActionType { - const char *name; - initActionEnum action; -} initActionType; - -static const struct initActionType actions[] = { - {"sysinit", SYSINIT}, - {"respawn", RESPAWN}, - {"askfirst", ASKFIRST}, - {"wait", WAIT}, - {"once", ONCE}, - {"ctrlaltdel", CTRLALTDEL}, - {0, 0} -}; - -/* Set up a linked list of initActions, to be read from inittab */ -typedef struct initActionTag initAction; -struct initActionTag { +#define SYSINIT 0x01 +#define RESPAWN 0x02 +/* like respawn, but wait for to be pressed on tty: */ +#define ASKFIRST 0x04 +#define WAIT 0x08 +#define ONCE 0x10 +#define CTRLALTDEL 0x20 +#define SHUTDOWN 0x40 +#define RESTART 0x80 + +/* Set up a linked list of init_actions, to be read from inittab */ +struct init_action { + struct init_action *next; pid_t pid; - char process[256]; - char console[256]; - initAction *nextPtr; - initActionEnum action; + uint8_t action_type; + char terminal[CONSOLE_NAME_SIZE]; + char command[COMMAND_SIZE]; }; -static initAction *initActionList = NULL; +/* Static variables */ +static struct init_action *init_action_list = NULL; + +static const char *log_console = VC_5; + +enum { + L_LOG = 0x1, + L_CONSOLE = 0x2, -static char *secondConsole = VT_SECONDARY; -static char *thirdConsole = VT_THIRD; -static char *fourthConsole = VT_FOURTH; -static char *log = VT_LOG; -static int kernelVersion = 0; -static char termType[32] = "TERM=linux"; -static char console[32] = _PATH_CONSOLE; +#if ENABLE_FEATURE_EXTRA_QUIET + MAYBE_CONSOLE = 0x0, +#else + MAYBE_CONSOLE = L_CONSOLE, +#endif -static void delete_initAction(initAction * action); +#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 +}; +/* Function prototypes */ +static void halt_reboot_pwoff(int sig) NORETURN; -/* Print a message to the specified device. - * Device may be bitwise-or'd from LOG | CONSOLE */ -static void message(int device, char *fmt, ...) - __attribute__ ((format (printf, 2, 3))); -static void message(int device, char *fmt, ...) +static void waitfor(pid_t pid) { - va_list arguments; - int fd; + /* waitfor(run(x)): protect against failed fork inside run() */ + if (pid <= 0) + return; -#ifdef BB_SYSLOGD + /* 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; +} - /* Log the message to syslogd */ - if (device & LOG) { - char msg[1024]; +static void loop_forever(void) NORETURN; +static void loop_forever(void) +{ + while (1) + sleep(1); +} - va_start(arguments, fmt); - vsnprintf(msg, sizeof(msg), fmt, arguments); - va_end(arguments); - openlog(applet_name, 0, LOG_USER); - syslog(LOG_USER|LOG_INFO, msg); - closelog(); - } -#else +/* Print a message to the specified device. + * "where" may be bitwise-or'd from L_LOG | L_CONSOLE + * NB: careful, we can be called after vfork! + */ +#define messageD(...) do { if (DEBUG_INIT) message(__VA_ARGS__); } while (0) +static void message(int where, const char *fmt, ...) + __attribute__ ((format(printf, 2, 3))); +static void message(int where, const char *fmt, ...) +{ 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 = -2; - fprintf(stderr, "Bummer, can't write to log on %s!\r\n", log); - log = NULL; - device = CONSOLE; + va_list arguments; + unsigned l; + char msg[128]; + + msg[0] = '\r'; + va_start(arguments, fmt); + l = vsnprintf(msg + 1, sizeof(msg) - 2, fmt, arguments); + if (l > sizeof(msg) - 2) + l = sizeof(msg) - 2; + msg[l] = '\0'; + va_end(arguments); + + if (ENABLE_FEATURE_INIT_SYSLOG) { + /* Log the message to syslogd */ + if (where & L_LOG) { + /* don't print 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 = STDERR_FILENO; + } 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); + where = L_CONSOLE; + } else { + close_on_exec_on(log_fd); + } + } + } + if (where & L_LOG) { + full_write(log_fd, msg, l); + if (log_fd == STDERR_FILENO) + return; /* don't print dup messages */ } } - if ((device & LOG) && (log_fd >= 0)) { - va_start(arguments, fmt); - vdprintf(log_fd, fmt, arguments); - va_end(arguments); + + if (where & L_CONSOLE) { + /* Send console messages to console so people will see them. */ + full_write(STDERR_FILENO, msg, l); } -#endif +} + +/* 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; - 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); - } else { - fprintf(stderr, "Bummer, can't print: "); - va_start(arguments, fmt); - vfprintf(stderr, fmt, arguments); - va_end(arguments); + 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, STDIN_FILENO); + dup2(fd, STDOUT_FILENO); + xmove_fd(fd, STDERR_FILENO); } + messageD(L_LOG, "console='%s'", s); + } else { + /* Make sure fd 0,1,2 are not closed + * (so that they won't be used by future opens) */ + bb_sanitize_stdio(); +// Users report problems +// /* Make sure init can't be blocked by writing to stderr */ +// fcntl(STDERR_FILENO, F_SETFL, fcntl(STDERR_FILENO, F_GETFL) | O_NONBLOCK); } + + s = getenv("TERM"); + if (ioctl(STDIN_FILENO, 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 */ -static void set_term(int fd) +/* Set terminal settings to reasonable defaults. + * NB: careful, we can be called after vfork! */ +static void set_sane_term(void) { struct termios tty; - tcgetattr(fd, &tty); + tcgetattr(STDIN_FILENO, &tty); /* 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[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 */ + tty.c_cc[VSTOP] = 19; /* C-s */ + tty.c_cc[VSUSP] = 26; /* C-z */ - /* use line dicipline 0 */ + /* use line discipline 0 */ tty.c_line = 0; /* Make it be sane */ - tty.c_cflag &= CBAUD|CBAUDEX|CSIZE|CSTOPB|PARENB|PARODD; - tty.c_cflag |= HUPCL|CLOCAL; + tty.c_cflag &= CBAUD | CBAUDEX | CSIZE | CSTOPB | PARENB | PARODD; + tty.c_cflag |= CREAD | HUPCL | CLOCAL; /* input modes */ tty.c_iflag = ICRNL | IXON | IXOFF; @@ -288,740 +261,676 @@ static void set_term(int fd) tty.c_lflag = ISIG | ICANON | ECHO | ECHOE | ECHOK | ECHOCTL | ECHOKE | IEXTEN; - tcsetattr(fd, TCSANOW, &tty); + tcsetattr_stdin_TCSANOW(&tty); } -/* How much memory does this machine have? - Units are kBytes to avoid overflow on 4GB machines */ -static int check_free_memory() +/* Open the new terminal device. + * NB: careful, we can be called after vfork! */ +static void open_stdio_to_tty(const char* tty_name, int exit_on_failure) { - struct sysinfo info; - unsigned int result, u, s=10; - - if (sysinfo(&info) != 0) { - perror_msg("Error checking free memory"); - return -1; + /* empty tty_name means "use init's tty", else... */ + if (tty_name[0]) { + int fd; + close(STDIN_FILENO); + /* 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(EXIT_FAILURE); + if (DEBUG_INIT) + _exit(2); + /* NB: we don't reach this if we were called after vfork. + * Thus halt_reboot_pwoff() itself need not be vfork-safe. */ + halt_reboot_pwoff(SIGUSR1); /* halt the system */ + } + dup2(STDIN_FILENO, STDOUT_FILENO); + dup2(STDIN_FILENO, STDERR_FILENO); } - - /* Kernels 2.0.x and 2.2.x return info.mem_unit==0 with values in bytes. - * Kernels 2.4.0 return info.mem_unit in bytes. */ - u = info.mem_unit; - if (u==0) u=1; - while ( (u&1) == 0 && s > 0 ) { u>>=1; s--; } - result = (info.totalram>>s) + (info.totalswap>>s); - result = result*u; - if (result < 0) result = INT_MAX; - return result; + set_sane_term(); } -static void console_init() +/* Wrapper around exec: + * Takes string (max COMMAND_SIZE chars). + * If chars like '>' detected, execs '[-]/bin/sh -c "exec ......."'. + * Otherwise splits words on whitespace, deals with leading dash, + * and uses plain exec(). + * NB: careful, we can be called after vfork! + */ +static void init_exec(const char *command) { - int fd; - int tried_devcons = 0; - int tried_vtprimary = 0; - struct vt_stat vt; - 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 { - /* 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"); + char *cmd[COMMAND_SIZE / 2]; + char buf[COMMAND_SIZE + 6]; /* COMMAND_SIZE+strlen("exec ")+1 */ + int dash = (command[0] == '-' /* maybe? && command[1] == '/' */); + + /* See if any special /bin/sh requiring characters are present */ + if (strpbrk(command, "~`!$^&*()=|\\{}[];\"'<>?") != NULL) { + strcpy(buf, "exec "); + strcpy(buf + 5, command + dash); /* excluding "-" */ + /* NB: LIBBB_DEFAULT_LOGIN_SHELL define has leading dash */ + cmd[0] = (char*)(LIBBB_DEFAULT_LOGIN_SHELL + !dash); + cmd[1] = (char*)"-c"; + cmd[2] = buf; + cmd[3] = NULL; } else { - /* check for serial console and disable logging to tty5 & running a - * shell to tty2-4 */ - if (ioctl(0, TIOCGSERIAL, &sr) == 0) { - log = NULL; - secondConsole = NULL; - thirdConsole = NULL; - fourthConsole = NULL; - /* Force the TERM setting to vt102 for serial console -- - * iff TERM is set to linux (the default) */ - if (strcmp( termType, "TERM=linux" ) == 0) - snprintf(termType, sizeof(termType) - 1, "TERM=vt102"); - message(LOG | CONSOLE, - "serial console detected. Disabling virtual terminals.\r\n"); + /* Convert command (char*) into cmd (char**, one word per string) */ + char *word, *next; + int i = 0; + next = strcpy(buf, command); /* including "-" */ + while ((word = strsep(&next, " \t")) != NULL) { + if (*word != '\0') { /* not two spaces/tabs together? */ + cmd[i] = word; + i++; + } } - close(fd); + cmd[i] = NULL; } - message(LOG, "console=%s\n", console); + /* If we saw leading "-", it is interactive shell. + * Try harder to give it a controlling tty. + * And skip "-" in actual exec call. */ + if (dash) { + /* _Attempt_ to make stdin a controlling tty. */ + if (ENABLE_FEATURE_INIT_SCTTY) + ioctl(STDIN_FILENO, TIOCSCTTY, 0 /*only try, don't steal*/); + } + BB_EXECVP(cmd[0] + dash, cmd); + message(L_LOG | L_CONSOLE, "cannot run '%s': %s", cmd[0], strerror(errno)); + /* returns if execvp fails */ } -static pid_t run(char *command, char *terminal, int get_enter) +/* Used only by run_actions */ +static pid_t run(const struct init_action *a) { - int i, j; - int fd; pid_t pid; - char *tmpCmd, *s; - char *cmd[255], *cmdpath; - char buf[255]; - static const char press_enter[] = - -#ifdef CUSTOMIZED_BANNER -#include CUSTOMIZED_BANNER -#endif + sigset_t nmask, omask; + + /* Block sigchild while forking (why?) */ + sigemptyset(&nmask); + sigaddset(&nmask, SIGCHLD); + sigprocmask(SIG_BLOCK, &nmask, &omask); + if (BB_MMU && (a->action_type & ASKFIRST)) + pid = fork(); + else + pid = vfork(); + 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 */ + bb_signals(0 + + (1 << SIGUSR1) + + (1 << SIGUSR2) + + (1 << SIGINT) + + (1 << SIGTERM) + + (1 << SIGHUP) + + (1 << SIGQUIT) + + (1 << SIGCONT) + + (1 << SIGSTOP) + + (1 << SIGTSTP) + , SIG_DFL); + + /* Create a new session and make ourself the process + * group leader */ + setsid(); - "\nPlease press Enter to activate this console. "; - char *environment[MAXENV+1] = { - termType, - "HOME=/", - "PATH=/usr/bin:/bin:/usr/sbin:/sbin", - "SHELL=/bin/sh", - "USER=root", - NULL - }; - - /* inherit environment to the child, merging our values -andy */ - for (i=0; environ[i]; i++) { - for (j=0; environment[j]; j++) { - s = strchr(environment[j], '='); - if (!strncmp(environ[i], environment[j], s - environment[j])) - break; + /* Open the new terminal device */ + open_stdio_to_tty(a->terminal, 1 /* - exit if open fails */); + +// NB: do not enable unless you change vfork to fork above +#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_type & (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(EXIT_FAILURE); } - if (!environment[j]) { - environment[j++] = environ[i]; - environment[j] = NULL; - } - } - if ((pid = fork()) == 0) { - /* Clean up */ - ioctl(0, TIOCNOTTY, 0); - close(0); - close(1); - close(2); - setsid(); - - /* Reset signal handlers set for parent process */ - signal(SIGUSR1, SIG_DFL); - signal(SIGUSR2, SIG_DFL); - signal(SIGINT, SIG_DFL); - signal(SIGTERM, SIG_DFL); - signal(SIGHUP, SIG_DFL); - - if ((fd = device_open(terminal, O_RDWR)) < 0) { - struct stat statBuf; - if (stat(terminal, &statBuf) != 0) { - message(LOG | CONSOLE, "device '%s' does not exist.\n", - terminal); - exit(1); + if (pid > 0) { + /* Parent - wait till the child is done */ + bb_signals(0 + + (1 << SIGINT) + + (1 << SIGTSTP) + + (1 << SIGQUIT) + , SIG_IGN); + signal(SIGCHLD, SIG_DFL); + + waitfor(pid); + /* See if stealing the controlling tty back is necessary */ + if (tcgetpgrp(0) != getpid()) + _exit(EXIT_SUCCESS); + + /* Use a temporary process to steal the controlling tty. */ + pid = fork(); + if (pid < 0) { + message(L_LOG | L_CONSOLE, "can't fork"); + _exit(EXIT_FAILURE); } - message(LOG | CONSOLE, "Bummer, can't open %s\r\n", terminal); - exit(1); + if (pid == 0) { + setsid(); + ioctl(0, TIOCSCTTY, 1); + _exit(EXIT_SUCCESS); + } + waitfor(pid); + _exit(EXIT_SUCCESS); } - dup2(fd, 0); - dup2(fd, 1); - dup2(fd, 2); - ioctl(0, TIOCSCTTY, 1); - 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. - */ -#ifdef DEBUG_INIT - message(LOG, "Waiting for enter to start '%s' (pid %d, console %s)\r\n", - command, getpid(), terminal); + /* Child - fall though to actually execute things */ + } #endif - write(fileno(stdout), press_enter, sizeof(press_enter) - 1); - getc(stdin); - } -#ifdef DEBUG_INIT - /* Log the process name and args */ - message(LOG, "Starting pid %d, console %s: '%s'\r\n", - getpid(), terminal, command); + /* NB: on NOMMU we can't wait for input in child, so + * "askfirst" will work the same as "respawn". */ + if (BB_MMU && (a->action_type & 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", + a->command, getpid(), a->terminal); + full_write(STDOUT_FILENO, press_enter, sizeof(press_enter) - 1); + while (safe_read(STDIN_FILENO, &c, 1) == 1 && c != '\n') + continue; + } - /* See if any special /bin/sh requiring characters are present */ - if (strpbrk(command, "~`!$^&*()=|\\{}[];\"'<>?") != NULL) { - cmd[0] = SHELL; - cmd[1] = "-c"; - strcpy(buf, "exec "); - strncat(buf, command, sizeof(buf) - strlen(buf) - 1); - cmd[2] = buf; - cmd[3] = NULL; - } else { - /* 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; - tmpCmd++; - i++; - } - } - cmd[i] = NULL; + 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); } + } - 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 == '-') { - char *s; - - /* skip over the dash */ - ++cmdpath; + /* Log the process name and args */ + message(L_LOG, "starting pid %d, tty '%s': '%s'", + getpid(), a->terminal, a->command); - /* find the last component in the command pathname */ - s = get_last_path_component(cmdpath); + /* Now run it. The new program will take over this PID, + * so nothing further in init.c should be run. */ + init_exec(a->command); + /* We're still here? Some error happened. */ + _exit(-1); +} - /* make a new argv[0] */ - if ((cmd[0] = malloc(strlen(s)+2)) == NULL) { - message(LOG | CONSOLE, "malloc failed"); - cmd[0] = cmdpath; - } else { - cmd[0][0] = '-'; - strcpy(cmd[0]+1, s); - } - } +static void delete_init_action(struct init_action *action) +{ + struct init_action *a, *b = NULL; -#if defined BB_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); + 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; } -#endif - - /* Now run it. The new program will take over this PID, - * so nothing further in init.c should be run. */ - execve(cmdpath, cmd, environment); - - /* We're still here? Some error happened. */ - message(LOG | CONSOLE, "Bummer, could not run '%s': %s\n", cmdpath, - strerror(errno)); - exit(-1); } - return pid; } -static int waitfor(char *command, char *terminal, int get_enter) +/* Run all commands of a particular type */ +static void run_actions(int action_type) { - int status, wpid; - int pid = run(command, terminal, get_enter); - - while (1) { - wpid = wait(&status); - if (wpid > 0 && wpid != pid) { - continue; + struct init_action *a, *tmp; + + for (a = init_action_list; a; a = tmp) { + tmp = a->next; + if (a->action_type & action_type) { + // 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_type & (SYSINIT | WAIT | CTRLALTDEL | SHUTDOWN | RESTART)) { + waitfor(run(a)); + delete_init_action(a); + } else if (a->action_type & ONCE) { + run(a); + delete_init_action(a); + } else if (a->action_type & (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 -a" if needed so be sure /etc/fstab is present... */ -static void check_memory() -{ - struct stat statBuf; - - if (check_free_memory() > 1000) - return; - - if (stat("/etc/fstab", &statBuf) == 0) { - /* swapon -a requires /proc typically */ - waitfor("mount proc /proc -t proc", console, FALSE); - /* Try to turn on swap */ - waitfor("swapon -a", console, FALSE); - if (check_free_memory() < 1000) - goto goodnight; - } else - goto goodnight; - return; - - goodnight: - message(CONSOLE, - "Sorry, your computer does not have enough memory.\r\n"); - while (1) - sleep(1); } -/* Run all commands to be run right before halt/reboot */ -static void run_lastAction(void) +static void init_reboot(unsigned long magic) { - initAction *a, *tmp; - for (a = initActionList; a; a = tmp) { - tmp = a->nextPtr; - if (a->action == CTRLALTDEL) { - waitfor(a->process, a->console, FALSE); - delete_initAction(a); - } + pid_t pid; + /* We have to fork here, since the kernel calls do_exit(EXIT_SUCCESS) 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(EXIT_SUCCESS); } + waitfor(pid); } - -#ifndef DEBUG_INIT -static void shutdown_system(void) +static void kill_all_processes(void) { + /* 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 our SIGHUP signal */ - signal(SIGHUP, SIG_DFL); + /* first disable all our signals */ + sigprocmask_allsigs(SIG_BLOCK); + + message(L_CONSOLE | L_LOG, "The system is going down NOW!"); /* Allow Ctrl-Alt-Del to reboot system. */ init_reboot(RB_ENABLE_CAD); - message(CONSOLE|LOG, "\r\nThe system is going down NOW !!\r\n"); - sync(); - /* Send signals to every process _except_ pid 1 */ - message(CONSOLE|LOG, "Sending SIGTERM to all processes.\r\n"); + message(L_CONSOLE | L_LOG, "Sending SIG%s to all processes", "TERM"); kill(-1, SIGTERM); - sleep(1); sync(); - - message(CONSOLE|LOG, "Sending SIGKILL to all processes.\r\n"); - kill(-1, SIGKILL); sleep(1); - /* run everything to be run at "ctrlaltdel" */ - run_lastAction(); - + message(L_CONSOLE | L_LOG, "Sending SIG%s to all processes", "KILL"); + kill(-1, SIGKILL); sync(); - if (kernelVersion > 0 && kernelVersion <= KERNEL_VERSION(2,2,11)) { - /* bdflush, kupdate not needed for kernels >2.2.11 */ - bdflush(1, 0); - sync(); - } + sleep(1); } -static void halt_signal(int sig) +static void halt_reboot_pwoff(int sig) { - shutdown_system(); - message(CONSOLE|LOG, - "The system is halted. Press %s or turn off power\r\n", - (secondConsole == NULL) /* serial console */ - ? "Reset" : "CTRL-ALT-DEL"); - sync(); - + const char *m = "halt"; + int rb; + + kill_all_processes(); + + 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); - - if (sig == SIGUSR2 && kernelVersion >= KERNEL_VERSION(2,2,0)) - init_reboot(RB_POWER_OFF); - else - init_reboot(RB_HALT_SYSTEM); - exit(0); + init_reboot(rb); + loop_forever(); } -static void reboot_signal(int sig) +/* Handler for QUIT - exec "restart" action, + * else (no such action defined) do nothing */ +static void exec_restart_action(int sig UNUSED_PARAM) { - shutdown_system(); - message(CONSOLE|LOG, "Please stand by while rebooting the system.\r\n"); - sync(); + struct init_action *a; - /* allow time for last message to reach serial console */ - sleep(2); + for (a = init_action_list; a; a = a->next) { + if (a->action_type & RESTART) { + kill_all_processes(); - init_reboot(RB_AUTOBOOT); - exit(0); -} + /* unblock all signals (blocked in kill_all_processes()) */ + sigprocmask_allsigs(SIG_UNBLOCK); -#endif /* ! DEBUG_INIT */ + /* 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); + init_exec(a->command); + sleep(2); + init_reboot(RB_HALT_SYSTEM); + loop_forever(); + } + } +} -static void new_initAction(initActionEnum action, char *process, char *cons) +static void ctrlaltdel_signal(int sig UNUSED_PARAM) { - initAction *newAction; + run_actions(CTRLALTDEL); +} - if (*cons == '\0') - cons = console; +/* The SIGCONT handler is set to record_signo(). + * It just sets bb_got_signal = SIGCONT. */ - /* 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; +/* The SIGSTOP & SIGTSTP handler */ +static void stop_handler(int sig UNUSED_PARAM) +{ + int saved_errno = errno; - 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); + bb_got_signal = 0; + while (bb_got_signal == 0) + pause(); + + errno = saved_errno; } -static void delete_initAction(initAction * action) +static void new_init_action(uint8_t action_type, const char *command, const char *cons) { - 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, *last; + +// Why? +// 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_type = action_type; + return; } + last = a; + } + + a = xzalloc(sizeof(*a)); + if (last) { + last->next = a; + } else { + init_action_list = a; } + a->action_type = action_type; + safe_strncpy(a->command, command, sizeof(a->command)); + safe_strncpy(a->terminal, cons, sizeof(a->terminal)); + messageD(L_LOG | L_CONSOLE, "command='%s' action=%d tty='%s'\n", + a->command, a->action_type, a->terminal); } -/* 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. - * */ + */ static void parse_inittab(void) { -#ifdef BB_FEATURE_USE_INITTAB - FILE *file; - char buf[256], lineAsRead[256], tmpConsole[256]; - char *id, *runlev, *action, *process, *eol; - const struct initActionType *a = actions; - int foundIt; - - - file = fopen(INITTAB, "r"); - if (file == NULL) { - /* No inittab file -- set up some default behavior */ -#endif - /* Swapoff on halt/reboot */ - new_initAction(CTRLALTDEL, "/sbin/swapoff -a", console); + char *token[4]; + /* order must correspond to SYSINIT..RESTART constants */ + static const char actions[] ALIGN1 = + "sysinit\0""respawn\0""askfirst\0""wait\0""once\0" + "ctrlaltdel\0""shutdown\0""restart\0"; + + parser_t *parser = config_open2(INITTAB, fopen_for_read); + /* No inittab file -- set up some default behavior */ + if (parser == NULL) { + /* Reboot on Ctrl-Alt-Del */ + new_init_action(CTRLALTDEL, "reboot", ""); /* Umount all filesystems on halt/reboot */ - new_initAction(CTRLALTDEL, "/bin/umount -a -r", console); - /* Askfirst shell on tty1 */ - new_initAction(ASKFIRST, SHELL, console); - /* Askfirst shell on tty2 */ - if (secondConsole != NULL) - new_initAction(ASKFIRST, SHELL, secondConsole); - /* Askfirst shell on tty3 */ - if (thirdConsole != NULL) - new_initAction(ASKFIRST, SHELL, thirdConsole); - /* Askfirst shell on tty4 */ - if (fourthConsole != NULL) - new_initAction(ASKFIRST, SHELL, fourthConsole); + 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 QUIT is received */ + new_init_action(RESTART, "init", ""); + /* Askfirst shell on tty1-4 */ + new_init_action(ASKFIRST, bb_default_login_shell, ""); +//TODO: VC_1 instead of ""? "" is console -> ctty problems -> angry users + 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_initAction(SYSINIT, INIT_SCRIPT, console); - + new_init_action(SYSINIT, INIT_SCRIPT, ""); return; -#ifdef BB_FEATURE_USE_INITTAB } + /* optional_tty:ignored_runlevel:action:command + * Delims are not to be collapsed and need exactly 4 tokens + */ + while (config_read(parser, token, 4, 0, "#:", + PARSE_NORMAL & ~(PARSE_TRIM | PARSE_COLLAPSE))) { + int action; + char *tty = token[0]; + + if (!token[3]) /* less than 4 tokens */ + goto bad_entry; + action = index_in_strings(actions, token[2]); + if (action < 0 || !token[3][0]) /* token[3]: command */ + goto bad_entry; + /* turn .*TTY -> /dev/TTY */ + if (tty[0]) { + if (strncmp(tty, "/dev/", 5) == 0) + tty += 5; + tty = concat_path_file("/dev/", tty); + } + new_init_action(1 << action, token[3], tty); + if (tty[0]) + free(tty); + continue; + bad_entry: + message(L_LOG | L_CONSOLE, "Bad inittab entry at line %d", + parser->lineno); + } + config_close(parser); +} - while (fgets(buf, 255, file) != NULL) { - foundIt = FALSE; - /* Skip leading spaces */ - for (id = buf; *id == ' ' || *id == '\t'; id++); - - /* Skip the line if it's a comment */ - if (*id == '#' || *id == '\n') - continue; - - /* Trim the trailing \n */ - eol = strrchr(id, '\n'); - if (eol != NULL) - *eol = '\0'; +#if ENABLE_FEATURE_USE_INITTAB +static void reload_signal(int sig UNUSED_PARAM) +{ + struct init_action *a, *tmp; - /* Keep a copy around for posterity's sake (and error msgs) */ - strcpy(lineAsRead, buf); + message(L_LOG, "reloading /etc/inittab"); - /* Separate the ID field from the runlevels */ - runlev = strchr(id, ':'); - if (runlev == NULL || *(runlev + 1) == '\0') { - message(LOG | CONSOLE, "Bad inittab entry: %s\n", lineAsRead); - continue; - } else { - *runlev = '\0'; - ++runlev; - } + /* disable old entrys */ + for (a = init_action_list; a; a = a->next) { + a->action_type = ONCE; + } - /* Separate the runlevels from the action */ - action = strchr(runlev, ':'); - if (action == NULL || *(action + 1) == '\0') { - message(LOG | CONSOLE, "Bad inittab entry: %s\n", lineAsRead); - continue; - } else { - *action = '\0'; - ++action; - } + parse_inittab(); - /* Separate the action from the process */ - process = strchr(action, ':'); - if (process == NULL || *(process + 1) == '\0') { - message(LOG | CONSOLE, "Bad inittab entry: %s\n", lineAsRead); - continue; - } else { - *process = '\0'; - ++process; + 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_type & ONCE) && pid != 0) { + kill(pid, SIGTERM); + } } - - /* Ok, now process it */ - a = actions; - while (a->name != 0) { - if (strcmp(a->name, action) == 0) { - if (*id != '\0') { - strcpy(tmpConsole, "/dev/"); - strncat(tmpConsole, id, 200); - id = tmpConsole; +#if CONFIG_FEATURE_KILL_DELAY + /* NB: parent will wait in NOMMU case */ + if ((BB_MMU ? fork() : vfork()) == 0) { /* child */ + sleep(CONFIG_FEATURE_KILL_DELAY); + for (a = init_action_list; a; a = a->next) { + pid_t pid = a->pid; + if ((a->action_type & ONCE) && pid != 0) { + kill(pid, SIGKILL); } - new_initAction(a->action, process, id); - foundIt = TRUE; } - a++; + _exit(EXIT_SUCCESS); } - if (foundIt == TRUE) - continue; - else { - /* Choke on an unknown action */ - message(LOG | CONSOLE, "Bad inittab entry: %s\n", lineAsRead); +#endif + } + + /* remove unused entrys */ + for (a = init_action_list; a; a = tmp) { + tmp = a->next; + if ((a->action_type & (ONCE | SYSINIT | WAIT)) && a->pid == 0) { + delete_init_action(a); } } - return; -#endif /* BB_FEATURE_USE_INITTAB */ + run_actions(RESPAWN | ASKFIRST); } +#endif - - -extern int init_main(int argc, char **argv) +int init_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE; +int init_main(int argc UNUSED_PARAM, char **argv) { - initAction *a, *tmp; + struct init_action *a; pid_t wpid; - int status; -#ifndef DEBUG_INIT - /* Expect to be invoked as init with PID=1 or be invoked as linuxrc */ - if (getpid() != 1 -#ifdef BB_FEATURE_LINUXRC - && strstr(applet_name, "linuxrc") == NULL -#endif - ) - { - show_usage(); + die_sleep = 30 * 24*60*60; /* if xmalloc will ever die... */ + + if (argv[1] && !strcmp(argv[1], "-q")) { + return kill(1, SIGHUP); } - /* Set up sig handlers -- be sure to - * clear all of these in run() */ - signal(SIGUSR1, halt_signal); - signal(SIGUSR2, halt_signal); - signal(SIGINT, reboot_signal); - signal(SIGTERM, reboot_signal); - - /* 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); -#endif - /* Figure out what kernel this is running */ - kernelVersion = get_kernel_revision(); + if (!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(SIGQUIT, exec_restart_action); + bb_signals(0 + + (1 << SIGUSR1) /* halt */ + + (1 << SIGUSR2) /* poweroff */ + + (1 << SIGTERM) /* reboot */ + , halt_reboot_pwoff); + signal(SIGINT, ctrlaltdel_signal); + signal(SIGCONT, record_signo); + bb_signals(0 + + (1 << SIGSTOP) + + (1 << 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); + } /* 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); - chdir("/"); + set_sane_term(); + xchdir("/"); setsid(); - /* Make sure PATH is set to something sane */ - putenv("PATH="_PATH_STDPATH); + /* Make sure environs is set to something sane */ + putenv((char *) "HOME=/"); + putenv((char *) bb_PATH_root_path); + putenv((char *) "SHELL=/bin/sh"); + putenv((char *) "USER=root"); /* needed? why? */ - /* Hello world */ -#ifndef DEBUG_INIT - message( -#if ! defined BB_FEATURE_EXTRA_QUIET - CONSOLE| -#endif - LOG, - "init started: %s\r\n", full_version); -#else - message( -#if ! defined BB_FEATURE_EXTRA_QUIET - CONSOLE| -#endif - LOG, - "init(%d) started: %s\r\n", getpid(), full_version); -#endif + if (argv[1]) + xsetenv("RUNLEVEL", argv[1]); + /* Hello world */ + message(MAYBE_CONSOLE | L_LOG, "init started: %s", bb_banner); /* Make sure there is enough memory to do something useful. */ - check_memory(); + 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 */ + } + } /* 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-4 */ - if (secondConsole != NULL) - new_initAction(ASKFIRST, SHELL, secondConsole); - if (thirdConsole != NULL) - new_initAction(ASKFIRST, SHELL, thirdConsole); - if (fourthConsole != NULL) - new_initAction(ASKFIRST, SHELL, fourthConsole); - /* Start a shell on tty1 */ - new_initAction(RESPAWN, SHELL, console); + if (argv[1] + && (!strcmp(argv[1], "single") || !strcmp(argv[1], "-s") || LONE_CHAR(argv[1], '1')) + ) { + /* ??? shouldn't we set RUNLEVEL="b" here? */ + /* 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 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 + * actions(i.e., runs INIT_SCRIPT and then starts a pair * of "askfirst" shells */ parse_inittab(); } - /* Fix up argv[0] to be certain we claim to be init */ - argv[0]="init"; +#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(EXIT_FAILURE); + } + } +#endif /* CONFIG_SELINUX */ - if (argc > 1) - argv[1][0]=0; + /* 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 */ - for (a = initActionList; a; a = tmp) { - tmp = a->nextPtr; - if (a->action == SYSINIT) { - waitfor(a->process, a->console, FALSE); - /* Now remove the "sysinit" entry from the list */ - delete_initAction(a); - } - } + run_actions(SYSINIT); + /* Next run anything that wants to block */ - for (a = initActionList; a; a = tmp) { - tmp = a->nextPtr; - if (a->action == WAIT) { - waitfor(a->process, a->console, FALSE); - /* Now remove the "wait" entry from the list */ - delete_initAction(a); - } - } + run_actions(WAIT); + /* Next run anything to be run only once */ - for (a = initActionList; a; a = tmp) { - tmp = a->nextPtr; - if (a->action == ONCE) { - run(a->process, a->console, FALSE); - /* Now remove the "once" entry from the list */ - delete_initAction(a); - } - } - /* 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); - } + run_actions(ONCE); + + /* Redefine SIGHUP to reread /etc/inittab */ +#if ENABLE_FEATURE_USE_INITTAB + signal(SIGHUP, reload_signal); +#else + signal(SIGHUP, SIG_IGN); +#endif /* 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; - } - } - } - /* Wait for a child process to exit */ - wpid = wait(&status); - if (wpid > 0) { + /* run the respawn/askfirst stuff */ + run_actions(RESPAWN | 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 = initActionList; a; a = a->nextPtr) { + 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(LOG, - "Process '%s' (pid %d) exited. Scheduling it for restart.\n", - a->process, wpid); + message(L_LOG, "process '%s' (pid %d) exited. " + "Scheduling for restart.", + a->command, wpid); } } + /* see if anyone else is waiting to be reaped */ + wpid = wait_any_nohang(NULL); } - sleep(1); } } - -/* -Local Variables: -c-file-style: "linux" -c-basic-offset: 4 -tab-width: 4 -End: -*/