xmltok_ns.c revision 5821806d5e7f356e8fa4b058a389a808ea183019 
1/* Copyright (c) 1998, 1999 Thai Open Source Software Center Ltd
2   See the file COPYING for copying permission.
3*/
4
5/* This file is included! */
6#ifdef XML_TOK_NS_C
7
8const ENCODING *
9NS(XmlGetUtf8InternalEncoding)(void)
10{
11  return &ns(internal_utf8_encoding).enc;
12}
13
14const ENCODING *
15NS(XmlGetUtf16InternalEncoding)(void)
16{
17#if BYTEORDER == 1234
18  return &ns(internal_little2_encoding).enc;
19#elif BYTEORDER == 4321
20  return &ns(internal_big2_encoding).enc;
21#else
22  const short n = 1;
23  return (*(const char *)&n
24          ? &ns(internal_little2_encoding).enc
25          : &ns(internal_big2_encoding).enc);
26#endif
27}
28
29static const ENCODING * const NS(encodings)[] = {
30  &ns(latin1_encoding).enc,
31  &ns(ascii_encoding).enc,
32  &ns(utf8_encoding).enc,
33  &ns(big2_encoding).enc,
34  &ns(big2_encoding).enc,
35  &ns(little2_encoding).enc,
36  &ns(utf8_encoding).enc /* NO_ENC */
37};
38
39static int PTRCALL
40NS(initScanProlog)(const ENCODING *enc, const char *ptr, const char *end,
41                   const char **nextTokPtr)
42{
43  return initScan(NS(encodings), (const INIT_ENCODING *)enc,
44                  XML_PROLOG_STATE, ptr, end, nextTokPtr);
45}
46
47static int PTRCALL
48NS(initScanContent)(const ENCODING *enc, const char *ptr, const char *end,
49                    const char **nextTokPtr)
50{
51  return initScan(NS(encodings), (const INIT_ENCODING *)enc,
52                  XML_CONTENT_STATE, ptr, end, nextTokPtr);
53}
54
55int
56NS(XmlInitEncoding)(INIT_ENCODING *p, const ENCODING **encPtr,
57                    const char *name)
58{
59  int i = getEncodingIndex(name);
60  if (i == UNKNOWN_ENC)
61    return 0;
62  SET_INIT_ENC_INDEX(p, i);
63  p->initEnc.scanners[XML_PROLOG_STATE] = NS(initScanProlog);
64  p->initEnc.scanners[XML_CONTENT_STATE] = NS(initScanContent);
65  p->initEnc.updatePosition = initUpdatePosition;
66  p->encPtr = encPtr;
67  *encPtr = &(p->initEnc);
68  return 1;
69}
70
71static const ENCODING *
72NS(findEncoding)(const ENCODING *enc, const char *ptr, const char *end)
73{
74#define ENCODING_MAX 128
75  char buf[ENCODING_MAX];
76  char *p = buf;
77  int i;
78  XmlUtf8Convert(enc, &ptr, end, &p, p + ENCODING_MAX - 1);
79  if (ptr != end)
80    return 0;
81  *p = 0;
82  if (streqci(buf, KW_UTF_16) && enc->minBytesPerChar == 2)
83    return enc;
84  i = getEncodingIndex(buf);
85  if (i == UNKNOWN_ENC)
86    return 0;
87  return NS(encodings)[i];
88}
89
90int
91NS(XmlParseXmlDecl)(int isGeneralTextEntity,
92                    const ENCODING *enc,
93                    const char *ptr,
94                    const char *end,
95                    const char **badPtr,
96                    const char **versionPtr,
97                    const char **versionEndPtr,
98                    const char **encodingName,
99                    const ENCODING **encoding,
100                    int *standalone)
101{
102  return doParseXmlDecl(NS(findEncoding),
103                        isGeneralTextEntity,
104                        enc,
105                        ptr,
106                        end,
107                        badPtr,
108                        versionPtr,
109                        versionEndPtr,
110                        encodingName,
111                        encoding,
112                        standalone);
113}
114
115#endif /* XML_TOK_NS_C */
116