/*

The contents of this file are subject to the Mozilla Public License

Version 1.1 (the "License"); you may not use this file except in

compliance with the License. You may obtain a copy of the License at

http://www.mozilla.org/MPL/

Software distributed under the License is distributed on an "AS IS"

basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the

License for the specific language governing rights and limitations

under the License.

The Original Code is expat.

The Initial Developer of the Original Code is James Clark.

Portions created by James Clark are Copyright (C) 1998, 1999

James Clark. All Rights Reserved.

Contributor(s):

Alternatively, the contents of this file may be used under the terms

of the GNU General Public License (the "GPL"), in which case the

provisions of the GPL are applicable instead of those above.  If you

wish to allow use of your version of this file only under the terms of

the GPL and not to allow others to use your version of this file under

the MPL, indicate your decision by deleting the provisions above and

replace them with the notice and other provisions required by the

GPL. If you do not delete the provisions above, a recipient may use

your version of this file under either the MPL or the GPL.

*/

#include "xmldef.h"

#include "xmlrole.h"

/* Doesn't check:

 that ,| are not mixed in a model group

 content of literals

*/

#ifndef MIN_BYTES_PER_CHAR

#define MIN_BYTES_PER_CHAR(enc) ((enc)->minBytesPerChar)

#endif

typedef int PROLOG_HANDLER(struct prolog_state *state,

                           int tok,

                           const char *ptr,

                           const char *end,

                           const ENCODING *enc);

static PROLOG_HANDLER

prolog0, prolog1, prolog2,

doctype0, doctype1, doctype2, doctype3, doctype4, doctype5,

internalSubset,

entity0, entity1, entity2, entity3, entity4, entity5, entity6,

entity7, entity8, entity9,

notation0, notation1, notation2, notation3, notation4,

attlist0, attlist1, attlist2, attlist3, attlist4, attlist5, attlist6,

attlist7, attlist8, attlist9,

element0, element1, element2, element3, element4, element5, element6,

element7,

declClose,

error;

static

int syntaxError(PROLOG_STATE *);

static

int prolog0(PROLOG_STATE *state,

            int tok,

            const char *ptr,

            const char *end,

            const ENCODING *enc)

{

    switch (tok) {

    case XML_TOK_PROLOG_S:

        state->handler = prolog1;

        return XML_ROLE_NONE;

    case XML_TOK_XML_DECL:

        state->handler = prolog1;

        return XML_ROLE_XML_DECL;

    case XML_TOK_PI:

        state->handler = prolog1;

        return XML_ROLE_NONE;

    case XML_TOK_COMMENT:

        state->handler = prolog1;

    case XML_TOK_BOM:

        return XML_ROLE_NONE;

    case XML_TOK_DECL_OPEN:

        if (!XmlNameMatchesAscii(enc,

                                 ptr + 2 * MIN_BYTES_PER_CHAR(enc),

                                 "DOCTYPE"))

            break;

        state->handler = doctype0;

        return XML_ROLE_NONE;

    case XML_TOK_INSTANCE_START:

        state->handler = error;

        return XML_ROLE_INSTANCE_START;

    }

    return syntaxError(state);

}

static

int prolog1(PROLOG_STATE *state,

            int tok,

            const char *ptr,

            const char *end,

            const ENCODING *enc)

{

    switch (tok) {

    case XML_TOK_PROLOG_S:

        return XML_ROLE_NONE;

    case XML_TOK_PI:

    case XML_TOK_COMMENT:

    case XML_TOK_BOM:

        return XML_ROLE_NONE;

    case XML_TOK_DECL_OPEN:

        if (!XmlNameMatchesAscii(enc,

                                 ptr + 2 * MIN_BYTES_PER_CHAR(enc),

                                 "DOCTYPE"))

            break;

        state->handler = doctype0;

        return XML_ROLE_NONE;

    case XML_TOK_INSTANCE_START:

        state->handler = error;

        return XML_ROLE_INSTANCE_START;

    }

    return syntaxError(state);

}

static

int prolog2(PROLOG_STATE *state,

            int tok,

            const char *ptr,

            const char *end,

            const ENCODING *enc)

{

    switch (tok) {

    case XML_TOK_PROLOG_S:

        return XML_ROLE_NONE;

    case XML_TOK_PI:

    case XML_TOK_COMMENT:

        return XML_ROLE_NONE;

    case XML_TOK_INSTANCE_START:

        state->handler = error;

        return XML_ROLE_INSTANCE_START;

    }

    return syntaxError(state);

}

static

int doctype0(PROLOG_STATE *state,

             int tok,

             const char *ptr,

             const char *end,

             const ENCODING *enc)

{

    switch (tok) {

    case XML_TOK_PROLOG_S:

        return XML_ROLE_NONE;

    case XML_TOK_NAME:

    case XML_TOK_PREFIXED_NAME:

        state->handler = doctype1;

        return XML_ROLE_DOCTYPE_NAME;

    }

    return syntaxError(state);

}

static

int doctype1(PROLOG_STATE *state,

             int tok,

             const char *ptr,

             const char *end,

             const ENCODING *enc)

{

    switch (tok) {

    case XML_TOK_PROLOG_S:

        return XML_ROLE_NONE;

    case XML_TOK_OPEN_BRACKET:

        state->handler = internalSubset;

        return XML_ROLE_NONE;

    case XML_TOK_DECL_CLOSE:

        state->handler = prolog2;

        return XML_ROLE_DOCTYPE_CLOSE;

    case XML_TOK_NAME:

        if (XmlNameMatchesAscii(enc, ptr, "SYSTEM")) {

            state->handler = doctype3;

            return XML_ROLE_NONE;

        }

        if (XmlNameMatchesAscii(enc, ptr, "PUBLIC")) {

            state->handler = doctype2;

            return XML_ROLE_NONE;

        }

        break;

    }

    return syntaxError(state);

}

static

int doctype2(PROLOG_STATE *state,

             int tok,

             const char *ptr,

             const char *end,

             const ENCODING *enc)

{

    switch (tok) {

    case XML_TOK_PROLOG_S:

        return XML_ROLE_NONE;

    case XML_TOK_LITERAL:

        state->handler = doctype3;

        return XML_ROLE_DOCTYPE_PUBLIC_ID;

    }

    return syntaxError(state);

}

static

int doctype3(PROLOG_STATE *state,

             int tok,

             const char *ptr,

             const char *end,

             const ENCODING *enc)

{

    switch (tok) {

    case XML_TOK_PROLOG_S:

        return XML_ROLE_NONE;

    case XML_TOK_LITERAL:

        state->handler = doctype4;

        return XML_ROLE_DOCTYPE_SYSTEM_ID;

    }

    return syntaxError(state);

}

static

int doctype4(PROLOG_STATE *state,

             int tok,

             const char *ptr,

             const char *end,

             const ENCODING *enc)

{

    switch (tok) {

    case XML_TOK_PROLOG_S:

        return XML_ROLE_NONE;

    case XML_TOK_OPEN_BRACKET:

        state->handler = internalSubset;

        return XML_ROLE_NONE;

    case XML_TOK_DECL_CLOSE:

        state->handler = prolog2;

        return XML_ROLE_DOCTYPE_CLOSE;

    }

    return syntaxError(state);

}

static

int doctype5(PROLOG_STATE *state,

             int tok,

             const char *ptr,

             const char *end,

             const ENCODING *enc)

{

    switch (tok) {

    case XML_TOK_PROLOG_S:

        return XML_ROLE_NONE;

    case XML_TOK_DECL_CLOSE:

        state->handler = prolog2;

        return XML_ROLE_DOCTYPE_CLOSE;

    }

    return syntaxError(state);

}

static

int internalSubset(PROLOG_STATE *state,

                   int tok,

                   const char *ptr,

                   const char *end,

                   const ENCODING *enc)

{

    switch (tok) {

    case XML_TOK_PROLOG_S:

        return XML_ROLE_NONE;

    case XML_TOK_DECL_OPEN:

        if (XmlNameMatchesAscii(enc,

                                ptr + 2 * MIN_BYTES_PER_CHAR(enc),

                                "ENTITY")) {

            state->handler = entity0;

            return XML_ROLE_NONE;

        }

        if (XmlNameMatchesAscii(enc,

                                ptr + 2 * MIN_BYTES_PER_CHAR(enc),

                                "ATTLIST")) {

            state->handler = attlist0;

            return XML_ROLE_NONE;

        }

        if (XmlNameMatchesAscii(enc,

                                ptr + 2 * MIN_BYTES_PER_CHAR(enc),

                                "ELEMENT")) {

            state->handler = element0;

            return XML_ROLE_NONE;

        }

        if (XmlNameMatchesAscii(enc,

                                ptr + 2 * MIN_BYTES_PER_CHAR(enc),

                                "NOTATION")) {

            state->handler = notation0;

            return XML_ROLE_NONE;

        }

        break;

    case XML_TOK_PI:

    case XML_TOK_COMMENT:

        return XML_ROLE_NONE;

    case XML_TOK_PARAM_ENTITY_REF:

        return XML_ROLE_PARAM_ENTITY_REF;

    case XML_TOK_CLOSE_BRACKET:

        state->handler = doctype5;

        return XML_ROLE_NONE;

    }

    return syntaxError(state);

}

static

int entity0(PROLOG_STATE *state,

            int tok,

            const char *ptr,

            const char *end,

            const ENCODING *enc)

{

    switch (tok) {

    case XML_TOK_PROLOG_S:

        return XML_ROLE_NONE;

    case XML_TOK_PERCENT:

        state->handler = entity1;

        return XML_ROLE_NONE;

    case XML_TOK_NAME:

        state->handler = entity2;

        return XML_ROLE_GENERAL_ENTITY_NAME;

    }

    return syntaxError(state);

}

static

int entity1(PROLOG_STATE *state,

            int tok,

            const char *ptr,

            const char *end,

            const ENCODING *enc)

{

    switch (tok) {

    case XML_TOK_PROLOG_S:

        return XML_ROLE_NONE;

    case XML_TOK_NAME:

        state->handler = entity7;

        return XML_ROLE_PARAM_ENTITY_NAME;

    }

    return syntaxError(state);

}

static

int entity2(PROLOG_STATE *state,

            int tok,

            const char *ptr,

            const char *end,

            const ENCODING *enc)

{

    switch (tok) {

    case XML_TOK_PROLOG_S:

        return XML_ROLE_NONE;

    case XML_TOK_NAME:

        if (XmlNameMatchesAscii(enc, ptr, "SYSTEM")) {

            state->handler = entity4;

            return XML_ROLE_NONE;

        }

        if (XmlNameMatchesAscii(enc, ptr, "PUBLIC")) {

            state->handler = entity3;

            return XML_ROLE_NONE;

        }

        break;

    case XML_TOK_LITERAL:

        state->handler = declClose;

        return XML_ROLE_ENTITY_VALUE;

    }

    return syntaxError(state);

}

static

int entity3(PROLOG_STATE *state,

            int tok,

            const char *ptr,

            const char *end,

            const ENCODING *enc)

{

    switch (tok) {

    case XML_TOK_PROLOG_S:

        return XML_ROLE_NONE;

    case XML_TOK_LITERAL:

        state->handler = entity4;

        return XML_ROLE_ENTITY_PUBLIC_ID;

    }

    return syntaxError(state);

}

static

int entity4(PROLOG_STATE *state,

            int tok,

            const char *ptr,

            const char *end,

            const ENCODING *enc)

{

    switch (tok) {

    case XML_TOK_PROLOG_S:

        return XML_ROLE_NONE;

    case XML_TOK_LITERAL:

        state->handler = entity5;

        return XML_ROLE_ENTITY_SYSTEM_ID;

    }

    return syntaxError(state);

}

static

int entity5(PROLOG_STATE *state,

            int tok,

            const char *ptr,

            const char *end,

            const ENCODING *enc)

{

    switch (tok) {

    case XML_TOK_PROLOG_S:

        return XML_ROLE_NONE;

    case XML_TOK_DECL_CLOSE:

        state->handler = internalSubset;

        return XML_ROLE_NONE;

    case XML_TOK_NAME:

        if (XmlNameMatchesAscii(enc, ptr, "NDATA")) {