diff options
Diffstat (limited to 'external/libxml2_android/jni/libxml2/SAX2.c')
| -rw-r--r-- | external/libxml2_android/jni/libxml2/SAX2.c | 3046 |
1 files changed, 0 insertions, 3046 deletions
diff --git a/external/libxml2_android/jni/libxml2/SAX2.c b/external/libxml2_android/jni/libxml2/SAX2.c deleted file mode 100644 index 0f0ad2a4..00000000 --- a/external/libxml2_android/jni/libxml2/SAX2.c +++ /dev/null @@ -1,3046 +0,0 @@ -/* - * SAX2.c : Default SAX2 handler to build a tree. - * - * See Copyright for the status of this software. - * - * Daniel Veillard <daniel@veillard.com> - */ - - -#define IN_LIBXML -#include "libxml.h" -#include <stdlib.h> -#include <string.h> -#include <limits.h> -#include <libxml/xmlmemory.h> -#include <libxml/tree.h> -#include <libxml/parser.h> -#include <libxml/parserInternals.h> -#include <libxml/valid.h> -#include <libxml/entities.h> -#include <libxml/xmlerror.h> -#include <libxml/debugXML.h> -#include <libxml/xmlIO.h> -#include <libxml/SAX.h> -#include <libxml/uri.h> -#include <libxml/valid.h> -#include <libxml/HTMLtree.h> -#include <libxml/globals.h> - -/* Define SIZE_T_MAX unless defined through <limits.h>. */ -#ifndef SIZE_T_MAX -# define SIZE_T_MAX ((size_t)-1) -#endif /* !SIZE_T_MAX */ - -/* #define DEBUG_SAX2 */ -/* #define DEBUG_SAX2_TREE */ - -/** - * TODO: - * - * macro to flag unimplemented blocks - * XML_CATALOG_PREFER user env to select between system/public prefered - * option. C.f. Richard Tobin <richard@cogsci.ed.ac.uk> - *> Just FYI, I am using an environment variable XML_CATALOG_PREFER with - *> values "system" and "public". I have made the default be "system" to - *> match yours. - */ -#define TODO \ - xmlGenericError(xmlGenericErrorContext, \ - "Unimplemented block at %s:%d\n", \ - __FILE__, __LINE__); - -/* - * xmlSAX2ErrMemory: - * @ctxt: an XML validation parser context - * @msg: a string to accompany the error message - */ -static void LIBXML_ATTR_FORMAT(2,0) -xmlSAX2ErrMemory(xmlParserCtxtPtr ctxt, const char *msg) { - xmlStructuredErrorFunc schannel = NULL; - const char *str1 = "out of memory\n"; - - if (ctxt != NULL) { - ctxt->errNo = XML_ERR_NO_MEMORY; - if ((ctxt->sax != NULL) && (ctxt->sax->initialized == XML_SAX2_MAGIC)) - schannel = ctxt->sax->serror; - __xmlRaiseError(schannel, - ctxt->vctxt.error, ctxt->vctxt.userData, - ctxt, NULL, XML_FROM_PARSER, XML_ERR_NO_MEMORY, - XML_ERR_ERROR, NULL, 0, (const char *) str1, - NULL, NULL, 0, 0, - msg, (const char *) str1, NULL); - ctxt->errNo = XML_ERR_NO_MEMORY; - ctxt->instate = XML_PARSER_EOF; - ctxt->disableSAX = 1; - } else { - __xmlRaiseError(schannel, - NULL, NULL, - ctxt, NULL, XML_FROM_PARSER, XML_ERR_NO_MEMORY, - XML_ERR_ERROR, NULL, 0, (const char *) str1, - NULL, NULL, 0, 0, - msg, (const char *) str1, NULL); - } -} - -/** - * xmlValidError: - * @ctxt: an XML validation parser context - * @error: the error number - * @msg: the error message - * @str1: extra data - * @str2: extra data - * - * Handle a validation error - */ -static void LIBXML_ATTR_FORMAT(3,0) -xmlErrValid(xmlParserCtxtPtr ctxt, xmlParserErrors error, - const char *msg, const char *str1, const char *str2) -{ - xmlStructuredErrorFunc schannel = NULL; - - if ((ctxt != NULL) && (ctxt->disableSAX != 0) && - (ctxt->instate == XML_PARSER_EOF)) - return; - if (ctxt != NULL) { - ctxt->errNo = error; - if ((ctxt->sax != NULL) && (ctxt->sax->initialized == XML_SAX2_MAGIC)) - schannel = ctxt->sax->serror; - __xmlRaiseError(schannel, - ctxt->vctxt.error, ctxt->vctxt.userData, - ctxt, NULL, XML_FROM_DTD, error, - XML_ERR_ERROR, NULL, 0, (const char *) str1, - (const char *) str2, NULL, 0, 0, - msg, (const char *) str1, (const char *) str2); - ctxt->valid = 0; - } else { - __xmlRaiseError(schannel, - NULL, NULL, - ctxt, NULL, XML_FROM_DTD, error, - XML_ERR_ERROR, NULL, 0, (const char *) str1, - (const char *) str2, NULL, 0, 0, - msg, (const char *) str1, (const char *) str2); - } -} - -/** - * xmlFatalErrMsg: - * @ctxt: an XML parser context - * @error: the error number - * @msg: the error message - * @str1: an error string - * @str2: an error string - * - * Handle a fatal parser error, i.e. violating Well-Formedness constraints - */ -static void LIBXML_ATTR_FORMAT(3,0) -xmlFatalErrMsg(xmlParserCtxtPtr ctxt, xmlParserErrors error, - const char *msg, const xmlChar *str1, const xmlChar *str2) -{ - if ((ctxt != NULL) && (ctxt->disableSAX != 0) && - (ctxt->instate == XML_PARSER_EOF)) - return; - if (ctxt != NULL) - ctxt->errNo = error; - __xmlRaiseError(NULL, NULL, NULL, ctxt, NULL, XML_FROM_PARSER, error, - XML_ERR_FATAL, NULL, 0, - (const char *) str1, (const char *) str2, - NULL, 0, 0, msg, str1, str2); - if (ctxt != NULL) { - ctxt->wellFormed = 0; - ctxt->valid = 0; - if (ctxt->recovery == 0) - ctxt->disableSAX = 1; - } -} - -/** - * xmlWarnMsg: - * @ctxt: an XML parser context - * @error: the error number - * @msg: the error message - * @str1: an error string - * @str2: an error string - * - * Handle a parser warning - */ -static void LIBXML_ATTR_FORMAT(3,0) -xmlWarnMsg(xmlParserCtxtPtr ctxt, xmlParserErrors error, - const char *msg, const xmlChar *str1) -{ - if ((ctxt != NULL) && (ctxt->disableSAX != 0) && - (ctxt->instate == XML_PARSER_EOF)) - return; - if (ctxt != NULL) - ctxt->errNo = error; - __xmlRaiseError(NULL, NULL, NULL, ctxt, NULL, XML_FROM_PARSER, error, - XML_ERR_WARNING, NULL, 0, - (const char *) str1, NULL, - NULL, 0, 0, msg, str1); -} - -/** - * xmlNsErrMsg: - * @ctxt: an XML parser context - * @error: the error number - * @msg: the error message - * @str1: an error string - * @str2: an error string - * - * Handle a namespace error - */ -static void LIBXML_ATTR_FORMAT(3,0) -xmlNsErrMsg(xmlParserCtxtPtr ctxt, xmlParserErrors error, - const char *msg, const xmlChar *str1, const xmlChar *str2) -{ - if ((ctxt != NULL) && (ctxt->disableSAX != 0) && - (ctxt->instate == XML_PARSER_EOF)) - return; - if (ctxt != NULL) - ctxt->errNo = error; - __xmlRaiseError(NULL, NULL, NULL, ctxt, NULL, XML_FROM_NAMESPACE, error, - XML_ERR_ERROR, NULL, 0, - (const char *) str1, (const char *) str2, - NULL, 0, 0, msg, str1, str2); -} - -/** - * xmlNsWarnMsg: - * @ctxt: an XML parser context - * @error: the error number - * @msg: the error message - * @str1: an error string - * - * Handle a namespace warning - */ -static void LIBXML_ATTR_FORMAT(3,0) -xmlNsWarnMsg(xmlParserCtxtPtr ctxt, xmlParserErrors error, - const char *msg, const xmlChar *str1, const xmlChar *str2) -{ - if ((ctxt != NULL) && (ctxt->disableSAX != 0) && - (ctxt->instate == XML_PARSER_EOF)) - return; - if (ctxt != NULL) - ctxt->errNo = error; - __xmlRaiseError(NULL, NULL, NULL, ctxt, NULL, XML_FROM_NAMESPACE, error, - XML_ERR_WARNING, NULL, 0, - (const char *) str1, (const char *) str2, - NULL, 0, 0, msg, str1, str2); -} - -/** - * xmlSAX2GetPublicId: - * @ctx: the user data (XML parser context) - * - * Provides the public ID e.g. "-//SGMLSOURCE//DTD DEMO//EN" - * - * Returns a xmlChar * - */ -const xmlChar * -xmlSAX2GetPublicId(void *ctx ATTRIBUTE_UNUSED) -{ - /* xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; */ - return(NULL); -} - -/** - * xmlSAX2GetSystemId: - * @ctx: the user data (XML parser context) - * - * Provides the system ID, basically URL or filename e.g. - * http://www.sgmlsource.com/dtds/memo.dtd - * - * Returns a xmlChar * - */ -const xmlChar * -xmlSAX2GetSystemId(void *ctx) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - if ((ctx == NULL) || (ctxt->input == NULL)) return(NULL); - return((const xmlChar *) ctxt->input->filename); -} - -/** - * xmlSAX2GetLineNumber: - * @ctx: the user data (XML parser context) - * - * Provide the line number of the current parsing point. - * - * Returns an int - */ -int -xmlSAX2GetLineNumber(void *ctx) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - if ((ctx == NULL) || (ctxt->input == NULL)) return(0); - return(ctxt->input->line); -} - -/** - * xmlSAX2GetColumnNumber: - * @ctx: the user data (XML parser context) - * - * Provide the column number of the current parsing point. - * - * Returns an int - */ -int -xmlSAX2GetColumnNumber(void *ctx) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - if ((ctx == NULL) || (ctxt->input == NULL)) return(0); - return(ctxt->input->col); -} - -/** - * xmlSAX2IsStandalone: - * @ctx: the user data (XML parser context) - * - * Is this document tagged standalone ? - * - * Returns 1 if true - */ -int -xmlSAX2IsStandalone(void *ctx) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - if ((ctx == NULL) || (ctxt->myDoc == NULL)) return(0); - return(ctxt->myDoc->standalone == 1); -} - -/** - * xmlSAX2HasInternalSubset: - * @ctx: the user data (XML parser context) - * - * Does this document has an internal subset - * - * Returns 1 if true - */ -int -xmlSAX2HasInternalSubset(void *ctx) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - if ((ctxt == NULL) || (ctxt->myDoc == NULL)) return(0); - return(ctxt->myDoc->intSubset != NULL); -} - -/** - * xmlSAX2HasExternalSubset: - * @ctx: the user data (XML parser context) - * - * Does this document has an external subset - * - * Returns 1 if true - */ -int -xmlSAX2HasExternalSubset(void *ctx) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - if ((ctxt == NULL) || (ctxt->myDoc == NULL)) return(0); - return(ctxt->myDoc->extSubset != NULL); -} - -/** - * xmlSAX2InternalSubset: - * @ctx: the user data (XML parser context) - * @name: the root element name - * @ExternalID: the external ID - * @SystemID: the SYSTEM ID (e.g. filename or URL) - * - * Callback on internal subset declaration. - */ -void -xmlSAX2InternalSubset(void *ctx, const xmlChar *name, - const xmlChar *ExternalID, const xmlChar *SystemID) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - xmlDtdPtr dtd; - if (ctx == NULL) return; -#ifdef DEBUG_SAX - xmlGenericError(xmlGenericErrorContext, - "SAX.xmlSAX2InternalSubset(%s, %s, %s)\n", - name, ExternalID, SystemID); -#endif - - if (ctxt->myDoc == NULL) - return; - dtd = xmlGetIntSubset(ctxt->myDoc); - if (dtd != NULL) { - if (ctxt->html) - return; - xmlUnlinkNode((xmlNodePtr) dtd); - xmlFreeDtd(dtd); - ctxt->myDoc->intSubset = NULL; - } - ctxt->myDoc->intSubset = - xmlCreateIntSubset(ctxt->myDoc, name, ExternalID, SystemID); - if (ctxt->myDoc->intSubset == NULL) - xmlSAX2ErrMemory(ctxt, "xmlSAX2InternalSubset"); -} - -/** - * xmlSAX2ExternalSubset: - * @ctx: the user data (XML parser context) - * @name: the root element name - * @ExternalID: the external ID - * @SystemID: the SYSTEM ID (e.g. filename or URL) - * - * Callback on external subset declaration. - */ -void -xmlSAX2ExternalSubset(void *ctx, const xmlChar *name, - const xmlChar *ExternalID, const xmlChar *SystemID) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - if (ctx == NULL) return; -#ifdef DEBUG_SAX - xmlGenericError(xmlGenericErrorContext, - "SAX.xmlSAX2ExternalSubset(%s, %s, %s)\n", - name, ExternalID, SystemID); -#endif - if (((ExternalID != NULL) || (SystemID != NULL)) && - (((ctxt->validate) || (ctxt->loadsubset != 0)) && - (ctxt->wellFormed && ctxt->myDoc))) { - /* - * Try to fetch and parse the external subset. - */ - xmlParserInputPtr oldinput; - int oldinputNr; - int oldinputMax; - xmlParserInputPtr *oldinputTab; - xmlParserInputPtr input = NULL; - xmlCharEncoding enc; - int oldcharset; - const xmlChar *oldencoding; - - /* - * Ask the Entity resolver to load the damn thing - */ - if ((ctxt->sax != NULL) && (ctxt->sax->resolveEntity != NULL)) - input = ctxt->sax->resolveEntity(ctxt->userData, ExternalID, - SystemID); - if (input == NULL) { - return; - } - - xmlNewDtd(ctxt->myDoc, name, ExternalID, SystemID); - - /* - * make sure we won't destroy the main document context - */ - oldinput = ctxt->input; - oldinputNr = ctxt->inputNr; - oldinputMax = ctxt->inputMax; - oldinputTab = ctxt->inputTab; - oldcharset = ctxt->charset; - oldencoding = ctxt->encoding; - ctxt->encoding = NULL; - - ctxt->inputTab = (xmlParserInputPtr *) - xmlMalloc(5 * sizeof(xmlParserInputPtr)); - if (ctxt->inputTab == NULL) { - xmlSAX2ErrMemory(ctxt, "xmlSAX2ExternalSubset"); - ctxt->input = oldinput; - ctxt->inputNr = oldinputNr; - ctxt->inputMax = oldinputMax; - ctxt->inputTab = oldinputTab; - ctxt->charset = oldcharset; - ctxt->encoding = oldencoding; - return; - } - ctxt->inputNr = 0; - ctxt->inputMax = 5; - ctxt->input = NULL; - xmlPushInput(ctxt, input); - - /* - * On the fly encoding conversion if needed - */ - if (ctxt->input->length >= 4) { - enc = xmlDetectCharEncoding(ctxt->input->cur, 4); - xmlSwitchEncoding(ctxt, enc); - } - - if (input->filename == NULL) - input->filename = (char *) xmlCanonicPath(SystemID); - input->line = 1; - input->col = 1; - input->base = ctxt->input->cur; - input->cur = ctxt->input->cur; - input->free = NULL; - - /* - * let's parse that entity knowing it's an external subset. - */ - xmlParseExternalSubset(ctxt, ExternalID, SystemID); - - /* - * Free up the external entities - */ - - while (ctxt->inputNr > 1) - xmlPopInput(ctxt); - xmlFreeInputStream(ctxt->input); - xmlFree(ctxt->inputTab); - - /* - * Restore the parsing context of the main entity - */ - ctxt->input = oldinput; - ctxt->inputNr = oldinputNr; - ctxt->inputMax = oldinputMax; - ctxt->inputTab = oldinputTab; - ctxt->charset = oldcharset; - if ((ctxt->encoding != NULL) && - ((ctxt->dict == NULL) || - (!xmlDictOwns(ctxt->dict, ctxt->encoding)))) - xmlFree((xmlChar *) ctxt->encoding); - ctxt->encoding = oldencoding; - /* ctxt->wellFormed = oldwellFormed; */ - } -} - -/** - * xmlSAX2ResolveEntity: - * @ctx: the user data (XML parser context) - * @publicId: The public ID of the entity - * @systemId: The system ID of the entity - * - * The entity loader, to control the loading of external entities, - * the application can either: - * - override this xmlSAX2ResolveEntity() callback in the SAX block - * - or better use the xmlSetExternalEntityLoader() function to - * set up it's own entity resolution routine - * - * Returns the xmlParserInputPtr if inlined or NULL for DOM behaviour. - */ -xmlParserInputPtr -xmlSAX2ResolveEntity(void *ctx, const xmlChar *publicId, const xmlChar *systemId) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - xmlParserInputPtr ret; - xmlChar *URI; - const char *base = NULL; - - if (ctx == NULL) return(NULL); - if (ctxt->input != NULL) - base = ctxt->input->filename; - if (base == NULL) - base = ctxt->directory; - - URI = xmlBuildURI(systemId, (const xmlChar *) base); - -#ifdef DEBUG_SAX - xmlGenericError(xmlGenericErrorContext, - "SAX.xmlSAX2ResolveEntity(%s, %s)\n", publicId, systemId); -#endif - - ret = xmlLoadExternalEntity((const char *) URI, - (const char *) publicId, ctxt); - if (URI != NULL) - xmlFree(URI); - return(ret); -} - -/** - * xmlSAX2GetEntity: - * @ctx: the user data (XML parser context) - * @name: The entity name - * - * Get an entity by name - * - * Returns the xmlEntityPtr if found. - */ -xmlEntityPtr -xmlSAX2GetEntity(void *ctx, const xmlChar *name) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - xmlEntityPtr ret = NULL; - - if (ctx == NULL) return(NULL); -#ifdef DEBUG_SAX - xmlGenericError(xmlGenericErrorContext, - "SAX.xmlSAX2GetEntity(%s)\n", name); -#endif - - if (ctxt->inSubset == 0) { - ret = xmlGetPredefinedEntity(name); - if (ret != NULL) - return(ret); - } - if ((ctxt->myDoc != NULL) && (ctxt->myDoc->standalone == 1)) { - if (ctxt->inSubset == 2) { - ctxt->myDoc->standalone = 0; - ret = xmlGetDocEntity(ctxt->myDoc, name); - ctxt->myDoc->standalone = 1; - } else { - ret = xmlGetDocEntity(ctxt->myDoc, name); - if (ret == NULL) { - ctxt->myDoc->standalone = 0; - ret = xmlGetDocEntity(ctxt->myDoc, name); - if (ret != NULL) { - xmlFatalErrMsg(ctxt, XML_ERR_NOT_STANDALONE, - "Entity(%s) document marked standalone but requires external subset\n", - name, NULL); - } - ctxt->myDoc->standalone = 1; - } - } - } else { - ret = xmlGetDocEntity(ctxt->myDoc, name); - } - if ((ret != NULL) && - ((ctxt->validate) || (ctxt->replaceEntities)) && - (ret->children == NULL) && - (ret->etype == XML_EXTERNAL_GENERAL_PARSED_ENTITY)) { - int val; - - /* - * for validation purposes we really need to fetch and - * parse the external entity - */ - xmlNodePtr children; - unsigned long oldnbent = ctxt->nbentities; - - val = xmlParseCtxtExternalEntity(ctxt, ret->URI, - ret->ExternalID, &children); - if (val == 0) { - xmlAddChildList((xmlNodePtr) ret, children); - } else { - xmlFatalErrMsg(ctxt, XML_ERR_ENTITY_PROCESSING, - "Failure to process entity %s\n", name, NULL); - ctxt->validate = 0; - return(NULL); - } - ret->owner = 1; - if (ret->checked == 0) { - ret->checked = (ctxt->nbentities - oldnbent + 1) * 2; - if ((ret->content != NULL) && (xmlStrchr(ret->content, '<'))) - ret->checked |= 1; - } - } - return(ret); -} - -/** - * xmlSAX2GetParameterEntity: - * @ctx: the user data (XML parser context) - * @name: The entity name - * - * Get a parameter entity by name - * - * Returns the xmlEntityPtr if found. - */ -xmlEntityPtr -xmlSAX2GetParameterEntity(void *ctx, const xmlChar *name) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - xmlEntityPtr ret; - - if (ctx == NULL) return(NULL); -#ifdef DEBUG_SAX - xmlGenericError(xmlGenericErrorContext, - "SAX.xmlSAX2GetParameterEntity(%s)\n", name); -#endif - - ret = xmlGetParameterEntity(ctxt->myDoc, name); - return(ret); -} - - -/** - * xmlSAX2EntityDecl: - * @ctx: the user data (XML parser context) - * @name: the entity name - * @type: the entity type - * @publicId: The public ID of the entity - * @systemId: The system ID of the entity - * @content: the entity value (without processing). - * - * An entity definition has been parsed - */ -void -xmlSAX2EntityDecl(void *ctx, const xmlChar *name, int type, - const xmlChar *publicId, const xmlChar *systemId, xmlChar *content) -{ - xmlEntityPtr ent; - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - - if (ctx == NULL) return; -#ifdef DEBUG_SAX - xmlGenericError(xmlGenericErrorContext, - "SAX.xmlSAX2EntityDecl(%s, %d, %s, %s, %s)\n", - name, type, publicId, systemId, content); -#endif - if (ctxt->inSubset == 1) { - ent = xmlAddDocEntity(ctxt->myDoc, name, type, publicId, - systemId, content); - if ((ent == NULL) && (ctxt->pedantic)) - xmlWarnMsg(ctxt, XML_WAR_ENTITY_REDEFINED, - "Entity(%s) already defined in the internal subset\n", - name); - if ((ent != NULL) && (ent->URI == NULL) && (systemId != NULL)) { - xmlChar *URI; - const char *base = NULL; - - if (ctxt->input != NULL) - base = ctxt->input->filename; - if (base == NULL) - base = ctxt->directory; - - URI = xmlBuildURI(systemId, (const xmlChar *) base); - ent->URI = URI; - } - } else if (ctxt->inSubset == 2) { - ent = xmlAddDtdEntity(ctxt->myDoc, name, type, publicId, - systemId, content); - if ((ent == NULL) && (ctxt->pedantic) && - (ctxt->sax != NULL) && (ctxt->sax->warning != NULL)) - ctxt->sax->warning(ctxt->userData, - "Entity(%s) already defined in the external subset\n", name); - if ((ent != NULL) && (ent->URI == NULL) && (systemId != NULL)) { - xmlChar *URI; - const char *base = NULL; - - if (ctxt->input != NULL) - base = ctxt->input->filename; - if (base == NULL) - base = ctxt->directory; - - URI = xmlBuildURI(systemId, (const xmlChar *) base); - ent->URI = URI; - } - } else { - xmlFatalErrMsg(ctxt, XML_ERR_ENTITY_PROCESSING, - "SAX.xmlSAX2EntityDecl(%s) called while not in subset\n", - name, NULL); - } -} - -/** - * xmlSAX2AttributeDecl: - * @ctx: the user data (XML parser context) - * @elem: the name of the element - * @fullname: the attribute name - * @type: the attribute type - * @def: the type of default value - * @defaultValue: the attribute default value - * @tree: the tree of enumerated value set - * - * An attribute definition has been parsed - */ -void -xmlSAX2AttributeDecl(void *ctx, const xmlChar *elem, const xmlChar *fullname, - int type, int def, const xmlChar *defaultValue, - xmlEnumerationPtr tree) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - xmlAttributePtr attr; - xmlChar *name = NULL, *prefix = NULL; - - if ((ctxt == NULL) || (ctxt->myDoc == NULL)) - return; - -#ifdef DEBUG_SAX - xmlGenericError(xmlGenericErrorContext, - "SAX.xmlSAX2AttributeDecl(%s, %s, %d, %d, %s, ...)\n", - elem, fullname, type, def, defaultValue); -#endif - if ((xmlStrEqual(fullname, BAD_CAST "xml:id")) && - (type != XML_ATTRIBUTE_ID)) { - /* - * Raise the error but keep the validity flag - */ - int tmp = ctxt->valid; - xmlErrValid(ctxt, XML_DTD_XMLID_TYPE, - "xml:id : attribute type should be ID\n", NULL, NULL); - ctxt->valid = tmp; - } - /* TODO: optimize name/prefix allocation */ - name = xmlSplitQName(ctxt, fullname, &prefix); - ctxt->vctxt.valid = 1; - if (ctxt->inSubset == 1) - attr = xmlAddAttributeDecl(&ctxt->vctxt, ctxt->myDoc->intSubset, elem, - name, prefix, (xmlAttributeType) type, - (xmlAttributeDefault) def, defaultValue, tree); - else if (ctxt->inSubset == 2) - attr = xmlAddAttributeDecl(&ctxt->vctxt, ctxt->myDoc->extSubset, elem, - name, prefix, (xmlAttributeType) type, - (xmlAttributeDefault) def, defaultValue, tree); - else { - xmlFatalErrMsg(ctxt, XML_ERR_INTERNAL_ERROR, - "SAX.xmlSAX2AttributeDecl(%s) called while not in subset\n", - name, NULL); - xmlFreeEnumeration(tree); - return; - } -#ifdef LIBXML_VALID_ENABLED - if (ctxt->vctxt.valid == 0) - ctxt->valid = 0; - if ((attr != NULL) && (ctxt->validate) && (ctxt->wellFormed) && - (ctxt->myDoc->intSubset != NULL)) - ctxt->valid &= xmlValidateAttributeDecl(&ctxt->vctxt, ctxt->myDoc, - attr); -#endif /* LIBXML_VALID_ENABLED */ - if (prefix != NULL) - xmlFree(prefix); - if (name != NULL) - xmlFree(name); -} - -/** - * xmlSAX2ElementDecl: - * @ctx: the user data (XML parser context) - * @name: the element name - * @type: the element type - * @content: the element value tree - * - * An element definition has been parsed - */ -void -xmlSAX2ElementDecl(void *ctx, const xmlChar * name, int type, - xmlElementContentPtr content) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - xmlElementPtr elem = NULL; - - if ((ctxt == NULL) || (ctxt->myDoc == NULL)) - return; - -#ifdef DEBUG_SAX - xmlGenericError(xmlGenericErrorContext, - "SAX.xmlSAX2ElementDecl(%s, %d, ...)\n", name, type); -#endif - - if (ctxt->inSubset == 1) - elem = xmlAddElementDecl(&ctxt->vctxt, ctxt->myDoc->intSubset, - name, (xmlElementTypeVal) type, content); - else if (ctxt->inSubset == 2) - elem = xmlAddElementDecl(&ctxt->vctxt, ctxt->myDoc->extSubset, - name, (xmlElementTypeVal) type, content); - else { - xmlFatalErrMsg(ctxt, XML_ERR_INTERNAL_ERROR, - "SAX.xmlSAX2ElementDecl(%s) called while not in subset\n", - name, NULL); - return; - } -#ifdef LIBXML_VALID_ENABLED - if (elem == NULL) - ctxt->valid = 0; - if (ctxt->validate && ctxt->wellFormed && - ctxt->myDoc && ctxt->myDoc->intSubset) - ctxt->valid &= - xmlValidateElementDecl(&ctxt->vctxt, ctxt->myDoc, elem); -#endif /* LIBXML_VALID_ENABLED */ -} - -/** - * xmlSAX2NotationDecl: - * @ctx: the user data (XML parser context) - * @name: The name of the notation - * @publicId: The public ID of the entity - * @systemId: The system ID of the entity - * - * What to do when a notation declaration has been parsed. - */ -void -xmlSAX2NotationDecl(void *ctx, const xmlChar *name, - const xmlChar *publicId, const xmlChar *systemId) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - xmlNotationPtr nota = NULL; - - if ((ctxt == NULL) || (ctxt->myDoc == NULL)) - return; - -#ifdef DEBUG_SAX - xmlGenericError(xmlGenericErrorContext, - "SAX.xmlSAX2NotationDecl(%s, %s, %s)\n", name, publicId, systemId); -#endif - - if ((publicId == NULL) && (systemId == NULL)) { - xmlFatalErrMsg(ctxt, XML_ERR_NOTATION_PROCESSING, - "SAX.xmlSAX2NotationDecl(%s) externalID or PublicID missing\n", - name, NULL); - return; - } else if (ctxt->inSubset == 1) - nota = xmlAddNotationDecl(&ctxt->vctxt, ctxt->myDoc->intSubset, name, - publicId, systemId); - else if (ctxt->inSubset == 2) - nota = xmlAddNotationDecl(&ctxt->vctxt, ctxt->myDoc->extSubset, name, - publicId, systemId); - else { - xmlFatalErrMsg(ctxt, XML_ERR_NOTATION_PROCESSING, - "SAX.xmlSAX2NotationDecl(%s) called while not in subset\n", - name, NULL); - return; - } -#ifdef LIBXML_VALID_ENABLED - if (nota == NULL) ctxt->valid = 0; - if ((ctxt->validate) && (ctxt->wellFormed) && - (ctxt->myDoc->intSubset != NULL)) - ctxt->valid &= xmlValidateNotationDecl(&ctxt->vctxt, ctxt->myDoc, - nota); -#endif /* LIBXML_VALID_ENABLED */ -} - -/** - * xmlSAX2UnparsedEntityDecl: - * @ctx: the user data (XML parser context) - * @name: The name of the entity - * @publicId: The public ID of the entity - * @systemId: The system ID of the entity - * @notationName: the name of the notation - * - * What to do when an unparsed entity declaration is parsed - */ -void -xmlSAX2UnparsedEntityDecl(void *ctx, const xmlChar *name, - const xmlChar *publicId, const xmlChar *systemId, - const xmlChar *notationName) -{ - xmlEntityPtr ent; - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - if (ctx == NULL) return; -#ifdef DEBUG_SAX - xmlGenericError(xmlGenericErrorContext, - "SAX.xmlSAX2UnparsedEntityDecl(%s, %s, %s, %s)\n", - name, publicId, systemId, notationName); -#endif - if (ctxt->inSubset == 1) { - ent = xmlAddDocEntity(ctxt->myDoc, name, - XML_EXTERNAL_GENERAL_UNPARSED_ENTITY, - publicId, systemId, notationName); - if ((ent == NULL) && (ctxt->pedantic) && - (ctxt->sax != NULL) && (ctxt->sax->warning != NULL)) - ctxt->sax->warning(ctxt->userData, - "Entity(%s) already defined in the internal subset\n", name); - if ((ent != NULL) && (ent->URI == NULL) && (systemId != NULL)) { - xmlChar *URI; - const char *base = NULL; - - if (ctxt->input != NULL) - base = ctxt->input->filename; - if (base == NULL) - base = ctxt->directory; - - URI = xmlBuildURI(systemId, (const xmlChar *) base); - ent->URI = URI; - } - } else if (ctxt->inSubset == 2) { - ent = xmlAddDtdEntity(ctxt->myDoc, name, - XML_EXTERNAL_GENERAL_UNPARSED_ENTITY, - publicId, systemId, notationName); - if ((ent == NULL) && (ctxt->pedantic) && - (ctxt->sax != NULL) && (ctxt->sax->warning != NULL)) - ctxt->sax->warning(ctxt->userData, - "Entity(%s) already defined in the external subset\n", name); - if ((ent != NULL) && (ent->URI == NULL) && (systemId != NULL)) { - xmlChar *URI; - const char *base = NULL; - - if (ctxt->input != NULL) - base = ctxt->input->filename; - if (base == NULL) - base = ctxt->directory; - - URI = xmlBuildURI(systemId, (const xmlChar *) base); - ent->URI = URI; - } - } else { - xmlFatalErrMsg(ctxt, XML_ERR_INTERNAL_ERROR, - "SAX.xmlSAX2UnparsedEntityDecl(%s) called while not in subset\n", - name, NULL); - } -} - -/** - * xmlSAX2SetDocumentLocator: - * @ctx: the user data (XML parser context) - * @loc: A SAX Locator - * - * Receive the document locator at startup, actually xmlDefaultSAXLocator - * Everything is available on the context, so this is useless in our case. - */ -void -xmlSAX2SetDocumentLocator(void *ctx ATTRIBUTE_UNUSED, xmlSAXLocatorPtr loc ATTRIBUTE_UNUSED) -{ - /* xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; */ -#ifdef DEBUG_SAX - xmlGenericError(xmlGenericErrorContext, - "SAX.xmlSAX2SetDocumentLocator()\n"); -#endif -} - -/** - * xmlSAX2StartDocument: - * @ctx: the user data (XML parser context) - * - * called when the document start being processed. - */ -void -xmlSAX2StartDocument(void *ctx) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - xmlDocPtr doc; - - if (ctx == NULL) return; - -#ifdef DEBUG_SAX - xmlGenericError(xmlGenericErrorContext, - "SAX.xmlSAX2StartDocument()\n"); -#endif - if (ctxt->html) { -#ifdef LIBXML_HTML_ENABLED - if (ctxt->myDoc == NULL) - ctxt->myDoc = htmlNewDocNoDtD(NULL, NULL); - if (ctxt->myDoc == NULL) { - xmlSAX2ErrMemory(ctxt, "xmlSAX2StartDocument"); - return; - } - ctxt->myDoc->properties = XML_DOC_HTML; - ctxt->myDoc->parseFlags = ctxt->options; -#else - xmlGenericError(xmlGenericErrorContext, - "libxml2 built without HTML support\n"); - ctxt->errNo = XML_ERR_INTERNAL_ERROR; - ctxt->instate = XML_PARSER_EOF; - ctxt->disableSAX = 1; - return; -#endif - } else { - doc = ctxt->myDoc = xmlNewDoc(ctxt->version); - if (doc != NULL) { - doc->properties = 0; - if (ctxt->options & XML_PARSE_OLD10) - doc->properties |= XML_DOC_OLD10; - doc->parseFlags = ctxt->options; - if (ctxt->encoding != NULL) - doc->encoding = xmlStrdup(ctxt->encoding); - else - doc->encoding = NULL; - doc->standalone = ctxt->standalone; - } else { - xmlSAX2ErrMemory(ctxt, "xmlSAX2StartDocument"); - return; - } - if ((ctxt->dictNames) && (doc != NULL)) { - doc->dict = ctxt->dict; - xmlDictReference(doc->dict); - } - } - if ((ctxt->myDoc != NULL) && (ctxt->myDoc->URL == NULL) && - (ctxt->input != NULL) && (ctxt->input->filename != NULL)) { - ctxt->myDoc->URL = xmlPathToURI((const xmlChar *)ctxt->input->filename); - if (ctxt->myDoc->URL == NULL) - xmlSAX2ErrMemory(ctxt, "xmlSAX2StartDocument"); - } -} - -/** - * xmlSAX2EndDocument: - * @ctx: the user data (XML parser context) - * - * called when the document end has been detected. - */ -void -xmlSAX2EndDocument(void *ctx) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; -#ifdef DEBUG_SAX - xmlGenericError(xmlGenericErrorContext, - "SAX.xmlSAX2EndDocument()\n"); -#endif - if (ctx == NULL) return; -#ifdef LIBXML_VALID_ENABLED - if (ctxt->validate && ctxt->wellFormed && - ctxt->myDoc && ctxt->myDoc->intSubset) - ctxt->valid &= xmlValidateDocumentFinal(&ctxt->vctxt, ctxt->myDoc); -#endif /* LIBXML_VALID_ENABLED */ - - /* - * Grab the encoding if it was added on-the-fly - */ - if ((ctxt->encoding != NULL) && (ctxt->myDoc != NULL) && - (ctxt->myDoc->encoding == NULL)) { - ctxt->myDoc->encoding = ctxt->encoding; - ctxt->encoding = NULL; - } - if ((ctxt->inputTab != NULL) && - (ctxt->inputNr > 0) && (ctxt->inputTab[0] != NULL) && - (ctxt->inputTab[0]->encoding != NULL) && (ctxt->myDoc != NULL) && - (ctxt->myDoc->encoding == NULL)) { - ctxt->myDoc->encoding = xmlStrdup(ctxt->inputTab[0]->encoding); - } - if ((ctxt->charset != XML_CHAR_ENCODING_NONE) && (ctxt->myDoc != NULL) && - (ctxt->myDoc->charset == XML_CHAR_ENCODING_NONE)) { - ctxt->myDoc->charset = ctxt->charset; - } -} - -#if defined(LIBXML_SAX1_ENABLED) || defined(LIBXML_HTML_ENABLED) || defined(LIBXML_WRITER_ENABLED) || defined(LIBXML_DOCB_ENABLED) || defined(LIBXML_LEGACY_ENABLED) -/** - * xmlSAX2AttributeInternal: - * @ctx: the user data (XML parser context) - * @fullname: The attribute name, including namespace prefix - * @value: The attribute value - * @prefix: the prefix on the element node - * - * Handle an attribute that has been read by the parser. - * The default handling is to convert the attribute into an - * DOM subtree and past it in a new xmlAttr element added to - * the element. - */ -static void -xmlSAX2AttributeInternal(void *ctx, const xmlChar *fullname, - const xmlChar *value, const xmlChar *prefix ATTRIBUTE_UNUSED) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - xmlAttrPtr ret; - xmlChar *name; - xmlChar *ns; - xmlChar *nval; - xmlNsPtr namespace; - - if (ctxt->html) { - name = xmlStrdup(fullname); - ns = NULL; - namespace = NULL; - } else { - /* - * Split the full name into a namespace prefix and the tag name - */ - name = xmlSplitQName(ctxt, fullname, &ns); - if ((name != NULL) && (name[0] == 0)) { - if (xmlStrEqual(ns, BAD_CAST "xmlns")) { - xmlNsErrMsg(ctxt, XML_ERR_NS_DECL_ERROR, - "invalid namespace declaration '%s'\n", - fullname, NULL); - } else { - xmlNsWarnMsg(ctxt, XML_WAR_NS_COLUMN, - "Avoid attribute ending with ':' like '%s'\n", - fullname, NULL); - } - if (ns != NULL) - xmlFree(ns); - ns = NULL; - xmlFree(name); - name = xmlStrdup(fullname); - } - } - if (name == NULL) { - xmlSAX2ErrMemory(ctxt, "xmlSAX2StartElement"); - if (ns != NULL) - xmlFree(ns); - return; - } - -#ifdef LIBXML_HTML_ENABLED - if ((ctxt->html) && - (value == NULL) && (htmlIsBooleanAttr(fullname))) { - nval = xmlStrdup(fullname); - value = (const xmlChar *) nval; - } else -#endif - { -#ifdef LIBXML_VALID_ENABLED - /* - * Do the last stage of the attribute normalization - * Needed for HTML too: - * http://www.w3.org/TR/html4/types.html#h-6.2 - */ - ctxt->vctxt.valid = 1; - nval = xmlValidCtxtNormalizeAttributeValue(&ctxt->vctxt, - ctxt->myDoc, ctxt->node, - fullname, value); - if (ctxt->vctxt.valid != 1) { - ctxt->valid = 0; - } - if (nval != NULL) - value = nval; -#else - nval = NULL; -#endif /* LIBXML_VALID_ENABLED */ - } - - /* - * Check whether it's a namespace definition - */ - if ((!ctxt->html) && (ns == NULL) && - (name[0] == 'x') && (name[1] == 'm') && (name[2] == 'l') && - (name[3] == 'n') && (name[4] == 's') && (name[5] == 0)) { - xmlNsPtr nsret; - xmlChar *val; - - if (!ctxt->replaceEntities) { - ctxt->depth++; - val = xmlStringDecodeEntities(ctxt, value, XML_SUBSTITUTE_REF, - 0,0,0); - ctxt->depth--; - if (val == NULL) { - xmlSAX2ErrMemory(ctxt, "xmlSAX2StartElement"); - if (name != NULL) - xmlFree(name); - return; - } - } else { - val = (xmlChar *) value; - } - - if (val[0] != 0) { - xmlURIPtr uri; - - uri = xmlParseURI((const char *)val); - if (uri == NULL) { - if ((ctxt->sax != NULL) && (ctxt->sax->warning != NULL)) - ctxt->sax->warning(ctxt->userData, - "xmlns: %s not a valid URI\n", val); - } else { - if (uri->scheme == NULL) { - if ((ctxt->sax != NULL) && (ctxt->sax->warning != NULL)) - ctxt->sax->warning(ctxt->userData, - "xmlns: URI %s is not absolute\n", val); - } - xmlFreeURI(uri); - } - } - - /* a default namespace definition */ - nsret = xmlNewNs(ctxt->node, val, NULL); - -#ifdef LIBXML_VALID_ENABLED - /* - * Validate also for namespace decls, they are attributes from - * an XML-1.0 perspective - */ - if (nsret != NULL && ctxt->validate && ctxt->wellFormed && - ctxt->myDoc && ctxt->myDoc->intSubset) - ctxt->valid &= xmlValidateOneNamespace(&ctxt->vctxt, ctxt->myDoc, - ctxt->node, prefix, nsret, val); -#endif /* LIBXML_VALID_ENABLED */ - if (name != NULL) - xmlFree(name); - if (nval != NULL) - xmlFree(nval); - if (val != value) - xmlFree(val); - return; - } - if ((!ctxt->html) && - (ns != NULL) && (ns[0] == 'x') && (ns[1] == 'm') && (ns[2] == 'l') && - (ns[3] == 'n') && (ns[4] == 's') && (ns[5] == 0)) { - xmlNsPtr nsret; - xmlChar *val; - - if (!ctxt->replaceEntities) { - ctxt->depth++; - val = xmlStringDecodeEntities(ctxt, value, XML_SUBSTITUTE_REF, - 0,0,0); - ctxt->depth--; - if (val == NULL) { - xmlSAX2ErrMemory(ctxt, "xmlSAX2StartElement"); - xmlFree(ns); - if (name != NULL) - xmlFree(name); - return; - } - } else { - val = (xmlChar *) value; - } - - if (val[0] == 0) { - xmlNsErrMsg(ctxt, XML_NS_ERR_EMPTY, - "Empty namespace name for prefix %s\n", name, NULL); - } - if ((ctxt->pedantic != 0) && (val[0] != 0)) { - xmlURIPtr uri; - - uri = xmlParseURI((const char *)val); - if (uri == NULL) { - xmlNsWarnMsg(ctxt, XML_WAR_NS_URI, - "xmlns:%s: %s not a valid URI\n", name, value); - } else { - if (uri->scheme == NULL) { - xmlNsWarnMsg(ctxt, XML_WAR_NS_URI_RELATIVE, - "xmlns:%s: URI %s is not absolute\n", name, value); - } - xmlFreeURI(uri); - } - } - - /* a standard namespace definition */ - nsret = xmlNewNs(ctxt->node, val, name); - xmlFree(ns); -#ifdef LIBXML_VALID_ENABLED - /* - * Validate also for namespace decls, they are attributes from - * an XML-1.0 perspective - */ - if (nsret != NULL && ctxt->validate && ctxt->wellFormed && - ctxt->myDoc && ctxt->myDoc->intSubset) - ctxt->valid &= xmlValidateOneNamespace(&ctxt->vctxt, ctxt->myDoc, - ctxt->node, prefix, nsret, value); -#endif /* LIBXML_VALID_ENABLED */ - if (name != NULL) - xmlFree(name); - if (nval != NULL) - xmlFree(nval); - if (val != value) - xmlFree(val); - return; - } - - if (ns != NULL) { - namespace = xmlSearchNs(ctxt->myDoc, ctxt->node, ns); - - if (namespace == NULL) { - xmlNsErrMsg(ctxt, XML_NS_ERR_UNDEFINED_NAMESPACE, - "Namespace prefix %s of attribute %s is not defined\n", - ns, name); - } else { - xmlAttrPtr prop; - - prop = ctxt->node->properties; - while (prop != NULL) { - if (prop->ns != NULL) { - if ((xmlStrEqual(name, prop->name)) && - ((namespace == prop->ns) || - (xmlStrEqual(namespace->href, prop->ns->href)))) { - xmlNsErrMsg(ctxt, XML_ERR_ATTRIBUTE_REDEFINED, - "Attribute %s in %s redefined\n", - name, namespace->href); - ctxt->wellFormed = 0; - if (ctxt->recovery == 0) ctxt->disableSAX = 1; - goto error; - } - } - prop = prop->next; - } - } - } else { - namespace = NULL; - } - - /* !!!!!! <a toto:arg="" xmlns:toto="http://toto.com"> */ - ret = xmlNewNsPropEatName(ctxt->node, namespace, name, NULL); - - if (ret != NULL) { - if ((ctxt->replaceEntities == 0) && (!ctxt->html)) { - xmlNodePtr tmp; - - ret->children = xmlStringGetNodeList(ctxt->myDoc, value); - tmp = ret->children; - while (tmp != NULL) { - tmp->parent = (xmlNodePtr) ret; - if (tmp->next == NULL) - ret->last = tmp; - tmp = tmp->next; - } - } else if (value != NULL) { - ret->children = xmlNewDocText(ctxt->myDoc, value); - ret->last = ret->children; - if (ret->children != NULL) - ret->children->parent = (xmlNodePtr) ret; - } - } - -#ifdef LIBXML_VALID_ENABLED - if ((!ctxt->html) && ctxt->validate && ctxt->wellFormed && - ctxt->myDoc && ctxt->myDoc->intSubset) { - - /* - * If we don't substitute entities, the validation should be - * done on a value with replaced entities anyway. - */ - if (!ctxt->replaceEntities) { - xmlChar *val; - - ctxt->depth++; - val = xmlStringDecodeEntities(ctxt, value, XML_SUBSTITUTE_REF, - 0,0,0); - ctxt->depth--; - - if (val == NULL) - ctxt->valid &= xmlValidateOneAttribute(&ctxt->vctxt, - ctxt->myDoc, ctxt->node, ret, value); - else { - xmlChar *nvalnorm; - - /* - * Do the last stage of the attribute normalization - * It need to be done twice ... it's an extra burden related - * to the ability to keep xmlSAX2References in attributes - */ - nvalnorm = xmlValidNormalizeAttributeValue(ctxt->myDoc, - ctxt->node, fullname, val); - if (nvalnorm != NULL) { - xmlFree(val); - val = nvalnorm; - } - - ctxt->valid &= xmlValidateOneAttribute(&ctxt->vctxt, - ctxt->myDoc, ctxt->node, ret, val); - xmlFree(val); - } - } else { - ctxt->valid &= xmlValidateOneAttribute(&ctxt->vctxt, ctxt->myDoc, - ctxt->node, ret, value); - } - } else -#endif /* LIBXML_VALID_ENABLED */ - if (((ctxt->loadsubset & XML_SKIP_IDS) == 0) && - (((ctxt->replaceEntities == 0) && (ctxt->external != 2)) || - ((ctxt->replaceEntities != 0) && (ctxt->inSubset == 0)))) { - /* - * when validating, the ID registration is done at the attribute - * validation level. Otherwise we have to do specific handling here. - */ - if (xmlStrEqual(fullname, BAD_CAST "xml:id")) { - /* - * Add the xml:id value - * - * Open issue: normalization of the value. - */ - if (xmlValidateNCName(value, 1) != 0) { - xmlErrValid(ctxt, XML_DTD_XMLID_VALUE, - "xml:id : attribute value %s is not an NCName\n", - (const char *) value, NULL); - } - xmlAddID(&ctxt->vctxt, ctxt->myDoc, value, ret); - } else if (xmlIsID(ctxt->myDoc, ctxt->node, ret)) - xmlAddID(&ctxt->vctxt, ctxt->myDoc, value, ret); - else if (xmlIsRef(ctxt->myDoc, ctxt->node, ret)) - xmlAddRef(&ctxt->vctxt, ctxt->myDoc, value, ret); - } - -error: - if (nval != NULL) - xmlFree(nval); - if (ns != NULL) - xmlFree(ns); -} - -/* - * xmlCheckDefaultedAttributes: - * - * Check defaulted attributes from the DTD - */ -static void -xmlCheckDefaultedAttributes(xmlParserCtxtPtr ctxt, const xmlChar *name, - const xmlChar *prefix, const xmlChar **atts) { - xmlElementPtr elemDecl; - const xmlChar *att; - int internal = 1; - int i; - - elemDecl = xmlGetDtdQElementDesc(ctxt->myDoc->intSubset, name, prefix); - if (elemDecl == NULL) { - elemDecl = xmlGetDtdQElementDesc(ctxt->myDoc->extSubset, name, prefix); - internal = 0; - } - -process_external_subset: - - if (elemDecl != NULL) { - xmlAttributePtr attr = elemDecl->attributes; - /* - * Check against defaulted attributes from the external subset - * if the document is stamped as standalone - */ - if ((ctxt->myDoc->standalone == 1) && - (ctxt->myDoc->extSubset != NULL) && - (ctxt->validate)) { - while (attr != NULL) { - if ((attr->defaultValue != NULL) && - (xmlGetDtdQAttrDesc(ctxt->myDoc->extSubset, - attr->elem, attr->name, - attr->prefix) == attr) && - (xmlGetDtdQAttrDesc(ctxt->myDoc->intSubset, - attr->elem, attr->name, - attr->prefix) == NULL)) { - xmlChar *fulln; - - if (attr->prefix != NULL) { - fulln = xmlStrdup(attr->prefix); - fulln = xmlStrcat(fulln, BAD_CAST ":"); - fulln = xmlStrcat(fulln, attr->name); - } else { - fulln = xmlStrdup(attr->name); - } - if (fulln == NULL) { - xmlSAX2ErrMemory(ctxt, "xmlSAX2StartElement"); - break; - } - - /* - * Check that the attribute is not declared in the - * serialization - */ - att = NULL; - if (atts != NULL) { - i = 0; - att = atts[i]; - while (att != NULL) { - if (xmlStrEqual(att, fulln)) - break; - i += 2; - att = atts[i]; - } - } - if (att == NULL) { - xmlErrValid(ctxt, XML_DTD_STANDALONE_DEFAULTED, - "standalone: attribute %s on %s defaulted from external subset\n", - (const char *)fulln, - (const char *)attr->elem); - } - xmlFree(fulln); - } - attr = attr->nexth; - } - } - - /* - * Actually insert defaulted values when needed - */ - attr = elemDecl->attributes; - while (attr != NULL) { - /* - * Make sure that attributes redefinition occuring in the - * internal subset are not overriden by definitions in the - * external subset. - */ - if (attr->defaultValue != NULL) { - /* - * the element should be instantiated in the tree if: - * - this is a namespace prefix - * - the user required for completion in the tree - * like XSLT - * - there isn't already an attribute definition - * in the internal subset overriding it. - */ - if (((attr->prefix != NULL) && - (xmlStrEqual(attr->prefix, BAD_CAST "xmlns"))) || - ((attr->prefix == NULL) && - (xmlStrEqual(attr->name, BAD_CAST "xmlns"))) || - (ctxt->loadsubset & XML_COMPLETE_ATTRS)) { - xmlAttributePtr tst; - - tst = xmlGetDtdQAttrDesc(ctxt->myDoc->intSubset, - attr->elem, attr->name, - attr->prefix); - if ((tst == attr) || (tst == NULL)) { - xmlChar fn[50]; - xmlChar *fulln; - - fulln = xmlBuildQName(attr->name, attr->prefix, fn, 50); - if (fulln == NULL) { - xmlSAX2ErrMemory(ctxt, "xmlSAX2StartElement"); - return; - } - - /* - * Check that the attribute is not declared in the - * serialization - */ - att = NULL; - if (atts != NULL) { - i = 0; - att = atts[i]; - while (att != NULL) { - if (xmlStrEqual(att, fulln)) - break; - i += 2; - att = atts[i]; - } - } - if (att == NULL) { - xmlSAX2AttributeInternal(ctxt, fulln, - attr->defaultValue, prefix); - } - if ((fulln != fn) && (fulln != attr->name)) - xmlFree(fulln); - } - } - } - attr = attr->nexth; - } - if (internal == 1) { - elemDecl = xmlGetDtdQElementDesc(ctxt->myDoc->extSubset, - name, prefix); - internal = 0; - goto process_external_subset; - } - } -} - -/** - * xmlSAX2StartElement: - * @ctx: the user data (XML parser context) - * @fullname: The element name, including namespace prefix - * @atts: An array of name/value attributes pairs, NULL terminated - * - * called when an opening tag has been processed. - */ -void -xmlSAX2StartElement(void *ctx, const xmlChar *fullname, const xmlChar **atts) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - xmlNodePtr ret; - xmlNodePtr parent; - xmlNsPtr ns; - xmlChar *name; - xmlChar *prefix; - const xmlChar *att; - const xmlChar *value; - int i; - - if ((ctx == NULL) || (fullname == NULL) || (ctxt->myDoc == NULL)) return; - parent = ctxt->node; -#ifdef DEBUG_SAX - xmlGenericError(xmlGenericErrorContext, - "SAX.xmlSAX2StartElement(%s)\n", fullname); -#endif - - /* - * First check on validity: - */ - if (ctxt->validate && (ctxt->myDoc->extSubset == NULL) && - ((ctxt->myDoc->intSubset == NULL) || - ((ctxt->myDoc->intSubset->notations == NULL) && - (ctxt->myDoc->intSubset->elements == NULL) && - (ctxt->myDoc->intSubset->attributes == NULL) && - (ctxt->myDoc->intSubset->entities == NULL)))) { - xmlErrValid(ctxt, XML_ERR_NO_DTD, - "Validation failed: no DTD found !", NULL, NULL); - ctxt->validate = 0; - } - - - /* - * Split the full name into a namespace prefix and the tag name - */ - name = xmlSplitQName(ctxt, fullname, &prefix); - - - /* - * Note : the namespace resolution is deferred until the end of the - * attributes parsing, since local namespace can be defined as - * an attribute at this level. - */ - ret = xmlNewDocNodeEatName(ctxt->myDoc, NULL, name, NULL); - if (ret == NULL) { - if (prefix != NULL) - xmlFree(prefix); - xmlSAX2ErrMemory(ctxt, "xmlSAX2StartElement"); - return; - } - if (ctxt->myDoc->children == NULL) { -#ifdef DEBUG_SAX_TREE - xmlGenericError(xmlGenericErrorContext, "Setting %s as root\n", name); -#endif - xmlAddChild((xmlNodePtr) ctxt->myDoc, (xmlNodePtr) ret); - } else if (parent == NULL) { - parent = ctxt->myDoc->children; - } - ctxt->nodemem = -1; - if (ctxt->linenumbers) { - if (ctxt->input != NULL) { - if (ctxt->input->line < 65535) - ret->line = (short) ctxt->input->line; - else - ret->line = 65535; - } - } - - /* - * We are parsing a new node. - */ -#ifdef DEBUG_SAX_TREE - xmlGenericError(xmlGenericErrorContext, "pushing(%s)\n", name); -#endif - nodePush(ctxt, ret); - - /* - * Link the child element - */ - if (parent != NULL) { - if (parent->type == XML_ELEMENT_NODE) { -#ifdef DEBUG_SAX_TREE - xmlGenericError(xmlGenericErrorContext, - "adding child %s to %s\n", name, parent->name); -#endif - xmlAddChild(parent, ret); - } else { -#ifdef DEBUG_SAX_TREE - xmlGenericError(xmlGenericErrorContext, - "adding sibling %s to ", name); - xmlDebugDumpOneNode(stderr, parent, 0); -#endif - xmlAddSibling(parent, ret); - } - } - - /* - * Insert all the defaulted attributes from the DTD especially namespaces - */ - if ((!ctxt->html) && - ((ctxt->myDoc->intSubset != NULL) || - (ctxt->myDoc->extSubset != NULL))) { - xmlCheckDefaultedAttributes(ctxt, name, prefix, atts); - } - - /* - * process all the attributes whose name start with "xmlns" - */ - if (atts != NULL) { - i = 0; - att = atts[i++]; - value = atts[i++]; - if (!ctxt->html) { - while ((att != NULL) && (value != NULL)) { - if ((att[0] == 'x') && (att[1] == 'm') && (att[2] == 'l') && - (att[3] == 'n') && (att[4] == 's')) - xmlSAX2AttributeInternal(ctxt, att, value, prefix); - - att = atts[i++]; - value = atts[i++]; - } - } - } - - /* - * Search the namespace, note that since the attributes have been - * processed, the local namespaces are available. - */ - ns = xmlSearchNs(ctxt->myDoc, ret, prefix); - if ((ns == NULL) && (parent != NULL)) - ns = xmlSearchNs(ctxt->myDoc, parent, prefix); - if ((prefix != NULL) && (ns == NULL)) { - ns = xmlNewNs(ret, NULL, prefix); - xmlNsWarnMsg(ctxt, XML_NS_ERR_UNDEFINED_NAMESPACE, - "Namespace prefix %s is not defined\n", - prefix, NULL); - } - - /* - * set the namespace node, making sure that if the default namspace - * is unbound on a parent we simply kee it NULL - */ - if ((ns != NULL) && (ns->href != NULL) && - ((ns->href[0] != 0) || (ns->prefix != NULL))) - xmlSetNs(ret, ns); - - /* - * process all the other attributes - */ - if (atts != NULL) { - i = 0; - att = atts[i++]; - value = atts[i++]; - if (ctxt->html) { - while (att != NULL) { - xmlSAX2AttributeInternal(ctxt, att, value, NULL); - att = atts[i++]; - value = atts[i++]; - } - } else { - while ((att != NULL) && (value != NULL)) { - if ((att[0] != 'x') || (att[1] != 'm') || (att[2] != 'l') || - (att[3] != 'n') || (att[4] != 's')) - xmlSAX2AttributeInternal(ctxt, att, value, NULL); - - /* - * Next ones - */ - att = atts[i++]; - value = atts[i++]; - } - } - } - -#ifdef LIBXML_VALID_ENABLED - /* - * If it's the Document root, finish the DTD validation and - * check the document root element for validity - */ - if ((ctxt->validate) && (ctxt->vctxt.finishDtd == XML_CTXT_FINISH_DTD_0)) { - int chk; - - chk = xmlValidateDtdFinal(&ctxt->vctxt, ctxt->myDoc); - if (chk <= 0) - ctxt->valid = 0; - if (chk < 0) - ctxt->wellFormed = 0; - ctxt->valid &= xmlValidateRoot(&ctxt->vctxt, ctxt->myDoc); - ctxt->vctxt.finishDtd = XML_CTXT_FINISH_DTD_1; - } -#endif /* LIBXML_VALID_ENABLED */ - - if (prefix != NULL) - xmlFree(prefix); - -} - -/** - * xmlSAX2EndElement: - * @ctx: the user data (XML parser context) - * @name: The element name - * - * called when the end of an element has been detected. - */ -void -xmlSAX2EndElement(void *ctx, const xmlChar *name ATTRIBUTE_UNUSED) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - xmlNodePtr cur; - - if (ctx == NULL) return; - cur = ctxt->node; -#ifdef DEBUG_SAX - if (name == NULL) - xmlGenericError(xmlGenericErrorContext, "SAX.xmlSAX2EndElement(NULL)\n"); - else - xmlGenericError(xmlGenericErrorContext, "SAX.xmlSAX2EndElement(%s)\n", name); -#endif - - /* Capture end position and add node */ - if (cur != NULL && ctxt->record_info) { - ctxt->nodeInfo->end_pos = ctxt->input->cur - ctxt->input->base; - ctxt->nodeInfo->end_line = ctxt->input->line; - ctxt->nodeInfo->node = cur; - xmlParserAddNodeInfo(ctxt, ctxt->nodeInfo); - } - ctxt->nodemem = -1; - -#ifdef LIBXML_VALID_ENABLED - if (ctxt->validate && ctxt->wellFormed && - ctxt->myDoc && ctxt->myDoc->intSubset) - ctxt->valid &= xmlValidateOneElement(&ctxt->vctxt, ctxt->myDoc, - cur); -#endif /* LIBXML_VALID_ENABLED */ - - - /* - * end of parsing of this node. - */ -#ifdef DEBUG_SAX_TREE - xmlGenericError(xmlGenericErrorContext, "popping(%s)\n", cur->name); -#endif - nodePop(ctxt); -} -#endif /* LIBXML_SAX1_ENABLED || LIBXML_HTML_ENABLED || LIBXML_LEGACY_ENABLED */ - -/* - * xmlSAX2TextNode: - * @ctxt: the parser context - * @str: the input string - * @len: the string length - * - * Callback for a text node - * - * Returns the newly allocated string or NULL if not needed or error - */ -static xmlNodePtr -xmlSAX2TextNode(xmlParserCtxtPtr ctxt, const xmlChar *str, int len) { - xmlNodePtr ret; - const xmlChar *intern = NULL; - - /* - * Allocate - */ - if (ctxt->freeElems != NULL) { - ret = ctxt->freeElems; - ctxt->freeElems = ret->next; - ctxt->freeElemsNr--; - } else { - ret = (xmlNodePtr) xmlMalloc(sizeof(xmlNode)); - } - if (ret == NULL) { - xmlErrMemory(ctxt, "xmlSAX2Characters"); - return(NULL); - } - memset(ret, 0, sizeof(xmlNode)); - /* - * intern the formatting blanks found between tags, or the - * very short strings - */ - if (ctxt->dictNames) { - xmlChar cur = str[len]; - - if ((len < (int) (2 * sizeof(void *))) && - (ctxt->options & XML_PARSE_COMPACT)) { - /* store the string in the node overriding properties and nsDef */ - xmlChar *tmp = (xmlChar *) &(ret->properties); - memcpy(tmp, str, len); - tmp[len] = 0; - intern = tmp; - } else if ((len <= 3) && ((cur == '"') || (cur == '\'') || - ((cur == '<') && (str[len + 1] != '!')))) { - intern = xmlDictLookup(ctxt->dict, str, len); - } else if (IS_BLANK_CH(*str) && (len < 60) && (cur == '<') && - (str[len + 1] != '!')) { - int i; - - for (i = 1;i < len;i++) { - if (!IS_BLANK_CH(str[i])) goto skip; - } - intern = xmlDictLookup(ctxt->dict, str, len); - } - } -skip: - ret->type = XML_TEXT_NODE; - - ret->name = xmlStringText; - if (intern == NULL) { - ret->content = xmlStrndup(str, len); - if (ret->content == NULL) { - xmlSAX2ErrMemory(ctxt, "xmlSAX2TextNode"); - xmlFree(ret); - return(NULL); - } - } else - ret->content = (xmlChar *) intern; - - if (ctxt->linenumbers) { - if (ctxt->input != NULL) { - if (ctxt->input->line < 65535) - ret->line = (short) ctxt->input->line; - else { - ret->line = 65535; - if (ctxt->options & XML_PARSE_BIG_LINES) - ret->psvi = (void *) (long) ctxt->input->line; - } - } - } - - if ((__xmlRegisterCallbacks) && (xmlRegisterNodeDefaultValue)) - xmlRegisterNodeDefaultValue(ret); - return(ret); -} - -#ifdef LIBXML_VALID_ENABLED -/* - * xmlSAX2DecodeAttrEntities: - * @ctxt: the parser context - * @str: the input string - * @len: the string length - * - * Remove the entities from an attribute value - * - * Returns the newly allocated string or NULL if not needed or error - */ -static xmlChar * -xmlSAX2DecodeAttrEntities(xmlParserCtxtPtr ctxt, const xmlChar *str, - const xmlChar *end) { - const xmlChar *in; - xmlChar *ret; - - in = str; - while (in < end) - if (*in++ == '&') - goto decode; - return(NULL); -decode: - ctxt->depth++; - ret = xmlStringLenDecodeEntities(ctxt, str, end - str, - XML_SUBSTITUTE_REF, 0,0,0); - ctxt->depth--; - return(ret); -} -#endif /* LIBXML_VALID_ENABLED */ - -/** - * xmlSAX2AttributeNs: - * @ctx: the user data (XML parser context) - * @localname: the local name of the attribute - * @prefix: the attribute namespace prefix if available - * @URI: the attribute namespace name if available - * @value: Start of the attribute value - * @valueend: end of the attribute value - * - * Handle an attribute that has been read by the parser. - * The default handling is to convert the attribute into an - * DOM subtree and past it in a new xmlAttr element added to - * the element. - */ -static void -xmlSAX2AttributeNs(xmlParserCtxtPtr ctxt, - const xmlChar * localname, - const xmlChar * prefix, - const xmlChar * value, - const xmlChar * valueend) -{ - xmlAttrPtr ret; - xmlNsPtr namespace = NULL; - xmlChar *dup = NULL; - - /* - * Note: if prefix == NULL, the attribute is not in the default namespace - */ - if (prefix != NULL) - namespace = xmlSearchNs(ctxt->myDoc, ctxt->node, prefix); - - /* - * allocate the node - */ - if (ctxt->freeAttrs != NULL) { - ret = ctxt->freeAttrs; - ctxt->freeAttrs = ret->next; - ctxt->freeAttrsNr--; - memset(ret, 0, sizeof(xmlAttr)); - ret->type = XML_ATTRIBUTE_NODE; - - ret->parent = ctxt->node; - ret->doc = ctxt->myDoc; - ret->ns = namespace; - - if (ctxt->dictNames) - ret->name = localname; - else - ret->name = xmlStrdup(localname); - - /* link at the end to preserv order, TODO speed up with a last */ - if (ctxt->node->properties == NULL) { - ctxt->node->properties = ret; - } else { - xmlAttrPtr prev = ctxt->node->properties; - - while (prev->next != NULL) prev = prev->next; - prev->next = ret; - ret->prev = prev; - } - - if ((__xmlRegisterCallbacks) && (xmlRegisterNodeDefaultValue)) - xmlRegisterNodeDefaultValue((xmlNodePtr)ret); - } else { - if (ctxt->dictNames) - ret = xmlNewNsPropEatName(ctxt->node, namespace, - (xmlChar *) localname, NULL); - else - ret = xmlNewNsProp(ctxt->node, namespace, localname, NULL); - if (ret == NULL) { - xmlErrMemory(ctxt, "xmlSAX2AttributeNs"); - return; - } - } - - if ((ctxt->replaceEntities == 0) && (!ctxt->html)) { - xmlNodePtr tmp; - - /* - * We know that if there is an entity reference, then - * the string has been dup'ed and terminates with 0 - * otherwise with ' or " - */ - if (*valueend != 0) { - tmp = xmlSAX2TextNode(ctxt, value, valueend - value); - ret->children = tmp; - ret->last = tmp; - if (tmp != NULL) { - tmp->doc = ret->doc; - tmp->parent = (xmlNodePtr) ret; - } - } else { - ret->children = xmlStringLenGetNodeList(ctxt->myDoc, value, - valueend - value); - tmp = ret->children; - while (tmp != NULL) { - tmp->doc = ret->doc; - tmp->parent = (xmlNodePtr) ret; - if (tmp->next == NULL) - ret->last = tmp; - tmp = tmp->next; - } - } - } else if (value != NULL) { - xmlNodePtr tmp; - - tmp = xmlSAX2TextNode(ctxt, value, valueend - value); - ret->children = tmp; - ret->last = tmp; - if (tmp != NULL) { - tmp->doc = ret->doc; - tmp->parent = (xmlNodePtr) ret; - } - } - -#ifdef LIBXML_VALID_ENABLED - if ((!ctxt->html) && ctxt->validate && ctxt->wellFormed && - ctxt->myDoc && ctxt->myDoc->intSubset) { - /* - * If we don't substitute entities, the validation should be - * done on a value with replaced entities anyway. - */ - if (!ctxt->replaceEntities) { - dup = xmlSAX2DecodeAttrEntities(ctxt, value, valueend); - if (dup == NULL) { - if (*valueend == 0) { - ctxt->valid &= xmlValidateOneAttribute(&ctxt->vctxt, - ctxt->myDoc, ctxt->node, ret, value); - } else { - /* - * That should already be normalized. - * cheaper to finally allocate here than duplicate - * entry points in the full validation code - */ - dup = xmlStrndup(value, valueend - value); - - ctxt->valid &= xmlValidateOneAttribute(&ctxt->vctxt, - ctxt->myDoc, ctxt->node, ret, dup); - } - } else { - /* - * dup now contains a string of the flattened attribute - * content with entities substitued. Check if we need to - * apply an extra layer of normalization. - * It need to be done twice ... it's an extra burden related - * to the ability to keep references in attributes - */ - if (ctxt->attsSpecial != NULL) { - xmlChar *nvalnorm; - xmlChar fn[50]; - xmlChar *fullname; - - fullname = xmlBuildQName(localname, prefix, fn, 50); - if (fullname != NULL) { - ctxt->vctxt.valid = 1; - nvalnorm = xmlValidCtxtNormalizeAttributeValue( - &ctxt->vctxt, ctxt->myDoc, - ctxt->node, fullname, dup); - if (ctxt->vctxt.valid != 1) - ctxt->valid = 0; - - if ((fullname != fn) && (fullname != localname)) - xmlFree(fullname); - if (nvalnorm != NULL) { - xmlFree(dup); - dup = nvalnorm; - } - } - } - - ctxt->valid &= xmlValidateOneAttribute(&ctxt->vctxt, - ctxt->myDoc, ctxt->node, ret, dup); - } - } else { - /* - * if entities already have been substitued, then - * the attribute as passed is already normalized - */ - dup = xmlStrndup(value, valueend - value); - - ctxt->valid &= xmlValidateOneAttribute(&ctxt->vctxt, - ctxt->myDoc, ctxt->node, ret, dup); - } - } else -#endif /* LIBXML_VALID_ENABLED */ - if (((ctxt->loadsubset & XML_SKIP_IDS) == 0) && - (((ctxt->replaceEntities == 0) && (ctxt->external != 2)) || - ((ctxt->replaceEntities != 0) && (ctxt->inSubset == 0)))) { - /* - * when validating, the ID registration is done at the attribute - * validation level. Otherwise we have to do specific handling here. - */ - if ((prefix == ctxt->str_xml) && - (localname[0] == 'i') && (localname[1] == 'd') && - (localname[2] == 0)) { - /* - * Add the xml:id value - * - * Open issue: normalization of the value. - */ - if (dup == NULL) - dup = xmlStrndup(value, valueend - value); -#if defined(LIBXML_SAX1_ENABLED) || defined(LIBXML_HTML_ENABLED) || defined(LIBXML_WRITER_ENABLED) || defined(LIBXML_DOCB_ENABLED) || defined(LIBXML_LEGACY_ENABLED) -#ifdef LIBXML_VALID_ENABLED - if (xmlValidateNCName(dup, 1) != 0) { - xmlErrValid(ctxt, XML_DTD_XMLID_VALUE, - "xml:id : attribute value %s is not an NCName\n", - (const char *) dup, NULL); - } -#endif -#endif - xmlAddID(&ctxt->vctxt, ctxt->myDoc, dup, ret); - } else if (xmlIsID(ctxt->myDoc, ctxt->node, ret)) { - /* might be worth duplicate entry points and not copy */ - if (dup == NULL) - dup = xmlStrndup(value, valueend - value); - xmlAddID(&ctxt->vctxt, ctxt->myDoc, dup, ret); - } else if (xmlIsRef(ctxt->myDoc, ctxt->node, ret)) { - if (dup == NULL) - dup = xmlStrndup(value, valueend - value); - xmlAddRef(&ctxt->vctxt, ctxt->myDoc, dup, ret); - } - } - if (dup != NULL) - xmlFree(dup); -} - -/** - * xmlSAX2StartElementNs: - * @ctx: the user data (XML parser context) - * @localname: the local name of the element - * @prefix: the element namespace prefix if available - * @URI: the element namespace name if available - * @nb_namespaces: number of namespace definitions on that node - * @namespaces: pointer to the array of prefix/URI pairs namespace definitions - * @nb_attributes: the number of attributes on that node - * @nb_defaulted: the number of defaulted attributes. - * @attributes: pointer to the array of (localname/prefix/URI/value/end) - * attribute values. - * - * SAX2 callback when an element start has been detected by the parser. - * It provides the namespace informations for the element, as well as - * the new namespace declarations on the element. - */ -void -xmlSAX2StartElementNs(void *ctx, - const xmlChar *localname, - const xmlChar *prefix, - const xmlChar *URI, - int nb_namespaces, - const xmlChar **namespaces, - int nb_attributes, - int nb_defaulted, - const xmlChar **attributes) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - xmlNodePtr ret; - xmlNodePtr parent; - xmlNsPtr last = NULL, ns; - const xmlChar *uri, *pref; - xmlChar *lname = NULL; - int i, j; - - if (ctx == NULL) return; - parent = ctxt->node; - /* - * First check on validity: - */ - if (ctxt->validate && (ctxt->myDoc->extSubset == NULL) && - ((ctxt->myDoc->intSubset == NULL) || - ((ctxt->myDoc->intSubset->notations == NULL) && - (ctxt->myDoc->intSubset->elements == NULL) && - (ctxt->myDoc->intSubset->attributes == NULL) && - (ctxt->myDoc->intSubset->entities == NULL)))) { - xmlErrValid(ctxt, XML_DTD_NO_DTD, - "Validation failed: no DTD found !", NULL, NULL); - ctxt->validate = 0; - } - - /* - * Take care of the rare case of an undefined namespace prefix - */ - if ((prefix != NULL) && (URI == NULL)) { - if (ctxt->dictNames) { - const xmlChar *fullname; - - fullname = xmlDictQLookup(ctxt->dict, prefix, localname); - if (fullname != NULL) - localname = fullname; - } else { - lname = xmlBuildQName(localname, prefix, NULL, 0); - } - } - /* - * allocate the node - */ - if (ctxt->freeElems != NULL) { - ret = ctxt->freeElems; - ctxt->freeElems = ret->next; - ctxt->freeElemsNr--; - memset(ret, 0, sizeof(xmlNode)); - ret->type = XML_ELEMENT_NODE; - - if (ctxt->dictNames) - ret->name = localname; - else { - if (lname == NULL) - ret->name = xmlStrdup(localname); - else - ret->name = lname; - if (ret->name == NULL) { - xmlSAX2ErrMemory(ctxt, "xmlSAX2StartElementNs"); - return; - } - } - if ((__xmlRegisterCallbacks) && (xmlRegisterNodeDefaultValue)) - xmlRegisterNodeDefaultValue(ret); - } else { - if (ctxt->dictNames) - ret = xmlNewDocNodeEatName(ctxt->myDoc, NULL, - (xmlChar *) localname, NULL); - else if (lname == NULL) - ret = xmlNewDocNode(ctxt->myDoc, NULL, localname, NULL); - else - ret = xmlNewDocNodeEatName(ctxt->myDoc, NULL, - (xmlChar *) lname, NULL); - if (ret == NULL) { - xmlSAX2ErrMemory(ctxt, "xmlSAX2StartElementNs"); - return; - } - } - if (ctxt->linenumbers) { - if (ctxt->input != NULL) { - if (ctxt->input->line < 65535) - ret->line = (short) ctxt->input->line; - else - ret->line = 65535; - } - } - - if (parent == NULL) { - xmlAddChild((xmlNodePtr) ctxt->myDoc, (xmlNodePtr) ret); - } - /* - * Build the namespace list - */ - for (i = 0,j = 0;j < nb_namespaces;j++) { - pref = namespaces[i++]; - uri = namespaces[i++]; - ns = xmlNewNs(NULL, uri, pref); - if (ns != NULL) { - if (last == NULL) { - ret->nsDef = last = ns; - } else { - last->next = ns; - last = ns; - } - if ((URI != NULL) && (prefix == pref)) - ret->ns = ns; - } else { - /* - * any out of memory error would already have been raised - * but we can't be garanteed it's the actual error due to the - * API, best is to skip in this case - */ - continue; - } -#ifdef LIBXML_VALID_ENABLED - if ((!ctxt->html) && ctxt->validate && ctxt->wellFormed && - ctxt->myDoc && ctxt->myDoc->intSubset) { - ctxt->valid &= xmlValidateOneNamespace(&ctxt->vctxt, ctxt->myDoc, - ret, prefix, ns, uri); - } -#endif /* LIBXML_VALID_ENABLED */ - } - ctxt->nodemem = -1; - - /* - * We are parsing a new node. - */ - nodePush(ctxt, ret); - - /* - * Link the child element - */ - if (parent != NULL) { - if (parent->type == XML_ELEMENT_NODE) { - xmlAddChild(parent, ret); - } else { - xmlAddSibling(parent, ret); - } - } - - /* - * Insert the defaulted attributes from the DTD only if requested: - */ - if ((nb_defaulted != 0) && - ((ctxt->loadsubset & XML_COMPLETE_ATTRS) == 0)) - nb_attributes -= nb_defaulted; - - /* - * Search the namespace if it wasn't already found - * Note that, if prefix is NULL, this searches for the default Ns - */ - if ((URI != NULL) && (ret->ns == NULL)) { - ret->ns = xmlSearchNs(ctxt->myDoc, parent, prefix); - if ((ret->ns == NULL) && (xmlStrEqual(prefix, BAD_CAST "xml"))) { - ret->ns = xmlSearchNs(ctxt->myDoc, ret, prefix); - } - if (ret->ns == NULL) { - ns = xmlNewNs(ret, NULL, prefix); - if (ns == NULL) { - - xmlSAX2ErrMemory(ctxt, "xmlSAX2StartElementNs"); - return; - } - if (prefix != NULL) - xmlNsWarnMsg(ctxt, XML_NS_ERR_UNDEFINED_NAMESPACE, - "Namespace prefix %s was not found\n", - prefix, NULL); - else - xmlNsWarnMsg(ctxt, XML_NS_ERR_UNDEFINED_NAMESPACE, - "Namespace default prefix was not found\n", - NULL, NULL); - } - } - - /* - * process all the other attributes - */ - if (nb_attributes > 0) { - for (j = 0,i = 0;i < nb_attributes;i++,j+=5) { - /* - * Handle the rare case of an undefined atribute prefix - */ - if ((attributes[j+1] != NULL) && (attributes[j+2] == NULL)) { - if (ctxt->dictNames) { - const xmlChar *fullname; - - fullname = xmlDictQLookup(ctxt->dict, attributes[j+1], - attributes[j]); - if (fullname != NULL) { - xmlSAX2AttributeNs(ctxt, fullname, NULL, - attributes[j+3], attributes[j+4]); - continue; - } - } else { - lname = xmlBuildQName(attributes[j], attributes[j+1], - NULL, 0); - if (lname != NULL) { - xmlSAX2AttributeNs(ctxt, lname, NULL, - attributes[j+3], attributes[j+4]); - xmlFree(lname); - continue; - } - } - } - xmlSAX2AttributeNs(ctxt, attributes[j], attributes[j+1], - attributes[j+3], attributes[j+4]); - } - } - -#ifdef LIBXML_VALID_ENABLED - /* - * If it's the Document root, finish the DTD validation and - * check the document root element for validity - */ - if ((ctxt->validate) && (ctxt->vctxt.finishDtd == XML_CTXT_FINISH_DTD_0)) { - int chk; - - chk = xmlValidateDtdFinal(&ctxt->vctxt, ctxt->myDoc); - if (chk <= 0) - ctxt->valid = 0; - if (chk < 0) - ctxt->wellFormed = 0; - ctxt->valid &= xmlValidateRoot(&ctxt->vctxt, ctxt->myDoc); - ctxt->vctxt.finishDtd = XML_CTXT_FINISH_DTD_1; - } -#endif /* LIBXML_VALID_ENABLED */ -} - -/** - * xmlSAX2EndElementNs: - * @ctx: the user data (XML parser context) - * @localname: the local name of the element - * @prefix: the element namespace prefix if available - * @URI: the element namespace name if available - * - * SAX2 callback when an element end has been detected by the parser. - * It provides the namespace informations for the element. - */ -void -xmlSAX2EndElementNs(void *ctx, - const xmlChar * localname ATTRIBUTE_UNUSED, - const xmlChar * prefix ATTRIBUTE_UNUSED, - const xmlChar * URI ATTRIBUTE_UNUSED) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - xmlParserNodeInfo node_info; - xmlNodePtr cur; - - if (ctx == NULL) return; - cur = ctxt->node; - /* Capture end position and add node */ - if ((ctxt->record_info) && (cur != NULL)) { - node_info.end_pos = ctxt->input->cur - ctxt->input->base; - node_info.end_line = ctxt->input->line; - node_info.node = cur; - xmlParserAddNodeInfo(ctxt, &node_info); - } - ctxt->nodemem = -1; - -#ifdef LIBXML_VALID_ENABLED - if (ctxt->validate && ctxt->wellFormed && - ctxt->myDoc && ctxt->myDoc->intSubset) - ctxt->valid &= xmlValidateOneElement(&ctxt->vctxt, ctxt->myDoc, cur); -#endif /* LIBXML_VALID_ENABLED */ - - /* - * end of parsing of this node. - */ - nodePop(ctxt); -} - -/** - * xmlSAX2Reference: - * @ctx: the user data (XML parser context) - * @name: The entity name - * - * called when an entity xmlSAX2Reference is detected. - */ -void -xmlSAX2Reference(void *ctx, const xmlChar *name) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - xmlNodePtr ret; - - if (ctx == NULL) return; -#ifdef DEBUG_SAX - xmlGenericError(xmlGenericErrorContext, - "SAX.xmlSAX2Reference(%s)\n", name); -#endif - if (name[0] == '#') - ret = xmlNewCharRef(ctxt->myDoc, name); - else - ret = xmlNewReference(ctxt->myDoc, name); -#ifdef DEBUG_SAX_TREE - xmlGenericError(xmlGenericErrorContext, - "add xmlSAX2Reference %s to %s \n", name, ctxt->node->name); -#endif - if (xmlAddChild(ctxt->node, ret) == NULL) { - xmlFreeNode(ret); - } -} - -/** - * xmlSAX2Characters: - * @ctx: the user data (XML parser context) - * @ch: a xmlChar string - * @len: the number of xmlChar - * - * receiving some chars from the parser. - */ -void -xmlSAX2Characters(void *ctx, const xmlChar *ch, int len) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - xmlNodePtr lastChild; - - if (ctx == NULL) return; -#ifdef DEBUG_SAX - xmlGenericError(xmlGenericErrorContext, - "SAX.xmlSAX2Characters(%.30s, %d)\n", ch, len); -#endif - /* - * Handle the data if any. If there is no child - * add it as content, otherwise if the last child is text, - * concatenate it, else create a new node of type text. - */ - - if (ctxt->node == NULL) { -#ifdef DEBUG_SAX_TREE - xmlGenericError(xmlGenericErrorContext, - "add chars: ctxt->node == NULL !\n"); -#endif - return; - } - lastChild = ctxt->node->last; -#ifdef DEBUG_SAX_TREE - xmlGenericError(xmlGenericErrorContext, - "add chars to %s \n", ctxt->node->name); -#endif - - /* - * Here we needed an accelerator mechanism in case of very large - * elements. Use an attribute in the structure !!! - */ - if (lastChild == NULL) { - lastChild = xmlSAX2TextNode(ctxt, ch, len); - if (lastChild != NULL) { - ctxt->node->children = lastChild; - ctxt->node->last = lastChild; - lastChild->parent = ctxt->node; - lastChild->doc = ctxt->node->doc; - ctxt->nodelen = len; - ctxt->nodemem = len + 1; - } else { - xmlSAX2ErrMemory(ctxt, "xmlSAX2Characters"); - return; - } - } else { - int coalesceText = (lastChild != NULL) && - (lastChild->type == XML_TEXT_NODE) && - (lastChild->name == xmlStringText); - if ((coalesceText) && (ctxt->nodemem != 0)) { - /* - * The whole point of maintaining nodelen and nodemem, - * xmlTextConcat is too costly, i.e. compute length, - * reallocate a new buffer, move data, append ch. Here - * We try to minimaze realloc() uses and avoid copying - * and recomputing length over and over. - */ - if (lastChild->content == (xmlChar *)&(lastChild->properties)) { - lastChild->content = xmlStrdup(lastChild->content); - lastChild->properties = NULL; - } else if ((ctxt->nodemem == ctxt->nodelen + 1) && - (xmlDictOwns(ctxt->dict, lastChild->content))) { - lastChild->content = xmlStrdup(lastChild->content); - } - if (lastChild->content == NULL) { - xmlSAX2ErrMemory(ctxt, "xmlSAX2Characters: xmlStrdup returned NULL"); - return; - } - if (((size_t)ctxt->nodelen + (size_t)len > XML_MAX_TEXT_LENGTH) && - ((ctxt->options & XML_PARSE_HUGE) == 0)) { - xmlSAX2ErrMemory(ctxt, "xmlSAX2Characters: huge text node"); - return; - } - if ((size_t)ctxt->nodelen > SIZE_T_MAX - (size_t)len || - (size_t)ctxt->nodemem + (size_t)len > SIZE_T_MAX / 2) { - xmlSAX2ErrMemory(ctxt, "xmlSAX2Characters overflow prevented"); - return; - } - if (ctxt->nodelen + len >= ctxt->nodemem) { - xmlChar *newbuf; - size_t size; - - size = ctxt->nodemem + len; - size *= 2; - newbuf = (xmlChar *) xmlRealloc(lastChild->content,size); - if (newbuf == NULL) { - xmlSAX2ErrMemory(ctxt, "xmlSAX2Characters"); - return; - } - ctxt->nodemem = size; - lastChild->content = newbuf; - } - memcpy(&lastChild->content[ctxt->nodelen], ch, len); - ctxt->nodelen += len; - lastChild->content[ctxt->nodelen] = 0; - } else if (coalesceText) { - if (xmlTextConcat(lastChild, ch, len)) { - xmlSAX2ErrMemory(ctxt, "xmlSAX2Characters"); - } - if (ctxt->node->children != NULL) { - ctxt->nodelen = xmlStrlen(lastChild->content); - ctxt->nodemem = ctxt->nodelen + 1; - } - } else { - /* Mixed content, first time */ - lastChild = xmlSAX2TextNode(ctxt, ch, len); - if (lastChild != NULL) { - xmlAddChild(ctxt->node, lastChild); - if (ctxt->node->children != NULL) { - ctxt->nodelen = len; - ctxt->nodemem = len + 1; - } - } - } - } -} - -/** - * xmlSAX2IgnorableWhitespace: - * @ctx: the user data (XML parser context) - * @ch: a xmlChar string - * @len: the number of xmlChar - * - * receiving some ignorable whitespaces from the parser. - * UNUSED: by default the DOM building will use xmlSAX2Characters - */ -void -xmlSAX2IgnorableWhitespace(void *ctx ATTRIBUTE_UNUSED, const xmlChar *ch ATTRIBUTE_UNUSED, int len ATTRIBUTE_UNUSED) -{ - /* xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; */ -#ifdef DEBUG_SAX - xmlGenericError(xmlGenericErrorContext, - "SAX.xmlSAX2IgnorableWhitespace(%.30s, %d)\n", ch, len); -#endif -} - -/** - * xmlSAX2ProcessingInstruction: - * @ctx: the user data (XML parser context) - * @target: the target name - * @data: the PI data's - * - * A processing instruction has been parsed. - */ -void -xmlSAX2ProcessingInstruction(void *ctx, const xmlChar *target, - const xmlChar *data) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - xmlNodePtr ret; - xmlNodePtr parent; - - if (ctx == NULL) return; - parent = ctxt->node; -#ifdef DEBUG_SAX - xmlGenericError(xmlGenericErrorContext, - "SAX.xmlSAX2ProcessingInstruction(%s, %s)\n", target, data); -#endif - - ret = xmlNewDocPI(ctxt->myDoc, target, data); - if (ret == NULL) return; - - if (ctxt->linenumbers) { - if (ctxt->input != NULL) { - if (ctxt->input->line < 65535) - ret->line = (short) ctxt->input->line; - else - ret->line = 65535; - } - } - if (ctxt->inSubset == 1) { - xmlAddChild((xmlNodePtr) ctxt->myDoc->intSubset, ret); - return; - } else if (ctxt->inSubset == 2) { - xmlAddChild((xmlNodePtr) ctxt->myDoc->extSubset, ret); - return; - } - if (parent == NULL) { -#ifdef DEBUG_SAX_TREE - xmlGenericError(xmlGenericErrorContext, - "Setting PI %s as root\n", target); -#endif - xmlAddChild((xmlNodePtr) ctxt->myDoc, (xmlNodePtr) ret); - return; - } - if (parent->type == XML_ELEMENT_NODE) { -#ifdef DEBUG_SAX_TREE - xmlGenericError(xmlGenericErrorContext, - "adding PI %s child to %s\n", target, parent->name); -#endif - xmlAddChild(parent, ret); - } else { -#ifdef DEBUG_SAX_TREE - xmlGenericError(xmlGenericErrorContext, - "adding PI %s sibling to ", target); - xmlDebugDumpOneNode(stderr, parent, 0); -#endif - xmlAddSibling(parent, ret); - } -} - -/** - * xmlSAX2Comment: - * @ctx: the user data (XML parser context) - * @value: the xmlSAX2Comment content - * - * A xmlSAX2Comment has been parsed. - */ -void -xmlSAX2Comment(void *ctx, const xmlChar *value) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - xmlNodePtr ret; - xmlNodePtr parent; - - if (ctx == NULL) return; - parent = ctxt->node; -#ifdef DEBUG_SAX - xmlGenericError(xmlGenericErrorContext, "SAX.xmlSAX2Comment(%s)\n", value); -#endif - ret = xmlNewDocComment(ctxt->myDoc, value); - if (ret == NULL) return; - if (ctxt->linenumbers) { - if (ctxt->input != NULL) { - if (ctxt->input->line < 65535) - ret->line = (short) ctxt->input->line; - else - ret->line = 65535; - } - } - - if (ctxt->inSubset == 1) { - xmlAddChild((xmlNodePtr) ctxt->myDoc->intSubset, ret); - return; - } else if (ctxt->inSubset == 2) { - xmlAddChild((xmlNodePtr) ctxt->myDoc->extSubset, ret); - return; - } - if (parent == NULL) { -#ifdef DEBUG_SAX_TREE - xmlGenericError(xmlGenericErrorContext, - "Setting xmlSAX2Comment as root\n"); -#endif - xmlAddChild((xmlNodePtr) ctxt->myDoc, (xmlNodePtr) ret); - return; - } - if (parent->type == XML_ELEMENT_NODE) { -#ifdef DEBUG_SAX_TREE - xmlGenericError(xmlGenericErrorContext, - "adding xmlSAX2Comment child to %s\n", parent->name); -#endif - xmlAddChild(parent, ret); - } else { -#ifdef DEBUG_SAX_TREE - xmlGenericError(xmlGenericErrorContext, - "adding xmlSAX2Comment sibling to "); - xmlDebugDumpOneNode(stderr, parent, 0); -#endif - xmlAddSibling(parent, ret); - } -} - -/** - * xmlSAX2CDataBlock: - * @ctx: the user data (XML parser context) - * @value: The pcdata content - * @len: the block length - * - * called when a pcdata block has been parsed - */ -void -xmlSAX2CDataBlock(void *ctx, const xmlChar *value, int len) -{ - xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx; - xmlNodePtr ret, lastChild; - - if (ctx == NULL) return; -#ifdef DEBUG_SAX - xmlGenericError(xmlGenericErrorContext, - "SAX.pcdata(%.10s, %d)\n", value, len); -#endif - lastChild = xmlGetLastChild(ctxt->node); -#ifdef DEBUG_SAX_TREE - xmlGenericError(xmlGenericErrorContext, - "add chars to %s \n", ctxt->node->name); -#endif - if ((lastChild != NULL) && - (lastChild->type == XML_CDATA_SECTION_NODE)) { - xmlTextConcat(lastChild, value, len); - } else { - ret = xmlNewCDataBlock(ctxt->myDoc, value, len); - if (xmlAddChild(ctxt->node, ret) == NULL) - xmlFreeNode(ret); - } -} - -static int xmlSAX2DefaultVersionValue = 2; - -#ifdef LIBXML_SAX1_ENABLED -/** - * xmlSAXDefaultVersion: - * @version: the version, 1 or 2 - * - * Set the default version of SAX used globally by the library. - * By default, during initialization the default is set to 2. - * Note that it is generally a better coding style to use - * xmlSAXVersion() to set up the version explicitly for a given - * parsing context. - * - * Returns the previous value in case of success and -1 in case of error. - */ -int -xmlSAXDefaultVersion(int version) -{ - int ret = xmlSAX2DefaultVersionValue; - - if ((version != 1) && (version != 2)) - return(-1); - xmlSAX2DefaultVersionValue = version; - return(ret); -} -#endif /* LIBXML_SAX1_ENABLED */ - -/** - * xmlSAXVersion: - * @hdlr: the SAX handler - * @version: the version, 1 or 2 - * - * Initialize the default XML SAX handler according to the version - * - * Returns 0 in case of success and -1 in case of error. - */ -int -xmlSAXVersion(xmlSAXHandler *hdlr, int version) -{ - if (hdlr == NULL) return(-1); - if (version == 2) { - hdlr->startElement = NULL; - hdlr->endElement = NULL; - hdlr->startElementNs = xmlSAX2StartElementNs; - hdlr->endElementNs = xmlSAX2EndElementNs; - hdlr->serror = NULL; - hdlr->initialized = XML_SAX2_MAGIC; -#ifdef LIBXML_SAX1_ENABLED - } else if (version == 1) { - hdlr->startElement = xmlSAX2StartElement; - hdlr->endElement = xmlSAX2EndElement; - hdlr->initialized = 1; -#endif /* LIBXML_SAX1_ENABLED */ - } else - return(-1); - hdlr->internalSubset = xmlSAX2InternalSubset; - hdlr->externalSubset = xmlSAX2ExternalSubset; - hdlr->isStandalone = xmlSAX2IsStandalone; - hdlr->hasInternalSubset = xmlSAX2HasInternalSubset; - hdlr->hasExternalSubset = xmlSAX2HasExternalSubset; - hdlr->resolveEntity = xmlSAX2ResolveEntity; - hdlr->getEntity = xmlSAX2GetEntity; - hdlr->getParameterEntity = xmlSAX2GetParameterEntity; - hdlr->entityDecl = xmlSAX2EntityDecl; - hdlr->attributeDecl = xmlSAX2AttributeDecl; - hdlr->elementDecl = xmlSAX2ElementDecl; - hdlr->notationDecl = xmlSAX2NotationDecl; - hdlr->unparsedEntityDecl = xmlSAX2UnparsedEntityDecl; - hdlr->setDocumentLocator = xmlSAX2SetDocumentLocator; - hdlr->startDocument = xmlSAX2StartDocument; - hdlr->endDocument = xmlSAX2EndDocument; - hdlr->reference = xmlSAX2Reference; - hdlr->characters = xmlSAX2Characters; - hdlr->cdataBlock = xmlSAX2CDataBlock; - hdlr->ignorableWhitespace = xmlSAX2Characters; - hdlr->processingInstruction = xmlSAX2ProcessingInstruction; - hdlr->comment = xmlSAX2Comment; - hdlr->warning = xmlParserWarning; - hdlr->error = xmlParserError; - hdlr->fatalError = xmlParserError; - - return(0); -} - -/** - * xmlSAX2InitDefaultSAXHandler: - * @hdlr: the SAX handler - * @warning: flag if non-zero sets the handler warning procedure - * - * Initialize the default XML SAX2 handler - */ -void -xmlSAX2InitDefaultSAXHandler(xmlSAXHandler *hdlr, int warning) -{ - if ((hdlr == NULL) || (hdlr->initialized != 0)) - return; - - xmlSAXVersion(hdlr, xmlSAX2DefaultVersionValue); - if (warning == 0) - hdlr->warning = NULL; - else - hdlr->warning = xmlParserWarning; -} - -/** - * xmlDefaultSAXHandlerInit: - * - * Initialize the default SAX2 handler - */ -void -xmlDefaultSAXHandlerInit(void) -{ -#ifdef LIBXML_SAX1_ENABLED - xmlSAXVersion((xmlSAXHandlerPtr) &xmlDefaultSAXHandler, 1); -#endif /* LIBXML_SAX1_ENABLED */ -} - -#ifdef LIBXML_HTML_ENABLED - -/** - * xmlSAX2InitHtmlDefaultSAXHandler: - * @hdlr: the SAX handler - * - * Initialize the default HTML SAX2 handler - */ -void -xmlSAX2InitHtmlDefaultSAXHandler(xmlSAXHandler *hdlr) -{ - if ((hdlr == NULL) || (hdlr->initialized != 0)) - return; - - hdlr->internalSubset = xmlSAX2InternalSubset; - hdlr->externalSubset = NULL; - hdlr->isStandalone = NULL; - hdlr->hasInternalSubset = NULL; - hdlr->hasExternalSubset = NULL; - hdlr->resolveEntity = NULL; - hdlr->getEntity = xmlSAX2GetEntity; - hdlr->getParameterEntity = NULL; - hdlr->entityDecl = NULL; - hdlr->attributeDecl = NULL; - hdlr->elementDecl = NULL; - hdlr->notationDecl = NULL; - hdlr->unparsedEntityDecl = NULL; - hdlr->setDocumentLocator = xmlSAX2SetDocumentLocator; - hdlr->startDocument = xmlSAX2StartDocument; - hdlr->endDocument = xmlSAX2EndDocument; - hdlr->startElement = xmlSAX2StartElement; - hdlr->endElement = xmlSAX2EndElement; - hdlr->reference = NULL; - hdlr->characters = xmlSAX2Characters; - hdlr->cdataBlock = xmlSAX2CDataBlock; - hdlr->ignorableWhitespace = xmlSAX2IgnorableWhitespace; - hdlr->processingInstruction = xmlSAX2ProcessingInstruction; - hdlr->comment = xmlSAX2Comment; - hdlr->warning = xmlParserWarning; - hdlr->error = xmlParserError; - hdlr->fatalError = xmlParserError; - - hdlr->initialized = 1; -} - -/** - * htmlDefaultSAXHandlerInit: - * - * Initialize the default SAX handler - */ -void -htmlDefaultSAXHandlerInit(void) -{ - xmlSAX2InitHtmlDefaultSAXHandler((xmlSAXHandlerPtr) &htmlDefaultSAXHandler); -} - -#endif /* LIBXML_HTML_ENABLED */ - -#ifdef LIBXML_DOCB_ENABLED - -/** - * xmlSAX2InitDocbDefaultSAXHandler: - * @hdlr: the SAX handler - * - * Initialize the default DocBook SAX2 handler - */ -void -xmlSAX2InitDocbDefaultSAXHandler(xmlSAXHandler *hdlr) -{ - if ((hdlr == NULL) || (hdlr->initialized != 0)) - return; - - hdlr->internalSubset = xmlSAX2InternalSubset; - hdlr->externalSubset = NULL; - hdlr->isStandalone = xmlSAX2IsStandalone; - hdlr->hasInternalSubset = xmlSAX2HasInternalSubset; - hdlr->hasExternalSubset = xmlSAX2HasExternalSubset; - hdlr->resolveEntity = xmlSAX2ResolveEntity; - hdlr->getEntity = xmlSAX2GetEntity; - hdlr->getParameterEntity = NULL; - hdlr->entityDecl = xmlSAX2EntityDecl; - hdlr->attributeDecl = NULL; - hdlr->elementDecl = NULL; - hdlr->notationDecl = NULL; - hdlr->unparsedEntityDecl = NULL; - hdlr->setDocumentLocator = xmlSAX2SetDocumentLocator; - hdlr->startDocument = xmlSAX2StartDocument; - hdlr->endDocument = xmlSAX2EndDocument; - hdlr->startElement = xmlSAX2StartElement; - hdlr->endElement = xmlSAX2EndElement; - hdlr->reference = xmlSAX2Reference; - hdlr->characters = xmlSAX2Characters; - hdlr->cdataBlock = NULL; - hdlr->ignorableWhitespace = xmlSAX2IgnorableWhitespace; - hdlr->processingInstruction = NULL; - hdlr->comment = xmlSAX2Comment; - hdlr->warning = xmlParserWarning; - hdlr->error = xmlParserError; - hdlr->fatalError = xmlParserError; - - hdlr->initialized = 1; -} - -/** - * docbDefaultSAXHandlerInit: - * - * Initialize the default SAX handler - */ -void -docbDefaultSAXHandlerInit(void) -{ - xmlSAX2InitDocbDefaultSAXHandler((xmlSAXHandlerPtr) &docbDefaultSAXHandler); -} - -#endif /* LIBXML_DOCB_ENABLED */ -#define bottom_SAX2 -#include "elfgcchack.h" |