This commit is contained in:
Eric Andersen
1999-10-26 00:18:56 +00:00
parent 0460ff2e5d
commit 8a8fbb87f7
2 changed files with 382 additions and 418 deletions

126
init.c
View File

@ -51,9 +51,6 @@
#define INITSCRIPT "/etc/init.d/rcS" /* Initscript. */ #define INITSCRIPT "/etc/init.d/rcS" /* Initscript. */
#define PATH_DEFAULT "PATH=/usr/local/sbin:/sbin:/bin:/usr/sbin:/usr/bin" #define PATH_DEFAULT "PATH=/usr/local/sbin:/sbin:/bin:/usr/sbin:/usr/bin"
static int maxproclen=0;
static char* argv0;
static char *console = CONSOLE; static char *console = CONSOLE;
static char *second_terminal = "/dev/tty2"; static char *second_terminal = "/dev/tty2";
static char *log = "/dev/tty3"; static char *log = "/dev/tty3";
@ -69,8 +66,10 @@ int device_open(char* device, int mode)
/* Retry up to 5 times */ /* Retry up to 5 times */
for (f = 0; f < 5; f++) for (f = 0; f < 5; f++)
if ((fd = open(device, m)) >= 0) break; if ((fd = open(device, m)) >= 0)
if (fd < 0) return fd; break;
if (fd < 0)
return fd;
/* Set original flags. */ /* Set original flags. */
if (m != mode) if (m != mode)
fcntl(fd, F_SETFL, mode); fcntl(fd, F_SETFL, mode);
@ -82,12 +81,14 @@ void message(char* device, char *fmt, ...)
{ {
int fd; int fd;
va_list arguments; va_list arguments;
if ((fd = device_open(device, O_WRONLY | O_NOCTTY | O_NDELAY)) >= 0) { if ((fd = device_open(device, O_WRONLY | O_NOCTTY | O_NDELAY)) >= 0) {
va_start(arguments, fmt); va_start(arguments, fmt);
vdprintf(fd, fmt, arguments); vdprintf(fd, fmt, arguments);
va_end(arguments); va_end(arguments);
}
close(fd); close(fd);
} else
vprintf(fmt, arguments);
} }
/* Set terminal settings to reasonable defaults */ /* Set terminal settings to reasonable defaults */
@ -97,7 +98,7 @@ void set_term()
struct termios tty; struct termios tty;
if ((fd = device_open(console, O_RDWR | O_NOCTTY)) < 0) { if ((fd = device_open(console, O_RDWR | O_NOCTTY)) < 0) {
message(log, "can't open %s", console); message(log, "can't open %s\n", console);
return; return;
} }
ioctl(fd, TCGETS, &tty); ioctl(fd, TCGETS, &tty);
@ -125,8 +126,7 @@ void set_term()
close(fd); close(fd);
} }
static int static int mem_total()
mem_total()
{ {
char s[80]; char s[80];
char *p; char *p;
@ -144,8 +144,7 @@ mem_total()
return -1; return -1;
} }
static void static void set_free_pages()
set_free_pages()
{ {
char s[80]; char s[80];
FILE *f; FILE *f;
@ -162,8 +161,7 @@ set_free_pages()
} }
static void static void console_init()
console_init()
{ {
int fd; int fd;
int tried_devcons = 0; int tried_devcons = 0;
@ -195,8 +193,7 @@ console_init()
close(fd); close(fd);
} }
static int static int waitfor(int pid)
waitfor(int pid)
{ {
int status, wpid; int status, wpid;
@ -208,8 +205,7 @@ waitfor(int pid)
return wpid; return wpid;
} }
static int static int run(const char *command, char *terminal, int get_enter)
run(const char* command, char* terminal, int get_enter)
{ {
int f, pid; int f, pid;
char *args[16]; char *args[16];
@ -224,10 +220,12 @@ run(const char* command, char* terminal, int get_enter)
ptr = buf; ptr = buf;
for (f = 1; f < 15; f++) { for (f = 1; f < 15; f++) {
/* Skip white space */ /* Skip white space */
while(*ptr == ' ' || *ptr == '\t') ptr++; while (*ptr == ' ' || *ptr == '\t')
ptr++;
args[f] = ptr; args[f] = ptr;
/* May be trailing space.. */ /* May be trailing space.. */
if (*ptr == 0) break; if (*ptr == 0)
break;
/* Skip this `word' */ /* Skip this `word' */
while (*ptr && *ptr != ' ' && *ptr != '\t' && *ptr != '#') while (*ptr && *ptr != ' ' && *ptr != '\t' && *ptr != '#')
ptr++; ptr++;
@ -251,7 +249,7 @@ run(const char* command, char* terminal, int get_enter)
setsid(); setsid();
if ((f = device_open(terminal, O_RDWR | O_NOCTTY)) < 0) { if ((f = device_open(terminal, O_RDWR | O_NOCTTY)) < 0) {
message( log, "open(%s) failed: %s", terminal, strerror(errno)); message(log, "open(%s) failed: %s\n", terminal, strerror(errno));
return -1; return -1;
} }
dup(f); dup(f);
@ -271,15 +269,18 @@ run(const char* command, char* terminal, int get_enter)
char c; char c;
write(1, press_enter, sizeof(press_enter) - 1); write(1, press_enter, sizeof(press_enter) - 1);
read(0, &c, 1); read(0, &c, 1);
message(console, "Got an enter\r\n");
} }
/* Log the process name and args */ /* Log the process name and args */
message(log, "Executing '%s'\n", command); message(console, "Executing ");
message(console, "'%s'\r\n", command);
/* Now run it. This should take over the PID, so nothing /* Now run it. This should take over the PID, so nothing
* further in init.c should be run by this PID. */ * further in init.c should be run by this PID. */
execvp(args[1], args + 1); execvp(args[1], args + 1);
message(console, "Hmm. Trying as a script.\r\n");
/* If shell scripts are not executed, force the issue */ /* If shell scripts are not executed, force the issue */
if (errno == ENOEXEC) { if (errno == ENOEXEC) {
char buf[256]; char buf[256];
@ -291,18 +292,17 @@ run(const char* command, char* terminal, int get_enter)
args[4] = NULL; args[4] = NULL;
execvp(args[1], args + 1); execvp(args[1], args + 1);
} }
message(log, "Could not execute '%s'\n", command, strerror(errno)); message(console, "Could not execute '%s'\n", command);
exit(-1); exit(-1);
} }
return pid; return pid;
} }
#ifndef DEBUG_INIT #ifndef DEBUG_INIT
static void static void shutdown_system(void)
shutdown_system(void)
{ {
message(console, "The system is going down NOW !!"); message(console, "The system is going down NOW !!\r\n");
sync(); sync();
/* Allow Ctrl-Alt-Del to reboot system. */ /* Allow Ctrl-Alt-Del to reboot system. */
reboot(RB_ENABLE_CAD); reboot(RB_ENABLE_CAD);
@ -325,42 +325,26 @@ shutdown_system(void)
} }
} }
static void static void halt_signal(int sig)
halt_signal(int sig)
{ {
shutdown_system(); shutdown_system();
message(console, "The system is halted. Press CTRL-ALT-DEL or turn off power\r\n"); message(console,
"The system is halted. Press CTRL-ALT-DEL or turn off power\r\n");
reboot(RB_POWER_OFF); reboot(RB_POWER_OFF);
exit(0); exit(0);
} }
static void static void reboot_signal(int sig)
reboot_signal(int sig)
{ {
shutdown_system(); shutdown_system();
message(console, "Please stand by while rebooting the system.\r\n"); message(console, "Please stand by while rebooting the system.\r\n");
reboot(RB_AUTOBOOT); reboot(RB_AUTOBOOT);
exit(0); exit(0);
} }
#endif #endif
int setproctitle(char *fmt, ...) extern int init_main(int argc, char **argv)
{
va_list ap;
int len;
char buf[256];
buf[0] = 0;
va_start(ap, fmt);
len = vsprintf(buf, fmt, ap);
va_end(ap);
memset(argv0, 0, maxproclen + 1);
strncpy(argv0, buf, maxproclen);
return len;
}
extern int
init_main(int argc, char * * argv)
{ {
int run_rc = TRUE; int run_rc = TRUE;
int pid1 = 0; int pid1 = 0;
@ -370,13 +354,10 @@ init_main(int argc, char * * argv)
const char *shell_commands = SHELL; const char *shell_commands = SHELL;
const char *tty0_commands = init_commands; const char *tty0_commands = init_commands;
const char *tty1_commands = shell_commands; const char *tty1_commands = shell_commands;
char *hello_msg_format =
"init started: BusyBox v%s (%s) multi-call binary\r\n";
const char *no_memory = const char *no_memory =
"Sorry, your computer does not have enough memory.\n"; "Sorry, your computer does not have enough memory.\r\n";
/* For later use */
argv0 = argv[0];
maxproclen = strlen(argv[0]);
setproctitle("init [boot]");
#ifndef DEBUG_INIT #ifndef DEBUG_INIT
@ -411,20 +392,16 @@ init_main(int argc, char * * argv)
putenv(PATH_DEFAULT); putenv(PATH_DEFAULT);
/* Hello world */ /* Hello world */
message(console, "%s started: BusyBox v%s (%s) multi-call binary", message(log, hello_msg_format, BB_VER, BB_BT);
argv[0], BB_VER, BB_BT); message(console, hello_msg_format, BB_VER, BB_BT);
message(log, "%s started: BusyBox v%s (%s) multi-call binary",
argv[0], BB_VER, BB_BT);
/* Mount /proc */ /* Mount /proc */
message(console, "Mounting /proc: \n");
if (mount("/proc", "/proc", "proc", 0, 0)) { if (mount("/proc", "/proc", "proc", 0, 0)) {
message(log, "%s: could not mount /proc!\n", argv[0]); message(log, "Mounting /proc: failed!\n");
message(console, "failed!\n"); message(console, "Mounting /proc: failed!\r\n");
} else {
message(console, "Mounting /proc: done.\r\n");
} }
message(console, "done.\n");
/* Make sure there is enough memory to do something useful */ /* Make sure there is enough memory to do something useful */
set_free_pages(); set_free_pages();
@ -433,25 +410,27 @@ init_main(int argc, char * * argv)
retval = stat("/etc/fstab", &statbuf); retval = stat("/etc/fstab", &statbuf);
if (retval) { if (retval) {
message(console, "%s", no_memory); message(console, "%s", no_memory);
while (1) { sleep(1);} while (1) {
sleep(1);
}
} else { } else {
/* Try to turn on swap */ /* Try to turn on swap */
waitfor(run("/bin/swapon -a", console, 0)); waitfor(run("/bin/swapon -a", console, 0));
if (mem_total() < 2000) { if (mem_total() < 2000) {
message(console, "%s", no_memory); message(console, "%s", no_memory);
while (1) { sleep(1);} while (1) {
sleep(1);
}
} }
} }
} }
/* Check if we are supposed to be in single user mode */ /* Check if we are supposed to be in single user mode */
if (!strcmp(argv[1], "single") || !strcmp(argv[1], "-s") || !strcmp(argv[1], "1")) { if ( argc > 1 && (!strcmp(argv[1], "single") ||
!strcmp(argv[1], "-s") || !strcmp(argv[1], "1"))) {
run_rc = FALSE; run_rc = FALSE;
tty0_commands = shell_commands; tty0_commands = shell_commands;
tty1_commands = 0; tty1_commands = 0;
setproctitle("init [S]");
} else {
setproctitle("init [1]");
} }
/* Make sure an init script exists before trying to run it */ /* Make sure an init script exists before trying to run it */
@ -467,20 +446,23 @@ init_main(int argc, char * * argv)
int wpid; int wpid;
int status; int status;
if ( pid1 == 0 && *tty0_commands ) { if (pid1 == 0 && tty0_commands) {
pid1 = run(tty0_commands, console, 1); pid1 = run(tty0_commands, console, 1);
} }
if ( pid2 == 0 && *tty1_commands ) { if (pid2 == 0 && tty1_commands) {
pid2 = run(tty1_commands, second_terminal, 1); pid2 = run(tty1_commands, second_terminal, 1);
} }
wpid = wait(&status); wpid = wait(&status);
if (wpid > 0 && wpid != pid1) { if (wpid > 0 && wpid != pid1) {
message(log, "pid %d exited, status=%x.\n", wpid, status); message(log, "pid %d exited, status=%x.\n", wpid, status);
} }
/* Don't respawn an init script if it exits */
if (run_rc == FALSE && wpid == pid1) {
pid1 = 0;
}
if (wpid == pid2) { if (wpid == pid2) {
pid2 = 0; pid2 = 0;
} }
sleep(1); sleep(1);
} }
} }

View File

@ -51,9 +51,6 @@
#define INITSCRIPT "/etc/init.d/rcS" /* Initscript. */ #define INITSCRIPT "/etc/init.d/rcS" /* Initscript. */
#define PATH_DEFAULT "PATH=/usr/local/sbin:/sbin:/bin:/usr/sbin:/usr/bin" #define PATH_DEFAULT "PATH=/usr/local/sbin:/sbin:/bin:/usr/sbin:/usr/bin"
static int maxproclen=0;
static char* argv0;
static char *console = CONSOLE; static char *console = CONSOLE;
static char *second_terminal = "/dev/tty2"; static char *second_terminal = "/dev/tty2";
static char *log = "/dev/tty3"; static char *log = "/dev/tty3";
@ -69,8 +66,10 @@ int device_open(char* device, int mode)
/* Retry up to 5 times */ /* Retry up to 5 times */
for (f = 0; f < 5; f++) for (f = 0; f < 5; f++)
if ((fd = open(device, m)) >= 0) break; if ((fd = open(device, m)) >= 0)
if (fd < 0) return fd; break;
if (fd < 0)
return fd;
/* Set original flags. */ /* Set original flags. */
if (m != mode) if (m != mode)
fcntl(fd, F_SETFL, mode); fcntl(fd, F_SETFL, mode);
@ -82,12 +81,14 @@ void message(char* device, char *fmt, ...)
{ {
int fd; int fd;
va_list arguments; va_list arguments;
if ((fd = device_open(device, O_WRONLY | O_NOCTTY | O_NDELAY)) >= 0) { if ((fd = device_open(device, O_WRONLY | O_NOCTTY | O_NDELAY)) >= 0) {
va_start(arguments, fmt); va_start(arguments, fmt);
vdprintf(fd, fmt, arguments); vdprintf(fd, fmt, arguments);
va_end(arguments); va_end(arguments);
}
close(fd); close(fd);
} else
vprintf(fmt, arguments);
} }
/* Set terminal settings to reasonable defaults */ /* Set terminal settings to reasonable defaults */
@ -97,7 +98,7 @@ void set_term()
struct termios tty; struct termios tty;
if ((fd = device_open(console, O_RDWR | O_NOCTTY)) < 0) { if ((fd = device_open(console, O_RDWR | O_NOCTTY)) < 0) {
message(log, "can't open %s", console); message(log, "can't open %s\n", console);
return; return;
} }
ioctl(fd, TCGETS, &tty); ioctl(fd, TCGETS, &tty);
@ -125,8 +126,7 @@ void set_term()
close(fd); close(fd);
} }
static int static int mem_total()
mem_total()
{ {
char s[80]; char s[80];
char *p; char *p;
@ -144,8 +144,7 @@ mem_total()
return -1; return -1;
} }
static void static void set_free_pages()
set_free_pages()
{ {
char s[80]; char s[80];
FILE *f; FILE *f;
@ -162,8 +161,7 @@ set_free_pages()
} }
static void static void console_init()
console_init()
{ {
int fd; int fd;
int tried_devcons = 0; int tried_devcons = 0;
@ -195,8 +193,7 @@ console_init()
close(fd); close(fd);
} }
static int static int waitfor(int pid)
waitfor(int pid)
{ {
int status, wpid; int status, wpid;
@ -208,8 +205,7 @@ waitfor(int pid)
return wpid; return wpid;
} }
static int static int run(const char *command, char *terminal, int get_enter)
run(const char* command, char* terminal, int get_enter)
{ {
int f, pid; int f, pid;
char *args[16]; char *args[16];
@ -224,10 +220,12 @@ run(const char* command, char* terminal, int get_enter)
ptr = buf; ptr = buf;
for (f = 1; f < 15; f++) { for (f = 1; f < 15; f++) {
/* Skip white space */ /* Skip white space */
while(*ptr == ' ' || *ptr == '\t') ptr++; while (*ptr == ' ' || *ptr == '\t')
ptr++;
args[f] = ptr; args[f] = ptr;
/* May be trailing space.. */ /* May be trailing space.. */
if (*ptr == 0) break; if (*ptr == 0)
break;
/* Skip this `word' */ /* Skip this `word' */
while (*ptr && *ptr != ' ' && *ptr != '\t' && *ptr != '#') while (*ptr && *ptr != ' ' && *ptr != '\t' && *ptr != '#')
ptr++; ptr++;
@ -251,7 +249,7 @@ run(const char* command, char* terminal, int get_enter)
setsid(); setsid();
if ((f = device_open(terminal, O_RDWR | O_NOCTTY)) < 0) { if ((f = device_open(terminal, O_RDWR | O_NOCTTY)) < 0) {
message( log, "open(%s) failed: %s", terminal, strerror(errno)); message(log, "open(%s) failed: %s\n", terminal, strerror(errno));
return -1; return -1;
} }
dup(f); dup(f);
@ -271,15 +269,18 @@ run(const char* command, char* terminal, int get_enter)
char c; char c;
write(1, press_enter, sizeof(press_enter) - 1); write(1, press_enter, sizeof(press_enter) - 1);
read(0, &c, 1); read(0, &c, 1);
message(console, "Got an enter\r\n");
} }
/* Log the process name and args */ /* Log the process name and args */
message(log, "Executing '%s'\n", command); message(console, "Executing ");
message(console, "'%s'\r\n", command);
/* Now run it. This should take over the PID, so nothing /* Now run it. This should take over the PID, so nothing
* further in init.c should be run by this PID. */ * further in init.c should be run by this PID. */
execvp(args[1], args + 1); execvp(args[1], args + 1);
message(console, "Hmm. Trying as a script.\r\n");
/* If shell scripts are not executed, force the issue */ /* If shell scripts are not executed, force the issue */
if (errno == ENOEXEC) { if (errno == ENOEXEC) {
char buf[256]; char buf[256];
@ -291,18 +292,17 @@ run(const char* command, char* terminal, int get_enter)
args[4] = NULL; args[4] = NULL;
execvp(args[1], args + 1); execvp(args[1], args + 1);
} }
message(log, "Could not execute '%s'\n", command, strerror(errno)); message(console, "Could not execute '%s'\n", command);
exit(-1); exit(-1);
} }
return pid; return pid;
} }
#ifndef DEBUG_INIT #ifndef DEBUG_INIT
static void static void shutdown_system(void)
shutdown_system(void)
{ {
message(console, "The system is going down NOW !!"); message(console, "The system is going down NOW !!\r\n");
sync(); sync();
/* Allow Ctrl-Alt-Del to reboot system. */ /* Allow Ctrl-Alt-Del to reboot system. */
reboot(RB_ENABLE_CAD); reboot(RB_ENABLE_CAD);
@ -325,42 +325,26 @@ shutdown_system(void)
} }
} }
static void static void halt_signal(int sig)
halt_signal(int sig)
{ {
shutdown_system(); shutdown_system();
message(console, "The system is halted. Press CTRL-ALT-DEL or turn off power\r\n"); message(console,
"The system is halted. Press CTRL-ALT-DEL or turn off power\r\n");
reboot(RB_POWER_OFF); reboot(RB_POWER_OFF);
exit(0); exit(0);
} }
static void static void reboot_signal(int sig)
reboot_signal(int sig)
{ {
shutdown_system(); shutdown_system();
message(console, "Please stand by while rebooting the system.\r\n"); message(console, "Please stand by while rebooting the system.\r\n");
reboot(RB_AUTOBOOT); reboot(RB_AUTOBOOT);
exit(0); exit(0);
} }
#endif #endif
int setproctitle(char *fmt, ...) extern int init_main(int argc, char **argv)
{
va_list ap;
int len;
char buf[256];
buf[0] = 0;
va_start(ap, fmt);
len = vsprintf(buf, fmt, ap);
va_end(ap);
memset(argv0, 0, maxproclen + 1);
strncpy(argv0, buf, maxproclen);
return len;
}
extern int
init_main(int argc, char * * argv)
{ {
int run_rc = TRUE; int run_rc = TRUE;
int pid1 = 0; int pid1 = 0;
@ -370,13 +354,10 @@ init_main(int argc, char * * argv)
const char *shell_commands = SHELL; const char *shell_commands = SHELL;
const char *tty0_commands = init_commands; const char *tty0_commands = init_commands;
const char *tty1_commands = shell_commands; const char *tty1_commands = shell_commands;
char *hello_msg_format =
"init started: BusyBox v%s (%s) multi-call binary\r\n";
const char *no_memory = const char *no_memory =
"Sorry, your computer does not have enough memory.\n"; "Sorry, your computer does not have enough memory.\r\n";
/* For later use */
argv0 = argv[0];
maxproclen = strlen(argv[0]);
setproctitle("init [boot]");
#ifndef DEBUG_INIT #ifndef DEBUG_INIT
@ -411,20 +392,16 @@ init_main(int argc, char * * argv)
putenv(PATH_DEFAULT); putenv(PATH_DEFAULT);
/* Hello world */ /* Hello world */
message(console, "%s started: BusyBox v%s (%s) multi-call binary", message(log, hello_msg_format, BB_VER, BB_BT);
argv[0], BB_VER, BB_BT); message(console, hello_msg_format, BB_VER, BB_BT);
message(log, "%s started: BusyBox v%s (%s) multi-call binary",
argv[0], BB_VER, BB_BT);
/* Mount /proc */ /* Mount /proc */
message(console, "Mounting /proc: \n");
if (mount("/proc", "/proc", "proc", 0, 0)) { if (mount("/proc", "/proc", "proc", 0, 0)) {
message(log, "%s: could not mount /proc!\n", argv[0]); message(log, "Mounting /proc: failed!\n");
message(console, "failed!\n"); message(console, "Mounting /proc: failed!\r\n");
} else {
message(console, "Mounting /proc: done.\r\n");
} }
message(console, "done.\n");
/* Make sure there is enough memory to do something useful */ /* Make sure there is enough memory to do something useful */
set_free_pages(); set_free_pages();
@ -433,25 +410,27 @@ init_main(int argc, char * * argv)
retval = stat("/etc/fstab", &statbuf); retval = stat("/etc/fstab", &statbuf);
if (retval) { if (retval) {
message(console, "%s", no_memory); message(console, "%s", no_memory);
while (1) { sleep(1);} while (1) {
sleep(1);
}
} else { } else {
/* Try to turn on swap */ /* Try to turn on swap */
waitfor(run("/bin/swapon -a", console, 0)); waitfor(run("/bin/swapon -a", console, 0));
if (mem_total() < 2000) { if (mem_total() < 2000) {
message(console, "%s", no_memory); message(console, "%s", no_memory);
while (1) { sleep(1);} while (1) {
sleep(1);
}
} }
} }
} }
/* Check if we are supposed to be in single user mode */ /* Check if we are supposed to be in single user mode */
if (!strcmp(argv[1], "single") || !strcmp(argv[1], "-s") || !strcmp(argv[1], "1")) { if ( argc > 1 && (!strcmp(argv[1], "single") ||
!strcmp(argv[1], "-s") || !strcmp(argv[1], "1"))) {
run_rc = FALSE; run_rc = FALSE;
tty0_commands = shell_commands; tty0_commands = shell_commands;
tty1_commands = 0; tty1_commands = 0;
setproctitle("init [S]");
} else {
setproctitle("init [1]");
} }
/* Make sure an init script exists before trying to run it */ /* Make sure an init script exists before trying to run it */
@ -467,20 +446,23 @@ init_main(int argc, char * * argv)
int wpid; int wpid;
int status; int status;
if ( pid1 == 0 && *tty0_commands ) { if (pid1 == 0 && tty0_commands) {
pid1 = run(tty0_commands, console, 1); pid1 = run(tty0_commands, console, 1);
} }
if ( pid2 == 0 && *tty1_commands ) { if (pid2 == 0 && tty1_commands) {
pid2 = run(tty1_commands, second_terminal, 1); pid2 = run(tty1_commands, second_terminal, 1);
} }
wpid = wait(&status); wpid = wait(&status);
if (wpid > 0 && wpid != pid1) { if (wpid > 0 && wpid != pid1) {
message(log, "pid %d exited, status=%x.\n", wpid, status); message(log, "pid %d exited, status=%x.\n", wpid, status);
} }
/* Don't respawn an init script if it exits */
if (run_rc == FALSE && wpid == pid1) {
pid1 = 0;
}
if (wpid == pid2) { if (wpid == pid2) {
pid2 = 0; pid2 = 0;
} }
sleep(1); sleep(1);
} }
} }