source: trunk/poppler/expat-1.95.8/xmlwf/xmlfile.c @ 2

Last change on this file since 2 was 2, checked in by Eugene Romanenko, 15 years ago

First import

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