开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 通讯/手机编程 > Symbian > 查看源码
xmlparse.c
资源名称：142_61_thumb_advanced.rar　[点击查看]
上传用户：dangjiwu
上传日期：2013-07-19
资源大小：42019k
文件大小：114k
源码类别：

Symbian

开发平台：

Visual C++

xmlparse.c：源码内容
  1. /*
  2. Copyright (c) 1998, 1999, 2000 Thai Open Source Software Center Ltd
  3. See the file copying.txt for copying permission.
  4. */
  6. #include "xmldef.h"
  7. #include "xmlparse.h"
  8. #include <stddef.h>
  10. #ifdef _WINCE
  11. #ifndef _ABORT_DEFINED
  12. #ifdef _WINDOWS
  13. #include <windows.h>
  14. #endif  //_WINDOWS
  15. # define abort() TerminateProcess(GetCurrentProcess(), 0)
  16. # define _ABORT_DEFINED
  17. #endif
  18. #endif //_WINCE
  21. #ifdef XML_UNICODE
  22. #define XML_ENCODE_MAX XML_UTF16_ENCODE_MAX
  23. #define XmlConvert XmlUtf16Convert
  24. #define XmlGetInternalEncoding XmlGetUtf16InternalEncoding
  25. #define XmlGetInternalEncodingNS XmlGetUtf16InternalEncodingNS
  26. #define XmlEncode XmlUtf16Encode
  27. #define MUST_CONVERT(enc, s) (!(enc)->isUtf16 || (((unsigned long)s) & 1))
  28. typedef unsigned short ICHAR;
  29. #else
  30. #define XML_ENCODE_MAX XML_UTF8_ENCODE_MAX
  31. #define XmlConvert XmlUtf8Convert
  32. #define XmlGetInternalEncoding XmlGetUtf8InternalEncoding
  33. #define XmlGetInternalEncodingNS XmlGetUtf8InternalEncodingNS
  34. #define XmlEncode XmlUtf8Encode
  35. #define MUST_CONVERT(enc, s) (!(enc)->isUtf8)
  36. typedef char ICHAR;
  37. #endif
  39. #ifndef XML_NS
  41. #define XmlInitEncodingNS XmlInitEncoding
  42. #define XmlInitUnknownEncodingNS XmlInitUnknownEncoding
  43. #undef XmlGetInternalEncodingNS
  44. #define XmlGetInternalEncodingNS XmlGetInternalEncoding
  45. #define XmlParseXmlDeclNS XmlParseXmlDecl
  47. #endif
  49. #ifdef XML_UNICODE_WCHAR_T
  50. #define XML_T(x) L ## x
  51. #else
  52. #define XML_T(x) x
  53. #endif
  55. /* Round up n to be a multiple of sz, where sz is a power of 2. */
  56. #define ROUND_UP(n, sz) (((n) + ((sz) - 1)) & ~((sz) - 1))
  58. #include "xmltok.h"
  59. #include "xmlrole.h"
  61. typedef const XML_Char *KEY;
  63. typedef struct {
  64.   KEY name;
  65. } NAMED;
  67. typedef struct {
  68.   NAMED **v;
  69.   size_t size;
  70.   size_t used;
  71.   size_t usedLim;
  72. } HASH_TABLE;
  74. typedef struct {
  75.   NAMED **p;
  76.   NAMED **end;
  77. } HASH_TABLE_ITER;
  79. #define INIT_TAG_BUF_SIZE 32  /* must be a multiple of sizeof(XML_Char) */
  80. #define INIT_DATA_BUF_SIZE 1024
  81. #define INIT_ATTS_SIZE 16
  82. #define INIT_BLOCK_SIZE 1024
  83. #define INIT_BUFFER_SIZE 1024
  85. #define EXPAND_SPARE 24
  87. typedef struct binding {
  88.   struct prefix *prefix;
  89.   struct binding *nextTagBinding;
  90.   struct binding *prevPrefixBinding;
  91.   const struct attribute_id *attId;
  92.   XML_Char *uri;
  93.   int uriLen;
  94.   int uriAlloc;
  95. } BINDING;
  97. typedef struct prefix {
  98.   const XML_Char *name;
  99.   BINDING *binding;
  100. } PREFIX;
  102. typedef struct {
  103.   const XML_Char *str;
  104.   const XML_Char *localPart;
  105.   int uriLen;
  106. } TAG_NAME;
  108. typedef struct tag {
  109.   struct tag *parent;
  110.   const char *rawName;
  111.   int rawNameLength;
  112.   TAG_NAME name;
  113.   char *buf;
  114.   char *bufEnd;
  115.   BINDING *bindings;
  116. } TAG;
  118. typedef struct {
  119.   const XML_Char *name;
  120.   const XML_Char *textPtr;
  121.   int textLen;
  122.   const XML_Char *systemId;
  123.   const XML_Char *base;
  124.   const XML_Char *publicId;
  125.   const XML_Char *notation;
  126.   char open;
  127. } ENTITY;
  129. typedef struct block {
  130.   struct block *next;
  131.   int size;
  132.   XML_Char s[1];
  133. } BLOCK;
  135. typedef struct {
  136.   BLOCK *blocks;
  137.   BLOCK *freeBlocks;
  138.   const XML_Char *end;
  139.   XML_Char *ptr;
  140.   XML_Char *start;
  141. } STRING_POOL;
  143. /* The XML_Char before the name is used to determine whether
  144. an attribute has been specified. */
  145. typedef struct attribute_id {
  146.   XML_Char *name;
  147.   PREFIX *prefix;
  148.   char maybeTokenized;
  149.   char xmlns;
  150. } ATTRIBUTE_ID;
  152. typedef struct {
  153.   const ATTRIBUTE_ID *id;
  154.   char isCdata;
  155.   const XML_Char *value;
  156. } DEFAULT_ATTRIBUTE;
  158. typedef struct {
  159.   const XML_Char *name;
  160.   PREFIX *prefix;
  161.   const ATTRIBUTE_ID *idAtt;
  162.   int nDefaultAtts;
  163.   int allocDefaultAtts;
  164.   DEFAULT_ATTRIBUTE *defaultAtts;
  165. } ELEMENT_TYPE;
  167. typedef struct {
  168.   HASH_TABLE generalEntities;
  169.   HASH_TABLE elementTypes;
  170.   HASH_TABLE attributeIds;
  171.   HASH_TABLE prefixes;
  172.   STRING_POOL pool;
  173.   int complete;
  174.   int standalone;
  175. #ifdef XML_DTD
  176.   HASH_TABLE paramEntities;
  177. #endif /* XML_DTD */
  178.   PREFIX defaultPrefix;
  179. } DTD;
  181. typedef struct open_internal_entity {
  182.   const char *internalEventPtr;
  183.   const char *internalEventEndPtr;
  184.   struct open_internal_entity *next;
  185.   ENTITY *entity;
  186. } OPEN_INTERNAL_ENTITY;
  188. typedef enum XML_Error Processor(XML_Parser parser,
  189.  const char *start,
  190.  const char *end,
  191.  const char **endPtr);
  193. static Processor prologProcessor;
  194. static Processor prologInitProcessor;
  195. static Processor contentProcessor;
  196. static Processor cdataSectionProcessor;
  197. #ifdef XML_DTD
  198. static Processor ignoreSectionProcessor;
  199. #endif /* XML_DTD */
  200. static Processor epilogProcessor;
  201. static Processor errorProcessor;
  202. static Processor externalEntityInitProcessor;
  203. static Processor externalEntityInitProcessor2;
  204. static Processor externalEntityInitProcessor3;
  205. static Processor externalEntityContentProcessor;
  207. static enum XML_Error
  208. handleUnknownEncoding(XML_Parser parser, const XML_Char *encodingName);
  209. static enum XML_Error
  210. processXmlDecl(XML_Parser parser, int isGeneralTextEntity, const char *, const char *);
  211. static enum XML_Error
  212. initializeEncoding(XML_Parser parser);
  213. static enum XML_Error
  214. doProlog(XML_Parser parser, const ENCODING *enc, const char *s,
  215.  const char *end, int tok, const char *next, const char **nextPtr);
  216. static enum XML_Error
  217. processInternalParamEntity(XML_Parser parser, ENTITY *entity);
  218. static enum XML_Error
  219. doContent(XML_Parser parser, int startTagLevel, const ENCODING *enc,
  220.   const char *start, const char *end, const char **endPtr);
  221. static enum XML_Error
  222. doCdataSection(XML_Parser parser, const ENCODING *, const char **startPtr, const char *end, const char **nextPtr);
  223. #ifdef XML_DTD
  224. static enum XML_Error
  225. doIgnoreSection(XML_Parser parser, const ENCODING *, const char **startPtr, const char *end, const char **nextPtr);
  226. #endif /* XML_DTD */
  227. static enum XML_Error storeAtts(XML_Parser parser, const ENCODING *, const char *s,
  228. TAG_NAME *tagNamePtr, BINDING **bindingsPtr);
  229. static
  230. int addBinding(XML_Parser parser, PREFIX *prefix, const ATTRIBUTE_ID *attId, const XML_Char *uri, BINDING **bindingsPtr);
  231. static int
  232. defineAttribute(ELEMENT_TYPE *type, ATTRIBUTE_ID *, int isCdata, int isId, const XML_Char *dfltValue);
  233. static enum XML_Error
  234. storeAttributeValue(XML_Parser parser, const ENCODING *, int isCdata, const char *, const char *,
  235.     STRING_POOL *);
  236. static enum XML_Error
  237. appendAttributeValue(XML_Parser parser, const ENCODING *, int isCdata, const char *, const char *,
  238.     STRING_POOL *);
  239. static ATTRIBUTE_ID *
  240. getAttributeId(XML_Parser parser, const ENCODING *enc, const char *start, const char *end);
  241. static int setElementTypePrefix(XML_Parser parser, ELEMENT_TYPE *);
  242. static enum XML_Error
  243. storeEntityValue(XML_Parser parser, const ENCODING *enc, const char *start, const char *end);
  244. static int
  245. reportProcessingInstruction(XML_Parser parser, const ENCODING *enc, const char *start, const char *end);
  246. static int
  247. reportComment(XML_Parser parser, const ENCODING *enc, const char *start, const char *end);
  248. static void
  249. reportDefault(XML_Parser parser, const ENCODING *enc, const char *start, const char *end);
  251. static const XML_Char *getContext(XML_Parser parser);
  252. static int setContext(XML_Parser parser, const XML_Char *context);
  253. static void normalizePublicId(XML_Char *s);
  254. static int dtdInit(DTD *);
  255. static void dtdDestroy(DTD *);
  256. static int dtdCopy(DTD *newDtd, const DTD *oldDtd);
  257. static int copyEntityTable(HASH_TABLE *, STRING_POOL *, const HASH_TABLE *);
  258. #ifdef XML_DTD
  259. static void dtdSwap(DTD *, DTD *);
  260. #endif /* XML_DTD */
  261. static NAMED *lookup(HASH_TABLE *table, KEY name, size_t createSize);
  262. static void hashTableInit(HASH_TABLE *);
  263. static void hashTableDestroy(HASH_TABLE *);
  264. static void hashTableIterInit(HASH_TABLE_ITER *, const HASH_TABLE *);
  265. static NAMED *hashTableIterNext(HASH_TABLE_ITER *);
  266. static void poolInit(STRING_POOL *);
  267. static void poolClear(STRING_POOL *);
  268. static void poolDestroy(STRING_POOL *);
  269. static XML_Char *poolAppend(STRING_POOL *pool, const ENCODING *enc,
  270.     const char *ptr, const char *end);
  271. static XML_Char *poolStoreString(STRING_POOL *pool, const ENCODING *enc,
  272.   const char *ptr, const char *end);
  273. static int poolGrow(STRING_POOL *pool);
  274. static const XML_Char *poolCopyString(STRING_POOL *pool, const XML_Char *s);
  275. static const XML_Char *poolCopyStringN(STRING_POOL *pool, const XML_Char *s, int n);
  277. #define poolStart(pool) ((pool)->start)
  278. #define poolEnd(pool) ((pool)->ptr)
  279. #define poolLength(pool) ((pool)->ptr - (pool)->start)
  280. #define poolChop(pool) ((void)--(pool->ptr))
  281. #define poolLastChar(pool) (((pool)->ptr)[-1])
  282. #define poolDiscard(pool) ((pool)->ptr = (pool)->start)
  283. #define poolFinish(pool) ((pool)->start = (pool)->ptr)
  284. #define poolAppendChar(pool, c) 
  285.   (((pool)->ptr == (pool)->end && !poolGrow(pool)) 
  286.    ? 0 
  287.    : ((*((pool)->ptr)++ = c), 1))
  289. typedef struct {
  290.   /* The first member must be userData so that the XML_GetUserData macro works. */
  291.   void *m_userData;
  292.   void *m_handlerArg;
  293.   char *m_buffer;
  294.   /* first character to be parsed */
  295.   const char *m_bufferPtr;
  296.   /* past last character to be parsed */
  297.   char *m_bufferEnd;
  298.   /* allocated end of buffer */
  299.   const char *m_bufferLim;
  300.   long m_parseEndByteIndex;
  301.   const char *m_parseEndPtr;
  302.   XML_Char *m_dataBuf;
  303.   XML_Char *m_dataBufEnd;
  304.   XML_StartElementHandler m_startElementHandler;
  305.   XML_EndElementHandler m_endElementHandler;
  306.   XML_CharacterDataHandler m_characterDataHandler;
  307.   XML_ProcessingInstructionHandler m_processingInstructionHandler;
  308.   XML_CommentHandler m_commentHandler;
  309.   XML_StartCdataSectionHandler m_startCdataSectionHandler;
  310.   XML_EndCdataSectionHandler m_endCdataSectionHandler;
  311.   XML_DefaultHandler m_defaultHandler;
  312.   XML_StartDoctypeDeclHandler m_startDoctypeDeclHandler;
  313.   XML_EndDoctypeDeclHandler m_endDoctypeDeclHandler;
  314.   XML_UnparsedEntityDeclHandler m_unparsedEntityDeclHandler;
  315.   XML_NotationDeclHandler m_notationDeclHandler;
  316.   XML_ExternalParsedEntityDeclHandler m_externalParsedEntityDeclHandler;
  317.   XML_InternalParsedEntityDeclHandler m_internalParsedEntityDeclHandler;
  318.   XML_StartNamespaceDeclHandler m_startNamespaceDeclHandler;
  319.   XML_EndNamespaceDeclHandler m_endNamespaceDeclHandler;
  320.   XML_NotStandaloneHandler m_notStandaloneHandler;
  321.   XML_ExternalEntityRefHandler m_externalEntityRefHandler;
  322.   void *m_externalEntityRefHandlerArg;
  323.   XML_UnknownEncodingHandler m_unknownEncodingHandler;
  324.   const ENCODING *m_encoding;
  325.   INIT_ENCODING m_initEncoding;
  326.   const ENCODING *m_internalEncoding;
  327.   const XML_Char *m_protocolEncodingName;
  328.   int m_ns;
  329.   void *m_unknownEncodingMem;
  330.   void *m_unknownEncodingData;
  331.   void *m_unknownEncodingHandlerData;
  332.   void (*m_unknownEncodingRelease)(void *);
  333.   PROLOG_STATE m_prologState;
  334.   Processor *m_processor;
  335.   enum XML_Error m_errorCode;
  336.   const char *m_eventPtr;
  337.   const char *m_eventEndPtr;
  338.   const char *m_positionPtr;
  339.   OPEN_INTERNAL_ENTITY *m_openInternalEntities;
  340.   int m_defaultExpandInternalEntities;
  341.   int m_tagLevel;
  342.   ENTITY *m_declEntity;
  343.   const XML_Char *m_declNotationName;
  344.   const XML_Char *m_declNotationPublicId;
  345.   ELEMENT_TYPE *m_declElementType;
  346.   ATTRIBUTE_ID *m_declAttributeId;
  347.   char m_declAttributeIsCdata;
  348.   char m_declAttributeIsId;
  349.   DTD m_dtd;
  350.   const XML_Char *m_curBase;
  351.   TAG *m_tagStack;
  352.   TAG *m_freeTagList;
  353.   BINDING *m_inheritedBindings;
  354.   BINDING *m_freeBindingList;
  355.   int m_attsSize;
  356.   int m_nSpecifiedAtts;
  357.   int m_idAttIndex;
  358.   ATTRIBUTE *m_atts;
  359.   POSITION m_position;
  360.   STRING_POOL m_tempPool;
  361.   STRING_POOL m_temp2Pool;
  362.   char *m_groupConnector;
  363.   unsigned m_groupSize;
  364.   int m_hadExternalDoctype;
  365.   XML_Char m_namespaceSeparator;
  366. #ifdef XML_DTD
  367.   enum XML_ParamEntityParsing m_paramEntityParsing;
  368.   XML_Parser m_parentParser;
  369. #endif
  370. } Parser;
  372. #define userData (((Parser *)parser)->m_userData)
  373. #define handlerArg (((Parser *)parser)->m_handlerArg)
  374. #define startElementHandler (((Parser *)parser)->m_startElementHandler)
  375. #define endElementHandler (((Parser *)parser)->m_endElementHandler)
  376. #define characterDataHandler (((Parser *)parser)->m_characterDataHandler)
  377. #define processingInstructionHandler (((Parser *)parser)->m_processingInstructionHandler)
  378. #define commentHandler (((Parser *)parser)->m_commentHandler)
  379. #define startCdataSectionHandler (((Parser *)parser)->m_startCdataSectionHandler)
  380. #define endCdataSectionHandler (((Parser *)parser)->m_endCdataSectionHandler)
  381. #define defaultHandler (((Parser *)parser)->m_defaultHandler)
  382. #define startDoctypeDeclHandler (((Parser *)parser)->m_startDoctypeDeclHandler)
  383. #define endDoctypeDeclHandler (((Parser *)parser)->m_endDoctypeDeclHandler)
  384. #define unparsedEntityDeclHandler (((Parser *)parser)->m_unparsedEntityDeclHandler)
  385. #define notationDeclHandler (((Parser *)parser)->m_notationDeclHandler)
  386. #define externalParsedEntityDeclHandler (((Parser *)parser)->m_externalParsedEntityDeclHandler)
  387. #define internalParsedEntityDeclHandler (((Parser *)parser)->m_internalParsedEntityDeclHandler)
  388. #define startNamespaceDeclHandler (((Parser *)parser)->m_startNamespaceDeclHandler)
  389. #define endNamespaceDeclHandler (((Parser *)parser)->m_endNamespaceDeclHandler)
  390. #define notStandaloneHandler (((Parser *)parser)->m_notStandaloneHandler)
  391. #define externalEntityRefHandler (((Parser *)parser)->m_externalEntityRefHandler)
  392. #define externalEntityRefHandlerArg (((Parser *)parser)->m_externalEntityRefHandlerArg)
  393. #define unknownEncodingHandler (((Parser *)parser)->m_unknownEncodingHandler)
  394. #define encoding (((Parser *)parser)->m_encoding)
  395. #define initEncoding (((Parser *)parser)->m_initEncoding)
  396. #define internalEncoding (((Parser *)parser)->m_internalEncoding)
  397. #define unknownEncodingMem (((Parser *)parser)->m_unknownEncodingMem)
  398. #define unknownEncodingData (((Parser *)parser)->m_unknownEncodingData)
  399. #define unknownEncodingHandlerData 
  400.   (((Parser *)parser)->m_unknownEncodingHandlerData)
  401. #define unknownEncodingRelease (((Parser *)parser)->m_unknownEncodingRelease)
  402. #define protocolEncodingName (((Parser *)parser)->m_protocolEncodingName)
  403. #define ns (((Parser *)parser)->m_ns)
  404. #define prologState (((Parser *)parser)->m_prologState)
  405. #define processor (((Parser *)parser)->m_processor)
  406. #define errorCode (((Parser *)parser)->m_errorCode)
  407. #define eventPtr (((Parser *)parser)->m_eventPtr)
  408. #define eventEndPtr (((Parser *)parser)->m_eventEndPtr)
  409. #define positionPtr (((Parser *)parser)->m_positionPtr)
  410. #define position (((Parser *)parser)->m_position)
  411. #define openInternalEntities (((Parser *)parser)->m_openInternalEntities)
  412. #define defaultExpandInternalEntities (((Parser *)parser)->m_defaultExpandInternalEntities)
  413. #define tagLevel (((Parser *)parser)->m_tagLevel)
  414. #define buffer (((Parser *)parser)->m_buffer)
  415. #define bufferPtr (((Parser *)parser)->m_bufferPtr)
  416. #define bufferEnd (((Parser *)parser)->m_bufferEnd)
  417. #define parseEndByteIndex (((Parser *)parser)->m_parseEndByteIndex)
  418. #define parseEndPtr (((Parser *)parser)->m_parseEndPtr)
  419. #define bufferLim (((Parser *)parser)->m_bufferLim)
  420. #define dataBuf (((Parser *)parser)->m_dataBuf)
  421. #define dataBufEnd (((Parser *)parser)->m_dataBufEnd)
  422. #define dtd (((Parser *)parser)->m_dtd)
  423. #define curBase (((Parser *)parser)->m_curBase)
  424. #define declEntity (((Parser *)parser)->m_declEntity)
  425. #define declNotationName (((Parser *)parser)->m_declNotationName)
  426. #define declNotationPublicId (((Parser *)parser)->m_declNotationPublicId)
  427. #define declElementType (((Parser *)parser)->m_declElementType)
  428. #define declAttributeId (((Parser *)parser)->m_declAttributeId)
  429. #define declAttributeIsCdata (((Parser *)parser)->m_declAttributeIsCdata)
  430. #define declAttributeIsId (((Parser *)parser)->m_declAttributeIsId)
  431. #define freeTagList (((Parser *)parser)->m_freeTagList)
  432. #define freeBindingList (((Parser *)parser)->m_freeBindingList)
  433. #define inheritedBindings (((Parser *)parser)->m_inheritedBindings)
  434. #define tagStack (((Parser *)parser)->m_tagStack)
  435. #define atts (((Parser *)parser)->m_atts)
  436. #define attsSize (((Parser *)parser)->m_attsSize)
  437. #define nSpecifiedAtts (((Parser *)parser)->m_nSpecifiedAtts)
  438. #define idAttIndex (((Parser *)parser)->m_idAttIndex)
  439. #define tempPool (((Parser *)parser)->m_tempPool)
  440. #define temp2Pool (((Parser *)parser)->m_temp2Pool)
  441. #define groupConnector (((Parser *)parser)->m_groupConnector)
  442. #define groupSize (((Parser *)parser)->m_groupSize)
  443. #define hadExternalDoctype (((Parser *)parser)->m_hadExternalDoctype)
  444. #define namespaceSeparator (((Parser *)parser)->m_namespaceSeparator)
  445. #ifdef XML_DTD
  446. #define parentParser (((Parser *)parser)->m_parentParser)
  447. #define paramEntityParsing (((Parser *)parser)->m_paramEntityParsing)
  448. #endif /* XML_DTD */
  450. #ifdef _MSC_VER
  451. #ifdef _DEBUG
  452. Parser *asParser(XML_Parser parser)
  453. {
  454.   return (Parser*) parser;
  455. }
  456. #endif
  457. #endif
  459. /* this macro requires an int err has been declared to store the error to 
  460.    be returned.  The macro is to be placed in a case statement. */
  461. #define CASE_ERROR() 
  462.     case XML_TOK_ERR_INVALID_NAME: err = XML_ERROR_INVALID_NAME; goto err_done; 
  463.     case XML_TOK_ERR_INVALID_CHAR_IN_DOC: err = XML_ERROR_INVALID_CHAR_IN_DOC; goto err_done; 
  464.     case XML_TOK_ERR_TWO_DASHES_NOT_ALLOWED_IN_COMMENT: err = XML_ERROR_TWO_DASHES_NOT_ALLOWED_IN_COMMENT; goto err_done; 
  465.     case XML_TOK_ERR_INVALID_DECL: err = XML_ERROR_INVALID_DECL; goto err_done; 
  466.     case XML_TOK_ERR_INVALID_PI: err = XML_ERROR_INVALID_PI; goto err_done; 
  467.     case XML_TOK_ERR_INVALID_PI_TARGET: err = XML_ERROR_INVALID_PI_TARGET; goto err_done; 
  468.     case XML_TOK_ERR_INVALID_CDATA: err = XML_ERROR_INVALID_CDATA; goto err_done; 
  469.     case XML_TOK_ERR_NO_CLOSING_GT: err = XML_ERROR_NO_CLOSING_GT; goto err_done; 
  470.     case XML_TOK_ERR_INVALID_HEX_CHAR_REF: err = XML_ERROR_INVALID_HEX_CHAR_REF; goto err_done; 
  471.     case XML_TOK_ERR_INVALID_CHAR_REF: err = XML_ERROR_INVALID_CHAR_REF; goto err_done; 
  472.     case XML_TOK_ERR_INVALID_REF: err = XML_ERROR_INVALID_REF; goto err_done; 
  473.     case XML_TOK_ERR_MISSING_EQUALS: err = XML_ERROR_MISSING_EQUALS; goto err_done; 
  474.     case XML_TOK_ERR_MISSING_QUOT_APOS: err = XML_ERROR_MISSING_QUOT_APOS; goto err_done; 
  475.     case XML_TOK_ERR_MISSING_REQ_SPACE: err = XML_ERROR_MISSING_REQ_SPACE; goto err_done; 
  476.     case XML_TOK_ERR_LT_NOT_ALLOWED: err = XML_ERROR_LT_NOT_ALLOWED; goto err_done; 
  477.     case XML_TOK_ERR_EXPECTED_GT: err = XML_ERROR_EXPECTED_GT; goto err_done; 
  478.     case XML_TOK_ERR_INVALID_GT_AFFT_2_RSQB_IN_CONTENT: err = XML_ERROR_INVALID_GT_AFFT_2_RSQB_IN_CONTENT; goto err_done; 
  479.     case XML_TOK_ERR_INVALID_COMMENT: err = XML_ERROR_INVALID_COMMENT; goto err_done; 
  480.     err_done:
  483. XML_Parser XML_ParserCreate(const XML_Char *encodingName)
  484. {
  485.   XML_Parser parser = malloc(sizeof(Parser));
  486.   if (!parser)
  487.     return parser;
  488.   processor = prologInitProcessor;
  489.   XmlPrologStateInit(&prologState);
  490.   userData = 0;
  491.   handlerArg = 0;
  492.   startElementHandler = 0;
  493.   endElementHandler = 0;
  494.   characterDataHandler = 0;
  495.   processingInstructionHandler = 0;
  496.   commentHandler = 0;
  497.   startCdataSectionHandler = 0;
  498.   endCdataSectionHandler = 0;
  499.   defaultHandler = 0;
  500.   startDoctypeDeclHandler = 0;
  501.   endDoctypeDeclHandler = 0;
  502.   unparsedEntityDeclHandler = 0;
  503.   notationDeclHandler = 0;
  504.   externalParsedEntityDeclHandler = 0;
  505.   internalParsedEntityDeclHandler = 0;
  506.   startNamespaceDeclHandler = 0;
  507.   endNamespaceDeclHandler = 0;
  508.   notStandaloneHandler = 0;
  509.   externalEntityRefHandler = 0;
  510.   externalEntityRefHandlerArg = parser;
  511.   unknownEncodingHandler = 0;
  512.   buffer = 0;
  513.   bufferPtr = 0;
  514.   bufferEnd = 0;
  515.   parseEndByteIndex = 0;
  516.   parseEndPtr = 0;
  517.   bufferLim = 0;
  518.   declElementType = 0;
  519.   declAttributeId = 0;
  520.   declEntity = 0;
  521.   declNotationName = 0;
  522.   declNotationPublicId = 0;
  523.   memset(&position, 0, sizeof(POSITION));
  524.   errorCode = XML_ERROR_NONE;
  525.   eventPtr = 0;
  526.   eventEndPtr = 0;
  527.   positionPtr = 0;
  528.   openInternalEntities = 0;
  529.   tagLevel = 0;
  530.   tagStack = 0;
  531.   freeTagList = 0;
  532.   freeBindingList = 0;
  533.   inheritedBindings = 0;
  534.   attsSize = INIT_ATTS_SIZE;
  535.   atts = (ATTRIBUTE*) malloc(attsSize * sizeof(ATTRIBUTE)); /* Helix expat change */
  536.   nSpecifiedAtts = 0;
  537.   dataBuf = (XML_Char*) malloc(INIT_DATA_BUF_SIZE * sizeof(XML_Char)); /* Helix expat change */
  538.   groupSize = 0;
  539.   groupConnector = 0;
  540.   hadExternalDoctype = 0;
  541.   unknownEncodingMem = 0;
  542.   unknownEncodingRelease = 0;
  543.   unknownEncodingData = 0;
  544.   unknownEncodingHandlerData = 0;
  545.   namespaceSeparator = '!';
  546. #ifdef XML_DTD
  547.   parentParser = 0;
  548.   paramEntityParsing = XML_PARAM_ENTITY_PARSING_NEVER;
  549. #endif
  550.   ns = 0;
  551.   poolInit(&tempPool);
  552.   poolInit(&temp2Pool);
  553.   protocolEncodingName = encodingName ? poolCopyString(&tempPool, encodingName) : 0;
  554.   curBase = 0;
  555.   if (!dtdInit(&dtd) || !atts || !dataBuf
  556.       || (encodingName && !protocolEncodingName)) {
  557.     XML_ParserFree(parser);
  558.     return 0;
  559.   }
  560.   dataBufEnd = dataBuf + INIT_DATA_BUF_SIZE;
  561.   XmlInitEncoding(&initEncoding, &encoding, 0);
  562.   internalEncoding = XmlGetInternalEncoding();
  563.   return parser;
  564. }
  566. XML_Parser XML_ParserCreateNS(const XML_Char *encodingName, XML_Char nsSep)
  567. {
  568.   static
  569.   const XML_Char implicitContext[] = {
  570.     XML_T('x'), XML_T('m'), XML_T('l'), XML_T('='),
  571.     XML_T('h'), XML_T('t'), XML_T('t'), XML_T('p'), XML_T(':'),
  572.     XML_T('/'), XML_T('/'), XML_T('w'), XML_T('w'), XML_T('w'),
  573.     XML_T('.'), XML_T('w'), XML_T('3'),
  574.     XML_T('.'), XML_T('o'), XML_T('r'), XML_T('g'),
  575.     XML_T('/'), XML_T('X'), XML_T('M'), XML_T('L'),
  576.     XML_T('/'), XML_T('1'), XML_T('9'), XML_T('9'), XML_T('8'),
  577.     XML_T('/'), XML_T('n'), XML_T('a'), XML_T('m'), XML_T('e'),
  578.     XML_T('s'), XML_T('p'), XML_T('a'), XML_T('c'), XML_T('e'),
  579.     XML_T('')
  580.   };
  582.   XML_Parser parser = XML_ParserCreate(encodingName);
  583.   if (parser) {
  584.     XmlInitEncodingNS(&initEncoding, &encoding, 0);
  585.     ns = 1;
  586.     internalEncoding = XmlGetInternalEncodingNS();
  587.     namespaceSeparator = nsSep;
  588.   }
  589.   if (!setContext(parser, implicitContext)) {
  590.     XML_ParserFree(parser);
  591.     return 0;
  592.   }
  593.   return parser;
  594. }
  596. int XML_SetEncoding(XML_Parser parser, const XML_Char *encodingName)
  597. {
  598.   if (!encodingName)
  599.     protocolEncodingName = 0;
  600.   else {
  601.     protocolEncodingName = poolCopyString(&tempPool, encodingName);
  602.     if (!protocolEncodingName)
  603.       return 0;
  604.   }
  605.   return 1;
  606. }
  608. XML_Parser XML_ExternalEntityParserCreate(XML_Parser oldParser,
  609.   const XML_Char *context,
  610.   const XML_Char *encodingName)
  611. {
  612.   XML_Parser parser = oldParser;
  613.   DTD *oldDtd = &dtd;
  614.   XML_StartElementHandler oldStartElementHandler = startElementHandler;
  615.   XML_EndElementHandler oldEndElementHandler = endElementHandler;
  616.   XML_CharacterDataHandler oldCharacterDataHandler = characterDataHandler;
  617.   XML_ProcessingInstructionHandler oldProcessingInstructionHandler = processingInstructionHandler;
  618.   XML_CommentHandler oldCommentHandler = commentHandler;
  619.   XML_StartCdataSectionHandler oldStartCdataSectionHandler = startCdataSectionHandler;
  620.   XML_EndCdataSectionHandler oldEndCdataSectionHandler = endCdataSectionHandler;
  621.   XML_DefaultHandler oldDefaultHandler = defaultHandler;
  622.   XML_UnparsedEntityDeclHandler oldUnparsedEntityDeclHandler = unparsedEntityDeclHandler;
  623.   XML_NotationDeclHandler oldNotationDeclHandler = notationDeclHandler;
  624.   XML_ExternalParsedEntityDeclHandler oldExternalParsedEntityDeclHandler = externalParsedEntityDeclHandler;
  625.   XML_InternalParsedEntityDeclHandler oldInternalParsedEntityDeclHandler = internalParsedEntityDeclHandler;
  626.   XML_StartNamespaceDeclHandler oldStartNamespaceDeclHandler = startNamespaceDeclHandler;
  627.   XML_EndNamespaceDeclHandler oldEndNamespaceDeclHandler = endNamespaceDeclHandler;
  628.   XML_NotStandaloneHandler oldNotStandaloneHandler = notStandaloneHandler;
  629.   XML_ExternalEntityRefHandler oldExternalEntityRefHandler = externalEntityRefHandler;
  630.   XML_UnknownEncodingHandler oldUnknownEncodingHandler = unknownEncodingHandler;
  631.   void *oldUserData = userData;
  632.   void *oldHandlerArg = handlerArg;
  633.   int oldDefaultExpandInternalEntities = defaultExpandInternalEntities;
  634.   void *oldExternalEntityRefHandlerArg = externalEntityRefHandlerArg;
  635. #ifdef XML_DTD
  636.   int oldParamEntityParsing = paramEntityParsing;
  637. #endif
  638.   parser = (ns
  639.             ? XML_ParserCreateNS(encodingName, namespaceSeparator)
  640.     : XML_ParserCreate(encodingName));
  641.   if (!parser)
  642.     return 0;
  643.   startElementHandler = oldStartElementHandler;
  644.   endElementHandler = oldEndElementHandler;
  645.   characterDataHandler = oldCharacterDataHandler;
  646.   processingInstructionHandler = oldProcessingInstructionHandler;
  647.   commentHandler = oldCommentHandler;
  648.   startCdataSectionHandler = oldStartCdataSectionHandler;
  649.   endCdataSectionHandler = oldEndCdataSectionHandler;
  650.   defaultHandler = oldDefaultHandler;
  651.   unparsedEntityDeclHandler = oldUnparsedEntityDeclHandler;
  652.   notationDeclHandler = oldNotationDeclHandler;
  653.   externalParsedEntityDeclHandler = oldExternalParsedEntityDeclHandler;
  654.   internalParsedEntityDeclHandler = oldInternalParsedEntityDeclHandler;
  655.   startNamespaceDeclHandler = oldStartNamespaceDeclHandler;
  656.   endNamespaceDeclHandler = oldEndNamespaceDeclHandler;
  657.   notStandaloneHandler = oldNotStandaloneHandler;
  658.   externalEntityRefHandler = oldExternalEntityRefHandler;
  659.   unknownEncodingHandler = oldUnknownEncodingHandler;
  660.   userData = oldUserData;
  661.   if (oldUserData == oldHandlerArg)
  662.     handlerArg = userData;
  663.   else
  664.     handlerArg = parser;
  665.   if (oldExternalEntityRefHandlerArg != oldParser)
  666.     externalEntityRefHandlerArg = oldExternalEntityRefHandlerArg;
  667.   defaultExpandInternalEntities = oldDefaultExpandInternalEntities;
  668. #ifdef XML_DTD
  669.   paramEntityParsing = (enum XML_ParamEntityParsing) oldParamEntityParsing; /* Helix expat change */
  670.   if (context) {
  671. #endif /* XML_DTD */
  672.     if (!dtdCopy(&dtd, oldDtd) || !setContext(parser, context)) {
  673.       XML_ParserFree(parser);
  674.       return 0;
  675.     }
  676.     processor = externalEntityInitProcessor;
  677. #ifdef XML_DTD
  678.   }
  679.   else {
  680.     dtdSwap(&dtd, oldDtd);
  681.     parentParser = oldParser;
  682.     XmlPrologStateInitExternalEntity(&prologState);
  683.     dtd.complete = 1;
  684.     hadExternalDoctype = 1;
  685.   }
  686. #endif /* XML_DTD */
  687.   return parser;
  688. }
  690. static
  691. void destroyBindings(BINDING *bindings)
  692. {
  693.   for (;;) {
  694.     BINDING *b = bindings;
  695.     if (!b)
  696.       break;
  697.     bindings = b->nextTagBinding;
  698.     free(b->uri);
  699.     free(b);
  700.   }
  701. }
  703. void XML_ParserFree(XML_Parser parser)
  704. {
  705.   for (;;) {
  706.     TAG *p;
  707.     if (tagStack == 0) {
  708.       if (freeTagList == 0)
  709. break;
  710.       tagStack = freeTagList;
  711.       freeTagList = 0;
  712.     }
  713.     p = tagStack;
  714.     tagStack = tagStack->parent;
  715.     free(p->buf);
  716.     destroyBindings(p->bindings);
  717.     free(p);
  718.   }
  719.   destroyBindings(freeBindingList);
  720.   destroyBindings(inheritedBindings);
  721.   poolDestroy(&tempPool);
  722.   poolDestroy(&temp2Pool);
  723. #ifdef XML_DTD
  724.   if (parentParser) {
  725.     if (hadExternalDoctype)
  726.       dtd.complete = 0;
  727.     dtdSwap(&dtd, &((Parser *)parentParser)->m_dtd);
  728.   }
  729. #endif /* XML_DTD */
  730.   dtdDestroy(&dtd);
  731.   free((void *)atts);
  732.   free(groupConnector);
  733.   free(buffer);
  734.   free(dataBuf);
  735.   free(unknownEncodingMem);
  736.   if (unknownEncodingRelease)
  737.     unknownEncodingRelease(unknownEncodingData);
  738.   free(parser);
  739. }
  741. void XML_UseParserAsHandlerArg(XML_Parser parser)
  742. {
  743.   handlerArg = parser;
  744. }
  746. void XML_SetUserData(XML_Parser parser, void *p)
  747. {
  748.   if (handlerArg == userData)
  749.     handlerArg = userData = p;
  750.   else
  751.     userData = p;
  752. }
  754. int XML_SetBase(XML_Parser parser, const XML_Char *p)
  755. {
  756.   if (p) {
  757.     p = poolCopyString(&dtd.pool, p);
  758.     if (!p)
  759.       return 0;
  760.     curBase = p;
  761.   }
  762.   else
  763.     curBase = 0;
  764.   return 1;
  765. }
  767. const XML_Char *XML_GetBase(XML_Parser parser)
  768. {
  769.   return curBase;
  770. }
  772. int XML_GetSpecifiedAttributeCount(XML_Parser parser)
  773. {
  774.   return nSpecifiedAtts;
  775. }
  777. int XML_GetIdAttributeIndex(XML_Parser parser)
  778. {
  779.   return idAttIndex;
  780. }
  782. void XML_SetElementHandler(XML_Parser parser,
  783.    XML_StartElementHandler start,
  784.    XML_EndElementHandler end)
  785. {
  786.   startElementHandler = start;
  787.   endElementHandler = end;
  788. }
  790. void XML_SetCharacterDataHandler(XML_Parser parser,
  791.  XML_CharacterDataHandler handler)
  792. {
  793.   characterDataHandler = handler;
  794. }
  796. void XML_SetProcessingInstructionHandler(XML_Parser parser,
  797.  XML_ProcessingInstructionHandler handler)
  798. {
  799.   processingInstructionHandler = handler;
  800. }
  802. void XML_SetCommentHandler(XML_Parser parser,
  803.    XML_CommentHandler handler)
  804. {
  805.   commentHandler = handler;
  806. }
  808. void XML_SetCdataSectionHandler(XML_Parser parser,
  809. XML_StartCdataSectionHandler start,
  810.         XML_EndCdataSectionHandler end)
  811. {
  812.   startCdataSectionHandler = start;
  813.   endCdataSectionHandler = end;
  814. }
  816. void XML_SetDefaultHandler(XML_Parser parser,
  817.    XML_DefaultHandler handler)
  818. {
  819.   defaultHandler = handler;
  820.   defaultExpandInternalEntities = 0;
  821. }
  823. void XML_SetDefaultHandlerExpand(XML_Parser parser,
  824.  XML_DefaultHandler handler)
  825. {
  826.   defaultHandler = handler;
  827.   defaultExpandInternalEntities = 1;
  828. }
  830. void XML_SetDoctypeDeclHandler(XML_Parser parser,
  831.        XML_StartDoctypeDeclHandler start,
  832.        XML_EndDoctypeDeclHandler end)
  833. {
  834.   startDoctypeDeclHandler = start;
  835.   endDoctypeDeclHandler = end;
  836. }
  838. void XML_SetUnparsedEntityDeclHandler(XML_Parser parser,
  839.       XML_UnparsedEntityDeclHandler handler)
  840. {
  841.   unparsedEntityDeclHandler = handler;
  842. }
  844. void XML_SetExternalParsedEntityDeclHandler(XML_Parser parser,
  845.     XML_ExternalParsedEntityDeclHandler handler)
  846. {
  847.   externalParsedEntityDeclHandler = handler;
  848. }
  850. void XML_SetInternalParsedEntityDeclHandler(XML_Parser parser,
  851.     XML_InternalParsedEntityDeclHandler handler)
  852. {
  853.   internalParsedEntityDeclHandler = handler;
  854. }
  856. void XML_SetNotationDeclHandler(XML_Parser parser,
  857. XML_NotationDeclHandler handler)
  858. {
  859.   notationDeclHandler = handler;
  860. }
  862. void XML_SetNamespaceDeclHandler(XML_Parser parser,
  863.  XML_StartNamespaceDeclHandler start,
  864.  XML_EndNamespaceDeclHandler end)
  865. {
  866.   startNamespaceDeclHandler = start;
  867.   endNamespaceDeclHandler = end;
  868. }
  870. void XML_SetNotStandaloneHandler(XML_Parser parser,
  871.  XML_NotStandaloneHandler handler)
  872. {
  873.   notStandaloneHandler = handler;
  874. }
  876. void XML_SetExternalEntityRefHandler(XML_Parser parser,
  877.      XML_ExternalEntityRefHandler handler)
  878. {
  879.   externalEntityRefHandler = handler;
  880. }
  882. void XML_SetExternalEntityRefHandlerArg(XML_Parser parser, void *arg)
  883. {
  884.   if (arg)
  885.     externalEntityRefHandlerArg = arg;
  886.   else
  887.     externalEntityRefHandlerArg = parser;
  888. }
  890. void XML_SetUnknownEncodingHandler(XML_Parser parser,
  891.    XML_UnknownEncodingHandler handler,
  892.    void *data)
  893. {
  894.   unknownEncodingHandler = handler;
  895.   unknownEncodingHandlerData = data;
  896. }
  898. int XML_SetParamEntityParsing(XML_Parser parser,
  899.       enum XML_ParamEntityParsing parsing)
  900. {
  901. #ifdef XML_DTD
  902.   paramEntityParsing = parsing;
  903.   return 1;
  904. #else
  905.   return parsing == XML_PARAM_ENTITY_PARSING_NEVER;
  906. #endif
  907. }
  909. int XML_Parse(XML_Parser parser, const char *s, int len, int isFinal)
  910. {
  911.   if (len == 0) {
  912.     if (!isFinal)
  913.       return 1;
  914.     positionPtr = bufferPtr;
  915.     errorCode = processor(parser, bufferPtr, parseEndPtr = bufferEnd, 0);
  916.     if (errorCode == XML_ERROR_NONE)
  917.       return 1;
  918.     eventEndPtr = eventPtr;
  919.     processor = errorProcessor;
  920.     return 0;
  921.   }
  922.   else if (bufferPtr == bufferEnd) {
  923.     const char *end;
  924.     int nLeftOver;
  925.     parseEndByteIndex += len;
  926.     positionPtr = s;
  927.     if (isFinal) {
  928.       errorCode = processor(parser, s, parseEndPtr = s + len, 0);
  929.       if (errorCode == XML_ERROR_NONE)
  930. return 1;
  931.       eventEndPtr = eventPtr;
  932.       processor = errorProcessor;
  933.       return 0;
  934.     }
  935.     errorCode = processor(parser, s, parseEndPtr = s + len, &end);
  936.     if (errorCode != XML_ERROR_NONE) {
  937.       eventEndPtr = eventPtr;
  938.       processor = errorProcessor;
  939.       return 0;
  940.     }
  941.     XmlUpdatePosition(encoding, positionPtr, end, &position);
  942.     nLeftOver = s + len - end;
  943.     if (nLeftOver) {
  944.       if (buffer == 0 || nLeftOver > bufferLim - buffer) {
  945. /* FIXME avoid integer overflow */
  946. buffer = (char*) (buffer == 0 ? malloc(len * 2) : realloc(buffer, len * 2)); /* Helix expat change */
  947. /* FIXME storage leak if realloc fails */
  948. if (!buffer) {
  949.   errorCode = XML_ERROR_NO_MEMORY;
  950.   eventPtr = eventEndPtr = 0;
  951.   processor = errorProcessor;
  952.   return 0;
  953. }
  954. bufferLim = buffer + len * 2;
  955.       }
  956.       memcpy(buffer, end, nLeftOver);
  957.       bufferPtr = buffer;
  958.       bufferEnd = buffer + nLeftOver;
  959.     }
  960.     return 1;
  961.   }
  962.   else {
  963.     memcpy(XML_GetBuffer(parser, len), s, len);
  964.     return XML_ParseBuffer(parser, len, isFinal);
  965.   }
  966. }
  968. int XML_ParseBuffer(XML_Parser parser, int len, int isFinal)
  969. {
  970.   const char *start = bufferPtr;
  971.   positionPtr = start;
  972.   bufferEnd += len;
  973.   parseEndByteIndex += len;
  974.   errorCode = processor(parser, start, parseEndPtr = bufferEnd,
  975. isFinal ? (const char **)0 : &bufferPtr);
  976.   if (errorCode == XML_ERROR_NONE) {
  977.     if (!isFinal)
  978.       XmlUpdatePosition(encoding, positionPtr, bufferPtr, &position);
  979.     return 1;
  980.   }
  981.   else {
  982.     eventEndPtr = eventPtr;
  983.     processor = errorProcessor;
  984.     return 0;
  985.   }
  986. }
  988. void *XML_GetBuffer(XML_Parser parser, int len)
  989. {
  990.   if (len > bufferLim - bufferEnd) {
  991.     /* FIXME avoid integer overflow */
  992.     int neededSize = len + (bufferEnd - bufferPtr);
  993.     if (neededSize  <= bufferLim - buffer) {
  994.       memmove(buffer, bufferPtr, bufferEnd - bufferPtr);
  995.       bufferEnd = buffer + (bufferEnd - bufferPtr);
  996.       bufferPtr = buffer;
  997.     }
  998.     else {
  999.       char *newBuf;
  1000.       int bufferSize = bufferLim - bufferPtr;
  1001.       if (bufferSize == 0)
  1002. bufferSize = INIT_BUFFER_SIZE;
  1003.       do {
  1004. bufferSize *= 2;
  1005.       } while (bufferSize < neededSize);
  1006.       newBuf = (char*) malloc(bufferSize); /* Helix expat change */
  1007.       if (newBuf == 0) {
  1008. errorCode = XML_ERROR_NO_MEMORY;
  1009. return 0;
  1010.       }
  1011.       bufferLim = newBuf + bufferSize;
  1012.       if (bufferPtr) {
  1013. memcpy(newBuf, bufferPtr, bufferEnd - bufferPtr);
  1014. free(buffer);
  1015.       }
  1016.       bufferEnd = newBuf + (bufferEnd - bufferPtr);
  1017.       bufferPtr = buffer = newBuf;
  1018.     }
  1019.   }
  1020.   return bufferEnd;
  1021. }
  1023. enum XML_Error XML_GetErrorCode(XML_Parser parser)
  1024. {
  1025.   return errorCode;
  1026. }
  1028. long XML_GetCurrentByteIndex(XML_Parser parser)
  1029. {
  1030.   if (eventPtr)
  1031.     return parseEndByteIndex - (parseEndPtr - eventPtr);
  1032.   return -1;
  1033. }
  1035. int XML_GetCurrentByteCount(XML_Parser parser)
  1036. {
  1037.   if (eventEndPtr && eventPtr)
  1038.     return eventEndPtr - eventPtr;
  1039.   return 0;
  1040. }
  1042. int XML_GetCurrentLineNumber(XML_Parser parser)
  1043. {
  1044.   if (eventPtr) {
  1045.     XmlUpdatePosition(encoding, positionPtr, eventPtr, &position);
  1046.     positionPtr = eventPtr;
  1047.   }
  1048.   return position.lineNumber + 1;
  1049. }
  1051. int XML_GetCurrentColumnNumber(XML_Parser parser)
  1052. {
  1053.   if (eventPtr) {
  1054.     XmlUpdatePosition(encoding, positionPtr, eventPtr, &position);
  1055.     positionPtr = eventPtr;
  1056.   }
  1057.   return position.columnNumber;
  1058. }
  1060. void XML_DefaultCurrent(XML_Parser parser)
  1061. {
  1062.   if (defaultHandler) {
  1063.     if (openInternalEntities)
  1064.       reportDefault(parser,
  1065.             internalEncoding,
  1066.     openInternalEntities->internalEventPtr,
  1067.     openInternalEntities->internalEventEndPtr);
  1068.     else
  1069.       reportDefault(parser, encoding, eventPtr, eventEndPtr);
  1070.   }
  1071. }
  1073. const XML_LChar *XML_ErrorString(int code)
  1074. {
  1075.     static const XML_LChar *message[] = {
  1076.     0,
  1077.     XML_T("out of memory"),
  1078.     XML_T("syntax error"),
  1079.     XML_T("no element found"),
  1080. /*    XML_T("not well-formed"), */
  1081.     XML_T("name is invalid"), /* XML_ERROR_INVALID_NAME, */
  1082.     XML_T("character not allowed in doc"), /* XML_ERROR_INVALID_CHAR_IN_DOC, */
  1083.     XML_T("comments can not have '--' in them"), /* XML_ERROR_TWO_DASHES_NOT_ALLOWED_IN_COMMENT, */
  1084.     XML_T("invalid document type declaration syntax"), /* XML_ERROR_INVALID_DECL, */
  1085.     XML_T("invalid processing instructions syntax"), /* XML_ERROR_INVALID_PI, */
  1086.     XML_T("xml processing instruction target must be lower case"), /* XML_ERROR_INVALID_PI_TARGET, */
  1087.     XML_T("error in CDATA"), /* XML_ERROR_INVALID_CDATA, */
  1088.     XML_T("end tag requires a closing >"), /* XML_ERROR_NO_CLOSING_GT, */
  1089.     XML_T("invalid hexadecimal character reference"), /* XML_ERROR_INVALID_HEX_CHAR_REF, */
  1090.     XML_T("invalid character reference"), /* XML_ERROR_INVALID_CHAR_REF, */
  1091.     XML_T("invalid entity reference"), /* XML_ERROR_INVALID_REF, */
  1092.     XML_T("attribute names must be followed by an equal sign"), /* XML_ERROR_MISSING_EQUALS, */
  1093.     XML_T("attribute values must start with a " or '"), /* XML_ERROR_MISSING_QUOT_APOS, */
  1094.     XML_T("attribute values must be followed by a whitespace"), /* XML_ERROR_MISSING_REQ_SPACE, */
  1095.     XML_T("the < character must be escaped in an attribute value"), /* XML_ERROR_LT_NOT_ALLOWED, */
  1096.     XML_T("/ character must be followed by > to end empty element"), /* XML_ERROR_EXPECTED_GT, */
  1097.     XML_T("content can not have the ']]>' string in it"), /*XML_ERROR_INVALID_GT_AFFT_2_RSQB_IN_CONTENT,*/
  1098.     XML_T("invalid beginning of comment"), /* XML_ERROR_INVALID_COMMENT, */
  1099. /********/
  1100.     XML_T("unclosed token"),
  1101.     XML_T("unclosed token"),
  1102.     XML_T("mismatched tag"),
  1103.     XML_T("duplicate attribute"),
  1104.     XML_T("junk after document element"),
  1105.     XML_T("illegal parameter entity reference"),
  1106.     XML_T("undefined entity"),
  1107.     XML_T("recursive entity reference"),
  1108.     XML_T("asynchronous entity"),
  1109.     XML_T("reference to invalid character number"),
  1110.     XML_T("reference to binary entity"),
  1111.     XML_T("reference to external entity in attribute"),
  1112.     XML_T("xml processing instruction not at start of external entity"),
  1113.     XML_T("unknown encoding"),
  1114.     XML_T("encoding specified in XML declaration is incorrect"),
  1115.     XML_T("unclosed CDATA section"),
  1116.     XML_T("error in processing external entity reference"),
  1117.     XML_T("document is not standalone")
  1118.   };
  1119.   if (code > 0 && code < sizeof(message)/sizeof(message[0]))
  1120.     return message[code];
  1121.   return 0;
  1122. }
  1124. static
  1125. enum XML_Error contentProcessor(XML_Parser parser,
  1126. const char *start,
  1127. const char *end,
  1128. const char **endPtr)
  1129. {
  1130.   return doContent(parser, 0, encoding, start, end, endPtr);
  1131. }
  1133. static
  1134. enum XML_Error externalEntityInitProcessor(XML_Parser parser,
  1135.    const char *start,
  1136.    const char *end,
  1137.    const char **endPtr)
  1138. {
  1139.   enum XML_Error result = initializeEncoding(parser);
  1140.   if (result != XML_ERROR_NONE)
  1141.     return result;
  1142.   processor = externalEntityInitProcessor2;
  1143.   return externalEntityInitProcessor2(parser, start, end, endPtr);
  1144. }
  1146. static
  1147. enum XML_Error externalEntityInitProcessor2(XML_Parser parser,
  1148.     const char *start,
  1149.     const char *end,
  1150.     const char **endPtr)
  1151. {
  1152.   const char *next;
  1153.   int tok = XmlContentTok(encoding, start, end, &next);
  1154.   switch (tok) {
  1155.   case XML_TOK_BOM:
  1156.     start = next;
  1157.     break;
  1158.   case XML_TOK_PARTIAL:
  1159.     if (endPtr) {
  1160.       *endPtr = start;
  1161.       return XML_ERROR_NONE;
  1162.     }
  1163.     eventPtr = start;
  1164.     return XML_ERROR_UNCLOSED_TOKEN;
  1165.   case XML_TOK_PARTIAL_CHAR:
  1166.     if (endPtr) {
  1167.       *endPtr = start;
  1168.       return XML_ERROR_NONE;
  1169.     }
  1170.     eventPtr = start;
  1171.     return XML_ERROR_PARTIAL_CHAR;
  1172.   }
  1173.   processor = externalEntityInitProcessor3;
  1174.   return externalEntityInitProcessor3(parser, start, end, endPtr);
  1175. }
  1177. static
  1178. enum XML_Error externalEntityInitProcessor3(XML_Parser parser,
  1179.     const char *start,
  1180.     const char *end,
  1181.     const char **endPtr)
  1182. {
  1183.   const char *next;
  1184.   int tok = XmlContentTok(encoding, start, end, &next);
  1185.   switch (tok) {
  1186.   case XML_TOK_XML_DECL:
  1187.     {
  1188.       enum XML_Error result = processXmlDecl(parser, 1, start, next);
  1189.       if (result != XML_ERROR_NONE)
  1190. return result;
  1191.       start = next;
  1192.     }
  1193.     break;
  1194.   case XML_TOK_PARTIAL:
  1195.     if (endPtr) {
  1196.       *endPtr = start;
  1197.       return XML_ERROR_NONE;
  1198.     }
  1199.     eventPtr = start;
  1200.     return XML_ERROR_UNCLOSED_TOKEN;
  1201.   case XML_TOK_PARTIAL_CHAR:
  1202.     if (endPtr) {
  1203.       *endPtr = start;
  1204.       return XML_ERROR_NONE;
  1205.     }
  1206.     eventPtr = start;
  1207.     return XML_ERROR_PARTIAL_CHAR;
  1208.   }
  1209.   processor = externalEntityContentProcessor;
  1210.   tagLevel = 1;
  1211.   return doContent(parser, 1, encoding, start, end, endPtr);
  1212. }
  1214. static
  1215. enum XML_Error externalEntityContentProcessor(XML_Parser parser,
  1216.       const char *start,
  1217.       const char *end,
  1218.       const char **endPtr)
  1219. {
  1220.   return doContent(parser, 1, encoding, start, end, endPtr);
  1221. }
  1223. static enum XML_Error
  1224. doContent(XML_Parser parser,
  1225.   int startTagLevel,
  1226.   const ENCODING *enc,
  1227.   const char *s,
  1228.   const char *end,
  1229.   const char **nextPtr)
  1230. {
  1231.   const char **eventPP;
  1232.   const char **eventEndPP;
  1233.   if (enc == encoding) {
  1234.     eventPP = &eventPtr;
  1235.     eventEndPP = &eventEndPtr;
  1236.   }
  1237.   else {
  1238.     eventPP = &(openInternalEntities->internalEventPtr);
  1239.     eventEndPP = &(openInternalEntities->internalEventEndPtr);
  1240.   }
  1241.   *eventPP = s;
  1242.   for (;;) {
  1243.     const char *next = s; /* XmlContentTok doesn't always set the last arg */
  1244.     int err;
  1245.     int tok = XmlContentTok(enc, s, end, &next);
  1246.     *eventEndPP = next;
  1247.     switch (tok) {
  1248.     case XML_TOK_TRAILING_CR:
  1249.       if (nextPtr) {
  1250. *nextPtr = s;
  1251. return XML_ERROR_NONE;
  1252.       }
  1253.       *eventEndPP = end;
  1254.       if (characterDataHandler) {
  1255. XML_Char c = 0xA;
  1256. characterDataHandler(handlerArg, &c, 1);
  1257.       }
  1258.       else if (defaultHandler)
  1259. reportDefault(parser, enc, s, end);
  1260.       if (startTagLevel == 0)
  1261. return XML_ERROR_NO_ELEMENTS;
  1262.       if (tagLevel != startTagLevel)
  1263. return XML_ERROR_ASYNC_ENTITY;
  1264.       return XML_ERROR_NONE;
  1265.     case XML_TOK_NONE:
  1266.       if (nextPtr) {
  1267. *nextPtr = s;
  1268. return XML_ERROR_NONE;
  1269.       }
  1270.       if (startTagLevel > 0) {
  1271. if (tagLevel != startTagLevel)
  1272.   return XML_ERROR_ASYNC_ENTITY;
  1273. return XML_ERROR_NONE;
  1274.       }
  1275.       return XML_ERROR_NO_ELEMENTS;
  1276.     CASE_ERROR()    
  1277.       *eventPP = next;
  1278.       return (enum XML_Error) err; /* Helix expat change */
  1279.     case XML_TOK_PARTIAL:
  1280.       if (nextPtr) {
  1281. *nextPtr = s;
  1282. return XML_ERROR_NONE;
  1283.       }
  1284.       return XML_ERROR_UNCLOSED_TOKEN;
  1285.     case XML_TOK_PARTIAL_CHAR:
  1286.       if (nextPtr) {
  1287. *nextPtr = s;
  1288. return XML_ERROR_NONE;
  1289.       }
  1290.       return XML_ERROR_PARTIAL_CHAR;
  1291.     case XML_TOK_ENTITY_REF:
  1292.       {
  1293. const XML_Char *name;
  1294. ENTITY *entity;
  1295. XML_Char ch = XmlPredefinedEntityName(enc,
  1296.       s + enc->minBytesPerChar,
  1297.       next - enc->minBytesPerChar);
  1298. if (ch) {
  1299.   if (characterDataHandler)
  1300.     characterDataHandler(handlerArg, &ch, 1);
  1301.   else if (defaultHandler)
  1302.     reportDefault(parser, enc, s, next);
  1303.   break;
  1304. }
  1305. name = poolStoreString(&dtd.pool, enc,
  1306. s + enc->minBytesPerChar,
  1307. next - enc->minBytesPerChar);
  1308. if (!name)
  1309.   return XML_ERROR_NO_MEMORY;
  1310. entity = (ENTITY *)lookup(&dtd.generalEntities, name, 0);
  1311. poolDiscard(&dtd.pool);
  1312. if (!entity) {
  1313.   if (dtd.complete || dtd.standalone)
  1314.     return XML_ERROR_UNDEFINED_ENTITY;
  1315.   if (defaultHandler)
  1316.     reportDefault(parser, enc, s, next);
  1317.   break;
  1318. }
  1319. if (entity->open)
  1320.   return XML_ERROR_RECURSIVE_ENTITY_REF;
  1321. if (entity->notation)
  1322.   return XML_ERROR_BINARY_ENTITY_REF;
  1323. if (entity) {
  1324.   if (entity->textPtr) {
  1325.     enum XML_Error result;
  1326.     OPEN_INTERNAL_ENTITY openEntity;
  1327.     if (defaultHandler && !defaultExpandInternalEntities) {
  1328.       reportDefault(parser, enc, s, next);
  1329.       break;
  1330.     }
  1331.     entity->open = 1;
  1332.     openEntity.next = openInternalEntities;
  1333.     openInternalEntities = &openEntity;
  1334.     openEntity.entity = entity;
  1335.     openEntity.internalEventPtr = 0;
  1336.     openEntity.internalEventEndPtr = 0;
  1337.     result = doContent(parser,
  1338.        tagLevel,
  1339.        internalEncoding,
  1340.        (char *)entity->textPtr,
  1341.        (char *)(entity->textPtr + entity->textLen),
  1342.        0);
  1343.     entity->open = 0;
  1344.     openInternalEntities = openEntity.next;
  1345.     if (result)
  1346.       return result;
  1347.   }
  1348.   else if (externalEntityRefHandler) {
  1349.     const XML_Char *context;
  1350.     entity->open = 1;
  1351.     context = getContext(parser);
  1352.     entity->open = 0;
  1353.     if (!context)
  1354.       return XML_ERROR_NO_MEMORY;
  1355.     if (!externalEntityRefHandler(externalEntityRefHandlerArg,
  1356.           context,
  1357.   entity->base,
  1358.   entity->systemId,
  1359.   entity->publicId))
  1360.       return XML_ERROR_EXTERNAL_ENTITY_HANDLING;
  1361.     poolDiscard(&tempPool);
  1362.   }
  1363.   else if (defaultHandler)
  1364.     reportDefault(parser, enc, s, next);
  1365. }
  1366. break;
  1367.       }
  1368.     case XML_TOK_START_TAG_WITH_ATTS:
  1369.       if (!startElementHandler) {
  1370. enum XML_Error result = storeAtts(parser, enc, s, 0, 0);
  1371. if (result)
  1372.   return result;
  1373.       }
  1374.       /* fall through */
  1375.     case XML_TOK_START_TAG_NO_ATTS:
  1376.       {
  1377. TAG *tag;
  1378. if (freeTagList) {
  1379.   tag = freeTagList;
  1380.   freeTagList = freeTagList->parent;
  1381. }
  1382. else {
  1383.   tag = (TAG*) malloc(sizeof(TAG)); /* Helix expat change */
  1384.   if (!tag)
  1385.     return XML_ERROR_NO_MEMORY;
  1386.   tag->buf = (char*) malloc(INIT_TAG_BUF_SIZE); /* Helix expat change */
  1387.   if (!tag->buf)
  1388.     return XML_ERROR_NO_MEMORY;
  1389.   tag->bufEnd = tag->buf + INIT_TAG_BUF_SIZE;
  1390. }
  1391. tag->bindings = 0;
  1392. tag->parent = tagStack;
  1393. tagStack = tag;
  1394. tag->name.localPart = 0;
  1395. tag->rawName = s + enc->minBytesPerChar;
  1396. tag->rawNameLength = XmlNameLength(enc, tag->rawName);
  1397. if (nextPtr) {
  1398.   /* Need to guarantee that:
  1399.      tag->buf + ROUND_UP(tag->rawNameLength, sizeof(XML_Char)) <= tag->bufEnd - sizeof(XML_Char) */
  1400.   if (tag->rawNameLength + (int)(sizeof(XML_Char) - 1) + (int)sizeof(XML_Char) > tag->bufEnd - tag->buf) {
  1401.     int bufSize = tag->rawNameLength * 4;
  1402.     bufSize = ROUND_UP(bufSize, sizeof(XML_Char));
  1403.     tag->buf = (char*) realloc(tag->buf, bufSize); /* Helix expat change */
  1404.     if (!tag->buf)
  1405.       return XML_ERROR_NO_MEMORY;
  1406.     tag->bufEnd = tag->buf + bufSize;
  1407.   }
  1408.   memcpy(tag->buf, tag->rawName, tag->rawNameLength);
  1409.   tag->rawName = tag->buf;
  1410. }
  1411. ++tagLevel;
  1412. if (startElementHandler) {
  1413.   enum XML_Error result;
  1414.   XML_Char *toPtr;
  1415.   for (;;) {
  1416.     const char *rawNameEnd = tag->rawName + tag->rawNameLength;
  1417.     const char *fromPtr = tag->rawName;
  1418.     int bufSize;
  1419.     if (nextPtr)
  1420.       toPtr = (XML_Char *)(tag->buf + ROUND_UP(tag->rawNameLength, sizeof(XML_Char)));
  1421.     else
  1422.       toPtr = (XML_Char *)tag->buf;
  1423.     tag->name.str = toPtr;
  1424.     XmlConvert(enc,
  1425.        &fromPtr, rawNameEnd,
  1426.        (ICHAR **)&toPtr, (ICHAR *)tag->bufEnd - 1);
  1427.     if (fromPtr == rawNameEnd)
  1428.       break;
  1429.     bufSize = (tag->bufEnd - tag->buf) << 1;
  1430.     tag->buf = (char*) realloc(tag->buf, bufSize); /* Helix expat change */
  1431.     if (!tag->buf)
  1432.       return XML_ERROR_NO_MEMORY;
  1433.     tag->bufEnd = tag->buf + bufSize;
  1434.     if (nextPtr)
  1435.       tag->rawName = tag->buf;
  1436.   }
  1437.   *toPtr = XML_T('');
  1438.   result = storeAtts(parser, enc, s, &(tag->name), &(tag->bindings));
  1439.   if (result)
  1440.     return result;
  1441.   startElementHandler(handlerArg, tag->name.str, (const XML_Char **)atts);
  1442.   poolClear(&tempPool);
  1443. }
  1444. else {
  1445.   tag->name.str = 0;
  1446.   if (defaultHandler)
  1447.     reportDefault(parser, enc, s, next);
  1448. }
  1449. break;
  1450.       }
  1451.     case XML_TOK_EMPTY_ELEMENT_WITH_ATTS:
  1452.       if (!startElementHandler) {
  1453. enum XML_Error result = storeAtts(parser, enc, s, 0, 0);
  1454. if (result)
  1455.   return result;
  1456.       }
  1457.       /* fall through */
  1458.     case XML_TOK_EMPTY_ELEMENT_NO_ATTS:
  1459.       if (startElementHandler || endElementHandler) {
  1460. const char *rawName = s + enc->minBytesPerChar;
  1461. enum XML_Error result;
  1462. BINDING *bindings = 0;
  1463. TAG_NAME name;
  1464. name.str = poolStoreString(&tempPool, enc, rawName,
  1465.    rawName + XmlNameLength(enc, rawName));
  1466. if (!name.str)
  1467.   return XML_ERROR_NO_MEMORY;
  1468. poolFinish(&tempPool);
  1469. result = storeAtts(parser, enc, s, &name, &bindings);
  1470. if (result)
  1471.   return result;
  1472. poolFinish(&tempPool);
  1473. if (startElementHandler)
  1474.   startElementHandler(handlerArg, name.str, (const XML_Char **)atts);
  1475. if (endElementHandler) {
  1476.   if (startElementHandler)
  1477.     *eventPP = *eventEndPP;
  1478.   endElementHandler(handlerArg, name.str);
  1479. }
  1480. poolClear(&tempPool);
  1481. while (bindings) {
  1482.   BINDING *b = bindings;
  1483.   if (endNamespaceDeclHandler)
  1484.     endNamespaceDeclHandler(handlerArg, b->prefix->name);
  1485.   bindings = bindings->nextTagBinding;
  1486.   b->nextTagBinding = freeBindingList;
  1487.   freeBindingList = b;
  1488.   b->prefix->binding = b->prevPrefixBinding;
  1489. }
  1490.       }
  1491.       else if (defaultHandler)
  1492. reportDefault(parser, enc, s, next);
  1493.       if (tagLevel == 0)
  1494. return epilogProcessor(parser, next, end, nextPtr);
  1495.       break;
  1496.     case XML_TOK_END_TAG:
  1497.       if (tagLevel == startTagLevel)
  1498.         return XML_ERROR_ASYNC_ENTITY;
  1499.       else {
  1500. int len;
  1501. const char *rawName;
  1502. TAG *tag = tagStack;
  1503. tagStack = tag->parent;
  1504. tag->parent = freeTagList;
  1505. freeTagList = tag;
  1506. rawName = s + enc->minBytesPerChar*2;
  1507. len = XmlNameLength(enc, rawName);
  1508. if (len != tag->rawNameLength
  1509.     || memcmp(tag->rawName, rawName, len) != 0) {
  1510.   *eventPP = rawName;
  1511.   return XML_ERROR_TAG_MISMATCH;
  1512. }
  1513. --tagLevel;
  1514. if (endElementHandler && tag->name.str) {
  1515.   if (tag->name.localPart) {
  1516.     XML_Char *to = (XML_Char *)tag->name.str + tag->name.uriLen;
  1517.     const XML_Char *from = tag->name.localPart;
  1518.     while ((*to++ = *from++) != 0)
  1519.       ;
  1520.   }
  1521.   endElementHandler(handlerArg, tag->name.str);
  1522. }
  1523. else if (defaultHandler)
  1524.   reportDefault(parser, enc, s, next);
  1525. while (tag->bindings) {
  1526.   BINDING *b = tag->bindings;
  1527.   if (endNamespaceDeclHandler)
  1528.     endNamespaceDeclHandler(handlerArg, b->prefix->name);
  1529.   tag->bindings = tag->bindings->nextTagBinding;
  1530.   b->nextTagBinding = freeBindingList;
  1531.   freeBindingList = b;
  1532.   b->prefix->binding = b->prevPrefixBinding;
  1533. }
  1534. if (tagLevel == 0)
  1535.   return epilogProcessor(parser, next, end, nextPtr);
  1536.       }
  1537.       break;
  1538.     case XML_TOK_CHAR_REF:
  1539.       {
  1540. int n = XmlCharRefNumber(enc, s);
  1541. if (n < 0)
  1542.   return XML_ERROR_BAD_CHAR_REF;
  1543. if (characterDataHandler) {
  1544.   XML_Char buf[XML_ENCODE_MAX];
  1545.   characterDataHandler(handlerArg, buf, XmlEncode(n, (ICHAR *)buf));
  1546. }
  1547. else if (defaultHandler)
  1548.   reportDefault(parser, enc, s, next);
  1549.       }
  1550.       break;
  1551.     case XML_TOK_XML_DECL:
  1552.       return XML_ERROR_MISPLACED_XML_PI;
  1553.     case XML_TOK_DATA_NEWLINE:
  1554.       if (characterDataHandler) {
  1555. XML_Char c = 0xA;
  1556. characterDataHandler(handlerArg, &c, 1);
  1557.       }
  1558.       else if (defaultHandler)
  1559. reportDefault(parser, enc, s, next);
  1560.       break;
  1561.     case XML_TOK_CDATA_SECT_OPEN:
  1562.       {
  1563. enum XML_Error result;
  1564. if (startCdataSectionHandler)
  1565.      startCdataSectionHandler(handlerArg);
  1566. #if 0
  1567. /* Suppose you doing a transformation on a document that involves
  1568.    changing only the character data.  You set up a defaultHandler
  1569.    and a characterDataHandler.  The defaultHandler simply copies
  1570.    characters through.  The characterDataHandler does the transformation
  1571.    and writes the characters out escaping them as necessary.  This case
  1572.    will fail to work if we leave out the following two lines (because &
  1573.    and < inside CDATA sections will be incorrectly escaped).
  1575.    However, now we have a start/endCdataSectionHandler, so it seems
  1576.    easier to let the user deal with this. */
  1578. else if (characterDataHandler)
  1579.      characterDataHandler(handlerArg, dataBuf, 0);
  1580. #endif
  1581. else if (defaultHandler)
  1582.   reportDefault(parser, enc, s, next);
  1583. result = doCdataSection(parser, enc, &next, end, nextPtr);
  1584. if (!next) {
  1585.   processor = cdataSectionProcessor;
  1586.   return result;
  1587. }
  1588.       }
  1589.       break;
  1590.     case XML_TOK_TRAILING_RSQB:
  1591.       if (nextPtr) {
  1592. *nextPtr = s;
  1593. return XML_ERROR_NONE;
  1594.       }
  1595.       if (characterDataHandler) {
  1596. if (MUST_CONVERT(enc, s)) {
  1597.   ICHAR *dataPtr = (ICHAR *)dataBuf;
  1598.   XmlConvert(enc, &s, end, &dataPtr, (ICHAR *)dataBufEnd);
  1599.   characterDataHandler(handlerArg, dataBuf, dataPtr - (ICHAR *)dataBuf);
  1600. }
  1601. else
  1602.   characterDataHandler(handlerArg,
  1603.           (XML_Char *)s,
  1604.        (XML_Char *)end - (XML_Char *)s);
  1605.       }
  1606.       else if (defaultHandler)
  1607. reportDefault(parser, enc, s, end);
  1608.       if (startTagLevel == 0) {
  1609.         *eventPP = end;
  1610. return XML_ERROR_NO_ELEMENTS;
  1611.       }
  1612.       if (tagLevel != startTagLevel) {
  1613. *eventPP = end;
  1614. return XML_ERROR_ASYNC_ENTITY;
  1615.       }
  1616.       return XML_ERROR_NONE;
  1617.     case XML_TOK_DATA_CHARS:
  1618.       if (characterDataHandler) {
  1619. if (MUST_CONVERT(enc, s)) {
  1620.   for (;;) {
  1621.     ICHAR *dataPtr = (ICHAR *)dataBuf;
  1622.     XmlConvert(enc, &s, next, &dataPtr, (ICHAR *)dataBufEnd);
  1623.     *eventEndPP = s;
  1624.     characterDataHandler(handlerArg, dataBuf, dataPtr - (ICHAR *)dataBuf);
  1625.     if (s == next)
  1626.       break;
  1627.     *eventPP = s;
  1628.   }
  1629. }
  1630. else
  1631.   characterDataHandler(handlerArg,
  1632.        (XML_Char *)s,
  1633.        (XML_Char *)next - (XML_Char *)s);
  1634.       }
  1635.       else if (defaultHandler)
  1636. reportDefault(parser, enc, s, next);
  1637.       break;
  1638.     case XML_TOK_PI:
  1639.       if (!reportProcessingInstruction(parser, enc, s, next))
  1640. return XML_ERROR_NO_MEMORY;
  1641.       break;
  1642.     case XML_TOK_COMMENT:
  1643.       if (!reportComment(parser, enc, s, next))
  1644. return XML_ERROR_NO_MEMORY;
  1645.       break;
  1646.     default:
  1647.       if (defaultHandler)
  1648. reportDefault(parser, enc, s, next);
  1649.       break;
  1650.     }
  1651.     *eventPP = s = next;
  1652.   }
  1653.   /* not reached */
  1654. }
  1656. /* If tagNamePtr is non-null, build a real list of attributes,
  1657. otherwise just check the attributes for well-formedness. */
  1659. static enum XML_Error storeAtts(XML_Parser parser, const ENCODING *enc,
  1660. const char *attStr, TAG_NAME *tagNamePtr,
  1661. BINDING **bindingsPtr)
  1662. {
  1663.   ELEMENT_TYPE *elementType = 0;
  1664.   int nDefaultAtts = 0;
  1665.   const XML_Char **appAtts;   /* the attribute list to pass to the application */
  1666.   int attIndex = 0;
  1667.   int i;
  1668.   int n;
  1669.   int nPrefixes = 0;
  1670.   BINDING *binding;
  1671.   const XML_Char *localPart;
  1673.   /* lookup the element type name */
  1674.   if (tagNamePtr) {
  1675.     elementType = (ELEMENT_TYPE *)lookup(&dtd.elementTypes, tagNamePtr->str, 0);
  1676.     if (!elementType) {
  1677.       tagNamePtr->str = poolCopyString(&dtd.pool, tagNamePtr->str);
  1678.       if (!tagNamePtr->str)
  1679. return XML_ERROR_NO_MEMORY;
  1680.       elementType = (ELEMENT_TYPE *)lookup(&dtd.elementTypes, tagNamePtr->str, sizeof(ELEMENT_TYPE));
  1681.       if (!elementType)
  1682.         return XML_ERROR_NO_MEMORY;
  1683.       if (ns && !setElementTypePrefix(parser, elementType))
  1684.         return XML_ERROR_NO_MEMORY;
  1685.     }
  1686.     nDefaultAtts = elementType->nDefaultAtts;
  1687.   }
  1688.   /* get the attributes from the tokenizer */
  1689.   n = XmlGetAttributes(enc, attStr, attsSize, atts);
  1690.   if (n + nDefaultAtts > attsSize) {
  1691.     int oldAttsSize = attsSize;
  1692.     attsSize = n + nDefaultAtts + INIT_ATTS_SIZE;
  1693.     atts = (ATTRIBUTE*) realloc((void *)atts, attsSize * sizeof(ATTRIBUTE)); /* Helix expat change */
  1694.     if (!atts)
  1695.       return XML_ERROR_NO_MEMORY;
  1696.     if (n > oldAttsSize)
  1697.       XmlGetAttributes(enc, attStr, n, atts);
  1698.   }
  1699.   appAtts = (const XML_Char **)atts;
  1700.   for (i = 0; i < n; i++) {
  1701.     /* add the name and value to the attribute list */
  1702.     ATTRIBUTE_ID *attId = getAttributeId(parser, enc, atts[i].name,
  1703.  atts[i].name
  1704.  + XmlNameLength(enc, atts[i].name));
  1705.     if (!attId)
  1706.       return XML_ERROR_NO_MEMORY;
  1707.     /* detect duplicate attributes */
  1708.     if ((attId->name)[-1]) {
  1709.       if (enc == encoding)
  1710. eventPtr = atts[i].name;
  1711.       return XML_ERROR_DUPLICATE_ATTRIBUTE;
  1712.     }
  1713.     (attId->name)[-1] = 1;
  1714.     appAtts[attIndex++] = attId->name;
  1715.     if (!atts[i].normalized) {
  1716.       enum XML_Error result;
  1717.       int isCdata = 1;
  1719.       /* figure out whether declared as other than CDATA */
  1720.       if (attId->maybeTokenized) {
  1721. int j;
  1722. for (j = 0; j < nDefaultAtts; j++) {
  1723.   if (attId == elementType->defaultAtts[j].id) {
  1724.     isCdata = elementType->defaultAtts[j].isCdata;
  1725.     break;
  1726.   }
  1727. }
  1728.       }
  1730.       /* normalize the attribute value */
  1731.       result = storeAttributeValue(parser, enc, isCdata,
  1732.    atts[i].valuePtr, atts[i].valueEnd,
  1733.            &tempPool);
  1734.       if (result)
  1735. return result;
  1736.       if (tagNamePtr) {
  1737. appAtts[attIndex] = poolStart(&tempPool);
  1738. poolFinish(&tempPool);
  1739.       }
  1740.       else
  1741. poolDiscard(&tempPool);
  1742.     }
  1743.     else if (tagNamePtr) {
  1744.       /* the value did not need normalizing */
  1745.       appAtts[attIndex] = poolStoreString(&tempPool, enc, atts[i].valuePtr, atts[i].valueEnd);
  1746.       if (appAtts[attIndex] == 0)
  1747. return XML_ERROR_NO_MEMORY;
  1748.       poolFinish(&tempPool);
  1749.     }
  1750.     /* handle prefixed attribute names */
  1751.     if (attId->prefix && tagNamePtr) {
  1752.       if (attId->xmlns) {
  1753. /* deal with namespace declarations here */
  1754.         if (!addBinding(parser, attId->prefix, attId, appAtts[attIndex], bindingsPtr))
  1755.           return XML_ERROR_NO_MEMORY;
  1756.         --attIndex;
  1757.       }
  1758.       else {
  1759. /* deal with other prefixed names later */
  1760.         attIndex++;
  1761.         nPrefixes++;
  1762.         (attId->name)[-1] = 2;
  1763.       }
  1764.     }
  1765.     else
  1766.       attIndex++;
  1767.   }
  1768.   if (tagNamePtr) {
  1769.     int j;
  1770.     nSpecifiedAtts = attIndex;
  1771.     if (elementType->idAtt && (elementType->idAtt->name)[-1]) {
  1772.       for (i = 0; i < attIndex; i += 2)
  1773. if (appAtts[i] == elementType->idAtt->name) {
  1774.   idAttIndex = i;
  1775.   break;
  1776. }
  1777.     }
  1778.     else
  1779.       idAttIndex = -1;
  1780.     /* do attribute defaulting */
  1781.     for (j = 0; j < nDefaultAtts; j++) {
  1782.       const DEFAULT_ATTRIBUTE *da = elementType->defaultAtts + j;
  1783.       if (!(da->id->name)[-1] && da->value) {
  1784.         if (da->id->prefix) {
  1785.           if (da->id->xmlns) {
  1786.     if (!addBinding(parser, da->id->prefix, da->id, da->value, bindingsPtr))
  1787.       return XML_ERROR_NO_MEMORY;
  1788.   }
  1789.           else {
  1790.     (da->id->name)[-1] = 2;
  1791.     nPrefixes++;
  1792.        appAtts[attIndex++] = da->id->name;
  1793.     appAtts[attIndex++] = da->value;
  1794.   }
  1795. }
  1796. else {
  1797.   (da->id->name)[-1] = 1;
  1798.   appAtts[attIndex++] = da->id->name;
  1799.   appAtts[attIndex++] = da->value;
  1800. }
  1801.       }
  1802.     }
  1803.     appAtts[attIndex] = 0;
  1804.   }
  1805.   i = 0;
  1806.   if (nPrefixes) {
  1807.     /* expand prefixed attribute names */
  1808.     for (; i < attIndex; i += 2) {
  1809.       if (appAtts[i][-1] == 2) {
  1810.         ATTRIBUTE_ID *id;
  1811.         ((XML_Char *)(appAtts[i]))[-1] = 0;
  1812. id = (ATTRIBUTE_ID *)lookup(&dtd.attributeIds, appAtts[i], 0);
  1813. if (id->prefix->binding) {
  1814.   int j;
  1815.   const BINDING *b = id->prefix->binding;
  1816.   const XML_Char *s = appAtts[i];
  1817.   for (j = 0; j < b->uriLen; j++) {
  1818.     if (!poolAppendChar(&tempPool, b->uri[j]))
  1819.       return XML_ERROR_NO_MEMORY;
  1820.   }
  1821.   while (*s++ != ':')
  1822.     ;
  1823.   do {
  1824.     if (!poolAppendChar(&tempPool, *s))
  1825.       return XML_ERROR_NO_MEMORY;
  1826.   } while (*s++);
  1827.   appAtts[i] = poolStart(&tempPool);
  1828.   poolFinish(&tempPool);
  1829. }
  1830. if (!--nPrefixes)
  1831.   break;
  1832.       }
  1833.       else
  1834. ((XML_Char *)(appAtts[i]))[-1] = 0;
  1835.     }
  1836.   }
  1837.   /* clear the flags that say whether attributes were specified */
  1838.   for (; i < attIndex; i += 2)
  1839.     ((XML_Char *)(appAtts[i]))[-1] = 0;
  1840.   if (!tagNamePtr)
  1841.     return XML_ERROR_NONE;
  1842.   for (binding = *bindingsPtr; binding; binding = binding->nextTagBinding)
  1843.     binding->attId->name[-1] = 0;
  1844.   /* expand the element type name */
  1845.   if (elementType->prefix) {
  1846.     binding = elementType->prefix->binding;
  1847.     if (!binding)
  1848.       return XML_ERROR_NONE;
  1849.     localPart = tagNamePtr->str;
  1850.     while (*localPart++ != XML_T(':'))
  1851.       ;
  1852.   }
  1853.   else if (dtd.defaultPrefix.binding) {
  1854.     binding = dtd.defaultPrefix.binding;
  1855.     localPart = tagNamePtr->str;
  1856.   }
  1857.   else
  1858.     return XML_ERROR_NONE;
  1859.   tagNamePtr->localPart = localPart;
  1860.   tagNamePtr->uriLen = binding->uriLen;
  1861.   for (i = 0; localPart[i++];)
  1862.     ;
  1863.   n = i + binding->uriLen;
  1864.   if (n > binding->uriAlloc) {
  1865.     TAG *p;
  1866.     XML_Char *uri = (XML_Char*) malloc((n + EXPAND_SPARE) * sizeof(XML_Char)); /* Helix expat change */
  1867.     if (!uri)
  1868.       return XML_ERROR_NO_MEMORY;
  1869.     binding->uriAlloc = n + EXPAND_SPARE;
  1870.     memcpy(uri, binding->uri, binding->uriLen * sizeof(XML_Char));
  1871.     for (p = tagStack; p; p = p->parent)
  1872.       if (p->name.str == binding->uri)
  1873. p->name.str = uri;
  1874.     free(binding->uri);
  1875.     binding->uri = uri;
  1876.   }
  1877.   memcpy(binding->uri + binding->uriLen, localPart, i * sizeof(XML_Char));
  1878.   tagNamePtr->str = binding->uri;
  1879.   return XML_ERROR_NONE;
  1880. }
  1882. static
  1883. int addBinding(XML_Parser parser, PREFIX *prefix, const ATTRIBUTE_ID *attId, const XML_Char *uri, BINDING **bindingsPtr)
  1884. {
  1885.   BINDING *b;
  1886.   int len;
  1887.   for (len = 0; uri[len]; len++)
  1888.     ;
  1889.   if (namespaceSeparator)
  1890.     len++;
  1891.   if (freeBindingList) {
  1892.     b = freeBindingList;
  1893.     if (len > b->uriAlloc) {
  1894.       b->uri = (XML_Char*) realloc(b->uri, sizeof(XML_Char) * (len + EXPAND_SPARE)); /* Helix expat change */
  1895.       if (!b->uri)
  1896. return 0;
  1897.       b->uriAlloc = len + EXPAND_SPARE;
  1898.     }
  1899.     freeBindingList = b->nextTagBinding;
  1900.   }
  1901.   else {
  1902.     b = (BINDING*) malloc(sizeof(BINDING)); /* Helix expat change */
  1903.     if (!b)
  1904.       return 0;
  1905.     b->uri = (XML_Char*) malloc(sizeof(XML_Char) * (len + EXPAND_SPARE)); /* Helix expat change */
  1906.     if (!b->uri) {
  1907.       free(b);
  1908.       return 0;
  1909.     }
  1910.     b->uriAlloc = len + EXPAND_SPARE;
  1911.   }
  1912.   b->uriLen = len;
  1913.   memcpy(b->uri, uri, len * sizeof(XML_Char));
  1914.   if (namespaceSeparator)
  1915.     b->uri[len - 1] = namespaceSeparator;
  1916.   b->prefix = prefix;
  1917.   b->attId = attId;
  1918.   b->prevPrefixBinding = prefix->binding;
  1919.   if (*uri == XML_T('') && prefix == &dtd.defaultPrefix)
  1920.     prefix->binding = 0;
  1921.   else
  1922.     prefix->binding = b;
  1923.   b->nextTagBinding = *bindingsPtr;
  1924.   *bindingsPtr = b;
  1925.   if (startNamespaceDeclHandler)
  1926.     startNamespaceDeclHandler(handlerArg, prefix->name,
  1927.       prefix->binding ? uri : 0);
  1928.   return 1;
  1929. }
  1931. /* The idea here is to avoid using stack for each CDATA section when
  1932. the whole file is parsed with one call. */
  1934. static
  1935. enum XML_Error cdataSectionProcessor(XML_Parser parser,
  1936.      const char *start,
  1937.           const char *end,
  1938.      const char **endPtr)
  1939. {
  1940.   enum XML_Error result = doCdataSection(parser, encoding, &start, end, endPtr);
  1941.   if (start) {
  1942.     processor = contentProcessor;
  1943.     return contentProcessor(parser, start, end, endPtr);
  1944.   }
  1945.   return result;
  1946. }
  1948. /* startPtr gets set to non-null is the section is closed, and to null if
  1949. the section is not yet closed. */
  1951. static
  1952. enum XML_Error doCdataSection(XML_Parser parser,
  1953.       const ENCODING *enc,
  1954.       const char **startPtr,
  1955.       const char *end,
  1956.       const char **nextPtr)
  1957. {
  1958.   const char *s = *startPtr;
  1959.   const char **eventPP;
  1960.   const char **eventEndPP;
  1961.   if (enc == encoding) {
  1962.     eventPP = &eventPtr;
  1963.     *eventPP = s;
  1964.     eventEndPP = &eventEndPtr;
  1965.   }
  1966.   else {
  1967.     eventPP = &(openInternalEntities->internalEventPtr);
  1968.     eventEndPP = &(openInternalEntities->internalEventEndPtr);
  1969.   }
  1970.   *eventPP = s;
  1971.   *startPtr = 0;
  1972.   for (;;) {
  1973.     const char *next;
  1974.     int err;
  1975.     int tok = XmlCdataSectionTok(enc, s, end, &next);
  1976.     *eventEndPP = next;
  1977.     switch (tok) {
  1978.     case XML_TOK_CDATA_SECT_CLOSE:
  1979.       if (endCdataSectionHandler)
  1980. endCdataSectionHandler(handlerArg);
  1981. #if 0
  1982.       /* see comment under XML_TOK_CDATA_SECT_OPEN */
  1983.       else if (characterDataHandler)
  1984. characterDataHandler(handlerArg, dataBuf, 0);
  1985. #endif
  1986.       else if (defaultHandler)
  1987. reportDefault(parser, enc, s, next);
  1988.       *startPtr = next;
  1989.       return XML_ERROR_NONE;
  1990.     case XML_TOK_DATA_NEWLINE:
  1991.       if (characterDataHandler) {
  1992. XML_Char c = 0xA;
  1993. characterDataHandler(handlerArg, &c, 1);
  1994.       }
  1995.       else if (defaultHandler)
  1996. reportDefault(parser, enc, s, next);
  1997.       break;
  1998.     case XML_TOK_DATA_CHARS:
  1999.       if (characterDataHandler) {
  2000. if (MUST_CONVERT(enc, s)) {
  2001.   for (;;) {
  2002.        ICHAR *dataPtr = (ICHAR *)dataBuf;
  2003.     XmlConvert(enc, &s, next, &dataPtr, (ICHAR *)dataBufEnd);
  2004.     *eventEndPP = next;
  2005.     characterDataHandler(handlerArg, dataBuf, dataPtr - (ICHAR *)dataBuf);
  2006.     if (s == next)
  2007.       break;
  2008.     *eventPP = s;
  2009.   }
  2010. }
  2011. else
  2012.   characterDataHandler(handlerArg,
  2013.           (XML_Char *)s,
  2014.        (XML_Char *)next - (XML_Char *)s);
  2015.       }
  2016.       else if (defaultHandler)
  2017. reportDefault(parser, enc, s, next);
  2018.       break;
  2019.     CASE_ERROR()
  2020.       *eventPP = next;
  2021.       return (enum XML_Error) err; /* Helix expat change */
  2022.     case XML_TOK_PARTIAL_CHAR:
  2023.       if (nextPtr) {
  2024. *nextPtr = s;
  2025. return XML_ERROR_NONE;
  2026.       }
  2027.       return XML_ERROR_PARTIAL_CHAR;
  2028.     case XML_TOK_PARTIAL:
  2029.     case XML_TOK_NONE:
  2030.       if (nextPtr) {
  2031. *nextPtr = s;
  2032. return XML_ERROR_NONE;
  2033.       }
  2034.       return XML_ERROR_UNCLOSED_CDATA_SECTION;
  2035.     default:
  2036.       abort();
  2037.     }
  2038.     *eventPP = s = next;
  2039.   }
  2040.   /* not reached */
  2041. }
  2043. #ifdef XML_DTD
  2045. /* The idea here is to avoid using stack for each IGNORE section when
  2046. the whole file is parsed with one call. */
  2048. static
  2049. enum XML_Error ignoreSectionProcessor(XML_Parser parser,
  2050.       const char *start,
  2051.       const char *end,
  2052.       const char **endPtr)
  2053. {
  2054.   enum XML_Error result = doIgnoreSection(parser, encoding, &start, end, endPtr);
  2055.   if (start) {
  2056.     processor = prologProcessor;
  2057.     return prologProcessor(parser, start, end, endPtr);
  2058.   }
  2059.   return result;
  2060. }
  2062. /* startPtr gets set to non-null is the section is closed, and to null if
  2063. the section is not yet closed. */
  2065. static
  2066. enum XML_Error doIgnoreSection(XML_Parser parser,
  2067.        const ENCODING *enc,
  2068.        const char **startPtr,
  2069.        const char *end,
  2070.        const char **nextPtr)
  2071. {
  2072.   const char *next;
  2073.   int tok;
  2074.   int err;
  2075.   const char *s = *startPtr;
  2076.   const char **eventPP;
  2077.   const char **eventEndPP;
  2078.   if (enc == encoding) {
  2079.     eventPP = &eventPtr;
  2080.     *eventPP = s;
  2081.     eventEndPP = &eventEndPtr;
  2082.   }
  2083.   else {
  2084.     eventPP = &(openInternalEntities->internalEventPtr);
  2085.     eventEndPP = &(openInternalEntities->internalEventEndPtr);
  2086.   }
  2087.   *eventPP = s;
  2088.   *startPtr = 0;
  2089.   tok = XmlIgnoreSectionTok(enc, s, end, &next);
  2090.   *eventEndPP = next;
  2091.   switch (tok) {
  2092.   case XML_TOK_IGNORE_SECT:
  2093.     if (defaultHandler)
  2094.       reportDefault(parser, enc, s, next);
  2095.     *startPtr = next;
  2096.     return XML_ERROR_NONE;
  2097.   CASE_ERROR()
  2098.     *eventPP = next;
  2099.     return (enum XML_Error) err; /* Helix expat change */
  2100.   case XML_TOK_PARTIAL_CHAR:
  2101.     if (nextPtr) {
  2102.       *nextPtr = s;
  2103.       return XML_ERROR_NONE;
  2104.     }
  2105.     return XML_ERROR_PARTIAL_CHAR;
  2106.   case XML_TOK_PARTIAL:
  2107.   case XML_TOK_NONE:
  2108.     if (nextPtr) {
  2109.       *nextPtr = s;
  2110.       return XML_ERROR_NONE;
  2111.     }
  2112.     return XML_ERROR_SYNTAX; /* XML_ERROR_UNCLOSED_IGNORE_SECTION */
  2113.   default:
  2114.     abort();
  2115.   }
  2116.   /* not reached */
  2117. }
  2119. #endif /* XML_DTD */
  2121. static enum XML_Error
  2122. initializeEncoding(XML_Parser parser)
  2123. {
  2124.   const char *s;
  2125. #ifdef XML_UNICODE
  2126.   char encodingBuf[128];
  2127.   if (!protocolEncodingName)
  2128.     s = 0;
  2129.   else {
  2130.     int i;
  2131.     for (i = 0; protocolEncodingName[i]; i++) {
  2132.       if (i == sizeof(encodingBuf) - 1
  2133.   || (protocolEncodingName[i] & ~0x7f) != 0) {
  2134. encodingBuf[0] = '';
  2135. break;
  2136.       }
  2137.       encodingBuf[i] = (char)protocolEncodingName[i];
  2138.     }
  2139.     encodingBuf[i] = '';
  2140.     s = encodingBuf;
  2141.   }
  2142. #else
  2143.   s = protocolEncodingName;
  2144. #endif
  2145.   if ((ns ? XmlInitEncodingNS : XmlInitEncoding)(&initEncoding, &encoding, s))
  2146.     return XML_ERROR_NONE;
  2147.   return handleUnknownEncoding(parser, protocolEncodingName);
  2148. }
  2150. static enum XML_Error
  2151. processXmlDecl(XML_Parser parser, int isGeneralTextEntity,
  2152.        const char *s, const char *next)
  2153. {
  2154.   const char *encodingName = 0;
  2155.   const ENCODING *newEncoding = 0;
  2156.   const char *version;
  2157.   int standalone = -1;
  2158.   if (!(ns
  2159.         ? XmlParseXmlDeclNS
  2160. : XmlParseXmlDecl)(isGeneralTextEntity,
  2161.            encoding,
  2162.            s,
  2163.            next,
  2164.            &eventPtr,
  2165.            &version,
  2166.            &encodingName,
  2167.            &newEncoding,
  2168.            &standalone))
  2169.     return XML_ERROR_SYNTAX;
  2170.   if (!isGeneralTextEntity && standalone == 1) {
  2171.     dtd.standalone = 1;
  2172. #ifdef XML_DTD
  2173.     if (paramEntityParsing == XML_PARAM_ENTITY_PARSING_UNLESS_STANDALONE)
  2174.       paramEntityParsing = XML_PARAM_ENTITY_PARSING_NEVER;
  2175. #endif /* XML_DTD */
  2176.   }
  2177.   if (defaultHandler)
  2178.     reportDefault(parser, encoding, s, next);
  2179.   if (!protocolEncodingName) {
  2180.     if (newEncoding) {
  2181.       if (newEncoding->minBytesPerChar != encoding->minBytesPerChar) {
  2182. eventPtr = encodingName;
  2183. return XML_ERROR_INCORRECT_ENCODING;
  2184.       }
  2185.       encoding = newEncoding;
  2186.     }
  2187.     else if (encodingName) {
  2188.       enum XML_Error result;
  2189.       const XML_Char *s = poolStoreString(&tempPool,
  2190.   encoding,
  2191.   encodingName,
  2192.   encodingName
  2193.   + XmlNameLength(encoding, encodingName));
  2194.       if (!s)
  2195. return XML_ERROR_NO_MEMORY;
  2196.       result = handleUnknownEncoding(parser, s);
  2197.       poolDiscard(&tempPool);
  2198.       if (result == XML_ERROR_UNKNOWN_ENCODING)
  2199. eventPtr = encodingName;
  2200.       return result;
  2201.     }
  2202.   }
  2203.   return XML_ERROR_NONE;
  2204. }
  2206. static enum XML_Error
  2207. handleUnknownEncoding(XML_Parser parser, const XML_Char *encodingName)
  2208. {
  2209.   if (unknownEncodingHandler) {
  2210.     XML_Encoding info;
  2211.     int i;
  2212.     for (i = 0; i < 256; i++)
  2213.       info.map[i] = -1;
  2214.     info.convert = 0;
  2215.     info.data = 0;
  2216.     info.release = 0;
  2217.     if (unknownEncodingHandler(unknownEncodingHandlerData, encodingName, &info)) {
  2218.       ENCODING *enc;
  2219.       unknownEncodingMem = malloc(XmlSizeOfUnknownEncoding());
  2220.       if (!unknownEncodingMem) {
  2221. if (info.release)
  2222.   info.release(info.data);
  2223. return XML_ERROR_NO_MEMORY;
  2224.       }
  2225.       enc = (ns
  2226.      ? XmlInitUnknownEncodingNS
  2227.      : XmlInitUnknownEncoding)(unknownEncodingMem,
  2228.        info.map,
  2229.        info.convert,
  2230.        info.data);
  2231.       if (enc) {
  2232. unknownEncodingData = info.data;
  2233. unknownEncodingRelease = info.release;
  2234. encoding = enc;
  2235. return XML_ERROR_NONE;
  2236.       }
  2237.     }
  2238.     if (info.release)
  2239.       info.release(info.data);
  2240.   }
  2241.   return XML_ERROR_UNKNOWN_ENCODING;
  2242. }
  2244. static enum XML_Error
  2245. prologInitProcessor(XML_Parser parser,
  2246.     const char *s,
  2247.     const char *end,
  2248.     const char **nextPtr)
  2249. {
  2250.   enum XML_Error result = initializeEncoding(parser);
  2251.   if (result != XML_ERROR_NONE)
  2252.     return result;
  2253.   processor = prologProcessor;
  2254.   return prologProcessor(parser, s, end, nextPtr);
  2255. }
  2257. static enum XML_Error
  2258. prologProcessor(XML_Parser parser,
  2259. const char *s,
  2260. const char *end,
  2261. const char **nextPtr)
  2262. {
  2263.   const char *next;
  2264.   int tok = XmlPrologTok(encoding, s, end, &next);
  2265.   return doProlog(parser, encoding, s, end, tok, next, nextPtr);
  2266. }
  2268. static enum XML_Error
  2269. doProlog(XML_Parser parser,
  2270.  const ENCODING *enc,
  2271.  const char *s,
  2272.  const char *end,
  2273.  int tok,
  2274.  const char *next,
  2275.  const char **nextPtr)
  2276. {
  2277. #ifdef XML_DTD
  2278.   static const XML_Char externalSubsetName[] = { '#' , '' };
  2279. #endif /* XML_DTD */
  2281.   const char **eventPP;
  2282.   const char **eventEndPP;
  2283.   if (enc == encoding) {
  2284.     eventPP = &eventPtr;
  2285.     eventEndPP = &eventEndPtr;
  2286.   }
  2287.   else {
  2288.     eventPP = &(openInternalEntities->internalEventPtr);
  2289.     eventEndPP = &(openInternalEntities->internalEventEndPtr);
  2290.   }
  2291.   for (;;) {
  2292.     int role;
  2293.     int err;
  2294.     *eventPP = s;
  2295.     *eventEndPP = next;
  2296.     if (tok <= 0) {
  2297.       /* the errors are less than -100... */
  2298.       if (nextPtr != 0 && tok > -100){
  2299. *nextPtr = s;
  2300. return XML_ERROR_NONE;
  2301.       }
  2302.       switch (tok) {
  2303.       CASE_ERROR()
  2304. *eventPP = next;
  2305.         return (enum XML_Error) err; /* Helix expat change */
  2306.       case XML_TOK_PARTIAL:
  2307. return XML_ERROR_UNCLOSED_TOKEN;
  2308.       case XML_TOK_PARTIAL_CHAR:
  2309. return XML_ERROR_PARTIAL_CHAR;
  2310.       case XML_TOK_NONE:
  2311. #ifdef XML_DTD
  2312. if (enc != encoding)
  2313.   return XML_ERROR_NONE;
  2314. if (parentParser) {
  2315.   if (XmlTokenRole(&prologState, XML_TOK_NONE, end, end, enc)
  2316.       == XML_ROLE_ERROR)
  2317.     return XML_ERROR_SYNTAX;
  2318.   hadExternalDoctype = 0;
  2319.   return XML_ERROR_NONE;
  2320. }
  2321. #endif /* XML_DTD */
  2322. return XML_ERROR_NO_ELEMENTS;
  2323.       default:
  2324. tok = -tok;
  2325. next = end;
  2326. break;
  2327.       }
  2328.     }
  2329.     role = XmlTokenRole(&prologState, tok, s, next, enc);
  2330.     switch (role) {
  2331.     case XML_ROLE_XML_DECL:
  2332.       {
  2333. enum XML_Error result = processXmlDecl(parser, 0, s, next);
  2334. if (result != XML_ERROR_NONE)
  2335.   return result;
  2336. enc = encoding;
  2337.       }
  2338.       break;
  2339.     case XML_ROLE_DOCTYPE_NAME:
  2340.       if (startDoctypeDeclHandler) {
  2341. const XML_Char *name = poolStoreString(&tempPool, enc, s, next);
  2342. if (!name)
  2343.   return XML_ERROR_NO_MEMORY;
  2344. startDoctypeDeclHandler(handlerArg, name);
  2345. poolClear(&tempPool);
  2346.       }
  2347.       break;
  2348. #ifdef XML_DTD
  2349.     case XML_ROLE_TEXT_DECL:
  2350.       {
  2351. enum XML_Error result = processXmlDecl(parser, 1, s, next);
  2352. if (result != XML_ERROR_NONE)
  2353.   return result;
  2354. enc = encoding;
  2355.       }
  2356.       break;
  2357. #endif /* XML_DTD */
  2358.     case XML_ROLE_DOCTYPE_PUBLIC_ID:
  2359. #ifdef XML_DTD
  2360.       declEntity = (ENTITY *)lookup(&dtd.paramEntities,
  2361.     externalSubsetName,
  2362.     sizeof(ENTITY));
  2363.       if (!declEntity)
  2364. return XML_ERROR_NO_MEMORY;
  2365. #endif /* XML_DTD */
  2366.       /* fall through */
  2367.     case XML_ROLE_ENTITY_PUBLIC_ID:
  2368.       if (!XmlIsPublicId(enc, s, next, eventPP))
  2369. return XML_ERROR_SYNTAX;
  2370.       if (declEntity) {
  2371. XML_Char *tem = poolStoreString(&dtd.pool,
  2372.                                 enc,
  2373. s + enc->minBytesPerChar,
  2374.    next - enc->minBytesPerChar);
  2375. if (!tem)
  2376.   return XML_ERROR_NO_MEMORY;
  2377. normalizePublicId(tem);
  2378. declEntity->publicId = tem;
  2379. poolFinish(&dtd.pool);
  2380.       }
  2381.       break;
  2382.     case XML_ROLE_DOCTYPE_CLOSE:
  2383.       if (dtd.complete && hadExternalDoctype) {
  2384. dtd.complete = 0;
  2385. #ifdef XML_DTD
  2386. if (paramEntityParsing && externalEntityRefHandler) {
  2387.   ENTITY *entity = (ENTITY *)lookup(&dtd.paramEntities,
  2388.     externalSubsetName,
  2389.     0);
  2390.   if (!externalEntityRefHandler(externalEntityRefHandlerArg,
  2391. 0,
  2392. entity->base,
  2393. entity->systemId,
  2394. entity->publicId))
  2395.    return XML_ERROR_EXTERNAL_ENTITY_HANDLING;
  2396. }
  2397. #endif /* XML_DTD */
  2398. if (!dtd.complete
  2399.     && !dtd.standalone
  2400.     && notStandaloneHandler
  2401.     && !notStandaloneHandler(handlerArg))
  2402.   return XML_ERROR_NOT_STANDALONE;
  2403.       }
  2404.       if (endDoctypeDeclHandler)
  2405. endDoctypeDeclHandler(handlerArg);
  2406.       break;
  2407.     case XML_ROLE_INSTANCE_START:
  2408.       processor = contentProcessor;
  2409.       return contentProcessor(parser, s, end, nextPtr);
  2410.     case XML_ROLE_ATTLIST_ELEMENT_NAME:
  2411.       {
  2412. const XML_Char *name = poolStoreString(&dtd.pool, enc, s, next);
  2413. if (!name)
  2414.   return XML_ERROR_NO_MEMORY;
  2415. declElementType = (ELEMENT_TYPE *)lookup(&dtd.elementTypes, name, sizeof(ELEMENT_TYPE));
  2416. if (!declElementType)
  2417.   return XML_ERROR_NO_MEMORY;
  2418. if (declElementType->name != name)
  2419.   poolDiscard(&dtd.pool);
  2420. else {
  2421.   poolFinish(&dtd.pool);
  2422.   if (!setElementTypePrefix(parser, declElementType))
  2423.             return XML_ERROR_NO_MEMORY;
  2424. }
  2425. break;
  2426.       }
  2427.     case XML_ROLE_ATTRIBUTE_NAME:
  2428.       declAttributeId = getAttributeId(parser, enc, s, next);
  2429.       if (!declAttributeId)
  2430. return XML_ERROR_NO_MEMORY;
  2431.       declAttributeIsCdata = 0;
  2432.       declAttributeIsId = 0;
  2433.       break;
  2434.     case XML_ROLE_ATTRIBUTE_TYPE_CDATA:
  2435.       declAttributeIsCdata = 1;
  2436.       break;
  2437.     case XML_ROLE_ATTRIBUTE_TYPE_ID:
  2438.       declAttributeIsId = 1;
  2439.       break;
  2440.     case XML_ROLE_IMPLIED_ATTRIBUTE_VALUE:
  2441.     case XML_ROLE_REQUIRED_ATTRIBUTE_VALUE:
  2442.       if (dtd.complete
  2443.   && !defineAttribute(declElementType, declAttributeId, declAttributeIsCdata,
  2444.       declAttributeIsId, 0))
  2445. return XML_ERROR_NO_MEMORY;
  2446.       break;
  2447.     case XML_ROLE_DEFAULT_ATTRIBUTE_VALUE:
  2448.     case XML_ROLE_FIXED_ATTRIBUTE_VALUE:
  2449.       {
  2450. const XML_Char *attVal;
  2451. enum XML_Error result
  2452.   = storeAttributeValue(parser, enc, declAttributeIsCdata,
  2453. s + enc->minBytesPerChar,
  2454.         next - enc->minBytesPerChar,
  2455.         &dtd.pool);
  2456. if (result)
  2457.   return result;
  2458. attVal = poolStart(&dtd.pool);
  2459. poolFinish(&dtd.pool);
  2460. if (dtd.complete
  2461.     // ID attributes aren't allowed to have a default
  2462.     && !defineAttribute(declElementType, declAttributeId, declAttributeIsCdata, 0, attVal))
  2463.   return XML_ERROR_NO_MEMORY;
  2464. break;
  2465.       }
  2466.     case XML_ROLE_ENTITY_VALUE:
  2467.       {
  2468. enum XML_Error result = storeEntityValue(parser, enc,
  2469.  s + enc->minBytesPerChar,
  2470.  next - enc->minBytesPerChar);
  2471. if (declEntity) {
  2472.   declEntity->textPtr = poolStart(&dtd.pool);
  2473.   declEntity->textLen = poolLength(&dtd.pool);
  2474.   poolFinish(&dtd.pool);
  2475.   if (internalParsedEntityDeclHandler
  2476.       // Check it's not a parameter entity
  2477.       && ((ENTITY *)lookup(&dtd.generalEntities, declEntity->name, 0)
  2478.   == declEntity)) {
  2479.     *eventEndPP = s;
  2480.     internalParsedEntityDeclHandler(handlerArg,
  2481.     declEntity->name,
  2482.     declEntity->textPtr,
  2483.     declEntity->textLen);
  2484.   }
  2485. }
  2486. else
  2487.   poolDiscard(&dtd.pool);
  2488. if (result != XML_ERROR_NONE)
  2489.   return result;
  2490.       }
  2491.       break;
  2492.     case XML_ROLE_DOCTYPE_SYSTEM_ID:
  2493.       if (!dtd.standalone
  2494. #ifdef XML_DTD
  2495.   && !paramEntityParsing
  2496. #endif /* XML_DTD */
  2497.   && notStandaloneHandler
  2498.   && !notStandaloneHandler(handlerArg))
  2499. return XML_ERROR_NOT_STANDALONE;
  2500.       hadExternalDoctype = 1;
  2501. #ifndef XML_DTD
  2502.       break;
  2503. #else /* XML_DTD */
  2504.       if (!declEntity) {
  2505. declEntity = (ENTITY *)lookup(&dtd.paramEntities,
  2506.       externalSubsetName,
  2507.       sizeof(ENTITY));
  2508. if (!declEntity)
  2509.   return XML_ERROR_NO_MEMORY;
  2510.       }
  2511.       /* fall through */
  2512. #endif /* XML_DTD */
  2513.     case XML_ROLE_ENTITY_SYSTEM_ID:
  2514.       if (declEntity) {
  2515. declEntity->systemId = poolStoreString(&dtd.pool, enc,
  2516.                                        s + enc->minBytesPerChar,
  2517.           next - enc->minBytesPerChar);
  2518. if (!declEntity->systemId)
  2519.   return XML_ERROR_NO_MEMORY;
  2520. declEntity->base = curBase;
  2521. poolFinish(&dtd.pool);
  2522.       }
  2523.       break;
  2524.     case XML_ROLE_ENTITY_NOTATION_NAME:
  2525.       if (declEntity) {
  2526. declEntity->notation = poolStoreString(&dtd.pool, enc, s, next);
  2527. if (!declEntity->notation)
  2528.   return XML_ERROR_NO_MEMORY;
  2529. poolFinish(&dtd.pool);
  2530. if (unparsedEntityDeclHandler) {
  2531.   *eventEndPP = s;
  2532.   unparsedEntityDeclHandler(handlerArg,
  2533.     declEntity->name,
  2534.     declEntity->base,
  2535.     declEntity->systemId,
  2536.     declEntity->publicId,
  2537.     declEntity->notation);
  2538. }
  2540.       }
  2541.       break;
  2542.     case XML_ROLE_EXTERNAL_GENERAL_ENTITY_NO_NOTATION:
  2543.       if (declEntity && externalParsedEntityDeclHandler) {
  2544. *eventEndPP = s;
  2545. externalParsedEntityDeclHandler(handlerArg,
  2546. declEntity->name,
  2547. declEntity->base,
  2548. declEntity->systemId,
  2549. declEntity->publicId);
  2550.       }
  2551.       break;
  2552.     case XML_ROLE_GENERAL_ENTITY_NAME:
  2553.       {
  2554. const XML_Char *name;
  2555. if (XmlPredefinedEntityName(enc, s, next)) {
  2556.   declEntity = 0;
  2557.   break;
  2558. }
  2559. name = poolStoreString(&dtd.pool, enc, s, next);
  2560. if (!name)
  2561.   return XML_ERROR_NO_MEMORY;
  2562. if (dtd.complete) {
  2563.   declEntity = (ENTITY *)lookup(&dtd.generalEntities, name, sizeof(ENTITY));
  2564.   if (!declEntity)
  2565.     return XML_ERROR_NO_MEMORY;
  2566.   if (declEntity->name != name) {
  2567.     poolDiscard(&dtd.pool);
  2568.     declEntity = 0;
  2569.   }
  2570.   else
  2571.     poolFinish(&dtd.pool);
  2572. }
  2573. else {
  2574.   poolDiscard(&dtd.pool);
  2575.   declEntity = 0;
  2576. }
  2577.       }
  2578.       break;
  2579.     case XML_ROLE_PARAM_ENTITY_NAME:
  2580. #ifdef XML_DTD
  2581.       if (dtd.complete) {
  2582. const XML_Char *name = poolStoreString(&dtd.pool, enc, s, next);
  2583. if (!name)
  2584.   return XML_ERROR_NO_MEMORY;
  2585. declEntity = (ENTITY *)lookup(&dtd.paramEntities, name, sizeof(ENTITY));
  2586. if (!declEntity)
  2587.   return XML_ERROR_NO_MEMORY;
  2588. if (declEntity->name != name) {
  2589.   poolDiscard(&dtd.pool);
  2590.   declEntity = 0;
  2591. }
  2592. else
  2593.   poolFinish(&dtd.pool);
  2594.       }
  2595. #else /* not XML_DTD */
  2596.       declEntity = 0;
  2597. #endif /* not XML_DTD */
  2598.       break;
  2599.     case XML_ROLE_NOTATION_NAME:
  2600.       declNotationPublicId = 0;
  2601.       declNotationName = 0;
  2602.       if (notationDeclHandler) {
  2603. declNotationName = poolStoreString(&tempPool, enc, s, next);
  2604. if (!declNotationName)
  2605.   return XML_ERROR_NO_MEMORY;
  2606. poolFinish(&tempPool);
  2607.       }
  2608.       break;
  2609.     case XML_ROLE_NOTATION_PUBLIC_ID:
  2610.       if (!XmlIsPublicId(enc, s, next, eventPP))
  2611. return XML_ERROR_SYNTAX;
  2612.       if (declNotationName) {
  2613. XML_Char *tem = poolStoreString(&tempPool,
  2614.                                 enc,
  2615. s + enc->minBytesPerChar,
  2616.    next - enc->minBytesPerChar);
  2617. if (!tem)
  2618.   return XML_ERROR_NO_MEMORY;
  2619. normalizePublicId(tem);
  2620. declNotationPublicId = tem;
  2621. poolFinish(&tempPool);
  2622.       }
  2623.       break;
  2624.     case XML_ROLE_NOTATION_SYSTEM_ID:
  2625.       if (declNotationName && notationDeclHandler) {
  2626. const XML_Char *systemId
  2627.   = poolStoreString(&tempPool, enc,
  2628.     s + enc->minBytesPerChar,
  2629.        next - enc->minBytesPerChar);
  2630. if (!systemId)
  2631.   return XML_ERROR_NO_MEMORY;
  2632. *eventEndPP = s;
  2633. notationDeclHandler(handlerArg,
  2634.     declNotationName,
  2635.     curBase,
  2636.     systemId,
  2637.     declNotationPublicId);
  2638.       }
  2639.       poolClear(&tempPool);
  2640.       break;
  2641.     case XML_ROLE_NOTATION_NO_SYSTEM_ID:
  2642.       if (declNotationPublicId && notationDeclHandler) {
  2643. *eventEndPP = s;
  2644. notationDeclHandler(handlerArg,
  2645.     declNotationName,
  2646.     curBase,
  2647.     0,
  2648.     declNotationPublicId);
  2649.       }
  2650.       poolClear(&tempPool);
  2651.       break;
  2652.     case XML_ROLE_ERROR:
  2653.       switch (tok) {
  2654.       case XML_TOK_PARAM_ENTITY_REF:
  2655. return XML_ERROR_PARAM_ENTITY_REF;
  2656.       case XML_TOK_XML_DECL:
  2657. return XML_ERROR_MISPLACED_XML_PI;
  2658.       default:
  2659. return XML_ERROR_SYNTAX;
  2660.       }
  2661. #ifdef XML_DTD
  2662.     case XML_ROLE_IGNORE_SECT:
  2663.       {
  2664. enum XML_Error result;
  2665. if (defaultHandler)
  2666.   reportDefault(parser, enc, s, next);
  2667. result = doIgnoreSection(parser, enc, &next, end, nextPtr);
  2668. if (!next) {
  2669.   processor = ignoreSectionProcessor;
  2670.   return result;
  2671. }
  2672.       }
  2673.       break;
  2674. #endif /* XML_DTD */
  2675.     case XML_ROLE_GROUP_OPEN:
  2676.       if (prologState.level >= groupSize) {
  2677. if (groupSize)
  2678.   groupConnector = (char*) realloc(groupConnector, groupSize *= 2); /* Helix expat change */
  2679. else
  2680.   groupConnector = (char*) malloc(groupSize = 32); /* Helix expat change */
  2681. if (!groupConnector)
  2682.   return XML_ERROR_NO_MEMORY;
  2683.       }
  2684.       groupConnector[prologState.level] = 0;
  2685.       break;
  2686.     case XML_ROLE_GROUP_SEQUENCE:
  2687.       if (groupConnector[prologState.level] == '|')
  2688. return XML_ERROR_SYNTAX;
  2689.       groupConnector[prologState.level] = ',';
  2690.       break;
  2691.     case XML_ROLE_GROUP_CHOICE:
  2692.       if (groupConnector[prologState.level] == ',')
  2693. return XML_ERROR_SYNTAX;
  2694.       groupConnector[prologState.level] = '|';
  2695.       break;
  2696.     case XML_ROLE_PARAM_ENTITY_REF:
  2697. #ifdef XML_DTD
  2698.     case XML_ROLE_INNER_PARAM_ENTITY_REF:
  2699.       if (paramEntityParsing
  2700.   && (dtd.complete || role == XML_ROLE_INNER_PARAM_ENTITY_REF)) {
  2701. const XML_Char *name;
  2702. ENTITY *entity;
  2703. name = poolStoreString(&dtd.pool, enc,
  2704. s + enc->minBytesPerChar,
  2705. next - enc->minBytesPerChar);
  2706. if (!name)
  2707.   return XML_ERROR_NO_MEMORY;
  2708. entity = (ENTITY *)lookup(&dtd.paramEntities, name, 0);
  2709. poolDiscard(&dtd.pool);
  2710. if (!entity) {
  2711.   /* FIXME what to do if !dtd.complete? */
  2712.   return XML_ERROR_UNDEFINED_ENTITY;
  2713. }
  2714. if (entity->open)
  2715.   return XML_ERROR_RECURSIVE_ENTITY_REF;
  2716. if (entity->textPtr) {
  2717.   enum XML_Error result;
  2718.   result = processInternalParamEntity(parser, entity);
  2719.   if (result != XML_ERROR_NONE)
  2720.     return result;
  2721.   break;
  2722. }
  2723. if (role == XML_ROLE_INNER_PARAM_ENTITY_REF)
  2724.   return XML_ERROR_PARAM_ENTITY_REF;
  2725. if (externalEntityRefHandler) {
  2726.   dtd.complete = 0;
  2727.   entity->open = 1;
  2728.   if (!externalEntityRefHandler(externalEntityRefHandlerArg,
  2729. 0,
  2730. entity->base,
  2731. entity->systemId,
  2732. entity->publicId)) {
  2733.     entity->open = 0;
  2734.     return XML_ERROR_EXTERNAL_ENTITY_HANDLING;
  2735.   }
  2736.   entity->open = 0;
  2737.   if (dtd.complete)
  2738.     break;
  2739. }
  2740.       }
  2741. #endif /* XML_DTD */
  2742.       if (!dtd.standalone
  2743.   && notStandaloneHandler
  2744.   && !notStandaloneHandler(handlerArg))
  2745. return XML_ERROR_NOT_STANDALONE;
  2746.       dtd.complete = 0;
  2747.       if (defaultHandler)
  2748. reportDefault(parser, enc, s, next);
  2749.       break;
  2750.     case XML_ROLE_NONE:
  2751.       switch (tok) {
  2752.       case XML_TOK_PI:
  2753. if (!reportProcessingInstruction(parser, enc, s, next))
  2754.   return XML_ERROR_NO_MEMORY;
  2755. break;
  2756.       case XML_TOK_COMMENT:
  2757. if (!reportComment(parser, enc, s, next))
  2758.   return XML_ERROR_NO_MEMORY;
  2759. break;
  2760.       }
  2761.       break;
  2762.     }
  2763.     if (defaultHandler) {
  2764.       switch (tok) {
  2765.       case XML_TOK_PI:
  2766.       case XML_TOK_COMMENT:
  2767.       case XML_TOK_BOM:
  2768.       case XML_TOK_XML_DECL:
  2769. #ifdef XML_DTD
  2770.       case XML_TOK_IGNORE_SECT:
  2771. #endif /* XML_DTD */
  2772.       case XML_TOK_PARAM_ENTITY_REF:
  2773. break;
  2774.       default:
  2775. #ifdef XML_DTD
  2776. if (role != XML_ROLE_IGNORE_SECT)
  2777. #endif /* XML_DTD */
  2778.   reportDefault(parser, enc, s, next);
  2779.       }
  2780.     }
  2781.     s = next;
  2782.     tok = XmlPrologTok(enc, s, end, &next);
  2783.   }
  2784.   /* not reached */
  2785. }
  2787. static
  2788. enum XML_Error epilogProcessor(XML_Parser parser,
  2789.        const char *s,
  2790.        const char *end,
  2791.        const char **nextPtr)
  2792. {
  2793.   processor = epilogProcessor;
  2794.   eventPtr = s;
  2795.   for (;;) {
  2796.     const char *next;
  2797.     int err;
  2798.     int tok = XmlPrologTok(encoding, s, end, &next);
  2799.     eventEndPtr = next;
  2800.     switch (tok) {
  2801.     case -XML_TOK_PROLOG_S:
  2802.       if (defaultHandler) {
  2803. eventEndPtr = end;
  2804. reportDefault(parser, encoding, s, end);
  2805.       }
  2806.       /* fall through */
  2807.     case XML_TOK_NONE:
  2808.       if (nextPtr)
  2809. *nextPtr = end;
  2810.       return XML_ERROR_NONE;
  2811.     case XML_TOK_PROLOG_S:
  2812.       if (defaultHandler)
  2813. reportDefault(parser, encoding, s, next);
  2814.       break;
  2815.     case XML_TOK_PI:
  2816.       if (!reportProcessingInstruction(parser, encoding, s, next))
  2817. return XML_ERROR_NO_MEMORY;
  2818.       break;
  2819.     case XML_TOK_COMMENT:
  2820.       if (!reportComment(parser, encoding, s, next))
  2821. return XML_ERROR_NO_MEMORY;
  2822.       break;
  2823.     CASE_ERROR()
  2824.       eventPtr = next;
  2825.       return (enum XML_Error) err; /* Helix expat change */
  2826.     case XML_TOK_PARTIAL:
  2827.       if (nextPtr) {
  2828. *nextPtr = s;
  2829. return XML_ERROR_NONE;
  2830.       }
  2831.       return XML_ERROR_UNCLOSED_TOKEN;
  2832.     case XML_TOK_PARTIAL_CHAR:
  2833.       if (nextPtr) {
  2834. *nextPtr = s;
  2835. return XML_ERROR_NONE;
  2836.       }
  2837.       return XML_ERROR_PARTIAL_CHAR;
  2838.     default:
  2839.       return XML_ERROR_JUNK_AFTER_DOC_ELEMENT;
  2840.     }
  2841.     eventPtr = s = next;
  2842.   }
  2843. }
  2845. #ifdef XML_DTD
  2847. static enum XML_Error
  2848. processInternalParamEntity(XML_Parser parser, ENTITY *entity)
  2849. {
  2850.   const char *s, *end, *next;
  2851.   int tok;
  2852.   enum XML_Error result;
  2853.   OPEN_INTERNAL_ENTITY openEntity;
  2854.   entity->open = 1;
  2855.   openEntity.next = openInternalEntities;
  2856.   openInternalEntities = &openEntity;
  2857.   openEntity.entity = entity;
  2858.   openEntity.internalEventPtr = 0;
  2859.   openEntity.internalEventEndPtr = 0;
  2860.   s = (char *)entity->textPtr;
  2861.   end = (char *)(entity->textPtr + entity->textLen);
  2862.   tok = XmlPrologTok(internalEncoding, s, end, &next);
  2863.   result = doProlog(parser, internalEncoding, s, end, tok, next, 0);
  2864.   entity->open = 0;
  2865.   openInternalEntities = openEntity.next;
  2866.   return result;
  2867. }
  2869. #endif /* XML_DTD */
  2871. static
  2872. enum XML_Error errorProcessor(XML_Parser parser,
  2873.       const char *s,
  2874.       const char *end,
  2875.       const char **nextPtr)
  2876. {
  2877.   return errorCode;
  2878. }
  2880. static enum XML_Error
  2881. storeAttributeValue(XML_Parser parser, const ENCODING *enc, int isCdata,
  2882.     const char *ptr, const char *end,
  2883.     STRING_POOL *pool)
  2884. {
  2885.   enum XML_Error result = appendAttributeValue(parser, enc, isCdata, ptr, end, pool);
  2886.   if (result)
  2887.     return result;
  2888.   if (!isCdata && poolLength(pool) && poolLastChar(pool) == 0x20)
  2889.     poolChop(pool);
  2890.   if (!poolAppendChar(pool, XML_T('')))
  2891.     return XML_ERROR_NO_MEMORY;
  2892.   return XML_ERROR_NONE;
  2893. }
  2895. static enum XML_Error
  2896. appendAttributeValue(XML_Parser parser, const ENCODING *enc, int isCdata,
  2897.      const char *ptr, const char *end,
  2898.      STRING_POOL *pool)
  2899. {
  2900.   for (;;) {
  2901.     const char *next;
  2902.     int err;
  2903.     int tok = XmlAttributeValueTok(enc, ptr, end, &next);
  2904.     switch (tok) {
  2905.     case XML_TOK_NONE:
  2906.       return XML_ERROR_NONE;
  2907.     CASE_ERROR()
  2908.       if (enc == encoding)
  2909. eventPtr = next;
  2910.       return (enum XML_Error) err; /* Helix expat change */
  2911.     case XML_TOK_PARTIAL:
  2912.       if (enc == encoding)
  2913. eventPtr = ptr;
  2914.       return XML_ERROR_UNCLOSED_TOKEN;
  2915.     case XML_TOK_CHAR_REF:
  2916.       {
  2917. XML_Char buf[XML_ENCODE_MAX];
  2918. int i;
  2919. int n = XmlCharRefNumber(enc, ptr);
  2920. if (n < 0) {
  2921.   if (enc == encoding)
  2922.     eventPtr = ptr;
  2923.          return XML_ERROR_BAD_CHAR_REF;
  2924. }
  2925. if (!isCdata
  2926.     && n == 0x20 /* space */
  2927.     && (poolLength(pool) == 0 || poolLastChar(pool) == 0x20))
  2928.   break;
  2929. n = XmlEncode(n, (ICHAR *)buf);
  2930. if (!n) {
  2931.   if (enc == encoding)
  2932.     eventPtr = ptr;
  2933.   return XML_ERROR_BAD_CHAR_REF;
  2934. }
  2935. for (i = 0; i < n; i++) {
  2936.   if (!poolAppendChar(pool, buf[i]))
  2937.     return XML_ERROR_NO_MEMORY;
  2938. }
  2939.       }
  2940.       break;
  2941.     case XML_TOK_DATA_CHARS:
  2942.       if (!poolAppend(pool, enc, ptr, next))
  2943. return XML_ERROR_NO_MEMORY;
  2944.       break;
  2945.       break;
  2946.     case XML_TOK_TRAILING_CR:
  2947.       next = ptr + enc->minBytesPerChar;
  2948.       /* fall through */
  2949.     case XML_TOK_ATTRIBUTE_VALUE_S:
  2950.     case XML_TOK_DATA_NEWLINE:
  2951.       if (!isCdata && (poolLength(pool) == 0 || poolLastChar(pool) == 0x20))
  2952. break;
  2953.       if (!poolAppendChar(pool, 0x20))
  2954. return XML_ERROR_NO_MEMORY;
  2955.       break;
  2956.     case XML_TOK_ENTITY_REF:
  2957.       {
  2958. const XML_Char *name;
  2959. ENTITY *entity;
  2960. XML_Char ch = XmlPredefinedEntityName(enc,
  2961.       ptr + enc->minBytesPerChar,
  2962.       next - enc->minBytesPerChar);
  2963. if (ch) {
  2964.   if (!poolAppendChar(pool, ch))
  2965.        return XML_ERROR_NO_MEMORY;
  2966.   break;
  2967. }
  2968. name = poolStoreString(&temp2Pool, enc,
  2969.        ptr + enc->minBytesPerChar,
  2970.        next - enc->minBytesPerChar);
  2971. if (!name)
  2972.   return XML_ERROR_NO_MEMORY;
  2973. entity = (ENTITY *)lookup(&dtd.generalEntities, name, 0);
  2974. poolDiscard(&temp2Pool);
  2975. if (!entity) {
  2976.   if (dtd.complete) {
  2977.     if (enc == encoding)
  2978.       eventPtr = ptr;
  2979.     return XML_ERROR_UNDEFINED_ENTITY;
  2980.   }
  2981. }
  2982. else if (entity->open) {
  2983.   if (enc == encoding)
  2984.     eventPtr = ptr;
  2985.   return XML_ERROR_RECURSIVE_ENTITY_REF;
  2986. }
  2987. else if (entity->notation) {
  2988.   if (enc == encoding)
  2989.     eventPtr = ptr;
  2990.   return XML_ERROR_BINARY_ENTITY_REF;
  2991. }
  2992. else if (!entity->textPtr) {
  2993.   if (enc == encoding)
  2994.     eventPtr = ptr;
  2995.      return XML_ERROR_ATTRIBUTE_EXTERNAL_ENTITY_REF;
  2996. }
  2997. else {
  2998.   enum XML_Error result;
  2999.   const XML_Char *textEnd = entity->textPtr + entity->textLen;
  3000.   entity->open = 1;
  3001.   result = appendAttributeValue(parser, internalEncoding, isCdata, (char *)entity->textPtr, (char *)textEnd, pool);
  3002.   entity->open = 0;
  3003.   if (result)
  3004.     return result;
  3005. }
  3006.       }
  3007.       break;
  3008.     default:
  3009.       abort();
  3010.     }
  3011.     ptr = next;
  3012.   }
  3013.   /* not reached */
  3014. }
  3016. static
  3017. enum XML_Error storeEntityValue(XML_Parser parser,
  3018. const ENCODING *enc,
  3019. const char *entityTextPtr,
  3020. const char *entityTextEnd)
  3021. {
  3022.   STRING_POOL *pool = &(dtd.pool);
  3023.   for (;;) {
  3024.     const char *next;
  3025.     int err;
  3026.     int tok = XmlEntityValueTok(enc, entityTextPtr, entityTextEnd, &next);
  3027.     switch (tok) {
  3028.     case XML_TOK_PARAM_ENTITY_REF:
  3029. #ifdef XML_DTD
  3030.       if (parentParser || enc != encoding) {
  3031. enum XML_Error result;
  3032. const XML_Char *name;
  3033. ENTITY *entity;
  3034. name = poolStoreString(&tempPool, enc,
  3035.        entityTextPtr + enc->minBytesPerChar,
  3036.        next - enc->minBytesPerChar);
  3037. if (!name)
  3038.   return XML_ERROR_NO_MEMORY;
  3039. entity = (ENTITY *)lookup(&dtd.paramEntities, name, 0);
  3040. poolDiscard(&tempPool);
  3041. if (!entity) {
  3042.   if (enc == encoding)
  3043.     eventPtr = entityTextPtr;
  3044.   return XML_ERROR_UNDEFINED_ENTITY;
  3045. }
  3046. if (entity->open) {
  3047.   if (enc == encoding)
  3048.     eventPtr = entityTextPtr;
  3049.   return XML_ERROR_RECURSIVE_ENTITY_REF;
  3050. }
  3051. if (entity->systemId) {
  3052.   if (enc == encoding)
  3053.     eventPtr = entityTextPtr;
  3054.   return XML_ERROR_PARAM_ENTITY_REF;
  3055. }
  3056. entity->open = 1;
  3057. result = storeEntityValue(parser,
  3058.   internalEncoding,
  3059.   (char *)entity->textPtr,
  3060.   (char *)(entity->textPtr + entity->textLen));
  3061. entity->open = 0;
  3062. if (result)
  3063.   return result;
  3064. break;
  3065.       }
  3066. #endif /* XML_DTD */
  3067.       eventPtr = entityTextPtr;
  3068.       return XML_ERROR_SYNTAX;
  3069.     case XML_TOK_NONE:
  3070.       return XML_ERROR_NONE;
  3071.     case XML_TOK_ENTITY_REF:
  3072.     case XML_TOK_DATA_CHARS:
  3073.       if (!poolAppend(pool, enc, entityTextPtr, next))
  3074. return XML_ERROR_NO_MEMORY;
  3075.       break;
  3076.     case XML_TOK_TRAILING_CR:
  3077.       next = entityTextPtr + enc->minBytesPerChar;
  3078.       /* fall through */
  3079.     case XML_TOK_DATA_NEWLINE:
  3080.       if (pool->end == pool->ptr && !poolGrow(pool))
  3081. return XML_ERROR_NO_MEMORY;
  3082.       *(pool->ptr)++ = 0xA;
  3083.       break;
  3084.     case XML_TOK_CHAR_REF:
  3085.       {
  3086. XML_Char buf[XML_ENCODE_MAX];
  3087. int i;
  3088. int n = XmlCharRefNumber(enc, entityTextPtr);
  3089. if (n < 0) {
  3090.   if (enc == encoding)
  3091.     eventPtr = entityTextPtr;
  3092.   return XML_ERROR_BAD_CHAR_REF;
  3093. }
  3094. n = XmlEncode(n, (ICHAR *)buf);
  3095. if (!n) {
  3096.   if (enc == encoding)
  3097.     eventPtr = entityTextPtr;
  3098.   return XML_ERROR_BAD_CHAR_REF;
  3099. }
  3100. for (i = 0; i < n; i++) {
  3101.   if (pool->end == pool->ptr && !poolGrow(pool))
  3102.     return XML_ERROR_NO_MEMORY;
  3103.   *(pool->ptr)++ = buf[i];
  3104. }
  3105.       }
  3106.       break;
  3107.     case XML_TOK_PARTIAL:
  3108.       if (enc == encoding)
  3109. eventPtr = entityTextPtr;
  3110.       return XML_ERROR_UNCLOSED_TOKEN;
  3111.     CASE_ERROR()
  3112.       if (enc == encoding)
  3113. eventPtr = next;
  3114.       return (enum XML_Error) err; /* Helix expat change */
  3115.     default:
  3116.       abort();
  3117.     }
  3118.     entityTextPtr = next;
  3119.   }
  3120.   /* not reached */
  3121. }
  3123. static void
  3124. normalizeLines(XML_Char *s)
  3125. {
  3126.   XML_Char *p;
  3127.   for (;; s++) {
  3128.     if (*s == XML_T(''))
  3129.       return;
  3130.     if (*s == 0xD)
  3131.       break;
  3132.   }
  3133.   p = s;
  3134.   do {
  3135.     if (*s == 0xD) {
  3136.       *p++ = 0xA;
  3137.       if (*++s == 0xA)
  3138.         s++;
  3139.     }
  3140.     else
  3141.       *p++ = *s++;
  3142.   } while (*s);
  3143.   *p = XML_T('');
  3144. }
  3146. static int
  3147. reportProcessingInstruction(XML_Parser parser, const ENCODING *enc, const char *start, const char *end)
  3148. {
  3149.   const XML_Char *target;
  3150.   XML_Char *data;
  3151.   const char *tem;
  3152.   if (!processingInstructionHandler) {
  3153.     if (defaultHandler)
  3154.       reportDefault(parser, enc, start, end);
  3155.     return 1;
  3156.   }
  3157.   start += enc->minBytesPerChar * 2;
  3158.   tem = start + XmlNameLength(enc, start);
  3159.   target = poolStoreString(&tempPool, enc, start, tem);
  3160.   if (!target)
  3161.     return 0;
  3162.   poolFinish(&tempPool);
  3163.   data = poolStoreString(&tempPool, enc,
  3164. XmlSkipS(enc, tem),
  3165. end - enc->minBytesPerChar*2);
  3166.   if (!data)
  3167.     return 0;
  3168.   normalizeLines(data);
  3169.   processingInstructionHandler(handlerArg, target, data);
  3170.   poolClear(&tempPool);
  3171.   return 1;
  3172. }
  3174. static int
  3175. reportComment(XML_Parser parser, const ENCODING *enc, const char *start, const char *end)
  3176. {
  3177.   XML_Char *data;
  3178.   if (!commentHandler) {
  3179.     if (defaultHandler)
  3180.       reportDefault(parser, enc, start, end);
  3181.     return 1;
  3182.   }
  3183.   data = poolStoreString(&tempPool,
  3184.                          enc,
  3185.                          start + enc->minBytesPerChar * 4, 
  3186.  end - enc->minBytesPerChar * 3);
  3187.   if (!data)
  3188.     return 0;
  3189.   normalizeLines(data);
  3190.   commentHandler(handlerArg, data);
  3191.   poolClear(&tempPool);
  3192.   return 1;
  3193. }
  3195. static void
  3196. reportDefault(XML_Parser parser, const ENCODING *enc, const char *s, const char *end)
  3197. {
  3198.   if (MUST_CONVERT(enc, s)) {
  3199.     const char **eventPP;
  3200.     const char **eventEndPP;
  3201.     if (enc == encoding) {
  3202.       eventPP = &eventPtr;
  3203.       eventEndPP = &eventEndPtr;
  3204.     }
  3205.     else {
  3206.       eventPP = &(openInternalEntities->internalEventPtr);
  3207.       eventEndPP = &(openInternalEntities->internalEventEndPtr);
  3208.     }
  3209.     do {
  3210.       ICHAR *dataPtr = (ICHAR *)dataBuf;
  3211.       XmlConvert(enc, &s, end, &dataPtr, (ICHAR *)dataBufEnd);
  3212.       *eventEndPP = s;
  3213.       defaultHandler(handlerArg, dataBuf, dataPtr - (ICHAR *)dataBuf);
  3214.       *eventPP = s;
  3215.     } while (s != end);
  3216.   }
  3217.   else
  3218.     defaultHandler(handlerArg, (XML_Char *)s, (XML_Char *)end - (XML_Char *)s);
  3219. }
  3222. static int
  3223. defineAttribute(ELEMENT_TYPE *type, ATTRIBUTE_ID *attId, int isCdata, int isId, const XML_Char *value)
  3224. {
  3225.   DEFAULT_ATTRIBUTE *att;
  3226.   if (value || isId) {
  3227.     /* The handling of default attributes gets messed up if we have
  3228.        a default which duplicates a non-default. */
  3229.     int i;
  3230.     for (i = 0; i < type->nDefaultAtts; i++)
  3231.       if (attId == type->defaultAtts[i].id)
  3232. return 1;
  3233.     if (isId && !type->idAtt && !attId->xmlns)
  3234.       type->idAtt = attId;
  3235.   }
  3236.   if (type->nDefaultAtts == type->allocDefaultAtts) {
  3237.     if (type->allocDefaultAtts == 0) {
  3238.       type->allocDefaultAtts = 8;
  3239.       type->defaultAtts = (DEFAULT_ATTRIBUTE*) malloc(type->allocDefaultAtts*sizeof(DEFAULT_ATTRIBUTE)); /* Helix expat change */
  3240.     }
  3241.     else {
  3242.       type->allocDefaultAtts *= 2;
  3243.       type->defaultAtts = (DEFAULT_ATTRIBUTE*) realloc(type->defaultAtts, /* Helix expat change */
  3244.   type->allocDefaultAtts*sizeof(DEFAULT_ATTRIBUTE));
  3245.     }
  3246.     if (!type->defaultAtts)
  3247.       return 0;
  3248.   }
  3249.   att = type->defaultAtts + type->nDefaultAtts;
  3250.   att->id = attId;
  3251.   att->value = value;
  3252.   att->isCdata = isCdata;
  3253.   if (!isCdata)
  3254.     attId->maybeTokenized = 1;
  3255.   type->nDefaultAtts += 1;
  3256.   return 1;
  3257. }
  3259. static int setElementTypePrefix(XML_Parser parser, ELEMENT_TYPE *elementType)
  3260. {
  3261.   const XML_Char *name;
  3262.   for (name = elementType->name; *name; name++) {
  3263.     if (*name == XML_T(':')) {
  3264.       PREFIX *prefix;
  3265.       const XML_Char *s;
  3266.       for (s = elementType->name; s != name; s++) {
  3267. if (!poolAppendChar(&dtd.pool, *s))
  3268.   return 0;
  3269.       }
  3270.       if (!poolAppendChar(&dtd.pool, XML_T('')))
  3271. return 0;
  3272.       prefix = (PREFIX *)lookup(&dtd.prefixes, poolStart(&dtd.pool), sizeof(PREFIX));
  3273.       if (!prefix)
  3274. return 0;
  3275.       if (prefix->name == poolStart(&dtd.pool))
  3276. poolFinish(&dtd.pool);
  3277.       else
  3278. poolDiscard(&dtd.pool);
  3279.       elementType->prefix = prefix;
  3281.     }
  3282.   }
  3283.   return 1;
  3284. }
  3286. static ATTRIBUTE_ID *
  3287. getAttributeId(XML_Parser parser, const ENCODING *enc, const char *start, const char *end)
  3288. {
  3289.   ATTRIBUTE_ID *id;
  3290.   const XML_Char *name;
  3291.   if (!poolAppendChar(&dtd.pool, XML_T('')))
  3292.     return 0;
  3293.   name = poolStoreString(&dtd.pool, enc, start, end);
  3294.   if (!name)
  3295.     return 0;
  3296.   ++name;
  3297.   id = (ATTRIBUTE_ID *)lookup(&dtd.attributeIds, name, sizeof(ATTRIBUTE_ID));
  3298.   if (!id)
  3299.     return 0;
  3300.   if (id->name != name)
  3301.     poolDiscard(&dtd.pool);
  3302.   else {
  3303.     poolFinish(&dtd.pool);
  3304.     if (!ns)
  3305.       ;
  3306.     else if (name[0] == 'x'
  3307. && name[1] == 'm'
  3308. && name[2] == 'l'
  3309. && name[3] == 'n'
  3310. && name[4] == 's'
  3311. && (name[5] == XML_T('') || name[5] == XML_T(':'))) {
  3312.       if (name[5] == '')
  3313. id->prefix = &dtd.defaultPrefix;
  3314.       else
  3315. id->prefix = (PREFIX *)lookup(&dtd.prefixes, name + 6, sizeof(PREFIX));
  3316.       id->xmlns = 1;
  3317.     }
  3318.     else {
  3319.       int i;
  3320.       for (i = 0; name[i]; i++) {
  3321. if (name[i] == XML_T(':')) {
  3322.   int j;
  3323.   for (j = 0; j < i; j++) {
  3324.     if (!poolAppendChar(&dtd.pool, name[j]))
  3325.       return 0;
  3326.   }
  3327.   if (!poolAppendChar(&dtd.pool, XML_T('')))
  3328.     return 0;
  3329.   id->prefix = (PREFIX *)lookup(&dtd.prefixes, poolStart(&dtd.pool), sizeof(PREFIX));
  3330.   if (id->prefix->name == poolStart(&dtd.pool))
  3331.     poolFinish(&dtd.pool);
  3332.   else
  3333.     poolDiscard(&dtd.pool);
  3334.   break;
  3335. }
  3336.       }
  3337.     }
  3338.   }
  3339.   return id;
  3340. }
  3342. #define CONTEXT_SEP XML_T('f')
  3344. static
  3345. const XML_Char *getContext(XML_Parser parser)
  3346. {
  3347.   HASH_TABLE_ITER iter;
  3348.   int needSep = 0;
  3350.   if (dtd.defaultPrefix.binding) {
  3351.     int i;
  3352.     int len;
  3353.     if (!poolAppendChar(&tempPool, XML_T('=')))
  3354.       return 0;
  3355.     len = dtd.defaultPrefix.binding->uriLen;
  3356.     if (namespaceSeparator != XML_T(''))
  3357.       len--;
  3358.     for (i = 0; i < len; i++)
  3359.       if (!poolAppendChar(&tempPool, dtd.defaultPrefix.binding->uri[i]))
  3360.    return 0;
  3361.     needSep = 1;
  3362.   }
  3364.   hashTableIterInit(&iter, &(dtd.prefixes));
  3365.   for (;;) {
  3366.     int i;
  3367.     int len;
  3368.     const XML_Char *s;
  3369.     PREFIX *prefix = (PREFIX *)hashTableIterNext(&iter);
  3370.     if (!prefix)
  3371.       break;
  3372.     if (!prefix->binding)
  3373.       continue;
  3374.     if (needSep && !poolAppendChar(&tempPool, CONTEXT_SEP))
  3375.       return 0;
  3376.     for (s = prefix->name; *s; s++)
  3377.       if (!poolAppendChar(&tempPool, *s))
  3378.         return 0;
  3379.     if (!poolAppendChar(&tempPool, XML_T('=')))
  3380.       return 0;
  3381.     len = prefix->binding->uriLen;
  3382.     if (namespaceSeparator != XML_T(''))
  3383.       len--;
  3384.     for (i = 0; i < len; i++)
  3385.       if (!poolAppendChar(&tempPool, prefix->binding->uri[i]))
  3386.         return 0;
  3387.     needSep = 1;
  3388.   }
  3391.   hashTableIterInit(&iter, &(dtd.generalEntities));
  3392.   for (;;) {
  3393.     const XML_Char *s;
  3394.     ENTITY *e = (ENTITY *)hashTableIterNext(&iter);
  3395.     if (!e)
  3396.       break;
  3397.     if (!e->open)
  3398.       continue;
  3399.     if (needSep && !poolAppendChar(&tempPool, CONTEXT_SEP))
  3400.       return 0;
  3401.     for (s = e->name; *s; s++)
  3402.       if (!poolAppendChar(&tempPool, *s))
  3403.         return 0;
  3404.     needSep = 1;
  3405.   }
  3407.   if (!poolAppendChar(&tempPool, XML_T('')))
  3408.     return 0;
  3409.   return tempPool.start;
  3410. }
  3412. static
  3413. int setContext(XML_Parser parser, const XML_Char *context)
  3414. {
  3415.   const XML_Char *s = context;
  3417.   while (*context != XML_T('')) {
  3418.     if (*s == CONTEXT_SEP || *s == XML_T('')) {
  3419.       ENTITY *e;
  3420.       if (!poolAppendChar(&tempPool, XML_T('')))
  3421. return 0;
  3422.       e = (ENTITY *)lookup(&dtd.generalEntities, poolStart(&tempPool), 0);
  3423.       if (e)
  3424. e->open = 1;
  3425.       if (*s != XML_T(''))
  3426. s++;
  3427.       context = s;
  3428.       poolDiscard(&tempPool);
  3429.     }
  3430.     else if (*s == '=') {
  3431.       PREFIX *prefix;
  3432.       if (poolLength(&tempPool) == 0)
  3433. prefix = &dtd.defaultPrefix;
  3434.       else {
  3435. if (!poolAppendChar(&tempPool, XML_T('')))
  3436.   return 0;
  3437. prefix = (PREFIX *)lookup(&dtd.prefixes, poolStart(&tempPool), sizeof(PREFIX));
  3438. if (!prefix)
  3439.   return 0;
  3440.         if (prefix->name == poolStart(&tempPool)) {
  3441.   prefix->name = poolCopyString(&dtd.pool, prefix->name);
  3442.   if (!prefix->name)
  3443.     return 0;
  3444. }
  3445. poolDiscard(&tempPool);
  3446.       }
  3447.       for (context = s + 1; *context != CONTEXT_SEP && *context != XML_T(''); context++)
  3448.         if (!poolAppendChar(&tempPool, *context))
  3449.           return 0;
  3450.       if (!poolAppendChar(&tempPool, XML_T('')))
  3451. return 0;
  3452.       if (!addBinding(parser, prefix, 0, poolStart(&tempPool), &inheritedBindings))
  3453. return 0;
  3454.       poolDiscard(&tempPool);
  3455.       if (*context != XML_T(''))
  3456. ++context;
  3457.       s = context;
  3458.     }
  3459.     else {
  3460.       if (!poolAppendChar(&tempPool, *s))
  3461. return 0;
  3462.       s++;
  3463.     }
  3464.   }
  3465.   return 1;
  3466. }
  3469. static
  3470. void normalizePublicId(XML_Char *publicId)
  3471. {
  3472.   XML_Char *p = publicId;
  3473.   XML_Char *s;
  3474.   for (s = publicId; *s; s++) {
  3475.     switch (*s) {
  3476.     case 0x20:
  3477.     case 0xD:
  3478.     case 0xA:
  3479.       if (p != publicId && p[-1] != 0x20)
  3480. *p++ = 0x20;
  3481.       break;
  3482.     default:
  3483.       *p++ = *s;
  3484.     }
  3485.   }
  3486.   if (p != publicId && p[-1] == 0x20)
  3487.     --p;
  3488.   *p = XML_T('');
  3489. }
  3491. static int dtdInit(DTD *p)
  3492. {
  3493.   poolInit(&(p->pool));
  3494.   hashTableInit(&(p->generalEntities));
  3495.   hashTableInit(&(p->elementTypes));
  3496.   hashTableInit(&(p->attributeIds));
  3497.   hashTableInit(&(p->prefixes));
  3498.   p->complete = 1;
  3499.   p->standalone = 0;
  3500. #ifdef XML_DTD
  3501.   hashTableInit(&(p->paramEntities));
  3502. #endif /* XML_DTD */
  3503.   p->defaultPrefix.name = 0;
  3504.   p->defaultPrefix.binding = 0;
  3505.   return 1;
  3506. }
  3508. #ifdef XML_DTD
  3510. static void dtdSwap(DTD *p1, DTD *p2)
  3511. {
  3512.   DTD tem;
  3513.   memcpy(&tem, p1, sizeof(DTD));
  3514.   memcpy(p1, p2, sizeof(DTD));
  3515.   memcpy(p2, &tem, sizeof(DTD));
  3516. }
  3518. #endif /* XML_DTD */
  3520. static void dtdDestroy(DTD *p)
  3521. {
  3522.   HASH_TABLE_ITER iter;
  3523.   hashTableIterInit(&iter, &(p->elementTypes));
  3524.   for (;;) {
  3525.     ELEMENT_TYPE *e = (ELEMENT_TYPE *)hashTableIterNext(&iter);
  3526.     if (!e)
  3527.       break;
  3528.     if (e->allocDefaultAtts != 0)
  3529.       free(e->defaultAtts);
  3530.   }
  3531.   hashTableDestroy(&(p->generalEntities));
  3532. #ifdef XML_DTD
  3533.   hashTableDestroy(&(p->paramEntities));
  3534. #endif /* XML_DTD */
  3535.   hashTableDestroy(&(p->elementTypes));
  3536.   hashTableDestroy(&(p->attributeIds));
  3537.   hashTableDestroy(&(p->prefixes));
  3538.   poolDestroy(&(p->pool));
  3539. }
  3541. /* Do a deep copy of the DTD.  Return 0 for out of memory; non-zero otherwise.
  3542. The new DTD has already been initialized. */
  3544. static int dtdCopy(DTD *newDtd, const DTD *oldDtd)
  3545. {
  3546.   HASH_TABLE_ITER iter;
  3548.   /* Copy the prefix table. */
  3550.   hashTableIterInit(&iter, &(oldDtd->prefixes));
  3551.   for (;;) {
  3552.     const XML_Char *name;
  3553.     const PREFIX *oldP = (PREFIX *)hashTableIterNext(&iter);
  3554.     if (!oldP)
  3555.       break;
  3556.     name = poolCopyString(&(newDtd->pool), oldP->name);
  3557.     if (!name)
  3558.       return 0;
  3559.     if (!lookup(&(newDtd->prefixes), name, sizeof(PREFIX)))
  3560.       return 0;
  3561.   }
  3563.   hashTableIterInit(&iter, &(oldDtd->attributeIds));
  3565.   /* Copy the attribute id table. */
  3567.   for (;;) {
  3568.     ATTRIBUTE_ID *newA;
  3569.     const XML_Char *name;
  3570.     const ATTRIBUTE_ID *oldA = (ATTRIBUTE_ID *)hashTableIterNext(&iter);
  3572.     if (!oldA)
  3573.       break;
  3574.     /* Remember to allocate the scratch byte before the name. */
  3575.     if (!poolAppendChar(&(newDtd->pool), XML_T('')))
  3576.       return 0;
  3577.     name = poolCopyString(&(newDtd->pool), oldA->name);
  3578.     if (!name)
  3579.       return 0;
  3580.     ++name;
  3581.     newA = (ATTRIBUTE_ID *)lookup(&(newDtd->attributeIds), name, sizeof(ATTRIBUTE_ID));
  3582.     if (!newA)
  3583.       return 0;
  3584.     newA->maybeTokenized = oldA->maybeTokenized;
  3585.     if (oldA->prefix) {
  3586.       newA->xmlns = oldA->xmlns;
  3587.       if (oldA->prefix == &oldDtd->defaultPrefix)
  3588. newA->prefix = &newDtd->defaultPrefix;
  3589.       else
  3590. newA->prefix = (PREFIX *)lookup(&(newDtd->prefixes), oldA->prefix->name, 0);
  3591.     }
  3592.   }
  3594.   /* Copy the element type table. */
  3596.   hashTableIterInit(&iter, &(oldDtd->elementTypes));
  3598.   for (;;) {
  3599.     int i;
  3600.     ELEMENT_TYPE *newE;
  3601.     const XML_Char *name;
  3602.     const ELEMENT_TYPE *oldE = (ELEMENT_TYPE *)hashTableIterNext(&iter);
  3603.     if (!oldE)
  3604.       break;
  3605.     name = poolCopyString(&(newDtd->pool), oldE->name);
  3606.     if (!name)
  3607.       return 0;
  3608.     newE = (ELEMENT_TYPE *)lookup(&(newDtd->elementTypes), name, sizeof(ELEMENT_TYPE));
  3609.     if (!newE)
  3610.       return 0;
  3611.     if (oldE->nDefaultAtts) {
  3612.       newE->defaultAtts = (DEFAULT_ATTRIBUTE *)malloc(oldE->nDefaultAtts * sizeof(DEFAULT_ATTRIBUTE));
  3613.       if (!newE->defaultAtts)
  3614. return 0;
  3615.     }
  3616.     if (oldE->idAtt)
  3617.       newE->idAtt = (ATTRIBUTE_ID *)lookup(&(newDtd->attributeIds), oldE->idAtt->name, 0);
  3618.     newE->allocDefaultAtts = newE->nDefaultAtts = oldE->nDefaultAtts;
  3619.     if (oldE->prefix)
  3620.       newE->prefix = (PREFIX *)lookup(&(newDtd->prefixes), oldE->prefix->name, 0);
  3621.     for (i = 0; i < newE->nDefaultAtts; i++) {
  3622.       newE->defaultAtts[i].id = (ATTRIBUTE_ID *)lookup(&(newDtd->attributeIds), oldE->defaultAtts[i].id->name, 0);
  3623.       newE->defaultAtts[i].isCdata = oldE->defaultAtts[i].isCdata;
  3624.       if (oldE->defaultAtts[i].value) {
  3625. newE->defaultAtts[i].value = poolCopyString(&(newDtd->pool), oldE->defaultAtts[i].value);
  3626. if (!newE->defaultAtts[i].value)
  3627.      return 0;
  3628.       }
  3629.       else
  3630. newE->defaultAtts[i].value = 0;
  3631.     }
  3632.   }
  3634.   /* Copy the entity tables. */
  3635.   if (!copyEntityTable(&(newDtd->generalEntities),
  3636.        &(newDtd->pool),
  3637.        &(oldDtd->generalEntities)))
  3638.       return 0;
  3640. #ifdef XML_DTD
  3641.   if (!copyEntityTable(&(newDtd->paramEntities),
  3642.        &(newDtd->pool),
  3643.        &(oldDtd->paramEntities)))
  3644.       return 0;
  3645. #endif /* XML_DTD */
  3647.   newDtd->complete = oldDtd->complete;
  3648.   newDtd->standalone = oldDtd->standalone;
  3649.   return 1;
  3650. }
  3652. static int copyEntityTable(HASH_TABLE *newTable,
  3653.    STRING_POOL *newPool,
  3654.    const HASH_TABLE *oldTable)
  3655. {
  3656.   HASH_TABLE_ITER iter;
  3657.   const XML_Char *cachedOldBase = 0;
  3658.   const XML_Char *cachedNewBase = 0;
  3660.   hashTableIterInit(&iter, oldTable);
  3662.   for (;;) {
  3663.     ENTITY *newE;
  3664.     const XML_Char *name;
  3665.     const ENTITY *oldE = (ENTITY *)hashTableIterNext(&iter);
  3666.     if (!oldE)
  3667.       break;
  3668.     name = poolCopyString(newPool, oldE->name);
  3669.     if (!name)
  3670.       return 0;
  3671.     newE = (ENTITY *)lookup(newTable, name, sizeof(ENTITY));
  3672.     if (!newE)
  3673.       return 0;
  3674.     if (oldE->systemId) {
  3675.       const XML_Char *tem = poolCopyString(newPool, oldE->systemId);
  3676.       if (!tem)
  3677. return 0;
  3678.       newE->systemId = tem;
  3679.       if (oldE->base) {
  3680. if (oldE->base == cachedOldBase)
  3681.   newE->base = cachedNewBase;
  3682. else {
  3683.   cachedOldBase = oldE->base;
  3684.   tem = poolCopyString(newPool, cachedOldBase);
  3685.   if (!tem)
  3686.     return 0;
  3687.   cachedNewBase = newE->base = tem;
  3688. }
  3689.       }
  3690.     }
  3691.     else {
  3692.       const XML_Char *tem = poolCopyStringN(newPool, oldE->textPtr, oldE->textLen);
  3693.       if (!tem)
  3694. return 0;
  3695.       newE->textPtr = tem;
  3696.       newE->textLen = oldE->textLen;
  3697.     }
  3698.     if (oldE->notation) {
  3699.       const XML_Char *tem = poolCopyString(newPool, oldE->notation);
  3700.       if (!tem)
  3701. return 0;
  3702.       newE->notation = tem;
  3703.     }
  3704.   }
  3705.   return 1;
  3706. }
  3708. #define INIT_SIZE 64
  3710. static
  3711. int keyeq(KEY s1, KEY s2)
  3712. {
  3713.   for (; *s1 == *s2; s1++, s2++)
  3714.     if (*s1 == 0)
  3715.       return 1;
  3716.   return 0;
  3717. }
  3719. static
  3720. unsigned long hash(KEY s)
  3721. {
  3722.   unsigned long h = 0;
  3723.   while (*s)
  3724.     h = (h << 5) + h + (unsigned char)*s++;
  3725.   return h;
  3726. }
  3728. static
  3729. NAMED *lookup(HASH_TABLE *table, KEY name, size_t createSize)
  3730. {
  3731.   size_t i;
  3732.   if (table->size == 0) {
  3733.     if (!createSize)
  3734.       return 0;
  3735.     table->v = (NAMED**) calloc(INIT_SIZE, sizeof(NAMED *)); /* Helix expat change */
  3736.     if (!table->v)
  3737.       return 0;
  3738.     table->size = INIT_SIZE;
  3739.     table->usedLim = INIT_SIZE / 2;
  3740.     i = hash(name) & (table->size - 1);
  3741.   }
  3742.   else {
  3743.     unsigned long h = hash(name);
  3744.     for (i = h & (table->size - 1);
  3745.          table->v[i];
  3746.          i == 0 ? i = table->size - 1 : --i) {
  3747.       if (keyeq(name, table->v[i]->name))
  3748. return table->v[i];
  3749.     }
  3750.     if (!createSize)
  3751.       return 0;
  3752.     if (table->used == table->usedLim) {
  3753.       /* check for overflow */
  3754.       size_t newSize = table->size * 2;
  3755.       NAMED **newV = (NAMED**) calloc(newSize, sizeof(NAMED *)); /* Helix expat change */
  3756.       if (!newV)
  3757. return 0;
  3758.       for (i = 0; i < table->size; i++)
  3759. if (table->v[i]) {
  3760.   size_t j;
  3761.   for (j = hash(table->v[i]->name) & (newSize - 1);
  3762.        newV[j];
  3763.        j == 0 ? j = newSize - 1 : --j)
  3764.     ;
  3765.   newV[j] = table->v[i];
  3766. }
  3767.       free(table->v);
  3768.       table->v = newV;
  3769.       table->size = newSize;
  3770.       table->usedLim = newSize/2;
  3771.       for (i = h & (table->size - 1);
  3772.    table->v[i];
  3773.    i == 0 ? i = table->size - 1 : --i)
  3774. ;
  3775.     }
  3776.   }
  3777.   table->v[i] = (NAMED*) calloc(1, createSize); /* Helix expat change */
  3778.   if (!table->v[i])
  3779.     return 0;
  3780.   table->v[i]->name = name;
  3781.   (table->used)++;
  3782.   return table->v[i];
  3783. }
  3785. static
  3786. void hashTableDestroy(HASH_TABLE *table)
  3787. {
  3788.   size_t i;
  3789.   for (i = 0; i < table->size; i++) {
  3790.     NAMED *p = table->v[i];
  3791.     if (p)
  3792.       free(p);
  3793.   }
  3794.   if (table->v)
  3795.     free(table->v);
  3796. }
  3798. static
  3799. void hashTableInit(HASH_TABLE *p)
  3800. {
  3801.   p->size = 0;
  3802.   p->usedLim = 0;
  3803.   p->used = 0;
  3804.   p->v = 0;
  3805. }
  3807. static
  3808. void hashTableIterInit(HASH_TABLE_ITER *iter, const HASH_TABLE *table)
  3809. {
  3810.   iter->p = table->v;
  3811.   iter->end = iter->p + table->size;
  3812. }
  3814. static
  3815. NAMED *hashTableIterNext(HASH_TABLE_ITER *iter)
  3816. {
  3817.   while (iter->p != iter->end) {
  3818.     NAMED *tem = *(iter->p)++;
  3819.     if (tem)
  3820.       return tem;
  3821.   }
  3822.   return 0;
  3823. }
  3826. static
  3827. void poolInit(STRING_POOL *pool)
  3828. {
  3829.   pool->blocks = 0;
  3830.   pool->freeBlocks = 0;
  3831.   pool->start = 0;
  3832.   pool->ptr = 0;
  3833.   pool->end = 0;
  3834. }
  3836. static
  3837. void poolClear(STRING_POOL *pool)
  3838. {
  3839.   if (!pool->freeBlocks)
  3840.     pool->freeBlocks = pool->blocks;
  3841.   else {
  3842.     BLOCK *p = pool->blocks;
  3843.     while (p) {
  3844.       BLOCK *tem = p->next;
  3845.       p->next = pool->freeBlocks;
  3846.       pool->freeBlocks = p;
  3847.       p = tem;
  3848.     }
  3849.   }
  3850.   pool->blocks = 0;
  3851.   pool->start = 0;
  3852.   pool->ptr = 0;
  3853.   pool->end = 0;
  3854. }
  3856. static
  3857. void poolDestroy(STRING_POOL *pool)
  3858. {
  3859.   BLOCK *p = pool->blocks;
  3860.   while (p) {
  3861.     BLOCK *tem = p->next;
  3862.     free(p);
  3863.     p = tem;
  3864.   }
  3865.   pool->blocks = 0;
  3866.   p = pool->freeBlocks;
  3867.   while (p) {
  3868.     BLOCK *tem = p->next;
  3869.     free(p);
  3870.     p = tem;
  3871.   }
  3872.   pool->freeBlocks = 0;
  3873.   pool->ptr = 0;
  3874.   pool->start = 0;
  3875.   pool->end = 0;
  3876. }
  3878. static
  3879. XML_Char *poolAppend(STRING_POOL *pool, const ENCODING *enc,
  3880.      const char *ptr, const char *end)
  3881. {
  3882.   if (!pool->ptr && !poolGrow(pool))
  3883.     return 0;
  3884.   for (;;) {
  3885.     XmlConvert(enc, &ptr, end, (ICHAR **)&(pool->ptr), (ICHAR *)pool->end);
  3886.     if (ptr == end)
  3887.       break;
  3888.     if (!poolGrow(pool))
  3889.       return 0;
  3890.   }
  3891.   return pool->start;
  3892. }
  3894. static const XML_Char *poolCopyString(STRING_POOL *pool, const XML_Char *s)
  3895. {
  3896.   do {
  3897.     if (!poolAppendChar(pool, *s))
  3898.       return 0;
  3899.   } while (*s++);
  3900.   s = pool->start;
  3901.   poolFinish(pool);
  3902.   return s;
  3903. }
  3905. static const XML_Char *poolCopyStringN(STRING_POOL *pool, const XML_Char *s, int n)
  3906. {
  3907.   if (!pool->ptr && !poolGrow(pool))
  3908.     return 0;
  3909.   for (; n > 0; --n, s++) {
  3910.     if (!poolAppendChar(pool, *s))
  3911.       return 0;
  3913.   }
  3914.   s = pool->start;
  3915.   poolFinish(pool);
  3916.   return s;
  3917. }
  3919. static
  3920. XML_Char *poolStoreString(STRING_POOL *pool, const ENCODING *enc,
  3921.   const char *ptr, const char *end)
  3922. {
  3923.   if (!poolAppend(pool, enc, ptr, end))
  3924.     return 0;
  3925.   if (pool->ptr == pool->end && !poolGrow(pool))
  3926.     return 0;
  3927.   *(pool->ptr)++ = 0;
  3928.   return pool->start;
  3929. }
  3931. static
  3932. int poolGrow(STRING_POOL *pool)
  3933. {
  3934.   if (pool->freeBlocks) {
  3935.     if (pool->start == 0) {
  3936.       pool->blocks = pool->freeBlocks;
  3937.       pool->freeBlocks = pool->freeBlocks->next;
  3938.       pool->blocks->next = 0;
  3939.       pool->start = pool->blocks->s;
  3940.       pool->end = pool->start + pool->blocks->size;
  3941.       pool->ptr = pool->start;
  3942.       return 1;
  3943.     }
  3944.     if (pool->end - pool->start < pool->freeBlocks->size) {
  3945.       BLOCK *tem = pool->freeBlocks->next;
  3946.       pool->freeBlocks->next = pool->blocks;
  3947.       pool->blocks = pool->freeBlocks;
  3948.       pool->freeBlocks = tem;
  3949.       memcpy(pool->blocks->s, pool->start, (pool->end - pool->start) * sizeof(XML_Char));
  3950.       pool->ptr = pool->blocks->s + (pool->ptr - pool->start);
  3951.       pool->start = pool->blocks->s;
  3952.       pool->end = pool->start + pool->blocks->size;
  3953.       return 1;
  3954.     }
  3955.   }
  3956.   if (pool->blocks && pool->start == pool->blocks->s) {
  3957.     int blockSize = (pool->end - pool->start)*2;
  3958.     pool->blocks = (BLOCK*) realloc(pool->blocks, offsetof(BLOCK, s) + blockSize * sizeof(XML_Char)); /* Helix expat change */
  3959.     if (!pool->blocks)
  3960.       return 0;
  3961.     pool->blocks->size = blockSize;
  3962.     pool->ptr = pool->blocks->s + (pool->ptr - pool->start);
  3963.     pool->start = pool->blocks->s;
  3964.     pool->end = pool->start + blockSize;
  3965.   }
  3966.   else {
  3967.     BLOCK *tem;
  3968.     int blockSize = pool->end - pool->start;
  3969.     if (blockSize < INIT_BLOCK_SIZE)
  3970.       blockSize = INIT_BLOCK_SIZE;
  3971.     else
  3972.       blockSize *= 2;
  3973.     tem = (BLOCK*) malloc(offsetof(BLOCK, s) + blockSize * sizeof(XML_Char)); /* Helix expat change */
  3974.     if (!tem)
  3975.       return 0;
  3976.     tem->size = blockSize;
  3977.     tem->next = pool->blocks;
  3978.     pool->blocks = tem;
  3979.     if (pool->ptr != pool->start)
  3980.       memcpy(tem->s, pool->start, (pool->ptr - pool->start) * sizeof(XML_Char));
  3981.     pool->ptr = tem->s + (pool->ptr - pool->start);
  3982.     pool->start = tem->s;
  3983.     pool->end = tem->s + blockSize;
  3984.   }
  3985.   return 1;
  3986. }