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 <stdio.h>
#include <stdlib.h>
static void emit_alias (FILE* out1, const char* alias, const char* c_name)
{
const char* s = alias;
for (; *s; s++) {
unsigned char c = * (unsigned char *) s;
if (c >= 0x80)
exit(1);
if (c >= 'a' && c <= 'z')
c -= 'a'-'A';
putc(c, out1);
}
fprintf(out1,", ei_%s\n", c_name);
}
static void emit_encoding (FILE* out1, FILE* out2, const char* const* names, size_t n, const char* c_name)
{
fprintf(out2,"grep 'sizeof(\"");
{
const char* s = *names;
for (; *s; s++) {
unsigned char c = * (unsigned char *) s;
if (c >= 0x80)
exit(1);
if (c >= 'a' && c <= 'z')
c -= 'a'-'A';
putc(c, out2);
}
}
fprintf(out2,"\")' tmp.h | sed -e 's|^.*\\(stringpool_str[0-9]*\\).*$| (int)(long)\\&((struct stringpool_t *)0)->\\1,|'\n");
for (; n > 0; names++, n--)
emit_alias(out1, *names, c_name);
}
int main ()
{
FILE* stdout2;
printf("struct alias { int name; unsigned int encoding_index; };\n");
printf("%%struct-type\n");
printf("%%language=ANSI-C\n");
printf("%%define hash-function-name aliases_hash\n");
printf("%%define lookup-function-name aliases_lookup\n");
printf("%%7bit\n");
printf("%%readonly-tables\n");
printf("%%global-table\n");
printf("%%define word-array-name aliases\n");
printf("%%pic\n");
printf("%%%%\n");
#define DEFENCODING(xxx_names,xxx,xxx_ifuncs1,xxx_ifuncs2,xxx_ofuncs1,xxx_ofuncs2) \
{ \
static const char* const names[] = BRACIFY xxx_names; \
emit_encoding(stdout,stdout2,names,sizeof(names)/sizeof(names[0]),#xxx); \
}
#define BRACIFY(...) { __VA_ARGS__ }
#define DEFALIAS(xxx_alias,xxx) emit_alias(stdout,xxx_alias,#xxx);
stdout2 = fdopen(3, "w");
if (stdout2 == NULL)
exit(1);
#include "encodings.def"
if (fclose(stdout2))
exit(1);
stdout2 = fdopen(4, "w");
if (stdout2 == NULL)
exit(1);
#include "encodings_local.def"
if (fclose(stdout2))
exit(1);
#undef DEFALIAS
#undef BRACIFY
#undef DEFENCODING
if (ferror(stdout) || fclose(stdout))
exit(1);
exit(0);
}
|