92040cbc5f
1998-05-17 Thorsten Kukuk <kukuk@vt.uni-paderborn.de> * sunrpc/svc_tcp.c: Add FreeBSD DoS patch. * sunrpc/xdr_rec.c: Likewise.
118 lines
2.9 KiB
C
118 lines
2.9 KiB
C
/* POSIX regex testsuite from IEEE 2003.2.
|
|
Copyright (C) 1998 Free Software Foundation, Inc.
|
|
This file is part of the GNU C Library.
|
|
Contributed by Ulrich Drepper <drepper@cygnus.com>, 1998.
|
|
|
|
The GNU C Library is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU Library General Public License as
|
|
published by the Free Software Foundation; either version 2 of the
|
|
License, or (at your option) any later version.
|
|
|
|
The GNU C Library is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
Library General Public License for more details.
|
|
|
|
You should have received a copy of the GNU Library General Public
|
|
License along with the GNU C Library; see the file COPYING.LIB. If not,
|
|
write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
|
|
Boston, MA 02111-1307, USA. */
|
|
|
|
#include <sys/types.h>
|
|
#include <regex.h>
|
|
#include <stdio.h>
|
|
|
|
/* Data structure to describe the tests. */
|
|
struct test
|
|
{
|
|
int start;
|
|
int end;
|
|
const char *reg;
|
|
const char *str;
|
|
int options;
|
|
} tests[] =
|
|
{
|
|
#include "ptestcases.h"
|
|
};
|
|
|
|
|
|
int
|
|
main (int argc, char *argv[])
|
|
{
|
|
size_t cnt;
|
|
int errors = 0;
|
|
|
|
for (cnt = 0; cnt < sizeof (tests) / sizeof (tests[0]); ++cnt)
|
|
if (tests[cnt].str == NULL)
|
|
{
|
|
printf ("\n%s\n%.*s\n", tests[cnt].reg,
|
|
(int) strlen (tests[cnt].reg),
|
|
"-----------------------------------------------------");
|
|
}
|
|
else
|
|
{
|
|
regex_t re;
|
|
regmatch_t match[20];
|
|
int err;
|
|
|
|
printf ("regexp: \"%s\", string: \"%s\" -> ", tests[cnt].reg,
|
|
tests[cnt].str);
|
|
|
|
/* Compile the expression. */
|
|
err = regcomp (&re, tests[cnt].reg, tests[cnt].options);
|
|
if (err != 0)
|
|
{
|
|
if (tests[cnt].start == -1)
|
|
puts ("failed, OK");
|
|
else
|
|
{
|
|
char buf[100];
|
|
regerror (err, &re, buf, sizeof (buf));
|
|
printf ("FAIL: %s\n", buf);
|
|
++errors;
|
|
}
|
|
|
|
continue;
|
|
}
|
|
|
|
/* Run the actual test. */
|
|
err = regexec (&re, tests[cnt].str, 20, match, 0);
|
|
|
|
if (err != 0)
|
|
{
|
|
if (tests[cnt].start == -1)
|
|
puts ("no match, OK");
|
|
else
|
|
{
|
|
puts ("no match, FAIL");
|
|
++errors;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
if (match[0].rm_so == 0 && tests[cnt].start == 0
|
|
&& match[0].rm_eo == 0 && tests[cnt].end == 0)
|
|
puts ("match, OK");
|
|
else if (match[0].rm_so + 1 == tests[cnt].start
|
|
&& match[0].rm_eo == tests[cnt].end)
|
|
puts ("match, OK");
|
|
else
|
|
{
|
|
printf ("wrong match (%d to %d): FAIL\n",
|
|
match[0].rm_so, match[0].rm_eo);
|
|
++errors;
|
|
}
|
|
}
|
|
|
|
/* Free all resources. */
|
|
regfree (&re);
|
|
}
|
|
|
|
printf ("\n%u tests, %d errors\n", cnt, errors);
|
|
|
|
/* We should return here the error status but since some tests are known
|
|
to fail this would only cause the libc testsuite to fail. */
|
|
//return errors != 0;
|
|
return 0;
|
|
}
|