]>
Commit | Line | Data |
---|---|---|
5e9f2524 VS |
1 | /* Copyright (c) 1998, 1999 Thai Open Source Software Center Ltd |
2 | See the file COPYING for copying permission. | |
3 | */ | |
4 | ||
5 | #include <stdio.h> | |
6 | #include <stdlib.h> | |
7 | #include <stddef.h> | |
8 | #include <string.h> | |
9 | #include <fcntl.h> | |
11a3e7b6 | 10 | |
5e9f2524 VS |
11 | #ifdef COMPILED_FROM_DSP |
12 | #include "winconfig.h" | |
11a3e7b6 VZ |
13 | #elif defined(MACOS_CLASSIC) |
14 | #include "macconfig.h" | |
15 | #elif defined(__amigaos__) | |
16 | #include "amigaconfig.h" | |
17 | #elif defined(__WATCOMC__) | |
18 | #include "watcomconfig.h" | |
19 | #elif defined(HAVE_EXPAT_CONFIG_H) | |
20 | #include <expat_config.h> | |
21 | #endif /* ndef COMPILED_FROM_DSP */ | |
22 | ||
5e9f2524 VS |
23 | #include "expat.h" |
24 | #include "xmlfile.h" | |
25 | #include "xmltchar.h" | |
26 | #include "filemap.h" | |
27 | ||
11a3e7b6 | 28 | #if (defined(_MSC_VER) || (defined(__WATCOMC__) && !defined(__LINUX__))) |
5e9f2524 VS |
29 | #include <io.h> |
30 | #endif | |
31 | ||
11a3e7b6 VZ |
32 | #if defined(__amigaos__) && defined(__USE_INLINE__) |
33 | #include <proto/expat.h> | |
34 | #endif | |
35 | ||
5e9f2524 VS |
36 | #ifdef HAVE_UNISTD_H |
37 | #include <unistd.h> | |
38 | #endif | |
39 | ||
40 | #ifndef O_BINARY | |
41 | #ifdef _O_BINARY | |
42 | #define O_BINARY _O_BINARY | |
43 | #else | |
44 | #define O_BINARY 0 | |
45 | #endif | |
46 | #endif | |
47 | ||
48 | #ifdef _DEBUG | |
49 | #define READ_SIZE 16 | |
50 | #else | |
51 | #define READ_SIZE (1024*8) | |
52 | #endif | |
53 | ||
54 | ||
55 | typedef struct { | |
56 | XML_Parser parser; | |
57 | int *retPtr; | |
58 | } PROCESS_ARGS; | |
59 | ||
60 | static void | |
61 | reportError(XML_Parser parser, const XML_Char *filename) | |
62 | { | |
11a3e7b6 | 63 | enum XML_Error code = XML_GetErrorCode(parser); |
5e9f2524 VS |
64 | const XML_Char *message = XML_ErrorString(code); |
65 | if (message) | |
11a3e7b6 | 66 | ftprintf(stdout, T("%s:%" XML_FMT_INT_MOD "u:%" XML_FMT_INT_MOD "u: %s\n"), |
5e9f2524 VS |
67 | filename, |
68 | XML_GetErrorLineNumber(parser), | |
69 | XML_GetErrorColumnNumber(parser), | |
70 | message); | |
71 | else | |
72 | ftprintf(stderr, T("%s: (unknown message %d)\n"), filename, code); | |
73 | } | |
11a3e7b6 VZ |
74 | |
75 | /* This implementation will give problems on files larger than INT_MAX. */ | |
5e9f2524 VS |
76 | static void |
77 | processFile(const void *data, size_t size, | |
78 | const XML_Char *filename, void *args) | |
79 | { | |
80 | XML_Parser parser = ((PROCESS_ARGS *)args)->parser; | |
81 | int *retPtr = ((PROCESS_ARGS *)args)->retPtr; | |
11a3e7b6 | 82 | if (XML_Parse(parser, (const char *)data, (int)size, 1) == XML_STATUS_ERROR) { |
5e9f2524 VS |
83 | reportError(parser, filename); |
84 | *retPtr = 0; | |
85 | } | |
86 | else | |
87 | *retPtr = 1; | |
88 | } | |
89 | ||
11a3e7b6 | 90 | #if (defined(WIN32) || defined(__WATCOMC__)) |
5e9f2524 VS |
91 | |
92 | static int | |
93 | isAsciiLetter(XML_Char c) | |
94 | { | |
95 | return (T('a') <= c && c <= T('z')) || (T('A') <= c && c <= T('Z')); | |
96 | } | |
97 | ||
98 | #endif /* WIN32 */ | |
99 | ||
100 | static const XML_Char * | |
101 | resolveSystemId(const XML_Char *base, const XML_Char *systemId, | |
102 | XML_Char **toFree) | |
103 | { | |
104 | XML_Char *s; | |
105 | *toFree = 0; | |
106 | if (!base | |
107 | || *systemId == T('/') | |
11a3e7b6 | 108 | #if (defined(WIN32) || defined(__WATCOMC__)) |
5e9f2524 VS |
109 | || *systemId == T('\\') |
110 | || (isAsciiLetter(systemId[0]) && systemId[1] == T(':')) | |
111 | #endif | |
112 | ) | |
113 | return systemId; | |
114 | *toFree = (XML_Char *)malloc((tcslen(base) + tcslen(systemId) + 2) | |
115 | * sizeof(XML_Char)); | |
116 | if (!*toFree) | |
117 | return systemId; | |
118 | tcscpy(*toFree, base); | |
119 | s = *toFree; | |
120 | if (tcsrchr(s, T('/'))) | |
121 | s = tcsrchr(s, T('/')) + 1; | |
11a3e7b6 | 122 | #if (defined(WIN32) || defined(__WATCOMC__)) |
5e9f2524 VS |
123 | if (tcsrchr(s, T('\\'))) |
124 | s = tcsrchr(s, T('\\')) + 1; | |
125 | #endif | |
126 | tcscpy(s, systemId); | |
127 | return *toFree; | |
128 | } | |
129 | ||
130 | static int | |
131 | externalEntityRefFilemap(XML_Parser parser, | |
132 | const XML_Char *context, | |
133 | const XML_Char *base, | |
134 | const XML_Char *systemId, | |
135 | const XML_Char *publicId) | |
136 | { | |
137 | int result; | |
138 | XML_Char *s; | |
139 | const XML_Char *filename; | |
140 | XML_Parser entParser = XML_ExternalEntityParserCreate(parser, context, 0); | |
141 | PROCESS_ARGS args; | |
142 | args.retPtr = &result; | |
143 | args.parser = entParser; | |
144 | filename = resolveSystemId(base, systemId, &s); | |
145 | XML_SetBase(entParser, filename); | |
146 | if (!filemap(filename, processFile, &args)) | |
147 | result = 0; | |
148 | free(s); | |
149 | XML_ParserFree(entParser); | |
150 | return result; | |
151 | } | |
152 | ||
153 | static int | |
154 | processStream(const XML_Char *filename, XML_Parser parser) | |
155 | { | |
156 | /* passing NULL for filename means read intput from stdin */ | |
157 | int fd = 0; /* 0 is the fileno for stdin */ | |
158 | ||
159 | if (filename != NULL) { | |
160 | fd = topen(filename, O_BINARY|O_RDONLY); | |
161 | if (fd < 0) { | |
162 | tperror(filename); | |
163 | return 0; | |
164 | } | |
165 | } | |
166 | for (;;) { | |
167 | int nread; | |
11a3e7b6 | 168 | char *buf = (char *)XML_GetBuffer(parser, READ_SIZE); |
5e9f2524 VS |
169 | if (!buf) { |
170 | if (filename != NULL) | |
171 | close(fd); | |
172 | ftprintf(stderr, T("%s: out of memory\n"), | |
173 | filename != NULL ? filename : "xmlwf"); | |
174 | return 0; | |
175 | } | |
176 | nread = read(fd, buf, READ_SIZE); | |
177 | if (nread < 0) { | |
178 | tperror(filename != NULL ? filename : "STDIN"); | |
179 | if (filename != NULL) | |
180 | close(fd); | |
181 | return 0; | |
182 | } | |
183 | if (XML_ParseBuffer(parser, nread, nread == 0) == XML_STATUS_ERROR) { | |
184 | reportError(parser, filename != NULL ? filename : "STDIN"); | |
185 | if (filename != NULL) | |
186 | close(fd); | |
187 | return 0; | |
188 | } | |
189 | if (nread == 0) { | |
190 | if (filename != NULL) | |
191 | close(fd); | |
192 | break;; | |
193 | } | |
194 | } | |
195 | return 1; | |
196 | } | |
197 | ||
198 | static int | |
199 | externalEntityRefStream(XML_Parser parser, | |
200 | const XML_Char *context, | |
201 | const XML_Char *base, | |
202 | const XML_Char *systemId, | |
203 | const XML_Char *publicId) | |
204 | { | |
205 | XML_Char *s; | |
206 | const XML_Char *filename; | |
207 | int ret; | |
208 | XML_Parser entParser = XML_ExternalEntityParserCreate(parser, context, 0); | |
209 | filename = resolveSystemId(base, systemId, &s); | |
210 | XML_SetBase(entParser, filename); | |
211 | ret = processStream(filename, entParser); | |
212 | free(s); | |
213 | XML_ParserFree(entParser); | |
214 | return ret; | |
215 | } | |
216 | ||
217 | int | |
218 | XML_ProcessFile(XML_Parser parser, | |
219 | const XML_Char *filename, | |
220 | unsigned flags) | |
221 | { | |
222 | int result; | |
223 | ||
224 | if (!XML_SetBase(parser, filename)) { | |
225 | ftprintf(stderr, T("%s: out of memory"), filename); | |
226 | exit(1); | |
227 | } | |
228 | ||
229 | if (flags & XML_EXTERNAL_ENTITIES) | |
230 | XML_SetExternalEntityRefHandler(parser, | |
231 | (flags & XML_MAP_FILE) | |
232 | ? externalEntityRefFilemap | |
233 | : externalEntityRefStream); | |
234 | if (flags & XML_MAP_FILE) { | |
235 | PROCESS_ARGS args; | |
236 | args.retPtr = &result; | |
237 | args.parser = parser; | |
238 | if (!filemap(filename, processFile, &args)) | |
239 | result = 0; | |
240 | } | |
241 | else | |
242 | result = processStream(filename, parser); | |
243 | return result; | |
244 | } |