|
Packit |
6c4009 |
/* Regular expression tests.
|
|
Packit |
6c4009 |
Copyright (C) 2002-2018 Free Software Foundation, Inc.
|
|
Packit |
6c4009 |
This file is part of the GNU C Library.
|
|
Packit |
6c4009 |
Contributed by Jakub Jelinek <jakub@redhat.com>, 2002.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
The GNU C Library is free software; you can redistribute it and/or
|
|
Packit |
6c4009 |
modify it under the terms of the GNU Lesser General Public
|
|
Packit |
6c4009 |
License as published by the Free Software Foundation; either
|
|
Packit |
6c4009 |
version 2.1 of the License, or (at your option) any later version.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
The GNU C Library is distributed in the hope that it will be useful,
|
|
Packit |
6c4009 |
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
Packit |
6c4009 |
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
Packit |
6c4009 |
Lesser General Public License for more details.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
You should have received a copy of the GNU Lesser General Public
|
|
Packit |
6c4009 |
License along with the GNU C Library; if not, see
|
|
Packit |
6c4009 |
<http://www.gnu.org/licenses/>. */
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
#include <sys/types.h>
|
|
Packit |
6c4009 |
#include <mcheck.h>
|
|
Packit |
6c4009 |
#include <regex.h>
|
|
Packit |
6c4009 |
#include <stdio.h>
|
|
Packit |
6c4009 |
#include <stdlib.h>
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* Tests supposed to match. */
|
|
Packit |
6c4009 |
struct
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
const char *pattern;
|
|
Packit |
6c4009 |
const char *string;
|
|
Packit |
6c4009 |
int flags, nmatch;
|
|
Packit |
6c4009 |
regmatch_t rm[5];
|
|
Packit |
6c4009 |
} tests[] = {
|
|
Packit |
6c4009 |
/* Test for newline handling in regex. */
|
|
Packit |
6c4009 |
{ "[^~]*~", "\nx~y", 0, 2, { { 0, 3 }, { -1, -1 } } },
|
|
Packit |
6c4009 |
/* Other tests. */
|
|
Packit |
6c4009 |
{ "a(.*)b", "a b", REG_EXTENDED, 2, { { 0, 3 }, { 1, 2 } } },
|
|
Packit |
6c4009 |
{ ".*|\\([KIO]\\)\\([^|]*\\).*|?[KIO]", "10~.~|P|K0|I10|O16|?KSb", 0, 3,
|
|
Packit |
6c4009 |
{ { 0, 21 }, { 15, 16 }, { 16, 18 } } },
|
|
Packit |
6c4009 |
{ ".*|\\([KIO]\\)\\([^|]*\\).*|?\\1", "10~.~|P|K0|I10|O16|?KSb", 0, 3,
|
|
Packit |
6c4009 |
{ { 0, 21 }, { 8, 9 }, { 9, 10 } } },
|
|
Packit |
6c4009 |
{ "^\\(a*\\)\\1\\{9\\}\\(a\\{0,9\\}\\)\\([0-9]*;.*[^a]\\2\\([0-9]\\)\\)",
|
|
Packit |
6c4009 |
"a1;;0a1aa2aaa3aaaa4aaaaa5aaaaaa6aaaaaaa7aaaaaaaa8aaaaaaaaa9aa2aa1a0", 0,
|
|
Packit |
6c4009 |
5, { { 0, 67 }, { 0, 0 }, { 0, 1 }, { 1, 67 }, { 66, 67 } } },
|
|
Packit |
6c4009 |
/* Test for BRE expression anchoring. POSIX says just that this may match;
|
|
Packit |
6c4009 |
in glibc regex it always matched, so avoid changing it. */
|
|
Packit |
6c4009 |
{ "\\(^\\|foo\\)bar", "bar", 0, 2, { { 0, 3 }, { -1, -1 } } },
|
|
Packit |
6c4009 |
{ "\\(foo\\|^\\)bar", "bar", 0, 2, { { 0, 3 }, { -1, -1 } } },
|
|
Packit |
6c4009 |
/* In ERE this must be treated as an anchor. */
|
|
Packit |
6c4009 |
{ "(^|foo)bar", "bar", REG_EXTENDED, 2, { { 0, 3 }, { -1, -1 } } },
|
|
Packit |
6c4009 |
{ "(foo|^)bar", "bar", REG_EXTENDED, 2, { { 0, 3 }, { -1, -1 } } },
|
|
Packit |
6c4009 |
/* Here ^ cannot be treated as an anchor according to POSIX. */
|
|
Packit |
6c4009 |
{ "(^|foo)bar", "(^|foo)bar", 0, 2, { { 0, 10 }, { -1, -1 } } },
|
|
Packit |
6c4009 |
{ "(foo|^)bar", "(foo|^)bar", 0, 2, { { 0, 10 }, { -1, -1 } } },
|
|
Packit |
6c4009 |
/* More tests on backreferences. */
|
|
Packit |
6c4009 |
{ "()\\1", "x", REG_EXTENDED, 2, { { 0, 0 }, { 0, 0 } } },
|
|
Packit |
6c4009 |
{ "()x\\1", "x", REG_EXTENDED, 2, { { 0, 1 }, { 0, 0 } } },
|
|
Packit |
6c4009 |
{ "()\\1*\\1*", "", REG_EXTENDED, 2, { { 0, 0 }, { 0, 0 } } },
|
|
Packit |
6c4009 |
{ "([0-9]).*\\1(a*)", "7;7a6", REG_EXTENDED, 3, { { 0, 4 }, { 0, 1 }, { 3, 4 } } },
|
|
Packit |
6c4009 |
{ "([0-9]).*\\1(a*)", "7;7a", REG_EXTENDED, 3, { { 0, 4 }, { 0, 1 }, { 3, 4 } } },
|
|
Packit |
6c4009 |
{ "(b)()c\\1", "bcb", REG_EXTENDED, 3, { { 0, 3 }, { 0, 1 }, { 1, 1 } } },
|
|
Packit |
6c4009 |
{ "()(b)c\\2", "bcb", REG_EXTENDED, 3, { { 0, 3 }, { 0, 0 }, { 0, 1 } } },
|
|
Packit |
6c4009 |
{ "a(b)()c\\1", "abcb", REG_EXTENDED, 3, { { 0, 4 }, { 1, 2 }, { 2, 2 } } },
|
|
Packit |
6c4009 |
{ "a()(b)c\\2", "abcb", REG_EXTENDED, 3, { { 0, 4 }, { 1, 1 }, { 1, 2 } } },
|
|
Packit |
6c4009 |
{ "()(b)\\1c\\2", "bcb", REG_EXTENDED, 3, { { 0, 3 }, { 0, 0 }, { 0, 1 } } },
|
|
Packit |
6c4009 |
{ "(b())\\2\\1", "bbbb", REG_EXTENDED, 3, { { 0, 2 }, { 0, 1 }, { 1, 1 } } },
|
|
Packit |
6c4009 |
{ "a()(b)\\1c\\2", "abcb", REG_EXTENDED, 3, { { 0, 4 }, { 1, 1 }, { 1, 2 } } },
|
|
Packit |
6c4009 |
{ "a()d(b)\\1c\\2", "adbcb", REG_EXTENDED, 3, { { 0, 5 }, { 1, 1 }, { 2, 3 } } },
|
|
Packit |
6c4009 |
{ "a(b())\\2\\1", "abbbb", REG_EXTENDED, 3, { { 0, 3 }, { 1, 2 }, { 2, 2 } } },
|
|
Packit |
6c4009 |
{ "(bb())\\2\\1", "bbbb", REG_EXTENDED, 3, { { 0, 4 }, { 0, 2 }, { 2, 2 } } },
|
|
Packit |
6c4009 |
{ "^([^,]*),\\1,\\1$", "a,a,a", REG_EXTENDED, 2, { { 0, 5 }, { 0, 1 } } },
|
|
Packit |
6c4009 |
{ "^([^,]*),\\1,\\1$", "ab,ab,ab", REG_EXTENDED, 2, { { 0, 8 }, { 0, 2 } } },
|
|
Packit |
6c4009 |
{ "^([^,]*),\\1,\\1,\\1$", "abc,abc,abc,abc", REG_EXTENDED, 2,
|
|
Packit |
6c4009 |
{ { 0, 15 }, { 0, 3 } } },
|
|
Packit |
6c4009 |
{ "^(.?)(.?)(.?)(.?)(.?).?\\5\\4\\3\\2\\1$",
|
|
Packit |
6c4009 |
"level", REG_NOSUB | REG_EXTENDED, 0, { { -1, -1 } } },
|
|
Packit |
6c4009 |
{ "^(.?)(.?)(.?)(.?)(.?)(.?)(.?)(.?)(.).?\\9\\8\\7\\6\\5\\4\\3\\2\\1$|^.?$",
|
|
Packit |
6c4009 |
"level", REG_NOSUB | REG_EXTENDED, 0, { { -1, -1 } } },
|
|
Packit |
6c4009 |
{ "^(.?)(.?)(.?)(.?)(.?)(.?)(.?)(.?)(.).?\\9\\8\\7\\6\\5\\4\\3\\2\\1$|^.?$",
|
|
Packit |
6c4009 |
"abcdedcba", REG_EXTENDED, 1, { { 0, 9 } } },
|
|
Packit |
6c4009 |
#if 0
|
|
Packit |
6c4009 |
/* XXX Not used since they fail so far. */
|
|
Packit |
6c4009 |
{ "^(.?)(.?)(.?)(.?)(.?)(.?)(.?)(.?)(.).?\\9\\8\\7\\6\\5\\4\\3\\2\\1$|^.?$",
|
|
Packit |
6c4009 |
"ababababa", REG_EXTENDED, 1, { { 0, 9 } } },
|
|
Packit |
6c4009 |
{ "^(.?)(.?)(.?)(.?)(.?)(.?)(.?)(.?)(.?).?\\9\\8\\7\\6\\5\\4\\3\\2\\1$",
|
|
Packit |
6c4009 |
"level", REG_NOSUB | REG_EXTENDED, 0, { { -1, -1 } } },
|
|
Packit |
6c4009 |
{ "^(.?)(.?)(.?)(.?)(.?)(.?)(.?)(.?)(.?).?\\9\\8\\7\\6\\5\\4\\3\\2\\1$",
|
|
Packit |
6c4009 |
"ababababa", REG_EXTENDED, 1, { { 0, 9 } } },
|
|
Packit |
6c4009 |
#endif
|
|
Packit |
6c4009 |
};
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
int
|
|
Packit |
6c4009 |
main (void)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
regex_t re;
|
|
Packit |
6c4009 |
regmatch_t rm[5];
|
|
Packit |
6c4009 |
size_t i;
|
|
Packit |
6c4009 |
int n, ret = 0;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
mtrace ();
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
for (i = 0; i < sizeof (tests) / sizeof (tests[0]); ++i)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
n = regcomp (&re, tests[i].pattern, tests[i].flags);
|
|
Packit |
6c4009 |
if (n != 0)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
char buf[500];
|
|
Packit |
6c4009 |
regerror (n, &re, buf, sizeof (buf));
|
|
Packit |
6c4009 |
printf ("%s: regcomp %zd failed: %s\n", tests[i].pattern, i, buf);
|
|
Packit |
6c4009 |
ret = 1;
|
|
Packit |
6c4009 |
continue;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
if (regexec (&re, tests[i].string, tests[i].nmatch, rm, 0))
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
printf ("%s: regexec %zd failed\n", tests[i].pattern, i);
|
|
Packit |
6c4009 |
ret = 1;
|
|
Packit |
6c4009 |
regfree (&re);
|
|
Packit |
6c4009 |
continue;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
for (n = 0; n < tests[i].nmatch; ++n)
|
|
Packit |
6c4009 |
if (rm[n].rm_so != tests[i].rm[n].rm_so
|
|
Packit |
6c4009 |
|| rm[n].rm_eo != tests[i].rm[n].rm_eo)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
if (tests[i].rm[n].rm_so == -1 && tests[i].rm[n].rm_eo == -1)
|
|
Packit |
6c4009 |
break;
|
|
Packit |
6c4009 |
printf ("%s: regexec %zd match failure rm[%d] %d..%d\n",
|
|
Packit |
6c4009 |
tests[i].pattern, i, n, rm[n].rm_so, rm[n].rm_eo);
|
|
Packit |
6c4009 |
ret = 1;
|
|
Packit |
6c4009 |
break;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
regfree (&re);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
return ret;
|
|
Packit |
6c4009 |
}
|