+++ /dev/null
-/* Copyright (c) 1998, 1999 Thai Open Source Software Center Ltd\r
- See the file COPYING for copying permission.\r
-*/\r
-\r
-#include <stddef.h>\r
-\r
-#ifdef COMPILED_FROM_DSP\r
-#include "winconfig.h"\r
-#elif defined(MACOS_CLASSIC)\r
-#include "macconfig.h"\r
-#elif defined(__amigaos__)\r
-#include "amigaconfig.h"\r
-#elif defined(__WATCOMC__)\r
-#include "watcomconfig.h"\r
-#else\r
-#ifdef HAVE_EXPAT_CONFIG_H\r
-#include <expat_config.h>\r
-#endif\r
-#endif /* ndef COMPILED_FROM_DSP */\r
-\r
-#include "expat_external.h"\r
-#include "internal.h"\r
-#include "xmlrole.h"\r
-#include "ascii.h"\r
-\r
-/* Doesn't check:\r
-\r
- that ,| are not mixed in a model group\r
- content of literals\r
-\r
-*/\r
-\r
-static const char KW_ANY[] = {\r
- ASCII_A, ASCII_N, ASCII_Y, '\0' };\r
-static const char KW_ATTLIST[] = {\r
- ASCII_A, ASCII_T, ASCII_T, ASCII_L, ASCII_I, ASCII_S, ASCII_T, '\0' };\r
-static const char KW_CDATA[] = {\r
- ASCII_C, ASCII_D, ASCII_A, ASCII_T, ASCII_A, '\0' };\r
-static const char KW_DOCTYPE[] = {\r
- ASCII_D, ASCII_O, ASCII_C, ASCII_T, ASCII_Y, ASCII_P, ASCII_E, '\0' };\r
-static const char KW_ELEMENT[] = {\r
- ASCII_E, ASCII_L, ASCII_E, ASCII_M, ASCII_E, ASCII_N, ASCII_T, '\0' };\r
-static const char KW_EMPTY[] = {\r
- ASCII_E, ASCII_M, ASCII_P, ASCII_T, ASCII_Y, '\0' };\r
-static const char KW_ENTITIES[] = {\r
- ASCII_E, ASCII_N, ASCII_T, ASCII_I, ASCII_T, ASCII_I, ASCII_E, ASCII_S,\r
- '\0' };\r
-static const char KW_ENTITY[] = {\r
- ASCII_E, ASCII_N, ASCII_T, ASCII_I, ASCII_T, ASCII_Y, '\0' };\r
-static const char KW_FIXED[] = {\r
- ASCII_F, ASCII_I, ASCII_X, ASCII_E, ASCII_D, '\0' };\r
-static const char KW_ID[] = {\r
- ASCII_I, ASCII_D, '\0' };\r
-static const char KW_IDREF[] = {\r
- ASCII_I, ASCII_D, ASCII_R, ASCII_E, ASCII_F, '\0' };\r
-static const char KW_IDREFS[] = {\r
- ASCII_I, ASCII_D, ASCII_R, ASCII_E, ASCII_F, ASCII_S, '\0' };\r
-#ifdef XML_DTD\r
-static const char KW_IGNORE[] = {\r
- ASCII_I, ASCII_G, ASCII_N, ASCII_O, ASCII_R, ASCII_E, '\0' };\r
-#endif\r
-static const char KW_IMPLIED[] = {\r
- ASCII_I, ASCII_M, ASCII_P, ASCII_L, ASCII_I, ASCII_E, ASCII_D, '\0' };\r
-#ifdef XML_DTD\r
-static const char KW_INCLUDE[] = {\r
- ASCII_I, ASCII_N, ASCII_C, ASCII_L, ASCII_U, ASCII_D, ASCII_E, '\0' };\r
-#endif\r
-static const char KW_NDATA[] = {\r
- ASCII_N, ASCII_D, ASCII_A, ASCII_T, ASCII_A, '\0' };\r
-static const char KW_NMTOKEN[] = {\r
- ASCII_N, ASCII_M, ASCII_T, ASCII_O, ASCII_K, ASCII_E, ASCII_N, '\0' };\r
-static const char KW_NMTOKENS[] = {\r
- ASCII_N, ASCII_M, ASCII_T, ASCII_O, ASCII_K, ASCII_E, ASCII_N, ASCII_S,\r
- '\0' };\r
-static const char KW_NOTATION[] =\r
- { ASCII_N, ASCII_O, ASCII_T, ASCII_A, ASCII_T, ASCII_I, ASCII_O, ASCII_N,\r
- '\0' };\r
-static const char KW_PCDATA[] = {\r
- ASCII_P, ASCII_C, ASCII_D, ASCII_A, ASCII_T, ASCII_A, '\0' };\r
-static const char KW_PUBLIC[] = {\r
- ASCII_P, ASCII_U, ASCII_B, ASCII_L, ASCII_I, ASCII_C, '\0' };\r
-static const char KW_REQUIRED[] = {\r
- ASCII_R, ASCII_E, ASCII_Q, ASCII_U, ASCII_I, ASCII_R, ASCII_E, ASCII_D,\r
- '\0' };\r
-static const char KW_SYSTEM[] = {\r
- ASCII_S, ASCII_Y, ASCII_S, ASCII_T, ASCII_E, ASCII_M, '\0' };\r
-\r
-#ifndef MIN_BYTES_PER_CHAR\r
-#define MIN_BYTES_PER_CHAR(enc) ((enc)->minBytesPerChar)\r
-#endif\r
-\r
-#ifdef XML_DTD\r
-#define setTopLevel(state) \\r
- ((state)->handler = ((state)->documentEntity \\r
- ? internalSubset \\r
- : externalSubset1))\r
-#else /* not XML_DTD */\r
-#define setTopLevel(state) ((state)->handler = internalSubset)\r
-#endif /* not XML_DTD */\r
-\r
-typedef int PTRCALL PROLOG_HANDLER(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc);\r
-\r
-static PROLOG_HANDLER\r
- prolog0, prolog1, prolog2,\r
- doctype0, doctype1, doctype2, doctype3, doctype4, doctype5,\r
- internalSubset,\r
- entity0, entity1, entity2, entity3, entity4, entity5, entity6,\r
- entity7, entity8, entity9, entity10,\r
- notation0, notation1, notation2, notation3, notation4,\r
- attlist0, attlist1, attlist2, attlist3, attlist4, attlist5, attlist6,\r
- attlist7, attlist8, attlist9,\r
- element0, element1, element2, element3, element4, element5, element6,\r
- element7,\r
-#ifdef XML_DTD\r
- externalSubset0, externalSubset1,\r
- condSect0, condSect1, condSect2,\r
-#endif /* XML_DTD */\r
- declClose,\r
- error;\r
-\r
-static int FASTCALL common(PROLOG_STATE *state, int tok);\r
-\r
-static int PTRCALL\r
-prolog0(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- state->handler = prolog1;\r
- return XML_ROLE_NONE;\r
- case XML_TOK_XML_DECL:\r
- state->handler = prolog1;\r
- return XML_ROLE_XML_DECL;\r
- case XML_TOK_PI:\r
- state->handler = prolog1;\r
- return XML_ROLE_PI;\r
- case XML_TOK_COMMENT:\r
- state->handler = prolog1;\r
- return XML_ROLE_COMMENT;\r
- case XML_TOK_BOM:\r
- return XML_ROLE_NONE;\r
- case XML_TOK_DECL_OPEN:\r
- if (!XmlNameMatchesAscii(enc,\r
- ptr + 2 * MIN_BYTES_PER_CHAR(enc),\r
- end,\r
- KW_DOCTYPE))\r
- break;\r
- state->handler = doctype0;\r
- return XML_ROLE_DOCTYPE_NONE;\r
- case XML_TOK_INSTANCE_START:\r
- state->handler = error;\r
- return XML_ROLE_INSTANCE_START;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-prolog1(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_NONE;\r
- case XML_TOK_PI:\r
- return XML_ROLE_PI;\r
- case XML_TOK_COMMENT:\r
- return XML_ROLE_COMMENT;\r
- case XML_TOK_BOM:\r
- return XML_ROLE_NONE;\r
- case XML_TOK_DECL_OPEN:\r
- if (!XmlNameMatchesAscii(enc,\r
- ptr + 2 * MIN_BYTES_PER_CHAR(enc),\r
- end,\r
- KW_DOCTYPE))\r
- break;\r
- state->handler = doctype0;\r
- return XML_ROLE_DOCTYPE_NONE;\r
- case XML_TOK_INSTANCE_START:\r
- state->handler = error;\r
- return XML_ROLE_INSTANCE_START;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-prolog2(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_NONE;\r
- case XML_TOK_PI:\r
- return XML_ROLE_PI;\r
- case XML_TOK_COMMENT:\r
- return XML_ROLE_COMMENT;\r
- case XML_TOK_INSTANCE_START:\r
- state->handler = error;\r
- return XML_ROLE_INSTANCE_START;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-doctype0(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_DOCTYPE_NONE;\r
- case XML_TOK_NAME:\r
- case XML_TOK_PREFIXED_NAME:\r
- state->handler = doctype1;\r
- return XML_ROLE_DOCTYPE_NAME;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-doctype1(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_DOCTYPE_NONE;\r
- case XML_TOK_OPEN_BRACKET:\r
- state->handler = internalSubset;\r
- return XML_ROLE_DOCTYPE_INTERNAL_SUBSET;\r
- case XML_TOK_DECL_CLOSE:\r
- state->handler = prolog2;\r
- return XML_ROLE_DOCTYPE_CLOSE;\r
- case XML_TOK_NAME:\r
- if (XmlNameMatchesAscii(enc, ptr, end, KW_SYSTEM)) {\r
- state->handler = doctype3;\r
- return XML_ROLE_DOCTYPE_NONE;\r
- }\r
- if (XmlNameMatchesAscii(enc, ptr, end, KW_PUBLIC)) {\r
- state->handler = doctype2;\r
- return XML_ROLE_DOCTYPE_NONE;\r
- }\r
- break;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-doctype2(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_DOCTYPE_NONE;\r
- case XML_TOK_LITERAL:\r
- state->handler = doctype3;\r
- return XML_ROLE_DOCTYPE_PUBLIC_ID;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-doctype3(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_DOCTYPE_NONE;\r
- case XML_TOK_LITERAL:\r
- state->handler = doctype4;\r
- return XML_ROLE_DOCTYPE_SYSTEM_ID;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-doctype4(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_DOCTYPE_NONE;\r
- case XML_TOK_OPEN_BRACKET:\r
- state->handler = internalSubset;\r
- return XML_ROLE_DOCTYPE_INTERNAL_SUBSET;\r
- case XML_TOK_DECL_CLOSE:\r
- state->handler = prolog2;\r
- return XML_ROLE_DOCTYPE_CLOSE;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-doctype5(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_DOCTYPE_NONE;\r
- case XML_TOK_DECL_CLOSE:\r
- state->handler = prolog2;\r
- return XML_ROLE_DOCTYPE_CLOSE;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-internalSubset(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_NONE;\r
- case XML_TOK_DECL_OPEN:\r
- if (XmlNameMatchesAscii(enc,\r
- ptr + 2 * MIN_BYTES_PER_CHAR(enc),\r
- end,\r
- KW_ENTITY)) {\r
- state->handler = entity0;\r
- return XML_ROLE_ENTITY_NONE;\r
- }\r
- if (XmlNameMatchesAscii(enc,\r
- ptr + 2 * MIN_BYTES_PER_CHAR(enc),\r
- end,\r
- KW_ATTLIST)) {\r
- state->handler = attlist0;\r
- return XML_ROLE_ATTLIST_NONE;\r
- }\r
- if (XmlNameMatchesAscii(enc,\r
- ptr + 2 * MIN_BYTES_PER_CHAR(enc),\r
- end,\r
- KW_ELEMENT)) {\r
- state->handler = element0;\r
- return XML_ROLE_ELEMENT_NONE;\r
- }\r
- if (XmlNameMatchesAscii(enc,\r
- ptr + 2 * MIN_BYTES_PER_CHAR(enc),\r
- end,\r
- KW_NOTATION)) {\r
- state->handler = notation0;\r
- return XML_ROLE_NOTATION_NONE;\r
- }\r
- break;\r
- case XML_TOK_PI:\r
- return XML_ROLE_PI;\r
- case XML_TOK_COMMENT:\r
- return XML_ROLE_COMMENT;\r
- case XML_TOK_PARAM_ENTITY_REF:\r
- return XML_ROLE_PARAM_ENTITY_REF;\r
- case XML_TOK_CLOSE_BRACKET:\r
- state->handler = doctype5;\r
- return XML_ROLE_DOCTYPE_NONE;\r
- case XML_TOK_NONE:\r
- return XML_ROLE_NONE;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-#ifdef XML_DTD\r
-\r
-static int PTRCALL\r
-externalSubset0(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- state->handler = externalSubset1;\r
- if (tok == XML_TOK_XML_DECL)\r
- return XML_ROLE_TEXT_DECL;\r
- return externalSubset1(state, tok, ptr, end, enc);\r
-}\r
-\r
-static int PTRCALL\r
-externalSubset1(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_COND_SECT_OPEN:\r
- state->handler = condSect0;\r
- return XML_ROLE_NONE;\r
- case XML_TOK_COND_SECT_CLOSE:\r
- if (state->includeLevel == 0)\r
- break;\r
- state->includeLevel -= 1;\r
- return XML_ROLE_NONE;\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_NONE;\r
- case XML_TOK_CLOSE_BRACKET:\r
- break;\r
- case XML_TOK_NONE:\r
- if (state->includeLevel)\r
- break;\r
- return XML_ROLE_NONE;\r
- default:\r
- return internalSubset(state, tok, ptr, end, enc);\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-#endif /* XML_DTD */\r
-\r
-static int PTRCALL\r
-entity0(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ENTITY_NONE;\r
- case XML_TOK_PERCENT:\r
- state->handler = entity1;\r
- return XML_ROLE_ENTITY_NONE;\r
- case XML_TOK_NAME:\r
- state->handler = entity2;\r
- return XML_ROLE_GENERAL_ENTITY_NAME;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-entity1(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ENTITY_NONE;\r
- case XML_TOK_NAME:\r
- state->handler = entity7;\r
- return XML_ROLE_PARAM_ENTITY_NAME;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-entity2(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ENTITY_NONE;\r
- case XML_TOK_NAME:\r
- if (XmlNameMatchesAscii(enc, ptr, end, KW_SYSTEM)) {\r
- state->handler = entity4;\r
- return XML_ROLE_ENTITY_NONE;\r
- }\r
- if (XmlNameMatchesAscii(enc, ptr, end, KW_PUBLIC)) {\r
- state->handler = entity3;\r
- return XML_ROLE_ENTITY_NONE;\r
- }\r
- break;\r
- case XML_TOK_LITERAL:\r
- state->handler = declClose;\r
- state->role_none = XML_ROLE_ENTITY_NONE;\r
- return XML_ROLE_ENTITY_VALUE;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-entity3(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ENTITY_NONE;\r
- case XML_TOK_LITERAL:\r
- state->handler = entity4;\r
- return XML_ROLE_ENTITY_PUBLIC_ID;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-entity4(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ENTITY_NONE;\r
- case XML_TOK_LITERAL:\r
- state->handler = entity5;\r
- return XML_ROLE_ENTITY_SYSTEM_ID;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-entity5(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ENTITY_NONE;\r
- case XML_TOK_DECL_CLOSE:\r
- setTopLevel(state);\r
- return XML_ROLE_ENTITY_COMPLETE;\r
- case XML_TOK_NAME:\r
- if (XmlNameMatchesAscii(enc, ptr, end, KW_NDATA)) {\r
- state->handler = entity6;\r
- return XML_ROLE_ENTITY_NONE;\r
- }\r
- break;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-entity6(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ENTITY_NONE;\r
- case XML_TOK_NAME:\r
- state->handler = declClose;\r
- state->role_none = XML_ROLE_ENTITY_NONE;\r
- return XML_ROLE_ENTITY_NOTATION_NAME;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-entity7(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ENTITY_NONE;\r
- case XML_TOK_NAME:\r
- if (XmlNameMatchesAscii(enc, ptr, end, KW_SYSTEM)) {\r
- state->handler = entity9;\r
- return XML_ROLE_ENTITY_NONE;\r
- }\r
- if (XmlNameMatchesAscii(enc, ptr, end, KW_PUBLIC)) {\r
- state->handler = entity8;\r
- return XML_ROLE_ENTITY_NONE;\r
- }\r
- break;\r
- case XML_TOK_LITERAL:\r
- state->handler = declClose;\r
- state->role_none = XML_ROLE_ENTITY_NONE;\r
- return XML_ROLE_ENTITY_VALUE;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-entity8(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ENTITY_NONE;\r
- case XML_TOK_LITERAL:\r
- state->handler = entity9;\r
- return XML_ROLE_ENTITY_PUBLIC_ID;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-entity9(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ENTITY_NONE;\r
- case XML_TOK_LITERAL:\r
- state->handler = entity10;\r
- return XML_ROLE_ENTITY_SYSTEM_ID;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-entity10(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ENTITY_NONE;\r
- case XML_TOK_DECL_CLOSE:\r
- setTopLevel(state);\r
- return XML_ROLE_ENTITY_COMPLETE;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-notation0(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_NOTATION_NONE;\r
- case XML_TOK_NAME:\r
- state->handler = notation1;\r
- return XML_ROLE_NOTATION_NAME;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-notation1(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_NOTATION_NONE;\r
- case XML_TOK_NAME:\r
- if (XmlNameMatchesAscii(enc, ptr, end, KW_SYSTEM)) {\r
- state->handler = notation3;\r
- return XML_ROLE_NOTATION_NONE;\r
- }\r
- if (XmlNameMatchesAscii(enc, ptr, end, KW_PUBLIC)) {\r
- state->handler = notation2;\r
- return XML_ROLE_NOTATION_NONE;\r
- }\r
- break;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-notation2(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_NOTATION_NONE;\r
- case XML_TOK_LITERAL:\r
- state->handler = notation4;\r
- return XML_ROLE_NOTATION_PUBLIC_ID;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-notation3(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_NOTATION_NONE;\r
- case XML_TOK_LITERAL:\r
- state->handler = declClose;\r
- state->role_none = XML_ROLE_NOTATION_NONE;\r
- return XML_ROLE_NOTATION_SYSTEM_ID;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-notation4(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_NOTATION_NONE;\r
- case XML_TOK_LITERAL:\r
- state->handler = declClose;\r
- state->role_none = XML_ROLE_NOTATION_NONE;\r
- return XML_ROLE_NOTATION_SYSTEM_ID;\r
- case XML_TOK_DECL_CLOSE:\r
- setTopLevel(state);\r
- return XML_ROLE_NOTATION_NO_SYSTEM_ID;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-attlist0(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ATTLIST_NONE;\r
- case XML_TOK_NAME:\r
- case XML_TOK_PREFIXED_NAME:\r
- state->handler = attlist1;\r
- return XML_ROLE_ATTLIST_ELEMENT_NAME;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-attlist1(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ATTLIST_NONE;\r
- case XML_TOK_DECL_CLOSE:\r
- setTopLevel(state);\r
- return XML_ROLE_ATTLIST_NONE;\r
- case XML_TOK_NAME:\r
- case XML_TOK_PREFIXED_NAME:\r
- state->handler = attlist2;\r
- return XML_ROLE_ATTRIBUTE_NAME;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-attlist2(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ATTLIST_NONE;\r
- case XML_TOK_NAME:\r
- {\r
- static const char * const types[] = {\r
- KW_CDATA,\r
- KW_ID,\r
- KW_IDREF,\r
- KW_IDREFS,\r
- KW_ENTITY,\r
- KW_ENTITIES,\r
- KW_NMTOKEN,\r
- KW_NMTOKENS,\r
- };\r
- int i;\r
- for (i = 0; i < (int)(sizeof(types)/sizeof(types[0])); i++)\r
- if (XmlNameMatchesAscii(enc, ptr, end, types[i])) {\r
- state->handler = attlist8;\r
- return XML_ROLE_ATTRIBUTE_TYPE_CDATA + i;\r
- }\r
- }\r
- if (XmlNameMatchesAscii(enc, ptr, end, KW_NOTATION)) {\r
- state->handler = attlist5;\r
- return XML_ROLE_ATTLIST_NONE;\r
- }\r
- break;\r
- case XML_TOK_OPEN_PAREN:\r
- state->handler = attlist3;\r
- return XML_ROLE_ATTLIST_NONE;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-attlist3(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ATTLIST_NONE;\r
- case XML_TOK_NMTOKEN:\r
- case XML_TOK_NAME:\r
- case XML_TOK_PREFIXED_NAME:\r
- state->handler = attlist4;\r
- return XML_ROLE_ATTRIBUTE_ENUM_VALUE;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-attlist4(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ATTLIST_NONE;\r
- case XML_TOK_CLOSE_PAREN:\r
- state->handler = attlist8;\r
- return XML_ROLE_ATTLIST_NONE;\r
- case XML_TOK_OR:\r
- state->handler = attlist3;\r
- return XML_ROLE_ATTLIST_NONE;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-attlist5(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ATTLIST_NONE;\r
- case XML_TOK_OPEN_PAREN:\r
- state->handler = attlist6;\r
- return XML_ROLE_ATTLIST_NONE;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-attlist6(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ATTLIST_NONE;\r
- case XML_TOK_NAME:\r
- state->handler = attlist7;\r
- return XML_ROLE_ATTRIBUTE_NOTATION_VALUE;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-attlist7(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ATTLIST_NONE;\r
- case XML_TOK_CLOSE_PAREN:\r
- state->handler = attlist8;\r
- return XML_ROLE_ATTLIST_NONE;\r
- case XML_TOK_OR:\r
- state->handler = attlist6;\r
- return XML_ROLE_ATTLIST_NONE;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-/* default value */\r
-static int PTRCALL\r
-attlist8(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ATTLIST_NONE;\r
- case XML_TOK_POUND_NAME:\r
- if (XmlNameMatchesAscii(enc,\r
- ptr + MIN_BYTES_PER_CHAR(enc),\r
- end,\r
- KW_IMPLIED)) {\r
- state->handler = attlist1;\r
- return XML_ROLE_IMPLIED_ATTRIBUTE_VALUE;\r
- }\r
- if (XmlNameMatchesAscii(enc,\r
- ptr + MIN_BYTES_PER_CHAR(enc),\r
- end,\r
- KW_REQUIRED)) {\r
- state->handler = attlist1;\r
- return XML_ROLE_REQUIRED_ATTRIBUTE_VALUE;\r
- }\r
- if (XmlNameMatchesAscii(enc,\r
- ptr + MIN_BYTES_PER_CHAR(enc),\r
- end,\r
- KW_FIXED)) {\r
- state->handler = attlist9;\r
- return XML_ROLE_ATTLIST_NONE;\r
- }\r
- break;\r
- case XML_TOK_LITERAL:\r
- state->handler = attlist1;\r
- return XML_ROLE_DEFAULT_ATTRIBUTE_VALUE;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-attlist9(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ATTLIST_NONE;\r
- case XML_TOK_LITERAL:\r
- state->handler = attlist1;\r
- return XML_ROLE_FIXED_ATTRIBUTE_VALUE;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-element0(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ELEMENT_NONE;\r
- case XML_TOK_NAME:\r
- case XML_TOK_PREFIXED_NAME:\r
- state->handler = element1;\r
- return XML_ROLE_ELEMENT_NAME;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-element1(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ELEMENT_NONE;\r
- case XML_TOK_NAME:\r
- if (XmlNameMatchesAscii(enc, ptr, end, KW_EMPTY)) {\r
- state->handler = declClose;\r
- state->role_none = XML_ROLE_ELEMENT_NONE;\r
- return XML_ROLE_CONTENT_EMPTY;\r
- }\r
- if (XmlNameMatchesAscii(enc, ptr, end, KW_ANY)) {\r
- state->handler = declClose;\r
- state->role_none = XML_ROLE_ELEMENT_NONE;\r
- return XML_ROLE_CONTENT_ANY;\r
- }\r
- break;\r
- case XML_TOK_OPEN_PAREN:\r
- state->handler = element2;\r
- state->level = 1;\r
- return XML_ROLE_GROUP_OPEN;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-element2(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ELEMENT_NONE;\r
- case XML_TOK_POUND_NAME:\r
- if (XmlNameMatchesAscii(enc,\r
- ptr + MIN_BYTES_PER_CHAR(enc),\r
- end,\r
- KW_PCDATA)) {\r
- state->handler = element3;\r
- return XML_ROLE_CONTENT_PCDATA;\r
- }\r
- break;\r
- case XML_TOK_OPEN_PAREN:\r
- state->level = 2;\r
- state->handler = element6;\r
- return XML_ROLE_GROUP_OPEN;\r
- case XML_TOK_NAME:\r
- case XML_TOK_PREFIXED_NAME:\r
- state->handler = element7;\r
- return XML_ROLE_CONTENT_ELEMENT;\r
- case XML_TOK_NAME_QUESTION:\r
- state->handler = element7;\r
- return XML_ROLE_CONTENT_ELEMENT_OPT;\r
- case XML_TOK_NAME_ASTERISK:\r
- state->handler = element7;\r
- return XML_ROLE_CONTENT_ELEMENT_REP;\r
- case XML_TOK_NAME_PLUS:\r
- state->handler = element7;\r
- return XML_ROLE_CONTENT_ELEMENT_PLUS;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-element3(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ELEMENT_NONE;\r
- case XML_TOK_CLOSE_PAREN:\r
- state->handler = declClose;\r
- state->role_none = XML_ROLE_ELEMENT_NONE;\r
- return XML_ROLE_GROUP_CLOSE;\r
- case XML_TOK_CLOSE_PAREN_ASTERISK:\r
- state->handler = declClose;\r
- state->role_none = XML_ROLE_ELEMENT_NONE;\r
- return XML_ROLE_GROUP_CLOSE_REP;\r
- case XML_TOK_OR:\r
- state->handler = element4;\r
- return XML_ROLE_ELEMENT_NONE;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-element4(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ELEMENT_NONE;\r
- case XML_TOK_NAME:\r
- case XML_TOK_PREFIXED_NAME:\r
- state->handler = element5;\r
- return XML_ROLE_CONTENT_ELEMENT;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-element5(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ELEMENT_NONE;\r
- case XML_TOK_CLOSE_PAREN_ASTERISK:\r
- state->handler = declClose;\r
- state->role_none = XML_ROLE_ELEMENT_NONE;\r
- return XML_ROLE_GROUP_CLOSE_REP;\r
- case XML_TOK_OR:\r
- state->handler = element4;\r
- return XML_ROLE_ELEMENT_NONE;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-element6(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ELEMENT_NONE;\r
- case XML_TOK_OPEN_PAREN:\r
- state->level += 1;\r
- return XML_ROLE_GROUP_OPEN;\r
- case XML_TOK_NAME:\r
- case XML_TOK_PREFIXED_NAME:\r
- state->handler = element7;\r
- return XML_ROLE_CONTENT_ELEMENT;\r
- case XML_TOK_NAME_QUESTION:\r
- state->handler = element7;\r
- return XML_ROLE_CONTENT_ELEMENT_OPT;\r
- case XML_TOK_NAME_ASTERISK:\r
- state->handler = element7;\r
- return XML_ROLE_CONTENT_ELEMENT_REP;\r
- case XML_TOK_NAME_PLUS:\r
- state->handler = element7;\r
- return XML_ROLE_CONTENT_ELEMENT_PLUS;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-element7(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_ELEMENT_NONE;\r
- case XML_TOK_CLOSE_PAREN:\r
- state->level -= 1;\r
- if (state->level == 0) {\r
- state->handler = declClose;\r
- state->role_none = XML_ROLE_ELEMENT_NONE;\r
- }\r
- return XML_ROLE_GROUP_CLOSE;\r
- case XML_TOK_CLOSE_PAREN_ASTERISK:\r
- state->level -= 1;\r
- if (state->level == 0) {\r
- state->handler = declClose;\r
- state->role_none = XML_ROLE_ELEMENT_NONE;\r
- }\r
- return XML_ROLE_GROUP_CLOSE_REP;\r
- case XML_TOK_CLOSE_PAREN_QUESTION:\r
- state->level -= 1;\r
- if (state->level == 0) {\r
- state->handler = declClose;\r
- state->role_none = XML_ROLE_ELEMENT_NONE;\r
- }\r
- return XML_ROLE_GROUP_CLOSE_OPT;\r
- case XML_TOK_CLOSE_PAREN_PLUS:\r
- state->level -= 1;\r
- if (state->level == 0) {\r
- state->handler = declClose;\r
- state->role_none = XML_ROLE_ELEMENT_NONE;\r
- }\r
- return XML_ROLE_GROUP_CLOSE_PLUS;\r
- case XML_TOK_COMMA:\r
- state->handler = element6;\r
- return XML_ROLE_GROUP_SEQUENCE;\r
- case XML_TOK_OR:\r
- state->handler = element6;\r
- return XML_ROLE_GROUP_CHOICE;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-#ifdef XML_DTD\r
-\r
-static int PTRCALL\r
-condSect0(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_NONE;\r
- case XML_TOK_NAME:\r
- if (XmlNameMatchesAscii(enc, ptr, end, KW_INCLUDE)) {\r
- state->handler = condSect1;\r
- return XML_ROLE_NONE;\r
- }\r
- if (XmlNameMatchesAscii(enc, ptr, end, KW_IGNORE)) {\r
- state->handler = condSect2;\r
- return XML_ROLE_NONE;\r
- }\r
- break;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-condSect1(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_NONE;\r
- case XML_TOK_OPEN_BRACKET:\r
- state->handler = externalSubset1;\r
- state->includeLevel += 1;\r
- return XML_ROLE_NONE;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-condSect2(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return XML_ROLE_NONE;\r
- case XML_TOK_OPEN_BRACKET:\r
- state->handler = externalSubset1;\r
- return XML_ROLE_IGNORE_SECT;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-#endif /* XML_DTD */\r
-\r
-static int PTRCALL\r
-declClose(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- switch (tok) {\r
- case XML_TOK_PROLOG_S:\r
- return state->role_none;\r
- case XML_TOK_DECL_CLOSE:\r
- setTopLevel(state);\r
- return state->role_none;\r
- }\r
- return common(state, tok);\r
-}\r
-\r
-static int PTRCALL\r
-error(PROLOG_STATE *state,\r
- int tok,\r
- const char *ptr,\r
- const char *end,\r
- const ENCODING *enc)\r
-{\r
- return XML_ROLE_NONE;\r
-}\r
-\r
-static int FASTCALL\r
-common(PROLOG_STATE *state, int tok)\r
-{\r
-#ifdef XML_DTD\r
- if (!state->documentEntity && tok == XML_TOK_PARAM_ENTITY_REF)\r
- return XML_ROLE_INNER_PARAM_ENTITY_REF;\r
-#endif\r
- state->handler = error;\r
- return XML_ROLE_ERROR;\r
-}\r
-\r
-void\r
-XmlPrologStateInit(PROLOG_STATE *state)\r
-{\r
- state->handler = prolog0;\r
-#ifdef XML_DTD\r
- state->documentEntity = 1;\r
- state->includeLevel = 0;\r
- state->inEntityValue = 0;\r
-#endif /* XML_DTD */\r
-}\r
-\r
-#ifdef XML_DTD\r
-\r
-void\r
-XmlPrologStateInitExternalEntity(PROLOG_STATE *state)\r
-{\r
- state->handler = externalSubset0;\r
- state->documentEntity = 0;\r
- state->includeLevel = 0;\r
-}\r
-\r
-#endif /* XML_DTD */\r