X-Git-Url: https://git.librecmc.org/?a=blobdiff_plain;f=init%2Finit.c;h=cad64f63ae25f185e5d4a1bf51d515d844ea923c;hb=2aced7ea043aff64bd4e5f2814818fb4d0c803d4;hp=91a19c5d16a39e01de8087a4c3f9d8fb3b414bbd;hpb=cf1fee06a5e4b18b97f9b279694baae403d7289b;p=oweals%2Fbusybox.git diff --git a/init/init.c b/init/init.c index 91a19c5d1..cad64f63a 100644 --- a/init/init.c +++ b/init/init.c @@ -3,54 +3,26 @@ * Mini init implementation for busybox * * Copyright (C) 1995, 1996 by Bruce Perens . - * Copyright (C) 1999-2002 by Erik Andersen + * 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 "busybox.h" #include #include #include -#include -#include -#include -#include -#include -#include #include -#include -#include #include -#include "busybox.h" +#include + +#include "init_shared.h" + #ifdef CONFIG_SYSLOGD # include #endif -#if defined(__UCLIBC__) && !defined(__UCLIBC_HAS_MMU__) -#define fork vfork -#endif - #define INIT_BUFFS_SIZE 256 /* From */ @@ -59,60 +31,46 @@ struct vt_stat { unsigned short v_signal; /* signal to send */ unsigned short v_state; /* vt bitmask */ }; -static const int VT_GETSTATE = 0x5603; /* get global vt state info */ +enum { 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]; + 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]; }; - -#if (__GNU_LIBRARY__ > 5) || defined(__dietlibc__) -#include -#define init_reboot(magic) reboot(magic) -#else -#define init_reboot(magic) reboot(0xfee1dead, 672274793, magic) -#endif - #ifndef _PATH_STDPATH #define _PATH_STDPATH "/usr/bin:/bin:/usr/sbin:/sbin" #endif #if defined CONFIG_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 __GNU_LIBRARY__ > 5 -#include -#else -extern int bdflush(int func, long int data); -#endif - -#define SHELL "/bin/sh" /* Default shell */ -#define LOGIN_SHELL "-" SHELL /* Default login shell */ #define INITTAB "/etc/inittab" /* inittab file location */ #ifndef INIT_SCRIPT #define INIT_SCRIPT "/etc/init.d/rcS" /* Default sysinit script. */ @@ -120,6 +78,8 @@ extern int bdflush(int func, long int data); #define MAXENV 16 /* Number of env. vars */ +#define CONSOLE_BUFF_SIZE 32 + /* Allowed init action types */ #define SYSINIT 0x001 #define RESPAWN 0x002 @@ -152,42 +112,55 @@ static const struct init_action_type actions[] = { struct init_action { pid_t pid; char command[INIT_BUFFS_SIZE]; - char terminal[INIT_BUFFS_SIZE]; + char terminal[CONSOLE_BUFF_SIZE]; struct init_action *next; int action; }; /* Static variables */ static struct init_action *init_action_list = NULL; -static int kernelVersion = 0; -static char termType[32] = "TERM=linux"; -static char console[32] = _PATH_CONSOLE; +static char console[CONSOLE_BUFF_SIZE] = CONSOLE_DEV; #ifndef CONFIG_SYSLOGD -static char *log = VC_5; +static char *log_console = VC_5; #endif +#if !ENABLE_DEBUG_INIT static sig_atomic_t got_cont = 0; -static const int LOG = 0x1; -static const int CONSOLE = 0x2; +#endif + +enum { + LOG = 0x1, + CONSOLE = 0x2, #if defined CONFIG_FEATURE_EXTRA_QUIET -static const int MAYBE_CONSOLE = 0x0; + MAYBE_CONSOLE = 0x0, #else -#define MAYBE_CONSOLE CONSOLE + MAYBE_CONSOLE = CONSOLE, #endif -#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; +#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=/", + "PATH=" _PATH_STDPATH, + "SHELL=/bin/sh", + "USER=root", + NULL +}; /* Function prototypes */ static void delete_init_action(struct init_action *a); -static int waitfor(struct init_action *a); - +static int waitfor(const struct init_action *a, pid_t pid); +#if !ENABLE_DEBUG_INIT +static void shutdown_signal(int sig); +#endif static void loop_forever(void) { @@ -197,76 +170,87 @@ static void loop_forever(void) /* Print a message to the specified device. * Device may be bitwise-or'd from LOG | CONSOLE */ -#ifdef DEBUG_INIT -static inline messageND(int device, char *fmt, ...) +#if ENABLE_DEBUG_INIT +#define messageD message +#else +static inline void messageD(int ATTRIBUTE_UNUSED device, + const char ATTRIBUTE_UNUSED *fmt, ...) { } -#else -#define messageND message #endif -static void message(int device, char *fmt, ...) +static void message(int device, const char *fmt, ...) __attribute__ ((format(printf, 2, 3))); -static void message(int device, char *fmt, ...) +static void message(int device, const char *fmt, ...) { va_list arguments; - int fd; + int l; + RESERVE_CONFIG_BUFFER(msg, 1024); +#ifndef CONFIG_SYSLOGD + static int log_fd = -1; +#endif -#ifdef CONFIG_SYSLOGD + msg[0] = '\r'; + va_start(arguments, fmt); + l = vsnprintf(msg + 1, 1024 - 2, fmt, arguments) + 1; + va_end(arguments); +#ifdef CONFIG_SYSLOGD /* Log the message to syslogd */ if (device & LOG) { - char msg[1024]; - - va_start(arguments, fmt); - vsnprintf(msg, sizeof(msg), fmt, arguments); - va_end(arguments); - syslog_msg(LOG_USER, LOG_INFO, msg); + /* don`t out "\r\n" */ + openlog(bb_applet_name, 0, LOG_DAEMON); + syslog(LOG_INFO, "%s", msg + 1); + closelog(); } + + msg[l++] = '\n'; + msg[l] = 0; #else - static int log_fd = -1; + 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_fd = device_open(log, O_RDWR | O_NDELAY)) < 0) { + if ((log_fd = device_open(log_console, O_RDWR | O_NONBLOCK | O_NOCTTY)) < 0) { log_fd = -2; - error_msg("Bummer, can't write to log on %s!", log); + bb_error_msg("Bummer, can't write to log on %s!", log_console); device = CONSOLE; } else { fcntl(log_fd, F_SETFD, FD_CLOEXEC); } } if ((device & LOG) && (log_fd >= 0)) { - va_start(arguments, fmt); - vdprintf(log_fd, fmt, arguments); - va_end(arguments); + full_write(log_fd, msg, l); } #endif if (device & CONSOLE) { + int fd = device_open(CONSOLE_DEV, + O_WRONLY | O_NOCTTY | O_NONBLOCK); /* 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); + if (fd >= 0) { + full_write(fd, msg, l); close(fd); +#if ENABLE_DEBUG_INIT + /* all descriptors may be closed */ } else { - error_msg("Bummer, can't print: "); + bb_error_msg("Bummer, can't print: "); va_start(arguments, fmt); vfprintf(stderr, fmt, arguments); va_end(arguments); +#endif } } + RELEASE_CONFIG_BUFFER(msg); } /* Set terminal settings to reasonable defaults */ -static void set_term(int fd) +static void set_term(void) { struct termios tty; - tcgetattr(fd, &tty); + tcgetattr(STDIN_FILENO, &tty); /* set control chars */ tty.c_cc[VINTR] = 3; /* C-c */ @@ -296,65 +280,20 @@ static void set_term(int fd) tty.c_lflag = ISIG | ICANON | ECHO | ECHOE | ECHOK | ECHOCTL | ECHOKE | IEXTEN; - tcsetattr(fd, TCSANOW, &tty); -} - -/* How much memory does this machine have? - Units are kBytes to avoid overflow on 4GB machines */ -static int check_free_memory(void) -{ - struct sysinfo info; - unsigned int result, u, s = 10; - - if (sysinfo(&info) != 0) { - perror_msg("Error checking free memory"); - return -1; - } - - /* 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; + tcsetattr(STDIN_FILENO, TCSANOW, &tty); } static void console_init(void) { int fd; - int tried_devcons = 0; - int tried_vtprimary = 0; + int tried = 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) { + if ((s = getenv("CONSOLE")) != NULL || (s = getenv("console")) != NULL) { safe_strncpy(console, s, sizeof(console)); - } -#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) - safe_strncpy(console, SC_0, sizeof(console)); - else if (strcmp(s, "ttyb") == 0) - safe_strncpy(console, SC_1, sizeof(console)); - } -#endif - else { + } 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 */ @@ -363,40 +302,42 @@ static void console_init(void) /* this is linux virtual tty */ snprintf(console, sizeof(console) - 1, VC_FORMAT, vt.v_active); } else { - safe_strncpy(console, _PATH_CONSOLE, sizeof(console)); - tried_devcons++; + safe_strncpy(console, CONSOLE_DEV, sizeof(console)); + tried++; } } - while ((fd = open(console, O_RDONLY | O_NONBLOCK)) < 0) { - /* Can't open selected console -- try /dev/console */ - if (!tried_devcons) { - tried_devcons++; - safe_strncpy(console, _PATH_CONSOLE, sizeof(console)); - continue; - } - /* Can't open selected console -- try vt1 */ - if (!tried_vtprimary) { - tried_vtprimary++; - safe_strncpy(console, VC_1, sizeof(console)); - continue; - } - break; + while ((fd = open(console, O_RDONLY | O_NONBLOCK)) < 0 && tried < 2) { + /* Can't open selected console -- try + logical system console and VT_MASTER */ + safe_strncpy(console, (tried == 0 ? CONSOLE_DEV : CURRENT_VC), + sizeof(console)); + tried++; } if (fd < 0) { /* Perhaps we should panic here? */ - safe_strncpy(console, "/dev/null", sizeof(console)); +#ifndef CONFIG_SYSLOGD + log_console = +#endif + safe_strncpy(console, bb_dev_null, sizeof(console)); } else { + s = getenv("TERM"); /* check for serial console */ - if (ioctl(0, TIOCGSERIAL, &sr) == 0) { + if (ioctl(fd, TIOCGSERIAL, &sr) == 0) { /* Force the TERM setting to vt102 for serial console -- * if TERM is set to linux (the default) */ - if (strcmp(termType, "TERM=linux") == 0) - safe_strncpy(termType, "TERM=vt102", sizeof(termType)); + if (s == NULL || strcmp(s, "linux") == 0) + putenv("TERM=vt102"); +#ifndef CONFIG_SYSLOGD + log_console = console; +#endif + } else { + if (s == NULL) + putenv("TERM=linux"); } close(fd); } - message(LOG, "console=%s\n", console); + messageD(LOG, "console=%s", console); } static void fixup_argv(int argc, char **argv, char *new_argv0) @@ -416,74 +357,47 @@ static void fixup_argv(int argc, char **argv, char *new_argv0) } } -/* 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(void) -{ - struct stat statBuf; - - if (check_free_memory() > 1000) - return; +/* Open the new terminal device */ +static void open_new_terminal(const char * const device, const int fail) { + struct stat sb; -#if !defined(__UCLIBC__) || defined(__UCLIBC_HAS_MMU__) - if (stat("/etc/fstab", &statBuf) == 0) { - /* swapon -a requires /proc typically */ - system("/bin/mount -t proc proc /proc"); - /* Try to turn on swap */ - system("/sbin/swapon -a"); - if (check_free_memory() < 1000) - goto goodnight; - } else - goto goodnight; - return; + if ((device_open(device, O_RDWR)) < 0) { + if (stat(device, &sb) != 0) { + message(LOG | CONSOLE, "device '%s' does not exist.", device); + } else { + message(LOG | CONSOLE, "Bummer, can't open %s", device); + } + if (fail) + _exit(1); + /* else */ +#if !ENABLE_DEBUG_INIT + shutdown_signal(SIGUSR1); +#else + _exit(2); #endif - - goodnight: - message(CONSOLE, "\rSorry, your computer does not have enough memory.\n"); - loop_forever(); + } } -static pid_t run(struct init_action *a) +static pid_t run(const struct init_action *a) { - struct stat sb; - int i, j, junk; - pid_t pid, pgrp, tmp_pid; + int i; + pid_t pid; char *s, *tmpCmd, *cmd[INIT_BUFFS_SIZE], *cmdpath; char buf[INIT_BUFFS_SIZE + 6]; /* INIT_BUFFS_SIZE+strlen("exec ")+1 */ sigset_t nmask, omask; - char *environment[MAXENV + 1] = { - termType, - "HOME=/", - "PATH=" _PATH_STDPATH, - "SHELL=" SHELL, - "USER=root", - NULL - }; static const char press_enter[] = #ifdef CUSTOMIZED_BANNER #include CUSTOMIZED_BANNER #endif "\nPlease press Enter to activate this console. "; - /* 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; - } - if (!environment[j]) { - environment[j++] = environ[i]; - environment[j] = NULL; - } - } - /* Block sigchild while forking. */ sigemptyset(&nmask); sigaddset(&nmask, SIGCHLD); sigprocmask(SIG_BLOCK, &nmask, &omask); if ((pid = fork()) == 0) { + /* Clean up */ close(0); close(1); @@ -496,6 +410,7 @@ static pid_t run(struct init_action *a) 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); @@ -505,18 +420,10 @@ static pid_t run(struct init_action *a) setsid(); /* Open the new terminal device */ - if ((device_open(a->terminal, O_RDWR)) < 0) { - if (stat(a->terminal, &sb) != 0) { - message(LOG | CONSOLE, "\rdevice '%s' does not exist.\n", - a->terminal); - _exit(1); - } - message(LOG | CONSOLE, "\rBummer, can't open %s\n", a->terminal); - _exit(1); - } + open_new_terminal(a->terminal, 1); /* Make sure the terminal will act fairly normal for us */ - set_term(0); + set_term(); /* Setup stdout, stderr for the new process so * they point to the supplied terminal */ dup(0); @@ -528,7 +435,7 @@ static pid_t run(struct init_action *a) /* Now fork off another process to just hang around */ if ((pid = fork()) < 0) { - message(LOG | CONSOLE, "Can't fork!\n"); + message(LOG | CONSOLE, "Can't fork!"); _exit(1); } @@ -540,17 +447,14 @@ static pid_t run(struct init_action *a) signal(SIGQUIT, SIG_IGN); signal(SIGCHLD, SIG_DFL); - /* Wait for child to exit */ - while ((tmp_pid = waitpid(pid, &junk, 0)) != pid); - + waitfor(NULL, pid); /* See if stealing the controlling tty back is necessary */ - pgrp = tcgetpgrp(0); - if (pgrp != getpid()) + if (tcgetpgrp(0) != getpid()) _exit(0); /* Use a temporary process to steal the controlling tty. */ if ((pid = fork()) < 0) { - message(LOG | CONSOLE, "\rCan't fork!\n"); + message(LOG | CONSOLE, "Can't fork!"); _exit(1); } if (pid == 0) { @@ -558,10 +462,7 @@ static pid_t run(struct init_action *a) ioctl(0, TIOCSCTTY, 1); _exit(0); } - while ((tmp_pid = waitpid(pid, &junk, 0)) != pid) { - if (tmp_pid < 0 && errno == ECHILD) - break; - } + waitfor(NULL, pid); _exit(0); } @@ -570,10 +471,9 @@ static pid_t run(struct init_action *a) /* See if any special /bin/sh requiring characters are present */ if (strpbrk(a->command, "~`!$^&*()=|\\{}[];\"'<>?") != NULL) { - cmd[0] = SHELL; + cmd[0] = (char *)DEFAULT_SHELL; cmd[1] = "-c"; - strcat(strcpy(buf, "exec "), a->command); - cmd[2] = buf; + cmd[2] = strcat(strcpy(buf, "exec "), a->command); cmd[3] = NULL; } else { /* Convert command (char*) into cmd (char**, one word per string) */ @@ -592,8 +492,8 @@ static pid_t run(struct init_action *a) /* 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 + 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"). */ @@ -603,74 +503,90 @@ static pid_t run(struct init_action *a) ++cmdpath; /* find the last component in the command pathname */ - s = get_last_path_component(cmdpath); + s = bb_get_last_path_component(cmdpath); /* make a new argv[0] */ if ((cmd[0] = malloc(strlen(s) + 2)) == NULL) { - message(LOG | CONSOLE, "malloc failed"); + message(LOG | CONSOLE, bb_msg_memory_exhausted); cmd[0] = cmdpath; } else { cmd[0][0] = '-'; strcpy(cmd[0] + 1, s); } +#ifdef CONFIG_FEATURE_INIT_SCTTY + /* Establish this process as session leader and + * (attempt) to make the tty (if any) a controlling tty. + */ + (void) setsid(); + (void) ioctl(0, TIOCSCTTY, 0/*don't steal it*/); +#endif } +#if !defined(__UCLIBC__) || defined(__ARCH_HAS_MMU__) if (a->action & ASKFIRST) { + 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 + * be allowed to start a shell or whatever an init script * specifies. */ - messageND(LOG, - "Waiting for enter to start '%s' (pid %d, terminal %s)\n", + messageD(LOG, "Waiting for enter to start '%s'" + "(pid %d, terminal %s)\n", cmdpath, getpid(), a->terminal); - fflush(stdout); - write(fileno(stdout), press_enter, sizeof(press_enter) - 1); - getc(stdin); + full_write(1, press_enter, sizeof(press_enter) - 1); + while(read(0, &c, 1) == 1 && c != '\n') + ; } +#endif /* Log the process name and args */ - messageND(LOG, "Starting pid %d, console %s: '%s'\n", + message(LOG, "Starting pid %d, console %s: '%s'", getpid(), a->terminal, cmdpath); #if defined CONFIG_FEATURE_INIT_COREDUMPS - 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); + { + 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); + } } #endif - /* 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(cmdpath, cmd, environment); + execv(cmdpath, cmd); /* We're still here? Some error happened. */ - message(LOG | CONSOLE, "\rBummer, could not run '%s': %m\n", cmdpath); + message(LOG | CONSOLE, "Bummer, could not run '%s': %m", cmdpath); _exit(-1); } sigprocmask(SIG_SETMASK, &omask, NULL); return pid; } -static int waitfor(struct init_action *a) +static int waitfor(const struct init_action *a, pid_t pid) { - int pid; + int runpid; int status, wpid; - pid = run(a); + runpid = (NULL == a)? pid : run(a); while (1) { - wpid = wait(&status); - if (wpid > 0 && wpid != pid) { - continue; - } - if (wpid == pid) + wpid = waitpid(runpid,&status,0); + if (wpid == runpid) + break; + if (wpid == -1 && errno == ECHILD) { + /* we missed its termination */ break; + } + /* FIXME other errors should maybe trigger an error, but allow + * the program to continue */ } return wpid; } @@ -683,8 +599,10 @@ static void run_actions(int action) for (a = init_action_list; a; a = tmp) { tmp = a->next; if (a->action == action) { - if (a->action & (SYSINIT | WAIT | CTRLALTDEL | SHUTDOWN | RESTART)) { - waitfor(a); + if (access(a->terminal, R_OK | W_OK)) { + delete_init_action(a); + } else if (a->action & (SYSINIT | WAIT | CTRLALTDEL | SHUTDOWN | RESTART)) { + waitfor(a, 0); delete_init_action(a); } else if (a->action & ONCE) { run(a); @@ -700,8 +618,20 @@ static void run_actions(int action) } } +#if !ENABLE_DEBUG_INIT +static void init_reboot(unsigned long magic) +{ + 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.... */ + if ((pid = fork()) == 0) { + reboot(magic); + _exit(0); + } + waitpid (pid, NULL, 0); +} -#ifndef DEBUG_INIT static void shutdown_system(void) { sigset_t block_signals; @@ -714,6 +644,7 @@ static void shutdown_system(void) /* first disable all our signals */ sigemptyset(&block_signals); sigaddset(&block_signals, SIGHUP); + sigaddset(&block_signals, SIGQUIT); sigaddset(&block_signals, SIGCHLD); sigaddset(&block_signals, SIGUSR1); sigaddset(&block_signals, SIGUSR2); @@ -727,28 +658,23 @@ static void shutdown_system(void) /* Allow Ctrl-Alt-Del to reboot system. */ init_reboot(RB_ENABLE_CAD); - message(CONSOLE | LOG, "\n\rThe system is going down NOW !!\n"); + message(CONSOLE | LOG, "The system is going down NOW !!"); sync(); /* Send signals to every process _except_ pid 1 */ - message(CONSOLE | LOG, "\rSending SIGTERM to all processes.\n"); + message(CONSOLE | LOG, init_sending_format, "TERM"); kill(-1, SIGTERM); sleep(1); sync(); - message(CONSOLE | LOG, "\rSending SIGKILL to all processes.\n"); + message(CONSOLE | LOG, init_sending_format, "KILL"); kill(-1, SIGKILL); sleep(1); sync(); - if (kernelVersion > 0 && kernelVersion <= KERNEL_VERSION(2, 2, 11)) { - /* bdflush, kupdate not needed for kernels >2.2.11 */ - bdflush(1, 0); - sync(); - } } -static void exec_signal(int sig) +static void exec_signal(int sig ATTRIBUTE_UNUSED) { struct init_action *a, *tmp; sigset_t unblock_signals; @@ -761,6 +687,7 @@ static void exec_signal(int sig) /* unblock all signals, blocked in shutdown_system() */ sigemptyset(&unblock_signals); sigaddset(&unblock_signals, SIGHUP); + sigaddset(&unblock_signals, SIGQUIT); sigaddset(&unblock_signals, SIGCHLD); sigaddset(&unblock_signals, SIGUSR1); sigaddset(&unblock_signals, SIGUSR2); @@ -771,10 +698,24 @@ static void exec_signal(int sig) sigaddset(&unblock_signals, SIGTSTP); sigprocmask(SIG_UNBLOCK, &unblock_signals, NULL); - message(CONSOLE | LOG, "\rTrying to re-exec %s\n", a->command); + /* Close whatever files are open. */ + close(0); + close(1); + close(2); + + /* Open the new terminal device */ + open_new_terminal(a->terminal, 0); + + /* Make sure the terminal will act fairly normal for us */ + set_term(); + /* Setup stdout, stderr on the supplied terminal */ + dup(0); + dup(0); + + messageD(CONSOLE | LOG, "Trying to re-exec %s", a->command); execl(a->command, a->command, NULL); - message(CONSOLE | LOG, "\rexec of '%s' failed: %m\n", + message(CONSOLE | LOG, "exec of '%s' failed: %m", a->command); sync(); sleep(2); @@ -784,51 +725,41 @@ static void exec_signal(int sig) } } -static void halt_signal(int sig) +static void shutdown_signal(int sig) { - shutdown_system(); - message(CONSOLE | LOG, -#if #cpu(s390) - /* Seems the s390 console is Wierd(tm). */ - "\rThe system is halted. You may reboot now.\n" -#else - "\rThe system is halted. Press Reset or turn off power\n" -#endif - ); - sync(); - - /* 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); + char *m; + int rb; - loop_forever(); -} - -static void reboot_signal(int sig) -{ shutdown_system(); - message(CONSOLE | LOG, "\rPlease stand by while rebooting the system.\n"); + + if (sig == SIGTERM) { + m = "reboot"; + rb = RB_AUTOBOOT; + } else if (sig == SIGUSR2) { + m = "poweroff"; + rb = RB_POWER_OFF; + } else { + m = "halt"; + rb = RB_HALT_SYSTEM; + } + message(CONSOLE | LOG, "Requesting system %s.", m); sync(); /* allow time for last message to reach serial console */ sleep(2); - init_reboot(RB_AUTOBOOT); + init_reboot(rb); loop_forever(); } -static void ctrlaltdel_signal(int sig) +static void ctrlaltdel_signal(int sig ATTRIBUTE_UNUSED) { run_actions(CTRLALTDEL); } /* The SIGSTOP & SIGTSTP handler */ -static void stop_handler(int sig) +static void stop_handler(int sig ATTRIBUTE_UNUSED) { int saved_errno = errno; @@ -840,45 +771,51 @@ static void stop_handler(int sig) } /* The SIGCONT handler */ -static void cont_handler(int sig) +static void cont_handler(int sig ATTRIBUTE_UNUSED) { got_cont = 1; } -#endif /* ! DEBUG_INIT */ +#endif /* ! ENABLE_DEBUG_INIT */ -static void new_init_action(int action, char *command, char *cons) +static void new_init_action(int action, const char *command, const char *cons) { - struct init_action *new_action, *a; + struct init_action *new_action, *a, *last; if (*cons == '\0') cons = console; - /* do not run entries if console device is not available */ - if (access(cons, R_OK | W_OK)) - return; - if (strcmp(cons, "/dev/null") == 0 && (action & ASKFIRST)) + if (strcmp(cons, bb_dev_null) == 0 && (action & ASKFIRST)) return; new_action = calloc((size_t) (1), sizeof(struct init_action)); if (!new_action) { - message(LOG | CONSOLE, "\rMemory allocation failure\n"); + message(LOG | CONSOLE, "Memory allocation failure"); loop_forever(); } /* Append to the end of the list */ - for (a = init_action_list; a && a->next; a = a->next); - if (a) { - a->next = new_action; + 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; + free(new_action); + return; + } + last = a; + } + 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); - new_action->pid = 0; -/* message(LOG|CONSOLE, "command='%s' action='%d' terminal='%s'\n", - new_action->command, new_action->action, new_action->terminal); */ + messageD(LOG|CONSOLE, "command='%s' action='%d' terminal='%s'\n", + new_action->command, new_action->action, new_action->terminal); } static void delete_init_action(struct init_action *action) @@ -900,20 +837,19 @@ static void delete_init_action(struct init_action *action) /* 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 CONFIG_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 CONFIG_FEATURE_USE_INITTAB FILE *file; - char buf[INIT_BUFFS_SIZE], lineAsRead[INIT_BUFFS_SIZE], - tmpConsole[INIT_BUFFS_SIZE]; + char buf[INIT_BUFFS_SIZE], lineAsRead[INIT_BUFFS_SIZE]; + char tmpConsole[CONSOLE_BUFF_SIZE]; char *id, *runlev, *action, *command, *eol; const struct init_action_type *a = actions; - int foundIt; file = fopen(INITTAB, "r"); @@ -921,29 +857,26 @@ static void parse_inittab(void) /* No inittab file -- set up some default behavior */ #endif /* Reboot on Ctrl-Alt-Del */ - new_init_action(CTRLALTDEL, "/sbin/reboot", console); + new_init_action(CTRLALTDEL, "/sbin/reboot", ""); /* Umount all filesystems on halt/reboot */ - new_init_action(SHUTDOWN, "/bin/umount -a -r", console); -#if !defined(__UCLIBC__) || defined(__UCLIBC_HAS_MMU__) + new_init_action(SHUTDOWN, "/bin/umount -a -r", ""); /* Swapoff on halt/reboot */ - new_init_action(SHUTDOWN, "/sbin/swapoff -a", console); -#endif + if(ENABLE_SWAPONOFF) new_init_action(SHUTDOWN, "/sbin/swapoff -a", ""); /* Prepare to restart init when a HUP is received */ - new_init_action(RESTART, "/sbin/init", console); + new_init_action(RESTART, "/sbin/init", ""); /* Askfirst shell on tty1-4 */ - new_init_action(ASKFIRST, LOGIN_SHELL, console); - new_init_action(ASKFIRST, LOGIN_SHELL, VC_2); - new_init_action(ASKFIRST, LOGIN_SHELL, VC_3); - new_init_action(ASKFIRST, LOGIN_SHELL, VC_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, console); + new_init_action(SYSINIT, INIT_SCRIPT, ""); return; #ifdef CONFIG_FEATURE_USE_INITTAB } while (fgets(buf, INIT_BUFFS_SIZE, file) != NULL) { - foundIt = FALSE; /* Skip leading spaces */ for (id = buf; *id == ' ' || *id == '\t'; id++); @@ -962,7 +895,7 @@ static void parse_inittab(void) /* Separate the ID field from the runlevels */ runlev = strchr(id, ':'); if (runlev == NULL || *(runlev + 1) == '\0') { - message(LOG | CONSOLE, "\rBad inittab entry: %s\n", lineAsRead); + message(LOG | CONSOLE, "Bad inittab entry: %s", lineAsRead); continue; } else { *runlev = '\0'; @@ -972,7 +905,7 @@ static void parse_inittab(void) /* Separate the runlevels from the action */ action = strchr(runlev, ':'); if (action == NULL || *(action + 1) == '\0') { - message(LOG | CONSOLE, "\rBad inittab entry: %s\n", lineAsRead); + message(LOG | CONSOLE, "Bad inittab entry: %s", lineAsRead); continue; } else { *action = '\0'; @@ -982,7 +915,7 @@ static void parse_inittab(void) /* Separate the action from the command */ command = strchr(action, ':'); if (command == NULL || *(command + 1) == '\0') { - message(LOG | CONSOLE, "\rBad inittab entry: %s\n", lineAsRead); + message(LOG | CONSOLE, "Bad inittab entry: %s", lineAsRead); continue; } else { *command = '\0'; @@ -990,24 +923,23 @@ static void parse_inittab(void) } /* Ok, now process it */ - a = actions; - while (a->name != 0) { + for (a = actions; a->name != 0; a++) { if (strcmp(a->name, action) == 0) { if (*id != '\0') { + if(strncmp(id, "/dev/", 5) == 0) + id += 5; strcpy(tmpConsole, "/dev/"); - strncat(tmpConsole, id, INIT_BUFFS_SIZE - 6); + safe_strncpy(tmpConsole + 5, id, + CONSOLE_BUFF_SIZE - 5); id = tmpConsole; } new_init_action(a->action, command, id); - foundIt = TRUE; + break; } - a++; } - if (foundIt == TRUE) - continue; - else { + if (a->name == 0) { /* Choke on an unknown action */ - message(LOG | CONSOLE, "\rBad inittab entry: %s\n", lineAsRead); + message(LOG | CONSOLE, "Bad inittab entry: %s", lineAsRead); } } fclose(file); @@ -1015,54 +947,65 @@ static void parse_inittab(void) #endif /* CONFIG_FEATURE_USE_INITTAB */ } +#ifdef CONFIG_FEATURE_USE_INITTAB +static void reload_signal(int sig ATTRIBUTE_UNUSED) +{ + struct init_action *a, *tmp; + + message(LOG, "Reloading /etc/inittab"); + + /* disable old entrys */ + for (a = init_action_list; a; a = a->next ) { + a->action = ONCE; + } + + parse_inittab(); + /* 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); + } + } + run_actions(RESPAWN); + return; +} +#endif /* CONFIG_FEATURE_USE_INITTAB */ -extern int init_main(int argc, char **argv) +int init_main(int argc, char **argv) { struct init_action *a; pid_t wpid; - int status; if (argc > 1 && !strcmp(argv[1], "-q")) { - /* don't assume init's pid == 1 */ - long *pid = find_pid_by_name("init"); - - if (!pid || *pid <= 0) { - pid = find_pid_by_name("linuxrc"); - if (!pid || *pid <= 0) - error_msg_and_die("no process killed"); - } - kill(*pid, SIGHUP); - exit(0); + return kill(1,SIGHUP); } -#ifndef DEBUG_INIT +#if !ENABLE_DEBUG_INIT /* Expect to be invoked as init with PID=1 or be invoked as linuxrc */ - if (getpid() != 1 -#ifdef CONFIG_FEATURE_INITRD - && strstr(applet_name, "linuxrc") == NULL -#endif - ) { - show_usage(); + if (getpid() != 1 && + (!ENABLE_FEATURE_INITRD || !strstr(bb_applet_name, "linuxrc"))) + { + bb_show_usage(); } /* Set up sig handlers -- be sure to * clear all of these in run() */ signal(SIGHUP, exec_signal); - signal(SIGUSR1, halt_signal); - signal(SIGUSR2, halt_signal); + signal(SIGQUIT, exec_signal); + signal(SIGUSR1, shutdown_signal); + signal(SIGUSR2, shutdown_signal); signal(SIGINT, ctrlaltdel_signal); - signal(SIGTERM, reboot_signal); + signal(SIGTERM, shutdown_signal); signal(SIGCONT, cont_handler); signal(SIGSTOP, stop_handler); signal(SIGTSTP, stop_handler); - /* Turn off rebooting via CTL-ALT-DEL -- we get a + /* 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(); - /* Figure out where the default console should be */ console_init(); @@ -1072,41 +1015,71 @@ extern int init_main(int argc, char **argv) close(2); if (device_open(console, O_RDWR | O_NOCTTY) == 0) { - set_term(0); + set_term(); close(0); } chdir("/"); setsid(); + { + const char * const *e; + /* Make sure environs is set to something sane */ + for(e = environment; *e; e++) + putenv((char *) *e); + } - /* Make sure PATH is set to something sane */ - putenv("PATH=" _PATH_STDPATH); + if (argc > 1) setenv("RUNLEVEL", argv[1], 1); /* Hello world */ - message(MAYBE_CONSOLE | LOG, "\rinit started: %s\n", full_version); + message(MAYBE_CONSOLE | LOG, "init started: %s", bb_msg_full_version); /* 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 < MEGABYTE) + { + message(CONSOLE,"Low memory: forcing swapon."); + /* swapon -a requires /proc typically */ + new_init_action(SYSINIT, "/bin/mount -t proc proc /proc", ""); + /* Try to turn on swap */ + new_init_action(SYSINIT, "/sbin/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 */ - new_init_action(ASKFIRST, LOGIN_SHELL, VC_2); - new_init_action(ASKFIRST, LOGIN_SHELL, VC_3); - new_init_action(ASKFIRST, LOGIN_SHELL, VC_4); - /* Start a shell on tty1 */ - new_init_action(RESPAWN, LOGIN_SHELL, console); + /* 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 + * actions(i.e., runs INIT_SCRIPT and then starts a pair * of "askfirst" shells */ parse_inittab(); } +#ifdef CONFIG_SELINUX + if (getenv("SELINUX_INIT") == NULL) { + int enforce = 0; + + putenv("SELINUX_INIT=YES"); + if (selinux_init_load_policy(&enforce) == 0) { + execv(argv[0], argv); + } else if (enforce > 0) { + /* SELinux in enforcing mode but load_policy failed */ + /* At this point, we probably can't open /dev/console, so log() won't work */ + message(CONSOLE,"Unable to load SELinux Policy. Machine is in enforcing mode. Halting now."); + exit(1); + } + } +#endif /* CONFIG_SELINUX */ + /* Make the command line just say "init" -- thats all, nothing else */ fixup_argv(argc, argv, "init"); @@ -1121,12 +1094,13 @@ extern int init_main(int argc, char **argv) /* Next run anything to be run only once */ run_actions(ONCE); - /* If there is nothing else to do, stop */ - if (init_action_list == NULL) { - message(LOG | CONSOLE, - "\rNo more tasks for init -- sleeping forever.\n"); - loop_forever(); - } +#ifdef CONFIG_FEATURE_USE_INITTAB + /* Redefine SIGHUP to reread /etc/inittab */ + signal(SIGHUP, reload_signal); +#else + signal(SIGHUP, SIG_IGN); +#endif /* CONFIG_FEATURE_USE_INITTAB */ + /* Now run the looping stuff for the rest of forever */ while (1) { @@ -1140,7 +1114,7 @@ extern int init_main(int argc, char **argv) sleep(1); /* Wait for a child process to exit */ - wpid = wait(&status); + wpid = wait(NULL); while (wpid > 0) { /* Find out who died and clean up their corpse */ for (a = init_action_list; a; a = a->next) { @@ -1149,19 +1123,12 @@ extern int init_main(int argc, char **argv) * restarted by run_actions() */ a->pid = 0; message(LOG, "Process '%s' (pid %d) exited. " - "Scheduling it for restart.\n", a->command, wpid); + "Scheduling it for restart.", + a->command, wpid); } } /* see if anyone else is waiting to be reaped */ - wpid = waitpid (-1, &status, WNOHANG); + wpid = waitpid (-1, NULL, WNOHANG); } } } - -/* -Local Variables: -c-file-style: "linux" -c-basic-offset: 4 -tab-width: 4 -End: -*/