Making note of my changes
[oweals/busybox.git] / init.c
diff --git a/init.c b/init.c
index ade29c7c243f99e24d8a1ccfd64c867f2a3940ad..b0a85829dacf51bde94bd2bf455c6d78ca51f98e 100644 (file)
--- a/init.c
+++ b/init.c
@@ -1,11 +1,36 @@
+/*
+ * Mini init implementation for busybox
+ *
+ *
+ * Copyright (C) 1995, 1996 by Bruce Perens <bruce@pixar.com>.
+ * 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
+ *
+ */
+
 #include "internal.h"
 #include <stdio.h>
+#include <string.h>
 #include <stdlib.h>
 #include <stdarg.h>
 #include <unistd.h>
 #include <errno.h>
 #include <signal.h>
 #include <termios.h>
+#include <paths.h>
 #include <sys/types.h>
 #include <sys/fcntl.h>
 #include <sys/wait.h>
 #include <sys/mount.h>
 #include <sys/reboot.h>
 #include <sys/kdaemon.h>
-#include <sys/swap.h>
 #include <sys/sysmacros.h>
-
-const char             init_usage[] = "Used internally by the system.";
-char                   console[16] = "";
-const char *   default_console = "/dev/tty1";
-char *                 first_terminal = NULL;
-const char *   second_terminal = "/dev/tty2";
-const char             log[] = "/dev/tty3";
-char * term_ptr = NULL;
-
-static void
-message(const char * terminal, const char * pattern, ...)
+#include <linux/serial.h>      /* for serial_struct */
+#include <sys/vt.h>            /* for vt_stat */
+#include <sys/ioctl.h>
+#include <linux/version.h>
+#ifdef BB_SYSLOGD
+#include <sys/syslog.h>
+#endif
+
+#if ! defined BB_FEATURE_USE_PROCFS
+#error Sorry, I depend on the /proc filesystem right now.
+#endif
+
+#ifndef KERNEL_VERSION
+#define KERNEL_VERSION(a,b,c) (((a) << 16) + ((b) << 8) + (c))
+#endif
+
+
+#define VT_PRIMARY      "/dev/tty1"      /* Primary virtual console */
+#define VT_SECONDARY    "/dev/tty2"      /* Virtual console */
+#define VT_LOG          "/dev/tty3"      /* Virtual console */
+#define SERIAL_CON0     "/dev/ttyS0"      /* Primary serial console */
+#define SERIAL_CON1     "/dev/ttyS1"      /* Serial console */
+#define SHELL           "/bin/sh"        /* Default shell */
+#define INITTAB         "/etc/inittab"   /* inittab file location */
+#ifndef INIT_SCRIPT
+#define INIT_SCRIPT    "/etc/init.d/rcS" /* Default sysinit script. */
+#endif
+
+#define LOG             0x1
+#define CONSOLE         0x2
+
+/* Allowed init action types */
+typedef enum {
+    SYSINIT=1,
+    RESPAWN,
+    ASKFIRST,
+    WAIT,
+    ONCE
+} initActionEnum;
+
+/* And now a list of the actions we support in the version of init */
+typedef struct initActionType{
+    const char*        name;
+    initActionEnum action;
+} initActionType;
+
+static const struct initActionType actions[] = {
+    {"sysinit",     SYSINIT},
+    {"respawn",     RESPAWN},
+    {"askfirst",    ASKFIRST},
+    {"wait",        WAIT},
+    {"once",        ONCE},
+    {0}
+};
+
+/* Set up a linked list of initactions, to be read from inittab */
+typedef struct initActionTag initAction;
+struct initActionTag {
+    pid_t pid;
+    char process[256];
+    char console[256];
+    initAction *nextPtr;
+    initActionEnum action;
+};
+initAction* initActionList = NULL;
+
+
+static char *secondConsole = VT_SECONDARY;
+static char *log = VT_LOG;
+static int kernelVersion = 0;
+static char termType[32] = "TERM=ansi";
+static char console[32] = _PATH_CONSOLE;
+
+
+/* try to open up the specified device */
+int device_open(char *device, int mode)
 {
-       int     fd;
-       FILE *  con = 0;
-       va_list arguments;
-
-       /*
-        * Open the console device each time a message is printed. If the user
-        * has switched consoles, the open will get the new console. If we kept
-        * the console open, we'd always print to the same one.
-        */
-       if ( ((fd = open(terminal, O_WRONLY|O_NOCTTY)) < 0)
-        ||  ((con = fdopen(fd, "w")) == NULL) )
-               return;
-
-       va_start(arguments, pattern);
-       vfprintf(con, pattern, arguments);
-       va_end(arguments);
-       fclose(con);
+    int m, f, fd = -1;
+
+    m = mode | O_NONBLOCK;
+
+    /* Retry up to 5 times */
+    for (f = 0; f < 5; f++)
+       if ((fd = open(device, m)) >= 0)
+           break;
+    if (fd < 0)
+       return fd;
+    /* Reset original flags. */
+    if (m != mode)
+       fcntl(fd, F_SETFL, mode);
+    return fd;
 }
 
-static int
-waitfor(int pid)
+/* print a message to the specified device:
+ * device may be bitwise-or'd from LOG | CONSOLE */
+void message(int device, char *fmt, ...)
 {
-       int     status;
-       int     wpid;
-       
-       message(log, "Waiting for process %d.\n", pid);
-       while ( (wpid = wait(&status)) != pid ) {
-               if ( wpid > 0 ) {
-                       message(
-                        log
-                       ,"pid %d exited, status=%x.\n"
-                       ,wpid
-                       ,status);
-               }
+    va_list arguments;
+    int fd;
+
+#ifdef BB_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);
+       openlog( "init", 0, LOG_DAEMON);
+       syslog(LOG_DAEMON|LOG_NOTICE, msg);
+       closelog();
+    }
+
+#else
+    static int log_fd=-1;
+
+    /* Take full control of the log tty, and never close it.
+     * It's mine, all mine!  Muhahahaha! */
+    if (log_fd < 0) {
+       if (log == NULL) {
+       /* don't even try to log, because there is no such console */
+       log_fd = -2;
+       /* log to main console instead */
+       device = CONSOLE;
+    }
+    else if ((log_fd = device_open(log, O_RDWR|O_NDELAY)) < 0) {
+           log_fd=-1;
+           fprintf(stderr, "Bummer, can't write to log on %s!\r\n", log);
+           fflush(stderr);
+           return;
        }
-       return wpid;
+    }
+    if ( (device & LOG) && (log_fd >= 0) ) {
+       va_start(arguments, fmt);
+       vdprintf(log_fd, fmt, arguments);
+       va_end(arguments);
+    }
+#endif
+
+    if (device & CONSOLE) {
+       /* Always send console messages to /dev/console so people will see them. */
+       if ((fd = device_open(_PATH_CONSOLE, O_WRONLY|O_NOCTTY|O_NDELAY)) >= 0) {
+           va_start(arguments, fmt);
+           vdprintf(fd, fmt, arguments);
+           va_end(arguments);
+           close(fd);
+       } else {
+           fprintf(stderr, "Bummer, can't print: ");
+           va_start(arguments, fmt);
+           vfprintf(stderr, fmt, arguments);
+           fflush(stderr);
+           va_end(arguments);
+       }
+    }
 }
 
-static int
-run(const char* program, const char* const* arguments, 
-       const char* terminal, int get_enter)
+
+/* Set terminal settings to reasonable defaults */
+void set_term( int fd)
 {
-       static const char       control_characters[] = {
-               '\003',
-               '\034',
-               '\177',
-               '\025',
-               '\004',
-               '\0',
-               '\1',
-               '\0',
-               '\021',
-               '\023',
-               '\032',
-               '\0',
-               '\022',
-               '\017',
-               '\027',
-               '\026',
-               '\0'
+    struct termios tty;
+    static const char control_characters[] = {
+       '\003', '\034', '\177', '\025', '\004', '\0',
+       '\1', '\0', '\021', '\023', '\032', '\0', '\022',
+       '\017', '\027', '\026', '\0'
        };
 
-       static char * environment[] = {
-               "HOME=/",
-               "PATH=/bin:/sbin:/usr/bin:/usr/sbin",
-               "SHELL=/bin/sh",
-               0,
-               "USER=root",
-               0
-       };
+    tcgetattr(fd, &tty);
 
-       static const char       press_enter[] =
- "\nPlease press Enter to activate this console. ";
-
-       int     pid;
-
-       environment[3]=term_ptr;
-
-       pid = fork();
-       if ( pid == 0 ) {
-               struct termios  t;
-               const char * const * arg;
-
-               close(0);
-               close(1);
-               close(2);
-               setsid();
-
-               open(terminal, O_RDWR);
-               dup(0);
-               dup(0);
-               tcsetpgrp(0, getpgrp());
-
-               tcgetattr(0, &t);
-               memcpy(t.c_cc, control_characters, sizeof(control_characters));
-               t.c_line = 0;
-               t.c_iflag = ICRNL|IXON|IXOFF;
-               t.c_oflag = OPOST|ONLCR;
-               t.c_lflag = ISIG|ICANON|ECHO|ECHOE|ECHOK|ECHOCTL|ECHOKE|IEXTEN;
-               tcsetattr(0, TCSANOW, &t);
-
-               if ( get_enter ) {
-                       /*
-                        * Save memory by not exec-ing anything large (like a shell)
-                        * before the user wants it. This is critical if swap is not
-                        * enabled and the system has low memory. Generally this will
-                        * be run on the second virtual console, and the first will
-                        * be allowed to start a shell or whatever an init script 
-                        * specifies.
-                        */
-                       char    c;
-                       write(1, press_enter, sizeof(press_enter) - 1);
-                       read(0, &c, 1);
-               }
-               
-               message(log, "Executing ");
-               arg = arguments;
-               while ( *arg != 0 )
-                       message(log, "%s ", *arg++);
-               message(log, "\n");
-
-               execve(program, (char * *)arguments, (char * *)environment);
-               message(log, "%s: could not execute: %s.\r\n", program, strerror(errno));
-               exit(-1);
+    /* set control chars */
+    memcpy(tty.c_cc, control_characters, sizeof(control_characters));
+
+    /* use line dicipline 0 */
+    tty.c_line = 0;
+
+    /* Make it be sane */
+    //tty.c_cflag &= CBAUD|CBAUDEX|CSIZE|CSTOPB|PARENB|PARODD;
+    //tty.c_cflag |= HUPCL|CLOCAL;
+
+    /* input modes */
+    tty.c_iflag = ICRNL|IXON|IXOFF;
+
+    /* output modes */
+    tty.c_oflag = OPOST|ONLCR;
+
+    /* local modes */
+    tty.c_lflag = ISIG|ICANON|ECHO|ECHOE|ECHOK|ECHOCTL|ECHOKE|IEXTEN;
+
+    tcsetattr(fd, TCSANOW, &tty);
+}
+
+/* How much memory does this machine have? */
+static int mem_total()
+{
+    char s[80];
+    char *p = "/proc/meminfo";
+    FILE *f;
+    const char pattern[] = "MemTotal:";
+
+    if ((f = fopen(p, "r")) < 0) {
+       message(LOG, "Error opening %s: %s\n", p, strerror( errno));
+       return -1;
+    }
+    while (NULL != fgets(s, 79, f)) {
+       p = strstr(s, pattern);
+       if (NULL != p) {
+           fclose(f);
+           return (atoi(p + strlen(pattern)));
        }
-       return pid;
+    }
+    return -1;
 }
 
-static int
-mem_total()
+static void console_init()
 {
-  char s[80];
-  char *p;
-  FILE *f;
-  const char pattern[]="MemTotal:";
-
-  f=fopen("/proc/meminfo","r");
-  while (NULL != fgets(s,79,f)) {
-    p=strstr(s, pattern);
-    if (NULL != p) {
-      fclose(f);
-      return(atoi(p+strlen(pattern)));
+    int fd;
+    int tried_devcons = 0;
+    int tried_vtprimary = 0;
+    struct serial_struct sr;
+    char *s;
+
+    if ((s = getenv("TERM")) != NULL) {
+       snprintf(termType,sizeof(termType)-1,"TERM=%s",s);
+    }
+
+    if ((s = getenv("CONSOLE")) != NULL) {
+       snprintf(console, sizeof(console)-1, "%s",s);
+    }
+#if #cpu(sparc)
+    /* sparc kernel supports console=tty[ab] parameter which is also 
+     * passed to init, so catch it here */
+    else if ((s = getenv("console")) != NULL) {
+       /* remap tty[ab] to /dev/ttyS[01] */
+       if (strcmp( s, "ttya" )==0)
+           snprintf(console, sizeof(console)-1, "%s", SERIAL_CON0);
+       else if (strcmp( s, "ttyb" )==0)
+           snprintf(console, sizeof(console)-1, "%s", SERIAL_CON1);
+    }
+#endif
+    else {
+       struct vt_stat vt;
+
+       /* 2.2 kernels: identify the real console backend and try to use it */
+       if (ioctl(0, TIOCGSERIAL, &sr) == 0) {
+           /* this is a serial console */
+           snprintf(console, sizeof(console)-1, "/dev/ttyS%d", sr.line);
+       }
+       else if (ioctl(0, VT_GETSTATE, &vt) == 0) {
+           /* this is linux virtual tty */
+           snprintf(console, sizeof(console)-1, "/dev/tty%d", vt.v_active);
+       } else {
+           snprintf(console, sizeof(console)-1, "%s", _PATH_CONSOLE);
+           tried_devcons++;
+       }
+    }
+
+    while ((fd = open(console, O_RDONLY | O_NONBLOCK)) < 0) {
+       /* Can't open selected console -- try /dev/console */
+       if (!tried_devcons) {
+           tried_devcons++;
+           snprintf(console, sizeof(console)-1, "%s", _PATH_CONSOLE);
+           continue;
+       }
+       /* Can't open selected console -- try vt1 */
+       if (!tried_vtprimary) {
+           tried_vtprimary++;
+           snprintf(console, sizeof(console)-1, "%s", VT_PRIMARY);
+           continue;
+       }
+       break;
+    }
+    if (fd < 0) {
+       /* Perhaps we should panic here? */
+       snprintf(console, sizeof(console)-1, "/dev/null");
+    } else {
+       /* check for serial console and disable logging to tty3 & running a
+       * shell to tty2 */
+       if (ioctl(0,TIOCGSERIAL,&sr) == 0) {
+           message(LOG|CONSOLE, "serial console detected.  Disabling virtual terminals.\r\n" );
+           log = NULL;
+           secondConsole = NULL;
+       }
+       close(fd);
     }
-  }
-  return -1;
+    message(LOG, "console=%s\n", console );
 }
 
-static void
-set_free_pages()
+static pid_t run(char* command, 
+       char *terminal, int get_enter)
 {
-  char s[80];
-  FILE *f;
-
-  f=fopen("/proc/sys/vm/freepages","r");
-  fgets(s,79,f);
-  if (atoi(s) < 32) {
-    fclose(f);
-    f=fopen("/proc/sys/vm/freepages","w");
-    fprintf(f,"30\t40\t50\n");
-    printf("\nIncreased /proc/sys/vm/freepages values to 30/40/50\n");
-  }
-  fclose(f);
+    int i, fd;
+    pid_t pid;
+    char* tmpCmd;
+    char* cmd[255];
+    static const char press_enter[] =
+       "\nPlease press Enter to activate this console. ";
+    char* environment[] = {
+       "HOME=/",
+       "PATH=/usr/bin:/bin:/usr/sbin:/sbin",
+       "SHELL=/bin/sh",
+       termType,
+       "USER=root",
+       0
+    };
+
+
+    if ((pid = fork()) == 0) {
+       pid_t shell_pgid = getpid ();
+
+       /* Clean up */
+       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);
+
+       if ((fd = device_open(terminal, O_RDWR)) < 0) {
+           message(LOG|CONSOLE, "Bummer, can't open %s\r\n", terminal);
+           exit(1);
+       }
+       dup(fd);
+       dup(fd);
+       tcsetpgrp (0, getpgrp());
+       set_term(0);
+
+       if (get_enter==TRUE) {
+           /*
+            * Save memory by not exec-ing anything large (like a shell)
+            * before the user wants it. This is critical if swap is not
+            * enabled and the system has low memory. Generally this will
+            * be run on the second virtual console, and the first will
+            * be allowed to start a shell or whatever an init script 
+            * specifies.
+            */
+           char c;
+           message(LOG, "Waiting for enter to start '%s' (pid %d, console %s)\r\n", 
+                   command, shell_pgid, terminal );
+           write(fileno(stdout), press_enter, sizeof(press_enter) - 1);
+           read(fileno(stdin), &c, 1);
+       }
+
+       /* Log the process name and args */
+       message(LOG, "Starting pid %d, console %s: '", 
+               shell_pgid, terminal, command);
+
+       /* Convert command (char*) into cmd (char**, one word per string) */
+       for (tmpCmd=command, i=0; (tmpCmd=strsep(&command, " \t")) != NULL;) {
+           if (*tmpCmd != '\0') {
+               cmd[i] = tmpCmd;
+               message(LOG, "%s ", tmpCmd);
+               tmpCmd++;
+               i++;
+           }
+       }
+       cmd[i] = NULL;
+       message(LOG, "'\r\n");
+
+       /* Now run it.  The new program will take over this PID, 
+        * so nothing further in init.c should be run. */
+       execve(cmd[0], cmd, environment);
+
+       /* We're still here?  Some error happened. */
+       message(LOG|CONSOLE, "Bummer, could not run '%s': %s\n", cmd[0],
+               strerror(errno));
+       exit(-1);
+    }
+    return pid;
 }
 
-static void
-shutdown_system(int do_reboot)
+static int waitfor(char* command, 
+       char *terminal, int get_enter)
 {
-       static const char * const umount_args[] = {"/bin/umount", "-a", "-n", 0};
+    int status, wpid;
+    int pid = run( command, terminal, get_enter);
+
+    while (1) {
+       wpid = wait(&status);
+       if (wpid > 0 ) {
+           message(LOG, "Process '%s' (pid %d) exited.\n", 
+                           command, wpid);
+           break;
+       }
+       if (wpid == pid )
+           break;
+    }
+    return wpid;
+}
 
-       sync();
-       /* Allow Ctrl-Alt-Del to reboot system. */
-       reboot(RB_ENABLE_CAD);
+/* Make sure there is enough memory to do something useful. *
+ * Calls swapon if needed so be sure /proc is mounted. */
+static void check_memory()
+{
+    struct stat statBuf;
+
+    if (mem_total() > 3500)
+       return;
+
+    if (stat("/etc/fstab", &statBuf) == 0) {
+       /* Try to turn on swap */
+       waitfor("/bin/swapon swapon -a", log, FALSE);
+       if (mem_total() < 3500)
+           goto goodnight;
+    } else
+       goto goodnight;
+    return;
+
+goodnight:
+       message(CONSOLE, "Sorry, your computer does not have enough memory.\r\n");
+       while (1) sleep(1);
+}
 
-       /* Send signals to every process _except_ pid 1 */
-       message(console, "Sending SIGHUP to all processes.\r\n");
-       kill(-1, SIGHUP);
-       sleep(2);
-       sync();
-       message(console, "Sending SIGKILL to all processes.\r\n");
-       kill(-1, SIGKILL);
-       sleep(1);
-       waitfor(run("/bin/umount", umount_args, console, 0));
-       sync();
+#ifndef DEBUG_INIT
+static void shutdown_system(void)
+{
+    /* Allow Ctrl-Alt-Del to reboot system. */
+    reboot(RB_ENABLE_CAD);
+    message(CONSOLE, "\r\nThe system is going down NOW !!\r\n");
+    sync();
+
+    /* Send signals to every process _except_ pid 1 */
+    message(CONSOLE, "Sending SIGHUP to all processes.\r\n");
+    kill(-1, SIGHUP);
+    sleep(2);
+    sync();
+
+    message(CONSOLE, "Sending SIGKILL to all processes.\r\n");
+    kill(-1, SIGKILL);
+    sleep(1);
+
+    message(CONSOLE, "Disabling swap.\r\n");
+    waitfor( "swapoff -a", console, FALSE);
+    message(CONSOLE, "Unmounting filesystems.\r\n");
+    waitfor("umount -a", console, FALSE);
+    sync();
+    if (kernelVersion > 0 && kernelVersion <= 2 * 65536 + 2 * 256 + 11) {
+       /* bdflush, kupdate not needed for kernels >2.2.11 */
        bdflush(1, 0);
        sync();
-       reboot(do_reboot ?RB_AUTOBOOT : RB_HALT_SYSTEM);
-       exit(0);
+    }
 }
 
-static void
-halt_signal(int sig)
+static void halt_signal(int sig)
 {
-       shutdown_system(0);
+    shutdown_system();
+    message(CONSOLE,
+           "The system is halted. Press CTRL-ALT-DEL or turn off power\r\n");
+    sync();
+#if LINUX_VERSION_CODE >= KERNEL_VERSION(2,2,0)
+    if (sig == SIGUSR2)
+       reboot(RB_POWER_OFF);
+    else
+#endif
+    reboot(RB_HALT_SYSTEM);
+    exit(0);
 }
 
-static void
-reboot_signal(int sig)
+static void reboot_signal(int sig)
 {
-       shutdown_system(1);
+    shutdown_system();
+    message(CONSOLE, "Please stand by while rebooting the system.\r\n");
+    sync();
+    reboot(RB_AUTOBOOT);
+    exit(0);
 }
 
-static void
-exit_signal(int sig)
+#if defined BB_FEATURE_INIT_CHROOT
+static void check_chroot(int sig)
 {
-  
-  /* initrd doesn't work anyway */
+    char *argv_init[2] = { "init", NULL, };
+    char *envp_init[3] = { "HOME=/", "TERM=linux", NULL, };
+    char rootpath[256], *tc;
+    int fd;
 
-  shutdown_system(1);
+    if ((fd = open("/proc/sys/kernel/init-chroot", O_RDONLY)) == -1) {
+       message(CONSOLE, "SIGHUP recived, but could not open proc file\r\n");
+       sleep(2);
+       return;
+    }
+    if (read(fd, rootpath, sizeof(rootpath)) == -1) {
+       message(CONSOLE, "SIGHUP recived, but could not read proc file\r\n");
+       sleep(2);
+       return;
+    }
+    close(fd);
 
-       /* This is used on the initial ramdisk */
+    if (rootpath[0] == '\0') {
+       message(CONSOLE, "SIGHUP recived, but new root is not valid: %s\r\n",
+               rootpath);
+       sleep(2);
+       return;
+    }
 
-  /*   message(log, "Init exiting.");
-       exit(0);
-       */
+    tc = strrchr(rootpath, '\n');
+    *tc = '\0';
+    
+    /* Ok, making it this far means we commit */
+    message(CONSOLE, "Please stand by, changing root to `%s'.\r\n", rootpath);
+
+    /* kill all other programs first */
+    message(CONSOLE, "Sending SIGTERM to all processes.\r\n");
+    kill(-1, SIGTERM);
+    sleep(2);
+    sync();
+
+    message(CONSOLE, "Sending SIGKILL to all processes.\r\n");
+    kill(-1, SIGKILL);
+    sleep(2);
+    sync();
+
+    /* ok, we don't need /proc anymore. we also assume that the signaling
+     * process left the rest of the filesystems alone for us */
+    umount("/proc");
+
+    /* Ok, now we chroot. Hopefully we only have two things mounted, the
+     * new chroot'd mount point, and the old "/" mount. s,
+     * we go ahead and unmount the old "/". This should trigger the kernel
+     * to set things up the Right Way(tm). */
+
+    if (!chroot(rootpath))
+       umount("/dev/root");
+
+    /* If the chroot fails, we are already too far to turn back, so we
+     * continue and hope that executing init below will revive the system */
+
+    /* close all of our descriptors and open new ones */
+    close(0);
+    close(1);
+    close(2);
+    open("/dev/console", O_RDWR, 0);
+    dup(0);
+    dup(0);
+
+    message(CONSOLE, "Executing real init...\r\n");
+    /* execute init in the (hopefully) new root */
+    execve("/sbin/init",argv_init,envp_init);
+
+    message(CONSOLE, "ERROR: Could not exec new init. Hit ctrl+alt+delete to reboot.\r\n");
+    return;
+} 
+#endif /* BB_FEATURE_INIT_CHROOT */
+
+#endif /* ! DEBUG_INIT */
+
+void new_initAction (initActionEnum action,
+       char* process, char* cons)
+{
+    initAction* newAction;
+
+    /* If BusyBox detects that a serial console is in use, 
+     * then entries containing non-empty id fields will _not_ be run.
+     * The exception to this rule is the null device.
+     */
+    if (secondConsole == NULL && (*cons != '\0' || strncmp(cons, "null", 4)))
+       return;
+
+    newAction = calloc ((size_t)(1), sizeof(initAction));
+    if (!newAction) {
+       message(LOG|CONSOLE,"Memory allocation failure\n");
+       while (1) sleep(1);
+    }
+    newAction->nextPtr = initActionList;
+    initActionList = newAction;
+    strncpy( newAction->process, process, 255);
+    newAction->action = action;
+    if (*cons != '\0') {
+       strncpy(newAction->console, cons, 255);
+    } else
+       strncpy(newAction->console, console, 255);
+    newAction->pid = 0;
+//    message(LOG|CONSOLE, "process='%s' action='%d' console='%s'\n",
+//         newAction->process, newAction->action, newAction->console);
 }
 
-void
-configure_terminals( int serial_cons )
+void delete_initAction (initAction *action)
 {
-       //struct stat statbuf;
-       char *tty;
-
-       switch (serial_cons) {
-       case 1:
-               strcpy( console, "/dev/ttyS0" );
-               break;
-       case 2:
-               strcpy( console, "/dev/ttyS1" );
-               break;
-       default:
-               tty = ttyname(0);
-               if (tty) {
-                       strcpy( console, tty );
-                       if (!strncmp( tty, "/dev/ttyS", 9 ))
-                               serial_cons=1;
-               }
-               else
-                       /* falls back to /dev/tty1 if an error occurs */
-                       strcpy( console, default_console );
+    initAction *a, *b=NULL;
+    for( a=initActionList ; a; b=a, a=a->nextPtr) {
+       if (a == action && b != NULL) {
+           b->nextPtr=a->nextPtr;
+           free( a);
+           break;
        }
-       if (!first_terminal)
-               first_terminal = console;
-       if (serial_cons && !strncmp(term_ptr,"TERM=linux",10))
-               term_ptr = "TERM=vt100";
+    }
 }
 
-extern int
-init_main(int argc, char * * argv)
+/* NOTE that if BB_FEATURE_USE_INITTAB is NOT defined,
+ * then parse_inittab() simply adds in some default
+ * actions(i.e runs INIT_SCRIPT and then starts a pair 
+ * of "askfirst" shells).  If BB_FEATURE_USE_INITTAB 
+ * _is_ defined, but /etc/inittab is missing, this 
+ * results in the same set of default behaviors.
+ * */
+void parse_inittab(void) 
 {
-       static const char* const    rc = "etc/rc";
-       const char *                arguments[100];
-       int                         run_rc = 1;
-       int                         j;
-       int                         pid1 = 0;
-       int                         pid2 = 0;
-       int                         create_swap= -1;
-       struct stat                 statbuf;
-       const char *                tty_commands[2] = { "bin/sh", "bin/sh"};
-       char                        swap[20];
-       int                         serial_console = 0;
-
-       /*
-        * If I am started as /linuxrc instead of /sbin/init, I don't have the
-        * environment that init expects. I can't fix the signal behavior. Try
-        * to divorce from the controlling terminal with setsid(). This won't work
-        * if I am the process group leader.
-        */
-       setsid();
-
-       signal(SIGUSR1, halt_signal);
-       signal(SIGUSR2, reboot_signal);
-       signal(SIGINT, reboot_signal);
-       signal(SIGTERM, exit_signal);
-
-       reboot(RB_DISABLE_CAD);
-
-       message(log, "%s: started. ", argv[0]);
+#ifdef BB_FEATURE_USE_INITTAB
+    FILE* file;
+    char buf[256], lineAsRead[256], tmpConsole[256];
+    char *p, *q, *r, *s;
+    const struct initActionType *a = actions;
+    int foundIt;
+
+
+    file = fopen(INITTAB, "r");
+    if (file == NULL) {
+       /* No inittab file -- set up some default behavior */
+#endif
+       /* Askfirst shell on tty1 */
+       new_initAction( ASKFIRST, SHELL, console );
+       /* Askfirst shell on tty2 */
+       if (secondConsole != NULL) 
+           new_initAction( ASKFIRST, SHELL, secondConsole );
+       /* sysinit */
+       new_initAction( SYSINIT, INIT_SCRIPT, console );
+
+       return;
+#ifdef BB_FEATURE_USE_INITTAB
+    }
 
-       for ( j = 1; j < argc; j++ ) {
-               if ( strcmp(argv[j], "single") == 0 ) {
-                       run_rc = 0;
-                       tty_commands[0] = "bin/sh";
-                       tty_commands[1] = 0;
-               }
+    while ( fgets(buf, 255, file) != NULL) {
+       foundIt=FALSE;
+       for(p = buf; *p == ' ' || *p == '\t'; p++);
+       if (*p == '#' || *p == '\n') continue;
+
+       /* Trim the trailing \n */
+       q = strrchr( p, '\n');
+       if (q != NULL)
+           *q='\0';
+
+       /* Keep a copy around for posterity's sake (and error msgs) */
+       strcpy(lineAsRead, buf);
+
+       /* Grab the ID field */
+       s=p;
+       p = strchr( p, ':');
+       if ( p != NULL || *(p+1) != '\0' ) {
+           *p='\0';
+           ++p;
        }
-       for ( j = 0; __environ[j] != 0; j++ ) {
-               if ( strncmp(__environ[j], "tty", 3) == 0
-                && __environ[j][3] >= '1'
-                && __environ[j][3] <= '2'
-                && __environ[j][4] == '=' ) {
-                       const char * s = &__environ[j][5];
-
-                       if ( *s == 0 || strcmp(s, "off") == 0 )
-                               s = 0;
 
-                       tty_commands[__environ[j][3] - '1'] = s;
-               }
-               /* Should catch the syntax of Sparc kernel console setting.   */
-               /* The kernel does not recognize a serial console when getting*/
-               /* console=/dev/ttySX !! */
-               else if ( strcmp(__environ[j], "console=ttya") == 0 ) {
-                       serial_console=1;
-               }
-               else if ( strcmp(__environ[j], "console=ttyb") == 0 ) {
-                       serial_console=2;
-               }
-               /* standard console settings */
-               else if ( strncmp(__environ[j], "console=", 8) == 0 ) {
-                       first_terminal=&(__environ[j][8]);
-               }
-               else if ( strncmp(__environ[j], "TERM=", 5) == 0) {
-                       term_ptr=__environ[j];
-               }
+       /* Now peal off the process field from the end
+        * of the string */
+       q = strrchr( p, ':');
+       if ( q == NULL || *(q+1) == '\0' ) {
+           message(LOG|CONSOLE,"Bad inittab entry: %s\n", lineAsRead);
+           continue;
+       } else {
+           *q='\0';
+           ++q;
        }
-       configure_terminals( serial_console );
 
-       printf("mounting /proc ...\n");
-       if (mount("/proc","/proc","proc",0,0)) {
-         perror("mounting /proc failed\n");
+       /* Now peal off the action field */
+       r = strrchr( p, ':');
+       if ( r == NULL || *(r+1) == '\0') {
+           message(LOG|CONSOLE,"Bad inittab entry: %s\n", lineAsRead);
+           continue;
+       } else {
+           ++r;
        }
-       printf("\tdone.\n");
-
-       set_free_pages();
-
-       /* not enough memory to do anything useful*/
-       if (mem_total() < 2000) { 
-         int retval;
-         retval= stat("/etc/swappartition",&statbuf);
-         if (retval) {
-           printf("You do not have enough RAM, sorry.\n");
-           while (1) { sleep(1);}
-         } else { /* everything OK */
-           FILE *f;
-
-           f=fopen("/etc/swappartition","r");
-           fgets(swap,19,f);
-           fclose(f);
-           *(strstr(swap,"\n"))='\0';
-
-           if (swapon(swap,0)) {
-             perror("swapon failed\n");
-           } else {
-             f=fopen("/etc/swaps","w");
-             fprintf(f,"%s none swap rw 0 0",swap);
-               fclose(f);
-             create_swap = 0;
+
+       /* Ok, now process it */
+       a = actions;
+       while (a->name != 0) {
+           if (strcmp(a->name, r) == 0) {
+               if (*s != '\0') {
+                   struct stat statBuf;
+                   strcpy(tmpConsole, "/dev/");
+                   strncat(tmpConsole, s, 200);
+                   if (stat(tmpConsole, &statBuf) != 0) {
+                       message(LOG|CONSOLE, "device '%s' does not exist.  Did you read the directions?\n", tmpConsole);
+                       break;
+                   }
+                   s = tmpConsole;
+               }
+               new_initAction( a->action, q, s);
+               foundIt=TRUE;
            }
-         }
+           a++;
        }
-
-       /*
-        * Don't modify **argv directly, it would show up in the "ps" display.
-        * I don't want "init" to look like "rc".
-        */
-       arguments[0] = rc;
-       for ( j = 1; j < argc; j++ ) {
-               arguments[j] = argv[j];
+       if (foundIt==TRUE)
+           continue;
+       else {
+           /* Choke on an unknown action */
+           message(LOG|CONSOLE, "Bad inittab entry: %s\n", lineAsRead);
        }
-       arguments[j] = 0;
+    }
+    return;
+#endif
+}
 
-       if ( run_rc ) {
-               run(rc, arguments, console, 0);
-               //waitfor(run(rc, arguments, console, 0));
-       }
+extern int init_main(int argc, char **argv)
+{
+    initAction *a;
+    pid_t wpid;
+    int status;
+
+#ifndef DEBUG_INIT
+    /* Expect to be PID 1 if we are run as init (not linuxrc) */
+    if (getpid() != 1 && strstr(argv[0], "init")!=NULL ) {
+       usage( "init\n\nInit is the parent of all processes.\n\n"
+               "This version of init is designed to be run only by the kernel\n");
+    }
+    /* Fix up argv[0] to be certain we claim to be init */
+    strncpy(argv[0], "init", strlen(argv[0]));
+
+    /* Set up sig handlers  -- be sure to
+     * clear all of these in run() */
+    signal(SIGUSR1, halt_signal);
+    signal(SIGUSR2, reboot_signal);
+    signal(SIGINT, reboot_signal);
+    signal(SIGTERM, reboot_signal);
+#if defined BB_FEATURE_INIT_CHROOT
+    signal(SIGHUP, check_chroot);
+#endif
+
+    /* Turn off rebooting via CTL-ALT-DEL -- we get a 
+     * SIGINT on CAD so we can shut things down gracefully... */
+    reboot(RB_DISABLE_CAD);
+#endif 
+
+    /* Figure out where the default console should be */
+    console_init();
+
+    /* Close whatever files are open, and reset the console. */
+    close(0);
+    close(1);
+    close(2);
+    set_term(0);
+    setsid();
+
+    /* Make sure PATH is set to something sane */
+    putenv(_PATH_STDPATH);
+
+    /* Hello world */
+#ifndef DEBUG_INIT
+    message(LOG|CONSOLE, 
+           "init started:  BusyBox v%s (%s) multi-call binary\r\n", 
+           BB_VER, BB_BT);
+#else
+    message(LOG|CONSOLE, 
+           "init(%d) started:  BusyBox v%s (%s) multi-call binary\r\n", 
+           getpid(), BB_VER, BB_BT);
+#endif
+
+    
+    /* Mount /proc */
+    if (mount ("proc", "/proc", "proc", 0, 0) == 0) {
+       message(LOG|CONSOLE, "Mounting /proc: done.\n");
+       kernelVersion = get_kernel_revision();
+    } else
+       message(LOG|CONSOLE, "Mounting /proc: failed!\n");
+
+    /* Make sure there is enough memory to do something useful. */
+    check_memory();
+
+    /* Check if we are supposed to be in single user mode */
+    if ( argc > 1 && (!strcmp(argv[1], "single") || 
+               !strcmp(argv[1], "-s") || !strcmp(argv[1], "1"))) 
+    {
+       /* Ask first then start a shell on tty2 */
+       if (secondConsole != NULL) 
+           new_initAction( ASKFIRST, SHELL, secondConsole);
+       /* Ask first then start a shell on tty1 */
+       new_initAction( ASKFIRST, SHELL, console);
+    } else {
+       /* Not in single user mode -- see what inittab says */
+
+       /* NOTE that if BB_FEATURE_USE_INITTAB is NOT defined,
+        * then parse_inittab() simply adds in some default
+        * actions(i.e runs INIT_SCRIPT and then starts a pair 
+        * of "askfirst" shells */
+       parse_inittab();
+    }
 
-       if ( 0 == create_swap) {
-         if (unlink("/etc/swappartition")) {
-           perror("unlinking /etc/swappartition");
-         }
+    /* Now run everything that needs to be run */
+
+    /* First run the sysinit command */
+    for( a=initActionList ; a; a=a->nextPtr) {
+       if (a->action == SYSINIT) {
+           waitfor(a->process, a->console, FALSE);
+           /* Now remove the "sysinit" entry from the list */
+           delete_initAction( a);
+       }
+    }
+    /* Next run anything that wants to block */
+    for( a=initActionList ; a; a=a->nextPtr) {
+       if (a->action == WAIT) {
+           waitfor(a->process, a->console, FALSE);
+           /* Now remove the "wait" entry from the list */
+           delete_initAction( a);
        }
+    }
+    /* Next run anything to be run only once */
+    for( a=initActionList ; a; a=a->nextPtr) {
+       if (a->action == ONCE) {
+           run(a->process, a->console, FALSE);
+           /* Now remove the "once" entry from the list */
+           delete_initAction( a);
+       }
+    }
+    /* 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);
+    }
 
-       arguments[0] = "-sh";
-       arguments[1] = 0;
-       for ( ; ; ) {
-               int     wpid;
-               int     status;
-
-               if ( pid1 == 0 && tty_commands[0] ) {
-                       /* Ask before starting a shell */
-                       /*
-                        arguments[0] = tty_commands[0];
-                        */
-                       pid1 = run(tty_commands[0], arguments, first_terminal, 1);
+    /* Now run the looping stuff for the rest of forever */
+    while (1) {
+       for( a=initActionList ; a; a=a->nextPtr) {
+           /* Only run stuff with pid==0.  If they have
+            * a pid, that means they are still running */
+           if (a->pid == 0) {
+               switch(a->action) {
+                   case RESPAWN:
+                       /* run the respawn stuff */
+                       a->pid = run(a->process, a->console, FALSE);
+                       break;
+                   case ASKFIRST:
+                       /* run the askfirst stuff */
+                       a->pid = run(a->process, a->console, TRUE);
+                       break;
+                   /* silence the compiler's incessant whining */
+                   default:
+                       break;
                }
-               if ( pid2 == 0 && tty_commands[1] ) {
-                       pid2 = run(tty_commands[1], arguments, second_terminal, 1);
-               }
-               wpid = wait(&status);
-               if ( wpid > 0 ) {
-                       /* DEBUGGING */
-                       message(log, "pid %d exited, status=%x.\n", wpid, status);
-               }
-               if ( wpid == pid1 ) {
-                 pid1 = 0;
+           }
+       }
+       /* Wait for a child process to exit */
+       wpid = wait(&status);
+       if (wpid > 0 ) {
+           /* Find out who died and clean up their corpse */
+           for( a=initActionList ; a; a=a->nextPtr) {
+               if (a->pid==wpid) {
+                   a->pid=0;
+                   message(LOG, "Process '%s' (pid %d) exited.  Scheduling it for restart.\n", 
+                           a->process, wpid);
                }
-               if ( wpid == pid2 )
-                       pid2 = 0;
+           }
        }
+       sleep(1);
+    }
 }