Google Git
Sign in
fuchsia / third_party / glib / 516101c7023af25083c385b91a1ca7dc635c15a6 / . / glib / tests / regex.c
blob: 56bd2d5ebfaab239d02a8674094426dd6efb55a5 [file] [log] [blame]
/*
* Copyright (C) 2005 - 2006, Marco Barisione <marco@barisione.org>
* Copyright (C) 2010 Red Hat, Inc.
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or (at your option) any later version.
*
* This 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
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, see <http://www.gnu.org/licenses/>.
*/
#undef G_DISABLE_ASSERT
#undef G_LOG_DOMAIN
#include "config.h"
#include <string.h>
#include <locale.h>
#include "glib.h"
#ifdef USE_SYSTEM_PCRE
#include <pcre.h>
#else
#include "glib/pcre/pcre.h"
#endif
/* U+20AC EURO SIGN (symbol, currency) */
#define EURO "\xe2\x82\xac"
/* U+00E0 LATIN SMALL LETTER A WITH GRAVE (letter, lowercase) */
#define AGRAVE "\xc3\xa0"
/* U+00C0 LATIN CAPITAL LETTER A WITH GRAVE (letter, uppercase) */
#define AGRAVE_UPPER "\xc3\x80"
/* U+00E8 LATIN SMALL LETTER E WITH GRAVE (letter, lowercase) */
#define EGRAVE "\xc3\xa8"
/* U+00F2 LATIN SMALL LETTER O WITH GRAVE (letter, lowercase) */
#define OGRAVE "\xc3\xb2"
/* U+014B LATIN SMALL LETTER ENG (letter, lowercase) */
#define ENG "\xc5\x8b"
/* U+0127 LATIN SMALL LETTER H WITH STROKE (letter, lowercase) */
#define HSTROKE "\xc4\xa7"
/* U+0634 ARABIC LETTER SHEEN (letter, other) */
#define SHEEN "\xd8\xb4"
/* U+1374 ETHIOPIC NUMBER THIRTY (number, other) */
#define ETH30 "\xe1\x8d\xb4"
/* A random value use to mark untouched integer variables. */
#define UNTOUCHED -559038737
static gint total;
typedef struct {
const gchar *pattern;
GRegexCompileFlags compile_opts;
GRegexMatchFlags match_opts;
gint expected_error;
gboolean check_flags;
GRegexCompileFlags real_compile_opts;
GRegexMatchFlags real_match_opts;
} TestNewData;
static void
test_new (gconstpointer d)
{
const TestNewData *data = d;
GRegex *regex;
GError *error = NULL;
regex = g_regex_new (data->pattern, data->compile_opts, data->match_opts, &error);
g_assert (regex != NULL);
g_assert_no_error (error);
g_assert_cmpstr (data->pattern, ==, g_regex_get_pattern (regex));
if (data->check_flags)
{
g_assert_cmphex (g_regex_get_compile_flags (regex), ==, data->real_compile_opts);
g_assert_cmphex (g_regex_get_match_flags (regex), ==, data->real_match_opts);
}
g_regex_unref (regex);
}
#define TEST_NEW(_pattern, _compile_opts, _match_opts) { \
TestNewData *data; \
gchar *path; \
data = g_new0 (TestNewData, 1); \
data->pattern = _pattern; \
data->compile_opts = _compile_opts; \
data->match_opts = _match_opts; \
data->expected_error = 0; \
data->check_flags = FALSE; \
path = g_strdup_printf ("/regex/new/%d", ++total); \
g_test_add_data_func_full (path, data, test_new, g_free); \
g_free (path); \
}
#define TEST_NEW_CHECK_FLAGS(_pattern, _compile_opts, _match_opts, _real_compile_opts, _real_match_opts) { \
TestNewData *data; \
gchar *path; \
data = g_new0 (TestNewData, 1); \
data->pattern = _pattern; \
data->compile_opts = _compile_opts; \
data->match_opts = 0; \
data->expected_error = 0; \
data->check_flags = TRUE; \
data->real_compile_opts = _real_compile_opts; \
data->real_match_opts = _real_match_opts; \
path = g_strdup_printf ("/regex/new-check-flags/%d", ++total); \
g_test_add_data_func_full (path, data, test_new, g_free); \
g_free (path); \
}
static void
test_new_fail (gconstpointer d)
{
const TestNewData *data = d;
GRegex *regex;
GError *error = NULL;
regex = g_regex_new (data->pattern, data->compile_opts, data->match_opts, &error);
g_assert (regex == NULL);
g_assert_error (error, G_REGEX_ERROR, data->expected_error);
g_error_free (error);
}
#define TEST_NEW_FAIL(_pattern, _compile_opts, _expected_error) { \
TestNewData *data; \
gchar *path; \
data = g_new0 (TestNewData, 1); \
data->pattern = _pattern; \
data->compile_opts = _compile_opts; \
data->match_opts = 0; \
data->expected_error = _expected_error; \
path = g_strdup_printf ("/regex/new-fail/%d", ++total); \
g_test_add_data_func_full (path, data, test_new_fail, g_free); \
g_free (path); \
}
typedef struct {
const gchar *pattern;
const gchar *string;
GRegexCompileFlags compile_opts;
GRegexMatchFlags match_opts;
gboolean expected;
gssize string_len;
gint start_position;
GRegexMatchFlags match_opts2;
} TestMatchData;
static void
test_match_simple (gconstpointer d)
{
const TestMatchData *data = d;
gboolean match;
match = g_regex_match_simple (data->pattern, data->string, data->compile_opts, data->match_opts);
g_assert_cmpint (match, ==, data->expected);
}
#define TEST_MATCH_SIMPLE_NAMED(_name, _pattern, _string, _compile_opts, _match_opts, _expected) { \
TestMatchData *data; \
gchar *path; \
data = g_new0 (TestMatchData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->compile_opts = _compile_opts; \
data->match_opts = _match_opts; \
data->expected = _expected; \
path = g_strdup_printf ("/regex/match-%s/%d", _name, ++total); \
g_test_add_data_func_full (path, data, test_match_simple, g_free); \
g_free (path); \
}
#define TEST_MATCH_SIMPLE(_pattern, _string, _compile_opts, _match_opts, _expected) \
TEST_MATCH_SIMPLE_NAMED("simple", _pattern, _string, _compile_opts, _match_opts, _expected)
#define TEST_MATCH_NOTEMPTY(_pattern, _string, _expected) \
TEST_MATCH_SIMPLE_NAMED("notempty", _pattern, _string, 0, G_REGEX_MATCH_NOTEMPTY, _expected)
#define TEST_MATCH_NOTEMPTY_ATSTART(_pattern, _string, _expected) \
TEST_MATCH_SIMPLE_NAMED("notempty-atstart", _pattern, _string, 0, G_REGEX_MATCH_NOTEMPTY_ATSTART, _expected)
static void
test_match (gconstpointer d)
{
const TestMatchData *data = d;
GRegex *regex;
gboolean match;
GError *error = NULL;
regex = g_regex_new (data->pattern, data->compile_opts, data->match_opts, &error);
g_assert (regex != NULL);
g_assert_no_error (error);
match = g_regex_match_full (regex, data->string, data->string_len,
data->start_position, data->match_opts2, NULL, NULL);
if (data->expected)
{
if (!match)
g_error ("Regex '%s' (with compile options %u and "
"match options %u) should have matched '%.*s' "
"(of length %d, at position %d, with match options %u) but did not",
data->pattern, data->compile_opts, data->match_opts,
data->string_len == -1 ? (int) strlen (data->string) :
(int) data->string_len,
data->string, (int) data->string_len,
data->start_position, data->match_opts2);
g_assert_cmpint (match, ==, TRUE);
}
else
{
if (match)
g_error ("Regex '%s' (with compile options %u and "
"match options %u) should not have matched '%.*s' "
"(of length %d, at position %d, with match options %u) but did",
data->pattern, data->compile_opts, data->match_opts,
data->string_len == -1 ? (int) strlen (data->string) :
(int) data->string_len,
data->string, (int) data->string_len,
data->start_position, data->match_opts2);
}
if (data->string_len == -1 && data->start_position == 0)
{
match = g_regex_match (regex, data->string, data->match_opts2, NULL);
g_assert_cmpint (match, ==, data->expected);
}
g_regex_unref (regex);
}
#define TEST_MATCH(_pattern, _compile_opts, _match_opts, _string, \
_string_len, _start_position, _match_opts2, _expected) { \
TestMatchData *data; \
gchar *path; \
data = g_new0 (TestMatchData, 1); \
data->pattern = _pattern; \
data->compile_opts = _compile_opts; \
data->match_opts = _match_opts; \
data->string = _string; \
data->string_len = _string_len; \
data->start_position = _start_position; \
data->match_opts2 = _match_opts2; \
data->expected = _expected; \
path = g_strdup_printf ("/regex/match/%d", ++total); \
g_test_add_data_func_full (path, data, test_match, g_free); \
g_free (path); \
}
struct _Match
{
gchar *string;
gint start, end;
};
typedef struct _Match Match;
static void
free_match (gpointer data)
{
Match *match = data;
if (match == NULL)
return;
g_free (match->string);
g_free (match);
}
typedef struct {
const gchar *pattern;
const gchar *string;
gssize string_len;
gint start_position;
GSList *expected;
} TestMatchNextData;
static void
test_match_next (gconstpointer d)
{
const TestMatchNextData *data = d;
GRegex *regex;
GMatchInfo *match_info;
GSList *matches;
GSList *l_exp, *l_match;
regex = g_regex_new (data->pattern, 0, 0, NULL);
g_assert (regex != NULL);
g_regex_match_full (regex, data->string, data->string_len,
data->start_position, 0, &match_info, NULL);
matches = NULL;
while (g_match_info_matches (match_info))
{
Match *match = g_new0 (Match, 1);
match->string = g_match_info_fetch (match_info, 0);
match->start = UNTOUCHED;
match->end = UNTOUCHED;
g_match_info_fetch_pos (match_info, 0, &match->start, &match->end);
matches = g_slist_prepend (matches, match);
g_match_info_next (match_info, NULL);
}
g_assert (regex == g_match_info_get_regex (match_info));
g_assert_cmpstr (data->string, ==, g_match_info_get_string (match_info));
g_match_info_free (match_info);
matches = g_slist_reverse (matches);
g_assert_cmpint (g_slist_length (matches), ==, g_slist_length (data->expected));
l_exp = data->expected;
l_match = matches;
while (l_exp != NULL)
{
Match *exp = l_exp->data;
Match *match = l_match->data;
g_assert_cmpstr (exp->string, ==, match->string);
g_assert_cmpint (exp->start, ==, match->start);
g_assert_cmpint (exp->end, ==, match->end);
l_exp = g_slist_next (l_exp);
l_match = g_slist_next (l_match);
}
g_regex_unref (regex);
g_slist_free_full (matches, free_match);
}
static void
free_match_next_data (gpointer _data)
{
TestMatchNextData *data = _data;
g_slist_free_full (data->expected, g_free);
g_free (data);
}
#define TEST_MATCH_NEXT0(_pattern, _string, _string_len, _start_position) { \
TestMatchNextData *data; \
gchar *path; \
data = g_new0 (TestMatchNextData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->string_len = _string_len; \
data->start_position = _start_position; \
data->expected = NULL; \
path = g_strdup_printf ("/regex/match/next0/%d", ++total); \
g_test_add_data_func_full (path, data, test_match_next, free_match_next_data); \
g_free (path); \
}
#define TEST_MATCH_NEXT1(_pattern, _string, _string_len, _start_position, \
t1, s1, e1) { \
TestMatchNextData *data; \
Match *match; \
gchar *path; \
data = g_new0 (TestMatchNextData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->string_len = _string_len; \
data->start_position = _start_position; \
match = g_new0 (Match, 1); \
match->string = t1; \
match->start = s1; \
match->end = e1; \
data->expected = g_slist_append (NULL, match); \
path = g_strdup_printf ("/regex/match/next1/%d", ++total); \
g_test_add_data_func_full (path, data, test_match_next, free_match_next_data); \
g_free (path); \
}
#define TEST_MATCH_NEXT2(_pattern, _string, _string_len, _start_position, \
t1, s1, e1, t2, s2, e2) { \
TestMatchNextData *data; \
Match *match; \
gchar *path; \
data = g_new0 (TestMatchNextData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->string_len = _string_len; \
data->start_position = _start_position; \
match = g_new0 (Match, 1); \
match->string = t1; \
match->start = s1; \
match->end = e1; \
data->expected = g_slist_append (NULL, match); \
match = g_new0 (Match, 1); \
match->string = t2; \
match->start = s2; \
match->end = e2; \
data->expected = g_slist_append (data->expected, match); \
path = g_strdup_printf ("/regex/match/next2/%d", ++total); \
g_test_add_data_func_full (path, data, test_match_next, free_match_next_data); \
g_free (path); \
}
#define TEST_MATCH_NEXT3(_pattern, _string, _string_len, _start_position, \
t1, s1, e1, t2, s2, e2, t3, s3, e3) { \
TestMatchNextData *data; \
Match *match; \
gchar *path; \
data = g_new0 (TestMatchNextData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->string_len = _string_len; \
data->start_position = _start_position; \
match = g_new0 (Match, 1); \
match->string = t1; \
match->start = s1; \
match->end = e1; \
data->expected = g_slist_append (NULL, match); \
match = g_new0 (Match, 1); \
match->string = t2; \
match->start = s2; \
match->end = e2; \
data->expected = g_slist_append (data->expected, match); \
match = g_new0 (Match, 1); \
match->string = t3; \
match->start = s3; \
match->end = e3; \
data->expected = g_slist_append (data->expected, match); \
path = g_strdup_printf ("/regex/match/next3/%d", ++total); \
g_test_add_data_func_full (path, data, test_match_next, free_match_next_data); \
g_free (path); \
}
#define TEST_MATCH_NEXT4(_pattern, _string, _string_len, _start_position, \
t1, s1, e1, t2, s2, e2, t3, s3, e3, t4, s4, e4) { \
TestMatchNextData *data; \
Match *match; \
gchar *path; \
data = g_new0 (TestMatchNextData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->string_len = _string_len; \
data->start_position = _start_position; \
match = g_new0 (Match, 1); \
match->string = t1; \
match->start = s1; \
match->end = e1; \
data->expected = g_slist_append (NULL, match); \
match = g_new0 (Match, 1); \
match->string = t2; \
match->start = s2; \
match->end = e2; \
data->expected = g_slist_append (data->expected, match); \
match = g_new0 (Match, 1); \
match->string = t3; \
match->start = s3; \
match->end = e3; \
data->expected = g_slist_append (data->expected, match); \
match = g_new0 (Match, 1); \
match->string = t4; \
match->start = s4; \
match->end = e4; \
data->expected = g_slist_append (data->expected, match); \
path = g_strdup_printf ("/regex/match/next4/%d", ++total); \
g_test_add_data_func_full (path, data, test_match_next, free_match_next_data); \
g_free (path); \
}
typedef struct {
const gchar *pattern;
const gchar *string;
gint start_position;
GRegexMatchFlags match_opts;
gint expected_count;
} TestMatchCountData;
static void
test_match_count (gconstpointer d)
{
const TestMatchCountData *data = d;
GRegex *regex;
GMatchInfo *match_info;
gint count;
regex = g_regex_new (data->pattern, 0, 0, NULL);
g_assert (regex != NULL);
g_regex_match_full (regex, data->string, -1, data->start_position,
data->match_opts, &match_info, NULL);
count = g_match_info_get_match_count (match_info);
g_assert_cmpint (count, ==, data->expected_count);
g_match_info_ref (match_info);
g_match_info_unref (match_info);
g_match_info_unref (match_info);
g_regex_unref (regex);
}
#define TEST_MATCH_COUNT(_pattern, _string, _start_position, _match_opts, _expected_count) { \
TestMatchCountData *data; \
gchar *path; \
data = g_new0 (TestMatchCountData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->start_position = _start_position; \
data->match_opts = _match_opts; \
data->expected_count = _expected_count; \
path = g_strdup_printf ("/regex/match/count/%d", ++total); \
g_test_add_data_func_full (path, data, test_match_count, g_free); \
g_free (path); \
}
static void
test_partial (gconstpointer d)
{
const TestMatchData *data = d;
GRegex *regex;
GMatchInfo *match_info;
regex = g_regex_new (data->pattern, 0, 0, NULL);
g_assert (regex != NULL);
g_regex_match (regex, data->string, data->match_opts, &match_info);
g_assert_cmpint (data->expected, ==, g_match_info_is_partial_match (match_info));
if (data->expected)
{
g_assert (!g_match_info_fetch_pos (match_info, 0, NULL, NULL));
g_assert (!g_match_info_fetch_pos (match_info, 1, NULL, NULL));
}
g_match_info_free (match_info);
g_regex_unref (regex);
}
#define TEST_PARTIAL_FULL(_pattern, _string, _match_opts, _expected) { \
TestMatchData *data; \
gchar *path; \
data = g_new0 (TestMatchData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->match_opts = _match_opts; \
data->expected = _expected; \
path = g_strdup_printf ("/regex/match/partial/%d", ++total); \
g_test_add_data_func_full (path, data, test_partial, g_free); \
g_free (path); \
}
#define TEST_PARTIAL(_pattern, _string, _expected) TEST_PARTIAL_FULL(_pattern, _string, G_REGEX_MATCH_PARTIAL, _expected)
typedef struct {
const gchar *pattern;
const gchar *string;
gint start_position;
gint sub_n;
const gchar *expected_sub;
gint expected_start;
gint expected_end;
} TestSubData;
static void
test_sub_pattern (gconstpointer d)
{
const TestSubData *data = d;
GRegex *regex;
GMatchInfo *match_info;
gchar *sub_expr;
gint start = UNTOUCHED, end = UNTOUCHED;
regex = g_regex_new (data->pattern, 0, 0, NULL);
g_assert (regex != NULL);
g_regex_match_full (regex, data->string, -1, data->start_position, 0, &match_info, NULL);
sub_expr = g_match_info_fetch (match_info, data->sub_n);
g_assert_cmpstr (sub_expr, ==, data->expected_sub);
g_free (sub_expr);
g_match_info_fetch_pos (match_info, data->sub_n, &start, &end);
g_assert_cmpint (start, ==, data->expected_start);
g_assert_cmpint (end, ==, data->expected_end);
g_match_info_free (match_info);
g_regex_unref (regex);
}
#define TEST_SUB_PATTERN(_pattern, _string, _start_position, _sub_n, _expected_sub, \
_expected_start, _expected_end) { \
TestSubData *data; \
gchar *path; \
data = g_new0 (TestSubData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->start_position = _start_position; \
data->sub_n = _sub_n; \
data->expected_sub = _expected_sub; \
data->expected_start = _expected_start; \
data->expected_end = _expected_end; \
path = g_strdup_printf ("/regex/match/subpattern/%d", ++total); \
g_test_add_data_func_full (path, data, test_sub_pattern, g_free); \
g_free (path); \
}
typedef struct {
const gchar *pattern;
GRegexCompileFlags flags;
const gchar *string;
gint start_position;
const gchar *sub_name;
const gchar *expected_sub;
gint expected_start;
gint expected_end;
} TestNamedSubData;
static void
test_named_sub_pattern (gconstpointer d)
{
const TestNamedSubData *data = d;
GRegex *regex;
GMatchInfo *match_info;
gint start = UNTOUCHED, end = UNTOUCHED;
gchar *sub_expr;
regex = g_regex_new (data->pattern, data->flags, 0, NULL);
g_assert (regex != NULL);
g_regex_match_full (regex, data->string, -1, data->start_position, 0, &match_info, NULL);
sub_expr = g_match_info_fetch_named (match_info, data->sub_name);
g_assert_cmpstr (sub_expr, ==, data->expected_sub);
g_free (sub_expr);
g_match_info_fetch_named_pos (match_info, data->sub_name, &start, &end);
g_assert_cmpint (start, ==, data->expected_start);
g_assert_cmpint (end, ==, data->expected_end);
g_match_info_free (match_info);
g_regex_unref (regex);
}
#define TEST_NAMED_SUB_PATTERN(_pattern, _string, _start_position, _sub_name, \
_expected_sub, _expected_start, _expected_end) { \
TestNamedSubData *data; \
gchar *path; \
data = g_new0 (TestNamedSubData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->flags = 0; \
data->start_position = _start_position; \
data->sub_name = _sub_name; \
data->expected_sub = _expected_sub; \
data->expected_start = _expected_start; \
data->expected_end = _expected_end; \
path = g_strdup_printf ("/regex/match/named/subpattern/%d", ++total); \
g_test_add_data_func_full (path, data, test_named_sub_pattern, g_free); \
g_free (path); \
}
#define TEST_NAMED_SUB_PATTERN_DUPNAMES(_pattern, _string, _start_position, _sub_name, \
_expected_sub, _expected_start, _expected_end) { \
TestNamedSubData *data; \
gchar *path; \
data = g_new0 (TestNamedSubData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->flags = G_REGEX_DUPNAMES; \
data->start_position = _start_position; \
data->sub_name = _sub_name; \
data->expected_sub = _expected_sub; \
data->expected_start = _expected_start; \
data->expected_end = _expected_end; \
path = g_strdup_printf ("/regex/match/subpattern/named/dupnames/%d", ++total); \
g_test_add_data_func_full (path, data, test_named_sub_pattern, g_free); \
g_free (path); \
}
typedef struct {
const gchar *pattern;
const gchar *string;
GSList *expected;
gint start_position;
gint max_tokens;
} TestFetchAllData;
static void
test_fetch_all (gconstpointer d)
{
const TestFetchAllData *data = d;
GRegex *regex;
GMatchInfo *match_info;
GSList *l_exp;
gchar **matches;
gint match_count;
gint i;
regex = g_regex_new (data->pattern, 0, 0, NULL);
g_assert (regex != NULL);
g_regex_match (regex, data->string, 0, &match_info);
matches = g_match_info_fetch_all (match_info);
if (matches)
match_count = g_strv_length (matches);
else
match_count = 0;
g_assert_cmpint (match_count, ==, g_slist_length (data->expected));
l_exp = data->expected;
for (i = 0; l_exp != NULL; i++, l_exp = g_slist_next (l_exp))
{
g_assert_cmpstr (l_exp->data, ==, matches[i]);
}
g_match_info_free (match_info);
g_regex_unref (regex);
g_strfreev (matches);
}
static void
free_fetch_all_data (gpointer _data)
{
TestFetchAllData *data = _data;
g_slist_free (data->expected);
g_free (data);
}
#define TEST_FETCH_ALL0(_pattern, _string) { \
TestFetchAllData *data; \
gchar *path; \
data = g_new0 (TestFetchAllData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->expected = NULL; \
path = g_strdup_printf ("/regex/fetch-all0/%d", ++total); \
g_test_add_data_func_full (path, data, test_fetch_all, free_fetch_all_data); \
g_free (path); \
}
#define TEST_FETCH_ALL1(_pattern, _string, e1) { \
TestFetchAllData *data; \
gchar *path; \
data = g_new0 (TestFetchAllData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->expected = g_slist_append (NULL, e1); \
path = g_strdup_printf ("/regex/fetch-all1/%d", ++total); \
g_test_add_data_func_full (path, data, test_fetch_all, free_fetch_all_data); \
g_free (path); \
}
#define TEST_FETCH_ALL2(_pattern, _string, e1, e2) { \
TestFetchAllData *data; \
gchar *path; \
data = g_new0 (TestFetchAllData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->expected = g_slist_append (NULL, e1); \
data->expected = g_slist_append (data->expected, e2); \
path = g_strdup_printf ("/regex/fetch-all2/%d", ++total); \
g_test_add_data_func_full (path, data, test_fetch_all, free_fetch_all_data); \
g_free (path); \
}
#define TEST_FETCH_ALL3(_pattern, _string, e1, e2, e3) { \
TestFetchAllData *data; \
gchar *path; \
data = g_new0 (TestFetchAllData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->expected = g_slist_append (NULL, e1); \
data->expected = g_slist_append (data->expected, e2); \
data->expected = g_slist_append (data->expected, e3); \
path = g_strdup_printf ("/regex/fetch-all3/%d", ++total); \
g_test_add_data_func_full (path, data, test_fetch_all, free_fetch_all_data); \
g_free (path); \
}
static void
test_split_simple (gconstpointer d)
{
const TestFetchAllData *data = d;
GSList *l_exp;
gchar **tokens;
gint token_count;
gint i;
tokens = g_regex_split_simple (data->pattern, data->string, 0, 0);
if (tokens)
token_count = g_strv_length (tokens);
else
token_count = 0;
g_assert_cmpint (token_count, ==, g_slist_length (data->expected));
l_exp = data->expected;
for (i = 0; l_exp != NULL; i++, l_exp = g_slist_next (l_exp))
{
g_assert_cmpstr (l_exp->data, ==, tokens[i]);
}
g_strfreev (tokens);
}
#define TEST_SPLIT_SIMPLE0(_pattern, _string) { \
TestFetchAllData *data; \
gchar *path; \
data = g_new0 (TestFetchAllData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->expected = NULL; \
path = g_strdup_printf ("/regex/split/simple0/%d", ++total); \
g_test_add_data_func_full (path, data, test_split_simple, free_fetch_all_data); \
g_free (path); \
}
#define TEST_SPLIT_SIMPLE1(_pattern, _string, e1) { \
TestFetchAllData *data; \
gchar *path; \
data = g_new0 (TestFetchAllData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->expected = g_slist_append (NULL, e1); \
path = g_strdup_printf ("/regex/split/simple1/%d", ++total); \
g_test_add_data_func_full (path, data, test_split_simple, free_fetch_all_data); \
g_free (path); \
}
#define TEST_SPLIT_SIMPLE2(_pattern, _string, e1, e2) { \
TestFetchAllData *data; \
gchar *path; \
data = g_new0 (TestFetchAllData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->expected = g_slist_append (NULL, e1); \
data->expected = g_slist_append (data->expected, e2); \
path = g_strdup_printf ("/regex/split/simple2/%d", ++total); \
g_test_add_data_func_full (path, data, test_split_simple, free_fetch_all_data); \
g_free (path); \
}
#define TEST_SPLIT_SIMPLE3(_pattern, _string, e1, e2, e3) { \
TestFetchAllData *data; \
gchar *path; \
data = g_new0 (TestFetchAllData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->expected = g_slist_append (NULL, e1); \
data->expected = g_slist_append (data->expected, e2); \
data->expected = g_slist_append (data->expected, e3); \
path = g_strdup_printf ("/regex/split/simple3/%d", ++total); \
g_test_add_data_func_full (path, data, test_split_simple, free_fetch_all_data); \
g_free (path); \
}
static void
test_split_full (gconstpointer d)
{
const TestFetchAllData *data = d;
GRegex *regex;
GSList *l_exp;
gchar **tokens;
gint token_count;
gint i;
regex = g_regex_new (data->pattern, 0, 0, NULL);
g_assert (regex != NULL);
tokens = g_regex_split_full (regex, data->string, -1, data->start_position,
0, data->max_tokens, NULL);
if (tokens)
token_count = g_strv_length (tokens);
else
token_count = 0;
g_assert_cmpint (token_count, ==, g_slist_length (data->expected));
l_exp = data->expected;
for (i = 0; l_exp != NULL; i++, l_exp = g_slist_next (l_exp))
{
g_assert_cmpstr (l_exp->data, ==, tokens[i]);
}
g_regex_unref (regex);
g_strfreev (tokens);
}
static void
test_split (gconstpointer d)
{
const TestFetchAllData *data = d;
GRegex *regex;
GSList *l_exp;
gchar **tokens;
gint token_count;
gint i;
regex = g_regex_new (data->pattern, 0, 0, NULL);
g_assert (regex != NULL);
tokens = g_regex_split (regex, data->string, 0);
if (tokens)
token_count = g_strv_length (tokens);
else
token_count = 0;
g_assert_cmpint (token_count, ==, g_slist_length (data->expected));
l_exp = data->expected;
for (i = 0; l_exp != NULL; i++, l_exp = g_slist_next (l_exp))
{
g_assert_cmpstr (l_exp->data, ==, tokens[i]);
}
g_regex_unref (regex);
g_strfreev (tokens);
}
#define TEST_SPLIT0(_pattern, _string, _start_position, _max_tokens) { \
TestFetchAllData *data; \
gchar *path; \
data = g_new0 (TestFetchAllData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->start_position = _start_position; \
data->max_tokens = _max_tokens; \
data->expected = NULL; \
if (_start_position == 0 && _max_tokens <= 0) { \
path = g_strdup_printf ("/regex/split0/%d", ++total); \
g_test_add_data_func (path, data, test_split); \
g_free (path); \
} \
path = g_strdup_printf ("/regex/full-split0/%d", ++total); \
g_test_add_data_func_full (path, data, test_split_full, free_fetch_all_data); \
g_free (path); \
}
#define TEST_SPLIT1(_pattern, _string, _start_position, _max_tokens, e1) { \
TestFetchAllData *data; \
gchar *path; \
data = g_new0 (TestFetchAllData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->start_position = _start_position; \
data->max_tokens = _max_tokens; \
data->expected = NULL; \
data->expected = g_slist_append (data->expected, e1); \
if (_start_position == 0 && _max_tokens <= 0) { \
path = g_strdup_printf ("/regex/split1/%d", ++total); \
g_test_add_data_func (path, data, test_split); \
g_free (path); \
} \
path = g_strdup_printf ("/regex/full-split1/%d", ++total); \
g_test_add_data_func_full (path, data, test_split_full, free_fetch_all_data); \
g_free (path); \
}
#define TEST_SPLIT2(_pattern, _string, _start_position, _max_tokens, e1, e2) { \
TestFetchAllData *data; \
gchar *path; \
data = g_new0 (TestFetchAllData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->start_position = _start_position; \
data->max_tokens = _max_tokens; \
data->expected = NULL; \
data->expected = g_slist_append (data->expected, e1); \
data->expected = g_slist_append (data->expected, e2); \
if (_start_position == 0 && _max_tokens <= 0) { \
path = g_strdup_printf ("/regex/split2/%d", ++total); \
g_test_add_data_func (path, data, test_split); \
g_free (path); \
} \
path = g_strdup_printf ("/regex/full-split2/%d", ++total); \
g_test_add_data_func_full (path, data, test_split_full, free_fetch_all_data); \
g_free (path); \
}
#define TEST_SPLIT3(_pattern, _string, _start_position, _max_tokens, e1, e2, e3) { \
TestFetchAllData *data; \
gchar *path; \
data = g_new0 (TestFetchAllData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->start_position = _start_position; \
data->max_tokens = _max_tokens; \
data->expected = NULL; \
data->expected = g_slist_append (data->expected, e1); \
data->expected = g_slist_append (data->expected, e2); \
data->expected = g_slist_append (data->expected, e3); \
if (_start_position == 0 && _max_tokens <= 0) { \
path = g_strdup_printf ("/regex/split3/%d", ++total); \
g_test_add_data_func (path, data, test_split); \
g_free (path); \
} \
path = g_strdup_printf ("/regex/full-split3/%d", ++total); \
g_test_add_data_func_full (path, data, test_split_full, free_fetch_all_data); \
g_free (path); \
}
typedef struct {
const gchar *string_to_expand;
gboolean expected;
gboolean expected_refs;
} TestCheckReplacementData;
static void
test_check_replacement (gconstpointer d)
{
const TestCheckReplacementData *data = d;
gboolean has_refs;
gboolean result;
result = g_regex_check_replacement (data->string_to_expand, &has_refs, NULL);
g_assert_cmpint (data->expected, ==, result);
if (data->expected)
g_assert_cmpint (data->expected_refs, ==, has_refs);
}
#define TEST_CHECK_REPLACEMENT(_string_to_expand, _expected, _expected_refs) { \
TestCheckReplacementData *data; \
gchar *path; \
data = g_new0 (TestCheckReplacementData, 1); \
data->string_to_expand = _string_to_expand; \
data->expected = _expected; \
data->expected_refs = _expected_refs; \
path = g_strdup_printf ("/regex/check-repacement/%d", ++total); \
g_test_add_data_func_full (path, data, test_check_replacement, g_free); \
g_free (path); \
}
typedef struct {
const gchar *pattern;
const gchar *string;
const gchar *string_to_expand;
gboolean raw;
const gchar *expected;
} TestExpandData;
static void
test_expand (gconstpointer d)
{
const TestExpandData *data = d;
GRegex *regex = NULL;
GMatchInfo *match_info = NULL;
gchar *res;
GError *error = NULL;
if (data->pattern)
{
regex = g_regex_new (data->pattern, data->raw ? G_REGEX_RAW : 0, 0,
&error);
g_assert_no_error (error);
g_regex_match (regex, data->string, 0, &match_info);
}
res = g_match_info_expand_references (match_info, data->string_to_expand, NULL);
g_assert_cmpstr (res, ==, data->expected);
g_free (res);
g_match_info_free (match_info);
if (regex)
g_regex_unref (regex);
}
#define TEST_EXPAND(_pattern, _string, _string_to_expand, _raw, _expected) { \
TestExpandData *data; \
gchar *path; \
data = g_new0 (TestExpandData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->string_to_expand = _string_to_expand; \
data->raw = _raw; \
data->expected = _expected; \
path = g_strdup_printf ("/regex/expand/%d", ++total); \
g_test_add_data_func_full (path, data, test_expand, g_free); \
g_free (path); \
}
typedef struct {
const gchar *pattern;
const gchar *string;
gint start_position;
const gchar *replacement;
const gchar *expected;
} TestReplaceData;
static void
test_replace (gconstpointer d)
{
const TestReplaceData *data = d;
GRegex *regex;
gchar *res;
regex = g_regex_new (data->pattern, 0, 0, NULL);
res = g_regex_replace (regex, data->string, -1, data->start_position, data->replacement, 0, NULL);
g_assert_cmpstr (res, ==, data->expected);
g_free (res);
g_regex_unref (regex);
}
#define TEST_REPLACE(_pattern, _string, _start_position, _replacement, _expected) { \
TestReplaceData *data; \
gchar *path; \
data = g_new0 (TestReplaceData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->start_position = _start_position; \
data->replacement = _replacement; \
data->expected = _expected; \
path = g_strdup_printf ("/regex/replace/%d", ++total); \
g_test_add_data_func_full (path, data, test_replace, g_free); \
g_free (path); \
}
static void
test_replace_lit (gconstpointer d)
{
const TestReplaceData *data = d;
GRegex *regex;
gchar *res;
regex = g_regex_new (data->pattern, 0, 0, NULL);
res = g_regex_replace_literal (regex, data->string, -1, data->start_position,
data->replacement, 0, NULL);
g_assert_cmpstr (res, ==, data->expected);
g_free (res);
g_regex_unref (regex);
}
#define TEST_REPLACE_LIT(_pattern, _string, _start_position, _replacement, _expected) { \
TestReplaceData *data; \
gchar *path; \
data = g_new0 (TestReplaceData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->start_position = _start_position; \
data->replacement = _replacement; \
data->expected = _expected; \
path = g_strdup_printf ("/regex/replace-literally/%d", ++total); \
g_test_add_data_func_full (path, data, test_replace_lit, g_free); \
g_free (path); \
}
typedef struct {
const gchar *pattern;
const gchar *name;
gint expected_num;
} TestStringNumData;
static void
test_get_string_number (gconstpointer d)
{
const TestStringNumData *data = d;
GRegex *regex;
gint num;
regex = g_regex_new (data->pattern, 0, 0, NULL);
num = g_regex_get_string_number (regex, data->name);
g_assert_cmpint (num, ==, data->expected_num);
g_regex_unref (regex);
}
#define TEST_GET_STRING_NUMBER(_pattern, _name, _expected_num) { \
TestStringNumData *data; \
gchar *path; \
data = g_new0 (TestStringNumData, 1); \
data->pattern = _pattern; \
data->name = _name; \
data->expected_num = _expected_num; \
path = g_strdup_printf ("/regex/string-number/%d", ++total); \
g_test_add_data_func_full (path, data, test_get_string_number, g_free); \
g_free (path); \
}
typedef struct {
const gchar *string;
gint length;
const gchar *expected;
} TestEscapeData;
static void
test_escape (gconstpointer d)
{
const TestEscapeData *data = d;
gchar *escaped;
escaped = g_regex_escape_string (data->string, data->length);
g_assert_cmpstr (escaped, ==, data->expected);
g_free (escaped);
}
#define TEST_ESCAPE(_string, _length, _expected) { \
TestEscapeData *data; \
gchar *path; \
data = g_new0 (TestEscapeData, 1); \
data->string = _string; \
data->length = _length; \
data->expected = _expected; \
path = g_strdup_printf ("/regex/escape/%d", ++total); \
g_test_add_data_func_full (path, data, test_escape, g_free); \
g_free (path); \
}
static void
test_escape_nul (gconstpointer d)
{
const TestEscapeData *data = d;
gchar *escaped;
escaped = g_regex_escape_nul (data->string, data->length);
g_assert_cmpstr (escaped, ==, data->expected);
g_free (escaped);
}
#define TEST_ESCAPE_NUL(_string, _length, _expected) { \
TestEscapeData *data; \
gchar *path; \
data = g_new0 (TestEscapeData, 1); \
data->string = _string; \
data->length = _length; \
data->expected = _expected; \
path = g_strdup_printf ("/regex/escape_nul/%d", ++total); \
g_test_add_data_func_full (path, data, test_escape_nul, g_free); \
g_free (path); \
}
typedef struct {
const gchar *pattern;
const gchar *string;
gssize string_len;
gint start_position;
GSList *expected;
} TestMatchAllData;
static void
test_match_all_full (gconstpointer d)
{
const TestMatchAllData *data = d;
GRegex *regex;
GMatchInfo *match_info;
GSList *l_exp;
gboolean match_ok;
gint match_count;
gint i;
regex = g_regex_new (data->pattern, 0, 0, NULL);
match_ok = g_regex_match_all_full (regex, data->string, data->string_len, data->start_position,
0, &match_info, NULL);
if (g_slist_length (data->expected) == 0)
g_assert (!match_ok);
else
g_assert (match_ok);
match_count = g_match_info_get_match_count (match_info);
g_assert_cmpint (match_count, ==, g_slist_length (data->expected));
l_exp = data->expected;
for (i = 0; i < match_count; i++)
{
gint start, end;
gchar *matched_string;
Match *exp = l_exp->data;
matched_string = g_match_info_fetch (match_info, i);
g_match_info_fetch_pos (match_info, i, &start, &end);
g_assert_cmpstr (exp->string, ==, matched_string);
g_assert_cmpint (exp->start, ==, start);
g_assert_cmpint (exp->end, ==, end);
g_free (matched_string);
l_exp = g_slist_next (l_exp);
}
g_match_info_free (match_info);
g_regex_unref (regex);
}
static void
test_match_all (gconstpointer d)
{
const TestMatchAllData *data = d;
GRegex *regex;
GMatchInfo *match_info;
GSList *l_exp;
gboolean match_ok;
gint match_count;
gint i;
regex = g_regex_new (data->pattern, 0, 0, NULL);
match_ok = g_regex_match_all (regex, data->string, 0, &match_info);
if (g_slist_length (data->expected) == 0)
g_assert (!match_ok);
else
g_assert (match_ok);
match_count = g_match_info_get_match_count (match_info);
if (match_count != g_slist_length (data->expected))
{
g_message ("regex: %s", data->pattern);
g_message ("string: %s", data->string);
g_message ("matched strings:");
for (i = 0; i < match_count; i++)
{
gint start, end;
gchar *matched_string;
matched_string = g_match_info_fetch (match_info, i);
g_match_info_fetch_pos (match_info, i, &start, &end);
g_message ("%d. %d-%d '%s'", i, start, end, matched_string);
g_free (matched_string);
}
g_message ("expected strings:");
i = 0;
for (l_exp = data->expected; l_exp != NULL; l_exp = l_exp->next)
{
Match *exp = l_exp->data;
g_message ("%d. %d-%d '%s'", i, exp->start, exp->end, exp->string);
i++;
}
g_error ("match_count not as expected: %d != %d",
match_count, g_slist_length (data->expected));
}
l_exp = data->expected;
for (i = 0; i < match_count; i++)
{
gint start, end;
gchar *matched_string;
Match *exp = l_exp->data;
matched_string = g_match_info_fetch (match_info, i);
g_match_info_fetch_pos (match_info, i, &start, &end);
g_assert_cmpstr (exp->string, ==, matched_string);
g_assert_cmpint (exp->start, ==, start);
g_assert_cmpint (exp->end, ==, end);
g_free (matched_string);
l_exp = g_slist_next (l_exp);
}
g_match_info_free (match_info);
g_regex_unref (regex);
}
static void
free_match_all_data (gpointer _data)
{
TestMatchAllData *data = _data;
g_slist_free_full (data->expected, g_free);
g_free (data);
}
#define TEST_MATCH_ALL0(_pattern, _string, _string_len, _start_position) { \
TestMatchAllData *data; \
gchar *path; \
data = g_new0 (TestMatchAllData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->string_len = _string_len; \
data->start_position = _start_position; \
data->expected = NULL; \
if (_string_len == -1 && _start_position == 0) { \
path = g_strdup_printf ("/regex/match-all0/%d", ++total); \
g_test_add_data_func (path, data, test_match_all); \
g_free (path); \
} \
path = g_strdup_printf ("/regex/match-all-full0/%d", ++total); \
g_test_add_data_func_full (path, data, test_match_all_full, free_match_all_data); \
g_free (path); \
}
#define TEST_MATCH_ALL1(_pattern, _string, _string_len, _start_position, \
t1, s1, e1) { \
TestMatchAllData *data; \
Match *match; \
gchar *path; \
data = g_new0 (TestMatchAllData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->string_len = _string_len; \
data->start_position = _start_position; \
data->expected = NULL; \
match = g_new0 (Match, 1); \
match->string = t1; \
match->start = s1; \
match->end = e1; \
data->expected = g_slist_append (data->expected, match); \
if (_string_len == -1 && _start_position == 0) { \
path = g_strdup_printf ("/regex/match-all1/%d", ++total); \
g_test_add_data_func (path, data, test_match_all); \
g_free (path); \
} \
path = g_strdup_printf ("/regex/match-all-full1/%d", ++total); \
g_test_add_data_func_full (path, data, test_match_all_full, free_match_all_data); \
g_free (path); \
}
#define TEST_MATCH_ALL2(_pattern, _string, _string_len, _start_position, \
t1, s1, e1, t2, s2, e2) { \
TestMatchAllData *data; \
Match *match; \
gchar *path; \
data = g_new0 (TestMatchAllData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->string_len = _string_len; \
data->start_position = _start_position; \
data->expected = NULL; \
match = g_new0 (Match, 1); \
match->string = t1; \
match->start = s1; \
match->end = e1; \
data->expected = g_slist_append (data->expected, match); \
match = g_new0 (Match, 1); \
match->string = t2; \
match->start = s2; \
match->end = e2; \
data->expected = g_slist_append (data->expected, match); \
if (_string_len == -1 && _start_position == 0) { \
path = g_strdup_printf ("/regex/match-all2/%d", ++total); \
g_test_add_data_func (path, data, test_match_all); \
g_free (path); \
} \
path = g_strdup_printf ("/regex/match-all-full2/%d", ++total); \
g_test_add_data_func_full (path, data, test_match_all_full, free_match_all_data); \
g_free (path); \
}
#define TEST_MATCH_ALL3(_pattern, _string, _string_len, _start_position, \
t1, s1, e1, t2, s2, e2, t3, s3, e3) { \
TestMatchAllData *data; \
Match *match; \
gchar *path; \
data = g_new0 (TestMatchAllData, 1); \
data->pattern = _pattern; \
data->string = _string; \
data->string_len = _string_len; \
data->start_position = _start_position; \
data->expected = NULL; \
match = g_new0 (Match, 1); \
match->string = t1; \
match->start = s1; \
match->end = e1; \
data->expected = g_slist_append (data->expected, match); \
match = g_new0 (Match, 1); \
match->string = t2; \
match->start = s2; \
match->end = e2; \
data->expected = g_slist_append (data->expected, match); \
match = g_new0 (Match, 1); \
match->string = t3; \
match->start = s3; \
match->end = e3; \
data->expected = g_slist_append (data->expected, match); \
if (_string_len == -1 && _start_position == 0) { \
path = g_strdup_printf ("/regex/match-all3/%d", ++total); \
g_test_add_data_func (path, data, test_match_all); \
g_free (path); \
} \
path = g_strdup_printf ("/regex/match-all-full3/%d", ++total); \
g_test_add_data_func_full (path, data, test_match_all_full, free_match_all_data); \
g_free (path); \
}
static void
test_properties (void)
{
GRegex *regex;
GError *error;
gboolean res;
GMatchInfo *match;
gchar *str;
error = NULL;
regex = g_regex_new ("\\p{L}\\p{Ll}\\p{Lu}\\p{L&}\\p{N}\\p{Nd}", G_REGEX_OPTIMIZE, 0, &error);
res = g_regex_match (regex, "ppPP01", 0, &match);
g_assert (res);
str = g_match_info_fetch (match, 0);
g_assert_cmpstr (str, ==, "ppPP01");
g_free (str);
g_match_info_free (match);
g_regex_unref (regex);
}
static void
test_class (void)
{
GRegex *regex;
GError *error;
GMatchInfo *match;
gboolean res;
gchar *str;
error = NULL;
regex = g_regex_new ("[abc\\x{0B1E}\\p{Mn}\\x{0391}-\\x{03A9}]", G_REGEX_OPTIMIZE, 0, &error);
res = g_regex_match (regex, "a:b:\340\254\236:\333\253:\316\240", 0, &match);
g_assert (res);
str = g_match_info_fetch (match, 0);
g_assert_cmpstr (str, ==, "a");
g_free (str);
res = g_match_info_next (match, NULL);
g_assert (res);
str = g_match_info_fetch (match, 0);
g_assert_cmpstr (str, ==, "b");
g_free (str);
res = g_match_info_next (match, NULL);
g_assert (res);
str = g_match_info_fetch (match, 0);
g_assert_cmpstr (str, ==, "\340\254\236");
g_free (str);
res = g_match_info_next (match, NULL);
g_assert (res);
str = g_match_info_fetch (match, 0);
g_assert_cmpstr (str, ==, "\333\253");
g_free (str);
res = g_match_info_next (match, NULL);
g_assert (res);
str = g_match_info_fetch (match, 0);
g_assert_cmpstr (str, ==, "\316\240");
g_free (str);
res = g_match_info_next (match, NULL);
g_assert (!res);
g_match_info_free (match);
g_regex_unref (regex);
}
/* examples for lookahead assertions taken from pcrepattern(3) */
static void
test_lookahead (void)
{
GRegex *regex;
GError *error;
GMatchInfo *match;
gboolean res;
gchar *str;
gint start, end;
error = NULL;
regex = g_regex_new ("\\w+(?=;)", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "word1 word2: word3;", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_assert_cmpint (g_match_info_get_match_count (match), ==, 1);
str = g_match_info_fetch (match, 0);
g_assert_cmpstr (str, ==, "word3");
g_free (str);
g_match_info_free (match);
g_regex_unref (regex);
error = NULL;
regex = g_regex_new ("foo(?!bar)", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "foobar foobaz", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_assert_cmpint (g_match_info_get_match_count (match), ==, 1);
res = g_match_info_fetch_pos (match, 0, &start, &end);
g_assert (res);
g_assert_cmpint (start, ==, 7);
g_assert_cmpint (end, ==, 10);
g_match_info_free (match);
g_regex_unref (regex);
error = NULL;
regex = g_regex_new ("(?!bar)foo", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "foobar foobaz", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_assert_cmpint (g_match_info_get_match_count (match), ==, 1);
res = g_match_info_fetch_pos (match, 0, &start, &end);
g_assert (res);
g_assert_cmpint (start, ==, 0);
g_assert_cmpint (end, ==, 3);
res = g_match_info_next (match, &error);
g_assert (res);
g_assert_no_error (error);
res = g_match_info_fetch_pos (match, 0, &start, &end);
g_assert (res);
g_assert_cmpint (start, ==, 7);
g_assert_cmpint (end, ==, 10);
g_match_info_free (match);
g_regex_unref (regex);
}
/* examples for lookbehind assertions taken from pcrepattern(3) */
static void
test_lookbehind (void)
{
GRegex *regex;
GError *error;
GMatchInfo *match;
gboolean res;
gint start, end;
error = NULL;
regex = g_regex_new ("(?<!foo)bar", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "foobar boobar", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_assert_cmpint (g_match_info_get_match_count (match), ==, 1);
res = g_match_info_fetch_pos (match, 0, &start, &end);
g_assert (res);
g_assert_cmpint (start, ==, 10);
g_assert_cmpint (end, ==, 13);
g_match_info_free (match);
g_regex_unref (regex);
error = NULL;
regex = g_regex_new ("(?<=bullock|donkey) poo", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "don poo, and bullock poo", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_assert_cmpint (g_match_info_get_match_count (match), ==, 1);
res = g_match_info_fetch_pos (match, 0, &start, NULL);
g_assert (res);
g_assert_cmpint (start, ==, 20);
g_match_info_free (match);
g_regex_unref (regex);
regex = g_regex_new ("(?<!dogs?|cats?) x", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex == NULL);
g_assert_error (error, G_REGEX_ERROR, G_REGEX_ERROR_VARIABLE_LENGTH_LOOKBEHIND);
g_clear_error (&error);
regex = g_regex_new ("(?<=ab(c|de)) foo", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex == NULL);
g_assert_error (error, G_REGEX_ERROR, G_REGEX_ERROR_VARIABLE_LENGTH_LOOKBEHIND);
g_clear_error (&error);
regex = g_regex_new ("(?<=abc|abde)foo", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "abfoo, abdfoo, abcfoo", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
res = g_match_info_fetch_pos (match, 0, &start, NULL);
g_assert (res);
g_assert_cmpint (start, ==, 18);
g_match_info_free (match);
g_regex_unref (regex);
regex = g_regex_new ("^.*+(?<=abcd)", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "abcabcabcabcabcabcabcabcabcd", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_match_info_free (match);
g_regex_unref (regex);
regex = g_regex_new ("(?<=\\d{3})(?<!999)foo", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "999foo 123abcfoo 123foo", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
res = g_match_info_fetch_pos (match, 0, &start, NULL);
g_assert (res);
g_assert_cmpint (start, ==, 20);
g_match_info_free (match);
g_regex_unref (regex);
regex = g_regex_new ("(?<=\\d{3}...)(?<!999)foo", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "999foo 123abcfoo 123foo", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
res = g_match_info_fetch_pos (match, 0, &start, NULL);
g_assert (res);
g_assert_cmpint (start, ==, 13);
g_match_info_free (match);
g_regex_unref (regex);
regex = g_regex_new ("(?<=\\d{3}(?!999)...)foo", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "999foo 123abcfoo 123foo", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
res = g_match_info_fetch_pos (match, 0, &start, NULL);
g_assert (res);
g_assert_cmpint (start, ==, 13);
g_match_info_free (match);
g_regex_unref (regex);
regex = g_regex_new ("(?<=(?<!foo)bar)baz", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "foobarbaz barfoobaz barbarbaz", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
res = g_match_info_fetch_pos (match, 0, &start, NULL);
g_assert (res);
g_assert_cmpint (start, ==, 26);
g_match_info_free (match);
g_regex_unref (regex);
}
/* examples for subpatterns taken from pcrepattern(3) */
static void
test_subpattern (void)
{
GRegex *regex;
GError *error;
GMatchInfo *match;
gboolean res;
gchar *str;
gint start;
error = NULL;
regex = g_regex_new ("cat(aract|erpillar|)", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex);
g_assert_no_error (error);
g_assert_cmpint (g_regex_get_capture_count (regex), ==, 1);
g_assert_cmpint (g_regex_get_max_backref (regex), ==, 0);
res = g_regex_match_all (regex, "caterpillar", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_assert_cmpint (g_match_info_get_match_count (match), ==, 2);
str = g_match_info_fetch (match, 0);
g_assert_cmpstr (str, ==, "caterpillar");
g_free (str);
str = g_match_info_fetch (match, 1);
g_assert_cmpstr (str, ==, "cat");
g_free (str);
g_match_info_free (match);
g_regex_unref (regex);
regex = g_regex_new ("the ((red|white) (king|queen))", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex);
g_assert_no_error (error);
g_assert_cmpint (g_regex_get_capture_count (regex), ==, 3);
g_assert_cmpint (g_regex_get_max_backref (regex), ==, 0);
res = g_regex_match (regex, "the red king", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_assert_cmpint (g_match_info_get_match_count (match), ==, 4);
str = g_match_info_fetch (match, 0);
g_assert_cmpstr (str, ==, "the red king");
g_free (str);
str = g_match_info_fetch (match, 1);
g_assert_cmpstr (str, ==, "red king");
g_free (str);
str = g_match_info_fetch (match, 2);
g_assert_cmpstr (str, ==, "red");
g_free (str);
str = g_match_info_fetch (match, 3);
g_assert_cmpstr (str, ==, "king");
g_free (str);
g_match_info_free (match);
g_regex_unref (regex);
regex = g_regex_new ("the ((?:red|white) (king|queen))", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "the white queen", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_assert_cmpint (g_match_info_get_match_count (match), ==, 3);
g_assert_cmpint (g_regex_get_max_backref (regex), ==, 0);
str = g_match_info_fetch (match, 0);
g_assert_cmpstr (str, ==, "the white queen");
g_free (str);
str = g_match_info_fetch (match, 1);
g_assert_cmpstr (str, ==, "white queen");
g_free (str);
str = g_match_info_fetch (match, 2);
g_assert_cmpstr (str, ==, "queen");
g_free (str);
g_match_info_free (match);
g_regex_unref (regex);
regex = g_regex_new ("(?|(Sat)(ur)|(Sun))day (morning|afternoon)", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex);
g_assert_no_error (error);
g_assert_cmpint (g_regex_get_capture_count (regex), ==, 3);
res = g_regex_match (regex, "Saturday morning", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_assert_cmpint (g_match_info_get_match_count (match), ==, 4);
str = g_match_info_fetch (match, 1);
g_assert_cmpstr (str, ==, "Sat");
g_free (str);
str = g_match_info_fetch (match, 2);
g_assert_cmpstr (str, ==, "ur");
g_free (str);
str = g_match_info_fetch (match, 3);
g_assert_cmpstr (str, ==, "morning");
g_free (str);
g_match_info_free (match);
g_regex_unref (regex);
regex = g_regex_new ("(?|(abc)|(def))\\1", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex);
g_assert_no_error (error);
g_assert_cmpint (g_regex_get_max_backref (regex), ==, 1);
res = g_regex_match (regex, "abcabc abcdef defabc defdef", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
res = g_match_info_fetch_pos (match, 0, &start, NULL);
g_assert (res);
g_assert_cmpint (start, ==, 0);
res = g_match_info_next (match, &error);
g_assert (res);
res = g_match_info_fetch_pos (match, 0, &start, NULL);
g_assert (res);
g_assert_cmpint (start, ==, 21);
g_match_info_free (match);
g_regex_unref (regex);
regex = g_regex_new ("(?|(abc)|(def))(?1)", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "abcabc abcdef defabc defdef", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
res = g_match_info_fetch_pos (match, 0, &start, NULL);
g_assert (res);
g_assert_cmpint (start, ==, 0);
res = g_match_info_next (match, &error);
g_assert (res);
res = g_match_info_fetch_pos (match, 0, &start, NULL);
g_assert (res);
g_assert_cmpint (start, ==, 14);
g_match_info_free (match);
g_regex_unref (regex);
regex = g_regex_new ("(?<DN>Mon|Fri|Sun)(?:day)?|(?<DN>Tue)(?:sday)?|(?<DN>Wed)(?:nesday)?|(?<DN>Thu)(?:rsday)?|(?<DN>Sat)(?:urday)?", G_REGEX_OPTIMIZE|G_REGEX_DUPNAMES, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "Mon Tuesday Wed Saturday", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
str = g_match_info_fetch_named (match, "DN");
g_assert_cmpstr (str, ==, "Mon");
g_free (str);
res = g_match_info_next (match, &error);
g_assert (res);
str = g_match_info_fetch_named (match, "DN");
g_assert_cmpstr (str, ==, "Tue");
g_free (str);
res = g_match_info_next (match, &error);
g_assert (res);
str = g_match_info_fetch_named (match, "DN");
g_assert_cmpstr (str, ==, "Wed");
g_free (str);
res = g_match_info_next (match, &error);
g_assert (res);
str = g_match_info_fetch_named (match, "DN");
g_assert_cmpstr (str, ==, "Sat");
g_free (str);
g_match_info_free (match);
g_regex_unref (regex);
regex = g_regex_new ("^(a|b\\1)+$", G_REGEX_OPTIMIZE|G_REGEX_DUPNAMES, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "aaaaaaaaaaaaaaaa", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_match_info_free (match);
res = g_regex_match (regex, "ababbaa", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_match_info_free (match);
g_regex_unref (regex);
}
/* examples for conditions taken from pcrepattern(3) */
static void
test_condition (void)
{
GRegex *regex;
GError *error;
GMatchInfo *match;
gboolean res;
error = NULL;
regex = g_regex_new ("^(a+)(\\()?[^()]+(?(-1)\\))(b+)$", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "a(zzzzzz)b", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_match_info_free (match);
res = g_regex_match (regex, "aaazzzzzzbbb", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_match_info_free (match);
g_regex_unref (regex);
error = NULL;
regex = g_regex_new ("^(a+)(?<OPEN>\\()?[^()]+(?(<OPEN>)\\))(b+)$", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "a(zzzzzz)b", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_match_info_free (match);
res = g_regex_match (regex, "aaazzzzzzbbb", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_match_info_free (match);
g_regex_unref (regex);
regex = g_regex_new ("^(a+)(?(+1)\\[|\\<)?[^()]+(\\])?(b+)$", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "a[zzzzzz]b", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_match_info_free (match);
res = g_regex_match (regex, "aaa<zzzzzzbbb", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_match_info_free (match);
g_regex_unref (regex);
regex = g_regex_new ("(?(DEFINE) (?<byte> 2[0-4]\\d | 25[0-5] | 1\\d\\d | [1-9]?\\d) )"
"\\b (?&byte) (\\.(?&byte)){3} \\b",
G_REGEX_OPTIMIZE|G_REGEX_EXTENDED, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "128.0.0.1", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_match_info_free (match);
res = g_regex_match (regex, "192.168.1.1", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_match_info_free (match);
res = g_regex_match (regex, "209.132.180.167", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_match_info_free (match);
g_regex_unref (regex);
regex = g_regex_new ("^(?(?=[^a-z]*[a-z])"
"\\d{2}-[a-z]{3}-\\d{2} | \\d{2}-\\d{2}-\\d{2} )$",
G_REGEX_OPTIMIZE|G_REGEX_EXTENDED, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "01-abc-24", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_match_info_free (match);
res = g_regex_match (regex, "01-23-45", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_match_info_free (match);
res = g_regex_match (regex, "01-uv-45", 0, &match);
g_assert (!res);
g_assert (!g_match_info_matches (match));
g_match_info_free (match);
res = g_regex_match (regex, "01-234-45", 0, &match);
g_assert (!res);
g_assert (!g_match_info_matches (match));
g_match_info_free (match);
g_regex_unref (regex);
}
/* examples for recursion taken from pcrepattern(3) */
static void
test_recursion (void)
{
GRegex *regex;
GError *error;
GMatchInfo *match;
gboolean res;
gint start;
error = NULL;
regex = g_regex_new ("\\( ( [^()]++ | (?R) )* \\)", G_REGEX_OPTIMIZE|G_REGEX_EXTENDED, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "(middle)", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_match_info_free (match);
res = g_regex_match (regex, "((((((((((((((((middle))))))))))))))))", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_match_info_free (match);
res = g_regex_match (regex, "(((xxx(((", 0, &match);
g_assert (!res);
g_assert (!g_match_info_matches (match));
g_match_info_free (match);
g_regex_unref (regex);
regex = g_regex_new ("^( \\( ( [^()]++ | (?1) )* \\) )$", G_REGEX_OPTIMIZE|G_REGEX_EXTENDED, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "((((((((((((((((middle))))))))))))))))", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_match_info_free (match);
res = g_regex_match (regex, "(((xxx((()", 0, &match);
g_assert (!res);
g_assert (!g_match_info_matches (match));
g_match_info_free (match);
g_regex_unref (regex);
regex = g_regex_new ("^(?<pn> \\( ( [^()]++ | (?&pn) )* \\) )$", G_REGEX_OPTIMIZE|G_REGEX_EXTENDED, 0, &error);
g_assert (regex);
g_assert_no_error (error);
g_regex_match (regex, "(aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa()", 0, &match);
g_assert (!res);
g_assert (!g_match_info_matches (match));
g_match_info_free (match);
g_regex_unref (regex);
regex = g_regex_new ("< (?: (?(R) \\d++ | [^<>]*+) | (?R)) * >", G_REGEX_OPTIMIZE|G_REGEX_EXTENDED, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "<ab<01<23<4>>>>", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
res = g_match_info_fetch_pos (match, 0, &start, NULL);
g_assert (res);
g_assert_cmpint (start, ==, 0);
g_match_info_free (match);
res = g_regex_match (regex, "<ab<01<xx<x>>>>", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
res = g_match_info_fetch_pos (match, 0, &start, NULL);
g_assert (res);
g_assert_cmpint (start, >, 0);
g_match_info_free (match);
g_regex_unref (regex);
regex = g_regex_new ("^((.)(?1)\\2|.)$", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "abcdcba", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_match_info_free (match);
res = g_regex_match (regex, "abcddcba", 0, &match);
g_assert (!res);
g_assert (!g_match_info_matches (match));
g_match_info_free (match);
g_regex_unref (regex);
regex = g_regex_new ("^(?:((.)(?1)\\2|)|((.)(?3)\\4|.))$", G_REGEX_OPTIMIZE, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "abcdcba", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_match_info_free (match);
res = g_regex_match (regex, "abcddcba", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_match_info_free (match);
g_regex_unref (regex);
regex = g_regex_new ("^\\W*+(?:((.)\\W*+(?1)\\W*+\\2|)|((.)\\W*+(?3)\\W*+\\4|\\W*+.\\W*+))\\W*+$", G_REGEX_OPTIMIZE|G_REGEX_CASELESS, 0, &error);
g_assert (regex);
g_assert_no_error (error);
res = g_regex_match (regex, "abcdcba", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_match_info_free (match);
res = g_regex_match (regex, "A man, a plan, a canal: Panama!", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_match_info_free (match);
res = g_regex_match (regex, "Oozy rat in a sanitary zoo", 0, &match);
g_assert (res);
g_assert (g_match_info_matches (match));
g_match_info_free (match);
g_regex_unref (regex);
}
static void
test_multiline (void)
{
GRegex *regex;
GMatchInfo *info;
gint count;
g_test_bug ("640489");
regex = g_regex_new ("^a$", G_REGEX_MULTILINE|G_REGEX_DOTALL, 0, NULL);
count = 0;
g_regex_match (regex, "a\nb\na", 0, &info);
while (g_match_info_matches (info))
{
count++;
g_match_info_next (info, NULL);
}
g_match_info_free (info);
g_regex_unref (regex);
g_assert_cmpint (count, ==, 2);
}
static void
test_explicit_crlf (void)
{
GRegex *regex;
regex = g_regex_new ("[\r\n]a", 0, 0, NULL);
g_assert_cmpint (g_regex_get_has_cr_or_lf (regex), ==, TRUE);
g_regex_unref (regex);
}
static void
test_max_lookbehind (void)
{
GRegex *regex;
regex = g_regex_new ("abc", 0, 0, NULL);
g_assert_cmpint (g_regex_get_max_lookbehind (regex), ==, 0);
g_regex_unref (regex);
regex = g_regex_new ("\\babc", 0, 0, NULL);
g_assert_cmpint (g_regex_get_max_lookbehind (regex), ==, 1);
g_regex_unref (regex);
regex = g_regex_new ("(?<=123)abc", 0, 0, NULL);
g_assert_cmpint (g_regex_get_max_lookbehind (regex), ==, 3);
g_regex_unref (regex);
}
static gboolean
pcre_ge (guint64 major, guint64 minor)
{
const char *version;
gchar *ptr;
guint64 pcre_major, pcre_minor;
/* e.g. 8.35 2014-04-04 */
version = pcre_version ();
pcre_major = g_ascii_strtoull (version, &ptr, 10);
/* ptr points to ".MINOR (release date)" */
g_assert (ptr[0] == '.');
pcre_minor = g_ascii_strtoull (ptr + 1, NULL, 10);
return (pcre_major > major) || (pcre_major == major && pcre_minor >= minor);
}
int
main (int argc, char *argv[])
{
setlocale (LC_ALL, "");
g_test_init (&argc, &argv, NULL);
g_test_bug_base ("http://bugzilla.gnome.org/");
g_test_add_func ("/regex/properties", test_properties);
g_test_add_func ("/regex/class", test_class);
g_test_add_func ("/regex/lookahead", test_lookahead);
g_test_add_func ("/regex/lookbehind", test_lookbehind);
g_test_add_func ("/regex/subpattern", test_subpattern);
g_test_add_func ("/regex/condition", test_condition);
g_test_add_func ("/regex/recursion", test_recursion);
g_test_add_func ("/regex/multiline", test_multiline);
g_test_add_func ("/regex/explicit-crlf", test_explicit_crlf);
g_test_add_func ("/regex/max-lookbehind", test_max_lookbehind);
/* TEST_NEW(pattern, compile_opts, match_opts) */
TEST_NEW("[A-Z]+", G_REGEX_CASELESS | G_REGEX_EXTENDED | G_REGEX_OPTIMIZE, G_REGEX_MATCH_NOTBOL | G_REGEX_MATCH_PARTIAL);
TEST_NEW("", 0, 0);
TEST_NEW(".*", 0, 0);
TEST_NEW(".*", G_REGEX_OPTIMIZE, 0);
TEST_NEW(".*", G_REGEX_MULTILINE, 0);
TEST_NEW(".*", G_REGEX_DOTALL, 0);
TEST_NEW(".*", G_REGEX_DOTALL, G_REGEX_MATCH_NOTBOL);
TEST_NEW("(123\\d*)[a-zA-Z]+(?P<hello>.*)", 0, 0);
TEST_NEW("(123\\d*)[a-zA-Z]+(?P<hello>.*)", G_REGEX_CASELESS, 0);
TEST_NEW("(123\\d*)[a-zA-Z]+(?P<hello>.*)", G_REGEX_CASELESS | G_REGEX_OPTIMIZE, 0);
TEST_NEW("(?P<A>x)|(?P<A>y)", G_REGEX_DUPNAMES, 0);
TEST_NEW("(?P<A>x)|(?P<A>y)", G_REGEX_DUPNAMES | G_REGEX_OPTIMIZE, 0);
/* This gives "internal error: code overflow" with pcre 6.0 */
TEST_NEW("(?i)(?-i)", 0, 0);
TEST_NEW ("(?i)a", 0, 0);
TEST_NEW ("(?m)a", 0, 0);
TEST_NEW ("(?s)a", 0, 0);
TEST_NEW ("(?x)a", 0, 0);
TEST_NEW ("(?J)a", 0, 0);
TEST_NEW ("(?U)[a-z]+", 0, 0);
/* TEST_NEW_CHECK_FLAGS(pattern, compile_opts, match_ops, real_compile_opts, real_match_opts) */
TEST_NEW_CHECK_FLAGS ("a", G_REGEX_OPTIMIZE, 0, G_REGEX_OPTIMIZE, 0);
TEST_NEW_CHECK_FLAGS ("a", G_REGEX_RAW, 0, G_REGEX_RAW, 0);
TEST_NEW_CHECK_FLAGS ("(?X)a", 0, 0, 0 /* not exposed by GRegex */, 0);
TEST_NEW_CHECK_FLAGS ("^.*", 0, 0, G_REGEX_ANCHORED, 0);
TEST_NEW_CHECK_FLAGS ("(*UTF8)a", 0, 0, 0 /* this is the default in GRegex */, 0);
TEST_NEW_CHECK_FLAGS ("(*UCP)a", 0, 0, 0 /* this always on in GRegex */, 0);
TEST_NEW_CHECK_FLAGS ("(*CR)a", 0, 0, G_REGEX_NEWLINE_CR, 0);
TEST_NEW_CHECK_FLAGS ("(*LF)a", 0, 0, G_REGEX_NEWLINE_LF, 0);
TEST_NEW_CHECK_FLAGS ("(*CRLF)a", 0, 0, G_REGEX_NEWLINE_CRLF, 0);
TEST_NEW_CHECK_FLAGS ("(*ANY)a", 0, 0, 0 /* this is the default in GRegex */, 0);
TEST_NEW_CHECK_FLAGS ("(*ANYCRLF)a", 0, 0, G_REGEX_NEWLINE_ANYCRLF, 0);
TEST_NEW_CHECK_FLAGS ("(*BSR_ANYCRLF)a", 0, 0, G_REGEX_BSR_ANYCRLF, 0);
TEST_NEW_CHECK_FLAGS ("(*BSR_UNICODE)a", 0, 0, 0 /* this is the default in GRegex */, 0);
TEST_NEW_CHECK_FLAGS ("(*NO_START_OPT)a", 0, 0, 0 /* not exposed in GRegex */, 0);
/* TEST_NEW_FAIL(pattern, compile_opts, expected_error) */
TEST_NEW_FAIL("(", 0, G_REGEX_ERROR_UNMATCHED_PARENTHESIS);
TEST_NEW_FAIL(")", 0, G_REGEX_ERROR_UNMATCHED_PARENTHESIS);
TEST_NEW_FAIL("[", 0, G_REGEX_ERROR_UNTERMINATED_CHARACTER_CLASS);
TEST_NEW_FAIL("*", 0, G_REGEX_ERROR_NOTHING_TO_REPEAT);
TEST_NEW_FAIL("?", 0, G_REGEX_ERROR_NOTHING_TO_REPEAT);
TEST_NEW_FAIL("(?P<A>x)|(?P<A>y)", 0, G_REGEX_ERROR_DUPLICATE_SUBPATTERN_NAME);
/* Check all GRegexError codes */
TEST_NEW_FAIL ("a\\", 0, G_REGEX_ERROR_STRAY_BACKSLASH);
TEST_NEW_FAIL ("a\\c", 0, G_REGEX_ERROR_MISSING_CONTROL_CHAR);
TEST_NEW_FAIL ("a\\l", 0, G_REGEX_ERROR_UNRECOGNIZED_ESCAPE);
TEST_NEW_FAIL ("a{4,2}", 0, G_REGEX_ERROR_QUANTIFIERS_OUT_OF_ORDER);
TEST_NEW_FAIL ("a{999999,}", 0, G_REGEX_ERROR_QUANTIFIER_TOO_BIG);
TEST_NEW_FAIL ("[a-z", 0, G_REGEX_ERROR_UNTERMINATED_CHARACTER_CLASS);
TEST_NEW_FAIL ("(?X)[\\B]", 0, G_REGEX_ERROR_INVALID_ESCAPE_IN_CHARACTER_CLASS);
TEST_NEW_FAIL ("[z-a]", 0, G_REGEX_ERROR_RANGE_OUT_OF_ORDER);
TEST_NEW_FAIL ("{2,4}", 0, G_REGEX_ERROR_NOTHING_TO_REPEAT);
TEST_NEW_FAIL ("a(?u)", 0, G_REGEX_ERROR_UNRECOGNIZED_CHARACTER);
TEST_NEW_FAIL ("a(?<$foo)bar", 0, G_REGEX_ERROR_UNRECOGNIZED_CHARACTER);
TEST_NEW_FAIL ("a[:alpha:]b", 0, G_REGEX_ERROR_POSIX_NAMED_CLASS_OUTSIDE_CLASS);
TEST_NEW_FAIL ("a(b", 0, G_REGEX_ERROR_UNMATCHED_PARENTHESIS);
TEST_NEW_FAIL ("a)b", 0, G_REGEX_ERROR_UNMATCHED_PARENTHESIS);
TEST_NEW_FAIL ("a(?R", 0, G_REGEX_ERROR_UNMATCHED_PARENTHESIS);
TEST_NEW_FAIL ("a(?-54", 0, G_REGEX_ERROR_UNMATCHED_PARENTHESIS);
TEST_NEW_FAIL ("(ab\\2)", 0, G_REGEX_ERROR_INEXISTENT_SUBPATTERN_REFERENCE);
TEST_NEW_FAIL ("a(?#abc", 0, G_REGEX_ERROR_UNTERMINATED_COMMENT);
TEST_NEW_FAIL ("(?<=a+)b", 0, G_REGEX_ERROR_VARIABLE_LENGTH_LOOKBEHIND);
TEST_NEW_FAIL ("(?(1?)a|b)", 0, G_REGEX_ERROR_MALFORMED_CONDITION);
TEST_NEW_FAIL ("(a)(?(1)a|b|c)", 0, G_REGEX_ERROR_TOO_MANY_CONDITIONAL_BRANCHES);
TEST_NEW_FAIL ("(?(?i))", 0, G_REGEX_ERROR_ASSERTION_EXPECTED);
TEST_NEW_FAIL ("a[[:fubar:]]b", 0, G_REGEX_ERROR_UNKNOWN_POSIX_CLASS_NAME);
TEST_NEW_FAIL ("[[.ch.]]", 0, G_REGEX_ERROR_POSIX_COLLATING_ELEMENTS_NOT_SUPPORTED);
TEST_NEW_FAIL ("\\x{110000}", 0, G_REGEX_ERROR_HEX_CODE_TOO_LARGE);
TEST_NEW_FAIL ("^(?(0)f|b)oo", 0, G_REGEX_ERROR_INVALID_CONDITION);
TEST_NEW_FAIL ("(?<=\\C)X", 0, G_REGEX_ERROR_SINGLE_BYTE_MATCH_IN_LOOKBEHIND);
TEST_NEW_FAIL ("(?!\\w)(?R)", 0, G_REGEX_ERROR_INFINITE_LOOP);
if (pcre_ge (8, 37))
{
/* The expected errors changed here. */
TEST_NEW_FAIL ("(?(?<ab))", 0, G_REGEX_ERROR_ASSERTION_EXPECTED);
}
else
{
TEST_NEW_FAIL ("(?(?<ab))", 0, G_REGEX_ERROR_MISSING_SUBPATTERN_NAME_TERMINATOR);
}
if (pcre_ge (8, 35))
{
/* The expected errors changed here. */
TEST_NEW_FAIL ("(?P<sub>foo)\\g<sub", 0, G_REGEX_ERROR_MISSING_SUBPATTERN_NAME_TERMINATOR);
}
else
{
TEST_NEW_FAIL ("(?P<sub>foo)\\g<sub", 0, G_REGEX_ERROR_MISSING_BACK_REFERENCE);
}
TEST_NEW_FAIL ("(?P<x>eks)(?P<x>eccs)", 0, G_REGEX_ERROR_DUPLICATE_SUBPATTERN_NAME);
#if 0
TEST_NEW_FAIL (?, 0, G_REGEX_ERROR_MALFORMED_PROPERTY);
TEST_NEW_FAIL (?, 0, G_REGEX_ERROR_UNKNOWN_PROPERTY);
#endif
TEST_NEW_FAIL ("\\666", G_REGEX_RAW, G_REGEX_ERROR_INVALID_OCTAL_VALUE);
TEST_NEW_FAIL ("^(?(DEFINE) abc | xyz ) ", 0, G_REGEX_ERROR_TOO_MANY_BRANCHES_IN_DEFINE);
TEST_NEW_FAIL ("a", G_REGEX_NEWLINE_CRLF | G_REGEX_NEWLINE_ANYCRLF, G_REGEX_ERROR_INCONSISTENT_NEWLINE_OPTIONS);
TEST_NEW_FAIL ("^(a)\\g{3", 0, G_REGEX_ERROR_MISSING_BACK_REFERENCE);
TEST_NEW_FAIL ("^(a)\\g{0}", 0, G_REGEX_ERROR_INVALID_RELATIVE_REFERENCE);
TEST_NEW_FAIL ("abc(*FAIL:123)xyz", 0, G_REGEX_ERROR_BACKTRACKING_CONTROL_VERB_ARGUMENT_FORBIDDEN);
TEST_NEW_FAIL ("a(*FOOBAR)b", 0, G_REGEX_ERROR_UNKNOWN_BACKTRACKING_CONTROL_VERB);
TEST_NEW_FAIL ("(?i:A{1,}\\6666666666)", 0, G_REGEX_ERROR_NUMBER_TOO_BIG);
TEST_NEW_FAIL ("(?<a>)(?&)", 0, G_REGEX_ERROR_MISSING_SUBPATTERN_NAME);
TEST_NEW_FAIL ("(?+-a)", 0, G_REGEX_ERROR_MISSING_DIGIT);
TEST_NEW_FAIL ("TA]", G_REGEX_JAVASCRIPT_COMPAT, G_REGEX_ERROR_INVALID_DATA_CHARACTER);
TEST_NEW_FAIL ("(?|(?<a>A)|(?<b>B))", 0, G_REGEX_ERROR_EXTRA_SUBPATTERN_NAME);
TEST_NEW_FAIL ("a(*MARK)b", 0, G_REGEX_ERROR_BACKTRACKING_CONTROL_VERB_ARGUMENT_REQUIRED);
TEST_NEW_FAIL ("^\\c€", 0, G_REGEX_ERROR_INVALID_CONTROL_CHAR);
TEST_NEW_FAIL ("\\k", 0, G_REGEX_ERROR_MISSING_NAME);
TEST_NEW_FAIL ("a[\\NB]c", 0, G_REGEX_ERROR_NOT_SUPPORTED_IN_CLASS);
TEST_NEW_FAIL ("(*:0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDEF0123456789ABCDEFG)XX", 0, G_REGEX_ERROR_NAME_TOO_LONG);
TEST_NEW_FAIL ("\\u0100", G_REGEX_RAW | G_REGEX_JAVASCRIPT_COMPAT, G_REGEX_ERROR_CHARACTER_VALUE_TOO_LARGE);
/* These errors can't really be tested sanely:
* G_REGEX_ERROR_EXPRESSION_TOO_LARGE
* G_REGEX_ERROR_MEMORY_ERROR
* G_REGEX_ERROR_SUBPATTERN_NAME_TOO_LONG
* G_REGEX_ERROR_TOO_MANY_SUBPATTERNS
* G_REGEX_ERROR_TOO_MANY_FORWARD_REFERENCES
*
* These errors are obsolete and never raised by PCRE:
* G_REGEX_ERROR_DEFINE_REPETION
*/
/* TEST_MATCH_SIMPLE(pattern, string, compile_opts, match_opts, expected) */
TEST_MATCH_SIMPLE("a", "", 0, 0, FALSE);
TEST_MATCH_SIMPLE("a", "a", 0, 0, TRUE);
TEST_MATCH_SIMPLE("a", "ba", 0, 0, TRUE);
TEST_MATCH_SIMPLE("^a", "ba", 0, 0, FALSE);
TEST_MATCH_SIMPLE("a", "ba", G_REGEX_ANCHORED, 0, FALSE);
TEST_MATCH_SIMPLE("a", "ba", 0, G_REGEX_MATCH_ANCHORED, FALSE);
TEST_MATCH_SIMPLE("a", "ab", G_REGEX_ANCHORED, 0, TRUE);
TEST_MATCH_SIMPLE("a", "ab", 0, G_REGEX_MATCH_ANCHORED, TRUE);
TEST_MATCH_SIMPLE("a", "a", G_REGEX_CASELESS, 0, TRUE);
TEST_MATCH_SIMPLE("a", "A", G_REGEX_CASELESS, 0, TRUE);
/* These are needed to test extended properties. */
TEST_MATCH_SIMPLE(AGRAVE, AGRAVE, G_REGEX_CASELESS, 0, TRUE);
TEST_MATCH_SIMPLE(AGRAVE, AGRAVE_UPPER, G_REGEX_CASELESS, 0, TRUE);
TEST_MATCH_SIMPLE("\\p{L}", "a", 0, 0, TRUE);
TEST_MATCH_SIMPLE("\\p{L}", "1", 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{L}", AGRAVE, 0, 0, TRUE);
TEST_MATCH_SIMPLE("\\p{L}", AGRAVE_UPPER, 0, 0, TRUE);
TEST_MATCH_SIMPLE("\\p{L}", SHEEN, 0, 0, TRUE);
TEST_MATCH_SIMPLE("\\p{L}", ETH30, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Ll}", "a", 0, 0, TRUE);
TEST_MATCH_SIMPLE("\\p{Ll}", AGRAVE, 0, 0, TRUE);
TEST_MATCH_SIMPLE("\\p{Ll}", AGRAVE_UPPER, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Ll}", ETH30, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Sc}", AGRAVE, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Sc}", EURO, 0, 0, TRUE);
TEST_MATCH_SIMPLE("\\p{Sc}", ETH30, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{N}", "a", 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{N}", "1", 0, 0, TRUE);
TEST_MATCH_SIMPLE("\\p{N}", AGRAVE, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{N}", AGRAVE_UPPER, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{N}", SHEEN, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{N}", ETH30, 0, 0, TRUE);
TEST_MATCH_SIMPLE("\\p{Nd}", "a", 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Nd}", "1", 0, 0, TRUE);
TEST_MATCH_SIMPLE("\\p{Nd}", AGRAVE, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Nd}", AGRAVE_UPPER, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Nd}", SHEEN, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Nd}", ETH30, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Common}", SHEEN, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Common}", "a", 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Common}", AGRAVE, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Common}", AGRAVE_UPPER, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Common}", ETH30, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Common}", "%", 0, 0, TRUE);
TEST_MATCH_SIMPLE("\\p{Common}", "1", 0, 0, TRUE);
TEST_MATCH_SIMPLE("\\p{Arabic}", SHEEN, 0, 0, TRUE);
TEST_MATCH_SIMPLE("\\p{Arabic}", "a", 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Arabic}", AGRAVE, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Arabic}", AGRAVE_UPPER, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Arabic}", ETH30, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Arabic}", "%", 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Arabic}", "1", 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Latin}", SHEEN, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Latin}", "a", 0, 0, TRUE);
TEST_MATCH_SIMPLE("\\p{Latin}", AGRAVE, 0, 0, TRUE);
TEST_MATCH_SIMPLE("\\p{Latin}", AGRAVE_UPPER, 0, 0, TRUE);
TEST_MATCH_SIMPLE("\\p{Latin}", ETH30, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Latin}", "%", 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Latin}", "1", 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Ethiopic}", SHEEN, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Ethiopic}", "a", 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Ethiopic}", AGRAVE, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Ethiopic}", AGRAVE_UPPER, 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Ethiopic}", ETH30, 0, 0, TRUE);
TEST_MATCH_SIMPLE("\\p{Ethiopic}", "%", 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{Ethiopic}", "1", 0, 0, FALSE);
TEST_MATCH_SIMPLE("\\p{L}(?<=\\p{Arabic})", SHEEN, 0, 0, TRUE);
TEST_MATCH_SIMPLE("\\p{L}(?<=\\p{Latin})", SHEEN, 0, 0, FALSE);
/* Invalid patterns. */
TEST_MATCH_SIMPLE("\\", "a", 0, 0, FALSE);
TEST_MATCH_SIMPLE("[", "", 0, 0, FALSE);
/* TEST_MATCH(pattern, compile_opts, match_opts, string,
* string_len, start_position, match_opts2, expected) */
TEST_MATCH("a", 0, 0, "a", -1, 0, 0, TRUE);
TEST_MATCH("a", 0, 0, "A", -1, 0, 0, FALSE);
TEST_MATCH("a", G_REGEX_CASELESS, 0, "A", -1, 0, 0, TRUE);
TEST_MATCH("a", 0, 0, "ab", -1, 1, 0, FALSE);
TEST_MATCH("a", 0, 0, "ba", 1, 0, 0, FALSE);
TEST_MATCH("a", 0, 0, "bab", -1, 0, 0, TRUE);
TEST_MATCH("a", 0, 0, "b", -1, 0, 0, FALSE);
TEST_MATCH("a", 0, G_REGEX_MATCH_ANCHORED, "a", -1, 0, 0, TRUE);
TEST_MATCH("a", 0, G_REGEX_MATCH_ANCHORED, "ab", -1, 1, 0, FALSE);
TEST_MATCH("a", 0, G_REGEX_MATCH_ANCHORED, "ba", 1, 0, 0, FALSE);
TEST_MATCH("a", 0, G_REGEX_MATCH_ANCHORED, "bab", -1, 0, 0, FALSE);
TEST_MATCH("a", 0, G_REGEX_MATCH_ANCHORED, "b", -1, 0, 0, FALSE);
TEST_MATCH("a", 0, 0, "a", -1, 0, G_REGEX_MATCH_ANCHORED, TRUE);
TEST_MATCH("a", 0, 0, "ab", -1, 1, G_REGEX_MATCH_ANCHORED, FALSE);
TEST_MATCH("a", 0, 0, "ba", 1, 0, G_REGEX_MATCH_ANCHORED, FALSE);
TEST_MATCH("a", 0, 0, "bab", -1, 0, G_REGEX_MATCH_ANCHORED, FALSE);
TEST_MATCH("a", 0, 0, "b", -1, 0, G_REGEX_MATCH_ANCHORED, FALSE);
TEST_MATCH("a|b", 0, 0, "a", -1, 0, 0, TRUE);
TEST_MATCH("\\d", 0, 0, EURO, -1, 0, 0, FALSE);
TEST_MATCH("^.$", 0, 0, EURO, -1, 0, 0, TRUE);
TEST_MATCH("^.{3}$", 0, 0, EURO, -1, 0, 0, FALSE);
TEST_MATCH("^.$", G_REGEX_RAW, 0, EURO, -1, 0, 0, FALSE);
TEST_MATCH("^.{3}$", G_REGEX_RAW, 0, EURO, -1, 0, 0, TRUE);
TEST_MATCH(AGRAVE, G_REGEX_CASELESS, 0, AGRAVE_UPPER, -1, 0, 0, TRUE);
/* New lines handling. */
TEST_MATCH("^a\\Rb$", 0, 0, "a\r\nb", -1, 0, 0, TRUE);
TEST_MATCH("^a\\Rb$", 0, 0, "a\nb", -1, 0, 0, TRUE);
TEST_MATCH("^a\\Rb$", 0, 0, "a\rb", -1, 0, 0, TRUE);
TEST_MATCH("^a\\Rb$", 0, 0, "a\n\rb", -1, 0, 0, FALSE);
TEST_MATCH("^a\\R\\Rb$", 0, 0, "a\n\rb", -1, 0, 0, TRUE);
TEST_MATCH("^a\\nb$", 0, 0, "a\r\nb", -1, 0, 0, FALSE);
TEST_MATCH("^a\\r\\nb$", 0, 0, "a\r\nb", -1, 0, 0, TRUE);
TEST_MATCH("^b$", 0, 0, "a\nb\nc", -1, 0, 0, FALSE);
TEST_MATCH("^b$", G_REGEX_MULTILINE, 0, "a\nb\nc", -1, 0, 0, TRUE);
TEST_MATCH("^b$", G_REGEX_MULTILINE, 0, "a\r\nb\r\nc", -1, 0, 0, TRUE);
TEST_MATCH("^b$", G_REGEX_MULTILINE, 0, "a\rb\rc", -1, 0, 0, TRUE);
TEST_MATCH("^b$", G_REGEX_MULTILINE | G_REGEX_NEWLINE_CR, 0, "a\nb\nc", -1, 0, 0, FALSE);
TEST_MATCH("^b$", G_REGEX_MULTILINE | G_REGEX_NEWLINE_LF, 0, "a\nb\nc", -1, 0, 0, TRUE);
TEST_MATCH("^b$", G_REGEX_MULTILINE | G_REGEX_NEWLINE_CRLF, 0, "a\nb\nc", -1, 0, 0, FALSE);
TEST_MATCH("^b$", G_REGEX_MULTILINE | G_REGEX_NEWLINE_CR, 0, "a\r\nb\r\nc", -1, 0, 0, FALSE);
TEST_MATCH("^b$", G_REGEX_MULTILINE | G_REGEX_NEWLINE_LF, 0, "a\r\nb\r\nc", -1, 0, 0, FALSE);
TEST_MATCH("^b$", G_REGEX_MULTILINE | G_REGEX_NEWLINE_CRLF, 0, "a\r\nb\r\nc", -1, 0, 0, TRUE);
TEST_MATCH("^b$", G_REGEX_MULTILINE | G_REGEX_NEWLINE_CR, 0, "a\rb\rc", -1, 0, 0, TRUE);
TEST_MATCH("^b$", G_REGEX_MULTILINE | G_REGEX_NEWLINE_LF, 0, "a\rb\rc", -1, 0, 0, FALSE);
TEST_MATCH("^b$", G_REGEX_MULTILINE | G_REGEX_NEWLINE_CRLF, 0, "a\rb\rc", -1, 0, 0, FALSE);
TEST_MATCH("^b$", G_REGEX_MULTILINE, G_REGEX_MATCH_NEWLINE_CR, "a\nb\nc", -1, 0, 0, FALSE);
TEST_MATCH("^b$", G_REGEX_MULTILINE, G_REGEX_MATCH_NEWLINE_LF, "a\nb\nc", -1, 0, 0, TRUE);
TEST_MATCH("^b$", G_REGEX_MULTILINE, G_REGEX_MATCH_NEWLINE_CRLF, "a\nb\nc", -1, 0, 0, FALSE);
TEST_MATCH("^b$", G_REGEX_MULTILINE, G_REGEX_MATCH_NEWLINE_CR, "a\r\nb\r\nc", -1, 0, 0, FALSE);
TEST_MATCH("^b$", G_REGEX_MULTILINE, G_REGEX_MATCH_NEWLINE_LF, "a\r\nb\r\nc", -1, 0, 0, FALSE);
TEST_MATCH("^b$", G_REGEX_MULTILINE, G_REGEX_MATCH_NEWLINE_CRLF, "a\r\nb\r\nc", -1, 0, 0, TRUE);
TEST_MATCH("^b$", G_REGEX_MULTILINE, G_REGEX_MATCH_NEWLINE_CR, "a\rb\rc", -1, 0, 0, TRUE);
TEST_MATCH("^b$", G_REGEX_MULTILINE, G_REGEX_MATCH_NEWLINE_LF, "a\rb\rc", -1, 0, 0, FALSE);
TEST_MATCH("^b$", G_REGEX_MULTILINE, G_REGEX_MATCH_NEWLINE_CRLF, "a\rb\rc", -1, 0, 0, FALSE);
TEST_MATCH("^b$", G_REGEX_MULTILINE | G_REGEX_NEWLINE_CR, G_REGEX_MATCH_NEWLINE_ANY, "a\nb\nc", -1, 0, 0, TRUE);
TEST_MATCH("^b$", G_REGEX_MULTILINE | G_REGEX_NEWLINE_CR, G_REGEX_MATCH_NEWLINE_ANY, "a\rb\rc", -1, 0, 0, TRUE);
TEST_MATCH("^b$", G_REGEX_MULTILINE | G_REGEX_NEWLINE_CR, G_REGEX_MATCH_NEWLINE_ANY, "a\r\nb\r\nc", -1, 0, 0, TRUE);
TEST_MATCH("^b$", G_REGEX_MULTILINE | G_REGEX_NEWLINE_CR, G_REGEX_MATCH_NEWLINE_LF, "a\nb\nc", -1, 0, 0, TRUE);
TEST_MATCH("^b$", G_REGEX_MULTILINE | G_REGEX_NEWLINE_CR, G_REGEX_MATCH_NEWLINE_LF, "a\rb\rc", -1, 0, 0, FALSE);
TEST_MATCH("^b$", G_REGEX_MULTILINE | G_REGEX_NEWLINE_CR, G_REGEX_MATCH_NEWLINE_CRLF, "a\r\nb\r\nc", -1, 0, 0, TRUE);
TEST_MATCH("^b$", G_REGEX_MULTILINE | G_REGEX_NEWLINE_CR, G_REGEX_MATCH_NEWLINE_CRLF, "a\rb\rc", -1, 0, 0, FALSE);
TEST_MATCH("a#\nb", G_REGEX_EXTENDED, 0, "a", -1, 0, 0, FALSE);
TEST_MATCH("a#\r\nb", G_REGEX_EXTENDED, 0, "a", -1, 0, 0, FALSE);
TEST_MATCH("a#\rb", G_REGEX_EXTENDED, 0, "a", -1, 0, 0, FALSE);
TEST_MATCH("a#\nb", G_REGEX_EXTENDED, G_REGEX_MATCH_NEWLINE_CR, "a", -1, 0, 0, FALSE);
TEST_MATCH("a#\nb", G_REGEX_EXTENDED | G_REGEX_NEWLINE_CR, 0, "a", -1, 0, 0, TRUE);
TEST_MATCH("line\nbreak", G_REGEX_MULTILINE, 0, "this is a line\nbreak", -1, 0, 0, TRUE);
TEST_MATCH("line\nbreak", G_REGEX_MULTILINE | G_REGEX_FIRSTLINE, 0, "first line\na line\nbreak", -1, 0, 0, FALSE);
/* This failed with PCRE 7.2 (gnome bug #455640) */
TEST_MATCH(".*$", 0, 0, "\xe1\xbb\x85", -1, 0, 0, TRUE);
/* Test that othercasing in our pcre/glib integration is bug-for-bug compatible
* with pcre's internal tables. Bug #678273 */
TEST_MATCH("[DŽ]", G_REGEX_CASELESS, 0, "DŽ", -1, 0, 0, TRUE);
TEST_MATCH("[DŽ]", G_REGEX_CASELESS, 0, "dž", -1, 0, 0, TRUE);
#if PCRE_MAJOR > 8 || (PCRE_MAJOR == 8 && PCRE_MINOR >= 32)
/* This would incorrectly fail to match in pcre < 8.32, so only assert
* this for known-good pcre. */
TEST_MATCH("[DŽ]", G_REGEX_CASELESS, 0, "Dž", -1, 0, 0, TRUE);
#endif
/* TEST_MATCH_NEXT#(pattern, string, string_len, start_position, ...) */
TEST_MATCH_NEXT0("a", "x", -1, 0);
TEST_MATCH_NEXT0("a", "ax", -1, 1);
TEST_MATCH_NEXT0("a", "xa", 1, 0);
TEST_MATCH_NEXT0("a", "axa", 1, 2);
TEST_MATCH_NEXT1("a", "a", -1, 0, "a", 0, 1);
TEST_MATCH_NEXT1("a", "xax", -1, 0, "a", 1, 2);
TEST_MATCH_NEXT1(EURO, ENG EURO, -1, 0, EURO, 2, 5);
TEST_MATCH_NEXT1("a*", "", -1, 0, "", 0, 0);
TEST_MATCH_NEXT2("a*", "aa", -1, 0, "aa", 0, 2, "", 2, 2);
TEST_MATCH_NEXT2(EURO "*", EURO EURO, -1, 0, EURO EURO, 0, 6, "", 6, 6);
TEST_MATCH_NEXT2("a", "axa", -1, 0, "a", 0, 1, "a", 2, 3);
TEST_MATCH_NEXT2("a+", "aaxa", -1, 0, "aa", 0, 2, "a", 3, 4);
TEST_MATCH_NEXT2("a", "aa", -1, 0, "a", 0, 1, "a", 1, 2);
TEST_MATCH_NEXT2("a", "ababa", -1, 2, "a", 2, 3, "a", 4, 5);
TEST_MATCH_NEXT2(EURO "+", EURO "-" EURO, -1, 0, EURO, 0, 3, EURO, 4, 7);
TEST_MATCH_NEXT3("", "ab", -1, 0, "", 0, 0, "", 1, 1, "", 2, 2);
TEST_MATCH_NEXT3("", AGRAVE "b", -1, 0, "", 0, 0, "", 2, 2, "", 3, 3);
TEST_MATCH_NEXT3("a", "aaxa", -1, 0, "a", 0, 1, "a", 1, 2, "a", 3, 4);
TEST_MATCH_NEXT3("a", "aa" OGRAVE "a", -1, 0, "a", 0, 1, "a", 1, 2, "a", 4, 5);
TEST_MATCH_NEXT3("a*", "aax", -1, 0, "aa", 0, 2, "", 2, 2, "", 3, 3);
TEST_MATCH_NEXT3("(?=[A-Z0-9])", "RegExTest", -1, 0, "", 0, 0, "", 3, 3, "", 5, 5);
TEST_MATCH_NEXT4("a*", "aaxa", -1, 0, "aa", 0, 2, "", 2, 2, "a", 3, 4, "", 4, 4);
/* TEST_MATCH_COUNT(pattern, string, start_position, match_opts, expected_count) */
TEST_MATCH_COUNT("a", "", 0, 0, 0);
TEST_MATCH_COUNT("a", "a", 0, 0, 1);
TEST_MATCH_COUNT("a", "a", 1, 0, 0);
TEST_MATCH_COUNT("(.)", "a", 0, 0, 2);
TEST_MATCH_COUNT("(.)", EURO, 0, 0, 2);
TEST_MATCH_COUNT("(?:.)", "a", 0, 0, 1);
TEST_MATCH_COUNT("(?P<A>.)", "a", 0, 0, 2);
TEST_MATCH_COUNT("a$", "a", 0, G_REGEX_MATCH_NOTEOL, 0);
TEST_MATCH_COUNT("(a)?(b)", "b", 0, 0, 3);
TEST_MATCH_COUNT("(a)?(b)", "ab", 0, 0, 3);
/* TEST_PARTIAL(pattern, string, expected) */
TEST_PARTIAL("^ab", "a",