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
105
106
107
108
109
110
111
112
|
#include <stdio.h>
#include <string.h>
int isid(int c)
{
return (c >= 'a' && c <= 'z')
|| (c >= 'A' && c <= 'Z')
|| (c >= '0' && c <= '9')
|| c == '_';
}
int isspc(int c)
{
return c == ' ' || c == '\t';
}
int main(int argc, char **argv)
{
char l[1000], *p, l2[1000], *q;
FILE *fp, *op;
int c, e, f;
if (argc < 3)
return 1;
fp = fopen(argv[1], "rb");
op = fopen(argv[2], "wb");
if (!fp || !op) {
fprintf(stderr, "c2str: file error\n");
return 1;
}
for (;;) {
p = l;
append:
if (fgets(p, sizeof l - (p - l), fp)) {
p = strchr(p, 0);
while (p > l && p[-1] == '\n')
--p;
*p = 0;
} else if (p == l)
break;
if (p > l && p[-1] == '\\') {
--p;
goto append;
}
if (l[0] == 0)
continue;
p = l, q = l2, f = e = 0;
while (*p && isspc(*p))
++p, ++f;
if (f < 4) {
do {
static const char *sr[] = {
"__x86_64__", "TCC_TARGET_X86_64",
"_WIN64", "TCC_TARGET_PE",
"_WIN32", "TCC_TARGET_PE",
"__arm__", "TCC_TARGET_ARM",
"__aarch64__", "TCC_TARGET_ARM64",
"__riscv", "TCC_TARGET_RISCV64",
"__i386__", "TCC_TARGET_I386", 0 };
for (f = 0; sr[f]; f += 2) {
c = strlen(sr[f]);
if (0 == memcmp(p, sr[f], c)) {
p += c, ++f;
q = strchr(strcpy(q, sr[f]), 0);
break;
}
}
if (sr[f])
continue;
} while (!!(*q++ = *p++));
fprintf(op, "%s\n", l2);
} else if (*p == '/') {
strcpy(q, p);
fprintf(op, " %s\n", l2);
} else {
f = 0;
for (;;) {
c = *p++;
if (isspc(c)) {
if (q == l2 || isspc(q[-1]))
continue;
if ((f > 2 || e) || (q[-1] != ')' && *p != '(')) {
if (!isid(q[-1]) || !isid(*p))
continue;
}
}
if (c == '(')
++e, ++f;
if (c == ')')
--e, ++f;
if (c == '\\' || c == '\"')
*q++ = '\\';
*q++ = c;
if (c == 0)
break;
}
fprintf(op, " \"%s\\n\"\n", l2);
}
}
fclose(fp);
fclose(op);
return 0;
}
|