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
|
#!/bin/sh
trap "rm -rf build" INT QUIT TERM
rm -rf build
mkdir -p build
cp *.h build
cat > build/sbase-box.c <<EOF
#include <unistd.h>
#include <libgen.h>
#include <errno.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "util.h"
#include "sbase-box.h"
struct cmd {
char *name;
int (*fn)(int, char **);
} cmds[] = {
{"install", xinstall_main},
{"[", test_main},
$(grep -l ^main *.c |
while read f
do
sed -n '
/^main/ {
s/main/'${f%.c}'_main/
s/-/_/g
w build/'$f'
s/\(^.*\)(.*)/ {"'${f%.c}'", \1},/p
d
}
w 'build/$f $f
done)
{NULL},
};
static void
install(char *path)
{
int r;
struct cmd *bp;
char fname[FILENAME_MAX];
if (path == NULL) {
fputs("sbase-box [-i path] [command]\n", stderr);
exit(1);
}
for (bp = cmds; bp->name; ++bp) {
r = snprintf(fname, sizeof(fname), "%s/%s", path, bp->name);
if (r < 0 || r >= sizeof(fname)) {
fprintf(stderr,
"sbase-box: destination path truncated for '%s'\n",
bp->name);
exit(1);
}
remove(fname);
if (symlink("sbase-box", fname) < 0) {
fprintf(stderr,
"sbase-box: %s: %s\n",
bp->name, strerror(errno));
exit(1);
}
}
}
int
main(int argc, char *argv[])
{
char *s = basename(argv[0]);
struct cmd *bp;
if (!strcmp(s, "sbase-box") && argc > 1) {
argc--; argv++;
if (strcmp(argv[0], "-i") == 0) {
install(argv[1]);
exit(0);
}
s = basename(argv[0]);
}
for (bp = cmds; bp->name; ++bp) {
if (strcmp(bp->name, s) == 0)
return (*bp->fn)(argc, argv);
}
for (bp = cmds; bp->name; ++bp)
printf("%s ", bp->name);
putchar('\n');
return 0;
}
EOF
sed -n 's/.* \(.*_main\).*/int \1(int, char **);/p'\
build/sbase-box.c > build/sbase-box.h
|
