stop using __u32 etc. uint32_t is there for a reason
[oweals/busybox.git] / init / init.c
index 85792c9b7f1fe1a4263a7d2c3793e7428a42d838..2e8ca3ca83d35d02b44f6c0acf386bfb2d7275a2 100644 (file)
@@ -3,60 +3,26 @@
  * Mini init implementation for busybox
  *
  * Copyright (C) 1995, 1996 by Bruce Perens <bruce@pixar.com>.
- * Copyright (C) 1999-2003 by Erik Andersen <andersen@codepoet.org>
+ * Copyright (C) 1999-2004 by Erik Andersen <andersen@codepoet.org>
  * 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 <stdio.h>
-#include <stdlib.h>
+#include "busybox.h"
 #include <errno.h>
 #include <paths.h>
 #include <signal.h>
-#include <stdarg.h>
-#include <string.h>
-#include <termios.h>
-#include <unistd.h>
-#include <limits.h>
-#include <sys/fcntl.h>
 #include <sys/ioctl.h>
-#include <sys/mount.h>
-#include <sys/types.h>
 #include <sys/wait.h>
 #include <sys/reboot.h>
-#include "busybox.h"
 
 #include "init_shared.h"
 
-
 #ifdef CONFIG_SYSLOGD
 # include <sys/syslog.h>
 #endif
 
-
-#if defined(__UCLIBC__) && !defined(__UCLIBC_HAS_MMU__)
-#define fork   vfork
-#endif
-
 #define INIT_BUFFS_SIZE 256
 
 /* From <linux/vt.h> */
@@ -65,7 +31,7 @@ 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 <linux/serial.h> */
 struct serial_struct {
@@ -90,25 +56,21 @@ struct serial_struct {
        int     reserved[1];
 };
 
-
 #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 <sys/resource.h>
-#include <sys/time.h>
 #endif
 
-#define KERNEL_VERSION(a,b,c) (((a) << 16) + ((b) << 8) + (c))
-
 #define INITTAB      "/etc/inittab"    /* inittab file location */
 #ifndef INIT_SCRIPT
 #define INIT_SCRIPT  "/etc/init.d/rcS" /* Default sysinit script. */
@@ -157,28 +119,33 @@ struct init_action {
 
 /* Static variables */
 static struct init_action *init_action_list = NULL;
-static char console[CONSOLE_BUFF_SIZE] = _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=/",
@@ -190,9 +157,10 @@ static const char * const environment[] = {
 
 /* Function prototypes */
 static void delete_init_action(struct init_action *a);
-static int waitfor(const struct init_action *a);
-static void halt_signal(int sig);
-
+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)
 {
@@ -202,12 +170,10 @@ static void loop_forever(void)
 
 /* Print a message to the specified device.
  * Device may be bitwise-or'd from LOG | CONSOLE */
-#ifndef DEBUG_INIT
-static inline void messageD(int device, const char *fmt, ...)
-{
-}
-#else
+#if ENABLE_DEBUG_INIT
 #define messageD message
+#else
+#define messageD(...)  do {} while (0)
 #endif
 static void message(int device, const char *fmt, ...)
        __attribute__ ((format(printf, 2, 3)));
@@ -215,21 +181,23 @@ static void message(int device, const char *fmt, ...)
 {
        va_list arguments;
        int l;
-       char msg[1024];
+       RESERVE_CONFIG_BUFFER(msg, 1024);
 #ifndef CONFIG_SYSLOGD
        static int log_fd = -1;
 #endif
 
        msg[0] = '\r';
                va_start(arguments, fmt);
-       l = vsnprintf(msg + 1, sizeof(msg) - 2, fmt, arguments) + 1;
+       l = vsnprintf(msg + 1, 1024 - 2, fmt, arguments) + 1;
                va_end(arguments);
 
 #ifdef CONFIG_SYSLOGD
        /* Log the message to syslogd */
        if (device & LOG) {
                /* don`t out "\r\n" */
-               syslog_msg(LOG_DAEMON, LOG_INFO, msg + 1);
+               openlog(applet_name, 0, LOG_DAEMON);
+               syslog(LOG_INFO, "%s", msg + 1);
+               closelog();
        }
 
        msg[l++] = '\n';
@@ -241,44 +209,45 @@ static void message(int device, const char *fmt, ...)
        /* 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 | O_NOCTTY)) < 0) {
+               if ((log_fd = device_open(log_console, O_RDWR | O_NONBLOCK | O_NOCTTY)) < 0) {
                        log_fd = -2;
-                       bb_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)) {
-               bb_full_write(log_fd, msg, l);
+               full_write(log_fd, msg, l);
        }
 #endif
 
        if (device & CONSOLE) {
-               int fd = device_open(_PATH_CONSOLE,
-                                       O_WRONLY | O_NOCTTY | O_NDELAY);
+               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 >= 0) {
-                       bb_full_write(fd, msg, l);
+                       full_write(fd, msg, l);
                        close(fd);
-#ifdef DEBUG_INIT
+#if ENABLE_DEBUG_INIT
                /* all descriptors may be closed */
                } else {
-                       bb_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 */
@@ -308,36 +277,7 @@ 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 unsigned int check_free_memory(void)
-{
-       struct sysinfo info;
-       unsigned int result, u, s = 10;
-
-       if (sysinfo(&info) != 0) {
-               bb_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);
-       if (((unsigned long long)result * (unsigned long long)u) > UINT_MAX) {
-               return(UINT_MAX);
-       } else {
-               return(result * u);
-       }
+       tcsetattr(STDIN_FILENO, TCSANOW, &tty);
 }
 
 static void console_init(void)
@@ -350,15 +290,6 @@ static void console_init(void)
 
        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 */
-               /* 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 {
                /* 2.2 kernels: identify the real console backend and try to use it */
                if (ioctl(0, TIOCGSERIAL, &sr) == 0) {
@@ -368,7 +299,7 @@ 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));
+                       safe_strncpy(console, CONSOLE_DEV, sizeof(console));
                        tried++;
                }
        }
@@ -376,16 +307,16 @@ static void console_init(void)
        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 ? _PATH_CONSOLE : CURRENT_VC),
+               safe_strncpy(console, (tried == 0 ? CONSOLE_DEV : CURRENT_VC),
                                                        sizeof(console));
                tried++;
        }
        if (fd < 0) {
                /* Perhaps we should panic here? */
 #ifndef CONFIG_SYSLOGD
-               log =
+               log_console =
 #endif
-               safe_strncpy(console, "/dev/null", sizeof(console));
+               safe_strncpy(console, bb_dev_null, sizeof(console));
        } else {
                s = getenv("TERM");
                /* check for serial console */
@@ -395,7 +326,7 @@ static void console_init(void)
                        if (s == NULL || strcmp(s, "linux") == 0)
                                putenv("TERM=vt102");
 #ifndef CONFIG_SYSLOGD
-                       log = console;
+                       log_console = console;
 #endif
                } else {
                        if (s == NULL)
@@ -423,11 +354,31 @@ static void fixup_argv(int argc, char **argv, char *new_argv0)
        }
 }
 
+/* Open the new terminal device */
+static void open_new_terminal(const char * const device, const int fail) {
+       struct stat sb;
+
+       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
+       }
+}
+
 static pid_t run(const struct init_action *a)
 {
-       struct stat sb;
-       int i, 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;
@@ -443,6 +394,7 @@ static pid_t run(const struct init_action *a)
        sigprocmask(SIG_BLOCK, &nmask, &omask);
 
        if ((pid = fork()) == 0) {
+
                /* Clean up */
                close(0);
                close(1);
@@ -455,6 +407,7 @@ static pid_t run(const 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);
@@ -464,18 +417,10 @@ static pid_t run(const 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, "device '%s' does not exist.",
-                                               a->terminal);
-                               _exit(1);
-                       }
-                       message(LOG | CONSOLE, "Bummer, can't open %s", 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);
@@ -499,12 +444,9 @@ static pid_t run(const 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. */
@@ -517,10 +459,7 @@ static pid_t run(const 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);
                        }
 
@@ -550,8 +489,8 @@ static pid_t run(const 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").
                 */
 
@@ -571,8 +510,16 @@ static pid_t run(const struct init_action *a)
                                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;
                        /*
@@ -580,56 +527,63 @@ static pid_t run(const struct init_action *a)
                         * 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.
                         */
                        messageD(LOG, "Waiting for enter to start '%s'"
                                                "(pid %d, terminal %s)\n",
                                          cmdpath, getpid(), a->terminal);
-                       bb_full_write(1, press_enter, sizeof(press_enter) - 1);
-                       while(read(0, &c, 1) == 1 && c != '\n')
+                       full_write(1, press_enter, sizeof(press_enter) - 1);
+                       while (read(0, &c, 1) == 1 && c != '\n')
                                ;
                }
+#endif
 
                /* Log the process name and args */
                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;
+               {
+                       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);
+                               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. */
                execv(cmdpath, cmd);
 
                /* We're still here?  Some error happened. */
-               message(LOG | CONSOLE, "Bummer, could not run '%s': %m", cmdpath);
+               message(LOG | CONSOLE, "Bummer, cannot run '%s': %m", cmdpath);
                _exit(-1);
        }
        sigprocmask(SIG_SETMASK, &omask, NULL);
        return pid;
 }
 
-static int waitfor(const 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;
 }
@@ -642,8 +596,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);
@@ -659,12 +615,12 @@ static void run_actions(int action)
        }
 }
 
-#ifndef DEBUG_INIT
+#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 
+        * linux/kernel/sys.c, which can cause the machine to panic when
         * the init process is killed.... */
        if ((pid = fork()) == 0) {
                reboot(magic);
@@ -685,6 +641,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);
@@ -702,19 +659,19 @@ static void shutdown_system(void)
        sync();
 
        /* Send signals to every process _except_ pid 1 */
-       message(CONSOLE | LOG, "Sending SIGTERM to all processes.");
+       message(CONSOLE | LOG, init_sending_format, "TERM");
        kill(-1, SIGTERM);
        sleep(1);
        sync();
 
-       message(CONSOLE | LOG, "Sending SIGKILL to all processes.");
+       message(CONSOLE | LOG, init_sending_format, "KILL");
        kill(-1, SIGKILL);
        sleep(1);
 
        sync();
 }
 
-static void exec_signal(int sig)
+static void exec_signal(int sig ATTRIBUTE_UNUSED)
 {
        struct init_action *a, *tmp;
        sigset_t unblock_signals;
@@ -722,13 +679,12 @@ static void exec_signal(int sig)
        for (a = init_action_list; a; a = tmp) {
                tmp = a->next;
                if (a->action & RESTART) {
-                       struct stat sb;
-
                        shutdown_system();
 
                        /* 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);
@@ -745,17 +701,10 @@ static void exec_signal(int sig)
                        close(2);
 
                        /* Open the new terminal device */
-                       if ((device_open(a->terminal, O_RDWR)) < 0) {
-                               if (stat(a->terminal, &sb) != 0) {
-                                       message(LOG | CONSOLE, "device '%s' does not exist.", a->terminal);
-                               } else {
-                                       message(LOG | CONSOLE, "Bummer, can't open %s", a->terminal);
-                               }
-                               halt_signal(SIGUSR1);
-                       }
+                       open_new_terminal(a->terminal, 0);
 
                        /* Make sure the terminal will act fairly normal for us */
-                       set_term(0);
+                       set_term();
                        /* Setup stdout, stderr on the supplied terminal */
                        dup(0);
                        dup(0);
@@ -773,51 +722,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). */
-                       "The system is halted. You may reboot now."
-#else
-                       "The system is halted. Press Reset or turn off power"
-#endif
-               );
-       sync();
-
-       /* allow time for last message to reach serial console */
-       sleep(2);
-
-       if (sig == SIGUSR2)
-               init_reboot(RB_POWER_OFF);
-       else
-               init_reboot(RB_HALT_SYSTEM);
-
-       loop_forever();
-}
+       char *m;
+       int rb;
 
-static void reboot_signal(int sig)
-{
        shutdown_system();
-       message(CONSOLE | LOG, "Please stand by while rebooting the system.");
+
+       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;
 
@@ -829,24 +768,21 @@ 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, 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));
@@ -856,25 +792,25 @@ static void new_init_action(int action, const char *command, const char *cons)
        }
 
        /* Append to the end of the list */
-       for (a = init_action_list; a && a->next; a = a->next) {
-               /* don't enter action if it's already in the list */
-               if ((strcmp(a->command, command) == 0) && 
+       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 (a) {
-               a->next = new_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);
-#if 0   /* calloc zeroed always */
-       new_action->pid = 0;
-#endif
        messageD(LOG|CONSOLE, "command='%s' action='%d' terminal='%s'\n",
                new_action->command, new_action->action, new_action->terminal);
 }
@@ -896,39 +832,11 @@ static void delete_init_action(struct init_action *action)
        }
 }
 
-/* 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;
-
-#if !defined(__UCLIBC__) || defined(__UCLIBC_HAS_MMU__)
-       if (stat("/etc/fstab", &statBuf) == 0) {
-               /* 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 */
-               if (check_free_memory() < 1000)
-                       goto goodnight;
-       } else
-               goto goodnight;
-       return;
-#endif
-
-  goodnight:
-       message(CONSOLE, "Sorry, your computer does not have enough memory.");
-       loop_forever();
-}
-
 /* 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)
@@ -949,10 +857,8 @@ static void parse_inittab(void)
                new_init_action(CTRLALTDEL, "/sbin/reboot", "");
                /* Umount all filesystems on halt/reboot */
                new_init_action(SHUTDOWN, "/bin/umount -a -r", "");
-#if !defined(__UCLIBC__) || defined(__UCLIBC_HAS_MMU__)
                /* Swapoff on halt/reboot */
-               new_init_action(SHUTDOWN, "/sbin/swapoff -a", "");
-#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", "");
                /* Askfirst shell on tty1-4 */
@@ -1038,44 +944,61 @@ static void parse_inittab(void)
 #endif                                                 /* CONFIG_FEATURE_USE_INITTAB */
 }
 
-static void reload_signal(int sig)
+#ifdef CONFIG_FEATURE_USE_INITTAB
+static void reload_signal(int sig ATTRIBUTE_UNUSED)
 {
-        message(LOG, "Reloading /etc/inittab");
-        parse_inittab();
+       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;
+       return;
 }
-                                                                                
-extern int init_main(int argc, char **argv)
+#endif                                                 /* CONFIG_FEATURE_USE_INITTAB */
+
+int init_main(int argc, char **argv)
 {
        struct init_action *a;
        pid_t wpid;
-       int status;
 
        if (argc > 1 && !strcmp(argv[1], "-q")) {
-               return kill_init(SIGHUP);
+               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(bb_applet_name, "linuxrc") == NULL
-#endif
-               ) {
+       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_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
@@ -1089,7 +1012,7 @@ 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);
        }
 
@@ -1098,18 +1021,35 @@ extern int init_main(int argc, char **argv)
        {
                const char * const *e;
                /* Make sure environs is set to something sane */
-               for(e = environment; *e; e++)
+               for (e = environment; *e; e++)
                        putenv((char *) *e);
        }
+
+       if (argc > 1) setenv("RUNLEVEL", argv[1], 1);
+
        /* Hello world */
        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 < 1024*1024)
+               {
+                       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"))) {
+       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 {
@@ -1117,11 +1057,27 @@ extern int init_main(int argc, char **argv)
 
                /* 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");
 
@@ -1136,15 +1092,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,
-                               "No more tasks for init -- sleeping forever.");
-               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) {
@@ -1158,7 +1112,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) {
@@ -1172,15 +1126,7 @@ extern int init_main(int argc, char **argv)
                                }
                        }
                        /* 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:
-*/