]> git.saurik.com Git - wxWidgets.git/blob - src/expat/xmlwf/ct.c
Border corrections
[wxWidgets.git] / src / expat / xmlwf / ct.c
1 #define CHARSET_MAX 41
2
3 static const char *
4 getTok(const char **pp)
5 {
6 enum { inAtom, inString, init, inComment };
7 int state = init;
8 const char *tokStart = 0;
9 for (;;) {
10 switch (**pp) {
11 case '\0':
12 return 0;
13 case ' ':
14 case '\r':
15 case '\t':
16 case '\n':
17 if (state == inAtom)
18 return tokStart;
19 break;
20 case '(':
21 if (state == inAtom)
22 return tokStart;
23 if (state != inString)
24 state++;
25 break;
26 case ')':
27 if (state > init)
28 --state;
29 else if (state != inString)
30 return 0;
31 break;
32 case ';':
33 case '/':
34 case '=':
35 if (state == inAtom)
36 return tokStart;
37 if (state == init)
38 return (*pp)++;
39 break;
40 case '\\':
41 ++*pp;
42 if (**pp == '\0')
43 return 0;
44 break;
45 case '"':
46 switch (state) {
47 case inString:
48 ++*pp;
49 return tokStart;
50 case inAtom:
51 return tokStart;
52 case init:
53 tokStart = *pp;
54 state = inString;
55 break;
56 }
57 break;
58 default:
59 if (state == init) {
60 tokStart = *pp;
61 state = inAtom;
62 }
63 break;
64 }
65 ++*pp;
66 }
67 /* not reached */
68 }
69
70 /* key must be lowercase ASCII */
71
72 static int
73 matchkey(const char *start, const char *end, const char *key)
74 {
75 if (!start)
76 return 0;
77 for (; start != end; start++, key++)
78 if (*start != *key && *start != 'A' + (*key - 'a'))
79 return 0;
80 return *key == '\0';
81 }
82
83 void
84 getXMLCharset(const char *buf, char *charset)
85 {
86 const char *next, *p;
87
88 charset[0] = '\0';
89 next = buf;
90 p = getTok(&next);
91 if (matchkey(p, next, "text"))
92 strcpy(charset, "us-ascii");
93 else if (!matchkey(p, next, "application"))
94 return;
95 p = getTok(&next);
96 if (!p || *p != '/')
97 return;
98 p = getTok(&next);
99 if (matchkey(p, next, "xml"))
100 isXml = 1;
101 p = getTok(&next);
102 while (p) {
103 if (*p == ';') {
104 p = getTok(&next);
105 if (matchkey(p, next, "charset")) {
106 p = getTok(&next);
107 if (p && *p == '=') {
108 p = getTok(&next);
109 if (p) {
110 char *s = charset;
111 if (*p == '"') {
112 while (++p != next - 1) {
113 if (*p == '\\')
114 ++p;
115 if (s == charset + CHARSET_MAX - 1) {
116 charset[0] = '\0';
117 break;
118 }
119 *s++ = *p;
120 }
121 *s++ = '\0';
122 }
123 else {
124 if (next - p > CHARSET_MAX - 1)
125 break;
126 while (p != next)
127 *s++ = *p++;
128 *s = 0;
129 break;
130 }
131 }
132 }
133 }
134 }
135 else
136 p = getTok(&next);
137 }
138 }
139
140 int
141 main(int argc, char **argv)
142 {
143 char buf[CHARSET_MAX];
144 getXMLCharset(argv[1], buf);
145 printf("charset = \"%s\"\n", buf);
146 return 0;
147 }