| OLD | NEW |
| (Empty) |
| 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_IMPL_C | |
| 7 | |
| 8 #ifndef IS_INVALID_CHAR | |
| 9 #define IS_INVALID_CHAR(enc, ptr, n) (0) | |
| 10 #endif | |
| 11 | |
| 12 #define INVALID_LEAD_CASE(n, ptr, nextTokPtr) \ | |
| 13 case BT_LEAD ## n: \ | |
| 14 if (end - ptr < n) \ | |
| 15 return XML_TOK_PARTIAL_CHAR; \ | |
| 16 if (IS_INVALID_CHAR(enc, ptr, n)) { \ | |
| 17 *(nextTokPtr) = (ptr); \ | |
| 18 return XML_TOK_INVALID; \ | |
| 19 } \ | |
| 20 ptr += n; \ | |
| 21 break; | |
| 22 | |
| 23 #define INVALID_CASES(ptr, nextTokPtr) \ | |
| 24 INVALID_LEAD_CASE(2, ptr, nextTokPtr) \ | |
| 25 INVALID_LEAD_CASE(3, ptr, nextTokPtr) \ | |
| 26 INVALID_LEAD_CASE(4, ptr, nextTokPtr) \ | |
| 27 case BT_NONXML: \ | |
| 28 case BT_MALFORM: \ | |
| 29 case BT_TRAIL: \ | |
| 30 *(nextTokPtr) = (ptr); \ | |
| 31 return XML_TOK_INVALID; | |
| 32 | |
| 33 #define CHECK_NAME_CASE(n, enc, ptr, end, nextTokPtr) \ | |
| 34 case BT_LEAD ## n: \ | |
| 35 if (end - ptr < n) \ | |
| 36 return XML_TOK_PARTIAL_CHAR; \ | |
| 37 if (!IS_NAME_CHAR(enc, ptr, n)) { \ | |
| 38 *nextTokPtr = ptr; \ | |
| 39 return XML_TOK_INVALID; \ | |
| 40 } \ | |
| 41 ptr += n; \ | |
| 42 break; | |
| 43 | |
| 44 #define CHECK_NAME_CASES(enc, ptr, end, nextTokPtr) \ | |
| 45 case BT_NONASCII: \ | |
| 46 if (!IS_NAME_CHAR_MINBPC(enc, ptr)) { \ | |
| 47 *nextTokPtr = ptr; \ | |
| 48 return XML_TOK_INVALID; \ | |
| 49 } \ | |
| 50 case BT_NMSTRT: \ | |
| 51 case BT_HEX: \ | |
| 52 case BT_DIGIT: \ | |
| 53 case BT_NAME: \ | |
| 54 case BT_MINUS: \ | |
| 55 ptr += MINBPC(enc); \ | |
| 56 break; \ | |
| 57 CHECK_NAME_CASE(2, enc, ptr, end, nextTokPtr) \ | |
| 58 CHECK_NAME_CASE(3, enc, ptr, end, nextTokPtr) \ | |
| 59 CHECK_NAME_CASE(4, enc, ptr, end, nextTokPtr) | |
| 60 | |
| 61 #define CHECK_NMSTRT_CASE(n, enc, ptr, end, nextTokPtr) \ | |
| 62 case BT_LEAD ## n: \ | |
| 63 if (end - ptr < n) \ | |
| 64 return XML_TOK_PARTIAL_CHAR; \ | |
| 65 if (!IS_NMSTRT_CHAR(enc, ptr, n)) { \ | |
| 66 *nextTokPtr = ptr; \ | |
| 67 return XML_TOK_INVALID; \ | |
| 68 } \ | |
| 69 ptr += n; \ | |
| 70 break; | |
| 71 | |
| 72 #define CHECK_NMSTRT_CASES(enc, ptr, end, nextTokPtr) \ | |
| 73 case BT_NONASCII: \ | |
| 74 if (!IS_NMSTRT_CHAR_MINBPC(enc, ptr)) { \ | |
| 75 *nextTokPtr = ptr; \ | |
| 76 return XML_TOK_INVALID; \ | |
| 77 } \ | |
| 78 case BT_NMSTRT: \ | |
| 79 case BT_HEX: \ | |
| 80 ptr += MINBPC(enc); \ | |
| 81 break; \ | |
| 82 CHECK_NMSTRT_CASE(2, enc, ptr, end, nextTokPtr) \ | |
| 83 CHECK_NMSTRT_CASE(3, enc, ptr, end, nextTokPtr) \ | |
| 84 CHECK_NMSTRT_CASE(4, enc, ptr, end, nextTokPtr) | |
| 85 | |
| 86 #ifndef PREFIX | |
| 87 #define PREFIX(ident) ident | |
| 88 #endif | |
| 89 | |
| 90 /* ptr points to character following "<!-" */ | |
| 91 | |
| 92 static int PTRCALL | |
| 93 PREFIX(scanComment)(const ENCODING *enc, const char *ptr, | |
| 94 const char *end, const char **nextTokPtr) | |
| 95 { | |
| 96 if (ptr != end) { | |
| 97 if (!CHAR_MATCHES(enc, ptr, ASCII_MINUS)) { | |
| 98 *nextTokPtr = ptr; | |
| 99 return XML_TOK_INVALID; | |
| 100 } | |
| 101 ptr += MINBPC(enc); | |
| 102 while (ptr != end) { | |
| 103 switch (BYTE_TYPE(enc, ptr)) { | |
| 104 INVALID_CASES(ptr, nextTokPtr) | |
| 105 case BT_MINUS: | |
| 106 if ((ptr += MINBPC(enc)) == end) | |
| 107 return XML_TOK_PARTIAL; | |
| 108 if (CHAR_MATCHES(enc, ptr, ASCII_MINUS)) { | |
| 109 if ((ptr += MINBPC(enc)) == end) | |
| 110 return XML_TOK_PARTIAL; | |
| 111 if (!CHAR_MATCHES(enc, ptr, ASCII_GT)) { | |
| 112 *nextTokPtr = ptr; | |
| 113 return XML_TOK_INVALID; | |
| 114 } | |
| 115 *nextTokPtr = ptr + MINBPC(enc); | |
| 116 return XML_TOK_COMMENT; | |
| 117 } | |
| 118 break; | |
| 119 default: | |
| 120 ptr += MINBPC(enc); | |
| 121 break; | |
| 122 } | |
| 123 } | |
| 124 } | |
| 125 return XML_TOK_PARTIAL; | |
| 126 } | |
| 127 | |
| 128 /* ptr points to character following "<!" */ | |
| 129 | |
| 130 static int PTRCALL | |
| 131 PREFIX(scanDecl)(const ENCODING *enc, const char *ptr, | |
| 132 const char *end, const char **nextTokPtr) | |
| 133 { | |
| 134 if (ptr == end) | |
| 135 return XML_TOK_PARTIAL; | |
| 136 switch (BYTE_TYPE(enc, ptr)) { | |
| 137 case BT_MINUS: | |
| 138 return PREFIX(scanComment)(enc, ptr + MINBPC(enc), end, nextTokPtr); | |
| 139 case BT_LSQB: | |
| 140 *nextTokPtr = ptr + MINBPC(enc); | |
| 141 return XML_TOK_COND_SECT_OPEN; | |
| 142 case BT_NMSTRT: | |
| 143 case BT_HEX: | |
| 144 ptr += MINBPC(enc); | |
| 145 break; | |
| 146 default: | |
| 147 *nextTokPtr = ptr; | |
| 148 return XML_TOK_INVALID; | |
| 149 } | |
| 150 while (ptr != end) { | |
| 151 switch (BYTE_TYPE(enc, ptr)) { | |
| 152 case BT_PERCNT: | |
| 153 if (ptr + MINBPC(enc) == end) | |
| 154 return XML_TOK_PARTIAL; | |
| 155 /* don't allow <!ENTITY% foo "whatever"> */ | |
| 156 switch (BYTE_TYPE(enc, ptr + MINBPC(enc))) { | |
| 157 case BT_S: case BT_CR: case BT_LF: case BT_PERCNT: | |
| 158 *nextTokPtr = ptr; | |
| 159 return XML_TOK_INVALID; | |
| 160 } | |
| 161 /* fall through */ | |
| 162 case BT_S: case BT_CR: case BT_LF: | |
| 163 *nextTokPtr = ptr; | |
| 164 return XML_TOK_DECL_OPEN; | |
| 165 case BT_NMSTRT: | |
| 166 case BT_HEX: | |
| 167 ptr += MINBPC(enc); | |
| 168 break; | |
| 169 default: | |
| 170 *nextTokPtr = ptr; | |
| 171 return XML_TOK_INVALID; | |
| 172 } | |
| 173 } | |
| 174 return XML_TOK_PARTIAL; | |
| 175 } | |
| 176 | |
| 177 static int PTRCALL | |
| 178 PREFIX(checkPiTarget)(const ENCODING *enc, const char *ptr, | |
| 179 const char *end, int *tokPtr) | |
| 180 { | |
| 181 int upper = 0; | |
| 182 *tokPtr = XML_TOK_PI; | |
| 183 if (end - ptr != MINBPC(enc)*3) | |
| 184 return 1; | |
| 185 switch (BYTE_TO_ASCII(enc, ptr)) { | |
| 186 case ASCII_x: | |
| 187 break; | |
| 188 case ASCII_X: | |
| 189 upper = 1; | |
| 190 break; | |
| 191 default: | |
| 192 return 1; | |
| 193 } | |
| 194 ptr += MINBPC(enc); | |
| 195 switch (BYTE_TO_ASCII(enc, ptr)) { | |
| 196 case ASCII_m: | |
| 197 break; | |
| 198 case ASCII_M: | |
| 199 upper = 1; | |
| 200 break; | |
| 201 default: | |
| 202 return 1; | |
| 203 } | |
| 204 ptr += MINBPC(enc); | |
| 205 switch (BYTE_TO_ASCII(enc, ptr)) { | |
| 206 case ASCII_l: | |
| 207 break; | |
| 208 case ASCII_L: | |
| 209 upper = 1; | |
| 210 break; | |
| 211 default: | |
| 212 return 1; | |
| 213 } | |
| 214 if (upper) | |
| 215 return 0; | |
| 216 *tokPtr = XML_TOK_XML_DECL; | |
| 217 return 1; | |
| 218 } | |
| 219 | |
| 220 /* ptr points to character following "<?" */ | |
| 221 | |
| 222 static int PTRCALL | |
| 223 PREFIX(scanPi)(const ENCODING *enc, const char *ptr, | |
| 224 const char *end, const char **nextTokPtr) | |
| 225 { | |
| 226 int tok; | |
| 227 const char *target = ptr; | |
| 228 if (ptr == end) | |
| 229 return XML_TOK_PARTIAL; | |
| 230 switch (BYTE_TYPE(enc, ptr)) { | |
| 231 CHECK_NMSTRT_CASES(enc, ptr, end, nextTokPtr) | |
| 232 default: | |
| 233 *nextTokPtr = ptr; | |
| 234 return XML_TOK_INVALID; | |
| 235 } | |
| 236 while (ptr != end) { | |
| 237 switch (BYTE_TYPE(enc, ptr)) { | |
| 238 CHECK_NAME_CASES(enc, ptr, end, nextTokPtr) | |
| 239 case BT_S: case BT_CR: case BT_LF: | |
| 240 if (!PREFIX(checkPiTarget)(enc, target, ptr, &tok)) { | |
| 241 *nextTokPtr = ptr; | |
| 242 return XML_TOK_INVALID; | |
| 243 } | |
| 244 ptr += MINBPC(enc); | |
| 245 while (ptr != end) { | |
| 246 switch (BYTE_TYPE(enc, ptr)) { | |
| 247 INVALID_CASES(ptr, nextTokPtr) | |
| 248 case BT_QUEST: | |
| 249 ptr += MINBPC(enc); | |
| 250 if (ptr == end) | |
| 251 return XML_TOK_PARTIAL; | |
| 252 if (CHAR_MATCHES(enc, ptr, ASCII_GT)) { | |
| 253 *nextTokPtr = ptr + MINBPC(enc); | |
| 254 return tok; | |
| 255 } | |
| 256 break; | |
| 257 default: | |
| 258 ptr += MINBPC(enc); | |
| 259 break; | |
| 260 } | |
| 261 } | |
| 262 return XML_TOK_PARTIAL; | |
| 263 case BT_QUEST: | |
| 264 if (!PREFIX(checkPiTarget)(enc, target, ptr, &tok)) { | |
| 265 *nextTokPtr = ptr; | |
| 266 return XML_TOK_INVALID; | |
| 267 } | |
| 268 ptr += MINBPC(enc); | |
| 269 if (ptr == end) | |
| 270 return XML_TOK_PARTIAL; | |
| 271 if (CHAR_MATCHES(enc, ptr, ASCII_GT)) { | |
| 272 *nextTokPtr = ptr + MINBPC(enc); | |
| 273 return tok; | |
| 274 } | |
| 275 /* fall through */ | |
| 276 default: | |
| 277 *nextTokPtr = ptr; | |
| 278 return XML_TOK_INVALID; | |
| 279 } | |
| 280 } | |
| 281 return XML_TOK_PARTIAL; | |
| 282 } | |
| 283 | |
| 284 static int PTRCALL | |
| 285 PREFIX(scanCdataSection)(const ENCODING *enc, const char *ptr, | |
| 286 const char *end, const char **nextTokPtr) | |
| 287 { | |
| 288 static const char CDATA_LSQB[] = { ASCII_C, ASCII_D, ASCII_A, | |
| 289 ASCII_T, ASCII_A, ASCII_LSQB }; | |
| 290 int i; | |
| 291 /* CDATA[ */ | |
| 292 if (end - ptr < 6 * MINBPC(enc)) | |
| 293 return XML_TOK_PARTIAL; | |
| 294 for (i = 0; i < 6; i++, ptr += MINBPC(enc)) { | |
| 295 if (!CHAR_MATCHES(enc, ptr, CDATA_LSQB[i])) { | |
| 296 *nextTokPtr = ptr; | |
| 297 return XML_TOK_INVALID; | |
| 298 } | |
| 299 } | |
| 300 *nextTokPtr = ptr; | |
| 301 return XML_TOK_CDATA_SECT_OPEN; | |
| 302 } | |
| 303 | |
| 304 static int PTRCALL | |
| 305 PREFIX(cdataSectionTok)(const ENCODING *enc, const char *ptr, | |
| 306 const char *end, const char **nextTokPtr) | |
| 307 { | |
| 308 if (ptr == end) | |
| 309 return XML_TOK_NONE; | |
| 310 if (MINBPC(enc) > 1) { | |
| 311 size_t n = end - ptr; | |
| 312 if (n & (MINBPC(enc) - 1)) { | |
| 313 n &= ~(MINBPC(enc) - 1); | |
| 314 if (n == 0) | |
| 315 return XML_TOK_PARTIAL; | |
| 316 end = ptr + n; | |
| 317 } | |
| 318 } | |
| 319 switch (BYTE_TYPE(enc, ptr)) { | |
| 320 case BT_RSQB: | |
| 321 ptr += MINBPC(enc); | |
| 322 if (ptr == end) | |
| 323 return XML_TOK_PARTIAL; | |
| 324 if (!CHAR_MATCHES(enc, ptr, ASCII_RSQB)) | |
| 325 break; | |
| 326 ptr += MINBPC(enc); | |
| 327 if (ptr == end) | |
| 328 return XML_TOK_PARTIAL; | |
| 329 if (!CHAR_MATCHES(enc, ptr, ASCII_GT)) { | |
| 330 ptr -= MINBPC(enc); | |
| 331 break; | |
| 332 } | |
| 333 *nextTokPtr = ptr + MINBPC(enc); | |
| 334 return XML_TOK_CDATA_SECT_CLOSE; | |
| 335 case BT_CR: | |
| 336 ptr += MINBPC(enc); | |
| 337 if (ptr == end) | |
| 338 return XML_TOK_PARTIAL; | |
| 339 if (BYTE_TYPE(enc, ptr) == BT_LF) | |
| 340 ptr += MINBPC(enc); | |
| 341 *nextTokPtr = ptr; | |
| 342 return XML_TOK_DATA_NEWLINE; | |
| 343 case BT_LF: | |
| 344 *nextTokPtr = ptr + MINBPC(enc); | |
| 345 return XML_TOK_DATA_NEWLINE; | |
| 346 INVALID_CASES(ptr, nextTokPtr) | |
| 347 default: | |
| 348 ptr += MINBPC(enc); | |
| 349 break; | |
| 350 } | |
| 351 while (ptr != end) { | |
| 352 switch (BYTE_TYPE(enc, ptr)) { | |
| 353 #define LEAD_CASE(n) \ | |
| 354 case BT_LEAD ## n: \ | |
| 355 if (end - ptr < n || IS_INVALID_CHAR(enc, ptr, n)) { \ | |
| 356 *nextTokPtr = ptr; \ | |
| 357 return XML_TOK_DATA_CHARS; \ | |
| 358 } \ | |
| 359 ptr += n; \ | |
| 360 break; | |
| 361 LEAD_CASE(2) LEAD_CASE(3) LEAD_CASE(4) | |
| 362 #undef LEAD_CASE | |
| 363 case BT_NONXML: | |
| 364 case BT_MALFORM: | |
| 365 case BT_TRAIL: | |
| 366 case BT_CR: | |
| 367 case BT_LF: | |
| 368 case BT_RSQB: | |
| 369 *nextTokPtr = ptr; | |
| 370 return XML_TOK_DATA_CHARS; | |
| 371 default: | |
| 372 ptr += MINBPC(enc); | |
| 373 break; | |
| 374 } | |
| 375 } | |
| 376 *nextTokPtr = ptr; | |
| 377 return XML_TOK_DATA_CHARS; | |
| 378 } | |
| 379 | |
| 380 /* ptr points to character following "</" */ | |
| 381 | |
| 382 static int PTRCALL | |
| 383 PREFIX(scanEndTag)(const ENCODING *enc, const char *ptr, | |
| 384 const char *end, const char **nextTokPtr) | |
| 385 { | |
| 386 if (ptr == end) | |
| 387 return XML_TOK_PARTIAL; | |
| 388 switch (BYTE_TYPE(enc, ptr)) { | |
| 389 CHECK_NMSTRT_CASES(enc, ptr, end, nextTokPtr) | |
| 390 default: | |
| 391 *nextTokPtr = ptr; | |
| 392 return XML_TOK_INVALID; | |
| 393 } | |
| 394 while (ptr != end) { | |
| 395 switch (BYTE_TYPE(enc, ptr)) { | |
| 396 CHECK_NAME_CASES(enc, ptr, end, nextTokPtr) | |
| 397 case BT_S: case BT_CR: case BT_LF: | |
| 398 for (ptr += MINBPC(enc); ptr != end; ptr += MINBPC(enc)) { | |
| 399 switch (BYTE_TYPE(enc, ptr)) { | |
| 400 case BT_S: case BT_CR: case BT_LF: | |
| 401 break; | |
| 402 case BT_GT: | |
| 403 *nextTokPtr = ptr + MINBPC(enc); | |
| 404 return XML_TOK_END_TAG; | |
| 405 default: | |
| 406 *nextTokPtr = ptr; | |
| 407 return XML_TOK_INVALID; | |
| 408 } | |
| 409 } | |
| 410 return XML_TOK_PARTIAL; | |
| 411 #ifdef XML_NS | |
| 412 case BT_COLON: | |
| 413 /* no need to check qname syntax here, | |
| 414 since end-tag must match exactly */ | |
| 415 ptr += MINBPC(enc); | |
| 416 break; | |
| 417 #endif | |
| 418 case BT_GT: | |
| 419 *nextTokPtr = ptr + MINBPC(enc); | |
| 420 return XML_TOK_END_TAG; | |
| 421 default: | |
| 422 *nextTokPtr = ptr; | |
| 423 return XML_TOK_INVALID; | |
| 424 } | |
| 425 } | |
| 426 return XML_TOK_PARTIAL; | |
| 427 } | |
| 428 | |
| 429 /* ptr points to character following "&#X" */ | |
| 430 | |
| 431 static int PTRCALL | |
| 432 PREFIX(scanHexCharRef)(const ENCODING *enc, const char *ptr, | |
| 433 const char *end, const char **nextTokPtr) | |
| 434 { | |
| 435 if (ptr != end) { | |
| 436 switch (BYTE_TYPE(enc, ptr)) { | |
| 437 case BT_DIGIT: | |
| 438 case BT_HEX: | |
| 439 break; | |
| 440 default: | |
| 441 *nextTokPtr = ptr; | |
| 442 return XML_TOK_INVALID; | |
| 443 } | |
| 444 for (ptr += MINBPC(enc); ptr != end; ptr += MINBPC(enc)) { | |
| 445 switch (BYTE_TYPE(enc, ptr)) { | |
| 446 case BT_DIGIT: | |
| 447 case BT_HEX: | |
| 448 break; | |
| 449 case BT_SEMI: | |
| 450 *nextTokPtr = ptr + MINBPC(enc); | |
| 451 return XML_TOK_CHAR_REF; | |
| 452 default: | |
| 453 *nextTokPtr = ptr; | |
| 454 return XML_TOK_INVALID; | |
| 455 } | |
| 456 } | |
| 457 } | |
| 458 return XML_TOK_PARTIAL; | |
| 459 } | |
| 460 | |
| 461 /* ptr points to character following "&#" */ | |
| 462 | |
| 463 static int PTRCALL | |
| 464 PREFIX(scanCharRef)(const ENCODING *enc, const char *ptr, | |
| 465 const char *end, const char **nextTokPtr) | |
| 466 { | |
| 467 if (ptr != end) { | |
| 468 if (CHAR_MATCHES(enc, ptr, ASCII_x)) | |
| 469 return PREFIX(scanHexCharRef)(enc, ptr + MINBPC(enc), end, nextTokPtr); | |
| 470 switch (BYTE_TYPE(enc, ptr)) { | |
| 471 case BT_DIGIT: | |
| 472 break; | |
| 473 default: | |
| 474 *nextTokPtr = ptr; | |
| 475 return XML_TOK_INVALID; | |
| 476 } | |
| 477 for (ptr += MINBPC(enc); ptr != end; ptr += MINBPC(enc)) { | |
| 478 switch (BYTE_TYPE(enc, ptr)) { | |
| 479 case BT_DIGIT: | |
| 480 break; | |
| 481 case BT_SEMI: | |
| 482 *nextTokPtr = ptr + MINBPC(enc); | |
| 483 return XML_TOK_CHAR_REF; | |
| 484 default: | |
| 485 *nextTokPtr = ptr; | |
| 486 return XML_TOK_INVALID; | |
| 487 } | |
| 488 } | |
| 489 } | |
| 490 return XML_TOK_PARTIAL; | |
| 491 } | |
| 492 | |
| 493 /* ptr points to character following "&" */ | |
| 494 | |
| 495 static int PTRCALL | |
| 496 PREFIX(scanRef)(const ENCODING *enc, const char *ptr, const char *end, | |
| 497 const char **nextTokPtr) | |
| 498 { | |
| 499 if (ptr == end) | |
| 500 return XML_TOK_PARTIAL; | |
| 501 switch (BYTE_TYPE(enc, ptr)) { | |
| 502 CHECK_NMSTRT_CASES(enc, ptr, end, nextTokPtr) | |
| 503 case BT_NUM: | |
| 504 return PREFIX(scanCharRef)(enc, ptr + MINBPC(enc), end, nextTokPtr); | |
| 505 default: | |
| 506 *nextTokPtr = ptr; | |
| 507 return XML_TOK_INVALID; | |
| 508 } | |
| 509 while (ptr != end) { | |
| 510 switch (BYTE_TYPE(enc, ptr)) { | |
| 511 CHECK_NAME_CASES(enc, ptr, end, nextTokPtr) | |
| 512 case BT_SEMI: | |
| 513 *nextTokPtr = ptr + MINBPC(enc); | |
| 514 return XML_TOK_ENTITY_REF; | |
| 515 default: | |
| 516 *nextTokPtr = ptr; | |
| 517 return XML_TOK_INVALID; | |
| 518 } | |
| 519 } | |
| 520 return XML_TOK_PARTIAL; | |
| 521 } | |
| 522 | |
| 523 /* ptr points to character following first character of attribute name */ | |
| 524 | |
| 525 static int PTRCALL | |
| 526 PREFIX(scanAtts)(const ENCODING *enc, const char *ptr, const char *end, | |
| 527 const char **nextTokPtr) | |
| 528 { | |
| 529 #ifdef XML_NS | |
| 530 int hadColon = 0; | |
| 531 #endif | |
| 532 while (ptr != end) { | |
| 533 switch (BYTE_TYPE(enc, ptr)) { | |
| 534 CHECK_NAME_CASES(enc, ptr, end, nextTokPtr) | |
| 535 #ifdef XML_NS | |
| 536 case BT_COLON: | |
| 537 if (hadColon) { | |
| 538 *nextTokPtr = ptr; | |
| 539 return XML_TOK_INVALID; | |
| 540 } | |
| 541 hadColon = 1; | |
| 542 ptr += MINBPC(enc); | |
| 543 if (ptr == end) | |
| 544 return XML_TOK_PARTIAL; | |
| 545 switch (BYTE_TYPE(enc, ptr)) { | |
| 546 CHECK_NMSTRT_CASES(enc, ptr, end, nextTokPtr) | |
| 547 default: | |
| 548 *nextTokPtr = ptr; | |
| 549 return XML_TOK_INVALID; | |
| 550 } | |
| 551 break; | |
| 552 #endif | |
| 553 case BT_S: case BT_CR: case BT_LF: | |
| 554 for (;;) { | |
| 555 int t; | |
| 556 | |
| 557 ptr += MINBPC(enc); | |
| 558 if (ptr == end) | |
| 559 return XML_TOK_PARTIAL; | |
| 560 t = BYTE_TYPE(enc, ptr); | |
| 561 if (t == BT_EQUALS) | |
| 562 break; | |
| 563 switch (t) { | |
| 564 case BT_S: | |
| 565 case BT_LF: | |
| 566 case BT_CR: | |
| 567 break; | |
| 568 default: | |
| 569 *nextTokPtr = ptr; | |
| 570 return XML_TOK_INVALID; | |
| 571 } | |
| 572 } | |
| 573 /* fall through */ | |
| 574 case BT_EQUALS: | |
| 575 { | |
| 576 int open; | |
| 577 #ifdef XML_NS | |
| 578 hadColon = 0; | |
| 579 #endif | |
| 580 for (;;) { | |
| 581 ptr += MINBPC(enc); | |
| 582 if (ptr == end) | |
| 583 return XML_TOK_PARTIAL; | |
| 584 open = BYTE_TYPE(enc, ptr); | |
| 585 if (open == BT_QUOT || open == BT_APOS) | |
| 586 break; | |
| 587 switch (open) { | |
| 588 case BT_S: | |
| 589 case BT_LF: | |
| 590 case BT_CR: | |
| 591 break; | |
| 592 default: | |
| 593 *nextTokPtr = ptr; | |
| 594 return XML_TOK_INVALID; | |
| 595 } | |
| 596 } | |
| 597 ptr += MINBPC(enc); | |
| 598 /* in attribute value */ | |
| 599 for (;;) { | |
| 600 int t; | |
| 601 if (ptr == end) | |
| 602 return XML_TOK_PARTIAL; | |
| 603 t = BYTE_TYPE(enc, ptr); | |
| 604 if (t == open) | |
| 605 break; | |
| 606 switch (t) { | |
| 607 INVALID_CASES(ptr, nextTokPtr) | |
| 608 case BT_AMP: | |
| 609 { | |
| 610 int tok = PREFIX(scanRef)(enc, ptr + MINBPC(enc), end, &ptr); | |
| 611 if (tok <= 0) { | |
| 612 if (tok == XML_TOK_INVALID) | |
| 613 *nextTokPtr = ptr; | |
| 614 return tok; | |
| 615 } | |
| 616 break; | |
| 617 } | |
| 618 case BT_LT: | |
| 619 *nextTokPtr = ptr; | |
| 620 return XML_TOK_INVALID; | |
| 621 default: | |
| 622 ptr += MINBPC(enc); | |
| 623 break; | |
| 624 } | |
| 625 } | |
| 626 ptr += MINBPC(enc); | |
| 627 if (ptr == end) | |
| 628 return XML_TOK_PARTIAL; | |
| 629 switch (BYTE_TYPE(enc, ptr)) { | |
| 630 case BT_S: | |
| 631 case BT_CR: | |
| 632 case BT_LF: | |
| 633 break; | |
| 634 case BT_SOL: | |
| 635 goto sol; | |
| 636 case BT_GT: | |
| 637 goto gt; | |
| 638 default: | |
| 639 *nextTokPtr = ptr; | |
| 640 return XML_TOK_INVALID; | |
| 641 } | |
| 642 /* ptr points to closing quote */ | |
| 643 for (;;) { | |
| 644 ptr += MINBPC(enc); | |
| 645 if (ptr == end) | |
| 646 return XML_TOK_PARTIAL; | |
| 647 switch (BYTE_TYPE(enc, ptr)) { | |
| 648 CHECK_NMSTRT_CASES(enc, ptr, end, nextTokPtr) | |
| 649 case BT_S: case BT_CR: case BT_LF: | |
| 650 continue; | |
| 651 case BT_GT: | |
| 652 gt: | |
| 653 *nextTokPtr = ptr + MINBPC(enc); | |
| 654 return XML_TOK_START_TAG_WITH_ATTS; | |
| 655 case BT_SOL: | |
| 656 sol: | |
| 657 ptr += MINBPC(enc); | |
| 658 if (ptr == end) | |
| 659 return XML_TOK_PARTIAL; | |
| 660 if (!CHAR_MATCHES(enc, ptr, ASCII_GT)) { | |
| 661 *nextTokPtr = ptr; | |
| 662 return XML_TOK_INVALID; | |
| 663 } | |
| 664 *nextTokPtr = ptr + MINBPC(enc); | |
| 665 return XML_TOK_EMPTY_ELEMENT_WITH_ATTS; | |
| 666 default: | |
| 667 *nextTokPtr = ptr; | |
| 668 return XML_TOK_INVALID; | |
| 669 } | |
| 670 break; | |
| 671 } | |
| 672 break; | |
| 673 } | |
| 674 default: | |
| 675 *nextTokPtr = ptr; | |
| 676 return XML_TOK_INVALID; | |
| 677 } | |
| 678 } | |
| 679 return XML_TOK_PARTIAL; | |
| 680 } | |
| 681 | |
| 682 /* ptr points to character following "<" */ | |
| 683 | |
| 684 static int PTRCALL | |
| 685 PREFIX(scanLt)(const ENCODING *enc, const char *ptr, const char *end, | |
| 686 const char **nextTokPtr) | |
| 687 { | |
| 688 #ifdef XML_NS | |
| 689 int hadColon; | |
| 690 #endif | |
| 691 if (ptr == end) | |
| 692 return XML_TOK_PARTIAL; | |
| 693 switch (BYTE_TYPE(enc, ptr)) { | |
| 694 CHECK_NMSTRT_CASES(enc, ptr, end, nextTokPtr) | |
| 695 case BT_EXCL: | |
| 696 if ((ptr += MINBPC(enc)) == end) | |
| 697 return XML_TOK_PARTIAL; | |
| 698 switch (BYTE_TYPE(enc, ptr)) { | |
| 699 case BT_MINUS: | |
| 700 return PREFIX(scanComment)(enc, ptr + MINBPC(enc), end, nextTokPtr); | |
| 701 case BT_LSQB: | |
| 702 return PREFIX(scanCdataSection)(enc, ptr + MINBPC(enc), | |
| 703 end, nextTokPtr); | |
| 704 } | |
| 705 *nextTokPtr = ptr; | |
| 706 return XML_TOK_INVALID; | |
| 707 case BT_QUEST: | |
| 708 return PREFIX(scanPi)(enc, ptr + MINBPC(enc), end, nextTokPtr); | |
| 709 case BT_SOL: | |
| 710 return PREFIX(scanEndTag)(enc, ptr + MINBPC(enc), end, nextTokPtr); | |
| 711 default: | |
| 712 *nextTokPtr = ptr; | |
| 713 return XML_TOK_INVALID; | |
| 714 } | |
| 715 #ifdef XML_NS | |
| 716 hadColon = 0; | |
| 717 #endif | |
| 718 /* we have a start-tag */ | |
| 719 while (ptr != end) { | |
| 720 switch (BYTE_TYPE(enc, ptr)) { | |
| 721 CHECK_NAME_CASES(enc, ptr, end, nextTokPtr) | |
| 722 #ifdef XML_NS | |
| 723 case BT_COLON: | |
| 724 if (hadColon) { | |
| 725 *nextTokPtr = ptr; | |
| 726 return XML_TOK_INVALID; | |
| 727 } | |
| 728 hadColon = 1; | |
| 729 ptr += MINBPC(enc); | |
| 730 if (ptr == end) | |
| 731 return XML_TOK_PARTIAL; | |
| 732 switch (BYTE_TYPE(enc, ptr)) { | |
| 733 CHECK_NMSTRT_CASES(enc, ptr, end, nextTokPtr) | |
| 734 default: | |
| 735 *nextTokPtr = ptr; | |
| 736 return XML_TOK_INVALID; | |
| 737 } | |
| 738 break; | |
| 739 #endif | |
| 740 case BT_S: case BT_CR: case BT_LF: | |
| 741 { | |
| 742 ptr += MINBPC(enc); | |
| 743 while (ptr != end) { | |
| 744 switch (BYTE_TYPE(enc, ptr)) { | |
| 745 CHECK_NMSTRT_CASES(enc, ptr, end, nextTokPtr) | |
| 746 case BT_GT: | |
| 747 goto gt; | |
| 748 case BT_SOL: | |
| 749 goto sol; | |
| 750 case BT_S: case BT_CR: case BT_LF: | |
| 751 ptr += MINBPC(enc); | |
| 752 continue; | |
| 753 default: | |
| 754 *nextTokPtr = ptr; | |
| 755 return XML_TOK_INVALID; | |
| 756 } | |
| 757 return PREFIX(scanAtts)(enc, ptr, end, nextTokPtr); | |
| 758 } | |
| 759 return XML_TOK_PARTIAL; | |
| 760 } | |
| 761 case BT_GT: | |
| 762 gt: | |
| 763 *nextTokPtr = ptr + MINBPC(enc); | |
| 764 return XML_TOK_START_TAG_NO_ATTS; | |
| 765 case BT_SOL: | |
| 766 sol: | |
| 767 ptr += MINBPC(enc); | |
| 768 if (ptr == end) | |
| 769 return XML_TOK_PARTIAL; | |
| 770 if (!CHAR_MATCHES(enc, ptr, ASCII_GT)) { | |
| 771 *nextTokPtr = ptr; | |
| 772 return XML_TOK_INVALID; | |
| 773 } | |
| 774 *nextTokPtr = ptr + MINBPC(enc); | |
| 775 return XML_TOK_EMPTY_ELEMENT_NO_ATTS; | |
| 776 default: | |
| 777 *nextTokPtr = ptr; | |
| 778 return XML_TOK_INVALID; | |
| 779 } | |
| 780 } | |
| 781 return XML_TOK_PARTIAL; | |
| 782 } | |
| 783 | |
| 784 static int PTRCALL | |
| 785 PREFIX(contentTok)(const ENCODING *enc, const char *ptr, const char *end, | |
| 786 const char **nextTokPtr) | |
| 787 { | |
| 788 if (ptr == end) | |
| 789 return XML_TOK_NONE; | |
| 790 if (MINBPC(enc) > 1) { | |
| 791 size_t n = end - ptr; | |
| 792 if (n & (MINBPC(enc) - 1)) { | |
| 793 n &= ~(MINBPC(enc) - 1); | |
| 794 if (n == 0) | |
| 795 return XML_TOK_PARTIAL; | |
| 796 end = ptr + n; | |
| 797 } | |
| 798 } | |
| 799 switch (BYTE_TYPE(enc, ptr)) { | |
| 800 case BT_LT: | |
| 801 return PREFIX(scanLt)(enc, ptr + MINBPC(enc), end, nextTokPtr); | |
| 802 case BT_AMP: | |
| 803 return PREFIX(scanRef)(enc, ptr + MINBPC(enc), end, nextTokPtr); | |
| 804 case BT_CR: | |
| 805 ptr += MINBPC(enc); | |
| 806 if (ptr == end) | |
| 807 return XML_TOK_TRAILING_CR; | |
| 808 if (BYTE_TYPE(enc, ptr) == BT_LF) | |
| 809 ptr += MINBPC(enc); | |
| 810 *nextTokPtr = ptr; | |
| 811 return XML_TOK_DATA_NEWLINE; | |
| 812 case BT_LF: | |
| 813 *nextTokPtr = ptr + MINBPC(enc); | |
| 814 return XML_TOK_DATA_NEWLINE; | |
| 815 case BT_RSQB: | |
| 816 ptr += MINBPC(enc); | |
| 817 if (ptr == end) | |
| 818 return XML_TOK_TRAILING_RSQB; | |
| 819 if (!CHAR_MATCHES(enc, ptr, ASCII_RSQB)) | |
| 820 break; | |
| 821 ptr += MINBPC(enc); | |
| 822 if (ptr == end) | |
| 823 return XML_TOK_TRAILING_RSQB; | |
| 824 if (!CHAR_MATCHES(enc, ptr, ASCII_GT)) { | |
| 825 ptr -= MINBPC(enc); | |
| 826 break; | |
| 827 } | |
| 828 *nextTokPtr = ptr; | |
| 829 return XML_TOK_INVALID; | |
| 830 INVALID_CASES(ptr, nextTokPtr) | |
| 831 default: | |
| 832 ptr += MINBPC(enc); | |
| 833 break; | |
| 834 } | |
| 835 while (ptr != end) { | |
| 836 switch (BYTE_TYPE(enc, ptr)) { | |
| 837 #define LEAD_CASE(n) \ | |
| 838 case BT_LEAD ## n: \ | |
| 839 if (end - ptr < n || IS_INVALID_CHAR(enc, ptr, n)) { \ | |
| 840 *nextTokPtr = ptr; \ | |
| 841 return XML_TOK_DATA_CHARS; \ | |
| 842 } \ | |
| 843 ptr += n; \ | |
| 844 break; | |
| 845 LEAD_CASE(2) LEAD_CASE(3) LEAD_CASE(4) | |
| 846 #undef LEAD_CASE | |
| 847 case BT_RSQB: | |
| 848 if (ptr + MINBPC(enc) != end) { | |
| 849 if (!CHAR_MATCHES(enc, ptr + MINBPC(enc), ASCII_RSQB)) { | |
| 850 ptr += MINBPC(enc); | |
| 851 break; | |
| 852 } | |
| 853 if (ptr + 2*MINBPC(enc) != end) { | |
| 854 if (!CHAR_MATCHES(enc, ptr + 2*MINBPC(enc), ASCII_GT)) { | |
| 855 ptr += MINBPC(enc); | |
| 856 break; | |
| 857 } | |
| 858 *nextTokPtr = ptr + 2*MINBPC(enc); | |
| 859 return XML_TOK_INVALID; | |
| 860 } | |
| 861 } | |
| 862 /* fall through */ | |
| 863 case BT_AMP: | |
| 864 case BT_LT: | |
| 865 case BT_NONXML: | |
| 866 case BT_MALFORM: | |
| 867 case BT_TRAIL: | |
| 868 case BT_CR: | |
| 869 case BT_LF: | |
| 870 *nextTokPtr = ptr; | |
| 871 return XML_TOK_DATA_CHARS; | |
| 872 default: | |
| 873 ptr += MINBPC(enc); | |
| 874 break; | |
| 875 } | |
| 876 } | |
| 877 *nextTokPtr = ptr; | |
| 878 return XML_TOK_DATA_CHARS; | |
| 879 } | |
| 880 | |
| 881 /* ptr points to character following "%" */ | |
| 882 | |
| 883 static int PTRCALL | |
| 884 PREFIX(scanPercent)(const ENCODING *enc, const char *ptr, const char *end, | |
| 885 const char **nextTokPtr) | |
| 886 { | |
| 887 if (ptr == end) | |
| 888 return XML_TOK_PARTIAL; | |
| 889 switch (BYTE_TYPE(enc, ptr)) { | |
| 890 CHECK_NMSTRT_CASES(enc, ptr, end, nextTokPtr) | |
| 891 case BT_S: case BT_LF: case BT_CR: case BT_PERCNT: | |
| 892 *nextTokPtr = ptr; | |
| 893 return XML_TOK_PERCENT; | |
| 894 default: | |
| 895 *nextTokPtr = ptr; | |
| 896 return XML_TOK_INVALID; | |
| 897 } | |
| 898 while (ptr != end) { | |
| 899 switch (BYTE_TYPE(enc, ptr)) { | |
| 900 CHECK_NAME_CASES(enc, ptr, end, nextTokPtr) | |
| 901 case BT_SEMI: | |
| 902 *nextTokPtr = ptr + MINBPC(enc); | |
| 903 return XML_TOK_PARAM_ENTITY_REF; | |
| 904 default: | |
| 905 *nextTokPtr = ptr; | |
| 906 return XML_TOK_INVALID; | |
| 907 } | |
| 908 } | |
| 909 return XML_TOK_PARTIAL; | |
| 910 } | |
| 911 | |
| 912 static int PTRCALL | |
| 913 PREFIX(scanPoundName)(const ENCODING *enc, const char *ptr, const char *end, | |
| 914 const char **nextTokPtr) | |
| 915 { | |
| 916 if (ptr == end) | |
| 917 return XML_TOK_PARTIAL; | |
| 918 switch (BYTE_TYPE(enc, ptr)) { | |
| 919 CHECK_NMSTRT_CASES(enc, ptr, end, nextTokPtr) | |
| 920 default: | |
| 921 *nextTokPtr = ptr; | |
| 922 return XML_TOK_INVALID; | |
| 923 } | |
| 924 while (ptr != end) { | |
| 925 switch (BYTE_TYPE(enc, ptr)) { | |
| 926 CHECK_NAME_CASES(enc, ptr, end, nextTokPtr) | |
| 927 case BT_CR: case BT_LF: case BT_S: | |
| 928 case BT_RPAR: case BT_GT: case BT_PERCNT: case BT_VERBAR: | |
| 929 *nextTokPtr = ptr; | |
| 930 return XML_TOK_POUND_NAME; | |
| 931 default: | |
| 932 *nextTokPtr = ptr; | |
| 933 return XML_TOK_INVALID; | |
| 934 } | |
| 935 } | |
| 936 return -XML_TOK_POUND_NAME; | |
| 937 } | |
| 938 | |
| 939 static int PTRCALL | |
| 940 PREFIX(scanLit)(int open, const ENCODING *enc, | |
| 941 const char *ptr, const char *end, | |
| 942 const char **nextTokPtr) | |
| 943 { | |
| 944 while (ptr != end) { | |
| 945 int t = BYTE_TYPE(enc, ptr); | |
| 946 switch (t) { | |
| 947 INVALID_CASES(ptr, nextTokPtr) | |
| 948 case BT_QUOT: | |
| 949 case BT_APOS: | |
| 950 ptr += MINBPC(enc); | |
| 951 if (t != open) | |
| 952 break; | |
| 953 if (ptr == end) | |
| 954 return -XML_TOK_LITERAL; | |
| 955 *nextTokPtr = ptr; | |
| 956 switch (BYTE_TYPE(enc, ptr)) { | |
| 957 case BT_S: case BT_CR: case BT_LF: | |
| 958 case BT_GT: case BT_PERCNT: case BT_LSQB: | |
| 959 return XML_TOK_LITERAL; | |
| 960 default: | |
| 961 return XML_TOK_INVALID; | |
| 962 } | |
| 963 default: | |
| 964 ptr += MINBPC(enc); | |
| 965 break; | |
| 966 } | |
| 967 } | |
| 968 return XML_TOK_PARTIAL; | |
| 969 } | |
| 970 | |
| 971 static int PTRCALL | |
| 972 PREFIX(prologTok)(const ENCODING *enc, const char *ptr, const char *end, | |
| 973 const char **nextTokPtr) | |
| 974 { | |
| 975 int tok; | |
| 976 if (ptr == end) | |
| 977 return XML_TOK_NONE; | |
| 978 if (MINBPC(enc) > 1) { | |
| 979 size_t n = end - ptr; | |
| 980 if (n & (MINBPC(enc) - 1)) { | |
| 981 n &= ~(MINBPC(enc) - 1); | |
| 982 if (n == 0) | |
| 983 return XML_TOK_PARTIAL; | |
| 984 end = ptr + n; | |
| 985 } | |
| 986 } | |
| 987 switch (BYTE_TYPE(enc, ptr)) { | |
| 988 case BT_QUOT: | |
| 989 return PREFIX(scanLit)(BT_QUOT, enc, ptr + MINBPC(enc), end, nextTokPtr); | |
| 990 case BT_APOS: | |
| 991 return PREFIX(scanLit)(BT_APOS, enc, ptr + MINBPC(enc), end, nextTokPtr); | |
| 992 case BT_LT: | |
| 993 { | |
| 994 ptr += MINBPC(enc); | |
| 995 if (ptr == end) | |
| 996 return XML_TOK_PARTIAL; | |
| 997 switch (BYTE_TYPE(enc, ptr)) { | |
| 998 case BT_EXCL: | |
| 999 return PREFIX(scanDecl)(enc, ptr + MINBPC(enc), end, nextTokPtr); | |
| 1000 case BT_QUEST: | |
| 1001 return PREFIX(scanPi)(enc, ptr + MINBPC(enc), end, nextTokPtr); | |
| 1002 case BT_NMSTRT: | |
| 1003 case BT_HEX: | |
| 1004 case BT_NONASCII: | |
| 1005 case BT_LEAD2: | |
| 1006 case BT_LEAD3: | |
| 1007 case BT_LEAD4: | |
| 1008 *nextTokPtr = ptr - MINBPC(enc); | |
| 1009 return XML_TOK_INSTANCE_START; | |
| 1010 } | |
| 1011 *nextTokPtr = ptr; | |
| 1012 return XML_TOK_INVALID; | |
| 1013 } | |
| 1014 case BT_CR: | |
| 1015 if (ptr + MINBPC(enc) == end) { | |
| 1016 *nextTokPtr = end; | |
| 1017 /* indicate that this might be part of a CR/LF pair */ | |
| 1018 return -XML_TOK_PROLOG_S; | |
| 1019 } | |
| 1020 /* fall through */ | |
| 1021 case BT_S: case BT_LF: | |
| 1022 for (;;) { | |
| 1023 ptr += MINBPC(enc); | |
| 1024 if (ptr == end) | |
| 1025 break; | |
| 1026 switch (BYTE_TYPE(enc, ptr)) { | |
| 1027 case BT_S: case BT_LF: | |
| 1028 break; | |
| 1029 case BT_CR: | |
| 1030 /* don't split CR/LF pair */ | |
| 1031 if (ptr + MINBPC(enc) != end) | |
| 1032 break; | |
| 1033 /* fall through */ | |
| 1034 default: | |
| 1035 *nextTokPtr = ptr; | |
| 1036 return XML_TOK_PROLOG_S; | |
| 1037 } | |
| 1038 } | |
| 1039 *nextTokPtr = ptr; | |
| 1040 return XML_TOK_PROLOG_S; | |
| 1041 case BT_PERCNT: | |
| 1042 return PREFIX(scanPercent)(enc, ptr + MINBPC(enc), end, nextTokPtr); | |
| 1043 case BT_COMMA: | |
| 1044 *nextTokPtr = ptr + MINBPC(enc); | |
| 1045 return XML_TOK_COMMA; | |
| 1046 case BT_LSQB: | |
| 1047 *nextTokPtr = ptr + MINBPC(enc); | |
| 1048 return XML_TOK_OPEN_BRACKET; | |
| 1049 case BT_RSQB: | |
| 1050 ptr += MINBPC(enc); | |
| 1051 if (ptr == end) | |
| 1052 return -XML_TOK_CLOSE_BRACKET; | |
| 1053 if (CHAR_MATCHES(enc, ptr, ASCII_RSQB)) { | |
| 1054 if (ptr + MINBPC(enc) == end) | |
| 1055 return XML_TOK_PARTIAL; | |
| 1056 if (CHAR_MATCHES(enc, ptr + MINBPC(enc), ASCII_GT)) { | |
| 1057 *nextTokPtr = ptr + 2*MINBPC(enc); | |
| 1058 return XML_TOK_COND_SECT_CLOSE; | |
| 1059 } | |
| 1060 } | |
| 1061 *nextTokPtr = ptr; | |
| 1062 return XML_TOK_CLOSE_BRACKET; | |
| 1063 case BT_LPAR: | |
| 1064 *nextTokPtr = ptr + MINBPC(enc); | |
| 1065 return XML_TOK_OPEN_PAREN; | |
| 1066 case BT_RPAR: | |
| 1067 ptr += MINBPC(enc); | |
| 1068 if (ptr == end) | |
| 1069 return -XML_TOK_CLOSE_PAREN; | |
| 1070 switch (BYTE_TYPE(enc, ptr)) { | |
| 1071 case BT_AST: | |
| 1072 *nextTokPtr = ptr + MINBPC(enc); | |
| 1073 return XML_TOK_CLOSE_PAREN_ASTERISK; | |
| 1074 case BT_QUEST: | |
| 1075 *nextTokPtr = ptr + MINBPC(enc); | |
| 1076 return XML_TOK_CLOSE_PAREN_QUESTION; | |
| 1077 case BT_PLUS: | |
| 1078 *nextTokPtr = ptr + MINBPC(enc); | |
| 1079 return XML_TOK_CLOSE_PAREN_PLUS; | |
| 1080 case BT_CR: case BT_LF: case BT_S: | |
| 1081 case BT_GT: case BT_COMMA: case BT_VERBAR: | |
| 1082 case BT_RPAR: | |
| 1083 *nextTokPtr = ptr; | |
| 1084 return XML_TOK_CLOSE_PAREN; | |
| 1085 } | |
| 1086 *nextTokPtr = ptr; | |
| 1087 return XML_TOK_INVALID; | |
| 1088 case BT_VERBAR: | |
| 1089 *nextTokPtr = ptr + MINBPC(enc); | |
| 1090 return XML_TOK_OR; | |
| 1091 case BT_GT: | |
| 1092 *nextTokPtr = ptr + MINBPC(enc); | |
| 1093 return XML_TOK_DECL_CLOSE; | |
| 1094 case BT_NUM: | |
| 1095 return PREFIX(scanPoundName)(enc, ptr + MINBPC(enc), end, nextTokPtr); | |
| 1096 #define LEAD_CASE(n) \ | |
| 1097 case BT_LEAD ## n: \ | |
| 1098 if (end - ptr < n) \ | |
| 1099 return XML_TOK_PARTIAL_CHAR; \ | |
| 1100 if (IS_NMSTRT_CHAR(enc, ptr, n)) { \ | |
| 1101 ptr += n; \ | |
| 1102 tok = XML_TOK_NAME; \ | |
| 1103 break; \ | |
| 1104 } \ | |
| 1105 if (IS_NAME_CHAR(enc, ptr, n)) { \ | |
| 1106 ptr += n; \ | |
| 1107 tok = XML_TOK_NMTOKEN; \ | |
| 1108 break; \ | |
| 1109 } \ | |
| 1110 *nextTokPtr = ptr; \ | |
| 1111 return XML_TOK_INVALID; | |
| 1112 LEAD_CASE(2) LEAD_CASE(3) LEAD_CASE(4) | |
| 1113 #undef LEAD_CASE | |
| 1114 case BT_NMSTRT: | |
| 1115 case BT_HEX: | |
| 1116 tok = XML_TOK_NAME; | |
| 1117 ptr += MINBPC(enc); | |
| 1118 break; | |
| 1119 case BT_DIGIT: | |
| 1120 case BT_NAME: | |
| 1121 case BT_MINUS: | |
| 1122 #ifdef XML_NS | |
| 1123 case BT_COLON: | |
| 1124 #endif | |
| 1125 tok = XML_TOK_NMTOKEN; | |
| 1126 ptr += MINBPC(enc); | |
| 1127 break; | |
| 1128 case BT_NONASCII: | |
| 1129 if (IS_NMSTRT_CHAR_MINBPC(enc, ptr)) { | |
| 1130 ptr += MINBPC(enc); | |
| 1131 tok = XML_TOK_NAME; | |
| 1132 break; | |
| 1133 } | |
| 1134 if (IS_NAME_CHAR_MINBPC(enc, ptr)) { | |
| 1135 ptr += MINBPC(enc); | |
| 1136 tok = XML_TOK_NMTOKEN; | |
| 1137 break; | |
| 1138 } | |
| 1139 /* fall through */ | |
| 1140 default: | |
| 1141 *nextTokPtr = ptr; | |
| 1142 return XML_TOK_INVALID; | |
| 1143 } | |
| 1144 while (ptr != end) { | |
| 1145 switch (BYTE_TYPE(enc, ptr)) { | |
| 1146 CHECK_NAME_CASES(enc, ptr, end, nextTokPtr) | |
| 1147 case BT_GT: case BT_RPAR: case BT_COMMA: | |
| 1148 case BT_VERBAR: case BT_LSQB: case BT_PERCNT: | |
| 1149 case BT_S: case BT_CR: case BT_LF: | |
| 1150 *nextTokPtr = ptr; | |
| 1151 return tok; | |
| 1152 #ifdef XML_NS | |
| 1153 case BT_COLON: | |
| 1154 ptr += MINBPC(enc); | |
| 1155 switch (tok) { | |
| 1156 case XML_TOK_NAME: | |
| 1157 if (ptr == end) | |
| 1158 return XML_TOK_PARTIAL; | |
| 1159 tok = XML_TOK_PREFIXED_NAME; | |
| 1160 switch (BYTE_TYPE(enc, ptr)) { | |
| 1161 CHECK_NAME_CASES(enc, ptr, end, nextTokPtr) | |
| 1162 default: | |
| 1163 tok = XML_TOK_NMTOKEN; | |
| 1164 break; | |
| 1165 } | |
| 1166 break; | |
| 1167 case XML_TOK_PREFIXED_NAME: | |
| 1168 tok = XML_TOK_NMTOKEN; | |
| 1169 break; | |
| 1170 } | |
| 1171 break; | |
| 1172 #endif | |
| 1173 case BT_PLUS: | |
| 1174 if (tok == XML_TOK_NMTOKEN) { | |
| 1175 *nextTokPtr = ptr; | |
| 1176 return XML_TOK_INVALID; | |
| 1177 } | |
| 1178 *nextTokPtr = ptr + MINBPC(enc); | |
| 1179 return XML_TOK_NAME_PLUS; | |
| 1180 case BT_AST: | |
| 1181 if (tok == XML_TOK_NMTOKEN) { | |
| 1182 *nextTokPtr = ptr; | |
| 1183 return XML_TOK_INVALID; | |
| 1184 } | |
| 1185 *nextTokPtr = ptr + MINBPC(enc); | |
| 1186 return XML_TOK_NAME_ASTERISK; | |
| 1187 case BT_QUEST: | |
| 1188 if (tok == XML_TOK_NMTOKEN) { | |
| 1189 *nextTokPtr = ptr; | |
| 1190 return XML_TOK_INVALID; | |
| 1191 } | |
| 1192 *nextTokPtr = ptr + MINBPC(enc); | |
| 1193 return XML_TOK_NAME_QUESTION; | |
| 1194 default: | |
| 1195 *nextTokPtr = ptr; | |
| 1196 return XML_TOK_INVALID; | |
| 1197 } | |
| 1198 } | |
| 1199 return -tok; | |
| 1200 } | |
| 1201 | |
| 1202 static int PTRCALL | |
| 1203 PREFIX(attributeValueTok)(const ENCODING *enc, const char *ptr, | |
| 1204 const char *end, const char **nextTokPtr) | |
| 1205 { | |
| 1206 const char *start; | |
| 1207 if (ptr == end) | |
| 1208 return XML_TOK_NONE; | |
| 1209 start = ptr; | |
| 1210 while (ptr != end) { | |
| 1211 switch (BYTE_TYPE(enc, ptr)) { | |
| 1212 #define LEAD_CASE(n) \ | |
| 1213 case BT_LEAD ## n: ptr += n; break; | |
| 1214 LEAD_CASE(2) LEAD_CASE(3) LEAD_CASE(4) | |
| 1215 #undef LEAD_CASE | |
| 1216 case BT_AMP: | |
| 1217 if (ptr == start) | |
| 1218 return PREFIX(scanRef)(enc, ptr + MINBPC(enc), end, nextTokPtr); | |
| 1219 *nextTokPtr = ptr; | |
| 1220 return XML_TOK_DATA_CHARS; | |
| 1221 case BT_LT: | |
| 1222 /* this is for inside entity references */ | |
| 1223 *nextTokPtr = ptr; | |
| 1224 return XML_TOK_INVALID; | |
| 1225 case BT_LF: | |
| 1226 if (ptr == start) { | |
| 1227 *nextTokPtr = ptr + MINBPC(enc); | |
| 1228 return XML_TOK_DATA_NEWLINE; | |
| 1229 } | |
| 1230 *nextTokPtr = ptr; | |
| 1231 return XML_TOK_DATA_CHARS; | |
| 1232 case BT_CR: | |
| 1233 if (ptr == start) { | |
| 1234 ptr += MINBPC(enc); | |
| 1235 if (ptr == end) | |
| 1236 return XML_TOK_TRAILING_CR; | |
| 1237 if (BYTE_TYPE(enc, ptr) == BT_LF) | |
| 1238 ptr += MINBPC(enc); | |
| 1239 *nextTokPtr = ptr; | |
| 1240 return XML_TOK_DATA_NEWLINE; | |
| 1241 } | |
| 1242 *nextTokPtr = ptr; | |
| 1243 return XML_TOK_DATA_CHARS; | |
| 1244 case BT_S: | |
| 1245 if (ptr == start) { | |
| 1246 *nextTokPtr = ptr + MINBPC(enc); | |
| 1247 return XML_TOK_ATTRIBUTE_VALUE_S; | |
| 1248 } | |
| 1249 *nextTokPtr = ptr; | |
| 1250 return XML_TOK_DATA_CHARS; | |
| 1251 default: | |
| 1252 ptr += MINBPC(enc); | |
| 1253 break; | |
| 1254 } | |
| 1255 } | |
| 1256 *nextTokPtr = ptr; | |
| 1257 return XML_TOK_DATA_CHARS; | |
| 1258 } | |
| 1259 | |
| 1260 static int PTRCALL | |
| 1261 PREFIX(entityValueTok)(const ENCODING *enc, const char *ptr, | |
| 1262 const char *end, const char **nextTokPtr) | |
| 1263 { | |
| 1264 const char *start; | |
| 1265 if (ptr == end) | |
| 1266 return XML_TOK_NONE; | |
| 1267 start = ptr; | |
| 1268 while (ptr != end) { | |
| 1269 switch (BYTE_TYPE(enc, ptr)) { | |
| 1270 #define LEAD_CASE(n) \ | |
| 1271 case BT_LEAD ## n: ptr += n; break; | |
| 1272 LEAD_CASE(2) LEAD_CASE(3) LEAD_CASE(4) | |
| 1273 #undef LEAD_CASE | |
| 1274 case BT_AMP: | |
| 1275 if (ptr == start) | |
| 1276 return PREFIX(scanRef)(enc, ptr + MINBPC(enc), end, nextTokPtr); | |
| 1277 *nextTokPtr = ptr; | |
| 1278 return XML_TOK_DATA_CHARS; | |
| 1279 case BT_PERCNT: | |
| 1280 if (ptr == start) { | |
| 1281 int tok = PREFIX(scanPercent)(enc, ptr + MINBPC(enc), | |
| 1282 end, nextTokPtr); | |
| 1283 return (tok == XML_TOK_PERCENT) ? XML_TOK_INVALID : tok; | |
| 1284 } | |
| 1285 *nextTokPtr = ptr; | |
| 1286 return XML_TOK_DATA_CHARS; | |
| 1287 case BT_LF: | |
| 1288 if (ptr == start) { | |
| 1289 *nextTokPtr = ptr + MINBPC(enc); | |
| 1290 return XML_TOK_DATA_NEWLINE; | |
| 1291 } | |
| 1292 *nextTokPtr = ptr; | |
| 1293 return XML_TOK_DATA_CHARS; | |
| 1294 case BT_CR: | |
| 1295 if (ptr == start) { | |
| 1296 ptr += MINBPC(enc); | |
| 1297 if (ptr == end) | |
| 1298 return XML_TOK_TRAILING_CR; | |
| 1299 if (BYTE_TYPE(enc, ptr) == BT_LF) | |
| 1300 ptr += MINBPC(enc); | |
| 1301 *nextTokPtr = ptr; | |
| 1302 return XML_TOK_DATA_NEWLINE; | |
| 1303 } | |
| 1304 *nextTokPtr = ptr; | |
| 1305 return XML_TOK_DATA_CHARS; | |
| 1306 default: | |
| 1307 ptr += MINBPC(enc); | |
| 1308 break; | |
| 1309 } | |
| 1310 } | |
| 1311 *nextTokPtr = ptr; | |
| 1312 return XML_TOK_DATA_CHARS; | |
| 1313 } | |
| 1314 | |
| 1315 #ifdef XML_DTD | |
| 1316 | |
| 1317 static int PTRCALL | |
| 1318 PREFIX(ignoreSectionTok)(const ENCODING *enc, const char *ptr, | |
| 1319 const char *end, const char **nextTokPtr) | |
| 1320 { | |
| 1321 int level = 0; | |
| 1322 if (MINBPC(enc) > 1) { | |
| 1323 size_t n = end - ptr; | |
| 1324 if (n & (MINBPC(enc) - 1)) { | |
| 1325 n &= ~(MINBPC(enc) - 1); | |
| 1326 end = ptr + n; | |
| 1327 } | |
| 1328 } | |
| 1329 while (ptr != end) { | |
| 1330 switch (BYTE_TYPE(enc, ptr)) { | |
| 1331 INVALID_CASES(ptr, nextTokPtr) | |
| 1332 case BT_LT: | |
| 1333 if ((ptr += MINBPC(enc)) == end) | |
| 1334 return XML_TOK_PARTIAL; | |
| 1335 if (CHAR_MATCHES(enc, ptr, ASCII_EXCL)) { | |
| 1336 if ((ptr += MINBPC(enc)) == end) | |
| 1337 return XML_TOK_PARTIAL; | |
| 1338 if (CHAR_MATCHES(enc, ptr, ASCII_LSQB)) { | |
| 1339 ++level; | |
| 1340 ptr += MINBPC(enc); | |
| 1341 } | |
| 1342 } | |
| 1343 break; | |
| 1344 case BT_RSQB: | |
| 1345 if ((ptr += MINBPC(enc)) == end) | |
| 1346 return XML_TOK_PARTIAL; | |
| 1347 if (CHAR_MATCHES(enc, ptr, ASCII_RSQB)) { | |
| 1348 if ((ptr += MINBPC(enc)) == end) | |
| 1349 return XML_TOK_PARTIAL; | |
| 1350 if (CHAR_MATCHES(enc, ptr, ASCII_GT)) { | |
| 1351 ptr += MINBPC(enc); | |
| 1352 if (level == 0) { | |
| 1353 *nextTokPtr = ptr; | |
| 1354 return XML_TOK_IGNORE_SECT; | |
| 1355 } | |
| 1356 --level; | |
| 1357 } | |
| 1358 } | |
| 1359 break; | |
| 1360 default: | |
| 1361 ptr += MINBPC(enc); | |
| 1362 break; | |
| 1363 } | |
| 1364 } | |
| 1365 return XML_TOK_PARTIAL; | |
| 1366 } | |
| 1367 | |
| 1368 #endif /* XML_DTD */ | |
| 1369 | |
| 1370 static int PTRCALL | |
| 1371 PREFIX(isPublicId)(const ENCODING *enc, const char *ptr, const char *end, | |
| 1372 const char **badPtr) | |
| 1373 { | |
| 1374 ptr += MINBPC(enc); | |
| 1375 end -= MINBPC(enc); | |
| 1376 for (; ptr != end; ptr += MINBPC(enc)) { | |
| 1377 switch (BYTE_TYPE(enc, ptr)) { | |
| 1378 case BT_DIGIT: | |
| 1379 case BT_HEX: | |
| 1380 case BT_MINUS: | |
| 1381 case BT_APOS: | |
| 1382 case BT_LPAR: | |
| 1383 case BT_RPAR: | |
| 1384 case BT_PLUS: | |
| 1385 case BT_COMMA: | |
| 1386 case BT_SOL: | |
| 1387 case BT_EQUALS: | |
| 1388 case BT_QUEST: | |
| 1389 case BT_CR: | |
| 1390 case BT_LF: | |
| 1391 case BT_SEMI: | |
| 1392 case BT_EXCL: | |
| 1393 case BT_AST: | |
| 1394 case BT_PERCNT: | |
| 1395 case BT_NUM: | |
| 1396 #ifdef XML_NS | |
| 1397 case BT_COLON: | |
| 1398 #endif | |
| 1399 break; | |
| 1400 case BT_S: | |
| 1401 if (CHAR_MATCHES(enc, ptr, ASCII_TAB)) { | |
| 1402 *badPtr = ptr; | |
| 1403 return 0; | |
| 1404 } | |
| 1405 break; | |
| 1406 case BT_NAME: | |
| 1407 case BT_NMSTRT: | |
| 1408 if (!(BYTE_TO_ASCII(enc, ptr) & ~0x7f)) | |
| 1409 break; | |
| 1410 default: | |
| 1411 switch (BYTE_TO_ASCII(enc, ptr)) { | |
| 1412 case 0x24: /* $ */ | |
| 1413 case 0x40: /* @ */ | |
| 1414 break; | |
| 1415 default: | |
| 1416 *badPtr = ptr; | |
| 1417 return 0; | |
| 1418 } | |
| 1419 break; | |
| 1420 } | |
| 1421 } | |
| 1422 return 1; | |
| 1423 } | |
| 1424 | |
| 1425 /* This must only be called for a well-formed start-tag or empty | |
| 1426 element tag. Returns the number of attributes. Pointers to the | |
| 1427 first attsMax attributes are stored in atts. | |
| 1428 */ | |
| 1429 | |
| 1430 static int PTRCALL | |
| 1431 PREFIX(getAtts)(const ENCODING *enc, const char *ptr, | |
| 1432 int attsMax, ATTRIBUTE *atts) | |
| 1433 { | |
| 1434 enum { other, inName, inValue } state = inName; | |
| 1435 int nAtts = 0; | |
| 1436 int open = 0; /* defined when state == inValue; | |
| 1437 initialization just to shut up compilers */ | |
| 1438 | |
| 1439 for (ptr += MINBPC(enc);; ptr += MINBPC(enc)) { | |
| 1440 switch (BYTE_TYPE(enc, ptr)) { | |
| 1441 #define START_NAME \ | |
| 1442 if (state == other) { \ | |
| 1443 if (nAtts < attsMax) { \ | |
| 1444 atts[nAtts].name = ptr; \ | |
| 1445 atts[nAtts].normalized = 1; \ | |
| 1446 } \ | |
| 1447 state = inName; \ | |
| 1448 } | |
| 1449 #define LEAD_CASE(n) \ | |
| 1450 case BT_LEAD ## n: START_NAME ptr += (n - MINBPC(enc)); break; | |
| 1451 LEAD_CASE(2) LEAD_CASE(3) LEAD_CASE(4) | |
| 1452 #undef LEAD_CASE | |
| 1453 case BT_NONASCII: | |
| 1454 case BT_NMSTRT: | |
| 1455 case BT_HEX: | |
| 1456 START_NAME | |
| 1457 break; | |
| 1458 #undef START_NAME | |
| 1459 case BT_QUOT: | |
| 1460 if (state != inValue) { | |
| 1461 if (nAtts < attsMax) | |
| 1462 atts[nAtts].valuePtr = ptr + MINBPC(enc); | |
| 1463 state = inValue; | |
| 1464 open = BT_QUOT; | |
| 1465 } | |
| 1466 else if (open == BT_QUOT) { | |
| 1467 state = other; | |
| 1468 if (nAtts < attsMax) | |
| 1469 atts[nAtts].valueEnd = ptr; | |
| 1470 nAtts++; | |
| 1471 } | |
| 1472 break; | |
| 1473 case BT_APOS: | |
| 1474 if (state != inValue) { | |
| 1475 if (nAtts < attsMax) | |
| 1476 atts[nAtts].valuePtr = ptr + MINBPC(enc); | |
| 1477 state = inValue; | |
| 1478 open = BT_APOS; | |
| 1479 } | |
| 1480 else if (open == BT_APOS) { | |
| 1481 state = other; | |
| 1482 if (nAtts < attsMax) | |
| 1483 atts[nAtts].valueEnd = ptr; | |
| 1484 nAtts++; | |
| 1485 } | |
| 1486 break; | |
| 1487 case BT_AMP: | |
| 1488 if (nAtts < attsMax) | |
| 1489 atts[nAtts].normalized = 0; | |
| 1490 break; | |
| 1491 case BT_S: | |
| 1492 if (state == inName) | |
| 1493 state = other; | |
| 1494 else if (state == inValue | |
| 1495 && nAtts < attsMax | |
| 1496 && atts[nAtts].normalized | |
| 1497 && (ptr == atts[nAtts].valuePtr | |
| 1498 || BYTE_TO_ASCII(enc, ptr) != ASCII_SPACE | |
| 1499 || BYTE_TO_ASCII(enc, ptr + MINBPC(enc)) == ASCII_SPACE | |
| 1500 || BYTE_TYPE(enc, ptr + MINBPC(enc)) == open)) | |
| 1501 atts[nAtts].normalized = 0; | |
| 1502 break; | |
| 1503 case BT_CR: case BT_LF: | |
| 1504 /* This case ensures that the first attribute name is counted | |
| 1505 Apart from that we could just change state on the quote. */ | |
| 1506 if (state == inName) | |
| 1507 state = other; | |
| 1508 else if (state == inValue && nAtts < attsMax) | |
| 1509 atts[nAtts].normalized = 0; | |
| 1510 break; | |
| 1511 case BT_GT: | |
| 1512 case BT_SOL: | |
| 1513 if (state != inValue) | |
| 1514 return nAtts; | |
| 1515 break; | |
| 1516 default: | |
| 1517 break; | |
| 1518 } | |
| 1519 } | |
| 1520 /* not reached */ | |
| 1521 } | |
| 1522 | |
| 1523 static int PTRFASTCALL | |
| 1524 PREFIX(charRefNumber)(const ENCODING *enc, const char *ptr) | |
| 1525 { | |
| 1526 int result = 0; | |
| 1527 /* skip &# */ | |
| 1528 ptr += 2*MINBPC(enc); | |
| 1529 if (CHAR_MATCHES(enc, ptr, ASCII_x)) { | |
| 1530 for (ptr += MINBPC(enc); | |
| 1531 !CHAR_MATCHES(enc, ptr, ASCII_SEMI); | |
| 1532 ptr += MINBPC(enc)) { | |
| 1533 int c = BYTE_TO_ASCII(enc, ptr); | |
| 1534 switch (c) { | |
| 1535 case ASCII_0: case ASCII_1: case ASCII_2: case ASCII_3: case ASCII_4: | |
| 1536 case ASCII_5: case ASCII_6: case ASCII_7: case ASCII_8: case ASCII_9: | |
| 1537 result <<= 4; | |
| 1538 result |= (c - ASCII_0); | |
| 1539 break; | |
| 1540 case ASCII_A: case ASCII_B: case ASCII_C: | |
| 1541 case ASCII_D: case ASCII_E: case ASCII_F: | |
| 1542 result <<= 4; | |
| 1543 result += 10 + (c - ASCII_A); | |
| 1544 break; | |
| 1545 case ASCII_a: case ASCII_b: case ASCII_c: | |
| 1546 case ASCII_d: case ASCII_e: case ASCII_f: | |
| 1547 result <<= 4; | |
| 1548 result += 10 + (c - ASCII_a); | |
| 1549 break; | |
| 1550 } | |
| 1551 if (result >= 0x110000) | |
| 1552 return -1; | |
| 1553 } | |
| 1554 } | |
| 1555 else { | |
| 1556 for (; !CHAR_MATCHES(enc, ptr, ASCII_SEMI); ptr += MINBPC(enc)) { | |
| 1557 int c = BYTE_TO_ASCII(enc, ptr); | |
| 1558 result *= 10; | |
| 1559 result += (c - ASCII_0); | |
| 1560 if (result >= 0x110000) | |
| 1561 return -1; | |
| 1562 } | |
| 1563 } | |
| 1564 return checkCharRefNumber(result); | |
| 1565 } | |
| 1566 | |
| 1567 static int PTRCALL | |
| 1568 PREFIX(predefinedEntityName)(const ENCODING *enc, const char *ptr, | |
| 1569 const char *end) | |
| 1570 { | |
| 1571 switch ((end - ptr)/MINBPC(enc)) { | |
| 1572 case 2: | |
| 1573 if (CHAR_MATCHES(enc, ptr + MINBPC(enc), ASCII_t)) { | |
| 1574 switch (BYTE_TO_ASCII(enc, ptr)) { | |
| 1575 case ASCII_l: | |
| 1576 return ASCII_LT; | |
| 1577 case ASCII_g: | |
| 1578 return ASCII_GT; | |
| 1579 } | |
| 1580 } | |
| 1581 break; | |
| 1582 case 3: | |
| 1583 if (CHAR_MATCHES(enc, ptr, ASCII_a)) { | |
| 1584 ptr += MINBPC(enc); | |
| 1585 if (CHAR_MATCHES(enc, ptr, ASCII_m)) { | |
| 1586 ptr += MINBPC(enc); | |
| 1587 if (CHAR_MATCHES(enc, ptr, ASCII_p)) | |
| 1588 return ASCII_AMP; | |
| 1589 } | |
| 1590 } | |
| 1591 break; | |
| 1592 case 4: | |
| 1593 switch (BYTE_TO_ASCII(enc, ptr)) { | |
| 1594 case ASCII_q: | |
| 1595 ptr += MINBPC(enc); | |
| 1596 if (CHAR_MATCHES(enc, ptr, ASCII_u)) { | |
| 1597 ptr += MINBPC(enc); | |
| 1598 if (CHAR_MATCHES(enc, ptr, ASCII_o)) { | |
| 1599 ptr += MINBPC(enc); | |
| 1600 if (CHAR_MATCHES(enc, ptr, ASCII_t)) | |
| 1601 return ASCII_QUOT; | |
| 1602 } | |
| 1603 } | |
| 1604 break; | |
| 1605 case ASCII_a: | |
| 1606 ptr += MINBPC(enc); | |
| 1607 if (CHAR_MATCHES(enc, ptr, ASCII_p)) { | |
| 1608 ptr += MINBPC(enc); | |
| 1609 if (CHAR_MATCHES(enc, ptr, ASCII_o)) { | |
| 1610 ptr += MINBPC(enc); | |
| 1611 if (CHAR_MATCHES(enc, ptr, ASCII_s)) | |
| 1612 return ASCII_APOS; | |
| 1613 } | |
| 1614 } | |
| 1615 break; | |
| 1616 } | |
| 1617 } | |
| 1618 return 0; | |
| 1619 } | |
| 1620 | |
| 1621 static int PTRCALL | |
| 1622 PREFIX(sameName)(const ENCODING *enc, const char *ptr1, const char *ptr2) | |
| 1623 { | |
| 1624 for (;;) { | |
| 1625 switch (BYTE_TYPE(enc, ptr1)) { | |
| 1626 #define LEAD_CASE(n) \ | |
| 1627 case BT_LEAD ## n: \ | |
| 1628 if (*ptr1++ != *ptr2++) \ | |
| 1629 return 0; | |
| 1630 LEAD_CASE(4) LEAD_CASE(3) LEAD_CASE(2) | |
| 1631 #undef LEAD_CASE | |
| 1632 /* fall through */ | |
| 1633 if (*ptr1++ != *ptr2++) | |
| 1634 return 0; | |
| 1635 break; | |
| 1636 case BT_NONASCII: | |
| 1637 case BT_NMSTRT: | |
| 1638 #ifdef XML_NS | |
| 1639 case BT_COLON: | |
| 1640 #endif | |
| 1641 case BT_HEX: | |
| 1642 case BT_DIGIT: | |
| 1643 case BT_NAME: | |
| 1644 case BT_MINUS: | |
| 1645 if (*ptr2++ != *ptr1++) | |
| 1646 return 0; | |
| 1647 if (MINBPC(enc) > 1) { | |
| 1648 if (*ptr2++ != *ptr1++) | |
| 1649 return 0; | |
| 1650 if (MINBPC(enc) > 2) { | |
| 1651 if (*ptr2++ != *ptr1++) | |
| 1652 return 0; | |
| 1653 if (MINBPC(enc) > 3) { | |
| 1654 if (*ptr2++ != *ptr1++) | |
| 1655 return 0; | |
| 1656 } | |
| 1657 } | |
| 1658 } | |
| 1659 break; | |
| 1660 default: | |
| 1661 if (MINBPC(enc) == 1 && *ptr1 == *ptr2) | |
| 1662 return 1; | |
| 1663 switch (BYTE_TYPE(enc, ptr2)) { | |
| 1664 case BT_LEAD2: | |
| 1665 case BT_LEAD3: | |
| 1666 case BT_LEAD4: | |
| 1667 case BT_NONASCII: | |
| 1668 case BT_NMSTRT: | |
| 1669 #ifdef XML_NS | |
| 1670 case BT_COLON: | |
| 1671 #endif | |
| 1672 case BT_HEX: | |
| 1673 case BT_DIGIT: | |
| 1674 case BT_NAME: | |
| 1675 case BT_MINUS: | |
| 1676 return 0; | |
| 1677 default: | |
| 1678 return 1; | |
| 1679 } | |
| 1680 } | |
| 1681 } | |
| 1682 /* not reached */ | |
| 1683 } | |
| 1684 | |
| 1685 static int PTRCALL | |
| 1686 PREFIX(nameMatchesAscii)(const ENCODING *enc, const char *ptr1, | |
| 1687 const char *end1, const char *ptr2) | |
| 1688 { | |
| 1689 for (; *ptr2; ptr1 += MINBPC(enc), ptr2++) { | |
| 1690 if (ptr1 == end1) | |
| 1691 return 0; | |
| 1692 if (!CHAR_MATCHES(enc, ptr1, *ptr2)) | |
| 1693 return 0; | |
| 1694 } | |
| 1695 return ptr1 == end1; | |
| 1696 } | |
| 1697 | |
| 1698 static int PTRFASTCALL | |
| 1699 PREFIX(nameLength)(const ENCODING *enc, const char *ptr) | |
| 1700 { | |
| 1701 const char *start = ptr; | |
| 1702 for (;;) { | |
| 1703 switch (BYTE_TYPE(enc, ptr)) { | |
| 1704 #define LEAD_CASE(n) \ | |
| 1705 case BT_LEAD ## n: ptr += n; break; | |
| 1706 LEAD_CASE(2) LEAD_CASE(3) LEAD_CASE(4) | |
| 1707 #undef LEAD_CASE | |
| 1708 case BT_NONASCII: | |
| 1709 case BT_NMSTRT: | |
| 1710 #ifdef XML_NS | |
| 1711 case BT_COLON: | |
| 1712 #endif | |
| 1713 case BT_HEX: | |
| 1714 case BT_DIGIT: | |
| 1715 case BT_NAME: | |
| 1716 case BT_MINUS: | |
| 1717 ptr += MINBPC(enc); | |
| 1718 break; | |
| 1719 default: | |
| 1720 return (int)(ptr - start); | |
| 1721 } | |
| 1722 } | |
| 1723 } | |
| 1724 | |
| 1725 static const char * PTRFASTCALL | |
| 1726 PREFIX(skipS)(const ENCODING *enc, const char *ptr) | |
| 1727 { | |
| 1728 for (;;) { | |
| 1729 switch (BYTE_TYPE(enc, ptr)) { | |
| 1730 case BT_LF: | |
| 1731 case BT_CR: | |
| 1732 case BT_S: | |
| 1733 ptr += MINBPC(enc); | |
| 1734 break; | |
| 1735 default: | |
| 1736 return ptr; | |
| 1737 } | |
| 1738 } | |
| 1739 } | |
| 1740 | |
| 1741 static void PTRCALL | |
| 1742 PREFIX(updatePosition)(const ENCODING *enc, | |
| 1743 const char *ptr, | |
| 1744 const char *end, | |
| 1745 POSITION *pos) | |
| 1746 { | |
| 1747 while (ptr < end) { | |
| 1748 switch (BYTE_TYPE(enc, ptr)) { | |
| 1749 #define LEAD_CASE(n) \ | |
| 1750 case BT_LEAD ## n: \ | |
| 1751 ptr += n; \ | |
| 1752 break; | |
| 1753 LEAD_CASE(2) LEAD_CASE(3) LEAD_CASE(4) | |
| 1754 #undef LEAD_CASE | |
| 1755 case BT_LF: | |
| 1756 pos->columnNumber = (XML_Size)-1; | |
| 1757 pos->lineNumber++; | |
| 1758 ptr += MINBPC(enc); | |
| 1759 break; | |
| 1760 case BT_CR: | |
| 1761 pos->lineNumber++; | |
| 1762 ptr += MINBPC(enc); | |
| 1763 if (ptr != end && BYTE_TYPE(enc, ptr) == BT_LF) | |
| 1764 ptr += MINBPC(enc); | |
| 1765 pos->columnNumber = (XML_Size)-1; | |
| 1766 break; | |
| 1767 default: | |
| 1768 ptr += MINBPC(enc); | |
| 1769 break; | |
| 1770 } | |
| 1771 pos->columnNumber++; | |
| 1772 } | |
| 1773 } | |
| 1774 | |
| 1775 #undef DO_LEAD_CASE | |
| 1776 #undef MULTIBYTE_CASES | |
| 1777 #undef INVALID_CASES | |
| 1778 #undef CHECK_NAME_CASE | |
| 1779 #undef CHECK_NAME_CASES | |
| 1780 #undef CHECK_NMSTRT_CASE | |
| 1781 #undef CHECK_NMSTRT_CASES | |
| 1782 | |
| 1783 #endif /* XML_TOK_IMPL_C */ | |
| OLD | NEW |