1/*
2 * xmlreader.c: implements the xmlTextReader streaming node API
3 *
4 * NOTE:
5 *   XmlTextReader.Normalization Property won't be supported, since
6 *     it makes the parser non compliant to the XML recommendation
7 *
8 * See Copyright for the status of this software.
9 *
10 * daniel@veillard.com
11 */
12
13/*
14 * TODOs:
15 *   - XML Schemas validation
16 */
17#define IN_LIBXML
18#include "libxml.h"
19
20#ifdef LIBXML_READER_ENABLED
21#include <string.h> /* for memset() only ! */
22#include <stdarg.h>
23
24#ifdef HAVE_CTYPE_H
25#include <ctype.h>
26#endif
27#ifdef HAVE_STDLIB_H
28#include <stdlib.h>
29#endif
30
31#include <libxml/xmlmemory.h>
32#include <libxml/xmlIO.h>
33#include <libxml/xmlreader.h>
34#include <libxml/parserInternals.h>
35#ifdef LIBXML_SCHEMAS_ENABLED
36#include <libxml/relaxng.h>
37#include <libxml/xmlschemas.h>
38#endif
39#include <libxml/uri.h>
40#ifdef LIBXML_XINCLUDE_ENABLED
41#include <libxml/xinclude.h>
42#endif
43#ifdef LIBXML_PATTERN_ENABLED
44#include <libxml/pattern.h>
45#endif
46
47#define MAX_ERR_MSG_SIZE 64000
48
49/*
50 * The following VA_COPY was coded following an example in
51 * the Samba project.  It may not be sufficient for some
52 * esoteric implementations of va_list (i.e. it may need
53 * something involving a memcpy) but (hopefully) will be
54 * sufficient for libxml2.
55 */
56#ifndef VA_COPY
57  #ifdef HAVE_VA_COPY
58    #define VA_COPY(dest, src) va_copy(dest, src)
59  #else
60    #ifdef HAVE___VA_COPY
61      #define VA_COPY(dest,src) __va_copy(dest, src)
62    #else
63      #define VA_COPY(dest,src) (dest) = (src)
64    #endif
65  #endif
66#endif
67
68/* #define DEBUG_CALLBACKS */
69/* #define DEBUG_READER */
70
71/**
72 * TODO:
73 *
74 * macro to flag unimplemented blocks
75 */
76#define TODO								\
77    xmlGenericError(xmlGenericErrorContext,				\
78	    "Unimplemented block at %s:%d\n",				\
79            __FILE__, __LINE__);
80
81#ifdef DEBUG_READER
82#define DUMP_READER xmlTextReaderDebug(reader);
83#else
84#define DUMP_READER
85#endif
86
87#define CHUNK_SIZE 512
88/************************************************************************
89 *									*
90 *	The parser: maps the Text Reader API on top of the existing	*
91 *		parsing routines building a tree			*
92 *									*
93 ************************************************************************/
94
95#define XML_TEXTREADER_INPUT	1
96#define XML_TEXTREADER_CTXT	2
97
98typedef enum {
99    XML_TEXTREADER_NONE = -1,
100    XML_TEXTREADER_START= 0,
101    XML_TEXTREADER_ELEMENT= 1,
102    XML_TEXTREADER_END= 2,
103    XML_TEXTREADER_EMPTY= 3,
104    XML_TEXTREADER_BACKTRACK= 4,
105    XML_TEXTREADER_DONE= 5,
106    XML_TEXTREADER_ERROR= 6
107} xmlTextReaderState;
108
109typedef enum {
110    XML_TEXTREADER_NOT_VALIDATE = 0,
111    XML_TEXTREADER_VALIDATE_DTD = 1,
112    XML_TEXTREADER_VALIDATE_RNG = 2,
113    XML_TEXTREADER_VALIDATE_XSD = 4
114} xmlTextReaderValidate;
115
116struct _xmlTextReader {
117    int				mode;	/* the parsing mode */
118    xmlDocPtr			doc;    /* when walking an existing doc */
119    xmlTextReaderValidate       validate;/* is there any validation */
120    int				allocs;	/* what structure were deallocated */
121    xmlTextReaderState		state;
122    xmlParserCtxtPtr		ctxt;	/* the parser context */
123    xmlSAXHandlerPtr		sax;	/* the parser SAX callbacks */
124    xmlParserInputBufferPtr	input;	/* the input */
125    startElementSAXFunc		startElement;/* initial SAX callbacks */
126    endElementSAXFunc		endElement;  /* idem */
127    startElementNsSAX2Func	startElementNs;/* idem */
128    endElementNsSAX2Func	endElementNs;  /* idem */
129    charactersSAXFunc		characters;
130    cdataBlockSAXFunc		cdataBlock;
131    unsigned int		base;	/* base of the segment in the input */
132    unsigned int		cur;	/* current position in the input */
133    xmlNodePtr			node;	/* current node */
134    xmlNodePtr			curnode;/* current attribute node */
135    int				depth;  /* depth of the current node */
136    xmlNodePtr			faketext;/* fake xmlNs chld */
137    int				preserve;/* preserve the resulting document */
138    xmlBufferPtr		buffer; /* used to return const xmlChar * */
139    xmlDictPtr			dict;	/* the context dictionnary */
140
141    /* entity stack when traversing entities content */
142    xmlNodePtr         ent;          /* Current Entity Ref Node */
143    int                entNr;        /* Depth of the entities stack */
144    int                entMax;       /* Max depth of the entities stack */
145    xmlNodePtr        *entTab;       /* array of entities */
146
147    /* error handling */
148    xmlTextReaderErrorFunc errorFunc;    /* callback function */
149    void                  *errorFuncArg; /* callback function user argument */
150
151#ifdef LIBXML_SCHEMAS_ENABLED
152    /* Handling of RelaxNG validation */
153    xmlRelaxNGPtr          rngSchemas;	/* The Relax NG schemas */
154    xmlRelaxNGValidCtxtPtr rngValidCtxt;/* The Relax NG validation context */
155    int                    rngValidErrors;/* The number of errors detected */
156    xmlNodePtr             rngFullNode;	/* the node if RNG not progressive */
157    /* Handling of Schemas validation */
158    xmlSchemaPtr          xsdSchemas;	/* The Schemas schemas */
159    xmlSchemaValidCtxtPtr xsdValidCtxt;/* The Schemas validation context */
160    int                   xsdPreserveCtxt; /* 1 if the context was provided by the user */
161    int                   xsdValidErrors;/* The number of errors detected */
162    xmlSchemaSAXPlugPtr   xsdPlug;	/* the schemas plug in SAX pipeline */
163#endif
164#ifdef LIBXML_XINCLUDE_ENABLED
165    /* Handling of XInclude processing */
166    int                xinclude;	/* is xinclude asked for */
167    const xmlChar *    xinclude_name;	/* the xinclude name from dict */
168    xmlXIncludeCtxtPtr xincctxt;	/* the xinclude context */
169    int                in_xinclude;	/* counts for xinclude */
170#endif
171#ifdef LIBXML_PATTERN_ENABLED
172    int                patternNr;       /* number of preserve patterns */
173    int                patternMax;      /* max preserve patterns */
174    xmlPatternPtr     *patternTab;      /* array of preserve patterns */
175#endif
176    int                preserves;	/* level of preserves */
177    int                parserFlags;	/* the set of options set */
178    /* Structured error handling */
179    xmlStructuredErrorFunc sErrorFunc;  /* callback function */
180};
181
182#define NODE_IS_EMPTY		0x1
183#define NODE_IS_PRESERVED	0x2
184#define NODE_IS_SPRESERVED	0x4
185
186/**
187 * CONSTSTR:
188 *
189 * Macro used to return an interned string
190 */
191#define CONSTSTR(str) xmlDictLookup(reader->dict, (str), -1)
192#define CONSTQSTR(p, str) xmlDictQLookup(reader->dict, (p), (str))
193
194static int xmlTextReaderReadTree(xmlTextReaderPtr reader);
195static int xmlTextReaderNextTree(xmlTextReaderPtr reader);
196
197/************************************************************************
198 *									*
199 *	Our own version of the freeing routines as we recycle nodes	*
200 *									*
201 ************************************************************************/
202/**
203 * DICT_FREE:
204 * @str:  a string
205 *
206 * Free a string if it is not owned by the "dict" dictionnary in the
207 * current scope
208 */
209#define DICT_FREE(str)						\
210	if ((str) && ((!dict) ||				\
211	    (xmlDictOwns(dict, (const xmlChar *)(str)) == 0)))	\
212	    xmlFree((char *)(str));
213
214static void xmlTextReaderFreeNode(xmlTextReaderPtr reader, xmlNodePtr cur);
215static void xmlTextReaderFreeNodeList(xmlTextReaderPtr reader, xmlNodePtr cur);
216
217/**
218 * xmlFreeID:
219 * @not:  A id
220 *
221 * Deallocate the memory used by an id definition
222 */
223static void
224xmlFreeID(xmlIDPtr id) {
225    xmlDictPtr dict = NULL;
226
227    if (id == NULL) return;
228
229    if (id->doc != NULL)
230        dict = id->doc->dict;
231
232    if (id->value != NULL)
233	DICT_FREE(id->value)
234    xmlFree(id);
235}
236
237/**
238 * xmlTextReaderRemoveID:
239 * @doc:  the document
240 * @attr:  the attribute
241 *
242 * Remove the given attribute from the ID table maintained internally.
243 *
244 * Returns -1 if the lookup failed and 0 otherwise
245 */
246static int
247xmlTextReaderRemoveID(xmlDocPtr doc, xmlAttrPtr attr) {
248    xmlIDTablePtr table;
249    xmlIDPtr id;
250    xmlChar *ID;
251
252    if (doc == NULL) return(-1);
253    if (attr == NULL) return(-1);
254    table = (xmlIDTablePtr) doc->ids;
255    if (table == NULL)
256        return(-1);
257
258    ID = xmlNodeListGetString(doc, attr->children, 1);
259    if (ID == NULL)
260	return(-1);
261    id = xmlHashLookup(table, ID);
262    xmlFree(ID);
263    if (id == NULL || id->attr != attr) {
264	return(-1);
265    }
266    id->name = attr->name;
267    id->attr = NULL;
268    return(0);
269}
270
271/**
272 * xmlTextReaderFreeProp:
273 * @reader:  the xmlTextReaderPtr used
274 * @cur:  the node
275 *
276 * Free a node.
277 */
278static void
279xmlTextReaderFreeProp(xmlTextReaderPtr reader, xmlAttrPtr cur) {
280    xmlDictPtr dict;
281
282    dict = reader->ctxt->dict;
283    if (cur == NULL) return;
284
285    if ((__xmlRegisterCallbacks) && (xmlDeregisterNodeDefaultValue))
286	xmlDeregisterNodeDefaultValue((xmlNodePtr) cur);
287
288    /* Check for ID removal -> leading to invalid references ! */
289    if ((cur->parent != NULL) && (cur->parent->doc != NULL) &&
290	((cur->parent->doc->intSubset != NULL) ||
291	 (cur->parent->doc->extSubset != NULL))) {
292        if (xmlIsID(cur->parent->doc, cur->parent, cur))
293	    xmlTextReaderRemoveID(cur->parent->doc, cur);
294    }
295    if (cur->children != NULL)
296        xmlTextReaderFreeNodeList(reader, cur->children);
297
298    DICT_FREE(cur->name);
299    if ((reader != NULL) && (reader->ctxt != NULL) &&
300        (reader->ctxt->freeAttrsNr < 100)) {
301        cur->next = reader->ctxt->freeAttrs;
302	reader->ctxt->freeAttrs = cur;
303	reader->ctxt->freeAttrsNr++;
304    } else {
305	xmlFree(cur);
306    }
307}
308
309/**
310 * xmlTextReaderFreePropList:
311 * @reader:  the xmlTextReaderPtr used
312 * @cur:  the first property in the list
313 *
314 * Free a property and all its siblings, all the children are freed too.
315 */
316static void
317xmlTextReaderFreePropList(xmlTextReaderPtr reader, xmlAttrPtr cur) {
318    xmlAttrPtr next;
319    if (cur == NULL) return;
320    while (cur != NULL) {
321        next = cur->next;
322        xmlTextReaderFreeProp(reader, cur);
323	cur = next;
324    }
325}
326
327/**
328 * xmlTextReaderFreeNodeList:
329 * @reader:  the xmlTextReaderPtr used
330 * @cur:  the first node in the list
331 *
332 * Free a node and all its siblings, this is a recursive behaviour, all
333 * the children are freed too.
334 */
335static void
336xmlTextReaderFreeNodeList(xmlTextReaderPtr reader, xmlNodePtr cur) {
337    xmlNodePtr next;
338    xmlDictPtr dict;
339
340    dict = reader->ctxt->dict;
341    if (cur == NULL) return;
342    if (cur->type == XML_NAMESPACE_DECL) {
343	xmlFreeNsList((xmlNsPtr) cur);
344	return;
345    }
346    if ((cur->type == XML_DOCUMENT_NODE) ||
347	(cur->type == XML_HTML_DOCUMENT_NODE)) {
348	xmlFreeDoc((xmlDocPtr) cur);
349	return;
350    }
351    while (cur != NULL) {
352        next = cur->next;
353	/* unroll to speed up freeing the document */
354	if (cur->type != XML_DTD_NODE) {
355
356	    if ((cur->children != NULL) &&
357		(cur->type != XML_ENTITY_REF_NODE)) {
358		if (cur->children->parent == cur)
359		    xmlTextReaderFreeNodeList(reader, cur->children);
360		cur->children = NULL;
361	    }
362
363	    if ((__xmlRegisterCallbacks) && (xmlDeregisterNodeDefaultValue))
364		xmlDeregisterNodeDefaultValue(cur);
365
366	    if (((cur->type == XML_ELEMENT_NODE) ||
367		 (cur->type == XML_XINCLUDE_START) ||
368		 (cur->type == XML_XINCLUDE_END)) &&
369		(cur->properties != NULL))
370		xmlTextReaderFreePropList(reader, cur->properties);
371	    if ((cur->content != (xmlChar *) &(cur->properties)) &&
372	        (cur->type != XML_ELEMENT_NODE) &&
373		(cur->type != XML_XINCLUDE_START) &&
374		(cur->type != XML_XINCLUDE_END) &&
375		(cur->type != XML_ENTITY_REF_NODE)) {
376		DICT_FREE(cur->content);
377	    }
378	    if (((cur->type == XML_ELEMENT_NODE) ||
379	         (cur->type == XML_XINCLUDE_START) ||
380		 (cur->type == XML_XINCLUDE_END)) &&
381		(cur->nsDef != NULL))
382		xmlFreeNsList(cur->nsDef);
383
384	    /*
385	     * we don't free element names here they are interned now
386	     */
387	    if ((cur->type != XML_TEXT_NODE) &&
388		(cur->type != XML_COMMENT_NODE))
389		DICT_FREE(cur->name);
390	    if (((cur->type == XML_ELEMENT_NODE) ||
391		 (cur->type == XML_TEXT_NODE)) &&
392	        (reader != NULL) && (reader->ctxt != NULL) &&
393		(reader->ctxt->freeElemsNr < 100)) {
394	        cur->next = reader->ctxt->freeElems;
395		reader->ctxt->freeElems = cur;
396		reader->ctxt->freeElemsNr++;
397	    } else {
398		xmlFree(cur);
399	    }
400	}
401	cur = next;
402    }
403}
404
405/**
406 * xmlTextReaderFreeNode:
407 * @reader:  the xmlTextReaderPtr used
408 * @cur:  the node
409 *
410 * Free a node, this is a recursive behaviour, all the children are freed too.
411 * This doesn't unlink the child from the list, use xmlUnlinkNode() first.
412 */
413static void
414xmlTextReaderFreeNode(xmlTextReaderPtr reader, xmlNodePtr cur) {
415    xmlDictPtr dict;
416
417    dict = reader->ctxt->dict;
418    if (cur->type == XML_DTD_NODE) {
419	xmlFreeDtd((xmlDtdPtr) cur);
420	return;
421    }
422    if (cur->type == XML_NAMESPACE_DECL) {
423	xmlFreeNs((xmlNsPtr) cur);
424        return;
425    }
426    if (cur->type == XML_ATTRIBUTE_NODE) {
427	xmlTextReaderFreeProp(reader, (xmlAttrPtr) cur);
428	return;
429    }
430
431    if ((cur->children != NULL) &&
432	(cur->type != XML_ENTITY_REF_NODE)) {
433	if (cur->children->parent == cur)
434	    xmlTextReaderFreeNodeList(reader, cur->children);
435	cur->children = NULL;
436    }
437
438    if ((__xmlRegisterCallbacks) && (xmlDeregisterNodeDefaultValue))
439	xmlDeregisterNodeDefaultValue(cur);
440
441    if (((cur->type == XML_ELEMENT_NODE) ||
442	 (cur->type == XML_XINCLUDE_START) ||
443	 (cur->type == XML_XINCLUDE_END)) &&
444	(cur->properties != NULL))
445	xmlTextReaderFreePropList(reader, cur->properties);
446    if ((cur->content != (xmlChar *) &(cur->properties)) &&
447        (cur->type != XML_ELEMENT_NODE) &&
448	(cur->type != XML_XINCLUDE_START) &&
449	(cur->type != XML_XINCLUDE_END) &&
450	(cur->type != XML_ENTITY_REF_NODE)) {
451	DICT_FREE(cur->content);
452    }
453    if (((cur->type == XML_ELEMENT_NODE) ||
454	 (cur->type == XML_XINCLUDE_START) ||
455	 (cur->type == XML_XINCLUDE_END)) &&
456	(cur->nsDef != NULL))
457	xmlFreeNsList(cur->nsDef);
458
459    /*
460     * we don't free names here they are interned now
461     */
462    if ((cur->type != XML_TEXT_NODE) &&
463        (cur->type != XML_COMMENT_NODE))
464	DICT_FREE(cur->name);
465
466    if (((cur->type == XML_ELEMENT_NODE) ||
467	 (cur->type == XML_TEXT_NODE)) &&
468	(reader != NULL) && (reader->ctxt != NULL) &&
469	(reader->ctxt->freeElemsNr < 100)) {
470	cur->next = reader->ctxt->freeElems;
471	reader->ctxt->freeElems = cur;
472	reader->ctxt->freeElemsNr++;
473    } else {
474	xmlFree(cur);
475    }
476}
477
478/**
479 * xmlTextReaderFreeIDTable:
480 * @table:  An id table
481 *
482 * Deallocate the memory used by an ID hash table.
483 */
484static void
485xmlTextReaderFreeIDTable(xmlIDTablePtr table) {
486    xmlHashFree(table, (xmlHashDeallocator) xmlFreeID);
487}
488
489/**
490 * xmlTextReaderFreeDoc:
491 * @reader:  the xmlTextReaderPtr used
492 * @cur:  pointer to the document
493 *
494 * Free up all the structures used by a document, tree included.
495 */
496static void
497xmlTextReaderFreeDoc(xmlTextReaderPtr reader, xmlDocPtr cur) {
498    xmlDtdPtr extSubset, intSubset;
499
500    if (cur == NULL) return;
501
502    if ((__xmlRegisterCallbacks) && (xmlDeregisterNodeDefaultValue))
503	xmlDeregisterNodeDefaultValue((xmlNodePtr) cur);
504
505    /*
506     * Do this before freeing the children list to avoid ID lookups
507     */
508    if (cur->ids != NULL) xmlTextReaderFreeIDTable((xmlIDTablePtr) cur->ids);
509    cur->ids = NULL;
510    if (cur->refs != NULL) xmlFreeRefTable((xmlRefTablePtr) cur->refs);
511    cur->refs = NULL;
512    extSubset = cur->extSubset;
513    intSubset = cur->intSubset;
514    if (intSubset == extSubset)
515	extSubset = NULL;
516    if (extSubset != NULL) {
517	xmlUnlinkNode((xmlNodePtr) cur->extSubset);
518	cur->extSubset = NULL;
519	xmlFreeDtd(extSubset);
520    }
521    if (intSubset != NULL) {
522	xmlUnlinkNode((xmlNodePtr) cur->intSubset);
523	cur->intSubset = NULL;
524	xmlFreeDtd(intSubset);
525    }
526
527    if (cur->children != NULL) xmlTextReaderFreeNodeList(reader, cur->children);
528
529    if (cur->version != NULL) xmlFree((char *) cur->version);
530    if (cur->name != NULL) xmlFree((char *) cur->name);
531    if (cur->encoding != NULL) xmlFree((char *) cur->encoding);
532    if (cur->oldNs != NULL) xmlFreeNsList(cur->oldNs);
533    if (cur->URL != NULL) xmlFree((char *) cur->URL);
534    if (cur->dict != NULL) xmlDictFree(cur->dict);
535
536    xmlFree(cur);
537}
538
539/************************************************************************
540 *									*
541 *			The reader core parser				*
542 *									*
543 ************************************************************************/
544#ifdef DEBUG_READER
545static void
546xmlTextReaderDebug(xmlTextReaderPtr reader) {
547    if ((reader == NULL) || (reader->ctxt == NULL)) {
548	fprintf(stderr, "xmlTextReader NULL\n");
549	return;
550    }
551    fprintf(stderr, "xmlTextReader: state %d depth %d ",
552	    reader->state, reader->depth);
553    if (reader->node == NULL) {
554	fprintf(stderr, "node = NULL\n");
555    } else {
556	fprintf(stderr, "node %s\n", reader->node->name);
557    }
558    fprintf(stderr, "  input: base %d, cur %d, depth %d: ",
559	    reader->base, reader->cur, reader->ctxt->nodeNr);
560    if (reader->input->buffer == NULL) {
561	fprintf(stderr, "buffer is NULL\n");
562    } else {
563#ifdef LIBXML_DEBUG_ENABLED
564	xmlDebugDumpString(stderr,
565		&reader->input->buffer->content[reader->cur]);
566#endif
567	fprintf(stderr, "\n");
568    }
569}
570#endif
571
572/**
573 * xmlTextReaderEntPush:
574 * @reader:  the xmlTextReaderPtr used
575 * @value:  the entity reference node
576 *
577 * Pushes a new entity reference node on top of the entities stack
578 *
579 * Returns 0 in case of error, the index in the stack otherwise
580 */
581static int
582xmlTextReaderEntPush(xmlTextReaderPtr reader, xmlNodePtr value)
583{
584    if (reader->entMax <= 0) {
585	reader->entMax = 10;
586	reader->entTab = (xmlNodePtr *) xmlMalloc(reader->entMax *
587		                                  sizeof(reader->entTab[0]));
588        if (reader->entTab == NULL) {
589            xmlGenericError(xmlGenericErrorContext, "xmlMalloc failed !\n");
590            return (0);
591        }
592    }
593    if (reader->entNr >= reader->entMax) {
594        reader->entMax *= 2;
595        reader->entTab =
596            (xmlNodePtr *) xmlRealloc(reader->entTab,
597                                      reader->entMax *
598                                      sizeof(reader->entTab[0]));
599        if (reader->entTab == NULL) {
600            xmlGenericError(xmlGenericErrorContext, "xmlRealloc failed !\n");
601            return (0);
602        }
603    }
604    reader->entTab[reader->entNr] = value;
605    reader->ent = value;
606    return (reader->entNr++);
607}
608
609/**
610 * xmlTextReaderEntPop:
611 * @reader:  the xmlTextReaderPtr used
612 *
613 * Pops the top element entity from the entities stack
614 *
615 * Returns the entity just removed
616 */
617static xmlNodePtr
618xmlTextReaderEntPop(xmlTextReaderPtr reader)
619{
620    xmlNodePtr ret;
621
622    if (reader->entNr <= 0)
623        return (NULL);
624    reader->entNr--;
625    if (reader->entNr > 0)
626        reader->ent = reader->entTab[reader->entNr - 1];
627    else
628        reader->ent = NULL;
629    ret = reader->entTab[reader->entNr];
630    reader->entTab[reader->entNr] = NULL;
631    return (ret);
632}
633
634/**
635 * xmlTextReaderStartElement:
636 * @ctx: the user data (XML parser context)
637 * @fullname:  The element name, including namespace prefix
638 * @atts:  An array of name/value attributes pairs, NULL terminated
639 *
640 * called when an opening tag has been processed.
641 */
642static void
643xmlTextReaderStartElement(void *ctx, const xmlChar *fullname,
644	                  const xmlChar **atts) {
645    xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx;
646    xmlTextReaderPtr reader = ctxt->_private;
647
648#ifdef DEBUG_CALLBACKS
649    printf("xmlTextReaderStartElement(%s)\n", fullname);
650#endif
651    if ((reader != NULL) && (reader->startElement != NULL)) {
652	reader->startElement(ctx, fullname, atts);
653	if ((ctxt->node != NULL) && (ctxt->input != NULL) &&
654	    (ctxt->input->cur != NULL) && (ctxt->input->cur[0] == '/') &&
655	    (ctxt->input->cur[1] == '>'))
656	    ctxt->node->extra = NODE_IS_EMPTY;
657    }
658    if (reader != NULL)
659	reader->state = XML_TEXTREADER_ELEMENT;
660}
661
662/**
663 * xmlTextReaderEndElement:
664 * @ctx: the user data (XML parser context)
665 * @fullname:  The element name, including namespace prefix
666 *
667 * called when an ending tag has been processed.
668 */
669static void
670xmlTextReaderEndElement(void *ctx, const xmlChar *fullname) {
671    xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx;
672    xmlTextReaderPtr reader = ctxt->_private;
673
674#ifdef DEBUG_CALLBACKS
675    printf("xmlTextReaderEndElement(%s)\n", fullname);
676#endif
677    if ((reader != NULL) && (reader->endElement != NULL)) {
678	reader->endElement(ctx, fullname);
679    }
680}
681
682/**
683 * xmlTextReaderStartElementNs:
684 * @ctx: the user data (XML parser context)
685 * @localname:  the local name of the element
686 * @prefix:  the element namespace prefix if available
687 * @URI:  the element namespace name if available
688 * @nb_namespaces:  number of namespace definitions on that node
689 * @namespaces:  pointer to the array of prefix/URI pairs namespace definitions
690 * @nb_attributes:  the number of attributes on that node
691 * nb_defaulted:  the number of defaulted attributes.
692 * @attributes:  pointer to the array of (localname/prefix/URI/value/end)
693 *               attribute values.
694 *
695 * called when an opening tag has been processed.
696 */
697static void
698xmlTextReaderStartElementNs(void *ctx,
699                      const xmlChar *localname,
700		      const xmlChar *prefix,
701		      const xmlChar *URI,
702		      int nb_namespaces,
703		      const xmlChar **namespaces,
704		      int nb_attributes,
705		      int nb_defaulted,
706		      const xmlChar **attributes)
707{
708    xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx;
709    xmlTextReaderPtr reader = ctxt->_private;
710
711#ifdef DEBUG_CALLBACKS
712    printf("xmlTextReaderStartElementNs(%s)\n", localname);
713#endif
714    if ((reader != NULL) && (reader->startElementNs != NULL)) {
715	reader->startElementNs(ctx, localname, prefix, URI, nb_namespaces,
716	                       namespaces, nb_attributes, nb_defaulted,
717			       attributes);
718	if ((ctxt->node != NULL) && (ctxt->input != NULL) &&
719	    (ctxt->input->cur != NULL) && (ctxt->input->cur[0] == '/') &&
720	    (ctxt->input->cur[1] == '>'))
721	    ctxt->node->extra = NODE_IS_EMPTY;
722    }
723    if (reader != NULL)
724	reader->state = XML_TEXTREADER_ELEMENT;
725}
726
727/**
728 * xmlTextReaderEndElementNs:
729 * @ctx: the user data (XML parser context)
730 * @localname:  the local name of the element
731 * @prefix:  the element namespace prefix if available
732 * @URI:  the element namespace name if available
733 *
734 * called when an ending tag has been processed.
735 */
736static void
737xmlTextReaderEndElementNs(void *ctx,
738                          const xmlChar * localname,
739                          const xmlChar * prefix,
740		          const xmlChar * URI)
741{
742    xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx;
743    xmlTextReaderPtr reader = ctxt->_private;
744
745#ifdef DEBUG_CALLBACKS
746    printf("xmlTextReaderEndElementNs(%s)\n", localname);
747#endif
748    if ((reader != NULL) && (reader->endElementNs != NULL)) {
749	reader->endElementNs(ctx, localname, prefix, URI);
750    }
751}
752
753
754/**
755 * xmlTextReaderCharacters:
756 * @ctx: the user data (XML parser context)
757 * @ch:  a xmlChar string
758 * @len: the number of xmlChar
759 *
760 * receiving some chars from the parser.
761 */
762static void
763xmlTextReaderCharacters(void *ctx, const xmlChar *ch, int len)
764{
765    xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx;
766    xmlTextReaderPtr reader = ctxt->_private;
767
768#ifdef DEBUG_CALLBACKS
769    printf("xmlTextReaderCharacters()\n");
770#endif
771    if ((reader != NULL) && (reader->characters != NULL)) {
772	reader->characters(ctx, ch, len);
773    }
774}
775
776/**
777 * xmlTextReaderCDataBlock:
778 * @ctx: the user data (XML parser context)
779 * @value:  The pcdata content
780 * @len:  the block length
781 *
782 * called when a pcdata block has been parsed
783 */
784static void
785xmlTextReaderCDataBlock(void *ctx, const xmlChar *ch, int len)
786{
787    xmlParserCtxtPtr ctxt = (xmlParserCtxtPtr) ctx;
788    xmlTextReaderPtr reader = ctxt->_private;
789
790#ifdef DEBUG_CALLBACKS
791    printf("xmlTextReaderCDataBlock()\n");
792#endif
793    if ((reader != NULL) && (reader->cdataBlock != NULL)) {
794	reader->cdataBlock(ctx, ch, len);
795    }
796}
797
798/**
799 * xmlTextReaderPushData:
800 * @reader:  the xmlTextReaderPtr used
801 *
802 * Push data down the progressive parser until a significant callback
803 * got raised.
804 *
805 * Returns -1 in case of failure, 0 otherwise
806 */
807static int
808xmlTextReaderPushData(xmlTextReaderPtr reader) {
809    xmlBufferPtr inbuf;
810    int val, s;
811    xmlTextReaderState oldstate;
812
813    if ((reader->input == NULL) || (reader->input->buffer == NULL))
814	return(-1);
815
816    oldstate = reader->state;
817    reader->state = XML_TEXTREADER_NONE;
818    inbuf = reader->input->buffer;
819
820    while (reader->state == XML_TEXTREADER_NONE) {
821	if (inbuf->use < reader->cur + CHUNK_SIZE) {
822	    /*
823	     * Refill the buffer unless we are at the end of the stream
824	     */
825	    if (reader->mode != XML_TEXTREADER_MODE_EOF) {
826		val = xmlParserInputBufferRead(reader->input, 4096);
827		if ((val == 0) &&
828		    (inbuf->alloc == XML_BUFFER_ALLOC_IMMUTABLE)) {
829		    if (inbuf->use == reader->cur) {
830			reader->mode = XML_TEXTREADER_MODE_EOF;
831			reader->state = oldstate;
832		    }
833		} else if (val < 0) {
834		    reader->mode = XML_TEXTREADER_MODE_EOF;
835		    reader->state = oldstate;
836		    if ((oldstate != XML_TEXTREADER_START) ||
837			(reader->ctxt->myDoc != NULL))
838			return(val);
839		} else if (val == 0) {
840		    /* mark the end of the stream and process the remains */
841		    reader->mode = XML_TEXTREADER_MODE_EOF;
842		    break;
843		}
844
845	    } else
846		break;
847	}
848	/*
849	 * parse by block of CHUNK_SIZE bytes, various tests show that
850	 * it's the best tradeoff at least on a 1.2GH Duron
851	 */
852	if (inbuf->use >= reader->cur + CHUNK_SIZE) {
853	    val = xmlParseChunk(reader->ctxt,
854		          (const char *) &inbuf->content[reader->cur],
855			  CHUNK_SIZE, 0);
856	    reader->cur += CHUNK_SIZE;
857	    if ((val != 0) || (reader->ctxt->wellFormed == 0))
858		return(-1);
859	} else {
860	    s = inbuf->use - reader->cur;
861	    val = xmlParseChunk(reader->ctxt,
862		          (const char *) &inbuf->content[reader->cur],
863			  s, 0);
864	    reader->cur += s;
865	    if ((val != 0) || (reader->ctxt->wellFormed == 0))
866		return(-1);
867	    break;
868	}
869    }
870
871    /*
872     * Discard the consumed input when needed and possible
873     */
874    if (reader->mode == XML_TEXTREADER_MODE_INTERACTIVE) {
875        if (inbuf->alloc != XML_BUFFER_ALLOC_IMMUTABLE) {
876	    if ((reader->cur >= 4096) &&
877		(inbuf->use - reader->cur <= CHUNK_SIZE)) {
878		val = xmlBufferShrink(inbuf, reader->cur);
879		if (val >= 0) {
880		    reader->cur -= val;
881		}
882	    }
883	}
884    }
885
886    /*
887     * At the end of the stream signal that the work is done to the Push
888     * parser.
889     */
890    else if (reader->mode == XML_TEXTREADER_MODE_EOF) {
891	if (reader->state != XML_TEXTREADER_DONE) {
892	    s = inbuf->use - reader->cur;
893	    val = xmlParseChunk(reader->ctxt,
894		    (const char *) &inbuf->content[reader->cur],
895		    s, 1);
896	    reader->cur = inbuf->use;
897	    reader->state  = XML_TEXTREADER_DONE;
898	    if ((val != 0) || (reader->ctxt->wellFormed == 0))
899	        return(-1);
900	}
901    }
902    reader->state = oldstate;
903    return(0);
904}
905
906#ifdef LIBXML_REGEXP_ENABLED
907/**
908 * xmlTextReaderValidatePush:
909 * @reader:  the xmlTextReaderPtr used
910 *
911 * Push the current node for validation
912 */
913static void
914xmlTextReaderValidatePush(xmlTextReaderPtr reader ATTRIBUTE_UNUSED) {
915    xmlNodePtr node = reader->node;
916
917#ifdef LIBXML_VALID_ENABLED
918    if ((reader->validate == XML_TEXTREADER_VALIDATE_DTD) &&
919        (reader->ctxt != NULL) && (reader->ctxt->validate == 1)) {
920	if ((node->ns == NULL) || (node->ns->prefix == NULL)) {
921	    reader->ctxt->valid &= xmlValidatePushElement(&reader->ctxt->vctxt,
922				    reader->ctxt->myDoc, node, node->name);
923	} else {
924	    /* TODO use the BuildQName interface */
925	    xmlChar *qname;
926
927	    qname = xmlStrdup(node->ns->prefix);
928	    qname = xmlStrcat(qname, BAD_CAST ":");
929	    qname = xmlStrcat(qname, node->name);
930	    reader->ctxt->valid &= xmlValidatePushElement(&reader->ctxt->vctxt,
931				    reader->ctxt->myDoc, node, qname);
932	    if (qname != NULL)
933		xmlFree(qname);
934	}
935    }
936#endif /* LIBXML_VALID_ENABLED */
937#ifdef LIBXML_SCHEMAS_ENABLED
938    if ((reader->validate == XML_TEXTREADER_VALIDATE_RNG) &&
939               (reader->rngValidCtxt != NULL)) {
940	int ret;
941
942	if (reader->rngFullNode != NULL) return;
943	ret = xmlRelaxNGValidatePushElement(reader->rngValidCtxt,
944	                                    reader->ctxt->myDoc,
945					    node);
946	if (ret == 0) {
947	    /*
948	     * this element requires a full tree
949	     */
950	    node = xmlTextReaderExpand(reader);
951	    if (node == NULL) {
952printf("Expand failed !\n");
953	        ret = -1;
954	    } else {
955		ret = xmlRelaxNGValidateFullElement(reader->rngValidCtxt,
956						    reader->ctxt->myDoc,
957						    node);
958		reader->rngFullNode = node;
959	    }
960	}
961	if (ret != 1)
962	    reader->rngValidErrors++;
963    }
964#endif
965}
966
967/**
968 * xmlTextReaderValidateCData:
969 * @reader:  the xmlTextReaderPtr used
970 * @data:  pointer to the CData
971 * @len:  lenght of the CData block in bytes.
972 *
973 * Push some CData for validation
974 */
975static void
976xmlTextReaderValidateCData(xmlTextReaderPtr reader,
977                           const xmlChar *data, int len) {
978#ifdef LIBXML_VALID_ENABLED
979    if ((reader->validate == XML_TEXTREADER_VALIDATE_DTD) &&
980        (reader->ctxt != NULL) && (reader->ctxt->validate == 1)) {
981	reader->ctxt->valid &= xmlValidatePushCData(&reader->ctxt->vctxt,
982	                                            data, len);
983    }
984#endif /* LIBXML_VALID_ENABLED */
985#ifdef LIBXML_SCHEMAS_ENABLED
986    if ((reader->validate == XML_TEXTREADER_VALIDATE_RNG) &&
987               (reader->rngValidCtxt != NULL)) {
988	int ret;
989
990	if (reader->rngFullNode != NULL) return;
991	ret = xmlRelaxNGValidatePushCData(reader->rngValidCtxt, data, len);
992	if (ret != 1)
993	    reader->rngValidErrors++;
994    }
995#endif
996}
997
998/**
999 * xmlTextReaderValidatePop:
1000 * @reader:  the xmlTextReaderPtr used
1001 *
1002 * Pop the current node from validation
1003 */
1004static void
1005xmlTextReaderValidatePop(xmlTextReaderPtr reader) {
1006    xmlNodePtr node = reader->node;
1007
1008#ifdef LIBXML_VALID_ENABLED
1009    if ((reader->validate == XML_TEXTREADER_VALIDATE_DTD) &&
1010        (reader->ctxt != NULL) && (reader->ctxt->validate == 1)) {
1011	if ((node->ns == NULL) || (node->ns->prefix == NULL)) {
1012	    reader->ctxt->valid &= xmlValidatePopElement(&reader->ctxt->vctxt,
1013				    reader->ctxt->myDoc, node, node->name);
1014	} else {
1015	    /* TODO use the BuildQName interface */
1016	    xmlChar *qname;
1017
1018	    qname = xmlStrdup(node->ns->prefix);
1019	    qname = xmlStrcat(qname, BAD_CAST ":");
1020	    qname = xmlStrcat(qname, node->name);
1021	    reader->ctxt->valid &= xmlValidatePopElement(&reader->ctxt->vctxt,
1022				    reader->ctxt->myDoc, node, qname);
1023	    if (qname != NULL)
1024		xmlFree(qname);
1025	}
1026    }
1027#endif /* LIBXML_VALID_ENABLED */
1028#ifdef LIBXML_SCHEMAS_ENABLED
1029    if ((reader->validate == XML_TEXTREADER_VALIDATE_RNG) &&
1030               (reader->rngValidCtxt != NULL)) {
1031	int ret;
1032
1033	if (reader->rngFullNode != NULL) {
1034	    if (node == reader->rngFullNode)
1035	        reader->rngFullNode = NULL;
1036	    return;
1037	}
1038	ret = xmlRelaxNGValidatePopElement(reader->rngValidCtxt,
1039	                                   reader->ctxt->myDoc,
1040					   node);
1041	if (ret != 1)
1042	    reader->rngValidErrors++;
1043    }
1044#endif
1045}
1046
1047/**
1048 * xmlTextReaderValidateEntity:
1049 * @reader:  the xmlTextReaderPtr used
1050 *
1051 * Handle the validation when an entity reference is encountered and
1052 * entity substitution is not activated. As a result the parser interface
1053 * must walk through the entity and do the validation calls
1054 */
1055static void
1056xmlTextReaderValidateEntity(xmlTextReaderPtr reader) {
1057    xmlNodePtr oldnode = reader->node;
1058    xmlNodePtr node = reader->node;
1059    xmlParserCtxtPtr ctxt = reader->ctxt;
1060
1061    do {
1062	if (node->type == XML_ENTITY_REF_NODE) {
1063	    /*
1064	     * Case where the underlying tree is not availble, lookup the entity
1065	     * and walk it.
1066	     */
1067	    if ((node->children == NULL) && (ctxt->sax != NULL) &&
1068		(ctxt->sax->getEntity != NULL)) {
1069		node->children = (xmlNodePtr)
1070		    ctxt->sax->getEntity(ctxt, node->name);
1071	    }
1072
1073	    if ((node->children != NULL) &&
1074		(node->children->type == XML_ENTITY_DECL) &&
1075		(node->children->children != NULL)) {
1076		xmlTextReaderEntPush(reader, node);
1077		node = node->children->children;
1078		continue;
1079	    } else {
1080		/*
1081		 * The error has probably be raised already.
1082		 */
1083		if (node == oldnode)
1084		    break;
1085		node = node->next;
1086	    }
1087#ifdef LIBXML_REGEXP_ENABLED
1088	} else if (node->type == XML_ELEMENT_NODE) {
1089	    reader->node = node;
1090	    xmlTextReaderValidatePush(reader);
1091	} else if ((node->type == XML_TEXT_NODE) ||
1092		   (node->type == XML_CDATA_SECTION_NODE)) {
1093            xmlTextReaderValidateCData(reader, node->content,
1094	                               xmlStrlen(node->content));
1095#endif
1096	}
1097
1098	/*
1099	 * go to next node
1100	 */
1101	if (node->children != NULL) {
1102	    node = node->children;
1103	    continue;
1104	} else if (node->type == XML_ELEMENT_NODE) {
1105	    xmlTextReaderValidatePop(reader);
1106	}
1107	if (node->next != NULL) {
1108	    node = node->next;
1109	    continue;
1110	}
1111	do {
1112	    node = node->parent;
1113	    if (node->type == XML_ELEMENT_NODE) {
1114	        xmlNodePtr tmp;
1115		if (reader->entNr == 0) {
1116		    while ((tmp = node->last) != NULL) {
1117			if ((tmp->extra & NODE_IS_PRESERVED) == 0) {
1118			    xmlUnlinkNode(tmp);
1119			    xmlTextReaderFreeNode(reader, tmp);
1120			} else
1121			    break;
1122		    }
1123		}
1124		reader->node = node;
1125		xmlTextReaderValidatePop(reader);
1126	    }
1127	    if ((node->type == XML_ENTITY_DECL) &&
1128		(reader->ent != NULL) && (reader->ent->children == node)) {
1129		node = xmlTextReaderEntPop(reader);
1130	    }
1131	    if (node == oldnode)
1132		break;
1133	    if (node->next != NULL) {
1134		node = node->next;
1135		break;
1136	    }
1137	} while ((node != NULL) && (node != oldnode));
1138    } while ((node != NULL) && (node != oldnode));
1139    reader->node = oldnode;
1140}
1141#endif /* LIBXML_REGEXP_ENABLED */
1142
1143
1144/**
1145 * xmlTextReaderGetSuccessor:
1146 * @cur:  the current node
1147 *
1148 * Get the successor of a node if available.
1149 *
1150 * Returns the successor node or NULL
1151 */
1152static xmlNodePtr
1153xmlTextReaderGetSuccessor(xmlNodePtr cur) {
1154    if (cur == NULL) return(NULL) ; /* ERROR */
1155    if (cur->next != NULL) return(cur->next) ;
1156    do {
1157        cur = cur->parent;
1158        if (cur == NULL) break;
1159        if (cur->next != NULL) return(cur->next);
1160    } while (cur != NULL);
1161    return(cur);
1162}
1163
1164/**
1165 * xmlTextReaderDoExpand:
1166 * @reader:  the xmlTextReaderPtr used
1167 *
1168 * Makes sure that the current node is fully read as well as all its
1169 * descendant. It means the full DOM subtree must be available at the
1170 * end of the call.
1171 *
1172 * Returns 1 if the node was expanded successfully, 0 if there is no more
1173 *          nodes to read, or -1 in case of error
1174 */
1175static int
1176xmlTextReaderDoExpand(xmlTextReaderPtr reader) {
1177    int val;
1178
1179    if ((reader == NULL) || (reader->node == NULL) || (reader->ctxt == NULL))
1180        return(-1);
1181    do {
1182	if (reader->ctxt->instate == XML_PARSER_EOF) return(1);
1183
1184        if (xmlTextReaderGetSuccessor(reader->node) != NULL)
1185	    return(1);
1186	if (reader->ctxt->nodeNr < reader->depth)
1187	    return(1);
1188	if (reader->mode == XML_TEXTREADER_MODE_EOF)
1189	    return(1);
1190	val = xmlTextReaderPushData(reader);
1191	if (val < 0){
1192	    reader->mode = XML_TEXTREADER_MODE_ERROR;
1193	    return(-1);
1194	}
1195    } while(reader->mode != XML_TEXTREADER_MODE_EOF);
1196    return(1);
1197}
1198
1199/**
1200 * xmlTextReaderCollectSiblings:
1201 * @node:    the first child
1202 *
1203 *  Traverse depth-first through all sibling nodes and their children
1204 *  nodes and concatenate their content. This is an auxiliary function
1205 *  to xmlTextReaderReadString.
1206 *
1207 *  Returns a string containing the content, or NULL in case of error.
1208 */
1209static xmlChar *
1210xmlTextReaderCollectSiblings(xmlNodePtr node)
1211{
1212    xmlBufferPtr buffer;
1213    xmlChar *ret;
1214
1215    buffer = xmlBufferCreate();
1216    if (buffer == NULL)
1217       return NULL;
1218
1219    for ( ; node != NULL; node = node->next) {
1220       switch (node->type) {
1221       case XML_TEXT_NODE:
1222       case XML_CDATA_SECTION_NODE:
1223           xmlBufferCat(buffer, node->content);
1224           break;
1225       case XML_ELEMENT_NODE: {
1226           xmlChar *tmp;
1227
1228	   tmp = xmlTextReaderCollectSiblings(node->children);
1229           xmlBufferCat(buffer, tmp);
1230	   xmlFree(tmp);
1231	   break;
1232       }
1233       default:
1234           break;
1235       }
1236    }
1237    ret = buffer->content;
1238    buffer->content = NULL;
1239    xmlBufferFree(buffer);
1240    return(ret);
1241}
1242
1243/**
1244 * xmlTextReaderRead:
1245 * @reader:  the xmlTextReaderPtr used
1246 *
1247 *  Moves the position of the current instance to the next node in
1248 *  the stream, exposing its properties.
1249 *
1250 *  Returns 1 if the node was read successfully, 0 if there is no more
1251 *          nodes to read, or -1 in case of error
1252 */
1253int
1254xmlTextReaderRead(xmlTextReaderPtr reader) {
1255    int val, olddepth = 0;
1256    xmlTextReaderState oldstate = XML_TEXTREADER_START;
1257    xmlNodePtr oldnode = NULL;
1258
1259
1260    if (reader == NULL)
1261	return(-1);
1262    reader->curnode = NULL;
1263    if (reader->doc != NULL)
1264        return(xmlTextReaderReadTree(reader));
1265    if (reader->ctxt == NULL)
1266	return(-1);
1267    if (reader->ctxt->wellFormed != 1)
1268	return(-1);
1269
1270#ifdef DEBUG_READER
1271    fprintf(stderr, "\nREAD ");
1272    DUMP_READER
1273#endif
1274    if (reader->mode == XML_TEXTREADER_MODE_INITIAL) {
1275	reader->mode = XML_TEXTREADER_MODE_INTERACTIVE;
1276	/*
1277	 * Initial state
1278	 */
1279	do {
1280	    val = xmlTextReaderPushData(reader);
1281		if (val < 0){
1282			reader->mode = XML_TEXTREADER_MODE_ERROR;
1283			reader->state = XML_TEXTREADER_ERROR;
1284		return(-1);
1285		}
1286	} while ((reader->ctxt->node == NULL) &&
1287		 ((reader->mode != XML_TEXTREADER_MODE_EOF) &&
1288		  (reader->state != XML_TEXTREADER_DONE)));
1289	if (reader->ctxt->node == NULL) {
1290	    if (reader->ctxt->myDoc != NULL) {
1291		reader->node = reader->ctxt->myDoc->children;
1292	    }
1293	    if (reader->node == NULL){
1294			reader->mode = XML_TEXTREADER_MODE_ERROR;
1295			reader->state = XML_TEXTREADER_ERROR;
1296		return(-1);
1297		}
1298	    reader->state = XML_TEXTREADER_ELEMENT;
1299	} else {
1300	    if (reader->ctxt->myDoc != NULL) {
1301		reader->node = reader->ctxt->myDoc->children;
1302	    }
1303	    if (reader->node == NULL)
1304		reader->node = reader->ctxt->nodeTab[0];
1305	    reader->state = XML_TEXTREADER_ELEMENT;
1306	}
1307	reader->depth = 0;
1308	reader->ctxt->parseMode = XML_PARSE_READER;
1309	goto node_found;
1310    }
1311    oldstate = reader->state;
1312    olddepth = reader->ctxt->nodeNr;
1313    oldnode = reader->node;
1314
1315get_next_node:
1316    if (reader->node == NULL) {
1317	if (reader->mode == XML_TEXTREADER_MODE_EOF)
1318	    return(0);
1319	else
1320	    return(-1);
1321    }
1322
1323    /*
1324     * If we are not backtracking on ancestors or examined nodes,
1325     * that the parser didn't finished or that we arent at the end
1326     * of stream, continue processing.
1327     */
1328    while ((reader->node != NULL) && (reader->node->next == NULL) &&
1329	   (reader->ctxt->nodeNr == olddepth) &&
1330           ((oldstate == XML_TEXTREADER_BACKTRACK) ||
1331            (reader->node->children == NULL) ||
1332	    (reader->node->type == XML_ENTITY_REF_NODE) ||
1333	    ((reader->node->children != NULL) &&
1334	     (reader->node->children->type == XML_TEXT_NODE) &&
1335	     (reader->node->children->next == NULL)) ||
1336	    (reader->node->type == XML_DTD_NODE) ||
1337	    (reader->node->type == XML_DOCUMENT_NODE) ||
1338	    (reader->node->type == XML_HTML_DOCUMENT_NODE)) &&
1339	   ((reader->ctxt->node == NULL) ||
1340	    (reader->ctxt->node == reader->node) ||
1341	    (reader->ctxt->node == reader->node->parent)) &&
1342	   (reader->ctxt->instate != XML_PARSER_EOF)) {
1343	val = xmlTextReaderPushData(reader);
1344	if (val < 0){
1345		reader->mode = XML_TEXTREADER_MODE_ERROR;
1346		reader->state = XML_TEXTREADER_ERROR;
1347	    return(-1);
1348	}
1349	if (reader->node == NULL)
1350	    goto node_end;
1351    }
1352    if (oldstate != XML_TEXTREADER_BACKTRACK) {
1353	if ((reader->node->children != NULL) &&
1354	    (reader->node->type != XML_ENTITY_REF_NODE) &&
1355	    (reader->node->type != XML_XINCLUDE_START) &&
1356	    (reader->node->type != XML_DTD_NODE)) {
1357	    reader->node = reader->node->children;
1358	    reader->depth++;
1359	    reader->state = XML_TEXTREADER_ELEMENT;
1360	    goto node_found;
1361	}
1362    }
1363    if (reader->node->next != NULL) {
1364	if ((oldstate == XML_TEXTREADER_ELEMENT) &&
1365            (reader->node->type == XML_ELEMENT_NODE) &&
1366	    (reader->node->children == NULL) &&
1367	    ((reader->node->extra & NODE_IS_EMPTY) == 0)
1368#ifdef LIBXML_XINCLUDE_ENABLED
1369	    && (reader->in_xinclude <= 0)
1370#endif
1371	    ) {
1372	    reader->state = XML_TEXTREADER_END;
1373	    goto node_found;
1374	}
1375#ifdef LIBXML_REGEXP_ENABLED
1376	if ((reader->validate) &&
1377	    (reader->node->type == XML_ELEMENT_NODE))
1378	    xmlTextReaderValidatePop(reader);
1379#endif /* LIBXML_REGEXP_ENABLED */
1380        if ((reader->preserves > 0) &&
1381	    (reader->node->extra & NODE_IS_SPRESERVED))
1382	    reader->preserves--;
1383	reader->node = reader->node->next;
1384	reader->state = XML_TEXTREADER_ELEMENT;
1385
1386	/*
1387	 * Cleanup of the old node
1388	 */
1389	if ((reader->preserves == 0) &&
1390#ifdef LIBXML_XINCLUDE_ENABLED
1391	    (reader->in_xinclude == 0) &&
1392#endif
1393	    (reader->entNr == 0) &&
1394	    (reader->node->prev != NULL) &&
1395            (reader->node->prev->type != XML_DTD_NODE) &&
1396	    (reader->entNr == 0)) {
1397	    xmlNodePtr tmp = reader->node->prev;
1398	    if ((tmp->extra & NODE_IS_PRESERVED) == 0) {
1399		xmlUnlinkNode(tmp);
1400		xmlTextReaderFreeNode(reader, tmp);
1401	    }
1402	}
1403
1404	goto node_found;
1405    }
1406    if ((oldstate == XML_TEXTREADER_ELEMENT) &&
1407	(reader->node->type == XML_ELEMENT_NODE) &&
1408	(reader->node->children == NULL) &&
1409	((reader->node->extra & NODE_IS_EMPTY) == 0)) {;
1410	reader->state = XML_TEXTREADER_END;
1411	goto node_found;
1412    }
1413#ifdef LIBXML_REGEXP_ENABLED
1414    if ((reader->validate) && (reader->node->type == XML_ELEMENT_NODE))
1415	xmlTextReaderValidatePop(reader);
1416#endif /* LIBXML_REGEXP_ENABLED */
1417    if ((reader->preserves > 0) &&
1418	(reader->node->extra & NODE_IS_SPRESERVED))
1419	reader->preserves--;
1420    reader->node = reader->node->parent;
1421    if ((reader->node == NULL) ||
1422	(reader->node->type == XML_DOCUMENT_NODE) ||
1423#ifdef LIBXML_DOCB_ENABLED
1424	(reader->node->type == XML_DOCB_DOCUMENT_NODE) ||
1425#endif
1426	(reader->node->type == XML_HTML_DOCUMENT_NODE)) {
1427	if (reader->mode != XML_TEXTREADER_MODE_EOF) {
1428	    val = xmlParseChunk(reader->ctxt, "", 0, 1);
1429	    reader->state = XML_TEXTREADER_DONE;
1430	    if (val != 0)
1431	        return(-1);
1432	}
1433	reader->node = NULL;
1434	reader->depth = -1;
1435
1436	/*
1437	 * Cleanup of the old node
1438	 */
1439	if ((oldnode != NULL) && (reader->preserves == 0) &&
1440#ifdef LIBXML_XINCLUDE_ENABLED
1441	    (reader->in_xinclude == 0) &&
1442#endif
1443	    (reader->entNr == 0) &&
1444	    (oldnode->type != XML_DTD_NODE) &&
1445	    ((oldnode->extra & NODE_IS_PRESERVED) == 0) &&
1446	    (reader->entNr == 0)) {
1447	    xmlUnlinkNode(oldnode);
1448	    xmlTextReaderFreeNode(reader, oldnode);
1449	}
1450
1451	goto node_end;
1452    }
1453    if ((reader->preserves == 0) &&
1454#ifdef LIBXML_XINCLUDE_ENABLED
1455        (reader->in_xinclude == 0) &&
1456#endif
1457	(reader->entNr == 0) &&
1458        (reader->node->last != NULL) &&
1459        ((reader->node->last->extra & NODE_IS_PRESERVED) == 0)) {
1460	xmlNodePtr tmp = reader->node->last;
1461	xmlUnlinkNode(tmp);
1462	xmlTextReaderFreeNode(reader, tmp);
1463    }
1464    reader->depth--;
1465    reader->state = XML_TEXTREADER_BACKTRACK;
1466
1467node_found:
1468    DUMP_READER
1469
1470    /*
1471     * If we are in the middle of a piece of CDATA make sure it's finished
1472     */
1473    if ((reader->node != NULL) &&
1474        (reader->node->next == NULL) &&
1475        ((reader->node->type == XML_TEXT_NODE) ||
1476	 (reader->node->type == XML_CDATA_SECTION_NODE))) {
1477            if (xmlTextReaderExpand(reader) == NULL)
1478	        return -1;
1479    }
1480
1481#ifdef LIBXML_XINCLUDE_ENABLED
1482    /*
1483     * Handle XInclude if asked for
1484     */
1485    if ((reader->xinclude) && (reader->node != NULL) &&
1486	(reader->node->type == XML_ELEMENT_NODE) &&
1487	(reader->node->ns != NULL) &&
1488	((xmlStrEqual(reader->node->ns->href, XINCLUDE_NS)) ||
1489	 (xmlStrEqual(reader->node->ns->href, XINCLUDE_OLD_NS)))) {
1490	if (reader->xincctxt == NULL) {
1491	    reader->xincctxt = xmlXIncludeNewContext(reader->ctxt->myDoc);
1492	    xmlXIncludeSetFlags(reader->xincctxt,
1493	                        reader->parserFlags & (~XML_PARSE_NOXINCNODE));
1494	}
1495	/*
1496	 * expand that node and process it
1497	 */
1498	if (xmlTextReaderExpand(reader) == NULL)
1499	    return -1;
1500	xmlXIncludeProcessNode(reader->xincctxt, reader->node);
1501    }
1502    if ((reader->node != NULL) && (reader->node->type == XML_XINCLUDE_START)) {
1503        reader->in_xinclude++;
1504	goto get_next_node;
1505    }
1506    if ((reader->node != NULL) && (reader->node->type == XML_XINCLUDE_END)) {
1507        reader->in_xinclude--;
1508	goto get_next_node;
1509    }
1510#endif
1511    /*
1512     * Handle entities enter and exit when in entity replacement mode
1513     */
1514    if ((reader->node != NULL) &&
1515	(reader->node->type == XML_ENTITY_REF_NODE) &&
1516	(reader->ctxt != NULL) && (reader->ctxt->replaceEntities == 1)) {
1517	/*
1518	 * Case where the underlying tree is not availble, lookup the entity
1519	 * and walk it.
1520	 */
1521	if ((reader->node->children == NULL) && (reader->ctxt->sax != NULL) &&
1522	    (reader->ctxt->sax->getEntity != NULL)) {
1523	    reader->node->children = (xmlNodePtr)
1524		reader->ctxt->sax->getEntity(reader->ctxt, reader->node->name);
1525	}
1526
1527	if ((reader->node->children != NULL) &&
1528	    (reader->node->children->type == XML_ENTITY_DECL) &&
1529	    (reader->node->children->children != NULL)) {
1530	    xmlTextReaderEntPush(reader, reader->node);
1531	    reader->node = reader->node->children->children;
1532	}
1533#ifdef LIBXML_REGEXP_ENABLED
1534    } else if ((reader->node != NULL) &&
1535	       (reader->node->type == XML_ENTITY_REF_NODE) &&
1536	       (reader->ctxt != NULL) && (reader->validate)) {
1537	xmlTextReaderValidateEntity(reader);
1538#endif /* LIBXML_REGEXP_ENABLED */
1539    }
1540    if ((reader->node != NULL) &&
1541	(reader->node->type == XML_ENTITY_DECL) &&
1542	(reader->ent != NULL) && (reader->ent->children == reader->node)) {
1543	reader->node = xmlTextReaderEntPop(reader);
1544	reader->depth++;
1545        goto get_next_node;
1546    }
1547#ifdef LIBXML_REGEXP_ENABLED
1548    if ((reader->validate) && (reader->node != NULL)) {
1549	xmlNodePtr node = reader->node;
1550
1551	if ((node->type == XML_ELEMENT_NODE) &&
1552            ((reader->state != XML_TEXTREADER_END) &&
1553	     (reader->state != XML_TEXTREADER_BACKTRACK))) {
1554	    xmlTextReaderValidatePush(reader);
1555	} else if ((node->type == XML_TEXT_NODE) ||
1556		   (node->type == XML_CDATA_SECTION_NODE)) {
1557            xmlTextReaderValidateCData(reader, node->content,
1558	                               xmlStrlen(node->content));
1559	}
1560    }
1561#endif /* LIBXML_REGEXP_ENABLED */
1562#ifdef LIBXML_PATTERN_ENABLED
1563    if ((reader->patternNr > 0) && (reader->state != XML_TEXTREADER_END) &&
1564        (reader->state != XML_TEXTREADER_BACKTRACK)) {
1565        int i;
1566	for (i = 0;i < reader->patternNr;i++) {
1567	     if (xmlPatternMatch(reader->patternTab[i], reader->node) == 1) {
1568	         xmlTextReaderPreserve(reader);
1569		 break;
1570             }
1571	}
1572    }
1573#endif /* LIBXML_PATTERN_ENABLED */
1574#ifdef LIBXML_SCHEMAS_ENABLED
1575    if ((reader->validate == XML_TEXTREADER_VALIDATE_XSD) &&
1576        (reader->xsdValidErrors == 0) &&
1577	(reader->xsdValidCtxt != NULL)) {
1578	reader->xsdValidErrors = !xmlSchemaIsValid(reader->xsdValidCtxt);
1579    }
1580#endif /* LIBXML_PATTERN_ENABLED */
1581    return(1);
1582node_end:
1583    reader->state = XML_TEXTREADER_DONE;
1584    return(0);
1585}
1586
1587/**
1588 * xmlTextReaderReadState:
1589 * @reader:  the xmlTextReaderPtr used
1590 *
1591 * Gets the read state of the reader.
1592 *
1593 * Returns the state value, or -1 in case of error
1594 */
1595int
1596xmlTextReaderReadState(xmlTextReaderPtr reader) {
1597    if (reader == NULL)
1598	return(-1);
1599    return(reader->mode);
1600}
1601
1602/**
1603 * xmlTextReaderExpand:
1604 * @reader:  the xmlTextReaderPtr used
1605 *
1606 * Reads the contents of the current node and the full subtree. It then makes
1607 * the subtree available until the next xmlTextReaderRead() call
1608 *
1609 * Returns a node pointer valid until the next xmlTextReaderRead() call
1610 *         or NULL in case of error.
1611 */
1612xmlNodePtr
1613xmlTextReaderExpand(xmlTextReaderPtr reader) {
1614    if ((reader == NULL) || (reader->node == NULL))
1615        return(NULL);
1616    if (reader->doc != NULL)
1617        return(reader->node);
1618    if (reader->ctxt == NULL)
1619        return(NULL);
1620    if (xmlTextReaderDoExpand(reader) < 0)
1621        return(NULL);
1622    return(reader->node);
1623}
1624
1625/**
1626 * xmlTextReaderNext:
1627 * @reader:  the xmlTextReaderPtr used
1628 *
1629 * Skip to the node following the current one in document order while
1630 * avoiding the subtree if any.
1631 *
1632 * Returns 1 if the node was read successfully, 0 if there is no more
1633 *          nodes to read, or -1 in case of error
1634 */
1635int
1636xmlTextReaderNext(xmlTextReaderPtr reader) {
1637    int ret;
1638    xmlNodePtr cur;
1639
1640    if (reader == NULL)
1641	return(-1);
1642    if (reader->doc != NULL)
1643        return(xmlTextReaderNextTree(reader));
1644    cur = reader->node;
1645    if ((cur == NULL) || (cur->type != XML_ELEMENT_NODE))
1646        return(xmlTextReaderRead(reader));
1647    if (reader->state == XML_TEXTREADER_END || reader->state == XML_TEXTREADER_BACKTRACK)
1648        return(xmlTextReaderRead(reader));
1649    if (cur->extra & NODE_IS_EMPTY)
1650        return(xmlTextReaderRead(reader));
1651    do {
1652        ret = xmlTextReaderRead(reader);
1653	if (ret != 1)
1654	    return(ret);
1655    } while (reader->node != cur);
1656    return(xmlTextReaderRead(reader));
1657}
1658
1659#ifdef LIBXML_WRITER_ENABLED
1660/**
1661 * xmlTextReaderReadInnerXml:
1662 * @reader:  the xmlTextReaderPtr used
1663 *
1664 * Reads the contents of the current node, including child nodes and markup.
1665 *
1666 * Returns a string containing the XML content, or NULL if the current node
1667 *         is neither an element nor attribute, or has no child nodes. The
1668 *         string must be deallocated by the caller.
1669 */
1670xmlChar *
1671xmlTextReaderReadInnerXml(xmlTextReaderPtr reader ATTRIBUTE_UNUSED)
1672{
1673    xmlChar *resbuf;
1674    xmlNodePtr node, cur_node;
1675    xmlBufferPtr buff, buff2;
1676    xmlDocPtr doc;
1677
1678    if (xmlTextReaderExpand(reader) == NULL) {
1679        return NULL;
1680    }
1681    doc = reader->doc;
1682    buff = xmlBufferCreate();
1683    for (cur_node = reader->node->children; cur_node != NULL;
1684         cur_node = cur_node->next) {
1685        node = xmlDocCopyNode(cur_node, doc, 1);
1686        buff2 = xmlBufferCreate();
1687        if (xmlNodeDump(buff2, doc, node, 0, 0) == -1) {
1688            xmlFreeNode(node);
1689            xmlBufferFree(buff2);
1690            xmlBufferFree(buff);
1691            return NULL;
1692        }
1693        xmlBufferCat(buff, buff2->content);
1694        xmlFreeNode(node);
1695        xmlBufferFree(buff2);
1696    }
1697    resbuf = buff->content;
1698    buff->content = NULL;
1699
1700    xmlBufferFree(buff);
1701    return resbuf;
1702}
1703#endif
1704
1705#ifdef LIBXML_WRITER_ENABLED
1706/**
1707 * xmlTextReaderReadOuterXml:
1708 * @reader:  the xmlTextReaderPtr used
1709 *
1710 * Reads the contents of the current node, including child nodes and markup.
1711 *
1712 * Returns a string containing the node and any XML content, or NULL if the
1713 *         current node cannot be serialized. The string must be deallocated
1714 *         by the caller.
1715 */
1716xmlChar *
1717xmlTextReaderReadOuterXml(xmlTextReaderPtr reader ATTRIBUTE_UNUSED)
1718{
1719    xmlChar *resbuf;
1720    xmlNodePtr node;
1721    xmlBufferPtr buff;
1722    xmlDocPtr doc;
1723
1724    node = reader->node;
1725    doc = reader->doc;
1726    if (xmlTextReaderExpand(reader) == NULL) {
1727        return NULL;
1728    }
1729	if (node->type == XML_DTD_NODE) {
1730		node = (xmlNodePtr) xmlCopyDtd((xmlDtdPtr) node);
1731	} else {
1732		node = xmlDocCopyNode(node, doc, 1);
1733	}
1734    buff = xmlBufferCreate();
1735    if (xmlNodeDump(buff, doc, node, 0, 0) == -1) {
1736        xmlFreeNode(node);
1737        xmlBufferFree(buff);
1738        return NULL;
1739    }
1740
1741    resbuf = buff->content;
1742    buff->content = NULL;
1743
1744    xmlFreeNode(node);
1745    xmlBufferFree(buff);
1746    return resbuf;
1747}
1748#endif
1749
1750/**
1751 * xmlTextReaderReadString:
1752 * @reader:  the xmlTextReaderPtr used
1753 *
1754 * Reads the contents of an element or a text node as a string.
1755 *
1756 * Returns a string containing the contents of the Element or Text node,
1757 *         or NULL if the reader is positioned on any other type of node.
1758 *         The string must be deallocated by the caller.
1759 */
1760xmlChar *
1761xmlTextReaderReadString(xmlTextReaderPtr reader)
1762{
1763    xmlNodePtr node;
1764
1765    if ((reader == NULL) || (reader->node == NULL))
1766       return(NULL);
1767
1768    node = (reader->curnode != NULL) ? reader->curnode : reader->node;
1769    switch (node->type) {
1770    case XML_TEXT_NODE:
1771       if (node->content != NULL)
1772           return(xmlStrdup(node->content));
1773       break;
1774    case XML_ELEMENT_NODE:
1775	if (xmlTextReaderDoExpand(reader) != -1) {
1776	    return xmlTextReaderCollectSiblings(node->children);
1777	}
1778    case XML_ATTRIBUTE_NODE:
1779	TODO
1780	break;
1781    default:
1782       break;
1783    }
1784    return(NULL);
1785}
1786
1787#if 0
1788/**
1789 * xmlTextReaderReadBase64:
1790 * @reader:  the xmlTextReaderPtr used
1791 * @array:  a byte array to store the content.
1792 * @offset:  the zero-based index into array where the method should
1793 *           begin to write.
1794 * @len:  the number of bytes to write.
1795 *
1796 * Reads and decodes the Base64 encoded contents of an element and
1797 * stores the result in a byte buffer.
1798 *
1799 * Returns the number of bytes written to array, or zero if the current
1800 *         instance is not positioned on an element or -1 in case of error.
1801 */
1802int
1803xmlTextReaderReadBase64(xmlTextReaderPtr reader,
1804                        unsigned char *array ATTRIBUTE_UNUSED,
1805	                int offset ATTRIBUTE_UNUSED,
1806			int len ATTRIBUTE_UNUSED) {
1807    if ((reader == NULL) || (reader->ctxt == NULL))
1808	return(-1);
1809    if (reader->ctxt->wellFormed != 1)
1810	return(-1);
1811
1812    if ((reader->node == NULL) || (reader->node->type == XML_ELEMENT_NODE))
1813	return(0);
1814    TODO
1815    return(0);
1816}
1817
1818/**
1819 * xmlTextReaderReadBinHex:
1820 * @reader:  the xmlTextReaderPtr used
1821 * @array:  a byte array to store the content.
1822 * @offset:  the zero-based index into array where the method should
1823 *           begin to write.
1824 * @len:  the number of bytes to write.
1825 *
1826 * Reads and decodes the BinHex encoded contents of an element and
1827 * stores the result in a byte buffer.
1828 *
1829 * Returns the number of bytes written to array, or zero if the current
1830 *         instance is not positioned on an element or -1 in case of error.
1831 */
1832int
1833xmlTextReaderReadBinHex(xmlTextReaderPtr reader,
1834                        unsigned char *array ATTRIBUTE_UNUSED,
1835	                int offset ATTRIBUTE_UNUSED,
1836			int len ATTRIBUTE_UNUSED) {
1837    if ((reader == NULL) || (reader->ctxt == NULL))
1838	return(-1);
1839    if (reader->ctxt->wellFormed != 1)
1840	return(-1);
1841
1842    if ((reader->node == NULL) || (reader->node->type == XML_ELEMENT_NODE))
1843	return(0);
1844    TODO
1845    return(0);
1846}
1847#endif
1848
1849/************************************************************************
1850 *									*
1851 *			Operating on a preparsed tree			*
1852 *									*
1853 ************************************************************************/
1854static int
1855xmlTextReaderNextTree(xmlTextReaderPtr reader)
1856{
1857    if (reader == NULL)
1858        return(-1);
1859
1860    if (reader->state == XML_TEXTREADER_END)
1861        return(0);
1862
1863    if (reader->node == NULL) {
1864        if (reader->doc->children == NULL) {
1865            reader->state = XML_TEXTREADER_END;
1866            return(0);
1867        }
1868
1869        reader->node = reader->doc->children;
1870        reader->state = XML_TEXTREADER_START;
1871        return(1);
1872    }
1873
1874    if (reader->state != XML_TEXTREADER_BACKTRACK) {
1875	/* Here removed traversal to child, because we want to skip the subtree,
1876	replace with traversal to sibling to skip subtree */
1877        if (reader->node->next != 0) {
1878	    /* Move to sibling if present,skipping sub-tree */
1879            reader->node = reader->node->next;
1880            reader->state = XML_TEXTREADER_START;
1881            return(1);
1882        }
1883
1884	/* if reader->node->next is NULL mean no subtree for current node,
1885	so need to move to sibling of parent node if present */
1886        if ((reader->node->type == XML_ELEMENT_NODE) ||
1887            (reader->node->type == XML_ATTRIBUTE_NODE)) {
1888            reader->state = XML_TEXTREADER_BACKTRACK;
1889	    /* This will move to parent if present */
1890            xmlTextReaderRead(reader);
1891        }
1892    }
1893
1894    if (reader->node->next != 0) {
1895        reader->node = reader->node->next;
1896        reader->state = XML_TEXTREADER_START;
1897        return(1);
1898    }
1899
1900    if (reader->node->parent != 0) {
1901        if (reader->node->parent->type == XML_DOCUMENT_NODE) {
1902            reader->state = XML_TEXTREADER_END;
1903            return(0);
1904        }
1905
1906        reader->node = reader->node->parent;
1907        reader->depth--;
1908        reader->state = XML_TEXTREADER_BACKTRACK;
1909	/* Repeat process to move to sibling of parent node if present */
1910        xmlTextReaderNextTree(reader);
1911    }
1912
1913    reader->state = XML_TEXTREADER_END;
1914
1915    return(1);
1916}
1917
1918/**
1919 * xmlTextReaderReadTree:
1920 * @reader:  the xmlTextReaderPtr used
1921 *
1922 *  Moves the position of the current instance to the next node in
1923 *  the stream, exposing its properties.
1924 *
1925 *  Returns 1 if the node was read successfully, 0 if there is no more
1926 *          nodes to read, or -1 in case of error
1927 */
1928static int
1929xmlTextReaderReadTree(xmlTextReaderPtr reader) {
1930    if (reader->state == XML_TEXTREADER_END)
1931        return(0);
1932
1933next_node:
1934    if (reader->node == NULL) {
1935        if (reader->doc->children == NULL) {
1936            reader->state = XML_TEXTREADER_END;
1937            return(0);
1938        }
1939
1940        reader->node = reader->doc->children;
1941        reader->state = XML_TEXTREADER_START;
1942        goto found_node;
1943    }
1944
1945    if ((reader->state != XML_TEXTREADER_BACKTRACK) &&
1946        (reader->node->type != XML_DTD_NODE) &&
1947        (reader->node->type != XML_XINCLUDE_START) &&
1948	(reader->node->type != XML_ENTITY_REF_NODE)) {
1949        if (reader->node->children != NULL) {
1950            reader->node = reader->node->children;
1951            reader->depth++;
1952            reader->state = XML_TEXTREADER_START;
1953            goto found_node;
1954        }
1955
1956        if (reader->node->type == XML_ATTRIBUTE_NODE) {
1957            reader->state = XML_TEXTREADER_BACKTRACK;
1958            goto found_node;
1959        }
1960    }
1961
1962    if (reader->node->next != NULL) {
1963        reader->node = reader->node->next;
1964        reader->state = XML_TEXTREADER_START;
1965        goto found_node;
1966    }
1967
1968    if (reader->node->parent != NULL) {
1969        if ((reader->node->parent->type == XML_DOCUMENT_NODE) ||
1970	    (reader->node->parent->type == XML_HTML_DOCUMENT_NODE)) {
1971            reader->state = XML_TEXTREADER_END;
1972            return(0);
1973        }
1974
1975        reader->node = reader->node->parent;
1976        reader->depth--;
1977        reader->state = XML_TEXTREADER_BACKTRACK;
1978        goto found_node;
1979    }
1980
1981    reader->state = XML_TEXTREADER_END;
1982
1983found_node:
1984    if ((reader->node->type == XML_XINCLUDE_START) ||
1985        (reader->node->type == XML_XINCLUDE_END))
1986	goto next_node;
1987
1988    return(1);
1989}
1990
1991/**
1992 * xmlTextReaderNextSibling:
1993 * @reader:  the xmlTextReaderPtr used
1994 *
1995 * Skip to the node following the current one in document order while
1996 * avoiding the subtree if any.
1997 * Currently implemented only for Readers built on a document
1998 *
1999 * Returns 1 if the node was read successfully, 0 if there is no more
2000 *          nodes to read, or -1 in case of error
2001 */
2002int
2003xmlTextReaderNextSibling(xmlTextReaderPtr reader) {
2004    if (reader == NULL)
2005        return(-1);
2006    if (reader->doc == NULL) {
2007        /* TODO */
2008	return(-1);
2009    }
2010
2011    if (reader->state == XML_TEXTREADER_END)
2012        return(0);
2013
2014    if (reader->node == NULL)
2015        return(xmlTextReaderNextTree(reader));
2016
2017    if (reader->node->next != NULL) {
2018        reader->node = reader->node->next;
2019        reader->state = XML_TEXTREADER_START;
2020        return(1);
2021    }
2022
2023    return(0);
2024}
2025
2026/************************************************************************
2027 *									*
2028 *			Constructor and destructors			*
2029 *									*
2030 ************************************************************************/
2031/**
2032 * xmlNewTextReader:
2033 * @input: the xmlParserInputBufferPtr used to read data
2034 * @URI: the URI information for the source if available
2035 *
2036 * Create an xmlTextReader structure fed with @input
2037 *
2038 * Returns the new xmlTextReaderPtr or NULL in case of error
2039 */
2040xmlTextReaderPtr
2041xmlNewTextReader(xmlParserInputBufferPtr input, const char *URI) {
2042    xmlTextReaderPtr ret;
2043
2044    if (input == NULL)
2045	return(NULL);
2046    ret = xmlMalloc(sizeof(xmlTextReader));
2047    if (ret == NULL) {
2048        xmlGenericError(xmlGenericErrorContext,
2049		"xmlNewTextReader : malloc failed\n");
2050	return(NULL);
2051    }
2052    memset(ret, 0, sizeof(xmlTextReader));
2053    ret->doc = NULL;
2054    ret->entTab = NULL;
2055    ret->entMax = 0;
2056    ret->entNr = 0;
2057    ret->input = input;
2058    ret->buffer = xmlBufferCreateSize(100);
2059    if (ret->buffer == NULL) {
2060        xmlFree(ret);
2061        xmlGenericError(xmlGenericErrorContext,
2062		"xmlNewTextReader : malloc failed\n");
2063	return(NULL);
2064    }
2065    ret->sax = (xmlSAXHandler *) xmlMalloc(sizeof(xmlSAXHandler));
2066    if (ret->sax == NULL) {
2067	xmlBufferFree(ret->buffer);
2068	xmlFree(ret);
2069        xmlGenericError(xmlGenericErrorContext,
2070		"xmlNewTextReader : malloc failed\n");
2071	return(NULL);
2072    }
2073    xmlSAXVersion(ret->sax, 2);
2074    ret->startElement = ret->sax->startElement;
2075    ret->sax->startElement = xmlTextReaderStartElement;
2076    ret->endElement = ret->sax->endElement;
2077    ret->sax->endElement = xmlTextReaderEndElement;
2078#ifdef LIBXML_SAX1_ENABLED
2079    if (ret->sax->initialized == XML_SAX2_MAGIC) {
2080#endif /* LIBXML_SAX1_ENABLED */
2081	ret->startElementNs = ret->sax->startElementNs;
2082	ret->sax->startElementNs = xmlTextReaderStartElementNs;
2083	ret->endElementNs = ret->sax->endElementNs;
2084	ret->sax->endElementNs = xmlTextReaderEndElementNs;
2085#ifdef LIBXML_SAX1_ENABLED
2086    } else {
2087	ret->startElementNs = NULL;
2088	ret->endElementNs = NULL;
2089    }
2090#endif /* LIBXML_SAX1_ENABLED */
2091    ret->characters = ret->sax->characters;
2092    ret->sax->characters = xmlTextReaderCharacters;
2093    ret->sax->ignorableWhitespace = xmlTextReaderCharacters;
2094    ret->cdataBlock = ret->sax->cdataBlock;
2095    ret->sax->cdataBlock = xmlTextReaderCDataBlock;
2096
2097    ret->mode = XML_TEXTREADER_MODE_INITIAL;
2098    ret->node = NULL;
2099    ret->curnode = NULL;
2100    if (ret->input->buffer->use < 4) {
2101	xmlParserInputBufferRead(input, 4);
2102    }
2103    if (ret->input->buffer->use >= 4) {
2104	ret->ctxt = xmlCreatePushParserCtxt(ret->sax, NULL,
2105			(const char *) ret->input->buffer->content, 4, URI);
2106	ret->base = 0;
2107	ret->cur = 4;
2108    } else {
2109	ret->ctxt = xmlCreatePushParserCtxt(ret->sax, NULL, NULL, 0, URI);
2110	ret->base = 0;
2111	ret->cur = 0;
2112    }
2113
2114    if (ret->ctxt == NULL) {
2115        xmlGenericError(xmlGenericErrorContext,
2116		"xmlNewTextReader : malloc failed\n");
2117	xmlBufferFree(ret->buffer);
2118	xmlFree(ret->sax);
2119	xmlFree(ret);
2120	return(NULL);
2121    }
2122    ret->ctxt->parseMode = XML_PARSE_READER;
2123    ret->ctxt->_private = ret;
2124    ret->ctxt->linenumbers = 1;
2125    ret->ctxt->dictNames = 1;
2126    ret->allocs = XML_TEXTREADER_CTXT;
2127    /*
2128     * use the parser dictionnary to allocate all elements and attributes names
2129     */
2130    ret->ctxt->docdict = 1;
2131    ret->dict = ret->ctxt->dict;
2132#ifdef LIBXML_XINCLUDE_ENABLED
2133    ret->xinclude = 0;
2134#endif
2135#ifdef LIBXML_PATTERN_ENABLED
2136    ret->patternMax = 0;
2137    ret->patternTab = NULL;
2138#endif
2139    return(ret);
2140}
2141
2142/**
2143 * xmlNewTextReaderFilename:
2144 * @URI: the URI of the resource to process
2145 *
2146 * Create an xmlTextReader structure fed with the resource at @URI
2147 *
2148 * Returns the new xmlTextReaderPtr or NULL in case of error
2149 */
2150xmlTextReaderPtr
2151xmlNewTextReaderFilename(const char *URI) {
2152    xmlParserInputBufferPtr input;
2153    xmlTextReaderPtr ret;
2154    char *directory = NULL;
2155
2156    input = xmlParserInputBufferCreateFilename(URI, XML_CHAR_ENCODING_NONE);
2157    if (input == NULL)
2158	return(NULL);
2159    ret = xmlNewTextReader(input, URI);
2160    if (ret == NULL) {
2161	xmlFreeParserInputBuffer(input);
2162	return(NULL);
2163    }
2164    ret->allocs |= XML_TEXTREADER_INPUT;
2165    if (ret->ctxt->directory == NULL)
2166        directory = xmlParserGetDirectory(URI);
2167    if ((ret->ctxt->directory == NULL) && (directory != NULL))
2168        ret->ctxt->directory = (char *) xmlStrdup((xmlChar *) directory);
2169    if (directory != NULL)
2170	xmlFree(directory);
2171    return(ret);
2172}
2173
2174/**
2175 * xmlFreeTextReader:
2176 * @reader:  the xmlTextReaderPtr
2177 *
2178 * Deallocate all the resources associated to the reader
2179 */
2180void
2181xmlFreeTextReader(xmlTextReaderPtr reader) {
2182    if (reader == NULL)
2183	return;
2184#ifdef LIBXML_SCHEMAS_ENABLED
2185    if (reader->rngSchemas != NULL) {
2186	xmlRelaxNGFree(reader->rngSchemas);
2187	reader->rngSchemas = NULL;
2188    }
2189    if (reader->rngValidCtxt != NULL) {
2190	xmlRelaxNGFreeValidCtxt(reader->rngValidCtxt);
2191	reader->rngValidCtxt = NULL;
2192    }
2193    if (reader->xsdPlug != NULL) {
2194	xmlSchemaSAXUnplug(reader->xsdPlug);
2195	reader->xsdPlug = NULL;
2196    }
2197    if (reader->xsdValidCtxt != NULL) {
2198	if (! reader->xsdPreserveCtxt)
2199	    xmlSchemaFreeValidCtxt(reader->xsdValidCtxt);
2200	reader->xsdValidCtxt = NULL;
2201    }
2202    if (reader->xsdSchemas != NULL) {
2203	xmlSchemaFree(reader->xsdSchemas);
2204	reader->xsdSchemas = NULL;
2205    }
2206#endif
2207#ifdef LIBXML_XINCLUDE_ENABLED
2208    if (reader->xincctxt != NULL)
2209	xmlXIncludeFreeContext(reader->xincctxt);
2210#endif
2211#ifdef LIBXML_PATTERN_ENABLED
2212    if (reader->patternTab != NULL) {
2213        int i;
2214	for (i = 0;i < reader->patternNr;i++) {
2215	    if (reader->patternTab[i] != NULL)
2216	        xmlFreePattern(reader->patternTab[i]);
2217	}
2218	xmlFree(reader->patternTab);
2219    }
2220#endif
2221    if (reader->faketext != NULL) {
2222	xmlFreeNode(reader->faketext);
2223    }
2224    if (reader->ctxt != NULL) {
2225        if (reader->dict == reader->ctxt->dict)
2226	    reader->dict = NULL;
2227	if (reader->ctxt->myDoc != NULL) {
2228	    if (reader->preserve == 0)
2229		xmlTextReaderFreeDoc(reader, reader->ctxt->myDoc);
2230	    reader->ctxt->myDoc = NULL;
2231	}
2232	if ((reader->ctxt->vctxt.vstateTab != NULL) &&
2233	    (reader->ctxt->vctxt.vstateMax > 0)){
2234	    xmlFree(reader->ctxt->vctxt.vstateTab);
2235	    reader->ctxt->vctxt.vstateTab = NULL;
2236	    reader->ctxt->vctxt.vstateMax = 0;
2237	}
2238	if (reader->allocs & XML_TEXTREADER_CTXT)
2239	    xmlFreeParserCtxt(reader->ctxt);
2240    }
2241    if (reader->sax != NULL)
2242	xmlFree(reader->sax);
2243    if ((reader->input != NULL)  && (reader->allocs & XML_TEXTREADER_INPUT))
2244	xmlFreeParserInputBuffer(reader->input);
2245    if (reader->buffer != NULL)
2246        xmlBufferFree(reader->buffer);
2247    if (reader->entTab != NULL)
2248	xmlFree(reader->entTab);
2249    if (reader->dict != NULL)
2250        xmlDictFree(reader->dict);
2251    xmlFree(reader);
2252}
2253
2254/************************************************************************
2255 *									*
2256 *			Methods for XmlTextReader			*
2257 *									*
2258 ************************************************************************/
2259/**
2260 * xmlTextReaderClose:
2261 * @reader:  the xmlTextReaderPtr used
2262 *
2263 * This method releases any resources allocated by the current instance
2264 * changes the state to Closed and close any underlying input.
2265 *
2266 * Returns 0 or -1 in case of error
2267 */
2268int
2269xmlTextReaderClose(xmlTextReaderPtr reader) {
2270    if (reader == NULL)
2271	return(-1);
2272    reader->node = NULL;
2273    reader->curnode = NULL;
2274    reader->mode = XML_TEXTREADER_MODE_CLOSED;
2275    if (reader->ctxt != NULL) {
2276	xmlStopParser(reader->ctxt);
2277	if (reader->ctxt->myDoc != NULL) {
2278	    if (reader->preserve == 0)
2279		xmlTextReaderFreeDoc(reader, reader->ctxt->myDoc);
2280	    reader->ctxt->myDoc = NULL;
2281	}
2282    }
2283    if ((reader->input != NULL)  && (reader->allocs & XML_TEXTREADER_INPUT)) {
2284	xmlFreeParserInputBuffer(reader->input);
2285	reader->allocs -= XML_TEXTREADER_INPUT;
2286    }
2287    return(0);
2288}
2289
2290/**
2291 * xmlTextReaderGetAttributeNo:
2292 * @reader:  the xmlTextReaderPtr used
2293 * @no: the zero-based index of the attribute relative to the containing element
2294 *
2295 * Provides the value of the attribute with the specified index relative
2296 * to the containing element.
2297 *
2298 * Returns a string containing the value of the specified attribute, or NULL
2299 *    in case of error. The string must be deallocated by the caller.
2300 */
2301xmlChar *
2302xmlTextReaderGetAttributeNo(xmlTextReaderPtr reader, int no) {
2303    xmlChar *ret;
2304    int i;
2305    xmlAttrPtr cur;
2306    xmlNsPtr ns;
2307
2308    if (reader == NULL)
2309	return(NULL);
2310    if (reader->node == NULL)
2311	return(NULL);
2312    if (reader->curnode != NULL)
2313	return(NULL);
2314    /* TODO: handle the xmlDecl */
2315    if (reader->node->type != XML_ELEMENT_NODE)
2316	return(NULL);
2317
2318    ns = reader->node->nsDef;
2319    for (i = 0;(i < no) && (ns != NULL);i++) {
2320	ns = ns->next;
2321    }
2322    if (ns != NULL)
2323	return(xmlStrdup(ns->href));
2324
2325    cur = reader->node->properties;
2326    if (cur == NULL)
2327	return(NULL);
2328    for (;i < no;i++) {
2329	cur = cur->next;
2330	if (cur == NULL)
2331	    return(NULL);
2332    }
2333    /* TODO walk the DTD if present */
2334
2335    ret = xmlNodeListGetString(reader->node->doc, cur->children, 1);
2336    if (ret == NULL) return(xmlStrdup((xmlChar *)""));
2337    return(ret);
2338}
2339
2340/**
2341 * xmlTextReaderGetAttribute:
2342 * @reader:  the xmlTextReaderPtr used
2343 * @name: the qualified name of the attribute.
2344 *
2345 * Provides the value of the attribute with the specified qualified name.
2346 *
2347 * Returns a string containing the value of the specified attribute, or NULL
2348 *    in case of error. The string must be deallocated by the caller.
2349 */
2350xmlChar *
2351xmlTextReaderGetAttribute(xmlTextReaderPtr reader, const xmlChar *name) {
2352    xmlChar *prefix = NULL;
2353    xmlChar *localname;
2354    xmlNsPtr ns;
2355    xmlChar *ret = NULL;
2356
2357    if ((reader == NULL) || (name == NULL))
2358	return(NULL);
2359    if (reader->node == NULL)
2360	return(NULL);
2361    if (reader->curnode != NULL)
2362	return(NULL);
2363
2364    /* TODO: handle the xmlDecl */
2365    if (reader->node->type != XML_ELEMENT_NODE)
2366	return(NULL);
2367
2368    localname = xmlSplitQName2(name, &prefix);
2369    if (localname == NULL) {
2370		/*
2371		 * Namespace default decl
2372		 */
2373		if (xmlStrEqual(name, BAD_CAST "xmlns")) {
2374			ns = reader->node->nsDef;
2375			while (ns != NULL) {
2376				if (ns->prefix == NULL) {
2377					return(xmlStrdup(ns->href));
2378				}
2379				ns = ns->next;
2380			}
2381			return NULL;
2382		}
2383		return(xmlGetNoNsProp(reader->node, name));
2384	}
2385
2386    /*
2387     * Namespace default decl
2388     */
2389    if (xmlStrEqual(prefix, BAD_CAST "xmlns")) {
2390		ns = reader->node->nsDef;
2391		while (ns != NULL) {
2392			if ((ns->prefix != NULL) && (xmlStrEqual(ns->prefix, localname))) {
2393				ret = xmlStrdup(ns->href);
2394				break;
2395			}
2396			ns = ns->next;
2397		}
2398    } else {
2399		ns = xmlSearchNs(reader->node->doc, reader->node, prefix);
2400		if (ns != NULL)
2401			ret = xmlGetNsProp(reader->node, localname, ns->href);
2402	}
2403
2404    xmlFree(localname);
2405    if (prefix != NULL)
2406        xmlFree(prefix);
2407    return(ret);
2408}
2409
2410
2411/**
2412 * xmlTextReaderGetAttributeNs:
2413 * @reader:  the xmlTextReaderPtr used
2414 * @localName: the local name of the attribute.
2415 * @namespaceURI: the namespace URI of the attribute.
2416 *
2417 * Provides the value of the specified attribute
2418 *
2419 * Returns a string containing the value of the specified attribute, or NULL
2420 *    in case of error. The string must be deallocated by the caller.
2421 */
2422xmlChar *
2423xmlTextReaderGetAttributeNs(xmlTextReaderPtr reader, const xmlChar *localName,
2424			    const xmlChar *namespaceURI) {
2425    xmlChar *prefix = NULL;
2426    xmlNsPtr ns;
2427
2428    if ((reader == NULL) || (localName == NULL))
2429	return(NULL);
2430    if (reader->node == NULL)
2431	return(NULL);
2432    if (reader->curnode != NULL)
2433	return(NULL);
2434
2435    /* TODO: handle the xmlDecl */
2436    if (reader->node->type != XML_ELEMENT_NODE)
2437	return(NULL);
2438
2439    if (xmlStrEqual(namespaceURI, BAD_CAST "http://www.w3.org/2000/xmlns/")) {
2440		if (! xmlStrEqual(localName, BAD_CAST "xmlns")) {
2441			prefix = BAD_CAST localName;
2442		}
2443		ns = reader->node->nsDef;
2444		while (ns != NULL) {
2445			if ((prefix == NULL && ns->prefix == NULL) ||
2446				((ns->prefix != NULL) && (xmlStrEqual(ns->prefix, localName)))) {
2447				return xmlStrdup(ns->href);
2448			}
2449			ns = ns->next;
2450		}
2451		return NULL;
2452    }
2453
2454    return(xmlGetNsProp(reader->node, localName, namespaceURI));
2455}
2456
2457/**
2458 * xmlTextReaderGetRemainder:
2459 * @reader:  the xmlTextReaderPtr used
2460 *
2461 * Method to get the remainder of the buffered XML. this method stops the
2462 * parser, set its state to End Of File and return the input stream with
2463 * what is left that the parser did not use.
2464 *
2465 * The implementation is not good, the parser certainly procgressed past
2466 * what's left in reader->input, and there is an allocation problem. Best
2467 * would be to rewrite it differently.
2468 *
2469 * Returns the xmlParserInputBufferPtr attached to the XML or NULL
2470 *    in case of error.
2471 */
2472xmlParserInputBufferPtr
2473xmlTextReaderGetRemainder(xmlTextReaderPtr reader) {
2474    xmlParserInputBufferPtr ret = NULL;
2475
2476    if (reader == NULL)
2477	return(NULL);
2478    if (reader->node == NULL)
2479	return(NULL);
2480
2481    reader->node = NULL;
2482    reader->curnode = NULL;
2483    reader->mode = XML_TEXTREADER_MODE_EOF;
2484    if (reader->ctxt != NULL) {
2485	xmlStopParser(reader->ctxt);
2486	if (reader->ctxt->myDoc != NULL) {
2487	    if (reader->preserve == 0)
2488		xmlTextReaderFreeDoc(reader, reader->ctxt->myDoc);
2489	    reader->ctxt->myDoc = NULL;
2490	}
2491    }
2492    if (reader->allocs & XML_TEXTREADER_INPUT) {
2493	ret = reader->input;
2494	reader->input = NULL;
2495	reader->allocs -= XML_TEXTREADER_INPUT;
2496    } else {
2497	/*
2498	 * Hum, one may need to duplicate the data structure because
2499	 * without reference counting the input may be freed twice:
2500	 *   - by the layer which allocated it.
2501	 *   - by the layer to which would have been returned to.
2502	 */
2503	TODO
2504	return(NULL);
2505    }
2506    return(ret);
2507}
2508
2509/**
2510 * xmlTextReaderLookupNamespace:
2511 * @reader:  the xmlTextReaderPtr used
2512 * @prefix: the prefix whose namespace URI is to be resolved. To return
2513 *          the default namespace, specify NULL
2514 *
2515 * Resolves a namespace prefix in the scope of the current element.
2516 *
2517 * Returns a string containing the namespace URI to which the prefix maps
2518 *    or NULL in case of error. The string must be deallocated by the caller.
2519 */
2520xmlChar *
2521xmlTextReaderLookupNamespace(xmlTextReaderPtr reader, const xmlChar *prefix) {
2522    xmlNsPtr ns;
2523
2524    if (reader == NULL)
2525	return(NULL);
2526    if (reader->node == NULL)
2527	return(NULL);
2528
2529    ns = xmlSearchNs(reader->node->doc, reader->node, prefix);
2530    if (ns == NULL)
2531	return(NULL);
2532    return(xmlStrdup(ns->href));
2533}
2534
2535/**
2536 * xmlTextReaderMoveToAttributeNo:
2537 * @reader:  the xmlTextReaderPtr used
2538 * @no: the zero-based index of the attribute relative to the containing
2539 *      element.
2540 *
2541 * Moves the position of the current instance to the attribute with
2542 * the specified index relative to the containing element.
2543 *
2544 * Returns 1 in case of success, -1 in case of error, 0 if not found
2545 */
2546int
2547xmlTextReaderMoveToAttributeNo(xmlTextReaderPtr reader, int no) {
2548    int i;
2549    xmlAttrPtr cur;
2550    xmlNsPtr ns;
2551
2552    if (reader == NULL)
2553	return(-1);
2554    if (reader->node == NULL)
2555	return(-1);
2556    /* TODO: handle the xmlDecl */
2557    if (reader->node->type != XML_ELEMENT_NODE)
2558	return(-1);
2559
2560    reader->curnode = NULL;
2561
2562    ns = reader->node->nsDef;
2563    for (i = 0;(i < no) && (ns != NULL);i++) {
2564	ns = ns->next;
2565    }
2566    if (ns != NULL) {
2567	reader->curnode = (xmlNodePtr) ns;
2568	return(1);
2569    }
2570
2571    cur = reader->node->properties;
2572    if (cur == NULL)
2573	return(0);
2574    for (;i < no;i++) {
2575	cur = cur->next;
2576	if (cur == NULL)
2577	    return(0);
2578    }
2579    /* TODO walk the DTD if present */
2580
2581    reader->curnode = (xmlNodePtr) cur;
2582    return(1);
2583}
2584
2585/**
2586 * xmlTextReaderMoveToAttribute:
2587 * @reader:  the xmlTextReaderPtr used
2588 * @name: the qualified name of the attribute.
2589 *
2590 * Moves the position of the current instance to the attribute with
2591 * the specified qualified name.
2592 *
2593 * Returns 1 in case of success, -1 in case of error, 0 if not found
2594 */
2595int
2596xmlTextReaderMoveToAttribute(xmlTextReaderPtr reader, const xmlChar *name) {
2597    xmlChar *prefix = NULL;
2598    xmlChar *localname;
2599    xmlNsPtr ns;
2600    xmlAttrPtr prop;
2601
2602    if ((reader == NULL) || (name == NULL))
2603	return(-1);
2604    if (reader->node == NULL)
2605	return(-1);
2606
2607    /* TODO: handle the xmlDecl */
2608    if (reader->node->type != XML_ELEMENT_NODE)
2609	return(0);
2610
2611    localname = xmlSplitQName2(name, &prefix);
2612    if (localname == NULL) {
2613	/*
2614	 * Namespace default decl
2615	 */
2616	if (xmlStrEqual(name, BAD_CAST "xmlns")) {
2617	    ns = reader->node->nsDef;
2618	    while (ns != NULL) {
2619		if (ns->prefix == NULL) {
2620		    reader->curnode = (xmlNodePtr) ns;
2621		    return(1);
2622		}
2623		ns = ns->next;
2624	    }
2625	    return(0);
2626	}
2627
2628	prop = reader->node->properties;
2629	while (prop != NULL) {
2630	    /*
2631	     * One need to have
2632	     *   - same attribute names
2633	     *   - and the attribute carrying that namespace
2634	     */
2635	    if ((xmlStrEqual(prop->name, name)) &&
2636		((prop->ns == NULL) || (prop->ns->prefix == NULL))) {
2637		reader->curnode = (xmlNodePtr) prop;
2638		return(1);
2639	    }
2640	    prop = prop->next;
2641	}
2642	return(0);
2643    }
2644
2645    /*
2646     * Namespace default decl
2647     */
2648    if (xmlStrEqual(prefix, BAD_CAST "xmlns")) {
2649	ns = reader->node->nsDef;
2650	while (ns != NULL) {
2651	    if ((ns->prefix != NULL) && (xmlStrEqual(ns->prefix, localname))) {
2652		reader->curnode = (xmlNodePtr) ns;
2653		goto found;
2654	    }
2655	    ns = ns->next;
2656	}
2657	goto not_found;
2658    }
2659    prop = reader->node->properties;
2660    while (prop != NULL) {
2661	/*
2662	 * One need to have
2663	 *   - same attribute names
2664	 *   - and the attribute carrying that namespace
2665	 */
2666	if ((xmlStrEqual(prop->name, localname)) &&
2667	    (prop->ns != NULL) && (xmlStrEqual(prop->ns->prefix, prefix))) {
2668	    reader->curnode = (xmlNodePtr) prop;
2669	    goto found;
2670	}
2671	prop = prop->next;
2672    }
2673not_found:
2674    if (localname != NULL)
2675        xmlFree(localname);
2676    if (prefix != NULL)
2677        xmlFree(prefix);
2678    return(0);
2679
2680found:
2681    if (localname != NULL)
2682        xmlFree(localname);
2683    if (prefix != NULL)
2684        xmlFree(prefix);
2685    return(1);
2686}
2687
2688/**
2689 * xmlTextReaderMoveToAttributeNs:
2690 * @reader:  the xmlTextReaderPtr used
2691 * @localName:  the local name of the attribute.
2692 * @namespaceURI:  the namespace URI of the attribute.
2693 *
2694 * Moves the position of the current instance to the attribute with the
2695 * specified local name and namespace URI.
2696 *
2697 * Returns 1 in case of success, -1 in case of error, 0 if not found
2698 */
2699int
2700xmlTextReaderMoveToAttributeNs(xmlTextReaderPtr reader,
2701	const xmlChar *localName, const xmlChar *namespaceURI) {
2702    xmlAttrPtr prop;
2703    xmlNodePtr node;
2704    xmlNsPtr ns;
2705    xmlChar *prefix = NULL;
2706
2707    if ((reader == NULL) || (localName == NULL) || (namespaceURI == NULL))
2708	return(-1);
2709    if (reader->node == NULL)
2710	return(-1);
2711    if (reader->node->type != XML_ELEMENT_NODE)
2712	return(0);
2713    node = reader->node;
2714
2715    if (xmlStrEqual(namespaceURI, BAD_CAST "http://www.w3.org/2000/xmlns/")) {
2716		if (! xmlStrEqual(localName, BAD_CAST "xmlns")) {
2717			prefix = BAD_CAST localName;
2718		}
2719		ns = reader->node->nsDef;
2720		while (ns != NULL) {
2721			if ((prefix == NULL && ns->prefix == NULL) ||
2722				((ns->prefix != NULL) && (xmlStrEqual(ns->prefix, localName)))) {
2723				reader->curnode = (xmlNodePtr) ns;
2724				return(1);
2725			}
2726			ns = ns->next;
2727		}
2728		return(0);
2729    }
2730
2731    prop = node->properties;
2732    while (prop != NULL) {
2733	/*
2734	 * One need to have
2735	 *   - same attribute names
2736	 *   - and the attribute carrying that namespace
2737	 */
2738        if (xmlStrEqual(prop->name, localName) &&
2739	    ((prop->ns != NULL) &&
2740	     (xmlStrEqual(prop->ns->href, namespaceURI)))) {
2741	    reader->curnode = (xmlNodePtr) prop;
2742	    return(1);
2743        }
2744	prop = prop->next;
2745    }
2746    return(0);
2747}
2748
2749/**
2750 * xmlTextReaderMoveToFirstAttribute:
2751 * @reader:  the xmlTextReaderPtr used
2752 *
2753 * Moves the position of the current instance to the first attribute
2754 * associated with the current node.
2755 *
2756 * Returns 1 in case of success, -1 in case of error, 0 if not found
2757 */
2758int
2759xmlTextReaderMoveToFirstAttribute(xmlTextReaderPtr reader) {
2760    if (reader == NULL)
2761	return(-1);
2762    if (reader->node == NULL)
2763	return(-1);
2764    if (reader->node->type != XML_ELEMENT_NODE)
2765	return(0);
2766
2767    if (reader->node->nsDef != NULL) {
2768	reader->curnode = (xmlNodePtr) reader->node->nsDef;
2769	return(1);
2770    }
2771    if (reader->node->properties != NULL) {
2772	reader->curnode = (xmlNodePtr) reader->node->properties;
2773	return(1);
2774    }
2775    return(0);
2776}
2777
2778/**
2779 * xmlTextReaderMoveToNextAttribute:
2780 * @reader:  the xmlTextReaderPtr used
2781 *
2782 * Moves the position of the current instance to the next attribute
2783 * associated with the current node.
2784 *
2785 * Returns 1 in case of success, -1 in case of error, 0 if not found
2786 */
2787int
2788xmlTextReaderMoveToNextAttribute(xmlTextReaderPtr reader) {
2789    if (reader == NULL)
2790	return(-1);
2791    if (reader->node == NULL)
2792	return(-1);
2793    if (reader->node->type != XML_ELEMENT_NODE)
2794	return(0);
2795    if (reader->curnode == NULL)
2796	return(xmlTextReaderMoveToFirstAttribute(reader));
2797
2798    if (reader->curnode->type == XML_NAMESPACE_DECL) {
2799	xmlNsPtr ns = (xmlNsPtr) reader->curnode;
2800	if (ns->next != NULL) {
2801	    reader->curnode = (xmlNodePtr) ns->next;
2802	    return(1);
2803	}
2804	if (reader->node->properties != NULL) {
2805	    reader->curnode = (xmlNodePtr) reader->node->properties;
2806	    return(1);
2807	}
2808	return(0);
2809    } else if ((reader->curnode->type == XML_ATTRIBUTE_NODE) &&
2810	       (reader->curnode->next != NULL)) {
2811	reader->curnode = reader->curnode->next;
2812	return(1);
2813    }
2814    return(0);
2815}
2816
2817/**
2818 * xmlTextReaderMoveToElement:
2819 * @reader:  the xmlTextReaderPtr used
2820 *
2821 * Moves the position of the current instance to the node that
2822 * contains the current Attribute  node.
2823 *
2824 * Returns 1 in case of success, -1 in case of error, 0 if not moved
2825 */
2826int
2827xmlTextReaderMoveToElement(xmlTextReaderPtr reader) {
2828    if (reader == NULL)
2829	return(-1);
2830    if (reader->node == NULL)
2831	return(-1);
2832    if (reader->node->type != XML_ELEMENT_NODE)
2833	return(0);
2834    if (reader->curnode != NULL) {
2835	reader->curnode = NULL;
2836	return(1);
2837    }
2838    return(0);
2839}
2840
2841/**
2842 * xmlTextReaderReadAttributeValue:
2843 * @reader:  the xmlTextReaderPtr used
2844 *
2845 * Parses an attribute value into one or more Text and EntityReference nodes.
2846 *
2847 * Returns 1 in case of success, 0 if the reader was not positionned on an
2848 *         ttribute node or all the attribute values have been read, or -1
2849 *         in case of error.
2850 */
2851int
2852xmlTextReaderReadAttributeValue(xmlTextReaderPtr reader) {
2853    if (reader == NULL)
2854	return(-1);
2855    if (reader->node == NULL)
2856	return(-1);
2857    if (reader->curnode == NULL)
2858	return(0);
2859    if (reader->curnode->type == XML_ATTRIBUTE_NODE) {
2860	if (reader->curnode->children == NULL)
2861	    return(0);
2862	reader->curnode = reader->curnode->children;
2863    } else if (reader->curnode->type == XML_NAMESPACE_DECL) {
2864	xmlNsPtr ns = (xmlNsPtr) reader->curnode;
2865
2866	if (reader->faketext == NULL) {
2867	    reader->faketext = xmlNewDocText(reader->node->doc,
2868		                             ns->href);
2869	} else {
2870            if ((reader->faketext->content != NULL) &&
2871	        (reader->faketext->content !=
2872		 (xmlChar *) &(reader->faketext->properties)))
2873		xmlFree(reader->faketext->content);
2874	    reader->faketext->content = xmlStrdup(ns->href);
2875	}
2876	reader->curnode = reader->faketext;
2877    } else {
2878	if (reader->curnode->next == NULL)
2879	    return(0);
2880	reader->curnode = reader->curnode->next;
2881    }
2882    return(1);
2883}
2884
2885/**
2886 * xmlTextReaderConstEncoding:
2887 * @reader:  the xmlTextReaderPtr used
2888 *
2889 * Determine the encoding of the document being read.
2890 *
2891 * Returns a string containing the encoding of the document or NULL in
2892 * case of error.  The string is deallocated with the reader.
2893 */
2894const xmlChar *
2895xmlTextReaderConstEncoding(xmlTextReaderPtr reader) {
2896    xmlDocPtr doc = NULL;
2897    if (reader == NULL)
2898	return(NULL);
2899    if (reader->doc != NULL)
2900        doc = reader->doc;
2901    else if (reader->ctxt != NULL)
2902	doc = reader->ctxt->myDoc;
2903    if (doc == NULL)
2904	return(NULL);
2905
2906    if (doc->encoding == NULL)
2907	return(NULL);
2908    else
2909      return(CONSTSTR(doc->encoding));
2910}
2911
2912
2913/************************************************************************
2914 *									*
2915 *			Acces API to the current node			*
2916 *									*
2917 ************************************************************************/
2918/**
2919 * xmlTextReaderAttributeCount:
2920 * @reader:  the xmlTextReaderPtr used
2921 *
2922 * Provides the number of attributes of the current node
2923 *
2924 * Returns 0 i no attributes, -1 in case of error or the attribute count
2925 */
2926int
2927xmlTextReaderAttributeCount(xmlTextReaderPtr reader) {
2928    int ret;
2929    xmlAttrPtr attr;
2930    xmlNsPtr ns;
2931    xmlNodePtr node;
2932
2933    if (reader == NULL)
2934	return(-1);
2935    if (reader->node == NULL)
2936	return(0);
2937
2938    if (reader->curnode != NULL)
2939	node = reader->curnode;
2940    else
2941	node = reader->node;
2942
2943    if (node->type != XML_ELEMENT_NODE)
2944	return(0);
2945    if ((reader->state == XML_TEXTREADER_END) ||
2946	(reader->state == XML_TEXTREADER_BACKTRACK))
2947	return(0);
2948    ret = 0;
2949    attr = node->properties;
2950    while (attr != NULL) {
2951	ret++;
2952	attr = attr->next;
2953    }
2954    ns = node->nsDef;
2955    while (ns != NULL) {
2956	ret++;
2957	ns = ns->next;
2958    }
2959    return(ret);
2960}
2961
2962/**
2963 * xmlTextReaderNodeType:
2964 * @reader:  the xmlTextReaderPtr used
2965 *
2966 * Get the node type of the current node
2967 * Reference:
2968 * http://www.gnu.org/software/dotgnu/pnetlib-doc/System/Xml/XmlNodeType.html
2969 *
2970 * Returns the xmlNodeType of the current node or -1 in case of error
2971 */
2972int
2973xmlTextReaderNodeType(xmlTextReaderPtr reader) {
2974    xmlNodePtr node;
2975
2976    if (reader == NULL)
2977	return(-1);
2978    if (reader->node == NULL)
2979	return(XML_READER_TYPE_NONE);
2980    if (reader->curnode != NULL)
2981	node = reader->curnode;
2982    else
2983	node = reader->node;
2984    switch (node->type) {
2985        case XML_ELEMENT_NODE:
2986	    if ((reader->state == XML_TEXTREADER_END) ||
2987		(reader->state == XML_TEXTREADER_BACKTRACK))
2988		return(XML_READER_TYPE_END_ELEMENT);
2989	    return(XML_READER_TYPE_ELEMENT);
2990        case XML_NAMESPACE_DECL:
2991        case XML_ATTRIBUTE_NODE:
2992	    return(XML_READER_TYPE_ATTRIBUTE);
2993        case XML_TEXT_NODE:
2994	    if (xmlIsBlankNode(reader->node)) {
2995		if (xmlNodeGetSpacePreserve(reader->node))
2996		    return(XML_READER_TYPE_SIGNIFICANT_WHITESPACE);
2997		else
2998		    return(XML_READER_TYPE_WHITESPACE);
2999	    } else {
3000		return(XML_READER_TYPE_TEXT);
3001	    }
3002        case XML_CDATA_SECTION_NODE:
3003	    return(XML_READER_TYPE_CDATA);
3004        case XML_ENTITY_REF_NODE:
3005	    return(XML_READER_TYPE_ENTITY_REFERENCE);
3006        case XML_ENTITY_NODE:
3007	    return(XML_READER_TYPE_ENTITY);
3008        case XML_PI_NODE:
3009	    return(XML_READER_TYPE_PROCESSING_INSTRUCTION);
3010        case XML_COMMENT_NODE:
3011	    return(XML_READER_TYPE_COMMENT);
3012        case XML_DOCUMENT_NODE:
3013        case XML_HTML_DOCUMENT_NODE:
3014#ifdef LIBXML_DOCB_ENABLED
3015        case XML_DOCB_DOCUMENT_NODE:
3016#endif
3017	    return(XML_READER_TYPE_DOCUMENT);
3018        case XML_DOCUMENT_FRAG_NODE:
3019	    return(XML_READER_TYPE_DOCUMENT_FRAGMENT);
3020        case XML_NOTATION_NODE:
3021	    return(XML_READER_TYPE_NOTATION);
3022        case XML_DOCUMENT_TYPE_NODE:
3023        case XML_DTD_NODE:
3024	    return(XML_READER_TYPE_DOCUMENT_TYPE);
3025
3026        case XML_ELEMENT_DECL:
3027        case XML_ATTRIBUTE_DECL:
3028        case XML_ENTITY_DECL:
3029        case XML_XINCLUDE_START:
3030        case XML_XINCLUDE_END:
3031	    return(XML_READER_TYPE_NONE);
3032    }
3033    return(-1);
3034}
3035
3036/**
3037 * xmlTextReaderIsEmptyElement:
3038 * @reader:  the xmlTextReaderPtr used
3039 *
3040 * Check if the current node is empty
3041 *
3042 * Returns 1 if empty, 0 if not and -1 in case of error
3043 */
3044int
3045xmlTextReaderIsEmptyElement(xmlTextReaderPtr reader) {
3046    if ((reader == NULL) || (reader->node == NULL))
3047	return(-1);
3048    if (reader->node->type != XML_ELEMENT_NODE)
3049	return(0);
3050    if (reader->curnode != NULL)
3051	return(0);
3052    if (reader->node->children != NULL)
3053	return(0);
3054    if (reader->state == XML_TEXTREADER_END)
3055	return(0);
3056    if (reader->doc != NULL)
3057        return(1);
3058#ifdef LIBXML_XINCLUDE_ENABLED
3059    if (reader->in_xinclude > 0)
3060        return(1);
3061#endif
3062    return((reader->node->extra & NODE_IS_EMPTY) != 0);
3063}
3064
3065/**
3066 * xmlTextReaderLocalName:
3067 * @reader:  the xmlTextReaderPtr used
3068 *
3069 * The local name of the node.
3070 *
3071 * Returns the local name or NULL if not available,
3072 *   if non NULL it need to be freed by the caller.
3073 */
3074xmlChar *
3075xmlTextReaderLocalName(xmlTextReaderPtr reader) {
3076    xmlNodePtr node;
3077    if ((reader == NULL) || (reader->node == NULL))
3078	return(NULL);
3079    if (reader->curnode != NULL)
3080	node = reader->curnode;
3081    else
3082	node = reader->node;
3083    if (node->type == XML_NAMESPACE_DECL) {
3084	xmlNsPtr ns = (xmlNsPtr) node;
3085	if (ns->prefix == NULL)
3086	    return(xmlStrdup(BAD_CAST "xmlns"));
3087	else
3088	    return(xmlStrdup(ns->prefix));
3089    }
3090    if ((node->type != XML_ELEMENT_NODE) &&
3091	(node->type != XML_ATTRIBUTE_NODE))
3092	return(xmlTextReaderName(reader));
3093    return(xmlStrdup(node->name));
3094}
3095
3096/**
3097 * xmlTextReaderConstLocalName:
3098 * @reader:  the xmlTextReaderPtr used
3099 *
3100 * The local name of the node.
3101 *
3102 * Returns the local name or NULL if not available, the
3103 *         string will be deallocated with the reader.
3104 */
3105const xmlChar *
3106xmlTextReaderConstLocalName(xmlTextReaderPtr reader) {
3107    xmlNodePtr node;
3108    if ((reader == NULL) || (reader->node == NULL))
3109	return(NULL);
3110    if (reader->curnode != NULL)
3111	node = reader->curnode;
3112    else
3113	node = reader->node;
3114    if (node->type == XML_NAMESPACE_DECL) {
3115	xmlNsPtr ns = (xmlNsPtr) node;
3116	if (ns->prefix == NULL)
3117	    return(CONSTSTR(BAD_CAST "xmlns"));
3118	else
3119	    return(ns->prefix);
3120    }
3121    if ((node->type != XML_ELEMENT_NODE) &&
3122	(node->type != XML_ATTRIBUTE_NODE))
3123	return(xmlTextReaderConstName(reader));
3124    return(node->name);
3125}
3126
3127/**
3128 * xmlTextReaderName:
3129 * @reader:  the xmlTextReaderPtr used
3130 *
3131 * The qualified name of the node, equal to Prefix :LocalName.
3132 *
3133 * Returns the local name or NULL if not available,
3134 *   if non NULL it need to be freed by the caller.
3135 */
3136xmlChar *
3137xmlTextReaderName(xmlTextReaderPtr reader) {
3138    xmlNodePtr node;
3139    xmlChar *ret;
3140
3141    if ((reader == NULL) || (reader->node == NULL))
3142	return(NULL);
3143    if (reader->curnode != NULL)
3144	node = reader->curnode;
3145    else
3146	node = reader->node;
3147    switch (node->type) {
3148        case XML_ELEMENT_NODE:
3149        case XML_ATTRIBUTE_NODE:
3150	    if ((node->ns == NULL) ||
3151		(node->ns->prefix == NULL))
3152		return(xmlStrdup(node->name));
3153
3154	    ret = xmlStrdup(node->ns->prefix);
3155	    ret = xmlStrcat(ret, BAD_CAST ":");
3156	    ret = xmlStrcat(ret, node->name);
3157	    return(ret);
3158        case XML_TEXT_NODE:
3159	    return(xmlStrdup(BAD_CAST "#text"));
3160        case XML_CDATA_SECTION_NODE:
3161	    return(xmlStrdup(BAD_CAST "#cdata-section"));
3162        case XML_ENTITY_NODE:
3163        case XML_ENTITY_REF_NODE:
3164	    return(xmlStrdup(node->name));
3165        case XML_PI_NODE:
3166	    return(xmlStrdup(node->name));
3167        case XML_COMMENT_NODE:
3168	    return(xmlStrdup(BAD_CAST "#comment"));
3169        case XML_DOCUMENT_NODE:
3170        case XML_HTML_DOCUMENT_NODE:
3171#ifdef LIBXML_DOCB_ENABLED
3172        case XML_DOCB_DOCUMENT_NODE:
3173#endif
3174	    return(xmlStrdup(BAD_CAST "#document"));
3175        case XML_DOCUMENT_FRAG_NODE:
3176	    return(xmlStrdup(BAD_CAST "#document-fragment"));
3177        case XML_NOTATION_NODE:
3178	    return(xmlStrdup(node->name));
3179        case XML_DOCUMENT_TYPE_NODE:
3180        case XML_DTD_NODE:
3181	    return(xmlStrdup(node->name));
3182        case XML_NAMESPACE_DECL: {
3183	    xmlNsPtr ns = (xmlNsPtr) node;
3184
3185	    ret = xmlStrdup(BAD_CAST "xmlns");
3186	    if (ns->prefix == NULL)
3187		return(ret);
3188	    ret = xmlStrcat(ret, BAD_CAST ":");
3189	    ret = xmlStrcat(ret, ns->prefix);
3190	    return(ret);
3191	}
3192
3193        case XML_ELEMENT_DECL:
3194        case XML_ATTRIBUTE_DECL:
3195        case XML_ENTITY_DECL:
3196        case XML_XINCLUDE_START:
3197        case XML_XINCLUDE_END:
3198	    return(NULL);
3199    }
3200    return(NULL);
3201}
3202
3203/**
3204 * xmlTextReaderConstName:
3205 * @reader:  the xmlTextReaderPtr used
3206 *
3207 * The qualified name of the node, equal to Prefix :LocalName.
3208 *
3209 * Returns the local name or NULL if not available, the string is
3210 *         deallocated with the reader.
3211 */
3212const xmlChar *
3213xmlTextReaderConstName(xmlTextReaderPtr reader) {
3214    xmlNodePtr node;
3215
3216    if ((reader == NULL) || (reader->node == NULL))
3217	return(NULL);
3218    if (reader->curnode != NULL)
3219	node = reader->curnode;
3220    else
3221	node = reader->node;
3222    switch (node->type) {
3223        case XML_ELEMENT_NODE:
3224        case XML_ATTRIBUTE_NODE:
3225	    if ((node->ns == NULL) ||
3226		(node->ns->prefix == NULL))
3227		return(node->name);
3228	    return(CONSTQSTR(node->ns->prefix, node->name));
3229        case XML_TEXT_NODE:
3230	    return(CONSTSTR(BAD_CAST "#text"));
3231        case XML_CDATA_SECTION_NODE:
3232	    return(CONSTSTR(BAD_CAST "#cdata-section"));
3233        case XML_ENTITY_NODE:
3234        case XML_ENTITY_REF_NODE:
3235	    return(CONSTSTR(node->name));
3236        case XML_PI_NODE:
3237	    return(CONSTSTR(node->name));
3238        case XML_COMMENT_NODE:
3239	    return(CONSTSTR(BAD_CAST "#comment"));
3240        case XML_DOCUMENT_NODE:
3241        case XML_HTML_DOCUMENT_NODE:
3242#ifdef LIBXML_DOCB_ENABLED
3243        case XML_DOCB_DOCUMENT_NODE:
3244#endif
3245	    return(CONSTSTR(BAD_CAST "#document"));
3246        case XML_DOCUMENT_FRAG_NODE:
3247	    return(CONSTSTR(BAD_CAST "#document-fragment"));
3248        case XML_NOTATION_NODE:
3249	    return(CONSTSTR(node->name));
3250        case XML_DOCUMENT_TYPE_NODE:
3251        case XML_DTD_NODE:
3252	    return(CONSTSTR(node->name));
3253        case XML_NAMESPACE_DECL: {
3254	    xmlNsPtr ns = (xmlNsPtr) node;
3255
3256	    if (ns->prefix == NULL)
3257		return(CONSTSTR(BAD_CAST "xmlns"));
3258	    return(CONSTQSTR(BAD_CAST "xmlns", ns->prefix));
3259	}
3260
3261        case XML_ELEMENT_DECL:
3262        case XML_ATTRIBUTE_DECL:
3263        case XML_ENTITY_DECL:
3264        case XML_XINCLUDE_START:
3265        case XML_XINCLUDE_END:
3266	    return(NULL);
3267    }
3268    return(NULL);
3269}
3270
3271/**
3272 * xmlTextReaderPrefix:
3273 * @reader:  the xmlTextReaderPtr used
3274 *
3275 * A shorthand reference to the namespace associated with the node.
3276 *
3277 * Returns the prefix or NULL if not available,
3278 *    if non NULL it need to be freed by the caller.
3279 */
3280xmlChar *
3281xmlTextReaderPrefix(xmlTextReaderPtr reader) {
3282    xmlNodePtr node;
3283    if ((reader == NULL) || (reader->node == NULL))
3284	return(NULL);
3285    if (reader->curnode != NULL)
3286	node = reader->curnode;
3287    else
3288	node = reader->node;
3289    if (node->type == XML_NAMESPACE_DECL) {
3290	xmlNsPtr ns = (xmlNsPtr) node;
3291	if (ns->prefix == NULL)
3292	    return(NULL);
3293	return(xmlStrdup(BAD_CAST "xmlns"));
3294    }
3295    if ((node->type != XML_ELEMENT_NODE) &&
3296	(node->type != XML_ATTRIBUTE_NODE))
3297	return(NULL);
3298    if ((node->ns != NULL) && (node->ns->prefix != NULL))
3299	return(xmlStrdup(node->ns->prefix));
3300    return(NULL);
3301}
3302
3303/**
3304 * xmlTextReaderConstPrefix:
3305 * @reader:  the xmlTextReaderPtr used
3306 *
3307 * A shorthand reference to the namespace associated with the node.
3308 *
3309 * Returns the prefix or NULL if not available, the string is deallocated
3310 *         with the reader.
3311 */
3312const xmlChar *
3313xmlTextReaderConstPrefix(xmlTextReaderPtr reader) {
3314    xmlNodePtr node;
3315    if ((reader == NULL) || (reader->node == NULL))
3316	return(NULL);
3317    if (reader->curnode != NULL)
3318	node = reader->curnode;
3319    else
3320	node = reader->node;
3321    if (node->type == XML_NAMESPACE_DECL) {
3322	xmlNsPtr ns = (xmlNsPtr) node;
3323	if (ns->prefix == NULL)
3324	    return(NULL);
3325	return(CONSTSTR(BAD_CAST "xmlns"));
3326    }
3327    if ((node->type != XML_ELEMENT_NODE) &&
3328	(node->type != XML_ATTRIBUTE_NODE))
3329	return(NULL);
3330    if ((node->ns != NULL) && (node->ns->prefix != NULL))
3331	return(CONSTSTR(node->ns->prefix));
3332    return(NULL);
3333}
3334
3335/**
3336 * xmlTextReaderNamespaceUri:
3337 * @reader:  the xmlTextReaderPtr used
3338 *
3339 * The URI defining the namespace associated with the node.
3340 *
3341 * Returns the namespace URI or NULL if not available,
3342 *    if non NULL it need to be freed by the caller.
3343 */
3344xmlChar *
3345xmlTextReaderNamespaceUri(xmlTextReaderPtr reader) {
3346    xmlNodePtr node;
3347    if ((reader == NULL) || (reader->node == NULL))
3348	return(NULL);
3349    if (reader->curnode != NULL)
3350	node = reader->curnode;
3351    else
3352	node = reader->node;
3353    if (node->type == XML_NAMESPACE_DECL)
3354	return(xmlStrdup(BAD_CAST "http://www.w3.org/2000/xmlns/"));
3355    if ((node->type != XML_ELEMENT_NODE) &&
3356	(node->type != XML_ATTRIBUTE_NODE))
3357	return(NULL);
3358    if (node->ns != NULL)
3359	return(xmlStrdup(node->ns->href));
3360    return(NULL);
3361}
3362
3363/**
3364 * xmlTextReaderConstNamespaceUri:
3365 * @reader:  the xmlTextReaderPtr used
3366 *
3367 * The URI defining the namespace associated with the node.
3368 *
3369 * Returns the namespace URI or NULL if not available, the string
3370 *         will be deallocated with the reader
3371 */
3372const xmlChar *
3373xmlTextReaderConstNamespaceUri(xmlTextReaderPtr reader) {
3374    xmlNodePtr node;
3375    if ((reader == NULL) || (reader->node == NULL))
3376	return(NULL);
3377    if (reader->curnode != NULL)
3378	node = reader->curnode;
3379    else
3380	node = reader->node;
3381    if (node->type == XML_NAMESPACE_DECL)
3382	return(CONSTSTR(BAD_CAST "http://www.w3.org/2000/xmlns/"));
3383    if ((node->type != XML_ELEMENT_NODE) &&
3384	(node->type != XML_ATTRIBUTE_NODE))
3385	return(NULL);
3386    if (node->ns != NULL)
3387	return(CONSTSTR(node->ns->href));
3388    return(NULL);
3389}
3390
3391/**
3392 * xmlTextReaderBaseUri:
3393 * @reader:  the xmlTextReaderPtr used
3394 *
3395 * The base URI of the node.
3396 *
3397 * Returns the base URI or NULL if not available,
3398 *    if non NULL it need to be freed by the caller.
3399 */
3400xmlChar *
3401xmlTextReaderBaseUri(xmlTextReaderPtr reader) {
3402    if ((reader == NULL) || (reader->node == NULL))
3403	return(NULL);
3404    return(xmlNodeGetBase(NULL, reader->node));
3405}
3406
3407/**
3408 * xmlTextReaderConstBaseUri:
3409 * @reader:  the xmlTextReaderPtr used
3410 *
3411 * The base URI of the node.
3412 *
3413 * Returns the base URI or NULL if not available, the string
3414 *         will be deallocated with the reader
3415 */
3416const xmlChar *
3417xmlTextReaderConstBaseUri(xmlTextReaderPtr reader) {
3418    xmlChar *tmp;
3419    const xmlChar *ret;
3420
3421    if ((reader == NULL) || (reader->node == NULL))
3422	return(NULL);
3423    tmp = xmlNodeGetBase(NULL, reader->node);
3424    if (tmp == NULL)
3425        return(NULL);
3426    ret = CONSTSTR(tmp);
3427    xmlFree(tmp);
3428    return(ret);
3429}
3430
3431/**
3432 * xmlTextReaderDepth:
3433 * @reader:  the xmlTextReaderPtr used
3434 *
3435 * The depth of the node in the tree.
3436 *
3437 * Returns the depth or -1 in case of error
3438 */
3439int
3440xmlTextReaderDepth(xmlTextReaderPtr reader) {
3441    if (reader == NULL)
3442	return(-1);
3443    if (reader->node == NULL)
3444	return(0);
3445
3446    if (reader->curnode != NULL) {
3447	if ((reader->curnode->type == XML_ATTRIBUTE_NODE) ||
3448	    (reader->curnode->type == XML_NAMESPACE_DECL))
3449	    return(reader->depth + 1);
3450	return(reader->depth + 2);
3451    }
3452    return(reader->depth);
3453}
3454
3455/**
3456 * xmlTextReaderHasAttributes:
3457 * @reader:  the xmlTextReaderPtr used
3458 *
3459 * Whether the node has attributes.
3460 *
3461 * Returns 1 if true, 0 if false, and -1 in case or error
3462 */
3463int
3464xmlTextReaderHasAttributes(xmlTextReaderPtr reader) {
3465    xmlNodePtr node;
3466    if (reader == NULL)
3467	return(-1);
3468    if (reader->node == NULL)
3469	return(0);
3470    if (reader->curnode != NULL)
3471	node = reader->curnode;
3472    else
3473	node = reader->node;
3474
3475    if ((node->type == XML_ELEMENT_NODE) &&
3476	((node->properties != NULL) || (node->nsDef != NULL)))
3477	return(1);
3478    /* TODO: handle the xmlDecl */
3479    return(0);
3480}
3481
3482/**
3483 * xmlTextReaderHasValue:
3484 * @reader:  the xmlTextReaderPtr used
3485 *
3486 * Whether the node can have a text value.
3487 *
3488 * Returns 1 if true, 0 if false, and -1 in case or error
3489 */
3490int
3491xmlTextReaderHasValue(xmlTextReaderPtr reader) {
3492    xmlNodePtr node;
3493    if (reader == NULL)
3494	return(-1);
3495    if (reader->node == NULL)
3496	return(0);
3497    if (reader->curnode != NULL)
3498	node = reader->curnode;
3499    else
3500	node = reader->node;
3501
3502    switch (node->type) {
3503        case XML_ATTRIBUTE_NODE:
3504        case XML_TEXT_NODE:
3505        case XML_CDATA_SECTION_NODE:
3506        case XML_PI_NODE:
3507        case XML_COMMENT_NODE:
3508        case XML_NAMESPACE_DECL:
3509	    return(1);
3510	default:
3511	    break;
3512    }
3513    return(0);
3514}
3515
3516/**
3517 * xmlTextReaderValue:
3518 * @reader:  the xmlTextReaderPtr used
3519 *
3520 * Provides the text value of the node if present
3521 *
3522 * Returns the string or NULL if not available. The result must be deallocated
3523 *     with xmlFree()
3524 */
3525xmlChar *
3526xmlTextReaderValue(xmlTextReaderPtr reader) {
3527    xmlNodePtr node;
3528    if (reader == NULL)
3529	return(NULL);
3530    if (reader->node == NULL)
3531	return(NULL);
3532    if (reader->curnode != NULL)
3533	node = reader->curnode;
3534    else
3535	node = reader->node;
3536
3537    switch (node->type) {
3538        case XML_NAMESPACE_DECL:
3539	    return(xmlStrdup(((xmlNsPtr) node)->href));
3540        case XML_ATTRIBUTE_NODE:{
3541	    xmlAttrPtr attr = (xmlAttrPtr) node;
3542
3543	    if (attr->parent != NULL)
3544		return (xmlNodeListGetString
3545			(attr->parent->doc, attr->children, 1));
3546	    else
3547		return (xmlNodeListGetString(NULL, attr->children, 1));
3548	    break;
3549	}
3550        case XML_TEXT_NODE:
3551        case XML_CDATA_SECTION_NODE:
3552        case XML_PI_NODE:
3553        case XML_COMMENT_NODE:
3554            if (node->content != NULL)
3555                return (xmlStrdup(node->content));
3556	default:
3557	    break;
3558    }
3559    return(NULL);
3560}
3561
3562/**
3563 * xmlTextReaderConstValue:
3564 * @reader:  the xmlTextReaderPtr used
3565 *
3566 * Provides the text value of the node if present
3567 *
3568 * Returns the string or NULL if not available. The result will be
3569 *     deallocated on the next Read() operation.
3570 */
3571const xmlChar *
3572xmlTextReaderConstValue(xmlTextReaderPtr reader) {
3573    xmlNodePtr node;
3574    if (reader == NULL)
3575	return(NULL);
3576    if (reader->node == NULL)
3577	return(NULL);
3578    if (reader->curnode != NULL)
3579	node = reader->curnode;
3580    else
3581	node = reader->node;
3582
3583    switch (node->type) {
3584        case XML_NAMESPACE_DECL:
3585	    return(((xmlNsPtr) node)->href);
3586        case XML_ATTRIBUTE_NODE:{
3587	    xmlAttrPtr attr = (xmlAttrPtr) node;
3588
3589	    if ((attr->children != NULL) &&
3590	        (attr->children->type == XML_TEXT_NODE) &&
3591		(attr->children->next == NULL))
3592		return(attr->children->content);
3593	    else {
3594		if (reader->buffer == NULL)
3595		    reader->buffer = xmlBufferCreateSize(100);
3596		if (reader->buffer == NULL) {
3597		    xmlGenericError(xmlGenericErrorContext,
3598				    "xmlTextReaderSetup : malloc failed\n");
3599		    return (NULL);
3600		}
3601	        reader->buffer->use = 0;
3602	        xmlNodeBufGetContent(reader->buffer, node);
3603		return(reader->buffer->content);
3604	    }
3605	    break;
3606	}
3607        case XML_TEXT_NODE:
3608        case XML_CDATA_SECTION_NODE:
3609        case XML_PI_NODE:
3610        case XML_COMMENT_NODE:
3611	    return(node->content);
3612	default:
3613	    break;
3614    }
3615    return(NULL);
3616}
3617
3618/**
3619 * xmlTextReaderIsDefault:
3620 * @reader:  the xmlTextReaderPtr used
3621 *
3622 * Whether an Attribute  node was generated from the default value
3623 * defined in the DTD or schema.
3624 *
3625 * Returns 0 if not defaulted, 1 if defaulted, and -1 in case of error
3626 */
3627int
3628xmlTextReaderIsDefault(xmlTextReaderPtr reader) {
3629    if (reader == NULL)
3630	return(-1);
3631    return(0);
3632}
3633
3634/**
3635 * xmlTextReaderQuoteChar:
3636 * @reader:  the xmlTextReaderPtr used
3637 *
3638 * The quotation mark character used to enclose the value of an attribute.
3639 *
3640 * Returns " or ' and -1 in case of error
3641 */
3642int
3643xmlTextReaderQuoteChar(xmlTextReaderPtr reader) {
3644    if (reader == NULL)
3645	return(-1);
3646    /* TODO maybe lookup the attribute value for " first */
3647    return((int) '"');
3648}
3649
3650/**
3651 * xmlTextReaderXmlLang:
3652 * @reader:  the xmlTextReaderPtr used
3653 *
3654 * The xml:lang scope within which the node resides.
3655 *
3656 * Returns the xml:lang value or NULL if none exists.,
3657 *    if non NULL it need to be freed by the caller.
3658 */
3659xmlChar *
3660xmlTextReaderXmlLang(xmlTextReaderPtr reader) {
3661    if (reader == NULL)
3662	return(NULL);
3663    if (reader->node == NULL)
3664	return(NULL);
3665    return(xmlNodeGetLang(reader->node));
3666}
3667
3668/**
3669 * xmlTextReaderConstXmlLang:
3670 * @reader:  the xmlTextReaderPtr used
3671 *
3672 * The xml:lang scope within which the node resides.
3673 *
3674 * Returns the xml:lang value or NULL if none exists.
3675 */
3676const xmlChar *
3677xmlTextReaderConstXmlLang(xmlTextReaderPtr reader) {
3678    xmlChar *tmp;
3679    const xmlChar *ret;
3680
3681    if (reader == NULL)
3682	return(NULL);
3683    if (reader->node == NULL)
3684	return(NULL);
3685    tmp = xmlNodeGetLang(reader->node);
3686    if (tmp == NULL)
3687        return(NULL);
3688    ret = CONSTSTR(tmp);
3689    xmlFree(tmp);
3690    return(ret);
3691}
3692
3693/**
3694 * xmlTextReaderConstString:
3695 * @reader:  the xmlTextReaderPtr used
3696 * @str:  the string to intern.
3697 *
3698 * Get an interned string from the reader, allows for example to
3699 * speedup string name comparisons
3700 *
3701 * Returns an interned copy of the string or NULL in case of error. The
3702 *         string will be deallocated with the reader.
3703 */
3704const xmlChar *
3705xmlTextReaderConstString(xmlTextReaderPtr reader, const xmlChar *str) {
3706    if (reader == NULL)
3707	return(NULL);
3708    return(CONSTSTR(str));
3709}
3710
3711/**
3712 * xmlTextReaderNormalization:
3713 * @reader:  the xmlTextReaderPtr used
3714 *
3715 * The value indicating whether to normalize white space and attribute values.
3716 * Since attribute value and end of line normalizations are a MUST in the XML
3717 * specification only the value true is accepted. The broken bahaviour of
3718 * accepting out of range character entities like &#0; is of course not
3719 * supported either.
3720 *
3721 * Returns 1 or -1 in case of error.
3722 */
3723int
3724xmlTextReaderNormalization(xmlTextReaderPtr reader) {
3725    if (reader == NULL)
3726	return(-1);
3727    return(1);
3728}
3729
3730/************************************************************************
3731 *									*
3732 *			Extensions to the base APIs			*
3733 *									*
3734 ************************************************************************/
3735
3736/**
3737 * xmlTextReaderSetParserProp:
3738 * @reader:  the xmlTextReaderPtr used
3739 * @prop:  the xmlParserProperties to set
3740 * @value:  usually 0 or 1 to (de)activate it
3741 *
3742 * Change the parser processing behaviour by changing some of its internal
3743 * properties. Note that some properties can only be changed before any
3744 * read has been done.
3745 *
3746 * Returns 0 if the call was successful, or -1 in case of error
3747 */
3748int
3749xmlTextReaderSetParserProp(xmlTextReaderPtr reader, int prop, int value) {
3750    xmlParserProperties p = (xmlParserProperties) prop;
3751    xmlParserCtxtPtr ctxt;
3752
3753    if ((reader == NULL) || (reader->ctxt == NULL))
3754	return(-1);
3755    ctxt = reader->ctxt;
3756
3757    switch (p) {
3758        case XML_PARSER_LOADDTD:
3759	    if (value != 0) {
3760		if (ctxt->loadsubset == 0) {
3761		    if (reader->mode != XML_TEXTREADER_MODE_INITIAL)
3762			return(-1);
3763		    ctxt->loadsubset = XML_DETECT_IDS;
3764		}
3765	    } else {
3766		ctxt->loadsubset = 0;
3767	    }
3768	    return(0);
3769        case XML_PARSER_DEFAULTATTRS:
3770	    if (value != 0) {
3771		ctxt->loadsubset |= XML_COMPLETE_ATTRS;
3772	    } else {
3773		if (ctxt->loadsubset & XML_COMPLETE_ATTRS)
3774		    ctxt->loadsubset -= XML_COMPLETE_ATTRS;
3775	    }
3776	    return(0);
3777        case XML_PARSER_VALIDATE:
3778	    if (value != 0) {
3779		ctxt->validate = 1;
3780		reader->validate = XML_TEXTREADER_VALIDATE_DTD;
3781	    } else {
3782		ctxt->validate = 0;
3783	    }
3784	    return(0);
3785        case XML_PARSER_SUBST_ENTITIES:
3786	    if (value != 0) {
3787		ctxt->replaceEntities = 1;
3788	    } else {
3789		ctxt->replaceEntities = 0;
3790	    }
3791	    return(0);
3792    }
3793    return(-1);
3794}
3795
3796/**
3797 * xmlTextReaderGetParserProp:
3798 * @reader:  the xmlTextReaderPtr used
3799 * @prop:  the xmlParserProperties to get
3800 *
3801 * Read the parser internal property.
3802 *
3803 * Returns the value, usually 0 or 1, or -1 in case of error.
3804 */
3805int
3806xmlTextReaderGetParserProp(xmlTextReaderPtr reader, int prop) {
3807    xmlParserProperties p = (xmlParserProperties) prop;
3808    xmlParserCtxtPtr ctxt;
3809
3810    if ((reader == NULL) || (reader->ctxt == NULL))
3811	return(-1);
3812    ctxt = reader->ctxt;
3813
3814    switch (p) {
3815        case XML_PARSER_LOADDTD:
3816	    if ((ctxt->loadsubset != 0) || (ctxt->validate != 0))
3817		return(1);
3818	    return(0);
3819        case XML_PARSER_DEFAULTATTRS:
3820	    if (ctxt->loadsubset & XML_COMPLETE_ATTRS)
3821		return(1);
3822	    return(0);
3823        case XML_PARSER_VALIDATE:
3824	    return(reader->validate);
3825	case XML_PARSER_SUBST_ENTITIES:
3826	    return(ctxt->replaceEntities);
3827    }
3828    return(-1);
3829}
3830
3831
3832/**
3833 * xmlTextReaderGetParserLineNumber:
3834 * @reader: the user data (XML reader context)
3835 *
3836 * Provide the line number of the current parsing point.
3837 *
3838 * Returns an int or 0 if not available
3839 */
3840int
3841xmlTextReaderGetParserLineNumber(xmlTextReaderPtr reader)
3842{
3843    if ((reader == NULL) || (reader->ctxt == NULL) ||
3844        (reader->ctxt->input == NULL)) {
3845        return (0);
3846    }
3847    return (reader->ctxt->input->line);
3848}
3849
3850/**
3851 * xmlTextReaderGetParserColumnNumber:
3852 * @reader: the user data (XML reader context)
3853 *
3854 * Provide the column number of the current parsing point.
3855 *
3856 * Returns an int or 0 if not available
3857 */
3858int
3859xmlTextReaderGetParserColumnNumber(xmlTextReaderPtr reader)
3860{
3861    if ((reader == NULL) || (reader->ctxt == NULL) ||
3862        (reader->ctxt->input == NULL)) {
3863        return (0);
3864    }
3865    return (reader->ctxt->input->col);
3866}
3867
3868/**
3869 * xmlTextReaderCurrentNode:
3870 * @reader:  the xmlTextReaderPtr used
3871 *
3872 * Hacking interface allowing to get the xmlNodePtr correponding to the
3873 * current node being accessed by the xmlTextReader. This is dangerous
3874 * because the underlying node may be destroyed on the next Reads.
3875 *
3876 * Returns the xmlNodePtr or NULL in case of error.
3877 */
3878xmlNodePtr
3879xmlTextReaderCurrentNode(xmlTextReaderPtr reader) {
3880    if (reader == NULL)
3881	return(NULL);
3882
3883    if (reader->curnode != NULL)
3884	return(reader->curnode);
3885    return(reader->node);
3886}
3887
3888/**
3889 * xmlTextReaderPreserve:
3890 * @reader:  the xmlTextReaderPtr used
3891 *
3892 * This tells the XML Reader to preserve the current node.
3893 * The caller must also use xmlTextReaderCurrentDoc() to
3894 * keep an handle on the resulting document once parsing has finished
3895 *
3896 * Returns the xmlNodePtr or NULL in case of error.
3897 */
3898xmlNodePtr
3899xmlTextReaderPreserve(xmlTextReaderPtr reader) {
3900    xmlNodePtr cur, parent;
3901
3902    if (reader == NULL)
3903	return(NULL);
3904
3905    if (reader->curnode != NULL)
3906        cur = reader->curnode;
3907    else
3908        cur = reader->node;
3909    if (cur == NULL)
3910        return(NULL);
3911
3912    if ((cur->type != XML_DOCUMENT_NODE) && (cur->type != XML_DTD_NODE)) {
3913	cur->extra |= NODE_IS_PRESERVED;
3914	cur->extra |= NODE_IS_SPRESERVED;
3915    }
3916    reader->preserves++;
3917
3918    parent = cur->parent;;
3919    while (parent != NULL) {
3920        if (parent->type == XML_ELEMENT_NODE)
3921	    parent->extra |= NODE_IS_PRESERVED;
3922	parent = parent->parent;
3923    }
3924    return(cur);
3925}
3926
3927#ifdef LIBXML_PATTERN_ENABLED
3928/**
3929 * xmlTextReaderPreservePattern:
3930 * @reader:  the xmlTextReaderPtr used
3931 * @pattern:  an XPath subset pattern
3932 * @namespaces: the prefix definitions, array of [URI, prefix] or NULL
3933 *
3934 * This tells the XML Reader to preserve all nodes matched by the
3935 * pattern. The caller must also use xmlTextReaderCurrentDoc() to
3936 * keep an handle on the resulting document once parsing has finished
3937 *
3938 * Returns a positive number in case of success and -1 in case of error
3939 */
3940int
3941xmlTextReaderPreservePattern(xmlTextReaderPtr reader, const xmlChar *pattern,
3942                             const xmlChar **namespaces)
3943{
3944    xmlPatternPtr comp;
3945
3946    if ((reader == NULL) || (pattern == NULL))
3947	return(-1);
3948
3949    comp = xmlPatterncompile(pattern, reader->dict, 0, namespaces);
3950    if (comp == NULL)
3951        return(-1);
3952
3953    if (reader->patternMax <= 0) {
3954	reader->patternMax = 4;
3955	reader->patternTab = (xmlPatternPtr *) xmlMalloc(reader->patternMax *
3956					      sizeof(reader->patternTab[0]));
3957        if (reader->patternTab == NULL) {
3958            xmlGenericError(xmlGenericErrorContext, "xmlMalloc failed !\n");
3959            return (-1);
3960        }
3961    }
3962    if (reader->patternNr >= reader->patternMax) {
3963        xmlPatternPtr *tmp;
3964        reader->patternMax *= 2;
3965	tmp = (xmlPatternPtr *) xmlRealloc(reader->patternTab,
3966                                      reader->patternMax *
3967                                      sizeof(reader->patternTab[0]));
3968        if (tmp == NULL) {
3969            xmlGenericError(xmlGenericErrorContext, "xmlRealloc failed !\n");
3970	    reader->patternMax /= 2;
3971            return (-1);
3972        }
3973	reader->patternTab = tmp;
3974    }
3975    reader->patternTab[reader->patternNr] = comp;
3976    return(reader->patternNr++);
3977}
3978#endif
3979
3980/**
3981 * xmlTextReaderCurrentDoc:
3982 * @reader:  the xmlTextReaderPtr used
3983 *
3984 * Hacking interface allowing to get the xmlDocPtr correponding to the
3985 * current document being accessed by the xmlTextReader.
3986 * NOTE: as a result of this call, the reader will not destroy the
3987 *       associated XML document and calling xmlFreeDoc() on the result
3988 *       is needed once the reader parsing has finished.
3989 *
3990 * Returns the xmlDocPtr or NULL in case of error.
3991 */
3992xmlDocPtr
3993xmlTextReaderCurrentDoc(xmlTextReaderPtr reader) {
3994    if (reader == NULL)
3995	return(NULL);
3996    if (reader->doc != NULL)
3997        return(reader->doc);
3998    if ((reader->ctxt == NULL) || (reader->ctxt->myDoc == NULL))
3999	return(NULL);
4000
4001    reader->preserve = 1;
4002    return(reader->ctxt->myDoc);
4003}
4004
4005#ifdef LIBXML_SCHEMAS_ENABLED
4006static char *xmlTextReaderBuildMessage(const char *msg, va_list ap);
4007
4008static void XMLCDECL
4009xmlTextReaderValidityError(void *ctxt, const char *msg, ...);
4010
4011static void XMLCDECL
4012xmlTextReaderValidityWarning(void *ctxt, const char *msg, ...);
4013
4014static void XMLCDECL
4015xmlTextReaderValidityErrorRelay(void *ctx, const char *msg, ...)
4016{
4017    xmlTextReaderPtr reader = (xmlTextReaderPtr) ctx;
4018
4019    char *str;
4020
4021    va_list ap;
4022
4023    va_start(ap, msg);
4024    str = xmlTextReaderBuildMessage(msg, ap);
4025    if (!reader->errorFunc) {
4026        xmlTextReaderValidityError(ctx, "%s", str);
4027    } else {
4028        reader->errorFunc(reader->errorFuncArg, str,
4029                          XML_PARSER_SEVERITY_VALIDITY_ERROR,
4030                          NULL /* locator */ );
4031    }
4032    if (str != NULL)
4033        xmlFree(str);
4034    va_end(ap);
4035}
4036
4037static void XMLCDECL
4038xmlTextReaderValidityWarningRelay(void *ctx, const char *msg, ...)
4039{
4040    xmlTextReaderPtr reader = (xmlTextReaderPtr) ctx;
4041
4042    char *str;
4043
4044    va_list ap;
4045
4046    va_start(ap, msg);
4047    str = xmlTextReaderBuildMessage(msg, ap);
4048    if (!reader->errorFunc) {
4049        xmlTextReaderValidityWarning(ctx, "%s", str);
4050    } else {
4051        reader->errorFunc(reader->errorFuncArg, str,
4052                          XML_PARSER_SEVERITY_VALIDITY_WARNING,
4053                          NULL /* locator */ );
4054    }
4055    if (str != NULL)
4056        xmlFree(str);
4057    va_end(ap);
4058}
4059
4060static void
4061  xmlTextReaderStructuredError(void *ctxt, xmlErrorPtr error);
4062
4063static void
4064xmlTextReaderValidityStructuredRelay(void *userData, xmlErrorPtr error)
4065{
4066    xmlTextReaderPtr reader = (xmlTextReaderPtr) userData;
4067
4068    if (reader->sErrorFunc) {
4069        reader->sErrorFunc(reader->errorFuncArg, error);
4070    } else {
4071        xmlTextReaderStructuredError(reader, error);
4072    }
4073}
4074/**
4075 * xmlTextReaderRelaxNGSetSchema:
4076 * @reader:  the xmlTextReaderPtr used
4077 * @schema:  a precompiled RelaxNG schema
4078 *
4079 * Use RelaxNG to validate the document as it is processed.
4080 * Activation is only possible before the first Read().
4081 * if @schema is NULL, then RelaxNG validation is desactivated.
4082 @ The @schema should not be freed until the reader is deallocated
4083 * or its use has been deactivated.
4084 *
4085 * Returns 0 in case the RelaxNG validation could be (des)activated and
4086 *         -1 in case of error.
4087 */
4088int
4089xmlTextReaderRelaxNGSetSchema(xmlTextReaderPtr reader, xmlRelaxNGPtr schema) {
4090    if (reader == NULL)
4091        return(-1);
4092    if (schema == NULL) {
4093        if (reader->rngSchemas != NULL) {
4094	    xmlRelaxNGFree(reader->rngSchemas);
4095	    reader->rngSchemas = NULL;
4096	}
4097        if (reader->rngValidCtxt != NULL) {
4098	    xmlRelaxNGFreeValidCtxt(reader->rngValidCtxt);
4099	    reader->rngValidCtxt = NULL;
4100        }
4101	return(0);
4102    }
4103    if (reader->mode != XML_TEXTREADER_MODE_INITIAL)
4104	return(-1);
4105    if (reader->rngSchemas != NULL) {
4106	xmlRelaxNGFree(reader->rngSchemas);
4107	reader->rngSchemas = NULL;
4108    }
4109    if (reader->rngValidCtxt != NULL) {
4110	xmlRelaxNGFreeValidCtxt(reader->rngValidCtxt);
4111	reader->rngValidCtxt = NULL;
4112    }
4113    reader->rngValidCtxt = xmlRelaxNGNewValidCtxt(schema);
4114    if (reader->rngValidCtxt == NULL)
4115        return(-1);
4116    if (reader->errorFunc != NULL) {
4117	xmlRelaxNGSetValidErrors(reader->rngValidCtxt,
4118			xmlTextReaderValidityErrorRelay,
4119			xmlTextReaderValidityWarningRelay,
4120			reader);
4121    }
4122	if (reader->sErrorFunc != NULL) {
4123		xmlRelaxNGSetValidStructuredErrors(reader->rngValidCtxt,
4124			xmlTextReaderValidityStructuredRelay,
4125			reader);
4126    }
4127    reader->rngValidErrors = 0;
4128    reader->rngFullNode = NULL;
4129    reader->validate = XML_TEXTREADER_VALIDATE_RNG;
4130    return(0);
4131}
4132
4133/**
4134 * xmlTextReaderSetSchema:
4135 * @reader:  the xmlTextReaderPtr used
4136 * @schema:  a precompiled Schema schema
4137 *
4138 * Use XSD Schema to validate the document as it is processed.
4139 * Activation is only possible before the first Read().
4140 * if @schema is NULL, then Schema validation is desactivated.
4141 @ The @schema should not be freed until the reader is deallocated
4142 * or its use has been deactivated.
4143 *
4144 * Returns 0 in case the Schema validation could be (des)activated and
4145 *         -1 in case of error.
4146 */
4147int
4148xmlTextReaderSetSchema(xmlTextReaderPtr reader, xmlSchemaPtr schema) {
4149    if (reader == NULL)
4150        return(-1);
4151    if (schema == NULL) {
4152	if (reader->xsdPlug != NULL) {
4153	    xmlSchemaSAXUnplug(reader->xsdPlug);
4154	    reader->xsdPlug = NULL;
4155	}
4156        if (reader->xsdValidCtxt != NULL) {
4157	    if (! reader->xsdPreserveCtxt)
4158		xmlSchemaFreeValidCtxt(reader->xsdValidCtxt);
4159	    reader->xsdValidCtxt = NULL;
4160        }
4161	reader->xsdPreserveCtxt = 0;
4162        if (reader->xsdSchemas != NULL) {
4163	    xmlSchemaFree(reader->xsdSchemas);
4164	    reader->xsdSchemas = NULL;
4165	}
4166	return(0);
4167    }
4168    if (reader->mode != XML_TEXTREADER_MODE_INITIAL)
4169	return(-1);
4170    if (reader->xsdPlug != NULL) {
4171	xmlSchemaSAXUnplug(reader->xsdPlug);
4172	reader->xsdPlug = NULL;
4173    }
4174    if (reader->xsdValidCtxt != NULL) {
4175	if (! reader->xsdPreserveCtxt)
4176	    xmlSchemaFreeValidCtxt(reader->xsdValidCtxt);
4177	reader->xsdValidCtxt = NULL;
4178    }
4179    reader->xsdPreserveCtxt = 0;
4180    if (reader->xsdSchemas != NULL) {
4181	xmlSchemaFree(reader->xsdSchemas);
4182	reader->xsdSchemas = NULL;
4183    }
4184    reader->xsdValidCtxt = xmlSchemaNewValidCtxt(schema);
4185    if (reader->xsdValidCtxt == NULL) {
4186	xmlSchemaFree(reader->xsdSchemas);
4187	reader->xsdSchemas = NULL;
4188        return(-1);
4189    }
4190    reader->xsdPlug = xmlSchemaSAXPlug(reader->xsdValidCtxt,
4191                                       &(reader->ctxt->sax),
4192				       &(reader->ctxt->userData));
4193    if (reader->xsdPlug == NULL) {
4194	xmlSchemaFree(reader->xsdSchemas);
4195	reader->xsdSchemas = NULL;
4196	xmlSchemaFreeValidCtxt(reader->xsdValidCtxt);
4197	reader->xsdValidCtxt = NULL;
4198	return(-1);
4199    }
4200    if (reader->errorFunc != NULL) {
4201	xmlSchemaSetValidErrors(reader->xsdValidCtxt,
4202			xmlTextReaderValidityErrorRelay,
4203			xmlTextReaderValidityWarningRelay,
4204			reader);
4205    }
4206	if (reader->sErrorFunc != NULL) {
4207		xmlSchemaSetValidStructuredErrors(reader->xsdValidCtxt,
4208			xmlTextReaderValidityStructuredRelay,
4209			reader);
4210    }
4211    reader->xsdValidErrors = 0;
4212    reader->validate = XML_TEXTREADER_VALIDATE_XSD;
4213    return(0);
4214}
4215
4216/**
4217 * xmlTextReaderRelaxNGValidate:
4218 * @reader:  the xmlTextReaderPtr used
4219 * @rng:  the path to a RelaxNG schema or NULL
4220 *
4221 * Use RelaxNG to validate the document as it is processed.
4222 * Activation is only possible before the first Read().
4223 * if @rng is NULL, then RelaxNG validation is deactivated.
4224 *
4225 * Returns 0 in case the RelaxNG validation could be (de)activated and
4226 *         -1 in case of error.
4227 */
4228int
4229xmlTextReaderRelaxNGValidate(xmlTextReaderPtr reader, const char *rng) {
4230    xmlRelaxNGParserCtxtPtr ctxt;
4231
4232    if (reader == NULL)
4233        return(-1);
4234
4235    if (rng == NULL) {
4236        if (reader->rngValidCtxt != NULL) {
4237	    xmlRelaxNGFreeValidCtxt(reader->rngValidCtxt);
4238	    reader->rngValidCtxt = NULL;
4239        }
4240        if (reader->rngSchemas != NULL) {
4241	    xmlRelaxNGFree(reader->rngSchemas);
4242	    reader->rngSchemas = NULL;
4243	}
4244	return(0);
4245    }
4246    if (reader->mode != XML_TEXTREADER_MODE_INITIAL)
4247	return(-1);
4248    if (reader->rngSchemas != NULL) {
4249	xmlRelaxNGFree(reader->rngSchemas);
4250	reader->rngSchemas = NULL;
4251    }
4252    if (reader->rngValidCtxt != NULL) {
4253	xmlRelaxNGFreeValidCtxt(reader->rngValidCtxt);
4254	reader->rngValidCtxt = NULL;
4255    }
4256    ctxt = xmlRelaxNGNewParserCtxt(rng);
4257    if (reader->errorFunc != NULL) {
4258	xmlRelaxNGSetParserErrors(ctxt,
4259			 xmlTextReaderValidityErrorRelay,
4260			 xmlTextReaderValidityWarningRelay,
4261			 reader);
4262    }
4263    if (reader->sErrorFunc != NULL) {
4264	xmlRelaxNGSetValidStructuredErrors(reader->rngValidCtxt,
4265			xmlTextReaderValidityStructuredRelay,
4266			reader);
4267    }
4268    reader->rngSchemas = xmlRelaxNGParse(ctxt);
4269    xmlRelaxNGFreeParserCtxt(ctxt);
4270    if (reader->rngSchemas == NULL)
4271        return(-1);
4272    reader->rngValidCtxt = xmlRelaxNGNewValidCtxt(reader->rngSchemas);
4273    if (reader->rngValidCtxt == NULL) {
4274	xmlRelaxNGFree(reader->rngSchemas);
4275	reader->rngSchemas = NULL;
4276        return(-1);
4277    }
4278    if (reader->errorFunc != NULL) {
4279	xmlRelaxNGSetValidErrors(reader->rngValidCtxt,
4280			 xmlTextReaderValidityErrorRelay,
4281			 xmlTextReaderValidityWarningRelay,
4282			 reader);
4283    }
4284	if (reader->sErrorFunc != NULL) {
4285		xmlRelaxNGSetValidStructuredErrors(reader->rngValidCtxt,
4286			xmlTextReaderValidityStructuredRelay,
4287			reader);
4288    }
4289    reader->rngValidErrors = 0;
4290    reader->rngFullNode = NULL;
4291    reader->validate = XML_TEXTREADER_VALIDATE_RNG;
4292    return(0);
4293}
4294
4295/**
4296 * xmlTextReaderSchemaValidateInternal:
4297 * @reader:  the xmlTextReaderPtr used
4298 * @xsd:  the path to a W3C XSD schema or NULL
4299 * @ctxt: the XML Schema validation context or NULL
4300 * @options: options (not used yet)
4301 *
4302 * Validate the document as it is processed using XML Schema.
4303 * Activation is only possible before the first Read().
4304 * If both @xsd and @ctxt are NULL then XML Schema validation is deactivated.
4305 *
4306 * Returns 0 in case the schemas validation could be (de)activated and
4307 *         -1 in case of error.
4308 */
4309static int
4310xmlTextReaderSchemaValidateInternal(xmlTextReaderPtr reader,
4311				    const char *xsd,
4312				    xmlSchemaValidCtxtPtr ctxt,
4313				    int options ATTRIBUTE_UNUSED)
4314{
4315    if (reader == NULL)
4316        return(-1);
4317
4318    if ((xsd != NULL) && (ctxt != NULL))
4319	return(-1);
4320
4321    if (((xsd != NULL) || (ctxt != NULL)) &&
4322	((reader->mode != XML_TEXTREADER_MODE_INITIAL) ||
4323        (reader->ctxt == NULL)))
4324	return(-1);
4325
4326    /* Cleanup previous validation stuff. */
4327    if (reader->xsdPlug != NULL) {
4328	xmlSchemaSAXUnplug(reader->xsdPlug);
4329	reader->xsdPlug = NULL;
4330    }
4331    if (reader->xsdValidCtxt != NULL) {
4332	if (! reader->xsdPreserveCtxt)
4333	    xmlSchemaFreeValidCtxt(reader->xsdValidCtxt);
4334	reader->xsdValidCtxt = NULL;
4335    }
4336    reader->xsdPreserveCtxt = 0;
4337    if (reader->xsdSchemas != NULL) {
4338	xmlSchemaFree(reader->xsdSchemas);
4339	reader->xsdSchemas = NULL;
4340    }
4341
4342    if ((xsd == NULL) && (ctxt == NULL)) {
4343	/* We just want to deactivate the validation, so get out. */
4344	return(0);
4345    }
4346
4347    if (xsd != NULL) {
4348	xmlSchemaParserCtxtPtr pctxt;
4349	/* Parse the schema and create validation environment. */
4350	pctxt = xmlSchemaNewParserCtxt(xsd);
4351	if (reader->errorFunc != NULL) {
4352	    xmlSchemaSetParserErrors(pctxt,
4353		xmlTextReaderValidityErrorRelay,
4354		xmlTextReaderValidityWarningRelay,
4355		reader);
4356	}
4357	reader->xsdSchemas = xmlSchemaParse(pctxt);
4358	xmlSchemaFreeParserCtxt(pctxt);
4359	if (reader->xsdSchemas == NULL)
4360	    return(-1);
4361	reader->xsdValidCtxt = xmlSchemaNewValidCtxt(reader->xsdSchemas);
4362	if (reader->xsdValidCtxt == NULL) {
4363	    xmlSchemaFree(reader->xsdSchemas);
4364	    reader->xsdSchemas = NULL;
4365	    return(-1);
4366	}
4367	reader->xsdPlug = xmlSchemaSAXPlug(reader->xsdValidCtxt,
4368	    &(reader->ctxt->sax),
4369	    &(reader->ctxt->userData));
4370	if (reader->xsdPlug == NULL) {
4371	    xmlSchemaFree(reader->xsdSchemas);
4372	    reader->xsdSchemas = NULL;
4373	    xmlSchemaFreeValidCtxt(reader->xsdValidCtxt);
4374	    reader->xsdValidCtxt = NULL;
4375	    return(-1);
4376	}
4377    } else {
4378	/* Use the given validation context. */
4379	reader->xsdValidCtxt = ctxt;
4380	reader->xsdPreserveCtxt = 1;
4381	reader->xsdPlug = xmlSchemaSAXPlug(reader->xsdValidCtxt,
4382	    &(reader->ctxt->sax),
4383	    &(reader->ctxt->userData));
4384	if (reader->xsdPlug == NULL) {
4385	    reader->xsdValidCtxt = NULL;
4386	    reader->xsdPreserveCtxt = 0;
4387	    return(-1);
4388	}
4389    }
4390    /*
4391    * Redirect the validation context's error channels to use
4392    * the reader channels.
4393    * TODO: In case the user provides the validation context we
4394    *   could make this redirection optional.
4395    */
4396    if (reader->errorFunc != NULL) {
4397	xmlSchemaSetValidErrors(reader->xsdValidCtxt,
4398			 xmlTextReaderValidityErrorRelay,
4399			 xmlTextReaderValidityWarningRelay,
4400			 reader);
4401    }
4402	if (reader->sErrorFunc != NULL) {
4403		xmlSchemaSetValidStructuredErrors(reader->xsdValidCtxt,
4404			xmlTextReaderValidityStructuredRelay,
4405			reader);
4406    }
4407    reader->xsdValidErrors = 0;
4408    reader->validate = XML_TEXTREADER_VALIDATE_XSD;
4409    return(0);
4410}
4411
4412/**
4413 * xmlTextReaderSchemaValidateCtxt:
4414 * @reader:  the xmlTextReaderPtr used
4415 * @ctxt: the XML Schema validation context or NULL
4416 * @options: options (not used yet)
4417 *
4418 * Use W3C XSD schema context to validate the document as it is processed.
4419 * Activation is only possible before the first Read().
4420 * If @ctxt is NULL, then XML Schema validation is deactivated.
4421 *
4422 * Returns 0 in case the schemas validation could be (de)activated and
4423 *         -1 in case of error.
4424 */
4425int
4426xmlTextReaderSchemaValidateCtxt(xmlTextReaderPtr reader,
4427				    xmlSchemaValidCtxtPtr ctxt,
4428				    int options)
4429{
4430    return(xmlTextReaderSchemaValidateInternal(reader, NULL, ctxt, options));
4431}
4432
4433/**
4434 * xmlTextReaderSchemaValidate:
4435 * @reader:  the xmlTextReaderPtr used
4436 * @xsd:  the path to a W3C XSD schema or NULL
4437 *
4438 * Use W3C XSD schema to validate the document as it is processed.
4439 * Activation is only possible before the first Read().
4440 * If @xsd is NULL, then XML Schema validation is deactivated.
4441 *
4442 * Returns 0 in case the schemas validation could be (de)activated and
4443 *         -1 in case of error.
4444 */
4445int
4446xmlTextReaderSchemaValidate(xmlTextReaderPtr reader, const char *xsd)
4447{
4448    return(xmlTextReaderSchemaValidateInternal(reader, xsd, NULL, 0));
4449}
4450#endif
4451
4452/**
4453 * xmlTextReaderIsNamespaceDecl:
4454 * @reader: the xmlTextReaderPtr used
4455 *
4456 * Determine whether the current node is a namespace declaration
4457 * rather than a regular attribute.
4458 *
4459 * Returns 1 if the current node is a namespace declaration, 0 if it
4460 * is a regular attribute or other type of node, or -1 in case of
4461 * error.
4462 */
4463int
4464xmlTextReaderIsNamespaceDecl(xmlTextReaderPtr reader) {
4465    xmlNodePtr node;
4466    if (reader == NULL)
4467	return(-1);
4468    if (reader->node == NULL)
4469	return(-1);
4470    if (reader->curnode != NULL)
4471	node = reader->curnode;
4472    else
4473	node = reader->node;
4474
4475    if (XML_NAMESPACE_DECL == node->type)
4476	return(1);
4477    else
4478	return(0);
4479}
4480
4481/**
4482 * xmlTextReaderConstXmlVersion:
4483 * @reader:  the xmlTextReaderPtr used
4484 *
4485 * Determine the XML version of the document being read.
4486 *
4487 * Returns a string containing the XML version of the document or NULL
4488 * in case of error.  The string is deallocated with the reader.
4489 */
4490const xmlChar *
4491xmlTextReaderConstXmlVersion(xmlTextReaderPtr reader) {
4492    xmlDocPtr doc = NULL;
4493    if (reader == NULL)
4494	return(NULL);
4495    if (reader->doc != NULL)
4496        doc = reader->doc;
4497    else if (reader->ctxt != NULL)
4498	doc = reader->ctxt->myDoc;
4499    if (doc == NULL)
4500	return(NULL);
4501
4502    if (doc->version == NULL)
4503	return(NULL);
4504    else
4505      return(CONSTSTR(doc->version));
4506}
4507
4508/**
4509 * xmlTextReaderStandalone:
4510 * @reader:  the xmlTextReaderPtr used
4511 *
4512 * Determine the standalone status of the document being read.
4513 *
4514 * Returns 1 if the document was declared to be standalone, 0 if it
4515 * was declared to be not standalone, or -1 if the document did not
4516 * specify its standalone status or in case of error.
4517 */
4518int
4519xmlTextReaderStandalone(xmlTextReaderPtr reader) {
4520    xmlDocPtr doc = NULL;
4521    if (reader == NULL)
4522	return(-1);
4523    if (reader->doc != NULL)
4524        doc = reader->doc;
4525    else if (reader->ctxt != NULL)
4526	doc = reader->ctxt->myDoc;
4527    if (doc == NULL)
4528	return(-1);
4529
4530    return(doc->standalone);
4531}
4532
4533/************************************************************************
4534 *									*
4535 *			Error Handling Extensions                       *
4536 *									*
4537 ************************************************************************/
4538
4539/* helper to build a xmlMalloc'ed string from a format and va_list */
4540static char *
4541xmlTextReaderBuildMessage(const char *msg, va_list ap) {
4542    int size = 0;
4543    int chars;
4544    char *larger;
4545    char *str = NULL;
4546    va_list aq;
4547
4548    while (1) {
4549        VA_COPY(aq, ap);
4550        chars = vsnprintf(str, size, msg, aq);
4551        va_end(aq);
4552        if (chars < 0) {
4553	    xmlGenericError(xmlGenericErrorContext, "vsnprintf failed !\n");
4554	    if (str)
4555		xmlFree(str);
4556	    return NULL;
4557	}
4558	if ((chars < size) || (size == MAX_ERR_MSG_SIZE))
4559            break;
4560        if (chars < MAX_ERR_MSG_SIZE)
4561	size = chars + 1;
4562	else
4563		size = MAX_ERR_MSG_SIZE;
4564        if ((larger = (char *) xmlRealloc(str, size)) == NULL) {
4565	    xmlGenericError(xmlGenericErrorContext, "xmlRealloc failed !\n");
4566	    if (str)
4567                xmlFree(str);
4568            return NULL;
4569        }
4570        str = larger;
4571    }
4572
4573    return str;
4574}
4575
4576/**
4577 * xmlTextReaderLocatorLineNumber:
4578 * @locator: the xmlTextReaderLocatorPtr used
4579 *
4580 * Obtain the line number for the given locator.
4581 *
4582 * Returns the line number or -1 in case of error.
4583 */
4584int
4585xmlTextReaderLocatorLineNumber(xmlTextReaderLocatorPtr locator) {
4586    /* we know that locator is a xmlParserCtxtPtr */
4587    xmlParserCtxtPtr ctx = (xmlParserCtxtPtr)locator;
4588    int ret = -1;
4589
4590    if (locator == NULL)
4591        return(-1);
4592    if (ctx->node != NULL) {
4593	ret = xmlGetLineNo(ctx->node);
4594    }
4595    else {
4596	/* inspired from error.c */
4597	xmlParserInputPtr input;
4598	input = ctx->input;
4599	if ((input->filename == NULL) && (ctx->inputNr > 1))
4600	    input = ctx->inputTab[ctx->inputNr - 2];
4601	if (input != NULL) {
4602	    ret = input->line;
4603	}
4604	else {
4605	    ret = -1;
4606	}
4607    }
4608
4609    return ret;
4610}
4611
4612/**
4613 * xmlTextReaderLocatorBaseURI:
4614 * @locator: the xmlTextReaderLocatorPtr used
4615 *
4616 * Obtain the base URI for the given locator.
4617 *
4618 * Returns the base URI or NULL in case of error,
4619 *    if non NULL it need to be freed by the caller.
4620 */
4621xmlChar *
4622xmlTextReaderLocatorBaseURI(xmlTextReaderLocatorPtr locator) {
4623    /* we know that locator is a xmlParserCtxtPtr */
4624    xmlParserCtxtPtr ctx = (xmlParserCtxtPtr)locator;
4625    xmlChar *ret = NULL;
4626
4627    if (locator == NULL)
4628        return(NULL);
4629    if (ctx->node != NULL) {
4630	ret = xmlNodeGetBase(NULL,ctx->node);
4631    }
4632    else {
4633	/* inspired from error.c */
4634	xmlParserInputPtr input;
4635	input = ctx->input;
4636	if ((input->filename == NULL) && (ctx->inputNr > 1))
4637	    input = ctx->inputTab[ctx->inputNr - 2];
4638	if (input != NULL) {
4639	    ret = xmlStrdup(BAD_CAST input->filename);
4640	}
4641	else {
4642	    ret = NULL;
4643	}
4644    }
4645
4646    return ret;
4647}
4648
4649static void
4650xmlTextReaderGenericError(void *ctxt, xmlParserSeverities severity,
4651                          char *str)
4652{
4653    xmlParserCtxtPtr ctx = (xmlParserCtxtPtr) ctxt;
4654
4655    xmlTextReaderPtr reader = (xmlTextReaderPtr) ctx->_private;
4656
4657    if (str != NULL) {
4658        if (reader->errorFunc)
4659            reader->errorFunc(reader->errorFuncArg, str, severity,
4660                              (xmlTextReaderLocatorPtr) ctx);
4661        xmlFree(str);
4662    }
4663}
4664
4665static void
4666xmlTextReaderStructuredError(void *ctxt, xmlErrorPtr error)
4667{
4668    xmlParserCtxtPtr ctx = (xmlParserCtxtPtr) ctxt;
4669
4670    xmlTextReaderPtr reader = (xmlTextReaderPtr) ctx->_private;
4671
4672    if (error && reader->sErrorFunc) {
4673        reader->sErrorFunc(reader->errorFuncArg, (xmlErrorPtr) error);
4674    }
4675}
4676
4677static void XMLCDECL
4678xmlTextReaderError(void *ctxt, const char *msg, ...)
4679{
4680    va_list ap;
4681
4682    va_start(ap, msg);
4683    xmlTextReaderGenericError(ctxt,
4684                              XML_PARSER_SEVERITY_ERROR,
4685                              xmlTextReaderBuildMessage(msg, ap));
4686    va_end(ap);
4687
4688}
4689
4690static void XMLCDECL
4691xmlTextReaderWarning(void *ctxt, const char *msg, ...)
4692{
4693    va_list ap;
4694
4695    va_start(ap, msg);
4696    xmlTextReaderGenericError(ctxt,
4697                              XML_PARSER_SEVERITY_WARNING,
4698                              xmlTextReaderBuildMessage(msg, ap));
4699    va_end(ap);
4700}
4701
4702static void XMLCDECL
4703xmlTextReaderValidityError(void *ctxt, const char *msg, ...)
4704{
4705    va_list ap;
4706
4707    int len = xmlStrlen((const xmlChar *) msg);
4708
4709    if ((len > 1) && (msg[len - 2] != ':')) {
4710        /*
4711         * some callbacks only report locator information:
4712         * skip them (mimicking behaviour in error.c)
4713         */
4714        va_start(ap, msg);
4715        xmlTextReaderGenericError(ctxt,
4716                                  XML_PARSER_SEVERITY_VALIDITY_ERROR,
4717                                  xmlTextReaderBuildMessage(msg, ap));
4718        va_end(ap);
4719    }
4720}
4721
4722static void XMLCDECL
4723xmlTextReaderValidityWarning(void *ctxt, const char *msg, ...)
4724{
4725    va_list ap;
4726
4727    int len = xmlStrlen((const xmlChar *) msg);
4728
4729    if ((len != 0) && (msg[len - 1] != ':')) {
4730        /*
4731         * some callbacks only report locator information:
4732         * skip them (mimicking behaviour in error.c)
4733         */
4734        va_start(ap, msg);
4735        xmlTextReaderGenericError(ctxt,
4736                                  XML_PARSER_SEVERITY_VALIDITY_WARNING,
4737                                  xmlTextReaderBuildMessage(msg, ap));
4738        va_end(ap);
4739    }
4740}
4741
4742/**
4743 * xmlTextReaderSetErrorHandler:
4744 * @reader:  the xmlTextReaderPtr used
4745 * @f:	the callback function to call on error and warnings
4746 * @arg:    a user argument to pass to the callback function
4747 *
4748 * Register a callback function that will be called on error and warnings.
4749 *
4750 * If @f is NULL, the default error and warning handlers are restored.
4751 */
4752void
4753xmlTextReaderSetErrorHandler(xmlTextReaderPtr reader,
4754                             xmlTextReaderErrorFunc f, void *arg)
4755{
4756    if (f != NULL) {
4757        reader->ctxt->sax->error = xmlTextReaderError;
4758        reader->ctxt->sax->serror = NULL;
4759        reader->ctxt->vctxt.error = xmlTextReaderValidityError;
4760        reader->ctxt->sax->warning = xmlTextReaderWarning;
4761        reader->ctxt->vctxt.warning = xmlTextReaderValidityWarning;
4762        reader->errorFunc = f;
4763        reader->sErrorFunc = NULL;
4764        reader->errorFuncArg = arg;
4765#ifdef LIBXML_SCHEMAS_ENABLED
4766        if (reader->rngValidCtxt) {
4767            xmlRelaxNGSetValidErrors(reader->rngValidCtxt,
4768                                     xmlTextReaderValidityErrorRelay,
4769                                     xmlTextReaderValidityWarningRelay,
4770                                     reader);
4771            xmlRelaxNGSetValidStructuredErrors(reader->rngValidCtxt, NULL,
4772                                               reader);
4773        }
4774        if (reader->xsdValidCtxt) {
4775            xmlSchemaSetValidErrors(reader->xsdValidCtxt,
4776                                    xmlTextReaderValidityErrorRelay,
4777                                    xmlTextReaderValidityWarningRelay,
4778                                    reader);
4779            xmlSchemaSetValidStructuredErrors(reader->xsdValidCtxt, NULL,
4780                                              reader);
4781        }
4782#endif
4783    } else {
4784        /* restore defaults */
4785        reader->ctxt->sax->error = xmlParserError;
4786        reader->ctxt->vctxt.error = xmlParserValidityError;
4787        reader->ctxt->sax->warning = xmlParserWarning;
4788        reader->ctxt->vctxt.warning = xmlParserValidityWarning;
4789        reader->errorFunc = NULL;
4790        reader->sErrorFunc = NULL;
4791        reader->errorFuncArg = NULL;
4792#ifdef LIBXML_SCHEMAS_ENABLED
4793        if (reader->rngValidCtxt) {
4794            xmlRelaxNGSetValidErrors(reader->rngValidCtxt, NULL, NULL,
4795                                     reader);
4796            xmlRelaxNGSetValidStructuredErrors(reader->rngValidCtxt, NULL,
4797                                               reader);
4798        }
4799        if (reader->xsdValidCtxt) {
4800            xmlSchemaSetValidErrors(reader->xsdValidCtxt, NULL, NULL,
4801                                    reader);
4802            xmlSchemaSetValidStructuredErrors(reader->xsdValidCtxt, NULL,
4803                                              reader);
4804        }
4805#endif
4806    }
4807}
4808
4809/**
4810* xmlTextReaderSetStructuredErrorHandler:
4811 * @reader:  the xmlTextReaderPtr used
4812 * @f:	the callback function to call on error and warnings
4813 * @arg:    a user argument to pass to the callback function
4814 *
4815 * Register a callback function that will be called on error and warnings.
4816 *
4817 * If @f is NULL, the default error and warning handlers are restored.
4818 */
4819void
4820xmlTextReaderSetStructuredErrorHandler(xmlTextReaderPtr reader,
4821                                       xmlStructuredErrorFunc f, void *arg)
4822{
4823    if (f != NULL) {
4824        reader->ctxt->sax->error = NULL;
4825        reader->ctxt->sax->serror = xmlTextReaderStructuredError;
4826        reader->ctxt->vctxt.error = xmlTextReaderValidityError;
4827        reader->ctxt->sax->warning = xmlTextReaderWarning;
4828        reader->ctxt->vctxt.warning = xmlTextReaderValidityWarning;
4829        reader->sErrorFunc = f;
4830        reader->errorFunc = NULL;
4831        reader->errorFuncArg = arg;
4832#ifdef LIBXML_SCHEMAS_ENABLED
4833        if (reader->rngValidCtxt) {
4834            xmlRelaxNGSetValidErrors(reader->rngValidCtxt, NULL, NULL,
4835                                     reader);
4836            xmlRelaxNGSetValidStructuredErrors(reader->rngValidCtxt,
4837                                        xmlTextReaderValidityStructuredRelay,
4838                                               reader);
4839        }
4840        if (reader->xsdValidCtxt) {
4841            xmlSchemaSetValidErrors(reader->xsdValidCtxt, NULL, NULL,
4842                                    reader);
4843            xmlSchemaSetValidStructuredErrors(reader->xsdValidCtxt,
4844                                       xmlTextReaderValidityStructuredRelay,
4845                                              reader);
4846        }
4847#endif
4848    } else {
4849        /* restore defaults */
4850        reader->ctxt->sax->error = xmlParserError;
4851        reader->ctxt->sax->serror = NULL;
4852        reader->ctxt->vctxt.error = xmlParserValidityError;
4853        reader->ctxt->sax->warning = xmlParserWarning;
4854        reader->ctxt->vctxt.warning = xmlParserValidityWarning;
4855        reader->errorFunc = NULL;
4856        reader->sErrorFunc = NULL;
4857        reader->errorFuncArg = NULL;
4858#ifdef LIBXML_SCHEMAS_ENABLED
4859        if (reader->rngValidCtxt) {
4860            xmlRelaxNGSetValidErrors(reader->rngValidCtxt, NULL, NULL,
4861                                     reader);
4862            xmlRelaxNGSetValidStructuredErrors(reader->rngValidCtxt, NULL,
4863                                               reader);
4864        }
4865        if (reader->xsdValidCtxt) {
4866            xmlSchemaSetValidErrors(reader->xsdValidCtxt, NULL, NULL,
4867                                    reader);
4868            xmlSchemaSetValidStructuredErrors(reader->xsdValidCtxt, NULL,
4869                                              reader);
4870        }
4871#endif
4872    }
4873}
4874
4875/**
4876 * xmlTextReaderIsValid:
4877 * @reader:  the xmlTextReaderPtr used
4878 *
4879 * Retrieve the validity status from the parser context
4880 *
4881 * Returns the flag value 1 if valid, 0 if no, and -1 in case of error
4882 */
4883int
4884xmlTextReaderIsValid(xmlTextReaderPtr reader)
4885{
4886    if (reader == NULL)
4887        return (-1);
4888#ifdef LIBXML_SCHEMAS_ENABLED
4889    if (reader->validate == XML_TEXTREADER_VALIDATE_RNG)
4890        return (reader->rngValidErrors == 0);
4891    if (reader->validate == XML_TEXTREADER_VALIDATE_XSD)
4892        return (reader->xsdValidErrors == 0);
4893#endif
4894    if ((reader->ctxt != NULL) && (reader->ctxt->validate == 1))
4895        return (reader->ctxt->valid);
4896    return (0);
4897}
4898
4899/**
4900 * xmlTextReaderGetErrorHandler:
4901 * @reader:  the xmlTextReaderPtr used
4902 * @f:	the callback function or NULL is no callback has been registered
4903 * @arg:    a user argument
4904 *
4905 * Retrieve the error callback function and user argument.
4906 */
4907void
4908xmlTextReaderGetErrorHandler(xmlTextReaderPtr reader,
4909                             xmlTextReaderErrorFunc * f, void **arg)
4910{
4911    if (f != NULL)
4912        *f = reader->errorFunc;
4913    if (arg != NULL)
4914        *arg = reader->errorFuncArg;
4915}
4916/************************************************************************
4917 *									*
4918 *	New set (2.6.0) of simpler and more flexible APIs		*
4919 *									*
4920 ************************************************************************/
4921
4922/**
4923 * xmlTextReaderSetup:
4924 * @reader:  an XML reader
4925 * @input: xmlParserInputBufferPtr used to feed the reader, will
4926 *         be destroyed with it.
4927 * @URL:  the base URL to use for the document
4928 * @encoding:  the document encoding, or NULL
4929 * @options:  a combination of xmlParserOption
4930 *
4931 * Setup an XML reader with new options
4932 *
4933 * Returns 0 in case of success and -1 in case of error.
4934 */
4935int
4936xmlTextReaderSetup(xmlTextReaderPtr reader,
4937                   xmlParserInputBufferPtr input, const char *URL,
4938                   const char *encoding, int options)
4939{
4940    if (reader == NULL) {
4941        if (input != NULL)
4942	    xmlFreeParserInputBuffer(input);
4943        return (-1);
4944    }
4945
4946    /*
4947     * we force the generation of compact text nodes on the reader
4948     * since usr applications should never modify the tree
4949     */
4950    options |= XML_PARSE_COMPACT;
4951
4952    reader->doc = NULL;
4953    reader->entNr = 0;
4954    reader->parserFlags = options;
4955    reader->validate = XML_TEXTREADER_NOT_VALIDATE;
4956    if ((input != NULL) && (reader->input != NULL) &&
4957        (reader->allocs & XML_TEXTREADER_INPUT)) {
4958	xmlFreeParserInputBuffer(reader->input);
4959	reader->input = NULL;
4960	reader->allocs -= XML_TEXTREADER_INPUT;
4961    }
4962    if (input != NULL) {
4963	reader->input = input;
4964	reader->allocs |= XML_TEXTREADER_INPUT;
4965    }
4966    if (reader->buffer == NULL)
4967        reader->buffer = xmlBufferCreateSize(100);
4968    if (reader->buffer == NULL) {
4969        xmlGenericError(xmlGenericErrorContext,
4970                        "xmlTextReaderSetup : malloc failed\n");
4971        return (-1);
4972    }
4973    if (reader->sax == NULL)
4974	reader->sax = (xmlSAXHandler *) xmlMalloc(sizeof(xmlSAXHandler));
4975    if (reader->sax == NULL) {
4976        xmlGenericError(xmlGenericErrorContext,
4977                        "xmlTextReaderSetup : malloc failed\n");
4978        return (-1);
4979    }
4980    xmlSAXVersion(reader->sax, 2);
4981    reader->startElement = reader->sax->startElement;
4982    reader->sax->startElement = xmlTextReaderStartElement;
4983    reader->endElement = reader->sax->endElement;
4984    reader->sax->endElement = xmlTextReaderEndElement;
4985#ifdef LIBXML_SAX1_ENABLED
4986    if (reader->sax->initialized == XML_SAX2_MAGIC) {
4987#endif /* LIBXML_SAX1_ENABLED */
4988        reader->startElementNs = reader->sax->startElementNs;
4989        reader->sax->startElementNs = xmlTextReaderStartElementNs;
4990        reader->endElementNs = reader->sax->endElementNs;
4991        reader->sax->endElementNs = xmlTextReaderEndElementNs;
4992#ifdef LIBXML_SAX1_ENABLED
4993    } else {
4994        reader->startElementNs = NULL;
4995        reader->endElementNs = NULL;
4996    }
4997#endif /* LIBXML_SAX1_ENABLED */
4998    reader->characters = reader->sax->characters;
4999    reader->sax->characters = xmlTextReaderCharacters;
5000    reader->sax->ignorableWhitespace = xmlTextReaderCharacters;
5001    reader->cdataBlock = reader->sax->cdataBlock;
5002    reader->sax->cdataBlock = xmlTextReaderCDataBlock;
5003
5004    reader->mode = XML_TEXTREADER_MODE_INITIAL;
5005    reader->node = NULL;
5006    reader->curnode = NULL;
5007    if (input != NULL) {
5008        if (reader->input->buffer->use < 4) {
5009            xmlParserInputBufferRead(input, 4);
5010        }
5011        if (reader->ctxt == NULL) {
5012            if (reader->input->buffer->use >= 4) {
5013                reader->ctxt = xmlCreatePushParserCtxt(reader->sax, NULL,
5014		       (const char *) reader->input->buffer->content, 4, URL);
5015                reader->base = 0;
5016                reader->cur = 4;
5017            } else {
5018                reader->ctxt =
5019                    xmlCreatePushParserCtxt(reader->sax, NULL, NULL, 0, URL);
5020                reader->base = 0;
5021                reader->cur = 0;
5022            }
5023        } else {
5024	    xmlParserInputPtr inputStream;
5025	    xmlParserInputBufferPtr buf;
5026	    xmlCharEncoding enc = XML_CHAR_ENCODING_NONE;
5027
5028	    xmlCtxtReset(reader->ctxt);
5029	    buf = xmlAllocParserInputBuffer(enc);
5030	    if (buf == NULL) return(-1);
5031	    inputStream = xmlNewInputStream(reader->ctxt);
5032	    if (inputStream == NULL) {
5033		xmlFreeParserInputBuffer(buf);
5034		return(-1);
5035	    }
5036
5037	    if (URL == NULL)
5038		inputStream->filename = NULL;
5039	    else
5040		inputStream->filename = (char *)
5041		    xmlCanonicPath((const xmlChar *) URL);
5042	    inputStream->buf = buf;
5043	    inputStream->base = inputStream->buf->buffer->content;
5044	    inputStream->cur = inputStream->buf->buffer->content;
5045	    inputStream->end =
5046            &inputStream->buf->buffer->content[inputStream->buf->buffer->use];
5047
5048	    inputPush(reader->ctxt, inputStream);
5049	    reader->cur = 0;
5050	}
5051        if (reader->ctxt == NULL) {
5052            xmlGenericError(xmlGenericErrorContext,
5053                            "xmlTextReaderSetup : malloc failed\n");
5054            return (-1);
5055        }
5056    }
5057    if (reader->dict != NULL) {
5058        if (reader->ctxt->dict != NULL) {
5059	    if (reader->dict != reader->ctxt->dict) {
5060		xmlDictFree(reader->dict);
5061		reader->dict = reader->ctxt->dict;
5062	    }
5063	} else {
5064	    reader->ctxt->dict = reader->dict;
5065	}
5066    } else {
5067	if (reader->ctxt->dict == NULL)
5068	    reader->ctxt->dict = xmlDictCreate();
5069        reader->dict = reader->ctxt->dict;
5070    }
5071    reader->ctxt->_private = reader;
5072    reader->ctxt->linenumbers = 1;
5073    reader->ctxt->dictNames = 1;
5074    /*
5075     * use the parser dictionnary to allocate all elements and attributes names
5076     */
5077    reader->ctxt->docdict = 1;
5078    reader->ctxt->parseMode = XML_PARSE_READER;
5079
5080#ifdef LIBXML_XINCLUDE_ENABLED
5081    if (reader->xincctxt != NULL) {
5082	xmlXIncludeFreeContext(reader->xincctxt);
5083	reader->xincctxt = NULL;
5084    }
5085    if (options & XML_PARSE_XINCLUDE) {
5086        reader->xinclude = 1;
5087	reader->xinclude_name = xmlDictLookup(reader->dict, XINCLUDE_NODE, -1);
5088	options -= XML_PARSE_XINCLUDE;
5089    } else
5090        reader->xinclude = 0;
5091    reader->in_xinclude = 0;
5092#endif
5093#ifdef LIBXML_PATTERN_ENABLED
5094    if (reader->patternTab == NULL) {
5095        reader->patternNr = 0;
5096	reader->patternMax = 0;
5097    }
5098    while (reader->patternNr > 0) {
5099        reader->patternNr--;
5100	if (reader->patternTab[reader->patternNr] != NULL) {
5101	    xmlFreePattern(reader->patternTab[reader->patternNr]);
5102            reader->patternTab[reader->patternNr] = NULL;
5103	}
5104    }
5105#endif
5106
5107    if (options & XML_PARSE_DTDVALID)
5108        reader->validate = XML_TEXTREADER_VALIDATE_DTD;
5109
5110    xmlCtxtUseOptions(reader->ctxt, options);
5111    if (encoding != NULL) {
5112        xmlCharEncodingHandlerPtr hdlr;
5113
5114        hdlr = xmlFindCharEncodingHandler(encoding);
5115        if (hdlr != NULL)
5116            xmlSwitchToEncoding(reader->ctxt, hdlr);
5117    }
5118    if ((URL != NULL) && (reader->ctxt->input != NULL) &&
5119        (reader->ctxt->input->filename == NULL))
5120        reader->ctxt->input->filename = (char *)
5121            xmlStrdup((const xmlChar *) URL);
5122
5123    reader->doc = NULL;
5124
5125    return (0);
5126}
5127
5128/**
5129 * xmlTextReaderByteConsumed:
5130 * @reader: an XML reader
5131 *
5132 * This function provides the current index of the parser used
5133 * by the reader, relative to the start of the current entity.
5134 * This function actually just wraps a call to xmlBytesConsumed()
5135 * for the parser context associated with the reader.
5136 * See xmlBytesConsumed() for more information.
5137 *
5138 * Returns the index in bytes from the beginning of the entity or -1
5139 *         in case the index could not be computed.
5140 */
5141long
5142xmlTextReaderByteConsumed(xmlTextReaderPtr reader) {
5143    if ((reader == NULL) || (reader->ctxt == NULL))
5144        return(-1);
5145    return(xmlByteConsumed(reader->ctxt));
5146}
5147
5148
5149/**
5150 * xmlReaderWalker:
5151 * @doc:  a preparsed document
5152 *
5153 * Create an xmltextReader for a preparsed document.
5154 *
5155 * Returns the new reader or NULL in case of error.
5156 */
5157xmlTextReaderPtr
5158xmlReaderWalker(xmlDocPtr doc)
5159{
5160    xmlTextReaderPtr ret;
5161
5162    if (doc == NULL)
5163        return(NULL);
5164
5165    ret = xmlMalloc(sizeof(xmlTextReader));
5166    if (ret == NULL) {
5167        xmlGenericError(xmlGenericErrorContext,
5168		"xmlNewTextReader : malloc failed\n");
5169	return(NULL);
5170    }
5171    memset(ret, 0, sizeof(xmlTextReader));
5172    ret->entNr = 0;
5173    ret->input = NULL;
5174    ret->mode = XML_TEXTREADER_MODE_INITIAL;
5175    ret->node = NULL;
5176    ret->curnode = NULL;
5177    ret->base = 0;
5178    ret->cur = 0;
5179    ret->allocs = XML_TEXTREADER_CTXT;
5180    ret->doc = doc;
5181    ret->state = XML_TEXTREADER_START;
5182    ret->dict = xmlDictCreate();
5183    return(ret);
5184}
5185
5186/**
5187 * xmlReaderForDoc:
5188 * @cur:  a pointer to a zero terminated string
5189 * @URL:  the base URL to use for the document
5190 * @encoding:  the document encoding, or NULL
5191 * @options:  a combination of xmlParserOption
5192 *
5193 * Create an xmltextReader for an XML in-memory document.
5194 * The parsing flags @options are a combination of xmlParserOption.
5195 *
5196 * Returns the new reader or NULL in case of error.
5197 */
5198xmlTextReaderPtr
5199xmlReaderForDoc(const xmlChar * cur, const char *URL, const char *encoding,
5200                int options)
5201{
5202    int len;
5203
5204    if (cur == NULL)
5205        return (NULL);
5206    len = xmlStrlen(cur);
5207
5208    return (xmlReaderForMemory
5209            ((const char *) cur, len, URL, encoding, options));
5210}
5211
5212/**
5213 * xmlReaderForFile:
5214 * @filename:  a file or URL
5215 * @encoding:  the document encoding, or NULL
5216 * @options:  a combination of xmlParserOption
5217 *
5218 * parse an XML file from the filesystem or the network.
5219 * The parsing flags @options are a combination of xmlParserOption.
5220 *
5221 * Returns the new reader or NULL in case of error.
5222 */
5223xmlTextReaderPtr
5224xmlReaderForFile(const char *filename, const char *encoding, int options)
5225{
5226    xmlTextReaderPtr reader;
5227
5228    reader = xmlNewTextReaderFilename(filename);
5229    if (reader == NULL)
5230        return (NULL);
5231    xmlTextReaderSetup(reader, NULL, NULL, encoding, options);
5232    return (reader);
5233}
5234
5235/**
5236 * xmlReaderForMemory:
5237 * @buffer:  a pointer to a char array
5238 * @size:  the size of the array
5239 * @URL:  the base URL to use for the document
5240 * @encoding:  the document encoding, or NULL
5241 * @options:  a combination of xmlParserOption
5242 *
5243 * Create an xmltextReader for an XML in-memory document.
5244 * The parsing flags @options are a combination of xmlParserOption.
5245 *
5246 * Returns the new reader or NULL in case of error.
5247 */
5248xmlTextReaderPtr
5249xmlReaderForMemory(const char *buffer, int size, const char *URL,
5250                   const char *encoding, int options)
5251{
5252    xmlTextReaderPtr reader;
5253    xmlParserInputBufferPtr buf;
5254
5255    buf = xmlParserInputBufferCreateStatic(buffer, size,
5256                                      XML_CHAR_ENCODING_NONE);
5257    if (buf == NULL) {
5258        return (NULL);
5259    }
5260    reader = xmlNewTextReader(buf, URL);
5261    if (reader == NULL) {
5262        xmlFreeParserInputBuffer(buf);
5263        return (NULL);
5264    }
5265    reader->allocs |= XML_TEXTREADER_INPUT;
5266    xmlTextReaderSetup(reader, NULL, URL, encoding, options);
5267    return (reader);
5268}
5269
5270/**
5271 * xmlReaderForFd:
5272 * @fd:  an open file descriptor
5273 * @URL:  the base URL to use for the document
5274 * @encoding:  the document encoding, or NULL
5275 * @options:  a combination of xmlParserOption
5276 *
5277 * Create an xmltextReader for an XML from a file descriptor.
5278 * The parsing flags @options are a combination of xmlParserOption.
5279 * NOTE that the file descriptor will not be closed when the
5280 *      reader is closed or reset.
5281 *
5282 * Returns the new reader or NULL in case of error.
5283 */
5284xmlTextReaderPtr
5285xmlReaderForFd(int fd, const char *URL, const char *encoding, int options)
5286{
5287    xmlTextReaderPtr reader;
5288    xmlParserInputBufferPtr input;
5289
5290    if (fd < 0)
5291        return (NULL);
5292
5293    input = xmlParserInputBufferCreateFd(fd, XML_CHAR_ENCODING_NONE);
5294    if (input == NULL)
5295        return (NULL);
5296    input->closecallback = NULL;
5297    reader = xmlNewTextReader(input, URL);
5298    if (reader == NULL) {
5299        xmlFreeParserInputBuffer(input);
5300        return (NULL);
5301    }
5302    reader->allocs |= XML_TEXTREADER_INPUT;
5303    xmlTextReaderSetup(reader, NULL, URL, encoding, options);
5304    return (reader);
5305}
5306
5307/**
5308 * xmlReaderForIO:
5309 * @ioread:  an I/O read function
5310 * @ioclose:  an I/O close function
5311 * @ioctx:  an I/O handler
5312 * @URL:  the base URL to use for the document
5313 * @encoding:  the document encoding, or NULL
5314 * @options:  a combination of xmlParserOption
5315 *
5316 * Create an xmltextReader for an XML document from I/O functions and source.
5317 * The parsing flags @options are a combination of xmlParserOption.
5318 *
5319 * Returns the new reader or NULL in case of error.
5320 */
5321xmlTextReaderPtr
5322xmlReaderForIO(xmlInputReadCallback ioread, xmlInputCloseCallback ioclose,
5323               void *ioctx, const char *URL, const char *encoding,
5324               int options)
5325{
5326    xmlTextReaderPtr reader;
5327    xmlParserInputBufferPtr input;
5328
5329    if (ioread == NULL)
5330        return (NULL);
5331
5332    input = xmlParserInputBufferCreateIO(ioread, ioclose, ioctx,
5333                                         XML_CHAR_ENCODING_NONE);
5334    if (input == NULL)
5335        return (NULL);
5336    reader = xmlNewTextReader(input, URL);
5337    if (reader == NULL) {
5338        xmlFreeParserInputBuffer(input);
5339        return (NULL);
5340    }
5341    reader->allocs |= XML_TEXTREADER_INPUT;
5342    xmlTextReaderSetup(reader, NULL, URL, encoding, options);
5343    return (reader);
5344}
5345
5346/**
5347 * xmlReaderNewWalker:
5348 * @reader:  an XML reader
5349 * @doc:  a preparsed document
5350 *
5351 * Setup an xmltextReader to parse a preparsed XML document.
5352 * This reuses the existing @reader xmlTextReader.
5353 *
5354 * Returns 0 in case of success and -1 in case of error
5355 */
5356int
5357xmlReaderNewWalker(xmlTextReaderPtr reader, xmlDocPtr doc)
5358{
5359    if (doc == NULL)
5360        return (-1);
5361    if (reader == NULL)
5362        return (-1);
5363
5364    if (reader->input != NULL) {
5365        xmlFreeParserInputBuffer(reader->input);
5366    }
5367    if (reader->ctxt != NULL) {
5368	xmlCtxtReset(reader->ctxt);
5369    }
5370
5371    reader->entNr = 0;
5372    reader->input = NULL;
5373    reader->mode = XML_TEXTREADER_MODE_INITIAL;
5374    reader->node = NULL;
5375    reader->curnode = NULL;
5376    reader->base = 0;
5377    reader->cur = 0;
5378    reader->allocs = XML_TEXTREADER_CTXT;
5379    reader->doc = doc;
5380    reader->state = XML_TEXTREADER_START;
5381    if (reader->dict == NULL) {
5382        if ((reader->ctxt != NULL) && (reader->ctxt->dict != NULL))
5383	    reader->dict = reader->ctxt->dict;
5384	else
5385	    reader->dict = xmlDictCreate();
5386    }
5387    return(0);
5388}
5389
5390/**
5391 * xmlReaderNewDoc:
5392 * @reader:  an XML reader
5393 * @cur:  a pointer to a zero terminated string
5394 * @URL:  the base URL to use for the document
5395 * @encoding:  the document encoding, or NULL
5396 * @options:  a combination of xmlParserOption
5397 *
5398 * Setup an xmltextReader to parse an XML in-memory document.
5399 * The parsing flags @options are a combination of xmlParserOption.
5400 * This reuses the existing @reader xmlTextReader.
5401 *
5402 * Returns 0 in case of success and -1 in case of error
5403 */
5404int
5405xmlReaderNewDoc(xmlTextReaderPtr reader, const xmlChar * cur,
5406                const char *URL, const char *encoding, int options)
5407{
5408
5409    int len;
5410
5411    if (cur == NULL)
5412        return (-1);
5413    if (reader == NULL)
5414        return (-1);
5415
5416    len = xmlStrlen(cur);
5417    return (xmlReaderNewMemory(reader, (const char *)cur, len,
5418                               URL, encoding, options));
5419}
5420
5421/**
5422 * xmlReaderNewFile:
5423 * @reader:  an XML reader
5424 * @filename:  a file or URL
5425 * @encoding:  the document encoding, or NULL
5426 * @options:  a combination of xmlParserOption
5427 *
5428 * parse an XML file from the filesystem or the network.
5429 * The parsing flags @options are a combination of xmlParserOption.
5430 * This reuses the existing @reader xmlTextReader.
5431 *
5432 * Returns 0 in case of success and -1 in case of error
5433 */
5434int
5435xmlReaderNewFile(xmlTextReaderPtr reader, const char *filename,
5436                 const char *encoding, int options)
5437{
5438    xmlParserInputBufferPtr input;
5439
5440    if (filename == NULL)
5441        return (-1);
5442    if (reader == NULL)
5443        return (-1);
5444
5445    input =
5446        xmlParserInputBufferCreateFilename(filename,
5447                                           XML_CHAR_ENCODING_NONE);
5448    if (input == NULL)
5449        return (-1);
5450    return (xmlTextReaderSetup(reader, input, filename, encoding, options));
5451}
5452
5453/**
5454 * xmlReaderNewMemory:
5455 * @reader:  an XML reader
5456 * @buffer:  a pointer to a char array
5457 * @size:  the size of the array
5458 * @URL:  the base URL to use for the document
5459 * @encoding:  the document encoding, or NULL
5460 * @options:  a combination of xmlParserOption
5461 *
5462 * Setup an xmltextReader to parse an XML in-memory document.
5463 * The parsing flags @options are a combination of xmlParserOption.
5464 * This reuses the existing @reader xmlTextReader.
5465 *
5466 * Returns 0 in case of success and -1 in case of error
5467 */
5468int
5469xmlReaderNewMemory(xmlTextReaderPtr reader, const char *buffer, int size,
5470                   const char *URL, const char *encoding, int options)
5471{
5472    xmlParserInputBufferPtr input;
5473
5474    if (reader == NULL)
5475        return (-1);
5476    if (buffer == NULL)
5477        return (-1);
5478
5479    input = xmlParserInputBufferCreateStatic(buffer, size,
5480                                      XML_CHAR_ENCODING_NONE);
5481    if (input == NULL) {
5482        return (-1);
5483    }
5484    return (xmlTextReaderSetup(reader, input, URL, encoding, options));
5485}
5486
5487/**
5488 * xmlReaderNewFd:
5489 * @reader:  an XML reader
5490 * @fd:  an open file descriptor
5491 * @URL:  the base URL to use for the document
5492 * @encoding:  the document encoding, or NULL
5493 * @options:  a combination of xmlParserOption
5494 *
5495 * Setup an xmltextReader to parse an XML from a file descriptor.
5496 * NOTE that the file descriptor will not be closed when the
5497 *      reader is closed or reset.
5498 * The parsing flags @options are a combination of xmlParserOption.
5499 * This reuses the existing @reader xmlTextReader.
5500 *
5501 * Returns 0 in case of success and -1 in case of error
5502 */
5503int
5504xmlReaderNewFd(xmlTextReaderPtr reader, int fd,
5505               const char *URL, const char *encoding, int options)
5506{
5507    xmlParserInputBufferPtr input;
5508
5509    if (fd < 0)
5510        return (-1);
5511    if (reader == NULL)
5512        return (-1);
5513
5514    input = xmlParserInputBufferCreateFd(fd, XML_CHAR_ENCODING_NONE);
5515    if (input == NULL)
5516        return (-1);
5517    input->closecallback = NULL;
5518    return (xmlTextReaderSetup(reader, input, URL, encoding, options));
5519}
5520
5521/**
5522 * xmlReaderNewIO:
5523 * @reader:  an XML reader
5524 * @ioread:  an I/O read function
5525 * @ioclose:  an I/O close function
5526 * @ioctx:  an I/O handler
5527 * @URL:  the base URL to use for the document
5528 * @encoding:  the document encoding, or NULL
5529 * @options:  a combination of xmlParserOption
5530 *
5531 * Setup an xmltextReader to parse an XML document from I/O functions
5532 * and source.
5533 * The parsing flags @options are a combination of xmlParserOption.
5534 * This reuses the existing @reader xmlTextReader.
5535 *
5536 * Returns 0 in case of success and -1 in case of error
5537 */
5538int
5539xmlReaderNewIO(xmlTextReaderPtr reader, xmlInputReadCallback ioread,
5540               xmlInputCloseCallback ioclose, void *ioctx,
5541               const char *URL, const char *encoding, int options)
5542{
5543    xmlParserInputBufferPtr input;
5544
5545    if (ioread == NULL)
5546        return (-1);
5547    if (reader == NULL)
5548        return (-1);
5549
5550    input = xmlParserInputBufferCreateIO(ioread, ioclose, ioctx,
5551                                         XML_CHAR_ENCODING_NONE);
5552    if (input == NULL)
5553        return (-1);
5554    return (xmlTextReaderSetup(reader, input, URL, encoding, options));
5555}
5556/************************************************************************
5557 *									*
5558 *			Utilities					*
5559 *									*
5560 ************************************************************************/
5561#ifdef NOT_USED_YET
5562
5563/**
5564 * xmlBase64Decode:
5565 * @in:  the input buffer
5566 * @inlen:  the size of the input (in), the size read from it (out)
5567 * @to:  the output buffer
5568 * @tolen:  the size of the output (in), the size written to (out)
5569 *
5570 * Base64 decoder, reads from @in and save in @to
5571 * TODO: tell jody when this is actually exported
5572 *
5573 * Returns 0 if all the input was consumer, 1 if the Base64 end was reached,
5574 *         2 if there wasn't enough space on the output or -1 in case of error.
5575 */
5576static int
5577xmlBase64Decode(const unsigned char *in, unsigned long *inlen,
5578                unsigned char *to, unsigned long *tolen)
5579{
5580    unsigned long incur;        /* current index in in[] */
5581
5582    unsigned long inblk;        /* last block index in in[] */
5583
5584    unsigned long outcur;       /* current index in out[] */
5585
5586    unsigned long inmax;        /* size of in[] */
5587
5588    unsigned long outmax;       /* size of out[] */
5589
5590    unsigned char cur;          /* the current value read from in[] */
5591
5592    unsigned char intmp[4], outtmp[4];  /* temporary buffers for the convert */
5593
5594    int nbintmp;                /* number of byte in intmp[] */
5595
5596    int is_ignore;              /* cur should be ignored */
5597
5598    int is_end = 0;             /* the end of the base64 was found */
5599
5600    int retval = 1;
5601
5602    int i;
5603
5604    if ((in == NULL) || (inlen == NULL) || (to == NULL) || (tolen == NULL))
5605        return (-1);
5606
5607    incur = 0;
5608    inblk = 0;
5609    outcur = 0;
5610    inmax = *inlen;
5611    outmax = *tolen;
5612    nbintmp = 0;
5613
5614    while (1) {
5615        if (incur >= inmax)
5616            break;
5617        cur = in[incur++];
5618        is_ignore = 0;
5619        if ((cur >= 'A') && (cur <= 'Z'))
5620            cur = cur - 'A';
5621        else if ((cur >= 'a') && (cur <= 'z'))
5622            cur = cur - 'a' + 26;
5623        else if ((cur >= '0') && (cur <= '9'))
5624            cur = cur - '0' + 52;
5625        else if (cur == '+')
5626            cur = 62;
5627        else if (cur == '/')
5628            cur = 63;
5629        else if (cur == '.')
5630            cur = 0;
5631        else if (cur == '=')    /*no op , end of the base64 stream */
5632            is_end = 1;
5633        else {
5634            is_ignore = 1;
5635            if (nbintmp == 0)
5636                inblk = incur;
5637        }
5638
5639        if (!is_ignore) {
5640            int nbouttmp = 3;
5641
5642            int is_break = 0;
5643
5644            if (is_end) {
5645                if (nbintmp == 0)
5646                    break;
5647                if ((nbintmp == 1) || (nbintmp == 2))
5648                    nbouttmp = 1;
5649                else
5650                    nbouttmp = 2;
5651                nbintmp = 3;
5652                is_break = 1;
5653            }
5654            intmp[nbintmp++] = cur;
5655            /*
5656             * if intmp is full, push the 4byte sequence as a 3 byte
5657             * sequence out
5658             */
5659            if (nbintmp == 4) {
5660                nbintmp = 0;
5661                outtmp[0] = (intmp[0] << 2) | ((intmp[1] & 0x30) >> 4);
5662                outtmp[1] =
5663                    ((intmp[1] & 0x0F) << 4) | ((intmp[2] & 0x3C) >> 2);
5664                outtmp[2] = ((intmp[2] & 0x03) << 6) | (intmp[3] & 0x3F);
5665                if (outcur + 3 >= outmax) {
5666                    retval = 2;
5667                    break;
5668                }
5669
5670                for (i = 0; i < nbouttmp; i++)
5671                    to[outcur++] = outtmp[i];
5672                inblk = incur;
5673            }
5674
5675            if (is_break) {
5676                retval = 0;
5677                break;
5678            }
5679        }
5680    }
5681
5682    *tolen = outcur;
5683    *inlen = inblk;
5684    return (retval);
5685}
5686
5687/*
5688 * Test routine for the xmlBase64Decode function
5689 */
5690#if 0
5691int
5692main(int argc, char **argv)
5693{
5694    char *input = "  VW4 gcGV0        \n      aXQgdGVzdCAuCg== ";
5695
5696    char output[100];
5697
5698    char output2[100];
5699
5700    char output3[100];
5701
5702    unsigned long inlen = strlen(input);
5703
5704    unsigned long outlen = 100;
5705
5706    int ret;
5707
5708    unsigned long cons, tmp, tmp2, prod;
5709
5710    /*
5711     * Direct
5712     */
5713    ret = xmlBase64Decode(input, &inlen, output, &outlen);
5714
5715    output[outlen] = 0;
5716    printf("ret: %d, inlen: %ld , outlen: %ld, output: '%s'\n", ret, inlen,
5717           outlen, output)indent: Standard input:179: Error:Unmatched #endif
5718;
5719
5720    /*
5721     * output chunking
5722     */
5723    cons = 0;
5724    prod = 0;
5725    while (cons < inlen) {
5726        tmp = 5;
5727        tmp2 = inlen - cons;
5728
5729        printf("%ld %ld\n", cons, prod);
5730        ret = xmlBase64Decode(&input[cons], &tmp2, &output2[prod], &tmp);
5731        cons += tmp2;
5732        prod += tmp;
5733        printf("%ld %ld\n", cons, prod);
5734    }
5735    output2[outlen] = 0;
5736    printf("ret: %d, cons: %ld , prod: %ld, output: '%s'\n", ret, cons,
5737           prod, output2);
5738
5739    /*
5740     * input chunking
5741     */
5742    cons = 0;
5743    prod = 0;
5744    while (cons < inlen) {
5745        tmp = 100 - prod;
5746        tmp2 = inlen - cons;
5747        if (tmp2 > 5)
5748            tmp2 = 5;
5749
5750        printf("%ld %ld\n", cons, prod);
5751        ret = xmlBase64Decode(&input[cons], &tmp2, &output3[prod], &tmp);
5752        cons += tmp2;
5753        prod += tmp;
5754        printf("%ld %ld\n", cons, prod);
5755    }
5756    output3[outlen] = 0;
5757    printf("ret: %d, cons: %ld , prod: %ld, output: '%s'\n", ret, cons,
5758           prod, output3);
5759    return (0);
5760
5761}
5762#endif
5763#endif /* NOT_USED_YET */
5764#define bottom_xmlreader
5765#include "elfgcchack.h"
5766#endif /* LIBXML_READER_ENABLED */
5767