mirror of
https://github.com/reactos/reactos.git
synced 2025-08-06 00:03:00 +00:00
Create a branch for header work.
svn path=/branches/header-work/; revision=45691
This commit is contained in:
Timo Kreuzer
parent
14fe274b1c
commit
9ea495ba33
19538 changed files with 0 additions and 1063950 deletions
402
lib/3rdparty/libxml2/testRegexp.c
vendored
Normal file
402
lib/3rdparty/libxml2/testRegexp.c
vendored
Normal file
|
|
@ -0,0 +1,402 @@
|
|||
/*
|
||||
* testRegexp.c: simple module for testing regular expressions
|
||||
*
|
||||
* See Copyright for the status of this software.
|
||||
*
|
||||
* Daniel Veillard <veillard@redhat.com>
|
||||
*/
|
||||
|
||||
#include "libxml.h"
|
||||
#ifdef LIBXML_REGEXP_ENABLED
|
||||
#include <string.h>
|
||||
|
||||
#include <libxml/tree.h>
|
||||
#include <libxml/xmlregexp.h>
|
||||
|
||||
static int repeat = 0;
|
||||
static int debug = 0;
|
||||
|
||||
static void testRegexp(xmlRegexpPtr comp, const char *value) {
|
||||
int ret;
|
||||
|
||||
ret = xmlRegexpExec(comp, (const xmlChar *) value);
|
||||
if (ret == 1)
|
||||
printf("%s: Ok\n", value);
|
||||
else if (ret == 0)
|
||||
printf("%s: Fail\n", value);
|
||||
else
|
||||
printf("%s: Error: %d\n", value, ret);
|
||||
if (repeat) {
|
||||
int j;
|
||||
for (j = 0;j < 999999;j++)
|
||||
xmlRegexpExec(comp, (const xmlChar *) value);
|
||||
}
|
||||
}
|
||||
|
||||
static void
|
||||
testRegexpFile(const char *filename) {
|
||||
xmlRegexpPtr comp = NULL;
|
||||
FILE *input;
|
||||
char expression[5000];
|
||||
int len;
|
||||
|
||||
input = fopen(filename, "r");
|
||||
if (input == NULL) {
|
||||
xmlGenericError(xmlGenericErrorContext,
|
||||
"Cannot open %s for reading\n", filename);
|
||||
return;
|
||||
}
|
||||
while (fgets(expression, 4500, input) != NULL) {
|
||||
len = strlen(expression);
|
||||
len--;
|
||||
while ((len >= 0) &&
|
||||
((expression[len] == '\n') || (expression[len] == '\t') ||
|
||||
(expression[len] == '\r') || (expression[len] == ' '))) len--;
|
||||
expression[len + 1] = 0;
|
||||
if (len >= 0) {
|
||||
if (expression[0] == '#')
|
||||
continue;
|
||||
if ((expression[0] == '=') && (expression[1] == '>')) {
|
||||
char *pattern = &expression[2];
|
||||
|
||||
if (comp != NULL) {
|
||||
xmlRegFreeRegexp(comp);
|
||||
comp = NULL;
|
||||
}
|
||||
printf("Regexp: %s\n", pattern) ;
|
||||
comp = xmlRegexpCompile((const xmlChar *) pattern);
|
||||
if (comp == NULL) {
|
||||
printf(" failed to compile\n");
|
||||
break;
|
||||
}
|
||||
} else if (comp == NULL) {
|
||||
printf("Regexp: %s\n", expression) ;
|
||||
comp = xmlRegexpCompile((const xmlChar *) expression);
|
||||
if (comp == NULL) {
|
||||
printf(" failed to compile\n");
|
||||
break;
|
||||
}
|
||||
} else if (comp != NULL) {
|
||||
testRegexp(comp, expression);
|
||||
}
|
||||
}
|
||||
}
|
||||
fclose(input);
|
||||
if (comp != NULL)
|
||||
xmlRegFreeRegexp(comp);
|
||||
}
|
||||
|
||||
#ifdef LIBXML_EXPR_ENABLED
|
||||
static void
|
||||
runFileTest(xmlExpCtxtPtr ctxt, const char *filename) {
|
||||
xmlExpNodePtr expr = NULL, sub;
|
||||
FILE *input;
|
||||
char expression[5000];
|
||||
int len;
|
||||
|
||||
input = fopen(filename, "r");
|
||||
if (input == NULL) {
|
||||
xmlGenericError(xmlGenericErrorContext,
|
||||
"Cannot open %s for reading\n", filename);
|
||||
return;
|
||||
}
|
||||
while (fgets(expression, 4500, input) != NULL) {
|
||||
len = strlen(expression);
|
||||
len--;
|
||||
while ((len >= 0) &&
|
||||
((expression[len] == '\n') || (expression[len] == '\t') ||
|
||||
(expression[len] == '\r') || (expression[len] == ' '))) len--;
|
||||
expression[len + 1] = 0;
|
||||
if (len >= 0) {
|
||||
if (expression[0] == '#')
|
||||
continue;
|
||||
if ((expression[0] == '=') && (expression[1] == '>')) {
|
||||
char *str = &expression[2];
|
||||
|
||||
if (expr != NULL) {
|
||||
xmlExpFree(ctxt, expr);
|
||||
if (xmlExpCtxtNbNodes(ctxt) != 0)
|
||||
printf(" Parse/free of Expression leaked %d\n",
|
||||
xmlExpCtxtNbNodes(ctxt));
|
||||
expr = NULL;
|
||||
}
|
||||
printf("Expression: %s\n", str) ;
|
||||
expr = xmlExpParse(ctxt, str);
|
||||
if (expr == NULL) {
|
||||
printf(" parsing Failed\n");
|
||||
break;
|
||||
}
|
||||
} else if (expr != NULL) {
|
||||
int expect = -1;
|
||||
int nodes1, nodes2;
|
||||
|
||||
if (expression[0] == '0')
|
||||
expect = 0;
|
||||
if (expression[0] == '1')
|
||||
expect = 1;
|
||||
printf("Subexp: %s", expression + 2) ;
|
||||
nodes1 = xmlExpCtxtNbNodes(ctxt);
|
||||
sub = xmlExpParse(ctxt, expression + 2);
|
||||
if (sub == NULL) {
|
||||
printf(" parsing Failed\n");
|
||||
break;
|
||||
} else {
|
||||
int ret;
|
||||
|
||||
nodes2 = xmlExpCtxtNbNodes(ctxt);
|
||||
ret = xmlExpSubsume(ctxt, expr, sub);
|
||||
|
||||
if ((expect == 1) && (ret == 1)) {
|
||||
printf(" => accept, Ok\n");
|
||||
} else if ((expect == 0) && (ret == 0)) {
|
||||
printf(" => reject, Ok\n");
|
||||
} else if ((expect == 1) && (ret == 0)) {
|
||||
printf(" => reject, Failed\n");
|
||||
} else if ((expect == 0) && (ret == 1)) {
|
||||
printf(" => accept, Failed\n");
|
||||
} else {
|
||||
printf(" => fail internally\n");
|
||||
}
|
||||
if (xmlExpCtxtNbNodes(ctxt) > nodes2) {
|
||||
printf(" Subsume leaked %d\n",
|
||||
xmlExpCtxtNbNodes(ctxt) - nodes2);
|
||||
nodes1 += xmlExpCtxtNbNodes(ctxt) - nodes2;
|
||||
}
|
||||
xmlExpFree(ctxt, sub);
|
||||
if (xmlExpCtxtNbNodes(ctxt) > nodes1) {
|
||||
printf(" Parse/free leaked %d\n",
|
||||
xmlExpCtxtNbNodes(ctxt) - nodes1);
|
||||
}
|
||||
}
|
||||
|
||||
}
|
||||
}
|
||||
}
|
||||
if (expr != NULL) {
|
||||
xmlExpFree(ctxt, expr);
|
||||
if (xmlExpCtxtNbNodes(ctxt) != 0)
|
||||
printf(" Parse/free of Expression leaked %d\n",
|
||||
xmlExpCtxtNbNodes(ctxt));
|
||||
}
|
||||
fclose(input);
|
||||
}
|
||||
|
||||
static void
|
||||
testReduce(xmlExpCtxtPtr ctxt, xmlExpNodePtr expr, const char *tst) {
|
||||
xmlBufferPtr xmlExpBuf;
|
||||
xmlExpNodePtr sub, deriv;
|
||||
xmlExpBuf = xmlBufferCreate();
|
||||
|
||||
sub = xmlExpParse(ctxt, tst);
|
||||
if (sub == NULL) {
|
||||
printf("Subset %s failed to parse\n", tst);
|
||||
return;
|
||||
}
|
||||
xmlExpDump(xmlExpBuf, sub);
|
||||
printf("Subset parsed as: %s\n",
|
||||
(const char *) xmlBufferContent(xmlExpBuf));
|
||||
deriv = xmlExpExpDerive(ctxt, expr, sub);
|
||||
if (deriv == NULL) {
|
||||
printf("Derivation led to an internal error, report this !\n");
|
||||
return;
|
||||
} else {
|
||||
xmlBufferEmpty(xmlExpBuf);
|
||||
xmlExpDump(xmlExpBuf, deriv);
|
||||
if (xmlExpIsNillable(deriv))
|
||||
printf("Resulting nillable derivation: %s\n",
|
||||
(const char *) xmlBufferContent(xmlExpBuf));
|
||||
else
|
||||
printf("Resulting derivation: %s\n",
|
||||
(const char *) xmlBufferContent(xmlExpBuf));
|
||||
xmlExpFree(ctxt, deriv);
|
||||
}
|
||||
xmlExpFree(ctxt, sub);
|
||||
}
|
||||
|
||||
static void
|
||||
exprDebug(xmlExpCtxtPtr ctxt, xmlExpNodePtr expr) {
|
||||
xmlBufferPtr xmlExpBuf;
|
||||
xmlExpNodePtr deriv;
|
||||
const char *list[40];
|
||||
int ret;
|
||||
|
||||
xmlExpBuf = xmlBufferCreate();
|
||||
|
||||
if (expr == NULL) {
|
||||
printf("Failed to parse\n");
|
||||
return;
|
||||
}
|
||||
xmlExpDump(xmlExpBuf, expr);
|
||||
printf("Parsed as: %s\n", (const char *) xmlBufferContent(xmlExpBuf));
|
||||
printf("Max token input = %d\n", xmlExpMaxToken(expr));
|
||||
if (xmlExpIsNillable(expr) == 1)
|
||||
printf("Is nillable\n");
|
||||
ret = xmlExpGetLanguage(ctxt, expr, (const xmlChar **) &list[0], 40);
|
||||
if (ret < 0)
|
||||
printf("Failed to get list: %d\n", ret);
|
||||
else {
|
||||
int i;
|
||||
|
||||
printf("Language has %d strings, testing string derivations\n", ret);
|
||||
for (i = 0;i < ret;i++) {
|
||||
deriv = xmlExpStringDerive(ctxt, expr, BAD_CAST list[i], -1);
|
||||
if (deriv == NULL) {
|
||||
printf(" %s -> derivation failed\n", list[i]);
|
||||
} else {
|
||||
xmlBufferEmpty(xmlExpBuf);
|
||||
xmlExpDump(xmlExpBuf, deriv);
|
||||
printf(" %s -> %s\n", list[i],
|
||||
(const char *) xmlBufferContent(xmlExpBuf));
|
||||
}
|
||||
xmlExpFree(ctxt, deriv);
|
||||
}
|
||||
}
|
||||
xmlBufferFree(xmlExpBuf);
|
||||
}
|
||||
#endif
|
||||
|
||||
static void usage(const char *name) {
|
||||
fprintf(stderr, "Usage: %s [flags]\n", name);
|
||||
fprintf(stderr, "Testing tool for libxml2 string and pattern regexps\n");
|
||||
fprintf(stderr, " --debug: switch on debugging\n");
|
||||
fprintf(stderr, " --repeat: loop on the operation\n");
|
||||
#ifdef LIBXML_EXPR_ENABLED
|
||||
fprintf(stderr, " --expr: test xmlExp and not xmlRegexp\n");
|
||||
#endif
|
||||
fprintf(stderr, " --input filename: use the given filename for regexp\n");
|
||||
fprintf(stderr, " --input filename: use the given filename for exp\n");
|
||||
}
|
||||
|
||||
int main(int argc, char **argv) {
|
||||
xmlRegexpPtr comp = NULL;
|
||||
#ifdef LIBXML_EXPR_ENABLED
|
||||
xmlExpNodePtr expr = NULL;
|
||||
int use_exp = 0;
|
||||
xmlExpCtxtPtr ctxt = NULL;
|
||||
#endif
|
||||
const char *pattern = NULL;
|
||||
char *filename = NULL;
|
||||
int i;
|
||||
|
||||
xmlInitMemory();
|
||||
|
||||
if (argc <= 1) {
|
||||
usage(argv[0]);
|
||||
return(1);
|
||||
}
|
||||
for (i = 1; i < argc ; i++) {
|
||||
if (!strcmp(argv[i], "-"))
|
||||
break;
|
||||
|
||||
if (argv[i][0] != '-')
|
||||
continue;
|
||||
if (!strcmp(argv[i], "--"))
|
||||
break;
|
||||
|
||||
if ((!strcmp(argv[i], "-debug")) || (!strcmp(argv[i], "--debug"))) {
|
||||
debug++;
|
||||
} else if ((!strcmp(argv[i], "-repeat")) ||
|
||||
(!strcmp(argv[i], "--repeat"))) {
|
||||
repeat++;
|
||||
#ifdef LIBXML_EXPR_ENABLED
|
||||
} else if ((!strcmp(argv[i], "-expr")) ||
|
||||
(!strcmp(argv[i], "--expr"))) {
|
||||
use_exp++;
|
||||
#endif
|
||||
} else if ((!strcmp(argv[i], "-i")) || (!strcmp(argv[i], "-f")) ||
|
||||
(!strcmp(argv[i], "--input")))
|
||||
filename = argv[++i];
|
||||
else {
|
||||
fprintf(stderr, "Unknown option %s\n", argv[i]);
|
||||
usage(argv[0]);
|
||||
}
|
||||
}
|
||||
|
||||
#ifdef LIBXML_EXPR_ENABLED
|
||||
if (use_exp)
|
||||
ctxt = xmlExpNewCtxt(0, NULL);
|
||||
#endif
|
||||
|
||||
if (filename != NULL) {
|
||||
#ifdef LIBXML_EXPR_ENABLED
|
||||
if (use_exp)
|
||||
runFileTest(ctxt, filename);
|
||||
else
|
||||
#endif
|
||||
testRegexpFile(filename);
|
||||
} else {
|
||||
int data = 0;
|
||||
#ifdef LIBXML_EXPR_ENABLED
|
||||
|
||||
if (use_exp) {
|
||||
for (i = 1; i < argc ; i++) {
|
||||
if (strcmp(argv[i], "--") == 0)
|
||||
data = 1;
|
||||
else if ((argv[i][0] != '-') || (strcmp(argv[i], "-") == 0) ||
|
||||
(data == 1)) {
|
||||
if (pattern == NULL) {
|
||||
pattern = argv[i];
|
||||
printf("Testing expr %s:\n", pattern);
|
||||
expr = xmlExpParse(ctxt, pattern);
|
||||
if (expr == NULL) {
|
||||
printf(" failed to compile\n");
|
||||
break;
|
||||
}
|
||||
if (debug) {
|
||||
exprDebug(ctxt, expr);
|
||||
}
|
||||
} else {
|
||||
testReduce(ctxt, expr, argv[i]);
|
||||
}
|
||||
}
|
||||
}
|
||||
if (expr != NULL) {
|
||||
xmlExpFree(ctxt, expr);
|
||||
expr = NULL;
|
||||
}
|
||||
} else
|
||||
#endif
|
||||
{
|
||||
for (i = 1; i < argc ; i++) {
|
||||
if (strcmp(argv[i], "--") == 0)
|
||||
data = 1;
|
||||
else if ((argv[i][0] != '-') || (strcmp(argv[i], "-") == 0) ||
|
||||
(data == 1)) {
|
||||
if (pattern == NULL) {
|
||||
pattern = argv[i];
|
||||
printf("Testing %s:\n", pattern);
|
||||
comp = xmlRegexpCompile((const xmlChar *) pattern);
|
||||
if (comp == NULL) {
|
||||
printf(" failed to compile\n");
|
||||
break;
|
||||
}
|
||||
if (debug)
|
||||
xmlRegexpPrint(stdout, comp);
|
||||
} else {
|
||||
testRegexp(comp, argv[i]);
|
||||
}
|
||||
}
|
||||
}
|
||||
if (comp != NULL)
|
||||
xmlRegFreeRegexp(comp);
|
||||
}
|
||||
}
|
||||
#ifdef LIBXML_EXPR_ENABLED
|
||||
if (ctxt != NULL) {
|
||||
printf("Ops: %d nodes, %d cons\n",
|
||||
xmlExpCtxtNbNodes(ctxt), xmlExpCtxtNbCons(ctxt));
|
||||
xmlExpFreeCtxt(ctxt);
|
||||
}
|
||||
#endif
|
||||
xmlCleanupParser();
|
||||
xmlMemoryDump();
|
||||
return(0);
|
||||
}
|
||||
|
||||
#else
|
||||
#include <stdio.h>
|
||||
int main(int argc ATTRIBUTE_UNUSED, char **argv ATTRIBUTE_UNUSED) {
|
||||
printf("%s : Regexp support not compiled in\n", argv[0]);
|
||||
return(0);
|
||||
}
|
||||
#endif /* LIBXML_REGEXP_ENABLED */
|
||||
Loading…
Add table
Add a link
Reference in a new issue