testXPath.c - fp2-dev/platform/external/libxml2 - Gitiles

 /*
  * testXPath.c : a small tester program for XPath.
  *
  * See Copyright for the status of this software.
  *
  * Daniel.Veillard@w3.org
  */

 #ifdef WIN32
 #include "win32config.h"
 #else
 #include "config.h"
 #endif

 #include <libxml/xmlversion.h>
 #if defined(LIBXML_XPATH_ENABLED) && defined(LIBXML_DEBUG_ENABLED)

 #include <stdio.h>
 #include <string.h>

 #ifdef HAVE_SYS_TYPES_H
 #include <sys/types.h>
 #endif
 #ifdef HAVE_SYS_STAT_H
 #include <sys/stat.h>
 #endif
 #ifdef HAVE_FCNTL_H
 #include <fcntl.h>
 #endif
 #ifdef HAVE_UNISTD_H
 #include <unistd.h>
 #endif
 #ifdef HAVE_STDLIB_H
 #include <stdlib.h>
 #endif


 #include <libxml/xpath.h>
 #include <libxml/tree.h>
 #include <libxml/parser.h>
 #include <libxml/debugXML.h>
 #include <libxml/xmlmemory.h>
 #include <libxml/parserInternals.h>
 #if defined(LIBXML_XPTR_ENABLED)
 #include <libxml/xpointer.h>
 static int xptr = 0;
 #endif
 static int debug = 0;
 static int valid = 0;
 static int expr = 0;
 static xmlDocPtr document = NULL;

 /*
  * Default document
  */
 static xmlChar buffer[] =
 "<?xml version=\"1.0\"?>\n\
 <EXAMPLE prop1=\"gnome is great\" prop2=\"&amp; linux too\">\n\
   <head>\n\
    <title>Welcome to Gnome</title>\n\
   </head>\n\
   <chapter>\n\
    <title>The Linux adventure</title>\n\
    <p>bla bla bla ...</p>\n\
    <image href=\"linus.gif\"/>\n\
    <p>...</p>\n\
   </chapter>\n\
   <chapter>\n\
    <title>Chapter 2</title>\n\
    <p>this is chapter 2 ...</p>\n\
   </chapter>\n\
   <chapter>\n\
    <title>Chapter 3</title>\n\
    <p>this is chapter 3 ...</p>\n\
   </chapter>\n\
   <chapter>\n\
    <title>Chapter 4</title>\n\
    <p>this is chapter 4 ...</p>\n\
   </chapter>\n\
   <chapter>\n\
    <title>Chapter 5</title>\n\
    <p>this is chapter 5 ...</p>\n\
   </chapter>\n\
 </EXAMPLE>\n\
 ";

 void xmlXPAthDebugDumpNode(FILE *output, xmlNodePtr cur, int depth) {
     int i;
     char shift[100];

     for (i = 0;((i < depth) && (i < 25));i++)
         shift[2 * i] = shift[2 * i + 1] = ' ';
     shift[2 * i] = shift[2 * i + 1] = 0;
     if (cur == NULL) {
 	fprintf(output, shift);
 	fprintf(output, "Node is NULL !\n");
 	return;

     }

     if ((cur->type == XML_DOCUMENT_NODE) ||
 	     (cur->type == XML_HTML_DOCUMENT_NODE)) {
 	fprintf(output, shift);
 	fprintf(output, " /\n");
     } else if (cur->type == XML_ATTRIBUTE_NODE)
 	xmlDebugDumpAttr(output, (xmlAttrPtr)cur, depth);
     else
 	xmlDebugDumpOneNode(output, cur, depth);
 }

 void xmlXPAthDebugDumpNodeSet(FILE *output, xmlNodeSetPtr cur, int depth) {
     int i;
     char shift[100];

     for (i = 0;((i < depth) && (i < 25));i++)
         shift[2 * i] = shift[2 * i + 1] = ' ';
     shift[2 * i] = shift[2 * i + 1] = 0;

     if (cur == NULL) {
 	fprintf(output, shift);
 	fprintf(output, "NodeSet is NULL !\n");
 	return;

     }

     fprintf(output, "Set contains %d nodes:\n", cur->nodeNr);
     for (i = 0;i < cur->nodeNr;i++) {
 	fprintf(output, shift);
         fprintf(output, "%d", i + 1);
 	xmlXPAthDebugDumpNode(output, cur->nodeTab[i], depth + 1);
     }
 }

 #if defined(LIBXML_XPTR_ENABLED)
 void xmlXPAthDebugDumpObject(FILE *output, xmlXPathObjectPtr cur, int depth);
 void xmlXPAthDebugDumpLocationSet(FILE *output, xmlLocationSetPtr cur, int depth) {
     int i;
     char shift[100];

     for (i = 0;((i < depth) && (i < 25));i++)
         shift[2 * i] = shift[2 * i + 1] = ' ';
     shift[2 * i] = shift[2 * i + 1] = 0;

     if (cur == NULL) {
 	fprintf(output, shift);
 	fprintf(output, "LocationSet is NULL !\n");
 	return;

     }

     for (i = 0;i < cur->locNr;i++) {
 	fprintf(output, shift);
         fprintf(output, "%d : ", i + 1);
 	xmlXPAthDebugDumpObject(output, cur->locTab[i], depth + 1);
     }
 }
 #endif

 void xmlXPAthDebugDumpObject(FILE *output, xmlXPathObjectPtr cur, int depth) {
     int i;
     char shift[100];

     for (i = 0;((i < depth) && (i < 25));i++)
         shift[2 * i] = shift[2 * i + 1] = ' ';
     shift[2 * i] = shift[2 * i + 1] = 0;

     fprintf(output, shift);

     if (cur == NULL) {
         fprintf(output, "Object is empty (NULL)\n");
 	return;
     }
     switch(cur->type) {
         case XPATH_UNDEFINED:
 	    fprintf(output, "Object is uninitialized\n");
 	    break;
         case XPATH_NODESET:
 	    fprintf(output, "Object is a Node Set :\n");
 	    xmlXPAthDebugDumpNodeSet(output, cur->nodesetval, depth);
 	    break;
         case XPATH_BOOLEAN:
 	    fprintf(output, "Object is a Boolean : ");
 	    if (cur->boolval) fprintf(output, "true\n");
 	    else fprintf(output, "false\n");
 	    break;
         case XPATH_NUMBER:
 	    fprintf(output, "Object is a number : %0g\n", cur->floatval);
 	    break;
         case XPATH_STRING:
 	    fprintf(output, "Object is a string : ");
 	    xmlDebugDumpString(output, cur->stringval);
 	    fprintf(output, "\n");
 	    break;
 	case XPATH_POINT:
 	    fprintf(output, "Object is a point : index %d in node", cur->index);
 	    xmlXPAthDebugDumpNode(output, (xmlNodePtr) cur->user, depth + 1);
 	    fprintf(output, "\n");
 	    break;
 	case XPATH_RANGE:
 	    fprintf(output, "Object is a range :\n");
 	    fprintf(output, shift);
 	    fprintf(output, "From ");
 	    if (cur->index >= 0)
 		fprintf(output, "index %d in ", cur->index);
 	    fprintf(output, "node\n");
 	    xmlXPAthDebugDumpNode(output, (xmlNodePtr) cur->user, depth + 1);
 	    fprintf(output, shift);
 	    fprintf(output, "To ");
 	    if (cur->index2 >= 0)
 		fprintf(output, "index %d in ", cur->index2);
 	    fprintf(output, "node\n");
 	    xmlXPAthDebugDumpNode(output, (xmlNodePtr) cur->user2, depth + 1);
 	    fprintf(output, "\n");
 	    break;
 	case XPATH_LOCATIONSET:
 #if defined(LIBXML_XPTR_ENABLED)
 	    fprintf(output, "Object is a Location Set:\n");
 	    xmlXPAthDebugDumpLocationSet(output,
 		    (xmlLocationSetPtr) cur->user, depth);
 #endif
 	    break;
 	case XPATH_USERS:
 	    fprintf(output, "Object is user defined\n");
 	    break;
     }
 }

 void testXPath(const char *str) {
     xmlXPathObjectPtr res;
     xmlXPathContextPtr ctxt;

 #if defined(LIBXML_XPTR_ENABLED)
     if (xptr) {
 	ctxt = xmlXPtrNewContext(document, NULL, NULL);
 	res = xmlXPtrEval(BAD_CAST str, ctxt);
     } else {
 #endif
 	ctxt = xmlXPathNewContext(document);
 	if (expr)
 	    res = xmlXPathEvalExpression(BAD_CAST str, ctxt);
 	else
 	    res = xmlXPathEval(BAD_CAST str, ctxt);
 #if defined(LIBXML_XPTR_ENABLED)
     }
 #endif
     xmlXPAthDebugDumpObject(stdout, res, 0);
     xmlXPathFreeObject(res);
     xmlXPathFreeContext(ctxt);
 }

 void testXPathFile(const char *filename) {
     FILE *input;
     char expr[5000];
     int len;

     input = fopen(filename, "r");
     if (input == NULL) {
         fprintf(stderr, "Cannot open %s for reading\n", filename);
 	return;
     }
     while (fgets(expr, 4500, input) != NULL) {
 	len = strlen(expr);
 	len--;
 	while ((len >= 0) &&
 	       ((expr[len] == '\n') || (expr[len] == '\t') ||
 		(expr[len] == '\r') || (expr[len] == ' '))) len--;
 	expr[len + 1] = 0;
 	if (len >= 0) {
 	    printf("\n========================\nExpression: %s\n", expr) ;
 	    testXPath(expr);
 	}
     }

     fclose(input);
 }

 int main(int argc, char **argv) {
     int i;
     int strings = 0;
     int usefile = 0;
     char *filename = NULL;

     for (i = 1; i < argc ; i++) {
 #if defined(LIBXML_XPTR_ENABLED)
 	if ((!strcmp(argv[i], "-xptr")) || (!strcmp(argv[i], "--xptr")))
 	    xptr++;
 #endif
 	if ((!strcmp(argv[i], "-debug")) || (!strcmp(argv[i], "--debug")))
 	    debug++;
 	if ((!strcmp(argv[i], "-valid")) || (!strcmp(argv[i], "--valid")))
 	    valid++;
 	if ((!strcmp(argv[i], "-expr")) || (!strcmp(argv[i], "--expr")))
 	    expr++;
 	if ((!strcmp(argv[i], "-i")) || (!strcmp(argv[i], "--input")))
 	    filename = argv[++i];
 	if ((!strcmp(argv[i], "-f")) || (!strcmp(argv[i], "--file")))
 	    usefile++;
     }
     if (valid != 0) xmlDoValidityCheckingDefaultValue = 1;
     if (document == NULL) {
         if (filename == NULL)
 	    document = xmlParseDoc(buffer);
 	else
 	    document = xmlParseFile(filename);
     }
     for (i = 1; i < argc ; i++) {
 	if ((!strcmp(argv[i], "-i")) || (!strcmp(argv[i], "--input"))) {
 	    i++; continue;
 	}
 	if (argv[i][0] != '-') {
 	    if (usefile)
 	        testXPathFile(argv[i]);
 	    else
 		testXPath(argv[i]);
 	    strings ++;
 	}
     }
     if (strings == 0) {
 	printf("Usage : %s [--debug] [--copy] stringsorfiles ...\n",
 	       argv[0]);
 	printf("\tParse the XPath strings and output the result of the parsing\n");
 	printf("\t--debug : dump a debug version of the result\n");
 	printf("\t--valid : switch on DTD support in the parser\n");
 	printf("\t--expr : debug XPath expressions only\n");
 	printf("\t--input filename : or\n");
 	printf("\t-i filename      : read the document from filename\n");
 	printf("\t--file : or\n");
 	printf("\t-f     : read queries from files, args\n");
     }
     if (document != NULL)
 	xmlFreeDoc(document);
     xmlCleanupParser();
     xmlMemoryDump();

     return(0);
 }
 #else
 #include <stdio.h>
 int main(int argc, char **argv) {
     printf("%s : XPath/Debug support not compiled in\n", argv[0]);
     return(0);
 }
 #endif /* LIBXML_XPATH_ENABLED */
	/*
	* testXPath.c : a small tester program for XPath.
	*
	* See Copyright for the status of this software.
	*
	* Daniel.Veillard@w3.org
	*/

	#ifdef WIN32
	#include "win32config.h"
	#else
	#include "config.h"
	#endif

	#include <libxml/xmlversion.h>
	#if defined(LIBXML_XPATH_ENABLED) && defined(LIBXML_DEBUG_ENABLED)

	#include <stdio.h>
	#include <string.h>

	#ifdef HAVE_SYS_TYPES_H
	#include <sys/types.h>
	#endif
	#ifdef HAVE_SYS_STAT_H
	#include <sys/stat.h>
	#endif
	#ifdef HAVE_FCNTL_H
	#include <fcntl.h>
	#endif
	#ifdef HAVE_UNISTD_H
	#include <unistd.h>
	#endif
	#ifdef HAVE_STDLIB_H
	#include <stdlib.h>
	#endif


	#include <libxml/xpath.h>
	#include <libxml/tree.h>
	#include <libxml/parser.h>
	#include <libxml/debugXML.h>
	#include <libxml/xmlmemory.h>
	#include <libxml/parserInternals.h>
	#if defined(LIBXML_XPTR_ENABLED)
	#include <libxml/xpointer.h>
	static int xptr = 0;
	#endif
	static int debug = 0;
	static int valid = 0;
	static int expr = 0;
	static xmlDocPtr document = NULL;

	/*
	* Default document
	*/
	static xmlChar buffer[] =
	"<?xml version=\"1.0\"?>\n\
	<EXAMPLE prop1=\"gnome is great\" prop2=\"& linux too\">\n\
	<head>\n\
	<title>Welcome to Gnome</title>\n\
	</head>\n\
	<chapter>\n\
	<title>The Linux adventure</title>\n\
	<p>bla bla bla ...</p>\n\
	<image href=\"linus.gif\"/>\n\
	<p>...</p>\n\
	</chapter>\n\
	<chapter>\n\
	<title>Chapter 2</title>\n\
	<p>this is chapter 2 ...</p>\n\
	</chapter>\n\
	<chapter>\n\
	<title>Chapter 3</title>\n\
	<p>this is chapter 3 ...</p>\n\
	</chapter>\n\
	<chapter>\n\
	<title>Chapter 4</title>\n\
	<p>this is chapter 4 ...</p>\n\
	</chapter>\n\
	<chapter>\n\
	<title>Chapter 5</title>\n\
	<p>this is chapter 5 ...</p>\n\
	</chapter>\n\
	</EXAMPLE>\n\
	";

	void xmlXPAthDebugDumpNode(FILE *output, xmlNodePtr cur, int depth) {
	int i;
	char shift[100];

	for (i = 0;((i < depth) && (i < 25));i++)
	shift[2 * i] = shift[2 * i + 1] = ' ';
	shift[2 * i] = shift[2 * i + 1] = 0;
	if (cur == NULL) {
	fprintf(output, shift);
	fprintf(output, "Node is NULL !\n");
	return;

	}

	if ((cur->type == XML_DOCUMENT_NODE) \|\|
	(cur->type == XML_HTML_DOCUMENT_NODE)) {
	fprintf(output, shift);
	fprintf(output, " /\n");
	} else if (cur->type == XML_ATTRIBUTE_NODE)
	xmlDebugDumpAttr(output, (xmlAttrPtr)cur, depth);
	else
	xmlDebugDumpOneNode(output, cur, depth);
	}

	void xmlXPAthDebugDumpNodeSet(FILE *output, xmlNodeSetPtr cur, int depth) {
	int i;
	char shift[100];

	for (i = 0;((i < depth) && (i < 25));i++)
	shift[2 * i] = shift[2 * i + 1] = ' ';
	shift[2 * i] = shift[2 * i + 1] = 0;

	if (cur == NULL) {
	fprintf(output, shift);
	fprintf(output, "NodeSet is NULL !\n");
	return;

	}

	fprintf(output, "Set contains %d nodes:\n", cur->nodeNr);
	for (i = 0;i < cur->nodeNr;i++) {
	fprintf(output, shift);
	fprintf(output, "%d", i + 1);
	xmlXPAthDebugDumpNode(output, cur->nodeTab[i], depth + 1);
	}
	}

	#if defined(LIBXML_XPTR_ENABLED)
	void xmlXPAthDebugDumpObject(FILE *output, xmlXPathObjectPtr cur, int depth);
	void xmlXPAthDebugDumpLocationSet(FILE *output, xmlLocationSetPtr cur, int depth) {
	int i;
	char shift[100];

	for (i = 0;((i < depth) && (i < 25));i++)
	shift[2 * i] = shift[2 * i + 1] = ' ';
	shift[2 * i] = shift[2 * i + 1] = 0;

	if (cur == NULL) {
	fprintf(output, shift);
	fprintf(output, "LocationSet is NULL !\n");
	return;

	}

	for (i = 0;i < cur->locNr;i++) {
	fprintf(output, shift);
	fprintf(output, "%d : ", i + 1);
	xmlXPAthDebugDumpObject(output, cur->locTab[i], depth + 1);
	}
	}
	#endif

	void xmlXPAthDebugDumpObject(FILE *output, xmlXPathObjectPtr cur, int depth) {
	int i;
	char shift[100];

	for (i = 0;((i < depth) && (i < 25));i++)
	shift[2 * i] = shift[2 * i + 1] = ' ';
	shift[2 * i] = shift[2 * i + 1] = 0;

	fprintf(output, shift);

	if (cur == NULL) {
	fprintf(output, "Object is empty (NULL)\n");
	return;
	}
	switch(cur->type) {
	case XPATH_UNDEFINED:
	fprintf(output, "Object is uninitialized\n");
	break;
	case XPATH_NODESET:
	fprintf(output, "Object is a Node Set :\n");
	xmlXPAthDebugDumpNodeSet(output, cur->nodesetval, depth);
	break;
	case XPATH_BOOLEAN:
	fprintf(output, "Object is a Boolean : ");
	if (cur->boolval) fprintf(output, "true\n");
	else fprintf(output, "false\n");
	break;
	case XPATH_NUMBER:
	fprintf(output, "Object is a number : %0g\n", cur->floatval);
	break;
	case XPATH_STRING:
	fprintf(output, "Object is a string : ");
	xmlDebugDumpString(output, cur->stringval);
	fprintf(output, "\n");
	break;
	case XPATH_POINT:
	fprintf(output, "Object is a point : index %d in node", cur->index);
	xmlXPAthDebugDumpNode(output, (xmlNodePtr) cur->user, depth + 1);
	fprintf(output, "\n");
	break;
	case XPATH_RANGE:
	fprintf(output, "Object is a range :\n");
	fprintf(output, shift);
	fprintf(output, "From ");
	if (cur->index >= 0)
	fprintf(output, "index %d in ", cur->index);
	fprintf(output, "node\n");
	xmlXPAthDebugDumpNode(output, (xmlNodePtr) cur->user, depth + 1);
	fprintf(output, shift);
	fprintf(output, "To ");
	if (cur->index2 >= 0)
	fprintf(output, "index %d in ", cur->index2);
	fprintf(output, "node\n");
	xmlXPAthDebugDumpNode(output, (xmlNodePtr) cur->user2, depth + 1);
	fprintf(output, "\n");
	break;
	case XPATH_LOCATIONSET:
	#if defined(LIBXML_XPTR_ENABLED)
	fprintf(output, "Object is a Location Set:\n");
	xmlXPAthDebugDumpLocationSet(output,
	(xmlLocationSetPtr) cur->user, depth);
	#endif
	break;
	case XPATH_USERS:
	fprintf(output, "Object is user defined\n");
	break;
	}
	}

	void testXPath(const char *str) {
	xmlXPathObjectPtr res;
	xmlXPathContextPtr ctxt;

	#if defined(LIBXML_XPTR_ENABLED)
	if (xptr) {
	ctxt = xmlXPtrNewContext(document, NULL, NULL);
	res = xmlXPtrEval(BAD_CAST str, ctxt);
	} else {
	#endif
	ctxt = xmlXPathNewContext(document);
	if (expr)
	res = xmlXPathEvalExpression(BAD_CAST str, ctxt);
	else
	res = xmlXPathEval(BAD_CAST str, ctxt);
	#if defined(LIBXML_XPTR_ENABLED)
	}
	#endif
	xmlXPAthDebugDumpObject(stdout, res, 0);
	xmlXPathFreeObject(res);
	xmlXPathFreeContext(ctxt);
	}

	void testXPathFile(const char *filename) {
	FILE *input;
	char expr[5000];
	int len;

	input = fopen(filename, "r");
	if (input == NULL) {
	fprintf(stderr, "Cannot open %s for reading\n", filename);
	return;
	}
	while (fgets(expr, 4500, input) != NULL) {
	len = strlen(expr);
	len--;
	while ((len >= 0) &&
	((expr[len] == '\n') \|\| (expr[len] == '\t') \|\|
	(expr[len] == '\r') \|\| (expr[len] == ' '))) len--;
	expr[len + 1] = 0;
	if (len >= 0) {
	printf("\n========================\nExpression: %s\n", expr) ;
	testXPath(expr);
	}
	}

	fclose(input);
	}

	int main(int argc, char **argv) {
	int i;
	int strings = 0;
	int usefile = 0;
	char *filename = NULL;

	for (i = 1; i < argc ; i++) {
	#if defined(LIBXML_XPTR_ENABLED)
	if ((!strcmp(argv[i], "-xptr")) \|\| (!strcmp(argv[i], "--xptr")))
	xptr++;
	#endif
	if ((!strcmp(argv[i], "-debug")) \|\| (!strcmp(argv[i], "--debug")))
	debug++;
	if ((!strcmp(argv[i], "-valid")) \|\| (!strcmp(argv[i], "--valid")))
	valid++;
	if ((!strcmp(argv[i], "-expr")) \|\| (!strcmp(argv[i], "--expr")))
	expr++;
	if ((!strcmp(argv[i], "-i")) \|\| (!strcmp(argv[i], "--input")))
	filename = argv[++i];
	if ((!strcmp(argv[i], "-f")) \|\| (!strcmp(argv[i], "--file")))
	usefile++;
	}
	if (valid != 0) xmlDoValidityCheckingDefaultValue = 1;
	if (document == NULL) {
	if (filename == NULL)
	document = xmlParseDoc(buffer);
	else
	document = xmlParseFile(filename);
	}
	for (i = 1; i < argc ; i++) {
	if ((!strcmp(argv[i], "-i")) \|\| (!strcmp(argv[i], "--input"))) {
	i++; continue;
	}
	if (argv[i][0] != '-') {
	if (usefile)
	testXPathFile(argv[i]);
	else
	testXPath(argv[i]);
	strings ++;
	}
	}
	if (strings == 0) {
	printf("Usage : %s [--debug] [--copy] stringsorfiles ...\n",
	argv[0]);
	printf("\tParse the XPath strings and output the result of the parsing\n");
	printf("\t--debug : dump a debug version of the result\n");
	printf("\t--valid : switch on DTD support in the parser\n");
	printf("\t--expr : debug XPath expressions only\n");
	printf("\t--input filename : or\n");
	printf("\t-i filename : read the document from filename\n");
	printf("\t--file : or\n");
	printf("\t-f : read queries from files, args\n");
	}
	if (document != NULL)
	xmlFreeDoc(document);
	xmlCleanupParser();
	xmlMemoryDump();

	return(0);
	}
	#else
	#include <stdio.h>
	int main(int argc, char **argv) {
	printf("%s : XPath/Debug support not compiled in\n", argv[0]);
	return(0);
	}
	#endif /* LIBXML_XPATH_ENABLED */