3 * Copyright (c) 2003, 2004 X/IO Labs, xiolabs.com.
4 * Copyright (c) 2003, 2004, 2005 Lev Walkin <vlm@lionet.info>.
6 * Redistribution and modifications are permitted subject to BSD license.
8 #include <asn_system.h>
9 #include <xer_support.h>
18 ST_TAG_UNQUOTED_STRING,
19 ST_COMMENT_WAIT_DASH1, /* "<!--"[1] */
20 ST_COMMENT_WAIT_DASH2, /* "<!--"[2] */
22 ST_COMMENT_CLO_DASH2, /* "-->"[0] */
23 ST_COMMENT_CLO_RT /* "-->"[1] */
28 0,0,0,0,0,0,0,0, 0,1,1,0,1,1,0,0,
29 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,
30 1,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,
31 2,2,2,2,2,2,2,2, 2,2,0,0,0,0,0,0, /* 01234567 89 */
32 0,3,3,3,3,3,3,3, 3,3,3,3,3,3,3,3, /* ABCDEFG HIJKLMNO */
33 3,3,3,3,3,3,3,3, 3,3,3,0,0,0,0,0, /* PQRSTUVW XYZ */
34 0,3,3,3,3,3,3,3, 3,3,3,3,3,3,3,3, /* abcdefg hijklmno */
35 3,3,3,3,3,3,3,3, 3,3,3,0,0,0,0,0 /* pqrstuvw xyz */
37 #define WHITESPACE(c) (_charclass[(unsigned char)(c)] == 1)
38 #define ALNUM(c) (_charclass[(unsigned char)(c)] >= 2)
39 #define ALPHA(c) (_charclass[(unsigned char)(c)] == 3)
41 /* Aliases for characters, ASCII/UTF-8 */
42 #define EXCLAM 0x21 /* '!' */
43 #define CQUOTE 0x22 /* '"' */
44 #define CDASH 0x2d /* '-' */
45 #define CSLASH 0x2f /* '/' */
46 #define LANGLE 0x3c /* '<' */
47 #define CEQUAL 0x3d /* '=' */
48 #define RANGLE 0x3e /* '>' */
49 #define CQUEST 0x3f /* '?' */
51 /* Invoke token callback */
52 #define TOKEN_CB_CALL(type, _ns, _current_too, _final) do { \
55 ssize_t _sz = (p - chunk_start) + _current_too; \
61 _ret = cb(type, chunk_start, _sz, key); \
63 if(_current_too && _ret == -1) \
67 chunk_start = p + _current_too; \
71 #define TOKEN_CB(_type, _ns, _current_too) \
72 TOKEN_CB_CALL(_type, _ns, _current_too, 0)
74 #define PXML_TAG_FINAL_CHUNK_TYPE PXML_TAG_END
75 #define PXML_COMMENT_FINAL_CHUNK_TYPE PXML_COMMENT_END
77 #define TOKEN_CB_FINAL(_type, _ns, _current_too) \
78 TOKEN_CB_CALL( _type ## _FINAL_CHUNK_TYPE , _ns, _current_too, 1)
83 ssize_t pxml_parse(int *stateContext, const void *xmlbuf, size_t size, pxml_callback_f *cb, void *key) {
84 pstate_e state = (pstate_e)*stateContext;
85 const char *chunk_start = (const char *)xmlbuf;
86 const char *p = chunk_start;
87 const char *end = p + size;
90 int C = *(const unsigned char *)p;
94 * Initial state: we're in the middle of some text,
95 * or just have started.
98 /* We're now in the tag, probably */
99 TOKEN_CB(PXML_TEXT, ST_TAG_START, 0);
102 if (ALPHA(C) || (C == CSLASH))
104 else if (C == EXCLAM)
105 state = ST_COMMENT_WAIT_DASH1;
108 * Not characters and not whitespace.
109 * Must be something like "3 < 4".
111 TOKEN_CB(PXML_TEXT, ST_TEXT, 1);/* Flush as data */
117 TOKEN_CB_FINAL(PXML_TAG, ST_TEXT, 1);
121 * The previous tag wasn't completed, but still
122 * recognized as valid. (Mozilla-compatible)
124 TOKEN_CB_FINAL(PXML_TAG, ST_TAG_START, 0);
127 state = ST_TAG_QUOTE_WAIT;
131 case ST_TAG_QUOTE_WAIT:
133 * State after the equal sign ("=") in the tag.
137 state = ST_TAG_QUOTED_STRING;
141 TOKEN_CB_FINAL(PXML_TAG, ST_TEXT, 1);
145 /* Unquoted string value */
146 state = ST_TAG_UNQUOTED_STRING;
149 case ST_TAG_QUOTED_STRING:
151 * Tag attribute's string value in quotes.
154 /* Return back to the tag state */
158 case ST_TAG_UNQUOTED_STRING:
161 TOKEN_CB_FINAL(PXML_TAG, ST_TEXT, 1);
162 } else if(WHITESPACE(C)) {
163 /* Return back to the tag state */
167 case ST_COMMENT_WAIT_DASH1:
169 state = ST_COMMENT_WAIT_DASH2;
171 /* Some ordinary tag. */
175 case ST_COMMENT_WAIT_DASH2:
180 /* Some ordinary tag */
186 state = ST_COMMENT_CLO_DASH2;
189 case ST_COMMENT_CLO_DASH2:
191 state = ST_COMMENT_CLO_RT;
193 /* This is not an end of a comment */
197 case ST_COMMENT_CLO_RT:
199 TOKEN_CB_FINAL(PXML_COMMENT, ST_TEXT, 1);
200 } else if(C == CDASH) {
201 /* Maintain current state, still waiting for '>' */
210 * Flush the partially processed chunk, state permitting.
212 if(p - chunk_start) {
215 TOKEN_CB(PXML_COMMENT, state, 0);
218 TOKEN_CB(PXML_TEXT, state, 0);
220 default: break; /* a no-op */
225 *stateContext = (int)state;
226 return chunk_start - (const char *)xmlbuf;