6 |
and semantics are as close as possible to those of the Perl 5 language. |
and semantics are as close as possible to those of the Perl 5 language. |
7 |
|
|
8 |
Written by Philip Hazel |
Written by Philip Hazel |
9 |
Copyright (c) 1997-2006 University of Cambridge |
Copyright (c) 1997-2007 University of Cambridge |
10 |
|
|
11 |
----------------------------------------------------------------------------- |
----------------------------------------------------------------------------- |
12 |
Redistribution and use in source and binary forms, with or without |
Redistribution and use in source and binary forms, with or without |
82 |
on. Zero means further processing is needed (for things like \x), or the escape |
on. Zero means further processing is needed (for things like \x), or the escape |
83 |
is invalid. */ |
is invalid. */ |
84 |
|
|
85 |
#if !EBCDIC /* This is the "normal" table for ASCII systems */ |
#ifndef EBCDIC /* This is the "normal" table for ASCII systems */ |
86 |
static const short int escapes[] = { |
static const short int escapes[] = { |
87 |
0, 0, 0, 0, 0, 0, 0, 0, /* 0 - 7 */ |
0, 0, 0, 0, 0, 0, 0, 0, /* 0 - 7 */ |
88 |
0, 0, ':', ';', '<', '=', '>', '?', /* 8 - ? */ |
0, 0, ':', ';', '<', '=', '>', '?', /* 8 - ? */ |
89 |
'@', -ESC_A, -ESC_B, -ESC_C, -ESC_D, -ESC_E, 0, -ESC_G, /* @ - G */ |
'@', -ESC_A, -ESC_B, -ESC_C, -ESC_D, -ESC_E, 0, -ESC_G, /* @ - G */ |
90 |
0, 0, 0, 0, 0, 0, 0, 0, /* H - O */ |
0, 0, 0, -ESC_K, 0, 0, 0, 0, /* H - O */ |
91 |
-ESC_P, -ESC_Q, -ESC_R, -ESC_S, 0, 0, 0, -ESC_W, /* P - W */ |
-ESC_P, -ESC_Q, -ESC_R, -ESC_S, 0, 0, 0, -ESC_W, /* P - W */ |
92 |
-ESC_X, 0, -ESC_Z, '[', '\\', ']', '^', '_', /* X - _ */ |
-ESC_X, 0, -ESC_Z, '[', '\\', ']', '^', '_', /* X - _ */ |
93 |
'`', 7, -ESC_b, 0, -ESC_d, ESC_e, ESC_f, 0, /* ` - g */ |
'`', 7, -ESC_b, 0, -ESC_d, ESC_e, ESC_f, 0, /* ` - g */ |
96 |
0, 0, -ESC_z /* x - z */ |
0, 0, -ESC_z /* x - z */ |
97 |
}; |
}; |
98 |
|
|
99 |
#else /* This is the "abnormal" table for EBCDIC systems */ |
#else /* This is the "abnormal" table for EBCDIC systems */ |
100 |
static const short int escapes[] = { |
static const short int escapes[] = { |
101 |
/* 48 */ 0, 0, 0, '.', '<', '(', '+', '|', |
/* 48 */ 0, 0, 0, '.', '<', '(', '+', '|', |
102 |
/* 50 */ '&', 0, 0, 0, 0, 0, 0, 0, |
/* 50 */ '&', 0, 0, 0, 0, 0, 0, 0, |
208 |
"malformed number or name after (?(", |
"malformed number or name after (?(", |
209 |
"conditional group contains more than two branches", |
"conditional group contains more than two branches", |
210 |
"assertion expected after (?(", |
"assertion expected after (?(", |
211 |
"(?R or (?digits must be followed by )", |
"(?R or (?[+-]digits must be followed by )", |
212 |
/* 30 */ |
/* 30 */ |
213 |
"unknown POSIX class name", |
"unknown POSIX class name", |
214 |
"POSIX collating elements are not supported", |
"POSIX collating elements are not supported", |
242 |
/* 55 */ |
/* 55 */ |
243 |
"repeating a DEFINE group is not allowed", |
"repeating a DEFINE group is not allowed", |
244 |
"inconsistent NEWLINE options", |
"inconsistent NEWLINE options", |
245 |
"\\g is not followed by an (optionally braced) non-zero number" |
"\\g is not followed by an (optionally braced) non-zero number", |
246 |
|
"(?+ or (?- or (?(+ or (?(- must be followed by a non-zero number" |
247 |
}; |
}; |
248 |
|
|
249 |
|
|
263 |
|
|
264 |
Then we can use ctype_digit and ctype_xdigit in the code. */ |
Then we can use ctype_digit and ctype_xdigit in the code. */ |
265 |
|
|
266 |
#if !EBCDIC /* This is the "normal" case, for ASCII systems */ |
#ifndef EBCDIC /* This is the "normal" case, for ASCII systems */ |
267 |
static const unsigned char digitab[] = |
static const unsigned char digitab[] = |
268 |
{ |
{ |
269 |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 0- 7 */ |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 0- 7 */ |
299 |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 240-247 */ |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 240-247 */ |
300 |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00};/* 248-255 */ |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00};/* 248-255 */ |
301 |
|
|
302 |
#else /* This is the "abnormal" case, for EBCDIC systems */ |
#else /* This is the "abnormal" case, for EBCDIC systems */ |
303 |
static const unsigned char digitab[] = |
static const unsigned char digitab[] = |
304 |
{ |
{ |
305 |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 0- 7 0 */ |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 0- 7 0 */ |
313 |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* - 71 40 */ |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* - 71 40 */ |
314 |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 72- | */ |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 72- | */ |
315 |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* & - 87 50 */ |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* & - 87 50 */ |
316 |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 88- ¬ */ |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 88- 95 */ |
317 |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* - -103 60 */ |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* - -103 60 */ |
318 |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 104- ? */ |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 104- ? */ |
319 |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 112-119 70 */ |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 112-119 70 */ |
347 |
0x01,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* - 71 */ |
0x01,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* - 71 */ |
348 |
0x00,0x00,0x00,0x80,0x00,0x80,0x80,0x80, /* 72- | */ |
0x00,0x00,0x00,0x80,0x00,0x80,0x80,0x80, /* 72- | */ |
349 |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* & - 87 */ |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* & - 87 */ |
350 |
0x00,0x00,0x00,0x80,0x80,0x80,0x00,0x00, /* 88- ¬ */ |
0x00,0x00,0x00,0x80,0x80,0x80,0x00,0x00, /* 88- 95 */ |
351 |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* - -103 */ |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* - -103 */ |
352 |
0x00,0x00,0x00,0x00,0x00,0x10,0x00,0x80, /* 104- ? */ |
0x00,0x00,0x00,0x00,0x00,0x10,0x00,0x80, /* 104- ? */ |
353 |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 112-119 */ |
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 112-119 */ |
422 |
a table. A non-zero result is something that can be returned immediately. |
a table. A non-zero result is something that can be returned immediately. |
423 |
Otherwise further processing may be required. */ |
Otherwise further processing may be required. */ |
424 |
|
|
425 |
#if !EBCDIC /* ASCII coding */ |
#ifndef EBCDIC /* ASCII coding */ |
426 |
else if (c < '0' || c > 'z') {} /* Not alphameric */ |
else if (c < '0' || c > 'z') {} /* Not alphameric */ |
427 |
else if ((i = escapes[c - '0']) != 0) c = i; |
else if ((i = escapes[c - '0']) != 0) c = i; |
428 |
|
|
429 |
#else /* EBCDIC coding */ |
#else /* EBCDIC coding */ |
430 |
else if (c < 'a' || (ebcdic_chartab[c] & 0x0E) == 0) {} /* Not alphameric */ |
else if (c < 'a' || (ebcdic_chartab[c] & 0x0E) == 0) {} /* Not alphameric */ |
431 |
else if ((i = escapes[c - 0x48]) != 0) c = i; |
else if ((i = escapes[c - 0x48]) != 0) c = i; |
432 |
#endif |
#endif |
563 |
if (c == 0 && cc == '0') continue; /* Leading zeroes */ |
if (c == 0 && cc == '0') continue; /* Leading zeroes */ |
564 |
count++; |
count++; |
565 |
|
|
566 |
#if !EBCDIC /* ASCII coding */ |
#ifndef EBCDIC /* ASCII coding */ |
567 |
if (cc >= 'a') cc -= 32; /* Convert to upper case */ |
if (cc >= 'a') cc -= 32; /* Convert to upper case */ |
568 |
c = (c << 4) + cc - ((cc < 'A')? '0' : ('A' - 10)); |
c = (c << 4) + cc - ((cc < 'A')? '0' : ('A' - 10)); |
569 |
#else /* EBCDIC coding */ |
#else /* EBCDIC coding */ |
570 |
if (cc >= 'a' && cc <= 'z') cc += 64; /* Convert to upper case */ |
if (cc >= 'a' && cc <= 'z') cc += 64; /* Convert to upper case */ |
571 |
c = (c << 4) + cc - ((cc >= '0')? '0' : ('A' - 10)); |
c = (c << 4) + cc - ((cc >= '0')? '0' : ('A' - 10)); |
572 |
#endif |
#endif |
590 |
{ |
{ |
591 |
int cc; /* Some compilers don't like ++ */ |
int cc; /* Some compilers don't like ++ */ |
592 |
cc = *(++ptr); /* in initializers */ |
cc = *(++ptr); /* in initializers */ |
593 |
#if !EBCDIC /* ASCII coding */ |
#ifndef EBCDIC /* ASCII coding */ |
594 |
if (cc >= 'a') cc -= 32; /* Convert to upper case */ |
if (cc >= 'a') cc -= 32; /* Convert to upper case */ |
595 |
c = c * 16 + cc - ((cc < 'A')? '0' : ('A' - 10)); |
c = c * 16 + cc - ((cc < 'A')? '0' : ('A' - 10)); |
596 |
#else /* EBCDIC coding */ |
#else /* EBCDIC coding */ |
597 |
if (cc <= 'z') cc += 64; /* Convert to upper case */ |
if (cc <= 'z') cc += 64; /* Convert to upper case */ |
598 |
c = c * 16 + cc - ((cc >= '0')? '0' : ('A' - 10)); |
c = c * 16 + cc - ((cc >= '0')? '0' : ('A' - 10)); |
599 |
#endif |
#endif |
612 |
return 0; |
return 0; |
613 |
} |
} |
614 |
|
|
615 |
#if !EBCDIC /* ASCII coding */ |
#ifndef EBCDIC /* ASCII coding */ |
616 |
if (c >= 'a' && c <= 'z') c -= 32; |
if (c >= 'a' && c <= 'z') c -= 32; |
617 |
c ^= 0x40; |
c ^= 0x40; |
618 |
#else /* EBCDIC coding */ |
#else /* EBCDIC coding */ |
619 |
if (c >= 'a' && c <= 'z') c += 64; |
if (c >= 'a' && c <= 'z') c += 64; |
620 |
c ^= 0xC0; |
c ^= 0xC0; |
621 |
#endif |
#endif |
1247 |
else |
else |
1248 |
{ |
{ |
1249 |
code += _pcre_OP_lengths[c]; |
code += _pcre_OP_lengths[c]; |
1250 |
|
#ifdef SUPPORT_UTF8 |
1251 |
if (utf8) switch(c) |
if (utf8) switch(c) |
1252 |
{ |
{ |
1253 |
case OP_CHAR: |
case OP_CHAR: |
1268 |
if (code[-1] >= 0xc0) code += _pcre_utf8_table4[code[-1] & 0x3f]; |
if (code[-1] >= 0xc0) code += _pcre_utf8_table4[code[-1] & 0x3f]; |
1269 |
break; |
break; |
1270 |
} |
} |
1271 |
|
#endif |
1272 |
} |
} |
1273 |
} |
} |
1274 |
} |
} |
1312 |
else |
else |
1313 |
{ |
{ |
1314 |
code += _pcre_OP_lengths[c]; |
code += _pcre_OP_lengths[c]; |
1315 |
|
#ifdef SUPPORT_UTF8 |
1316 |
if (utf8) switch(c) |
if (utf8) switch(c) |
1317 |
{ |
{ |
1318 |
case OP_CHAR: |
case OP_CHAR: |
1333 |
if (code[-1] >= 0xc0) code += _pcre_utf8_table4[code[-1] & 0x3f]; |
if (code[-1] >= 0xc0) code += _pcre_utf8_table4[code[-1] & 0x3f]; |
1334 |
break; |
break; |
1335 |
} |
} |
1336 |
|
#endif |
1337 |
} |
} |
1338 |
} |
} |
1339 |
} |
} |
2096 |
int class_lastchar; |
int class_lastchar; |
2097 |
int newoptions; |
int newoptions; |
2098 |
int recno; |
int recno; |
2099 |
|
int refsign; |
2100 |
int skipbytes; |
int skipbytes; |
2101 |
int subreqbyte; |
int subreqbyte; |
2102 |
int subfirstbyte; |
int subfirstbyte; |
3623 |
|
|
3624 |
code[1+LINK_SIZE] = OP_CREF; |
code[1+LINK_SIZE] = OP_CREF; |
3625 |
skipbytes = 3; |
skipbytes = 3; |
3626 |
|
refsign = -1; |
3627 |
|
|
3628 |
/* Check for a test for recursion in a named group. */ |
/* Check for a test for recursion in a named group. */ |
3629 |
|
|
3647 |
terminator = '\''; |
terminator = '\''; |
3648 |
ptr++; |
ptr++; |
3649 |
} |
} |
3650 |
else terminator = 0; |
else |
3651 |
|
{ |
3652 |
|
terminator = 0; |
3653 |
|
if (ptr[1] == '-' || ptr[1] == '+') refsign = *(++ptr); |
3654 |
|
} |
3655 |
|
|
3656 |
/* We now expect to read a name; any thing else is an error */ |
/* We now expect to read a name; any thing else is an error */ |
3657 |
|
|
3687 |
if (lengthptr != NULL) break; |
if (lengthptr != NULL) break; |
3688 |
|
|
3689 |
/* In the real compile we do the work of looking for the actual |
/* In the real compile we do the work of looking for the actual |
3690 |
reference. */ |
reference. If the string started with "+" or "-" we require the rest to |
3691 |
|
be digits, in which case recno will be set. */ |
3692 |
|
|
3693 |
|
if (refsign > 0) |
3694 |
|
{ |
3695 |
|
if (recno <= 0) |
3696 |
|
{ |
3697 |
|
*errorcodeptr = ERR58; |
3698 |
|
goto FAILED; |
3699 |
|
} |
3700 |
|
if (refsign == '-') |
3701 |
|
{ |
3702 |
|
recno = cd->bracount - recno + 1; |
3703 |
|
if (recno <= 0) |
3704 |
|
{ |
3705 |
|
*errorcodeptr = ERR15; |
3706 |
|
goto FAILED; |
3707 |
|
} |
3708 |
|
} |
3709 |
|
else recno += cd->bracount; |
3710 |
|
PUT2(code, 2+LINK_SIZE, recno); |
3711 |
|
break; |
3712 |
|
} |
3713 |
|
|
3714 |
|
/* Otherwise (did not start with "+" or "-"), start by looking for the |
3715 |
|
name. */ |
3716 |
|
|
3717 |
slot = cd->name_table; |
slot = cd->name_table; |
3718 |
for (i = 0; i < cd->names_found; i++) |
for (i = 0; i < cd->names_found; i++) |
3719 |
{ |
{ |
4031 |
|
|
4032 |
|
|
4033 |
/* ------------------------------------------------------------ */ |
/* ------------------------------------------------------------ */ |
4034 |
|
case '-': case '+': |
4035 |
case '0': case '1': case '2': case '3': case '4': /* Recursion or */ |
case '0': case '1': case '2': case '3': case '4': /* Recursion or */ |
4036 |
case '5': case '6': case '7': case '8': case '9': /* subroutine */ |
case '5': case '6': case '7': case '8': case '9': /* subroutine */ |
4037 |
{ |
{ |
4038 |
const uschar *called; |
const uschar *called; |
4039 |
|
|
4040 |
|
if ((refsign = *ptr) == '+') ptr++; |
4041 |
|
else if (refsign == '-') |
4042 |
|
{ |
4043 |
|
if ((digitab[ptr[1]] & ctype_digit) == 0) |
4044 |
|
goto OTHER_CHAR_AFTER_QUERY; |
4045 |
|
ptr++; |
4046 |
|
} |
4047 |
|
|
4048 |
recno = 0; |
recno = 0; |
4049 |
while((digitab[*ptr] & ctype_digit) != 0) |
while((digitab[*ptr] & ctype_digit) != 0) |
4050 |
recno = recno * 10 + *ptr++ - '0'; |
recno = recno * 10 + *ptr++ - '0'; |
4051 |
|
|
4052 |
if (*ptr != ')') |
if (*ptr != ')') |
4053 |
{ |
{ |
4054 |
*errorcodeptr = ERR29; |
*errorcodeptr = ERR29; |
4055 |
goto FAILED; |
goto FAILED; |
4056 |
} |
} |
4057 |
|
|
4058 |
|
if (refsign == '-') |
4059 |
|
{ |
4060 |
|
if (recno == 0) |
4061 |
|
{ |
4062 |
|
*errorcodeptr = ERR58; |
4063 |
|
goto FAILED; |
4064 |
|
} |
4065 |
|
recno = cd->bracount - recno + 1; |
4066 |
|
if (recno <= 0) |
4067 |
|
{ |
4068 |
|
*errorcodeptr = ERR15; |
4069 |
|
goto FAILED; |
4070 |
|
} |
4071 |
|
} |
4072 |
|
else if (refsign == '+') |
4073 |
|
{ |
4074 |
|
if (recno == 0) |
4075 |
|
{ |
4076 |
|
*errorcodeptr = ERR58; |
4077 |
|
goto FAILED; |
4078 |
|
} |
4079 |
|
recno += cd->bracount; |
4080 |
|
} |
4081 |
|
|
4082 |
/* Come here from code above that handles a named recursion */ |
/* Come here from code above that handles a named recursion */ |
4083 |
|
|
4151 |
|
|
4152 |
/* ------------------------------------------------------------ */ |
/* ------------------------------------------------------------ */ |
4153 |
default: /* Other characters: check option setting */ |
default: /* Other characters: check option setting */ |
4154 |
|
OTHER_CHAR_AFTER_QUERY: |
4155 |
set = unset = 0; |
set = unset = 0; |
4156 |
optset = &set; |
optset = &set; |
4157 |
|
|
5111 |
with errorptr and erroroffset set |
with errorptr and erroroffset set |
5112 |
*/ |
*/ |
5113 |
|
|
5114 |
PCRE_DATA_SCOPE pcre * |
PCRE_EXP_DEFN pcre * |
5115 |
pcre_compile(const char *pattern, int options, const char **errorptr, |
pcre_compile(const char *pattern, int options, const char **errorptr, |
5116 |
int *erroroffset, const unsigned char *tables) |
int *erroroffset, const unsigned char *tables) |
5117 |
{ |
{ |
5119 |
} |
} |
5120 |
|
|
5121 |
|
|
5122 |
PCRE_DATA_SCOPE pcre * |
PCRE_EXP_DEFN pcre * |
5123 |
pcre_compile2(const char *pattern, int options, int *errorcodeptr, |
pcre_compile2(const char *pattern, int options, int *errorcodeptr, |
5124 |
const char **errorptr, int *erroroffset, const unsigned char *tables) |
const char **errorptr, int *erroroffset, const unsigned char *tables) |
5125 |
{ |
{ |
5168 |
if (erroroffset == NULL) |
if (erroroffset == NULL) |
5169 |
{ |
{ |
5170 |
errorcode = ERR16; |
errorcode = ERR16; |
5171 |
goto PCRE_EARLY_ERROR_RETURN; |
goto PCRE_EARLY_ERROR_RETURN2; |
5172 |
} |
} |
5173 |
|
|
5174 |
*erroroffset = 0; |
*erroroffset = 0; |
5181 |
(*erroroffset = _pcre_valid_utf8((uschar *)pattern, -1)) >= 0) |
(*erroroffset = _pcre_valid_utf8((uschar *)pattern, -1)) >= 0) |
5182 |
{ |
{ |
5183 |
errorcode = ERR44; |
errorcode = ERR44; |
5184 |
goto PCRE_UTF8_ERROR_RETURN; |
goto PCRE_EARLY_ERROR_RETURN2; |
5185 |
} |
} |
5186 |
#else |
#else |
5187 |
if ((options & PCRE_UTF8) != 0) |
if ((options & PCRE_UTF8) != 0) |
5206 |
cd->ctypes = tables + ctypes_offset; |
cd->ctypes = tables + ctypes_offset; |
5207 |
|
|
5208 |
/* Handle different types of newline. The three bits give seven cases. The |
/* Handle different types of newline. The three bits give seven cases. The |
5209 |
current code allows for fixed one- or two-byte sequences, plus "any". */ |
current code allows for fixed one- or two-byte sequences, plus "any" and |
5210 |
|
"anycrlf". */ |
5211 |
|
|
5212 |
switch (options & (PCRE_NEWLINE_CRLF | PCRE_NEWLINE_ANY)) |
switch (options & (PCRE_NEWLINE_CRLF | PCRE_NEWLINE_ANY)) |
5213 |
{ |
{ |
5217 |
case PCRE_NEWLINE_CR+ |
case PCRE_NEWLINE_CR+ |
5218 |
PCRE_NEWLINE_LF: newline = ('\r' << 8) | '\n'; break; |
PCRE_NEWLINE_LF: newline = ('\r' << 8) | '\n'; break; |
5219 |
case PCRE_NEWLINE_ANY: newline = -1; break; |
case PCRE_NEWLINE_ANY: newline = -1; break; |
5220 |
|
case PCRE_NEWLINE_ANYCRLF: newline = -2; break; |
5221 |
default: errorcode = ERR56; goto PCRE_EARLY_ERROR_RETURN; |
default: errorcode = ERR56; goto PCRE_EARLY_ERROR_RETURN; |
5222 |
} |
} |
5223 |
|
|
5224 |
if (newline < 0) |
if (newline == -2) |
5225 |
|
{ |
5226 |
|
cd->nltype = NLTYPE_ANYCRLF; |
5227 |
|
} |
5228 |
|
else if (newline < 0) |
5229 |
{ |
{ |
5230 |
cd->nltype = NLTYPE_ANY; |
cd->nltype = NLTYPE_ANY; |
5231 |
} |
} |
5399 |
(pcre_free)(re); |
(pcre_free)(re); |
5400 |
PCRE_EARLY_ERROR_RETURN: |
PCRE_EARLY_ERROR_RETURN: |
5401 |
*erroroffset = ptr - (const uschar *)pattern; |
*erroroffset = ptr - (const uschar *)pattern; |
5402 |
#ifdef SUPPORT_UTF8 |
PCRE_EARLY_ERROR_RETURN2: |
|
PCRE_UTF8_ERROR_RETURN: |
|
|
#endif |
|
5403 |
*errorptr = error_texts[errorcode]; |
*errorptr = error_texts[errorcode]; |
5404 |
if (errorcodeptr != NULL) *errorcodeptr = errorcode; |
if (errorcodeptr != NULL) *errorcodeptr = errorcode; |
5405 |
return NULL; |
return NULL; |
5489 |
else printf("Req char = \\x%02x%s\n", ch, caseless); |
else printf("Req char = \\x%02x%s\n", ch, caseless); |
5490 |
} |
} |
5491 |
|
|
5492 |
pcre_printint(re, stdout); |
pcre_printint(re, stdout, TRUE); |
5493 |
|
|
5494 |
/* This check is done here in the debugging case so that the code that |
/* This check is done here in the debugging case so that the code that |
5495 |
was compiled can be seen. */ |
was compiled can be seen. */ |