Welcome to Gnome

/* * 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 "xmlversion.h" #if defined(LIBXML_XPATH_ENABLED) && defined(LIBXML_DEBUG_ENABLED) #include #include #ifdef HAVE_SYS_TYPES_H #include #endif #ifdef HAVE_SYS_STAT_H #include #endif #ifdef HAVE_FCNTL_H #include #endif #ifdef HAVE_UNISTD_H #include #endif #ifdef HAVE_STDLIB_H #include #endif #include #include #include #include #include #include #if defined(LIBXML_XPTR_ENABLED) #include 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[] = "\n\ \n\ \n\ Welcome to Gnome\n\ \n\ \n\ The Linux adventure\n\

bla bla bla ...

\n\ \n\

...

\n\ \n\ \n\ Chapter 2\n\

this is chapter 2 ...

\n\ \n\ \n\ Chapter 3\n\

this is chapter 3 ...

\n\ \n\ \n\ Chapter 4\n\

this is chapter 4 ...

\n\ \n\ \n\ Chapter 5\n\

this is chapter 5 ...

\n\ \n\ \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 :\n", 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 : from "); if (cur->index >= 0) fprintf(output, "index %d in ", cur->index); fprintf(output, "node"); 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"); 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; 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 int main(int argc, char **argv) { printf("%s : XPath/Debug support not compiled in\n", argv[0]); return(0); } #endif /* LIBXML_XPATH_ENABLED */