7 |
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. |
8 |
|
|
9 |
Written by Philip Hazel |
Written by Philip Hazel |
10 |
Copyright (c) 1997-2010 University of Cambridge |
Copyright (c) 1997-2012 University of Cambridge |
11 |
|
|
12 |
----------------------------------------------------------------------------- |
----------------------------------------------------------------------------- |
13 |
Redistribution and use in source and binary forms, with or without |
Redistribution and use in source and binary forms, with or without |
40 |
|
|
41 |
/* This header contains definitions that are shared between the different |
/* This header contains definitions that are shared between the different |
42 |
modules, but which are not relevant to the exported API. This includes some |
modules, but which are not relevant to the exported API. This includes some |
43 |
functions whose names all begin with "_pcre_". */ |
functions whose names all begin with "_pcre_" or "_pcre16_" depending on |
44 |
|
the PRIV macro. */ |
45 |
|
|
46 |
#ifndef PCRE_INTERNAL_H |
#ifndef PCRE_INTERNAL_H |
47 |
#define PCRE_INTERNAL_H |
#define PCRE_INTERNAL_H |
52 |
#define PCRE_DEBUG |
#define PCRE_DEBUG |
53 |
#endif |
#endif |
54 |
|
|
55 |
/* We do not support both EBCDIC and UTF-8 at the same time. The "configure" |
/* PCRE is compiled as an 8 bit library if it is not requested otherwise. */ |
56 |
script prevents both being selected, but not everybody uses "configure". */ |
#ifndef COMPILE_PCRE16 |
57 |
|
#define COMPILE_PCRE8 |
|
#if defined EBCDIC && defined SUPPORT_UTF8 |
|
|
#error The use of both EBCDIC and SUPPORT_UTF8 is not supported. |
|
58 |
#endif |
#endif |
59 |
|
|
60 |
/* If SUPPORT_UCP is defined, SUPPORT_UTF8 must also be defined. The |
/* If SUPPORT_UCP is defined, SUPPORT_UTF must also be defined. The |
61 |
"configure" script ensures this, but not everybody uses "configure". */ |
"configure" script ensures this, but not everybody uses "configure". */ |
62 |
|
|
63 |
#if defined SUPPORT_UCP && !defined SUPPORT_UTF8 |
#if defined SUPPORT_UCP && !(defined SUPPORT_UTF) |
64 |
|
#define SUPPORT_UTF 1 |
65 |
|
#endif |
66 |
|
|
67 |
|
/* We define SUPPORT_UTF if SUPPORT_UTF8 is enabled for compatibility |
68 |
|
reasons with existing code. */ |
69 |
|
|
70 |
|
#if defined SUPPORT_UTF8 && !(defined SUPPORT_UTF) |
71 |
|
#define SUPPORT_UTF 1 |
72 |
|
#endif |
73 |
|
|
74 |
|
/* Fixme: SUPPORT_UTF8 should be eventually disappear from the code. |
75 |
|
Until then we define it if SUPPORT_UTF is defined. */ |
76 |
|
|
77 |
|
#if defined SUPPORT_UTF && !(defined SUPPORT_UTF8) |
78 |
#define SUPPORT_UTF8 1 |
#define SUPPORT_UTF8 1 |
79 |
#endif |
#endif |
80 |
|
|
81 |
|
/* We do not support both EBCDIC and UTF-8/16 at the same time. The "configure" |
82 |
|
script prevents both being selected, but not everybody uses "configure". */ |
83 |
|
|
84 |
|
#if defined EBCDIC && defined SUPPORT_UTF |
85 |
|
#error The use of both EBCDIC and SUPPORT_UTF8/16 is not supported. |
86 |
|
#endif |
87 |
|
|
88 |
/* Use a macro for debugging printing, 'cause that eliminates the use of #ifdef |
/* Use a macro for debugging printing, 'cause that eliminates the use of #ifdef |
89 |
inline, and there are *still* stupid compilers about that don't like indented |
inline, and there are *still* stupid compilers about that don't like indented |
90 |
pre-processor statements, or at least there were when I first wrote this. After |
pre-processor statements, or at least there were when I first wrote this. After |
178 |
#define PCRE_CALL_CONVENTION |
#define PCRE_CALL_CONVENTION |
179 |
#endif |
#endif |
180 |
|
|
181 |
/* We need to have types that specify unsigned 16-bit and 32-bit integers. We |
/* We need to have types that specify unsigned 8, 16 and 32-bit integers. We |
182 |
cannot determine these outside the compilation (e.g. by running a program as |
cannot determine these outside the compilation (e.g. by running a program as |
183 |
part of "configure") because PCRE is often cross-compiled for use on other |
part of "configure") because PCRE is often cross-compiled for use on other |
184 |
systems. Instead we make use of the maximum sizes that are available at |
systems. Instead we make use of the maximum sizes that are available at |
185 |
preprocessor time in standard C environments. */ |
preprocessor time in standard C environments. */ |
186 |
|
|
187 |
|
typedef unsigned char pcre_uint8; |
188 |
|
|
189 |
#if USHRT_MAX == 65535 |
#if USHRT_MAX == 65535 |
190 |
typedef unsigned short pcre_uint16; |
typedef unsigned short pcre_uint16; |
191 |
typedef short pcre_int16; |
typedef short pcre_int16; |
228 |
|
|
229 |
/* All character handling must be done as unsigned characters. Otherwise there |
/* All character handling must be done as unsigned characters. Otherwise there |
230 |
are problems with top-bit-set characters and functions such as isspace(). |
are problems with top-bit-set characters and functions such as isspace(). |
231 |
However, we leave the interface to the outside world as char *, because that |
However, we leave the interface to the outside world as char * or short *, |
232 |
should make things easier for callers. We define a short type for unsigned char |
because that should make things easier for callers. This character type is |
233 |
to save lots of typing. I tried "uchar", but it causes problems on Digital |
called pcre_uchar. |
234 |
Unix, where it is defined in sys/types, so use "uschar" instead. */ |
|
235 |
|
The IN_UCHARS macro multiply its argument with the byte size of the current |
236 |
|
pcre_uchar type. Useful for memcpy and such operations, whose require the |
237 |
|
byte size of their input/output buffers. |
238 |
|
|
239 |
|
The MAX_255 macro checks whether its pcre_uchar input is less than 256. |
240 |
|
|
241 |
|
The TABLE_GET macro is designed for accessing elements of tables whose contain |
242 |
|
exactly 256 items. When the character is able to contain more than 256 |
243 |
|
items, some check is needed before accessing these tables. |
244 |
|
*/ |
245 |
|
|
246 |
|
#ifdef COMPILE_PCRE8 |
247 |
|
|
248 |
|
typedef unsigned char pcre_uchar; |
249 |
|
#define IN_UCHARS(x) (x) |
250 |
|
#define MAX_255(c) 1 |
251 |
|
#define TABLE_GET(c, table, default) ((table)[c]) |
252 |
|
|
253 |
|
#else |
254 |
|
|
255 |
typedef unsigned char uschar; |
#ifdef COMPILE_PCRE16 |
256 |
|
#if USHRT_MAX != 65535 |
257 |
|
/* This is a warning message. Change PCRE_SCHAR16 to a 16 bit data type in |
258 |
|
pcre.h(.in) and disable (comment out) this message. */ |
259 |
|
#error Warning: PCRE_SCHAR16 is not a 16 bit data type. |
260 |
|
#endif |
261 |
|
|
262 |
|
typedef pcre_uint16 pcre_uchar; |
263 |
|
#define IN_UCHARS(x) ((x) << 1) |
264 |
|
#define MAX_255(c) ((c) <= 255u) |
265 |
|
#define TABLE_GET(c, table, default) (MAX_255(c)? ((table)[c]):(default)) |
266 |
|
|
267 |
|
#else |
268 |
|
#error Unsupported compiling mode |
269 |
|
#endif /* COMPILE_PCRE16 */ |
270 |
|
|
271 |
|
#endif /* COMPILE_PCRE8 */ |
272 |
|
|
273 |
/* This is an unsigned int value that no character can ever have. UTF-8 |
/* This is an unsigned int value that no character can ever have. UTF-8 |
274 |
characters only go up to 0x7fffffff (though Unicode doesn't go beyond |
characters only go up to 0x7fffffff (though Unicode doesn't go beyond |
291 |
#define IS_NEWLINE(p) \ |
#define IS_NEWLINE(p) \ |
292 |
((NLBLOCK->nltype != NLTYPE_FIXED)? \ |
((NLBLOCK->nltype != NLTYPE_FIXED)? \ |
293 |
((p) < NLBLOCK->PSEND && \ |
((p) < NLBLOCK->PSEND && \ |
294 |
_pcre_is_newline((p), NLBLOCK->nltype, NLBLOCK->PSEND, &(NLBLOCK->nllen),\ |
PRIV(is_newline)((p), NLBLOCK->nltype, NLBLOCK->PSEND, \ |
295 |
utf8)) \ |
&(NLBLOCK->nllen), utf)) \ |
296 |
: \ |
: \ |
297 |
((p) <= NLBLOCK->PSEND - NLBLOCK->nllen && \ |
((p) <= NLBLOCK->PSEND - NLBLOCK->nllen && \ |
298 |
(p)[0] == NLBLOCK->nl[0] && \ |
(p)[0] == NLBLOCK->nl[0] && \ |
305 |
#define WAS_NEWLINE(p) \ |
#define WAS_NEWLINE(p) \ |
306 |
((NLBLOCK->nltype != NLTYPE_FIXED)? \ |
((NLBLOCK->nltype != NLTYPE_FIXED)? \ |
307 |
((p) > NLBLOCK->PSSTART && \ |
((p) > NLBLOCK->PSSTART && \ |
308 |
_pcre_was_newline((p), NLBLOCK->nltype, NLBLOCK->PSSTART, \ |
PRIV(was_newline)((p), NLBLOCK->nltype, NLBLOCK->PSSTART, \ |
309 |
&(NLBLOCK->nllen), utf8)) \ |
&(NLBLOCK->nllen), utf)) \ |
310 |
: \ |
: \ |
311 |
((p) >= NLBLOCK->PSSTART + NLBLOCK->nllen && \ |
((p) >= NLBLOCK->PSSTART + NLBLOCK->nllen && \ |
312 |
(p)[-NLBLOCK->nllen] == NLBLOCK->nl[0] && \ |
(p)[-NLBLOCK->nllen] == NLBLOCK->nl[0] && \ |
324 |
must begin with PCRE_. */ |
must begin with PCRE_. */ |
325 |
|
|
326 |
#ifdef CUSTOM_SUBJECT_PTR |
#ifdef CUSTOM_SUBJECT_PTR |
327 |
#define PCRE_SPTR CUSTOM_SUBJECT_PTR |
#define PCRE_PUCHAR CUSTOM_SUBJECT_PTR |
|
#define USPTR CUSTOM_SUBJECT_PTR |
|
328 |
#else |
#else |
329 |
#define PCRE_SPTR const char * |
#define PCRE_PUCHAR const pcre_uchar * |
|
#define USPTR const unsigned char * |
|
330 |
#endif |
#endif |
331 |
|
|
|
|
|
|
|
|
332 |
/* Include the public PCRE header and the definitions of UCP character property |
/* Include the public PCRE header and the definitions of UCP character property |
333 |
values. */ |
values. */ |
334 |
|
|
396 |
the config.h file, but can be overridden by using -D on the command line. This |
the config.h file, but can be overridden by using -D on the command line. This |
397 |
is automated on Unix systems via the "configure" command. */ |
is automated on Unix systems via the "configure" command. */ |
398 |
|
|
399 |
|
#ifdef COMPILE_PCRE8 |
400 |
|
|
401 |
#if LINK_SIZE == 2 |
#if LINK_SIZE == 2 |
402 |
|
|
403 |
#define PUT(a,n,d) \ |
#define PUT(a,n,d) \ |
434 |
#define GET(a,n) \ |
#define GET(a,n) \ |
435 |
(((a)[n] << 24) | ((a)[(n)+1] << 16) | ((a)[(n)+2] << 8) | (a)[(n)+3]) |
(((a)[n] << 24) | ((a)[(n)+1] << 16) | ((a)[(n)+2] << 8) | (a)[(n)+3]) |
436 |
|
|
437 |
#define MAX_PATTERN_SIZE (1 << 30) /* Keep it positive */ |
/* Keep it positive */ |
438 |
|
#define MAX_PATTERN_SIZE (1 << 30) |
439 |
|
|
440 |
|
#else |
441 |
|
#error LINK_SIZE must be either 2, 3, or 4 |
442 |
|
#endif |
443 |
|
|
444 |
|
#else /* COMPILE_PCRE8 */ |
445 |
|
|
446 |
|
#ifdef COMPILE_PCRE16 |
447 |
|
|
448 |
|
#if LINK_SIZE == 2 |
449 |
|
|
450 |
|
#undef LINK_SIZE |
451 |
|
#define LINK_SIZE 1 |
452 |
|
|
453 |
|
#define PUT(a,n,d) \ |
454 |
|
(a[n] = (d)) |
455 |
|
|
456 |
|
#define GET(a,n) \ |
457 |
|
(a[n]) |
458 |
|
|
459 |
|
#define MAX_PATTERN_SIZE (1 << 16) |
460 |
|
|
461 |
|
#elif LINK_SIZE == 3 || LINK_SIZE == 4 |
462 |
|
|
463 |
|
#undef LINK_SIZE |
464 |
|
#define LINK_SIZE 2 |
465 |
|
|
466 |
|
#define PUT(a,n,d) \ |
467 |
|
(a[n] = (d) >> 16), \ |
468 |
|
(a[(n)+1] = (d) & 65535) |
469 |
|
|
470 |
|
#define GET(a,n) \ |
471 |
|
(((a)[n] << 16) | (a)[(n)+1]) |
472 |
|
|
473 |
|
/* Keep it positive */ |
474 |
|
#define MAX_PATTERN_SIZE (1 << 30) |
475 |
|
|
476 |
#else |
#else |
477 |
#error LINK_SIZE must be either 2, 3, or 4 |
#error LINK_SIZE must be either 2, 3, or 4 |
478 |
#endif |
#endif |
479 |
|
|
480 |
|
#else |
481 |
|
#error Unsupported compiling mode |
482 |
|
#endif /* COMPILE_PCRE16 */ |
483 |
|
|
484 |
|
#endif /* COMPILE_PCRE8 */ |
485 |
|
|
486 |
/* Convenience macro defined in terms of the others */ |
/* Convenience macro defined in terms of the others */ |
487 |
|
|
492 |
offsets changes. There are used for repeat counts and for other things such as |
offsets changes. There are used for repeat counts and for other things such as |
493 |
capturing parenthesis numbers in back references. */ |
capturing parenthesis numbers in back references. */ |
494 |
|
|
495 |
|
#ifdef COMPILE_PCRE8 |
496 |
|
|
497 |
|
#define IMM2_SIZE 2 |
498 |
|
|
499 |
#define PUT2(a,n,d) \ |
#define PUT2(a,n,d) \ |
500 |
a[n] = (d) >> 8; \ |
a[n] = (d) >> 8; \ |
501 |
a[(n)+1] = (d) & 255 |
a[(n)+1] = (d) & 255 |
503 |
#define GET2(a,n) \ |
#define GET2(a,n) \ |
504 |
(((a)[n] << 8) | (a)[(n)+1]) |
(((a)[n] << 8) | (a)[(n)+1]) |
505 |
|
|
506 |
#define PUT2INC(a,n,d) PUT2(a,n,d), a += 2 |
#else /* COMPILE_PCRE8 */ |
507 |
|
|
508 |
|
#ifdef COMPILE_PCRE16 |
509 |
|
|
510 |
|
#define IMM2_SIZE 1 |
511 |
|
|
512 |
|
#define PUT2(a,n,d) \ |
513 |
|
a[n] = d |
514 |
|
|
515 |
|
#define GET2(a,n) \ |
516 |
|
a[n] |
517 |
|
|
518 |
|
#else |
519 |
|
#error Unsupported compiling mode |
520 |
|
#endif /* COMPILE_PCRE16 */ |
521 |
|
|
522 |
|
#endif /* COMPILE_PCRE8 */ |
523 |
|
|
524 |
/* When UTF-8 encoding is being used, a character is no longer just a single |
#define PUT2INC(a,n,d) PUT2(a,n,d), a += IMM2_SIZE |
|
byte. The macros for character handling generate simple sequences when used in |
|
|
byte-mode, and more complicated ones for UTF-8 characters. BACKCHAR should |
|
|
never be called in byte mode. To make sure it can never even appear when UTF-8 |
|
|
support is omitted, we don't even define it. */ |
|
525 |
|
|
526 |
#ifndef SUPPORT_UTF8 |
/* When UTF encoding is being used, a character is no longer just a single |
527 |
|
character. The macros for character handling generate simple sequences when |
528 |
|
used in character-mode, and more complicated ones for UTF characters. |
529 |
|
GETCHARLENTEST and other macros are not used when UTF is not supported, |
530 |
|
so they are not defined. To make sure they can never even appear when |
531 |
|
UTF support is omitted, we don't even define them. */ |
532 |
|
|
533 |
|
#ifndef SUPPORT_UTF |
534 |
|
|
535 |
|
/* #define MAX_VALUE_FOR_SINGLE_CHAR */ |
536 |
|
/* #define HAS_EXTRALEN(c) */ |
537 |
|
/* #define GET_EXTRALEN(c) */ |
538 |
|
/* #define NOT_FIRSTCHAR(c) */ |
539 |
#define GETCHAR(c, eptr) c = *eptr; |
#define GETCHAR(c, eptr) c = *eptr; |
540 |
#define GETCHARTEST(c, eptr) c = *eptr; |
#define GETCHARTEST(c, eptr) c = *eptr; |
541 |
#define GETCHARINC(c, eptr) c = *eptr++; |
#define GETCHARINC(c, eptr) c = *eptr++; |
542 |
#define GETCHARINCTEST(c, eptr) c = *eptr++; |
#define GETCHARINCTEST(c, eptr) c = *eptr++; |
543 |
#define GETCHARLEN(c, eptr, len) c = *eptr; |
#define GETCHARLEN(c, eptr, len) c = *eptr; |
544 |
|
/* #define GETCHARLENTEST(c, eptr, len) */ |
545 |
/* #define BACKCHAR(eptr) */ |
/* #define BACKCHAR(eptr) */ |
546 |
|
/* #define FORWARDCHAR(eptr) */ |
547 |
|
/* #define ACROSSCHAR(condition, eptr, action) */ |
548 |
|
|
549 |
|
#else /* SUPPORT_UTF */ |
550 |
|
|
551 |
#else /* SUPPORT_UTF8 */ |
#ifdef COMPILE_PCRE8 |
552 |
|
|
553 |
|
/* These macros were originally written in the form of loops that used data |
554 |
|
from the tables whose names start with PRIV(utf8_table). They were rewritten by |
555 |
|
a user so as not to use loops, because in some environments this gives a |
556 |
|
significant performance advantage, and it seems never to do any harm. */ |
557 |
|
|
558 |
|
/* Tells the biggest code point which can be encoded as a single character. */ |
559 |
|
|
560 |
|
#define MAX_VALUE_FOR_SINGLE_CHAR 127 |
561 |
|
|
562 |
|
/* Tests whether the code point needs extra characters to decode. */ |
563 |
|
|
564 |
|
#define HAS_EXTRALEN(c) ((c) >= 0xc0) |
565 |
|
|
566 |
|
/* Returns with the additional number of characters if IS_MULTICHAR(c) is TRUE. |
567 |
|
Otherwise it has an undefined behaviour. */ |
568 |
|
|
569 |
|
#define GET_EXTRALEN(c) (PRIV(utf8_table4)[(c) & 0x3f]) |
570 |
|
|
571 |
|
/* Returns TRUE, if the given character is not the first character |
572 |
|
of a UTF sequence. */ |
573 |
|
|
574 |
|
#define NOT_FIRSTCHAR(c) (((c) & 0xc0) == 0x80) |
575 |
|
|
576 |
|
/* Base macro to pick up the remaining bytes of a UTF-8 character, not |
577 |
|
advancing the pointer. */ |
578 |
|
|
579 |
|
#define GETUTF8(c, eptr) \ |
580 |
|
{ \ |
581 |
|
if ((c & 0x20) == 0) \ |
582 |
|
c = ((c & 0x1f) << 6) | (eptr[1] & 0x3f); \ |
583 |
|
else if ((c & 0x10) == 0) \ |
584 |
|
c = ((c & 0x0f) << 12) | ((eptr[1] & 0x3f) << 6) | (eptr[2] & 0x3f); \ |
585 |
|
else if ((c & 0x08) == 0) \ |
586 |
|
c = ((c & 0x07) << 18) | ((eptr[1] & 0x3f) << 12) | \ |
587 |
|
((eptr[2] & 0x3f) << 6) | (eptr[3] & 0x3f); \ |
588 |
|
else if ((c & 0x04) == 0) \ |
589 |
|
c = ((c & 0x03) << 24) | ((eptr[1] & 0x3f) << 18) | \ |
590 |
|
((eptr[2] & 0x3f) << 12) | ((eptr[3] & 0x3f) << 6) | \ |
591 |
|
(eptr[4] & 0x3f); \ |
592 |
|
else \ |
593 |
|
c = ((c & 0x01) << 30) | ((eptr[1] & 0x3f) << 24) | \ |
594 |
|
((eptr[2] & 0x3f) << 18) | ((eptr[3] & 0x3f) << 12) | \ |
595 |
|
((eptr[4] & 0x3f) << 6) | (eptr[5] & 0x3f); \ |
596 |
|
} |
597 |
|
|
598 |
/* Get the next UTF-8 character, not advancing the pointer. This is called when |
/* Get the next UTF-8 character, not advancing the pointer. This is called when |
599 |
we know we are in UTF-8 mode. */ |
we know we are in UTF-8 mode. */ |
600 |
|
|
601 |
#define GETCHAR(c, eptr) \ |
#define GETCHAR(c, eptr) \ |
602 |
c = *eptr; \ |
c = *eptr; \ |
603 |
if (c >= 0xc0) \ |
if (c >= 0xc0) GETUTF8(c, eptr); |
|
{ \ |
|
|
int gcii; \ |
|
|
int gcaa = _pcre_utf8_table4[c & 0x3f]; /* Number of additional bytes */ \ |
|
|
int gcss = 6*gcaa; \ |
|
|
c = (c & _pcre_utf8_table3[gcaa]) << gcss; \ |
|
|
for (gcii = 1; gcii <= gcaa; gcii++) \ |
|
|
{ \ |
|
|
gcss -= 6; \ |
|
|
c |= (eptr[gcii] & 0x3f) << gcss; \ |
|
|
} \ |
|
|
} |
|
604 |
|
|
605 |
/* Get the next UTF-8 character, testing for UTF-8 mode, and not advancing the |
/* Get the next UTF-8 character, testing for UTF-8 mode, and not advancing the |
606 |
pointer. */ |
pointer. */ |
607 |
|
|
608 |
#define GETCHARTEST(c, eptr) \ |
#define GETCHARTEST(c, eptr) \ |
609 |
c = *eptr; \ |
c = *eptr; \ |
610 |
if (utf8 && c >= 0xc0) \ |
if (utf && c >= 0xc0) GETUTF8(c, eptr); |
611 |
|
|
612 |
|
/* Base macro to pick up the remaining bytes of a UTF-8 character, advancing |
613 |
|
the pointer. */ |
614 |
|
|
615 |
|
#define GETUTF8INC(c, eptr) \ |
616 |
{ \ |
{ \ |
617 |
int gcii; \ |
if ((c & 0x20) == 0) \ |
618 |
int gcaa = _pcre_utf8_table4[c & 0x3f]; /* Number of additional bytes */ \ |
c = ((c & 0x1f) << 6) | (*eptr++ & 0x3f); \ |
619 |
int gcss = 6*gcaa; \ |
else if ((c & 0x10) == 0) \ |
620 |
c = (c & _pcre_utf8_table3[gcaa]) << gcss; \ |
{ \ |
621 |
for (gcii = 1; gcii <= gcaa; gcii++) \ |
c = ((c & 0x0f) << 12) | ((*eptr & 0x3f) << 6) | (eptr[1] & 0x3f); \ |
622 |
|
eptr += 2; \ |
623 |
|
} \ |
624 |
|
else if ((c & 0x08) == 0) \ |
625 |
|
{ \ |
626 |
|
c = ((c & 0x07) << 18) | ((*eptr & 0x3f) << 12) | \ |
627 |
|
((eptr[1] & 0x3f) << 6) | (eptr[2] & 0x3f); \ |
628 |
|
eptr += 3; \ |
629 |
|
} \ |
630 |
|
else if ((c & 0x04) == 0) \ |
631 |
|
{ \ |
632 |
|
c = ((c & 0x03) << 24) | ((*eptr & 0x3f) << 18) | \ |
633 |
|
((eptr[1] & 0x3f) << 12) | ((eptr[2] & 0x3f) << 6) | \ |
634 |
|
(eptr[3] & 0x3f); \ |
635 |
|
eptr += 4; \ |
636 |
|
} \ |
637 |
|
else \ |
638 |
{ \ |
{ \ |
639 |
gcss -= 6; \ |
c = ((c & 0x01) << 30) | ((*eptr & 0x3f) << 24) | \ |
640 |
c |= (eptr[gcii] & 0x3f) << gcss; \ |
((eptr[1] & 0x3f) << 18) | ((eptr[2] & 0x3f) << 12) | \ |
641 |
|
((eptr[3] & 0x3f) << 6) | (eptr[4] & 0x3f); \ |
642 |
|
eptr += 5; \ |
643 |
} \ |
} \ |
644 |
} |
} |
645 |
|
|
648 |
|
|
649 |
#define GETCHARINC(c, eptr) \ |
#define GETCHARINC(c, eptr) \ |
650 |
c = *eptr++; \ |
c = *eptr++; \ |
651 |
if (c >= 0xc0) \ |
if (c >= 0xc0) GETUTF8INC(c, eptr); |
|
{ \ |
|
|
int gcaa = _pcre_utf8_table4[c & 0x3f]; /* Number of additional bytes */ \ |
|
|
int gcss = 6*gcaa; \ |
|
|
c = (c & _pcre_utf8_table3[gcaa]) << gcss; \ |
|
|
while (gcaa-- > 0) \ |
|
|
{ \ |
|
|
gcss -= 6; \ |
|
|
c |= (*eptr++ & 0x3f) << gcss; \ |
|
|
} \ |
|
|
} |
|
652 |
|
|
653 |
/* Get the next character, testing for UTF-8 mode, and advancing the pointer */ |
/* Get the next character, testing for UTF-8 mode, and advancing the pointer. |
654 |
|
This is called when we don't know if we are in UTF-8 mode. */ |
655 |
|
|
656 |
#define GETCHARINCTEST(c, eptr) \ |
#define GETCHARINCTEST(c, eptr) \ |
657 |
c = *eptr++; \ |
c = *eptr++; \ |
658 |
if (utf8 && c >= 0xc0) \ |
if (utf && c >= 0xc0) GETUTF8INC(c, eptr); |
659 |
|
|
660 |
|
/* Base macro to pick up the remaining bytes of a UTF-8 character, not |
661 |
|
advancing the pointer, incrementing the length. */ |
662 |
|
|
663 |
|
#define GETUTF8LEN(c, eptr, len) \ |
664 |
{ \ |
{ \ |
665 |
int gcaa = _pcre_utf8_table4[c & 0x3f]; /* Number of additional bytes */ \ |
if ((c & 0x20) == 0) \ |
666 |
int gcss = 6*gcaa; \ |
{ \ |
667 |
c = (c & _pcre_utf8_table3[gcaa]) << gcss; \ |
c = ((c & 0x1f) << 6) | (eptr[1] & 0x3f); \ |
668 |
while (gcaa-- > 0) \ |
len++; \ |
669 |
|
} \ |
670 |
|
else if ((c & 0x10) == 0) \ |
671 |
|
{ \ |
672 |
|
c = ((c & 0x0f) << 12) | ((eptr[1] & 0x3f) << 6) | (eptr[2] & 0x3f); \ |
673 |
|
len += 2; \ |
674 |
|
} \ |
675 |
|
else if ((c & 0x08) == 0) \ |
676 |
|
{\ |
677 |
|
c = ((c & 0x07) << 18) | ((eptr[1] & 0x3f) << 12) | \ |
678 |
|
((eptr[2] & 0x3f) << 6) | (eptr[3] & 0x3f); \ |
679 |
|
len += 3; \ |
680 |
|
} \ |
681 |
|
else if ((c & 0x04) == 0) \ |
682 |
{ \ |
{ \ |
683 |
gcss -= 6; \ |
c = ((c & 0x03) << 24) | ((eptr[1] & 0x3f) << 18) | \ |
684 |
c |= (*eptr++ & 0x3f) << gcss; \ |
((eptr[2] & 0x3f) << 12) | ((eptr[3] & 0x3f) << 6) | \ |
685 |
|
(eptr[4] & 0x3f); \ |
686 |
|
len += 4; \ |
687 |
|
} \ |
688 |
|
else \ |
689 |
|
{\ |
690 |
|
c = ((c & 0x01) << 30) | ((eptr[1] & 0x3f) << 24) | \ |
691 |
|
((eptr[2] & 0x3f) << 18) | ((eptr[3] & 0x3f) << 12) | \ |
692 |
|
((eptr[4] & 0x3f) << 6) | (eptr[5] & 0x3f); \ |
693 |
|
len += 5; \ |
694 |
} \ |
} \ |
695 |
} |
} |
696 |
|
|
699 |
|
|
700 |
#define GETCHARLEN(c, eptr, len) \ |
#define GETCHARLEN(c, eptr, len) \ |
701 |
c = *eptr; \ |
c = *eptr; \ |
702 |
if (c >= 0xc0) \ |
if (c >= 0xc0) GETUTF8LEN(c, eptr, len); |
|
{ \ |
|
|
int gcii; \ |
|
|
int gcaa = _pcre_utf8_table4[c & 0x3f]; /* Number of additional bytes */ \ |
|
|
int gcss = 6*gcaa; \ |
|
|
c = (c & _pcre_utf8_table3[gcaa]) << gcss; \ |
|
|
for (gcii = 1; gcii <= gcaa; gcii++) \ |
|
|
{ \ |
|
|
gcss -= 6; \ |
|
|
c |= (eptr[gcii] & 0x3f) << gcss; \ |
|
|
} \ |
|
|
len += gcaa; \ |
|
|
} |
|
703 |
|
|
704 |
/* Get the next UTF-8 character, testing for UTF-8 mode, not advancing the |
/* Get the next UTF-8 character, testing for UTF-8 mode, not advancing the |
705 |
pointer, incrementing length if there are extra bytes. This is called when we |
pointer, incrementing length if there are extra bytes. This is called when we |
706 |
know we are in UTF-8 mode. */ |
do not know if we are in UTF-8 mode. */ |
707 |
|
|
708 |
#define GETCHARLENTEST(c, eptr, len) \ |
#define GETCHARLENTEST(c, eptr, len) \ |
709 |
c = *eptr; \ |
c = *eptr; \ |
710 |
if (utf8 && c >= 0xc0) \ |
if (utf && c >= 0xc0) GETUTF8LEN(c, eptr, len); |
|
{ \ |
|
|
int gcii; \ |
|
|
int gcaa = _pcre_utf8_table4[c & 0x3f]; /* Number of additional bytes */ \ |
|
|
int gcss = 6*gcaa; \ |
|
|
c = (c & _pcre_utf8_table3[gcaa]) << gcss; \ |
|
|
for (gcii = 1; gcii <= gcaa; gcii++) \ |
|
|
{ \ |
|
|
gcss -= 6; \ |
|
|
c |= (eptr[gcii] & 0x3f) << gcss; \ |
|
|
} \ |
|
|
len += gcaa; \ |
|
|
} |
|
711 |
|
|
712 |
/* If the pointer is not at the start of a character, move it back until |
/* If the pointer is not at the start of a character, move it back until |
713 |
it is. This is called only in UTF-8 mode - we don't put a test within the macro |
it is. This is called only in UTF-8 mode - we don't put a test within the macro |
715 |
|
|
716 |
#define BACKCHAR(eptr) while((*eptr & 0xc0) == 0x80) eptr-- |
#define BACKCHAR(eptr) while((*eptr & 0xc0) == 0x80) eptr-- |
717 |
|
|
718 |
|
/* Same as above, just in the other direction. */ |
719 |
|
#define FORWARDCHAR(eptr) while((*eptr & 0xc0) == 0x80) eptr++ |
720 |
|
|
721 |
|
/* Same as above, but it allows a fully customizable form. */ |
722 |
|
#define ACROSSCHAR(condition, eptr, action) \ |
723 |
|
while((condition) && ((eptr) & 0xc0) == 0x80) action |
724 |
|
|
725 |
|
#else /* COMPILE_PCRE8 */ |
726 |
|
|
727 |
|
#ifdef COMPILE_PCRE16 |
728 |
|
|
729 |
|
/* Tells the biggest code point which can be encoded as a single character. */ |
730 |
|
|
731 |
|
#define MAX_VALUE_FOR_SINGLE_CHAR 65535 |
732 |
|
|
733 |
|
/* Tests whether the code point needs extra characters to decode. */ |
734 |
|
|
735 |
|
#define HAS_EXTRALEN(c) (((c) & 0xfc00) == 0xd800) |
736 |
|
|
737 |
|
/* Returns with the additional number of characters if IS_MULTICHAR(c) is TRUE. |
738 |
|
Otherwise it has an undefined behaviour. */ |
739 |
|
|
740 |
|
#define GET_EXTRALEN(c) 1 |
741 |
|
|
742 |
|
/* Returns TRUE, if the given character is not the first character |
743 |
|
of a UTF sequence. */ |
744 |
|
|
745 |
|
#define NOT_FIRSTCHAR(c) (((c) & 0xfc00) == 0xdc00) |
746 |
|
|
747 |
|
/* Base macro to pick up the low surrogate of a UTF-16 character, not |
748 |
|
advancing the pointer. */ |
749 |
|
|
750 |
|
#define GETUTF16(c, eptr) \ |
751 |
|
{ c = (((c & 0x3ff) << 10) | (eptr[1] & 0x3ff)) + 0x10000; } |
752 |
|
|
753 |
|
/* Get the next UTF-16 character, not advancing the pointer. This is called when |
754 |
|
we know we are in UTF-16 mode. */ |
755 |
|
|
756 |
|
#define GETCHAR(c, eptr) \ |
757 |
|
c = *eptr; \ |
758 |
|
if ((c & 0xfc00) == 0xd800) GETUTF16(c, eptr); |
759 |
|
|
760 |
|
/* Get the next UTF-16 character, testing for UTF-16 mode, and not advancing the |
761 |
|
pointer. */ |
762 |
|
|
763 |
|
#define GETCHARTEST(c, eptr) \ |
764 |
|
c = *eptr; \ |
765 |
|
if (utf && (c & 0xfc00) == 0xd800) GETUTF16(c, eptr); |
766 |
|
|
767 |
|
/* Base macro to pick up the low surrogate of a UTF-16 character, advancing |
768 |
|
the pointer. */ |
769 |
|
|
770 |
|
#define GETUTF16INC(c, eptr) \ |
771 |
|
{ c = (((c & 0x3ff) << 10) | (*eptr++ & 0x3ff)) + 0x10000; } |
772 |
|
|
773 |
|
/* Get the next UTF-16 character, advancing the pointer. This is called when we |
774 |
|
know we are in UTF-16 mode. */ |
775 |
|
|
776 |
|
#define GETCHARINC(c, eptr) \ |
777 |
|
c = *eptr++; \ |
778 |
|
if ((c & 0xfc00) == 0xd800) GETUTF16INC(c, eptr); |
779 |
|
|
780 |
|
/* Get the next character, testing for UTF-16 mode, and advancing the pointer. |
781 |
|
This is called when we don't know if we are in UTF-16 mode. */ |
782 |
|
|
783 |
|
#define GETCHARINCTEST(c, eptr) \ |
784 |
|
c = *eptr++; \ |
785 |
|
if (utf && (c & 0xfc00) == 0xd800) GETUTF16INC(c, eptr); |
786 |
|
|
787 |
|
/* Base macro to pick up the low surrogate of a UTF-16 character, not |
788 |
|
advancing the pointer, incrementing the length. */ |
789 |
|
|
790 |
|
#define GETUTF16LEN(c, eptr, len) \ |
791 |
|
{ c = (((c & 0x3ff) << 10) | (eptr[1] & 0x3ff)) + 0x10000; len++; } |
792 |
|
|
793 |
|
/* Get the next UTF-16 character, not advancing the pointer, incrementing |
794 |
|
length if there is a low surrogate. This is called when we know we are in |
795 |
|
UTF-16 mode. */ |
796 |
|
|
797 |
|
#define GETCHARLEN(c, eptr, len) \ |
798 |
|
c = *eptr; \ |
799 |
|
if ((c & 0xfc00) == 0xd800) GETUTF16LEN(c, eptr, len); |
800 |
|
|
801 |
|
/* Get the next UTF-816character, testing for UTF-16 mode, not advancing the |
802 |
|
pointer, incrementing length if there is a low surrogate. This is called when |
803 |
|
we do not know if we are in UTF-16 mode. */ |
804 |
|
|
805 |
|
#define GETCHARLENTEST(c, eptr, len) \ |
806 |
|
c = *eptr; \ |
807 |
|
if (utf && (c & 0xfc00) == 0xd800) GETUTF16LEN(c, eptr, len); |
808 |
|
|
809 |
|
/* If the pointer is not at the start of a character, move it back until |
810 |
|
it is. This is called only in UTF-16 mode - we don't put a test within the |
811 |
|
macro because almost all calls are already within a block of UTF-16 only |
812 |
|
code. */ |
813 |
|
|
814 |
|
#define BACKCHAR(eptr) if ((*eptr & 0xfc00) == 0xdc00) eptr-- |
815 |
|
|
816 |
|
/* Same as above, just in the other direction. */ |
817 |
|
#define FORWARDCHAR(eptr) if ((*eptr & 0xfc00) == 0xdc00) eptr++ |
818 |
|
|
819 |
|
/* Same as above, but it allows a fully customizable form. */ |
820 |
|
#define ACROSSCHAR(condition, eptr, action) \ |
821 |
|
if ((condition) && ((eptr) & 0xfc00) == 0xdc00) action |
822 |
|
|
823 |
#endif |
#endif |
824 |
|
|
825 |
|
#endif /* COMPILE_PCRE8 */ |
826 |
|
|
827 |
|
#endif /* SUPPORT_UTF */ |
828 |
|
|
829 |
|
|
830 |
/* In case there is no definition of offsetof() provided - though any proper |
/* In case there is no definition of offsetof() provided - though any proper |
831 |
Standard C system should have one. */ |
Standard C system should have one. */ |
835 |
#endif |
#endif |
836 |
|
|
837 |
|
|
|
/* These are the public options that can change during matching. */ |
|
|
|
|
|
#define PCRE_IMS (PCRE_CASELESS|PCRE_MULTILINE|PCRE_DOTALL) |
|
|
|
|
838 |
/* Private flags containing information about the compiled regex. They used to |
/* Private flags containing information about the compiled regex. They used to |
839 |
live at the top end of the options word, but that got almost full, so now they |
live at the top end of the options word, but that got almost full, so now they |
840 |
are in a 16-bit flags word. From release 8.00, PCRE_NOPARTIAL is unused, as |
are in a 16-bit flags word. From release 8.00, PCRE_NOPARTIAL is unused, as |
841 |
the restrictions on partial matching have been lifted. It remains for backwards |
the restrictions on partial matching have been lifted. It remains for backwards |
842 |
compatibility. */ |
compatibility. */ |
843 |
|
|
844 |
#define PCRE_NOPARTIAL 0x0001 /* can't use partial with this regex */ |
#ifdef COMPILE_PCRE8 |
845 |
#define PCRE_FIRSTSET 0x0002 /* first_byte is set */ |
#define PCRE_MODE 0x0001 /* compiled in 8 bit mode */ |
846 |
#define PCRE_REQCHSET 0x0004 /* req_byte is set */ |
#endif |
847 |
#define PCRE_STARTLINE 0x0008 /* start after \n for multiline */ |
#ifdef COMPILE_PCRE16 |
848 |
#define PCRE_JCHANGED 0x0010 /* j option used in regex */ |
#define PCRE_MODE 0x0002 /* compiled in 16 bit mode */ |
849 |
#define PCRE_HASCRORLF 0x0020 /* explicit \r or \n in pattern */ |
#endif |
850 |
|
#define PCRE_FIRSTSET 0x0010 /* first_char is set */ |
851 |
|
#define PCRE_FCH_CASELESS 0x0020 /* caseless first char */ |
852 |
|
#define PCRE_REQCHSET 0x0040 /* req_byte is set */ |
853 |
|
#define PCRE_RCH_CASELESS 0x0080 /* caseless requested char */ |
854 |
|
#define PCRE_STARTLINE 0x0100 /* start after \n for multiline */ |
855 |
|
#define PCRE_NOPARTIAL 0x0200 /* can't use partial with this regex */ |
856 |
|
#define PCRE_JCHANGED 0x0400 /* j option used in regex */ |
857 |
|
#define PCRE_HASCRORLF 0x0800 /* explicit \r or \n in pattern */ |
858 |
|
#define PCRE_HASTHEN 0x1000 /* pattern contains (*THEN) */ |
859 |
|
|
860 |
/* Options for the "extra" block produced by pcre_study(). */ |
/* Flags for the "extra" block produced by pcre_study(). */ |
861 |
|
|
862 |
#define PCRE_STUDY_MAPPED 0x01 /* a map of starting chars exists */ |
#define PCRE_STUDY_MAPPED 0x0001 /* a map of starting chars exists */ |
863 |
#define PCRE_STUDY_MINLEN 0x02 /* a minimum length field exists */ |
#define PCRE_STUDY_MINLEN 0x0002 /* a minimum length field exists */ |
864 |
|
|
865 |
/* Masks for identifying the public options that are permitted at compile |
/* Masks for identifying the public options that are permitted at compile |
866 |
time, run time, or study time, respectively. */ |
time, run time, or study time, respectively. */ |
873 |
PCRE_DOTALL|PCRE_DOLLAR_ENDONLY|PCRE_EXTRA|PCRE_UNGREEDY|PCRE_UTF8| \ |
PCRE_DOTALL|PCRE_DOLLAR_ENDONLY|PCRE_EXTRA|PCRE_UNGREEDY|PCRE_UTF8| \ |
874 |
PCRE_NO_AUTO_CAPTURE|PCRE_NO_UTF8_CHECK|PCRE_AUTO_CALLOUT|PCRE_FIRSTLINE| \ |
PCRE_NO_AUTO_CAPTURE|PCRE_NO_UTF8_CHECK|PCRE_AUTO_CALLOUT|PCRE_FIRSTLINE| \ |
875 |
PCRE_DUPNAMES|PCRE_NEWLINE_BITS|PCRE_BSR_ANYCRLF|PCRE_BSR_UNICODE| \ |
PCRE_DUPNAMES|PCRE_NEWLINE_BITS|PCRE_BSR_ANYCRLF|PCRE_BSR_UNICODE| \ |
876 |
PCRE_JAVASCRIPT_COMPAT) |
PCRE_JAVASCRIPT_COMPAT|PCRE_UCP|PCRE_NO_START_OPTIMIZE) |
877 |
|
|
878 |
#define PUBLIC_EXEC_OPTIONS \ |
#define PUBLIC_EXEC_OPTIONS \ |
879 |
(PCRE_ANCHORED|PCRE_NOTBOL|PCRE_NOTEOL|PCRE_NOTEMPTY|PCRE_NOTEMPTY_ATSTART| \ |
(PCRE_ANCHORED|PCRE_NOTBOL|PCRE_NOTEOL|PCRE_NOTEMPTY|PCRE_NOTEMPTY_ATSTART| \ |
886 |
PCRE_DFA_RESTART|PCRE_NEWLINE_BITS|PCRE_BSR_ANYCRLF|PCRE_BSR_UNICODE| \ |
PCRE_DFA_RESTART|PCRE_NEWLINE_BITS|PCRE_BSR_ANYCRLF|PCRE_BSR_UNICODE| \ |
887 |
PCRE_NO_START_OPTIMIZE) |
PCRE_NO_START_OPTIMIZE) |
888 |
|
|
889 |
#define PUBLIC_STUDY_OPTIONS 0 /* None defined */ |
#define PUBLIC_STUDY_OPTIONS \ |
890 |
|
PCRE_STUDY_JIT_COMPILE |
891 |
|
|
892 |
/* Magic number to provide a small check against being handed junk. Also used |
/* Magic number to provide a small check against being handed junk. */ |
|
to detect whether a pattern was compiled on a host of different endianness. */ |
|
893 |
|
|
894 |
#define MAGIC_NUMBER 0x50435245UL /* 'PCRE' */ |
#define MAGIC_NUMBER 0x50435245UL /* 'PCRE' */ |
895 |
|
|
896 |
|
/* This variable is used to detect a loaded regular expression |
897 |
|
in different endianness. */ |
898 |
|
|
899 |
|
#define REVERSED_MAGIC_NUMBER 0x45524350UL /* 'ERCP' */ |
900 |
|
|
901 |
/* Negative values for the firstchar and reqchar variables */ |
/* Negative values for the firstchar and reqchar variables */ |
902 |
|
|
903 |
#define REQ_UNSET (-2) |
#define REQ_UNSET (-2) |
908 |
|
|
909 |
#define REQ_BYTE_MAX 1000 |
#define REQ_BYTE_MAX 1000 |
910 |
|
|
|
/* Flags added to firstbyte or reqbyte; a "non-literal" item is either a |
|
|
variable-length repeat, or a anything other than literal characters. */ |
|
|
|
|
|
#define REQ_CASELESS 0x0100 /* indicates caselessness */ |
|
|
#define REQ_VARY 0x0200 /* reqbyte followed non-literal item */ |
|
|
|
|
911 |
/* Miscellaneous definitions. The #ifndef is to pacify compiler warnings in |
/* Miscellaneous definitions. The #ifndef is to pacify compiler warnings in |
912 |
environments where these macros are defined elsewhere. Unfortunately, there |
environments where these macros are defined elsewhere. Unfortunately, there |
913 |
is no way to do the same for the typedef. */ |
is no way to do the same for the typedef. */ |
936 |
application that did need both could compile two versions of the library, using |
application that did need both could compile two versions of the library, using |
937 |
macros to give the functions distinct names. */ |
macros to give the functions distinct names. */ |
938 |
|
|
939 |
#ifndef SUPPORT_UTF8 |
#ifndef SUPPORT_UTF |
940 |
|
|
941 |
/* UTF-8 support is not enabled; use the platform-dependent character literals |
/* UTF-8 support is not enabled; use the platform-dependent character literals |
942 |
so that PCRE works on both ASCII and EBCDIC platforms, in non-UTF-mode only. */ |
so that PCRE works on both ASCII and EBCDIC platforms, in non-UTF-mode only. */ |
1189 |
|
|
1190 |
#define STRING_DEFINE "DEFINE" |
#define STRING_DEFINE "DEFINE" |
1191 |
|
|
1192 |
#define STRING_CR_RIGHTPAR "CR)" |
#define STRING_CR_RIGHTPAR "CR)" |
1193 |
#define STRING_LF_RIGHTPAR "LF)" |
#define STRING_LF_RIGHTPAR "LF)" |
1194 |
#define STRING_CRLF_RIGHTPAR "CRLF)" |
#define STRING_CRLF_RIGHTPAR "CRLF)" |
1195 |
#define STRING_ANY_RIGHTPAR "ANY)" |
#define STRING_ANY_RIGHTPAR "ANY)" |
1196 |
#define STRING_ANYCRLF_RIGHTPAR "ANYCRLF)" |
#define STRING_ANYCRLF_RIGHTPAR "ANYCRLF)" |
1197 |
#define STRING_BSR_ANYCRLF_RIGHTPAR "BSR_ANYCRLF)" |
#define STRING_BSR_ANYCRLF_RIGHTPAR "BSR_ANYCRLF)" |
1198 |
#define STRING_BSR_UNICODE_RIGHTPAR "BSR_UNICODE)" |
#define STRING_BSR_UNICODE_RIGHTPAR "BSR_UNICODE)" |
1199 |
#define STRING_UTF8_RIGHTPAR "UTF8)" |
#ifdef COMPILE_PCRE8 |
1200 |
|
#define STRING_UTF_RIGHTPAR "UTF8)" |
1201 |
|
#endif |
1202 |
|
#ifdef COMPILE_PCRE16 |
1203 |
|
#define STRING_UTF_RIGHTPAR "UTF16)" |
1204 |
|
#endif |
1205 |
|
#define STRING_UCP_RIGHTPAR "UCP)" |
1206 |
|
#define STRING_NO_START_OPT_RIGHTPAR "NO_START_OPT)" |
1207 |
|
|
1208 |
#else /* SUPPORT_UTF8 */ |
#else /* SUPPORT_UTF */ |
1209 |
|
|
1210 |
/* UTF-8 support is enabled; always use UTF-8 (=ASCII) character codes. This |
/* UTF-8 support is enabled; always use UTF-8 (=ASCII) character codes. This |
1211 |
works in both modes non-EBCDIC platforms, and on EBCDIC platforms in UTF-8 mode |
works in both modes non-EBCDIC platforms, and on EBCDIC platforms in UTF-8 mode |
1449 |
|
|
1450 |
#define STRING_DEFINE STR_D STR_E STR_F STR_I STR_N STR_E |
#define STRING_DEFINE STR_D STR_E STR_F STR_I STR_N STR_E |
1451 |
|
|
1452 |
#define STRING_CR_RIGHTPAR STR_C STR_R STR_RIGHT_PARENTHESIS |
#define STRING_CR_RIGHTPAR STR_C STR_R STR_RIGHT_PARENTHESIS |
1453 |
#define STRING_LF_RIGHTPAR STR_L STR_F STR_RIGHT_PARENTHESIS |
#define STRING_LF_RIGHTPAR STR_L STR_F STR_RIGHT_PARENTHESIS |
1454 |
#define STRING_CRLF_RIGHTPAR STR_C STR_R STR_L STR_F STR_RIGHT_PARENTHESIS |
#define STRING_CRLF_RIGHTPAR STR_C STR_R STR_L STR_F STR_RIGHT_PARENTHESIS |
1455 |
#define STRING_ANY_RIGHTPAR STR_A STR_N STR_Y STR_RIGHT_PARENTHESIS |
#define STRING_ANY_RIGHTPAR STR_A STR_N STR_Y STR_RIGHT_PARENTHESIS |
1456 |
#define STRING_ANYCRLF_RIGHTPAR STR_A STR_N STR_Y STR_C STR_R STR_L STR_F STR_RIGHT_PARENTHESIS |
#define STRING_ANYCRLF_RIGHTPAR STR_A STR_N STR_Y STR_C STR_R STR_L STR_F STR_RIGHT_PARENTHESIS |
1457 |
#define STRING_BSR_ANYCRLF_RIGHTPAR STR_B STR_S STR_R STR_UNDERSCORE STR_A STR_N STR_Y STR_C STR_R STR_L STR_F STR_RIGHT_PARENTHESIS |
#define STRING_BSR_ANYCRLF_RIGHTPAR STR_B STR_S STR_R STR_UNDERSCORE STR_A STR_N STR_Y STR_C STR_R STR_L STR_F STR_RIGHT_PARENTHESIS |
1458 |
#define STRING_BSR_UNICODE_RIGHTPAR STR_B STR_S STR_R STR_UNDERSCORE STR_U STR_N STR_I STR_C STR_O STR_D STR_E STR_RIGHT_PARENTHESIS |
#define STRING_BSR_UNICODE_RIGHTPAR STR_B STR_S STR_R STR_UNDERSCORE STR_U STR_N STR_I STR_C STR_O STR_D STR_E STR_RIGHT_PARENTHESIS |
1459 |
#define STRING_UTF8_RIGHTPAR STR_U STR_T STR_F STR_8 STR_RIGHT_PARENTHESIS |
#ifdef COMPILE_PCRE8 |
1460 |
|
#define STRING_UTF_RIGHTPAR STR_U STR_T STR_F STR_8 STR_RIGHT_PARENTHESIS |
1461 |
|
#endif |
1462 |
|
#ifdef COMPILE_PCRE16 |
1463 |
|
#define STRING_UTF_RIGHTPAR STR_U STR_T STR_F STR_1 STR_6 STR_RIGHT_PARENTHESIS |
1464 |
|
#endif |
1465 |
|
#define STRING_UCP_RIGHTPAR STR_U STR_C STR_P STR_RIGHT_PARENTHESIS |
1466 |
|
#define STRING_NO_START_OPT_RIGHTPAR STR_N STR_O STR_UNDERSCORE STR_S STR_T STR_A STR_R STR_T STR_UNDERSCORE STR_O STR_P STR_T STR_RIGHT_PARENTHESIS |
1467 |
|
|
1468 |
#endif /* SUPPORT_UTF8 */ |
#endif /* SUPPORT_UTF */ |
1469 |
|
|
1470 |
/* Escape items that are just an encoding of a particular data value. */ |
/* Escape items that are just an encoding of a particular data value. */ |
1471 |
|
|
1496 |
|
|
1497 |
#define PT_ANY 0 /* Any property - matches all chars */ |
#define PT_ANY 0 /* Any property - matches all chars */ |
1498 |
#define PT_LAMP 1 /* L& - the union of Lu, Ll, Lt */ |
#define PT_LAMP 1 /* L& - the union of Lu, Ll, Lt */ |
1499 |
#define PT_GC 2 /* General characteristic (e.g. L) */ |
#define PT_GC 2 /* Specified general characteristic (e.g. L) */ |
1500 |
#define PT_PC 3 /* Particular characteristic (e.g. Lu) */ |
#define PT_PC 3 /* Specified particular characteristic (e.g. Lu) */ |
1501 |
#define PT_SC 4 /* Script (e.g. Han) */ |
#define PT_SC 4 /* Script (e.g. Han) */ |
1502 |
|
#define PT_ALNUM 5 /* Alphanumeric - the union of L and N */ |
1503 |
|
#define PT_SPACE 6 /* Perl space - Z plus 9,10,12,13 */ |
1504 |
|
#define PT_PXSPACE 7 /* POSIX space - Z plus 9,10,11,12,13 */ |
1505 |
|
#define PT_WORD 8 /* Word - L plus N plus underscore */ |
1506 |
|
|
1507 |
/* Flag bits and data types for the extended class (OP_XCLASS) for classes that |
/* Flag bits and data types for the extended class (OP_XCLASS) for classes that |
1508 |
contain UTF-8 characters with values greater than 255. */ |
contain characters with values greater than 255. */ |
1509 |
|
|
1510 |
#define XCL_NOT 0x01 /* Flag: this is a negative class */ |
#define XCL_NOT 0x01 /* Flag: this is a negative class */ |
1511 |
#define XCL_MAP 0x02 /* Flag: a 32-byte map is present */ |
#define XCL_MAP 0x02 /* Flag: a 32-byte map is present */ |
1519 |
/* These are escaped items that aren't just an encoding of a particular data |
/* These are escaped items that aren't just an encoding of a particular data |
1520 |
value such as \n. They must have non-zero values, as check_escape() returns |
value such as \n. They must have non-zero values, as check_escape() returns |
1521 |
their negation. Also, they must appear in the same order as in the opcode |
their negation. Also, they must appear in the same order as in the opcode |
1522 |
definitions below, up to ESC_z. There's a dummy for OP_ANY because it |
definitions below, up to ESC_z. There's a dummy for OP_ALLANY because it |
1523 |
corresponds to "." rather than an escape sequence, and another for OP_ALLANY |
corresponds to "." in DOTALL mode rather than an escape sequence. It is also |
1524 |
(which is used for [^] in JavaScript compatibility mode). |
used for [^] in JavaScript compatibility mode, and for \C in non-utf mode. In |
1525 |
|
non-DOTALL mode, "." behaves like \N. |
1526 |
|
|
1527 |
|
The special values ESC_DU, ESC_du, etc. are used instead of ESC_D, ESC_d, etc. |
1528 |
|
when PCRE_UCP is set, when replacement of \d etc by \p sequences is required. |
1529 |
|
They must be contiguous, and remain in order so that the replacements can be |
1530 |
|
looked up from a table. |
1531 |
|
|
1532 |
The final escape must be ESC_REF as subsequent values are used for |
The final escape must be ESC_REF as subsequent values are used for |
1533 |
backreferences (\1, \2, \3, etc). There are two tests in the code for an escape |
backreferences (\1, \2, \3, etc). There are two tests in the code for an escape |
1537 |
*/ |
*/ |
1538 |
|
|
1539 |
enum { ESC_A = 1, ESC_G, ESC_K, ESC_B, ESC_b, ESC_D, ESC_d, ESC_S, ESC_s, |
enum { ESC_A = 1, ESC_G, ESC_K, ESC_B, ESC_b, ESC_D, ESC_d, ESC_S, ESC_s, |
1540 |
ESC_W, ESC_w, ESC_dum1, ESC_dum2, ESC_C, ESC_P, ESC_p, ESC_R, ESC_H, |
ESC_W, ESC_w, ESC_N, ESC_dum, ESC_C, ESC_P, ESC_p, ESC_R, ESC_H, |
1541 |
ESC_h, ESC_V, ESC_v, ESC_X, ESC_Z, ESC_z, ESC_E, ESC_Q, ESC_g, ESC_k, |
ESC_h, ESC_V, ESC_v, ESC_X, ESC_Z, ESC_z, |
1542 |
|
ESC_E, ESC_Q, ESC_g, ESC_k, |
1543 |
|
ESC_DU, ESC_du, ESC_SU, ESC_su, ESC_WU, ESC_wu, |
1544 |
ESC_REF }; |
ESC_REF }; |
1545 |
|
|
|
|
|
1546 |
/* Opcode table: Starting from 1 (i.e. after OP_END), the values up to |
/* Opcode table: Starting from 1 (i.e. after OP_END), the values up to |
1547 |
OP_EOD must correspond in order to the list of escapes immediately above. |
OP_EOD must correspond in order to the list of escapes immediately above. |
1548 |
|
|
1566 |
OP_WHITESPACE, /* 9 \s */ |
OP_WHITESPACE, /* 9 \s */ |
1567 |
OP_NOT_WORDCHAR, /* 10 \W */ |
OP_NOT_WORDCHAR, /* 10 \W */ |
1568 |
OP_WORDCHAR, /* 11 \w */ |
OP_WORDCHAR, /* 11 \w */ |
1569 |
OP_ANY, /* 12 Match any character (subject to DOTALL) */ |
|
1570 |
OP_ALLANY, /* 13 Match any character (not subject to DOTALL) */ |
OP_ANY, /* 12 Match any character except newline */ |
1571 |
|
OP_ALLANY, /* 13 Match any character */ |
1572 |
OP_ANYBYTE, /* 14 Match any byte (\C); different to OP_ANY for UTF-8 */ |
OP_ANYBYTE, /* 14 Match any byte (\C); different to OP_ANY for UTF-8 */ |
1573 |
OP_NOTPROP, /* 15 \P (not Unicode property) */ |
OP_NOTPROP, /* 15 \P (not Unicode property) */ |
1574 |
OP_PROP, /* 16 \p (Unicode property) */ |
OP_PROP, /* 16 \p (Unicode property) */ |
1581 |
OP_EODN, /* 23 End of data or \n at end of data: \Z. */ |
OP_EODN, /* 23 End of data or \n at end of data: \Z. */ |
1582 |
OP_EOD, /* 24 End of data: \z */ |
OP_EOD, /* 24 End of data: \z */ |
1583 |
|
|
1584 |
OP_OPT, /* 25 Set runtime options */ |
OP_CIRC, /* 25 Start of line - not multiline */ |
1585 |
OP_CIRC, /* 26 Start of line - varies with multiline switch */ |
OP_CIRCM, /* 26 Start of line - multiline */ |
1586 |
OP_DOLL, /* 27 End of line - varies with multiline switch */ |
OP_DOLL, /* 27 End of line - not multiline */ |
1587 |
OP_CHAR, /* 28 Match one character, casefully */ |
OP_DOLLM, /* 28 End of line - multiline */ |
1588 |
OP_CHARNC, /* 29 Match one character, caselessly */ |
OP_CHAR, /* 29 Match one character, casefully */ |
1589 |
OP_NOT, /* 30 Match one character, not the following one */ |
OP_CHARI, /* 30 Match one character, caselessly */ |
1590 |
|
OP_NOT, /* 31 Match one character, not the given one, casefully */ |
1591 |
OP_STAR, /* 31 The maximizing and minimizing versions of */ |
OP_NOTI, /* 32 Match one character, not the given one, caselessly */ |
1592 |
OP_MINSTAR, /* 32 these six opcodes must come in pairs, with */ |
|
1593 |
OP_PLUS, /* 33 the minimizing one second. */ |
/* The following sets of 13 opcodes must always be kept in step because |
1594 |
OP_MINPLUS, /* 34 This first set applies to single characters.*/ |
the offset from the first one is used to generate the others. */ |
1595 |
OP_QUERY, /* 35 */ |
|
1596 |
OP_MINQUERY, /* 36 */ |
/**** Single characters, caseful, must precede the caseless ones ****/ |
1597 |
|
|
1598 |
OP_UPTO, /* 37 From 0 to n matches */ |
OP_STAR, /* 33 The maximizing and minimizing versions of */ |
1599 |
OP_MINUPTO, /* 38 */ |
OP_MINSTAR, /* 34 these six opcodes must come in pairs, with */ |
1600 |
OP_EXACT, /* 39 Exactly n matches */ |
OP_PLUS, /* 35 the minimizing one second. */ |
1601 |
|
OP_MINPLUS, /* 36 */ |
1602 |
OP_POSSTAR, /* 40 Possessified star */ |
OP_QUERY, /* 37 */ |
1603 |
OP_POSPLUS, /* 41 Possessified plus */ |
OP_MINQUERY, /* 38 */ |
1604 |
OP_POSQUERY, /* 42 Posesssified query */ |
|
1605 |
OP_POSUPTO, /* 43 Possessified upto */ |
OP_UPTO, /* 39 From 0 to n matches of one character, caseful*/ |
1606 |
|
OP_MINUPTO, /* 40 */ |
1607 |
OP_NOTSTAR, /* 44 The maximizing and minimizing versions of */ |
OP_EXACT, /* 41 Exactly n matches */ |
1608 |
OP_NOTMINSTAR, /* 45 these six opcodes must come in pairs, with */ |
|
1609 |
OP_NOTPLUS, /* 46 the minimizing one second. They must be in */ |
OP_POSSTAR, /* 42 Possessified star, caseful */ |
1610 |
OP_NOTMINPLUS, /* 47 exactly the same order as those above. */ |
OP_POSPLUS, /* 43 Possessified plus, caseful */ |
1611 |
OP_NOTQUERY, /* 48 This set applies to "not" single characters. */ |
OP_POSQUERY, /* 44 Posesssified query, caseful */ |
1612 |
OP_NOTMINQUERY, /* 49 */ |
OP_POSUPTO, /* 45 Possessified upto, caseful */ |
1613 |
|
|
1614 |
OP_NOTUPTO, /* 50 From 0 to n matches */ |
/**** Single characters, caseless, must follow the caseful ones */ |
1615 |
OP_NOTMINUPTO, /* 51 */ |
|
1616 |
OP_NOTEXACT, /* 52 Exactly n matches */ |
OP_STARI, /* 46 */ |
1617 |
|
OP_MINSTARI, /* 47 */ |
1618 |
OP_NOTPOSSTAR, /* 53 Possessified versions */ |
OP_PLUSI, /* 48 */ |
1619 |
OP_NOTPOSPLUS, /* 54 */ |
OP_MINPLUSI, /* 49 */ |
1620 |
OP_NOTPOSQUERY, /* 55 */ |
OP_QUERYI, /* 50 */ |
1621 |
OP_NOTPOSUPTO, /* 56 */ |
OP_MINQUERYI, /* 51 */ |
1622 |
|
|
1623 |
OP_TYPESTAR, /* 57 The maximizing and minimizing versions of */ |
OP_UPTOI, /* 52 From 0 to n matches of one character, caseless */ |
1624 |
OP_TYPEMINSTAR, /* 58 these six opcodes must come in pairs, with */ |
OP_MINUPTOI, /* 53 */ |
1625 |
OP_TYPEPLUS, /* 59 the minimizing one second. These codes must */ |
OP_EXACTI, /* 54 */ |
1626 |
OP_TYPEMINPLUS, /* 60 be in exactly the same order as those above. */ |
|
1627 |
OP_TYPEQUERY, /* 61 This set applies to character types such as \d */ |
OP_POSSTARI, /* 55 Possessified star, caseless */ |
1628 |
OP_TYPEMINQUERY, /* 62 */ |
OP_POSPLUSI, /* 56 Possessified plus, caseless */ |
1629 |
|
OP_POSQUERYI, /* 57 Posesssified query, caseless */ |
1630 |
OP_TYPEUPTO, /* 63 From 0 to n matches */ |
OP_POSUPTOI, /* 58 Possessified upto, caseless */ |
1631 |
OP_TYPEMINUPTO, /* 64 */ |
|
1632 |
OP_TYPEEXACT, /* 65 Exactly n matches */ |
/**** The negated ones must follow the non-negated ones, and match them ****/ |
1633 |
|
/**** Negated single character, caseful; must precede the caseless ones ****/ |
1634 |
OP_TYPEPOSSTAR, /* 66 Possessified versions */ |
|
1635 |
OP_TYPEPOSPLUS, /* 67 */ |
OP_NOTSTAR, /* 59 The maximizing and minimizing versions of */ |
1636 |
OP_TYPEPOSQUERY, /* 68 */ |
OP_NOTMINSTAR, /* 60 these six opcodes must come in pairs, with */ |
1637 |
OP_TYPEPOSUPTO, /* 69 */ |
OP_NOTPLUS, /* 61 the minimizing one second. They must be in */ |
1638 |
|
OP_NOTMINPLUS, /* 62 exactly the same order as those above. */ |
1639 |
OP_CRSTAR, /* 70 The maximizing and minimizing versions of */ |
OP_NOTQUERY, /* 63 */ |
1640 |
OP_CRMINSTAR, /* 71 all these opcodes must come in pairs, with */ |
OP_NOTMINQUERY, /* 64 */ |
1641 |
OP_CRPLUS, /* 72 the minimizing one second. These codes must */ |
|
1642 |
OP_CRMINPLUS, /* 73 be in exactly the same order as those above. */ |
OP_NOTUPTO, /* 65 From 0 to n matches, caseful */ |
1643 |
OP_CRQUERY, /* 74 These are for character classes and back refs */ |
OP_NOTMINUPTO, /* 66 */ |
1644 |
OP_CRMINQUERY, /* 75 */ |
OP_NOTEXACT, /* 67 Exactly n matches */ |
1645 |
OP_CRRANGE, /* 76 These are different to the three sets above. */ |
|
1646 |
OP_CRMINRANGE, /* 77 */ |
OP_NOTPOSSTAR, /* 68 Possessified versions, caseful */ |
1647 |
|
OP_NOTPOSPLUS, /* 69 */ |
1648 |
OP_CLASS, /* 78 Match a character class, chars < 256 only */ |
OP_NOTPOSQUERY, /* 70 */ |
1649 |
OP_NCLASS, /* 79 Same, but the bitmap was created from a negative |
OP_NOTPOSUPTO, /* 71 */ |
1650 |
class - the difference is relevant only when a UTF-8 |
|
1651 |
character > 255 is encountered. */ |
/**** Negated single character, caseless; must follow the caseful ones ****/ |
1652 |
|
|
1653 |
OP_XCLASS, /* 80 Extended class for handling UTF-8 chars within the |
OP_NOTSTARI, /* 72 */ |
1654 |
class. This does both positive and negative. */ |
OP_NOTMINSTARI, /* 73 */ |
1655 |
|
OP_NOTPLUSI, /* 74 */ |
1656 |
OP_REF, /* 81 Match a back reference */ |
OP_NOTMINPLUSI, /* 75 */ |
1657 |
OP_RECURSE, /* 82 Match a numbered subpattern (possibly recursive) */ |
OP_NOTQUERYI, /* 76 */ |
1658 |
OP_CALLOUT, /* 83 Call out to external function if provided */ |
OP_NOTMINQUERYI, /* 77 */ |
1659 |
|
|
1660 |
OP_ALT, /* 84 Start of alternation */ |
OP_NOTUPTOI, /* 78 From 0 to n matches, caseless */ |
1661 |
OP_KET, /* 85 End of group that doesn't have an unbounded repeat */ |
OP_NOTMINUPTOI, /* 79 */ |
1662 |
OP_KETRMAX, /* 86 These two must remain together and in this */ |
OP_NOTEXACTI, /* 80 Exactly n matches */ |
1663 |
OP_KETRMIN, /* 87 order. They are for groups the repeat for ever. */ |
|
1664 |
|
OP_NOTPOSSTARI, /* 81 Possessified versions, caseless */ |
1665 |
/* The assertions must come before BRA, CBRA, ONCE, and COND.*/ |
OP_NOTPOSPLUSI, /* 82 */ |
1666 |
|
OP_NOTPOSQUERYI, /* 83 */ |
1667 |
OP_ASSERT, /* 88 Positive lookahead */ |
OP_NOTPOSUPTOI, /* 84 */ |
1668 |
OP_ASSERT_NOT, /* 89 Negative lookahead */ |
|
1669 |
OP_ASSERTBACK, /* 90 Positive lookbehind */ |
/**** Character types ****/ |
1670 |
OP_ASSERTBACK_NOT, /* 91 Negative lookbehind */ |
|
1671 |
OP_REVERSE, /* 92 Move pointer back - used in lookbehind assertions */ |
OP_TYPESTAR, /* 85 The maximizing and minimizing versions of */ |
1672 |
|
OP_TYPEMINSTAR, /* 86 these six opcodes must come in pairs, with */ |
1673 |
/* ONCE, BRA, CBRA, and COND must come after the assertions, with ONCE first, |
OP_TYPEPLUS, /* 87 the minimizing one second. These codes must */ |
1674 |
as there's a test for >= ONCE for a subpattern that isn't an assertion. */ |
OP_TYPEMINPLUS, /* 88 be in exactly the same order as those above. */ |
1675 |
|
OP_TYPEQUERY, /* 89 */ |
1676 |
OP_ONCE, /* 93 Atomic group */ |
OP_TYPEMINQUERY, /* 90 */ |
1677 |
OP_BRA, /* 94 Start of non-capturing bracket */ |
|
1678 |
OP_CBRA, /* 95 Start of capturing bracket */ |
OP_TYPEUPTO, /* 91 From 0 to n matches */ |
1679 |
OP_COND, /* 96 Conditional group */ |
OP_TYPEMINUPTO, /* 92 */ |
1680 |
|
OP_TYPEEXACT, /* 93 Exactly n matches */ |
1681 |
|
|
1682 |
|
OP_TYPEPOSSTAR, /* 94 Possessified versions */ |
1683 |
|
OP_TYPEPOSPLUS, /* 95 */ |
1684 |
|
OP_TYPEPOSQUERY, /* 96 */ |
1685 |
|
OP_TYPEPOSUPTO, /* 97 */ |
1686 |
|
|
1687 |
|
/* These are used for character classes and back references; only the |
1688 |
|
first six are the same as the sets above. */ |
1689 |
|
|
1690 |
|
OP_CRSTAR, /* 98 The maximizing and minimizing versions of */ |
1691 |
|
OP_CRMINSTAR, /* 99 all these opcodes must come in pairs, with */ |
1692 |
|
OP_CRPLUS, /* 100 the minimizing one second. These codes must */ |
1693 |
|
OP_CRMINPLUS, /* 101 be in exactly the same order as those above. */ |
1694 |
|
OP_CRQUERY, /* 102 */ |
1695 |
|
OP_CRMINQUERY, /* 103 */ |
1696 |
|
|
1697 |
|
OP_CRRANGE, /* 104 These are different to the three sets above. */ |
1698 |
|
OP_CRMINRANGE, /* 105 */ |
1699 |
|
|
1700 |
|
/* End of quantifier opcodes */ |
1701 |
|
|
1702 |
|
OP_CLASS, /* 106 Match a character class, chars < 256 only */ |
1703 |
|
OP_NCLASS, /* 107 Same, but the bitmap was created from a negative |
1704 |
|
class - the difference is relevant only when a |
1705 |
|
character > 255 is encountered. */ |
1706 |
|
OP_XCLASS, /* 108 Extended class for handling > 255 chars within the |
1707 |
|
class. This does both positive and negative. */ |
1708 |
|
OP_REF, /* 109 Match a back reference, casefully */ |
1709 |
|
OP_REFI, /* 110 Match a back reference, caselessly */ |
1710 |
|
OP_RECURSE, /* 111 Match a numbered subpattern (possibly recursive) */ |
1711 |
|
OP_CALLOUT, /* 112 Call out to external function if provided */ |
1712 |
|
|
1713 |
|
OP_ALT, /* 113 Start of alternation */ |
1714 |
|
OP_KET, /* 114 End of group that doesn't have an unbounded repeat */ |
1715 |
|
OP_KETRMAX, /* 115 These two must remain together and in this */ |
1716 |
|
OP_KETRMIN, /* 116 order. They are for groups the repeat for ever. */ |
1717 |
|
OP_KETRPOS, /* 117 Possessive unlimited repeat. */ |
1718 |
|
|
1719 |
|
/* The assertions must come before BRA, CBRA, ONCE, and COND, and the four |
1720 |
|
asserts must remain in order. */ |
1721 |
|
|
1722 |
|
OP_REVERSE, /* 118 Move pointer back - used in lookbehind assertions */ |
1723 |
|
OP_ASSERT, /* 119 Positive lookahead */ |
1724 |
|
OP_ASSERT_NOT, /* 120 Negative lookahead */ |
1725 |
|
OP_ASSERTBACK, /* 121 Positive lookbehind */ |
1726 |
|
OP_ASSERTBACK_NOT, /* 122 Negative lookbehind */ |
1727 |
|
|
1728 |
|
/* ONCE, ONCE_NC, BRA, BRAPOS, CBRA, CBRAPOS, and COND must come immediately |
1729 |
|
after the assertions, with ONCE first, as there's a test for >= ONCE for a |
1730 |
|
subpattern that isn't an assertion. The POS versions must immediately follow |
1731 |
|
the non-POS versions in each case. */ |
1732 |
|
|
1733 |
|
OP_ONCE, /* 123 Atomic group, contains captures */ |
1734 |
|
OP_ONCE_NC, /* 124 Atomic group containing no captures */ |
1735 |
|
OP_BRA, /* 125 Start of non-capturing bracket */ |
1736 |
|
OP_BRAPOS, /* 126 Ditto, with unlimited, possessive repeat */ |
1737 |
|
OP_CBRA, /* 127 Start of capturing bracket */ |
1738 |
|
OP_CBRAPOS, /* 128 Ditto, with unlimited, possessive repeat */ |
1739 |
|
OP_COND, /* 129 Conditional group */ |
1740 |
|
|
1741 |
/* These three must follow the previous three, in the same order. There's a |
/* These five must follow the previous five, in the same order. There's a |
1742 |
check for >= SBRA to distinguish the two sets. */ |
check for >= SBRA to distinguish the two sets. */ |
1743 |
|
|
1744 |
OP_SBRA, /* 97 Start of non-capturing bracket, check empty */ |
OP_SBRA, /* 130 Start of non-capturing bracket, check empty */ |
1745 |
OP_SCBRA, /* 98 Start of capturing bracket, check empty */ |
OP_SBRAPOS, /* 131 Ditto, with unlimited, possessive repeat */ |
1746 |
OP_SCOND, /* 99 Conditional group, check empty */ |
OP_SCBRA, /* 132 Start of capturing bracket, check empty */ |
1747 |
|
OP_SCBRAPOS, /* 133 Ditto, with unlimited, possessive repeat */ |
1748 |
|
OP_SCOND, /* 134 Conditional group, check empty */ |
1749 |
|
|
1750 |
/* The next two pairs must (respectively) be kept together. */ |
/* The next two pairs must (respectively) be kept together. */ |
1751 |
|
|
1752 |
OP_CREF, /* 100 Used to hold a capture number as condition */ |
OP_CREF, /* 135 Used to hold a capture number as condition */ |
1753 |
OP_NCREF, /* 101 Same, but generaged by a name reference*/ |
OP_NCREF, /* 136 Same, but generated by a name reference*/ |
1754 |
OP_RREF, /* 102 Used to hold a recursion number as condition */ |
OP_RREF, /* 137 Used to hold a recursion number as condition */ |
1755 |
OP_NRREF, /* 103 Same, but generaged by a name reference*/ |
OP_NRREF, /* 138 Same, but generated by a name reference*/ |
1756 |
OP_DEF, /* 104 The DEFINE condition */ |
OP_DEF, /* 139 The DEFINE condition */ |
1757 |
|
|
1758 |
OP_BRAZERO, /* 105 These two must remain together and in this */ |
OP_BRAZERO, /* 140 These two must remain together and in this */ |
1759 |
OP_BRAMINZERO, /* 106 order. */ |
OP_BRAMINZERO, /* 141 order. */ |
1760 |
|
OP_BRAPOSZERO, /* 142 */ |
1761 |
|
|
1762 |
/* These are backtracking control verbs */ |
/* These are backtracking control verbs */ |
1763 |
|
|
1764 |
OP_MARK, /* 107 always has an argument */ |
OP_MARK, /* 143 always has an argument */ |
1765 |
OP_PRUNE, /* 108 */ |
OP_PRUNE, /* 144 */ |
1766 |
OP_PRUNE_ARG, /* 109 same, but with argument */ |
OP_PRUNE_ARG, /* 145 same, but with argument */ |
1767 |
OP_SKIP, /* 110 */ |
OP_SKIP, /* 146 */ |
1768 |
OP_SKIP_ARG, /* 111 same, but with argument */ |
OP_SKIP_ARG, /* 147 same, but with argument */ |
1769 |
OP_THEN, /* 112 */ |
OP_THEN, /* 148 */ |
1770 |
OP_THEN_ARG, /* 113 same, but with argument */ |
OP_THEN_ARG, /* 149 same, but with argument */ |
1771 |
OP_COMMIT, /* 114 */ |
OP_COMMIT, /* 150 */ |
1772 |
|
|
1773 |
/* These are forced failure and success verbs */ |
/* These are forced failure and success verbs */ |
1774 |
|
|
1775 |
OP_FAIL, /* 115 */ |
OP_FAIL, /* 151 */ |
1776 |
OP_ACCEPT, /* 116 */ |
OP_ACCEPT, /* 152 */ |
1777 |
OP_CLOSE, /* 117 Used before OP_ACCEPT to close open captures */ |
OP_ASSERT_ACCEPT, /* 153 Used inside assertions */ |
1778 |
|
OP_CLOSE, /* 154 Used before OP_ACCEPT to close open captures */ |
1779 |
|
|
1780 |
/* This is used to skip a subpattern with a {0} quantifier */ |
/* This is used to skip a subpattern with a {0} quantifier */ |
1781 |
|
|
1782 |
OP_SKIPZERO, /* 118 */ |
OP_SKIPZERO, /* 155 */ |
1783 |
|
|
1784 |
/* This is not an opcode, but is used to check that tables indexed by opcode |
/* This is not an opcode, but is used to check that tables indexed by opcode |
1785 |
are the correct length, in order to catch updating errors - there have been |
are the correct length, in order to catch updating errors - there have been |
1794 |
|
|
1795 |
|
|
1796 |
/* This macro defines textual names for all the opcodes. These are used only |
/* This macro defines textual names for all the opcodes. These are used only |
1797 |
for debugging. The macro is referenced only in pcre_printint.c. */ |
for debugging, and some of them are only partial names. The macro is referenced |
1798 |
|
only in pcre_printint.c, which fills out the full names in many cases (and in |
1799 |
|
some cases doesn't actually use these names at all). */ |
1800 |
|
|
1801 |
#define OP_NAME_LIST \ |
#define OP_NAME_LIST \ |
1802 |
"End", "\\A", "\\G", "\\K", "\\B", "\\b", "\\D", "\\d", \ |
"End", "\\A", "\\G", "\\K", "\\B", "\\b", "\\D", "\\d", \ |
1803 |
"\\S", "\\s", "\\W", "\\w", "Any", "AllAny", "Anybyte", \ |
"\\S", "\\s", "\\W", "\\w", "Any", "AllAny", "Anybyte", \ |
1804 |
"notprop", "prop", "\\R", "\\H", "\\h", "\\V", "\\v", \ |
"notprop", "prop", "\\R", "\\H", "\\h", "\\V", "\\v", \ |
1805 |
"extuni", "\\Z", "\\z", \ |
"extuni", "\\Z", "\\z", \ |
1806 |
"Opt", "^", "$", "char", "charnc", "not", \ |
"^", "^", "$", "$", "char", "chari", "not", "noti", \ |
1807 |
"*", "*?", "+", "+?", "?", "??", "{", "{", "{", \ |
"*", "*?", "+", "+?", "?", "??", \ |
1808 |
|
"{", "{", "{", \ |
1809 |
"*+","++", "?+", "{", \ |
"*+","++", "?+", "{", \ |
1810 |
"*", "*?", "+", "+?", "?", "??", "{", "{", "{", \ |
"*", "*?", "+", "+?", "?", "??", \ |
1811 |
|
"{", "{", "{", \ |
1812 |
|
"*+","++", "?+", "{", \ |
1813 |
|
"*", "*?", "+", "+?", "?", "??", \ |
1814 |
|
"{", "{", "{", \ |
1815 |
|
"*+","++", "?+", "{", \ |
1816 |
|
"*", "*?", "+", "+?", "?", "??", \ |
1817 |
|
"{", "{", "{", \ |
1818 |
"*+","++", "?+", "{", \ |
"*+","++", "?+", "{", \ |
1819 |
"*", "*?", "+", "+?", "?", "??", "{", "{", "{", \ |
"*", "*?", "+", "+?", "?", "??", "{", "{", "{", \ |
1820 |
"*+","++", "?+", "{", \ |
"*+","++", "?+", "{", \ |
1821 |
"*", "*?", "+", "+?", "?", "??", "{", "{", \ |
"*", "*?", "+", "+?", "?", "??", "{", "{", \ |
1822 |
"class", "nclass", "xclass", "Ref", "Recurse", "Callout", \ |
"class", "nclass", "xclass", "Ref", "Refi", \ |
1823 |
"Alt", "Ket", "KetRmax", "KetRmin", "Assert", "Assert not", \ |
"Recurse", "Callout", \ |
1824 |
"AssertB", "AssertB not", "Reverse", \ |
"Alt", "Ket", "KetRmax", "KetRmin", "KetRpos", \ |
1825 |
"Once", "Bra", "CBra", "Cond", "SBra", "SCBra", "SCond", \ |
"Reverse", "Assert", "Assert not", "AssertB", "AssertB not", \ |
1826 |
|
"Once", "Once_NC", \ |
1827 |
|
"Bra", "BraPos", "CBra", "CBraPos", \ |
1828 |
|
"Cond", \ |
1829 |
|
"SBra", "SBraPos", "SCBra", "SCBraPos", \ |
1830 |
|
"SCond", \ |
1831 |
"Cond ref", "Cond nref", "Cond rec", "Cond nrec", "Cond def", \ |
"Cond ref", "Cond nref", "Cond rec", "Cond nrec", "Cond def", \ |
1832 |
"Brazero", "Braminzero", \ |
"Brazero", "Braminzero", "Braposzero", \ |
1833 |
"*MARK", "*PRUNE", "*PRUNE", "*SKIP", "*SKIP", \ |
"*MARK", "*PRUNE", "*PRUNE", "*SKIP", "*SKIP", \ |
1834 |
"*THEN", "*THEN", "*COMMIT", "*FAIL", "*ACCEPT", \ |
"*THEN", "*THEN", "*COMMIT", "*FAIL", \ |
1835 |
|
"*ACCEPT", "*ASSERT_ACCEPT", \ |
1836 |
"Close", "Skip zero" |
"Close", "Skip zero" |
1837 |
|
|
1838 |
|
|
1853 |
3, 3, /* \P, \p */ \ |
3, 3, /* \P, \p */ \ |
1854 |
1, 1, 1, 1, 1, /* \R, \H, \h, \V, \v */ \ |
1, 1, 1, 1, 1, /* \R, \H, \h, \V, \v */ \ |
1855 |
1, /* \X */ \ |
1, /* \X */ \ |
1856 |
1, 1, 2, 1, 1, /* \Z, \z, Opt, ^, $ */ \ |
1, 1, 1, 1, 1, 1, /* \Z, \z, ^, ^M, $, $M */ \ |
1857 |
2, /* Char - the minimum length */ \ |
2, /* Char - the minimum length */ \ |
1858 |
2, /* Charnc - the minimum length */ \ |
2, /* Chari - the minimum length */ \ |
1859 |
2, /* not */ \ |
2, /* not */ \ |
1860 |
/* Positive single-char repeats ** These are */ \ |
2, /* noti */ \ |
1861 |
2, 2, 2, 2, 2, 2, /* *, *?, +, +?, ?, ?? ** minima in */ \ |
/* Positive single-char repeats ** These are */ \ |
1862 |
4, 4, 4, /* upto, minupto, exact ** UTF-8 mode */ \ |
2, 2, 2, 2, 2, 2, /* *, *?, +, +?, ?, ?? ** minima in */ \ |
1863 |
2, 2, 2, 4, /* *+, ++, ?+, upto+ */ \ |
2+IMM2_SIZE, 2+IMM2_SIZE, /* upto, minupto ** mode */ \ |
1864 |
|
2+IMM2_SIZE, /* exact */ \ |
1865 |
|
2, 2, 2, 2+IMM2_SIZE, /* *+, ++, ?+, upto+ */ \ |
1866 |
|
2, 2, 2, 2, 2, 2, /* *I, *?I, +I, +?I, ?I, ??I ** UTF-8 */ \ |
1867 |
|
2+IMM2_SIZE, 2+IMM2_SIZE, /* upto I, minupto I */ \ |
1868 |
|
2+IMM2_SIZE, /* exact I */ \ |
1869 |
|
2, 2, 2, 2+IMM2_SIZE, /* *+I, ++I, ?+I, upto+I */ \ |
1870 |
/* Negative single-char repeats - only for chars < 256 */ \ |
/* Negative single-char repeats - only for chars < 256 */ \ |
1871 |
2, 2, 2, 2, 2, 2, /* NOT *, *?, +, +?, ?, ?? */ \ |
2, 2, 2, 2, 2, 2, /* NOT *, *?, +, +?, ?, ?? */ \ |
1872 |
4, 4, 4, /* NOT upto, minupto, exact */ \ |
2+IMM2_SIZE, 2+IMM2_SIZE, /* NOT upto, minupto */ \ |
1873 |
2, 2, 2, 4, /* Possessive *, +, ?, upto */ \ |
2+IMM2_SIZE, /* NOT exact */ \ |
1874 |
|
2, 2, 2, 2+IMM2_SIZE, /* Possessive NOT *, +, ?, upto */ \ |
1875 |
|
2, 2, 2, 2, 2, 2, /* NOT *I, *?I, +I, +?I, ?I, ??I */ \ |
1876 |
|
2+IMM2_SIZE, 2+IMM2_SIZE, /* NOT upto I, minupto I */ \ |
1877 |
|
2+IMM2_SIZE, /* NOT exact I */ \ |
1878 |
|
2, 2, 2, 2+IMM2_SIZE, /* Possessive NOT *I, +I, ?I, upto I */ \ |
1879 |
/* Positive type repeats */ \ |
/* Positive type repeats */ \ |
1880 |
2, 2, 2, 2, 2, 2, /* Type *, *?, +, +?, ?, ?? */ \ |
2, 2, 2, 2, 2, 2, /* Type *, *?, +, +?, ?, ?? */ \ |
1881 |
4, 4, 4, /* Type upto, minupto, exact */ \ |
2+IMM2_SIZE, 2+IMM2_SIZE, /* Type upto, minupto */ \ |
1882 |
2, 2, 2, 4, /* Possessive *+, ++, ?+, upto+ */ \ |
2+IMM2_SIZE, /* Type exact */ \ |
1883 |
|
2, 2, 2, 2+IMM2_SIZE, /* Possessive *+, ++, ?+, upto+ */ \ |
1884 |
/* Character class & ref repeats */ \ |
/* Character class & ref repeats */ \ |
1885 |
1, 1, 1, 1, 1, 1, /* *, *?, +, +?, ?, ?? */ \ |
1, 1, 1, 1, 1, 1, /* *, *?, +, +?, ?, ?? */ \ |
1886 |
5, 5, /* CRRANGE, CRMINRANGE */ \ |
1+2*IMM2_SIZE, 1+2*IMM2_SIZE, /* CRRANGE, CRMINRANGE */ \ |
1887 |
33, /* CLASS */ \ |
1+(32/sizeof(pcre_uchar)), /* CLASS */ \ |
1888 |
33, /* NCLASS */ \ |
1+(32/sizeof(pcre_uchar)), /* NCLASS */ \ |
1889 |
0, /* XCLASS - variable length */ \ |
0, /* XCLASS - variable length */ \ |
1890 |
3, /* REF */ \ |
1+IMM2_SIZE, /* REF */ \ |
1891 |
|
1+IMM2_SIZE, /* REFI */ \ |
1892 |
1+LINK_SIZE, /* RECURSE */ \ |
1+LINK_SIZE, /* RECURSE */ \ |
1893 |
2+2*LINK_SIZE, /* CALLOUT */ \ |
2+2*LINK_SIZE, /* CALLOUT */ \ |
1894 |
1+LINK_SIZE, /* Alt */ \ |
1+LINK_SIZE, /* Alt */ \ |
1895 |
1+LINK_SIZE, /* Ket */ \ |
1+LINK_SIZE, /* Ket */ \ |
1896 |
1+LINK_SIZE, /* KetRmax */ \ |
1+LINK_SIZE, /* KetRmax */ \ |
1897 |
1+LINK_SIZE, /* KetRmin */ \ |
1+LINK_SIZE, /* KetRmin */ \ |
1898 |
|
1+LINK_SIZE, /* KetRpos */ \ |
1899 |
|
1+LINK_SIZE, /* Reverse */ \ |
1900 |
1+LINK_SIZE, /* Assert */ \ |
1+LINK_SIZE, /* Assert */ \ |
1901 |
1+LINK_SIZE, /* Assert not */ \ |
1+LINK_SIZE, /* Assert not */ \ |
1902 |
1+LINK_SIZE, /* Assert behind */ \ |
1+LINK_SIZE, /* Assert behind */ \ |
1903 |
1+LINK_SIZE, /* Assert behind not */ \ |
1+LINK_SIZE, /* Assert behind not */ \ |
|
1+LINK_SIZE, /* Reverse */ \ |
|
1904 |
1+LINK_SIZE, /* ONCE */ \ |
1+LINK_SIZE, /* ONCE */ \ |
1905 |
|
1+LINK_SIZE, /* ONCE_NC */ \ |
1906 |
1+LINK_SIZE, /* BRA */ \ |
1+LINK_SIZE, /* BRA */ \ |
1907 |
3+LINK_SIZE, /* CBRA */ \ |
1+LINK_SIZE, /* BRAPOS */ \ |
1908 |
|
1+LINK_SIZE+IMM2_SIZE, /* CBRA */ \ |
1909 |
|
1+LINK_SIZE+IMM2_SIZE, /* CBRAPOS */ \ |
1910 |
1+LINK_SIZE, /* COND */ \ |
1+LINK_SIZE, /* COND */ \ |
1911 |
1+LINK_SIZE, /* SBRA */ \ |
1+LINK_SIZE, /* SBRA */ \ |
1912 |
3+LINK_SIZE, /* SCBRA */ \ |
1+LINK_SIZE, /* SBRAPOS */ \ |
1913 |
|
1+LINK_SIZE+IMM2_SIZE, /* SCBRA */ \ |
1914 |
|
1+LINK_SIZE+IMM2_SIZE, /* SCBRAPOS */ \ |
1915 |
1+LINK_SIZE, /* SCOND */ \ |
1+LINK_SIZE, /* SCOND */ \ |
1916 |
3, 3, /* CREF, NCREF */ \ |
1+IMM2_SIZE, 1+IMM2_SIZE, /* CREF, NCREF */ \ |
1917 |
3, 3, /* RREF, NRREF */ \ |
1+IMM2_SIZE, 1+IMM2_SIZE, /* RREF, NRREF */ \ |
1918 |
1, /* DEF */ \ |
1, /* DEF */ \ |
1919 |
1, 1, /* BRAZERO, BRAMINZERO */ \ |
1, 1, 1, /* BRAZERO, BRAMINZERO, BRAPOSZERO */ \ |
1920 |
3, 1, 3, /* MARK, PRUNE, PRUNE_ARG, */ \ |
3, 1, 3, /* MARK, PRUNE, PRUNE_ARG */ \ |
1921 |
1, 3, 1, 3, /* SKIP, SKIP_ARG, THEN, THEN_ARG, */ \ |
1, 3, /* SKIP, SKIP_ARG */ \ |
1922 |
1, 1, 1, 3, 1 /* COMMIT, FAIL, ACCEPT, CLOSE, SKIPZERO */ |
1, 3, /* THEN, THEN_ARG */ \ |
1923 |
|
1, 1, 1, 1, /* COMMIT, FAIL, ACCEPT, ASSERT_ACCEPT */ \ |
1924 |
|
1+IMM2_SIZE, 1 /* CLOSE, SKIPZERO */ |
1925 |
|
|
1926 |
/* A magic value for OP_RREF and OP_NRREF to indicate the "any recursion" |
/* A magic value for OP_RREF and OP_NRREF to indicate the "any recursion" |
1927 |
condition. */ |
condition. */ |
1938 |
ERR30, ERR31, ERR32, ERR33, ERR34, ERR35, ERR36, ERR37, ERR38, ERR39, |
ERR30, ERR31, ERR32, ERR33, ERR34, ERR35, ERR36, ERR37, ERR38, ERR39, |
1939 |
ERR40, ERR41, ERR42, ERR43, ERR44, ERR45, ERR46, ERR47, ERR48, ERR49, |
ERR40, ERR41, ERR42, ERR43, ERR44, ERR45, ERR46, ERR47, ERR48, ERR49, |
1940 |
ERR50, ERR51, ERR52, ERR53, ERR54, ERR55, ERR56, ERR57, ERR58, ERR59, |
ERR50, ERR51, ERR52, ERR53, ERR54, ERR55, ERR56, ERR57, ERR58, ERR59, |
1941 |
ERR60, ERR61, ERR62, ERR63, ERR64, ERR65, ERR66, ERRCOUNT }; |
ERR60, ERR61, ERR62, ERR63, ERR64, ERR65, ERR66, ERR67, ERR68, ERR69, |
1942 |
|
ERR70, ERR71, ERR72, ERR73, ERR74, ERRCOUNT }; |
1943 |
|
|
1944 |
/* The real format of the start of the pcre block; the index of names and the |
/* The real format of the start of the pcre block; the index of names and the |
1945 |
code vector run on as long as necessary after the end. We store an explicit |
code vector run on as long as necessary after the end. We store an explicit |
1966 |
pcre_uint16 dummy1; /* For future use */ |
pcre_uint16 dummy1; /* For future use */ |
1967 |
pcre_uint16 top_bracket; |
pcre_uint16 top_bracket; |
1968 |
pcre_uint16 top_backref; |
pcre_uint16 top_backref; |
1969 |
pcre_uint16 first_byte; |
pcre_uint16 first_char; /* Starting character */ |
1970 |
pcre_uint16 req_byte; |
pcre_uint16 req_char; /* This character must be seen */ |
1971 |
pcre_uint16 name_table_offset; /* Offset to name table that follows */ |
pcre_uint16 name_table_offset; /* Offset to name table that follows */ |
1972 |
pcre_uint16 name_entry_size; /* Size of any name items */ |
pcre_uint16 name_entry_size; /* Size of any name items */ |
1973 |
pcre_uint16 name_count; /* Number of name items */ |
pcre_uint16 name_count; /* Number of name items */ |
1974 |
pcre_uint16 ref_count; /* Reference count */ |
pcre_uint16 ref_count; /* Reference count */ |
1975 |
|
|
1976 |
const unsigned char *tables; /* Pointer to tables or NULL for std */ |
const pcre_uint8 *tables; /* Pointer to tables or NULL for std */ |
1977 |
const unsigned char *nullpad; /* NULL padding */ |
const pcre_uint8 *nullpad; /* NULL padding */ |
1978 |
} real_pcre; |
} real_pcre; |
1979 |
|
|
1980 |
/* The format of the block used to store data from pcre_study(). The same |
/* The format of the block used to store data from pcre_study(). The same |
1983 |
typedef struct pcre_study_data { |
typedef struct pcre_study_data { |
1984 |
pcre_uint32 size; /* Total that was malloced */ |
pcre_uint32 size; /* Total that was malloced */ |
1985 |
pcre_uint32 flags; /* Private flags */ |
pcre_uint32 flags; /* Private flags */ |
1986 |
uschar start_bits[32]; /* Starting char bits */ |
pcre_uint8 start_bits[32]; /* Starting char bits */ |
1987 |
pcre_uint32 minlength; /* Minimum subject length */ |
pcre_uint32 minlength; /* Minimum subject length */ |
1988 |
} pcre_study_data; |
} pcre_study_data; |
1989 |
|
|
2002 |
doing the compiling, so that they are thread-safe. */ |
doing the compiling, so that they are thread-safe. */ |
2003 |
|
|
2004 |
typedef struct compile_data { |
typedef struct compile_data { |
2005 |
const uschar *lcc; /* Points to lower casing table */ |
const pcre_uint8 *lcc; /* Points to lower casing table */ |
2006 |
const uschar *fcc; /* Points to case-flipping table */ |
const pcre_uint8 *fcc; /* Points to case-flipping table */ |
2007 |
const uschar *cbits; /* Points to character type table */ |
const pcre_uint8 *cbits; /* Points to character type table */ |
2008 |
const uschar *ctypes; /* Points to table of type maps */ |
const pcre_uint8 *ctypes; /* Points to table of type maps */ |
2009 |
const uschar *start_workspace;/* The start of working space */ |
const pcre_uchar *start_workspace;/* The start of working space */ |
2010 |
const uschar *start_code; /* The start of the compiled code */ |
const pcre_uchar *start_code; /* The start of the compiled code */ |
2011 |
const uschar *start_pattern; /* The start of the pattern */ |
const pcre_uchar *start_pattern; /* The start of the pattern */ |
2012 |
const uschar *end_pattern; /* The end of the pattern */ |
const pcre_uchar *end_pattern; /* The end of the pattern */ |
2013 |
open_capitem *open_caps; /* Chain of open capture items */ |
open_capitem *open_caps; /* Chain of open capture items */ |
2014 |
uschar *hwm; /* High watermark of workspace */ |
pcre_uchar *hwm; /* High watermark of workspace */ |
2015 |
uschar *name_table; /* The name/number table */ |
pcre_uchar *name_table; /* The name/number table */ |
2016 |
int names_found; /* Number of entries so far */ |
int names_found; /* Number of entries so far */ |
2017 |
int name_entry_size; /* Size of each entry */ |
int name_entry_size; /* Size of each entry */ |
2018 |
int bracount; /* Count of capturing parens as we compile */ |
int workspace_size; /* Size of workspace */ |
2019 |
int final_bracount; /* Saved value after first pass */ |
int bracount; /* Count of capturing parens as we compile */ |
2020 |
int top_backref; /* Maximum back reference */ |
int final_bracount; /* Saved value after first pass */ |
2021 |
unsigned int backref_map; /* Bitmap of low back refs */ |
int top_backref; /* Maximum back reference */ |
2022 |
int external_options; /* External (initial) options */ |
unsigned int backref_map; /* Bitmap of low back refs */ |
2023 |
int external_flags; /* External flag bits to be set */ |
int assert_depth; /* Depth of nested assertions */ |
2024 |
int req_varyopt; /* "After variable item" flag for reqbyte */ |
int external_options; /* External (initial) options */ |
2025 |
BOOL had_accept; /* (*ACCEPT) encountered */ |
int external_flags; /* External flag bits to be set */ |
2026 |
BOOL check_lookbehind; /* Lookbehinds need later checking */ |
int req_varyopt; /* "After variable item" flag for reqbyte */ |
2027 |
int nltype; /* Newline type */ |
BOOL had_accept; /* (*ACCEPT) encountered */ |
2028 |
int nllen; /* Newline string length */ |
BOOL check_lookbehind; /* Lookbehinds need later checking */ |
2029 |
uschar nl[4]; /* Newline string when fixed length */ |
int nltype; /* Newline type */ |
2030 |
|
int nllen; /* Newline string length */ |
2031 |
|
pcre_uchar nl[4]; /* Newline string when fixed length */ |
2032 |
} compile_data; |
} compile_data; |
2033 |
|
|
2034 |
/* Structure for maintaining a chain of pointers to the currently incomplete |
/* Structure for maintaining a chain of pointers to the currently incomplete |
2035 |
branches, for testing for left recursion. */ |
branches, for testing for left recursion while compiling. */ |
2036 |
|
|
2037 |
typedef struct branch_chain { |
typedef struct branch_chain { |
2038 |
struct branch_chain *outer; |
struct branch_chain *outer; |
2039 |
uschar *current_branch; |
pcre_uchar *current_branch; |
2040 |
} branch_chain; |
} branch_chain; |
2041 |
|
|
2042 |
/* Structure for items in a linked list that represents an explicit recursive |
/* Structure for items in a linked list that represents an explicit recursive |
2043 |
call within the pattern. */ |
call within the pattern; used by pcre_exec(). */ |
2044 |
|
|
2045 |
typedef struct recursion_info { |
typedef struct recursion_info { |
2046 |
struct recursion_info *prevrec; /* Previous recursion record (or NULL) */ |
struct recursion_info *prevrec; /* Previous recursion record (or NULL) */ |
2047 |
int group_num; /* Number of group that was called */ |
int group_num; /* Number of group that was called */ |
2048 |
const uschar *after_call; /* "Return value": points after the call in the expr */ |
int *offset_save; /* Pointer to start of saved offsets */ |
2049 |
int *offset_save; /* Pointer to start of saved offsets */ |
int saved_max; /* Number of saved offsets */ |
2050 |
int saved_max; /* Number of saved offsets */ |
PCRE_PUCHAR subject_position; /* Position at start of recursion */ |
|
int save_offset_top; /* Current value of offset_top */ |
|
2051 |
} recursion_info; |
} recursion_info; |
2052 |
|
|
2053 |
|
/* A similar structure for pcre_dfa_exec(). */ |
2054 |
|
|
2055 |
|
typedef struct dfa_recursion_info { |
2056 |
|
struct dfa_recursion_info *prevrec; |
2057 |
|
int group_num; |
2058 |
|
PCRE_PUCHAR subject_position; |
2059 |
|
} dfa_recursion_info; |
2060 |
|
|
2061 |
/* Structure for building a chain of data for holding the values of the subject |
/* Structure for building a chain of data for holding the values of the subject |
2062 |
pointer at the start of each subpattern, so as to detect when an empty string |
pointer at the start of each subpattern, so as to detect when an empty string |
2063 |
has been matched by a subpattern - to break infinite loops. */ |
has been matched by a subpattern - to break infinite loops; used by |
2064 |
|
pcre_exec(). */ |
2065 |
|
|
2066 |
typedef struct eptrblock { |
typedef struct eptrblock { |
2067 |
struct eptrblock *epb_prev; |
struct eptrblock *epb_prev; |
2068 |
USPTR epb_saved_eptr; |
PCRE_PUCHAR epb_saved_eptr; |
2069 |
} eptrblock; |
} eptrblock; |
2070 |
|
|
2071 |
|
|
2076 |
unsigned long int match_call_count; /* As it says */ |
unsigned long int match_call_count; /* As it says */ |
2077 |
unsigned long int match_limit; /* As it says */ |
unsigned long int match_limit; /* As it says */ |
2078 |
unsigned long int match_limit_recursion; /* As it says */ |
unsigned long int match_limit_recursion; /* As it says */ |
2079 |
int *offset_vector; /* Offset vector */ |
int *offset_vector; /* Offset vector */ |
2080 |
int offset_end; /* One past the end */ |
int offset_end; /* One past the end */ |
2081 |
int offset_max; /* The maximum usable for return data */ |
int offset_max; /* The maximum usable for return data */ |
2082 |
int nltype; /* Newline type */ |
int nltype; /* Newline type */ |
2083 |
int nllen; /* Newline string length */ |
int nllen; /* Newline string length */ |
2084 |
int name_count; /* Number of names in name table */ |
int name_count; /* Number of names in name table */ |
2085 |
int name_entry_size; /* Size of entry in names table */ |
int name_entry_size; /* Size of entry in names table */ |
2086 |
uschar *name_table; /* Table of names */ |
pcre_uchar *name_table; /* Table of names */ |
2087 |
uschar nl[4]; /* Newline string when fixed */ |
pcre_uchar nl[4]; /* Newline string when fixed */ |
2088 |
const uschar *lcc; /* Points to lower casing table */ |
const pcre_uint8 *lcc; /* Points to lower casing table */ |
2089 |
const uschar *ctypes; /* Points to table of type maps */ |
const pcre_uint8 *fcc; /* Points to case-flipping table */ |
2090 |
BOOL offset_overflow; /* Set if too many extractions */ |
const pcre_uint8 *ctypes; /* Points to table of type maps */ |
2091 |
BOOL notbol; /* NOTBOL flag */ |
BOOL offset_overflow; /* Set if too many extractions */ |
2092 |
BOOL noteol; /* NOTEOL flag */ |
BOOL notbol; /* NOTBOL flag */ |
2093 |
BOOL utf8; /* UTF8 flag */ |
BOOL noteol; /* NOTEOL flag */ |
2094 |
BOOL jscript_compat; /* JAVASCRIPT_COMPAT flag */ |
BOOL utf; /* UTF-8 / UTF-16 flag */ |
2095 |
BOOL endonly; /* Dollar not before final \n */ |
BOOL jscript_compat; /* JAVASCRIPT_COMPAT flag */ |
2096 |
BOOL notempty; /* Empty string match not wanted */ |
BOOL use_ucp; /* PCRE_UCP flag */ |
2097 |
BOOL notempty_atstart; /* Empty string match at start not wanted */ |
BOOL endonly; /* Dollar not before final \n */ |
2098 |
BOOL hitend; /* Hit the end of the subject at some point */ |
BOOL notempty; /* Empty string match not wanted */ |
2099 |
BOOL bsr_anycrlf; /* \R is just any CRLF, not full Unicode */ |
BOOL notempty_atstart; /* Empty string match at start not wanted */ |
2100 |
const uschar *start_code; /* For use when recursing */ |
BOOL hitend; /* Hit the end of the subject at some point */ |
2101 |
USPTR start_subject; /* Start of the subject string */ |
BOOL bsr_anycrlf; /* \R is just any CRLF, not full Unicode */ |
2102 |
USPTR end_subject; /* End of the subject string */ |
BOOL hasthen; /* Pattern contains (*THEN) */ |
2103 |
USPTR start_match_ptr; /* Start of matched string */ |
BOOL ignore_skip_arg; /* For re-run when SKIP name not found */ |
2104 |
USPTR end_match_ptr; /* Subject position at end match */ |
const pcre_uchar *start_code; /* For use when recursing */ |
2105 |
USPTR start_used_ptr; /* Earliest consulted character */ |
PCRE_PUCHAR start_subject; /* Start of the subject string */ |
2106 |
int partial; /* PARTIAL options */ |
PCRE_PUCHAR end_subject; /* End of the subject string */ |
2107 |
int end_offset_top; /* Highwater mark at end of match */ |
PCRE_PUCHAR start_match_ptr; /* Start of matched string */ |
2108 |
int capture_last; /* Most recent capture number */ |
PCRE_PUCHAR end_match_ptr; /* Subject position at end match */ |
2109 |
int start_offset; /* The start offset value */ |
PCRE_PUCHAR start_used_ptr; /* Earliest consulted character */ |
2110 |
eptrblock *eptrchain; /* Chain of eptrblocks for tail recursions */ |
int partial; /* PARTIAL options */ |
2111 |
int eptrn; /* Next free eptrblock */ |
int end_offset_top; /* Highwater mark at end of match */ |
2112 |
recursion_info *recursive; /* Linked list of recursion data */ |
int capture_last; /* Most recent capture number */ |
2113 |
void *callout_data; /* To pass back to callouts */ |
int start_offset; /* The start offset value */ |
2114 |
const uschar *mark; /* Mark pointer to pass back */ |
int match_function_type; /* Set for certain special calls of MATCH() */ |
2115 |
|
eptrblock *eptrchain; /* Chain of eptrblocks for tail recursions */ |
2116 |
|
int eptrn; /* Next free eptrblock */ |
2117 |
|
recursion_info *recursive; /* Linked list of recursion data */ |
2118 |
|
void *callout_data; /* To pass back to callouts */ |
2119 |
|
const pcre_uchar *mark; /* Mark pointer to pass back on success */ |
2120 |
|
const pcre_uchar *nomatch_mark;/* Mark pointer to pass back on failure */ |
2121 |
|
const pcre_uchar *once_target; /* Where to back up to for atomic groups */ |
2122 |
} match_data; |
} match_data; |
2123 |
|
|
2124 |
/* A similar structure is used for the same purpose by the DFA matching |
/* A similar structure is used for the same purpose by the DFA matching |
2125 |
functions. */ |
functions. */ |
2126 |
|
|
2127 |
typedef struct dfa_match_data { |
typedef struct dfa_match_data { |
2128 |
const uschar *start_code; /* Start of the compiled pattern */ |
const pcre_uchar *start_code; /* Start of the compiled pattern */ |
2129 |
const uschar *start_subject; /* Start of the subject string */ |
const pcre_uchar *start_subject ; /* Start of the subject string */ |
2130 |
const uschar *end_subject; /* End of subject string */ |
const pcre_uchar *end_subject; /* End of subject string */ |
2131 |
const uschar *start_used_ptr; /* Earliest consulted character */ |
const pcre_uchar *start_used_ptr; /* Earliest consulted character */ |
2132 |
const uschar *tables; /* Character tables */ |
const pcre_uint8 *tables; /* Character tables */ |
2133 |
int start_offset; /* The start offset value */ |
int start_offset; /* The start offset value */ |
2134 |
int moptions; /* Match options */ |
int moptions; /* Match options */ |
2135 |
int poptions; /* Pattern options */ |
int poptions; /* Pattern options */ |
2136 |
int nltype; /* Newline type */ |
int nltype; /* Newline type */ |
2137 |
int nllen; /* Newline string length */ |
int nllen; /* Newline string length */ |
2138 |
uschar nl[4]; /* Newline string when fixed */ |
pcre_uchar nl[4]; /* Newline string when fixed */ |
2139 |
void *callout_data; /* To pass back to callouts */ |
void *callout_data; /* To pass back to callouts */ |
2140 |
|
dfa_recursion_info *recursive; /* Linked list of recursion data */ |
2141 |
} dfa_match_data; |
} dfa_match_data; |
2142 |
|
|
2143 |
/* Bit definitions for entries in the pcre_ctypes table. */ |
/* Bit definitions for entries in the pcre_ctypes table. */ |
2173 |
#define ctypes_offset (cbits_offset + cbit_length) |
#define ctypes_offset (cbits_offset + cbit_length) |
2174 |
#define tables_length (ctypes_offset + 256) |
#define tables_length (ctypes_offset + 256) |
2175 |
|
|
2176 |
|
/* Internal function prefix */ |
2177 |
|
|
2178 |
|
#ifdef COMPILE_PCRE8 |
2179 |
|
#define PUBL(name) pcre_##name |
2180 |
|
#define PRIV(name) _pcre_##name |
2181 |
|
#else |
2182 |
|
#ifdef COMPILE_PCRE16 |
2183 |
|
#define PUBL(name) pcre16_##name |
2184 |
|
#define PRIV(name) _pcre16_##name |
2185 |
|
#else |
2186 |
|
#error Unsupported compiling mode |
2187 |
|
#endif /* COMPILE_PCRE16 */ |
2188 |
|
#endif /* COMPILE_PCRE8 */ |
2189 |
|
|
2190 |
/* Layout of the UCP type table that translates property names into types and |
/* Layout of the UCP type table that translates property names into types and |
2191 |
codes. Each entry used to point directly to a name, but to reduce the number of |
codes. Each entry used to point directly to a name, but to reduce the number of |
2192 |
relocations in shared libraries, it now has an offset into a single string |
relocations in shared libraries, it now has an offset into a single string |
2204 |
but are not part of the PCRE public API. The data for these tables is in the |
but are not part of the PCRE public API. The data for these tables is in the |
2205 |
pcre_tables.c module. */ |
pcre_tables.c module. */ |
2206 |
|
|
2207 |
extern const int _pcre_utf8_table1[]; |
#ifdef COMPILE_PCRE8 |
2208 |
extern const int _pcre_utf8_table2[]; |
|
2209 |
extern const int _pcre_utf8_table3[]; |
extern const int PRIV(utf8_table1)[]; |
2210 |
extern const uschar _pcre_utf8_table4[]; |
extern const int PRIV(utf8_table1_size); |
2211 |
|
extern const int PRIV(utf8_table2)[]; |
2212 |
|
extern const int PRIV(utf8_table3)[]; |
2213 |
|
extern const pcre_uint8 PRIV(utf8_table4)[]; |
2214 |
|
|
2215 |
extern const int _pcre_utf8_table1_size; |
#endif /* COMPILE_PCRE8 */ |
2216 |
|
|
2217 |
extern const char _pcre_utt_names[]; |
extern const char PRIV(utt_names)[]; |
2218 |
extern const ucp_type_table _pcre_utt[]; |
extern const ucp_type_table PRIV(utt)[]; |
2219 |
extern const int _pcre_utt_size; |
extern const int PRIV(utt_size); |
2220 |
|
|
2221 |
extern const uschar _pcre_default_tables[]; |
extern const pcre_uint8 PRIV(default_tables)[]; |
2222 |
|
|
2223 |
extern const uschar _pcre_OP_lengths[]; |
extern const pcre_uint8 PRIV(OP_lengths)[]; |
2224 |
|
|
2225 |
|
|
2226 |
/* Internal shared functions. These are functions that are used by more than |
/* Internal shared functions. These are functions that are used by more than |
2227 |
one of the exported public functions. They have to be "external" in the C |
one of the exported public functions. They have to be "external" in the C |
2228 |
sense, but are not part of the PCRE public API. */ |
sense, but are not part of the PCRE public API. */ |
2229 |
|
|
2230 |
extern const uschar *_pcre_find_bracket(const uschar *, BOOL, int); |
/* String comparison functions. */ |
2231 |
extern BOOL _pcre_is_newline(USPTR, int, USPTR, int *, BOOL); |
#ifdef COMPILE_PCRE8 |
2232 |
extern int _pcre_ord2utf8(int, uschar *); |
|
2233 |
extern real_pcre *_pcre_try_flipped(const real_pcre *, real_pcre *, |
#define STRCMP_UC_UC(str1, str2) \ |
2234 |
const pcre_study_data *, pcre_study_data *); |
strcmp((char *)(str1), (char *)(str2)) |
2235 |
extern int _pcre_valid_utf8(USPTR, int); |
#define STRCMP_UC_C8(str1, str2) \ |
2236 |
extern BOOL _pcre_was_newline(USPTR, int, USPTR, int *, BOOL); |
strcmp((char *)(str1), (str2)) |
2237 |
extern BOOL _pcre_xclass(int, const uschar *); |
#define STRNCMP_UC_UC(str1, str2, num) \ |
2238 |
|
strncmp((char *)(str1), (char *)(str2), (num)) |
2239 |
|
#define STRNCMP_UC_C8(str1, str2, num) \ |
2240 |
|
strncmp((char *)(str1), (str2), (num)) |
2241 |
|
#define STRLEN_UC(str) strlen((const char *)str) |
2242 |
|
|
2243 |
|
#else |
2244 |
|
|
2245 |
|
extern int PRIV(strcmp_uc_uc)(const pcre_uchar *, |
2246 |
|
const pcre_uchar *); |
2247 |
|
extern int PRIV(strcmp_uc_c8)(const pcre_uchar *, |
2248 |
|
const char *); |
2249 |
|
extern int PRIV(strncmp_uc_uc)(const pcre_uchar *, |
2250 |
|
const pcre_uchar *, unsigned int num); |
2251 |
|
extern int PRIV(strncmp_uc_c8)(const pcre_uchar *, |
2252 |
|
const char *, unsigned int num); |
2253 |
|
extern unsigned int PRIV(strlen_uc)(const pcre_uchar *str); |
2254 |
|
|
2255 |
|
#define STRCMP_UC_UC(str1, str2) \ |
2256 |
|
PRIV(strcmp_uc_uc)((str1), (str2)) |
2257 |
|
#define STRCMP_UC_C8(str1, str2) \ |
2258 |
|
PRIV(strcmp_uc_c8)((str1), (str2)) |
2259 |
|
#define STRNCMP_UC_UC(str1, str2, num) \ |
2260 |
|
PRIV(strncmp_uc_uc)((str1), (str2), (num)) |
2261 |
|
#define STRNCMP_UC_C8(str1, str2, num) \ |
2262 |
|
PRIV(strncmp_uc_c8)((str1), (str2), (num)) |
2263 |
|
#define STRLEN_UC(str) PRIV(strlen_uc)(str) |
2264 |
|
|
2265 |
|
#endif /* COMPILE_PCRE8 */ |
2266 |
|
|
2267 |
|
extern const pcre_uchar *PRIV(find_bracket)(const pcre_uchar *, BOOL, int); |
2268 |
|
extern BOOL PRIV(is_newline)(PCRE_PUCHAR, int, PCRE_PUCHAR, |
2269 |
|
int *, BOOL); |
2270 |
|
extern int PRIV(ord2utf)(pcre_uint32, pcre_uchar *); |
2271 |
|
extern int PRIV(valid_utf)(PCRE_PUCHAR, int, int *); |
2272 |
|
extern BOOL PRIV(was_newline)(PCRE_PUCHAR, int, PCRE_PUCHAR, |
2273 |
|
int *, BOOL); |
2274 |
|
extern BOOL PRIV(xclass)(int, const pcre_uchar *, BOOL); |
2275 |
|
|
2276 |
|
#ifdef SUPPORT_JIT |
2277 |
|
extern void PRIV(jit_compile)(const real_pcre *, pcre_extra *); |
2278 |
|
extern int PRIV(jit_exec)(const real_pcre *, void *, |
2279 |
|
const pcre_uchar *, int, int, int, int, int *, int); |
2280 |
|
extern void PRIV(jit_free)(void *); |
2281 |
|
extern int PRIV(jit_get_size)(void *); |
2282 |
|
#endif |
2283 |
|
|
2284 |
/* Unicode character database (UCD) */ |
/* Unicode character database (UCD) */ |
2285 |
|
|
2286 |
typedef struct { |
typedef struct { |
2287 |
uschar script; |
pcre_uint8 script; |
2288 |
uschar chartype; |
pcre_uint8 chartype; |
2289 |
pcre_int32 other_case; |
pcre_int32 other_case; |
2290 |
} ucd_record; |
} ucd_record; |
2291 |
|
|
2292 |
extern const ucd_record _pcre_ucd_records[]; |
extern const ucd_record PRIV(ucd_records)[]; |
2293 |
extern const uschar _pcre_ucd_stage1[]; |
extern const pcre_uint8 PRIV(ucd_stage1)[]; |
2294 |
extern const pcre_uint16 _pcre_ucd_stage2[]; |
extern const pcre_uint16 PRIV(ucd_stage2)[]; |
2295 |
extern const int _pcre_ucp_gentype[]; |
extern const int PRIV(ucp_gentype)[]; |
2296 |
|
#ifdef SUPPORT_JIT |
2297 |
|
extern const int PRIV(ucp_typerange)[]; |
2298 |
|
#endif |
2299 |
|
|
2300 |
|
#ifdef SUPPORT_UCP |
2301 |
/* UCD access macros */ |
/* UCD access macros */ |
2302 |
|
|
2303 |
#define UCD_BLOCK_SIZE 128 |
#define UCD_BLOCK_SIZE 128 |
2304 |
#define GET_UCD(ch) (_pcre_ucd_records + \ |
#define GET_UCD(ch) (PRIV(ucd_records) + \ |
2305 |
_pcre_ucd_stage2[_pcre_ucd_stage1[(ch) / UCD_BLOCK_SIZE] * \ |
PRIV(ucd_stage2)[PRIV(ucd_stage1)[(ch) / UCD_BLOCK_SIZE] * \ |
2306 |
UCD_BLOCK_SIZE + ch % UCD_BLOCK_SIZE]) |
UCD_BLOCK_SIZE + (ch) % UCD_BLOCK_SIZE]) |
2307 |
|
|
2308 |
#define UCD_CHARTYPE(ch) GET_UCD(ch)->chartype |
#define UCD_CHARTYPE(ch) GET_UCD(ch)->chartype |
2309 |
#define UCD_SCRIPT(ch) GET_UCD(ch)->script |
#define UCD_SCRIPT(ch) GET_UCD(ch)->script |
2310 |
#define UCD_CATEGORY(ch) _pcre_ucp_gentype[UCD_CHARTYPE(ch)] |
#define UCD_CATEGORY(ch) PRIV(ucp_gentype)[UCD_CHARTYPE(ch)] |
2311 |
#define UCD_OTHERCASE(ch) (ch + GET_UCD(ch)->other_case) |
#define UCD_OTHERCASE(ch) (ch + GET_UCD(ch)->other_case) |
2312 |
|
|
2313 |
|
#endif /* SUPPORT_UCP */ |
2314 |
|
|
2315 |
#endif |
#endif |
2316 |
|
|
2317 |
/* End of pcre_internal.h */ |
/* End of pcre_internal.h */ |