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