forked from bruceg/ezmlm-idx
-
Notifications
You must be signed in to change notification settings - Fork 0
/
auto-str.c
68 lines (63 loc) · 1.3 KB
/
auto-str.c
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
#include "str.h"
#include "subfd.h"
#include "substdio.h"
#include "readwrite.h"
#include "exit.h"
void subputs(const char *s)
{
if (substdio_puts(subfdout,s) == -1) _exit(111);
}
void subputsbin(const char *s)
{
char octal[5];
unsigned char ch;
while ((ch = *s++) != 0) {
octal[4] = 0;
octal[3] = '0' + (ch & 7); ch >>= 3;
octal[2] = '0' + (ch & 7); ch >>= 3;
octal[1] = '0' + (ch & 7);
octal[0] = '\\';
subputs(octal);
}
}
int main(int argc, char **argv)
{
char *name;
char *env;
char value[256];
int len;
name = argv[1];
if (!name) _exit(100);
env = argv[2];
if ((len = substdio_get(subfdin,value,sizeof value - 1)) <= 0)
_exit(100);
value[len] = 0;
value[str_chr(value,'\n')] = 0;
if (env) {
subputs("#include \"env.h\"\n"
"const char *");
subputs(name);
subputs("(void)\n"
"{\n"
" static const char *env = 0;\n"
" if (env == 0)\n"
" if ((env = env_get(\"");
subputs(env);
subputs("\")) == 0)\n"
" env = \"");
subputsbin(value);
subputs("\";\n"
" return env;\n"
"}\n");
}
else {
subputs("const char ");
subputs(name);
subputs("[] = \"");
subputsbin(value);
subputs("\";\n");
}
if (substdio_flush(subfdout) == -1) _exit(111);
return 0;
(void)argc;
}