1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
|
#include "driver/driver.h"
#include <camellia/flags.h>
#include <camellia/syscalls.h>
#include <stdint.h>
#include <stdio.h>
#include <unistd.h>
#include <user/lib/fs/misc.h>
#define die(fmt, ...) do { fprintf(stderr, "init: " fmt, __VA_ARGS__); exit(1); } while (0)
void redirect(const char *exe, const char *out, const char *in) {
if (!fork()) {
if (!freopen(out, "a+", stderr)) {
fprintf(stdout, "couldn't open %s\n", out);
exit(1);
}
if (!freopen(out, "a+", stdout))
die("couldn't open %s\n", out);
if (!freopen(in, "r", stdin))
die(" couldn't open %s\n", in);
termcook();
for (;;) {
if (!fork()) {
execv(exe, NULL);
fprintf(stderr, "init: couldn't start %s\n", exe);
_syscall_sleep(5000);
exit(1);
}
_syscall_await();
}
}
}
int main(void) {
handle_t killswitch_pipe[2];
freopen("/kdev/com1", "a+", stdout);
freopen("/kdev/com1", "a+", stderr);
printf("in init (stage 2), main at 0x%x\n", &main);
MOUNT_AT("/keyboard") { ps2_drv(); }
MOUNT_AT("/bin/") {
fs_union((const char*[]){
"/init/bin/amd64/",
"/init/bin/sh/",
NULL
});
}
MOUNT_AT("/Users/") {
MOUNT_AT("/tmp/") {
const char *argv[] = {"/bin/tmpfs", NULL};
execv(argv[0], (void*)argv);
}
// TODO a simple union isn't enough here
fs_union((const char*[]){
"/tmp/",
"/init/Users/",
NULL
});
}
MOUNT_AT("/tmp/") {
const char *argv[] = {"/bin/tmpfs", NULL};
execv(argv[0], (void*)argv);
}
MOUNT_AT("/vtty") {
const char *argv[] = {"/bin/vterm", NULL};
execv(argv[0], (void*)argv);
}
MOUNT_AT("/net/") {
const char *argv[] = {"/bin/netstack", "/kdev/eth", NULL};
execv(argv[0], (void*)argv);
}
if (_syscall_pipe(killswitch_pipe, 0) < 0) {
printf("couldn't create the killswitch pipe, quitting...\n");
return 1;
}
MOUNT_AT("/initctl") {
close(killswitch_pipe[0]);
initctl_drv(killswitch_pipe[1]);
}
close(killswitch_pipe[1]);
if (fork()) {
/* used to trigger a kernel bug
* 7c96f9c03502e0c60f23f4c550d12a629f3b3daf */
_syscall_await();
exit(1);
}
if (!fork()) {
// TODO close on exec
close(killswitch_pipe[0]);
redirect("/bin/shell", "/kdev/com1", "/kdev/com1");
redirect("/bin/shell", "/vtty", "/keyboard");
// TODO busy loop without no children
for (;;) _syscall_await();
exit(1);
}
_syscall_read(killswitch_pipe[0], NULL, 0, 0);
return 0;
}
|
