/[pcre]/code/trunk/pcre_internal.h
ViewVC logotype

Diff of /code/trunk/pcre_internal.h

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 137 by ph10, Thu Mar 29 13:56:00 2007 UTC revision 1389 by ph10, Tue Nov 5 18:05:29 2013 UTC
# Line 7  Line 7 
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-2007 University of Cambridge             Copyright (c) 1997-2013 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
# Line 40  POSSIBILITY OF SUCH DAMAGE. Line 40  POSSIBILITY OF SUCH DAMAGE.
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_", "_pcre16_" or "_pcre32_"
44    depending on the PRIV macro. */
45    
46  #ifndef PCRE_INTERNAL_H  #ifndef PCRE_INTERNAL_H
47  #define PCRE_INTERNAL_H  #define PCRE_INTERNAL_H
48    
49  /* Define DEBUG to get debugging output on stdout. */  /* Define PCRE_DEBUG to get debugging output on stdout. */
50    
51  #if 0  #if 0
52  #define DEBUG  #define PCRE_DEBUG
53    #endif
54    
55    /* PCRE is compiled as an 8 bit library if it is not requested otherwise. */
56    
57    #if !defined COMPILE_PCRE16 && !defined COMPILE_PCRE32
58    #define COMPILE_PCRE8
59    #endif
60    
61    /* If SUPPORT_UCP is defined, SUPPORT_UTF must also be defined. The
62    "configure" script ensures this, but not everybody uses "configure". */
63    
64    #if defined SUPPORT_UCP && !(defined SUPPORT_UTF)
65    #define SUPPORT_UTF 1
66    #endif
67    
68    /* We define SUPPORT_UTF if SUPPORT_UTF8 is enabled for compatibility
69    reasons with existing code. */
70    
71    #if defined SUPPORT_UTF8 && !(defined SUPPORT_UTF)
72    #define SUPPORT_UTF 1
73    #endif
74    
75    /* Fixme: SUPPORT_UTF8 should be eventually disappear from the code.
76    Until then we define it if SUPPORT_UTF is defined. */
77    
78    #if defined SUPPORT_UTF && !(defined SUPPORT_UTF8)
79    #define SUPPORT_UTF8 1
80    #endif
81    
82    /* We do not support both EBCDIC and UTF-8/16/32 at the same time. The "configure"
83    script prevents both being selected, but not everybody uses "configure". */
84    
85    #if defined EBCDIC && defined SUPPORT_UTF
86    #error The use of both EBCDIC and SUPPORT_UTF is not supported.
87  #endif  #endif
88    
89  /* 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
# Line 60  It turns out that the Mac Debugging.h he Line 95  It turns out that the Mac Debugging.h he
95  be absolutely sure we get our version. */  be absolutely sure we get our version. */
96    
97  #undef DPRINTF  #undef DPRINTF
98  #ifdef DEBUG  #ifdef PCRE_DEBUG
99  #define DPRINTF(p) printf p  #define DPRINTF(p) printf p
100  #else  #else
101  #define DPRINTF(p) /* Nothing */  #define DPRINTF(p) /* Nothing */
102  #endif  #endif
103    
104    
 /* Get the definitions provided by running "configure" */  
   
 #include "config.h"  
   
105  /* Standard C headers plus the external interface definition. The only time  /* Standard C headers plus the external interface definition. The only time
106  setjmp and stdarg are used is when NO_RECURSE is set. */  setjmp and stdarg are used is when NO_RECURSE is set. */
107    
108  #include <ctype.h>  #include <ctype.h>
109  #include <limits.h>  #include <limits.h>
 #include <setjmp.h>  
 #include <stdarg.h>  
110  #include <stddef.h>  #include <stddef.h>
111  #include <stdio.h>  #include <stdio.h>
112  #include <stdlib.h>  #include <stdlib.h>
113  #include <string.h>  #include <string.h>
114    
115  #ifndef PCRE_SPY  /* Valgrind (memcheck) support */
116  #define PCRE_DEFINITION       /* Win32 __declspec(export) trigger for .dll */  
117    #ifdef SUPPORT_VALGRIND
118    #include <valgrind/memcheck.h>
119    #endif
120    
121    /* When compiling a DLL for Windows, the exported symbols have to be declared
122    using some MS magic. I found some useful information on this web page:
123    http://msdn2.microsoft.com/en-us/library/y4h7bcy6(VS.80).aspx. According to the
124    information there, using __declspec(dllexport) without "extern" we have a
125    definition; with "extern" we have a declaration. The settings here override the
126    setting in pcre.h (which is included below); it defines only PCRE_EXP_DECL,
127    which is all that is needed for applications (they just import the symbols). We
128    use:
129    
130      PCRE_EXP_DECL       for declarations
131      PCRE_EXP_DEFN       for definitions of exported functions
132      PCRE_EXP_DATA_DEFN  for definitions of exported variables
133    
134    The reason for the two DEFN macros is that in non-Windows environments, one
135    does not want to have "extern" before variable definitions because it leads to
136    compiler warnings. So we distinguish between functions and variables. In
137    Windows, the two should always be the same.
138    
139    The reason for wrapping this in #ifndef PCRE_EXP_DECL is so that pcretest,
140    which is an application, but needs to import this file in order to "peek" at
141    internals, can #include pcre.h first to get an application's-eye view.
142    
143    In principle, people compiling for non-Windows, non-Unix-like (i.e. uncommon,
144    special-purpose environments) might want to stick other stuff in front of
145    exported symbols. That's why, in the non-Windows case, we set PCRE_EXP_DEFN and
146    PCRE_EXP_DATA_DEFN only if they are not already set. */
147    
148    #ifndef PCRE_EXP_DECL
149    #  ifdef _WIN32
150    #    ifndef PCRE_STATIC
151    #      define PCRE_EXP_DECL       extern __declspec(dllexport)
152    #      define PCRE_EXP_DEFN       __declspec(dllexport)
153    #      define PCRE_EXP_DATA_DEFN  __declspec(dllexport)
154    #    else
155    #      define PCRE_EXP_DECL       extern
156    #      define PCRE_EXP_DEFN
157    #      define PCRE_EXP_DATA_DEFN
158    #    endif
159    #  else
160    #    ifdef __cplusplus
161    #      define PCRE_EXP_DECL       extern "C"
162    #    else
163    #      define PCRE_EXP_DECL       extern
164    #    endif
165    #    ifndef PCRE_EXP_DEFN
166    #      define PCRE_EXP_DEFN       PCRE_EXP_DECL
167    #    endif
168    #    ifndef PCRE_EXP_DATA_DEFN
169    #      define PCRE_EXP_DATA_DEFN
170    #    endif
171    #  endif
172  #endif  #endif
173    
174  /* We need to have types that specify unsigned 16-bit and 32-bit integers. We  /* When compiling with the MSVC compiler, it is sometimes necessary to include
175    a "calling convention" before exported function names. (This is secondhand
176    information; I know nothing about MSVC myself). For example, something like
177    
178      void __cdecl function(....)
179    
180    might be needed. In order so make this easy, all the exported functions have
181    PCRE_CALL_CONVENTION just before their names. It is rarely needed; if not
182    set, we ensure here that it has no effect. */
183    
184    #ifndef PCRE_CALL_CONVENTION
185    #define PCRE_CALL_CONVENTION
186    #endif
187    
188    /* We need to have types that specify unsigned 8, 16 and 32-bit integers. We
189  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
190  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
191  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
192  preprocessor time in standard C environments. */  preprocessor time in standard C environments. */
193    
194    typedef unsigned char pcre_uint8;
195    
196  #if USHRT_MAX == 65535  #if USHRT_MAX == 65535
197    typedef unsigned short pcre_uint16;  typedef unsigned short pcre_uint16;
198    typedef short pcre_int16;
199    #define PCRE_UINT16_MAX USHRT_MAX
200    #define PCRE_INT16_MAX SHRT_MAX
201  #elif UINT_MAX == 65535  #elif UINT_MAX == 65535
202    typedef unsigned int pcre_uint16;  typedef unsigned int pcre_uint16;
203    typedef int pcre_int16;
204    #define PCRE_UINT16_MAX UINT_MAX
205    #define PCRE_INT16_MAX INT_MAX
206    #else
207    #error Cannot determine a type for 16-bit integers
208    #endif
209    
210    #if UINT_MAX == 4294967295U
211    typedef unsigned int pcre_uint32;
212    typedef int pcre_int32;
213    #define PCRE_UINT32_MAX UINT_MAX
214    #define PCRE_INT32_MAX INT_MAX
215    #elif ULONG_MAX == 4294967295UL
216    typedef unsigned long int pcre_uint32;
217    typedef long int pcre_int32;
218    #define PCRE_UINT32_MAX ULONG_MAX
219    #define PCRE_INT32_MAX LONG_MAX
220  #else  #else
221    #error Cannot determine a type for 16-bit unsigned integers  #error Cannot determine a type for 32-bit integers
222  #endif  #endif
223    
224  #if UINT_MAX == 4294967295  /* When checking for integer overflow in pcre_compile(), we need to handle
225    typedef unsigned int pcre_uint32;  large integers. If a 64-bit integer type is available, we can use that.
226  #elif ULONG_MAX == 4294967295  Otherwise we have to cast to double, which of course requires floating point
227    typedef unsigned long int pcre_uint32;  arithmetic. Handle this by defining a macro for the appropriate type. If
228    stdint.h is available, include it; it may define INT64_MAX. Systems that do not
229    have stdint.h (e.g. Solaris) may have inttypes.h. The macro int64_t may be set
230    by "configure". */
231    
232    #if defined HAVE_STDINT_H
233    #include <stdint.h>
234    #elif defined HAVE_INTTYPES_H
235    #include <inttypes.h>
236    #endif
237    
238    #if defined INT64_MAX || defined int64_t
239    #define INT64_OR_DOUBLE int64_t
240  #else  #else
241    #error Cannot determine a type for 32-bit unsigned integers  #define INT64_OR_DOUBLE double
242  #endif  #endif
243    
244  /* All character handling must be done as unsigned characters. Otherwise there  /* All character handling must be done as unsigned characters. Otherwise there
245  are problems with top-bit-set characters and functions such as isspace().  are problems with top-bit-set characters and functions such as isspace().
246  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 *,
247  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
248  to save lots of typing. I tried "uchar", but it causes problems on Digital  called pcre_uchar.
249  Unix, where it is defined in sys/types, so use "uschar" instead. */  
250    The IN_UCHARS macro multiply its argument with the byte size of the current
251    pcre_uchar type. Useful for memcpy and such operations, whose require the
252    byte size of their input/output buffers.
253    
254    The MAX_255 macro checks whether its pcre_uchar input is less than 256.
255    
256    The TABLE_GET macro is designed for accessing elements of tables whose contain
257    exactly 256 items. When the character is able to contain more than 256
258    items, some check is needed before accessing these tables.
259    */
260    
261  typedef unsigned char uschar;  #if defined COMPILE_PCRE8
262    
263    typedef unsigned char pcre_uchar;
264    #define IN_UCHARS(x) (x)
265    #define MAX_255(c) 1
266    #define TABLE_GET(c, table, default) ((table)[c])
267    
268    #elif defined COMPILE_PCRE16
269    
270    #if USHRT_MAX != 65535
271    /* This is a warning message. Change PCRE_UCHAR16 to a 16 bit data type in
272    pcre.h(.in) and disable (comment out) this message. */
273    #error Warning: PCRE_UCHAR16 is not a 16 bit data type.
274    #endif
275    
276    typedef pcre_uint16 pcre_uchar;
277    #define UCHAR_SHIFT (1)
278    #define IN_UCHARS(x) ((x) << UCHAR_SHIFT)
279    #define MAX_255(c) ((c) <= 255u)
280    #define TABLE_GET(c, table, default) (MAX_255(c)? ((table)[c]):(default))
281    
282    #elif defined COMPILE_PCRE32
283    
284    typedef pcre_uint32 pcre_uchar;
285    #define UCHAR_SHIFT (2)
286    #define IN_UCHARS(x) ((x) << UCHAR_SHIFT)
287    #define MAX_255(c) ((c) <= 255u)
288    #define TABLE_GET(c, table, default) (MAX_255(c)? ((table)[c]):(default))
289    
290    #else
291    #error Unsupported compiling mode
292    #endif /* COMPILE_PCRE[8|16|32] */
293    
294  /* 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
295  characters only go up to 0x7fffffff (though Unicode doesn't go beyond  characters only go up to 0x7fffffff (though Unicode doesn't go beyond
# Line 125  characters only go up to 0x7fffffff (tho Line 298  characters only go up to 0x7fffffff (tho
298  #define NOTACHAR 0xffffffff  #define NOTACHAR 0xffffffff
299    
300  /* PCRE is able to support several different kinds of newline (CR, LF, CRLF,  /* PCRE is able to support several different kinds of newline (CR, LF, CRLF,
301  and "all" at present). The following macros are used to package up testing for  "any" and "anycrlf" at present). The following macros are used to package up
302  newlines. NLBLOCK, PSSTART, and PSEND are defined in the various modules to  testing for newlines. NLBLOCK, PSSTART, and PSEND are defined in the various
303  indicate in which datablock the parameters exist, and what the start/end of  modules to indicate in which datablock the parameters exist, and what the
304  string field names are. */  start/end of string field names are. */
305    
306  #define NLTYPE_FIXED   0     /* Newline is a fixed length string */  #define NLTYPE_FIXED    0     /* Newline is a fixed length string */
307  #define NLTYPE_ANY     1     /* Newline is any Unicode line ending */  #define NLTYPE_ANY      1     /* Newline is any Unicode line ending */
308    #define NLTYPE_ANYCRLF  2     /* Newline is CR, LF, or CRLF */
309    
310  /* This macro checks for a newline at the given position */  /* This macro checks for a newline at the given position */
311    
312  #define IS_NEWLINE(p) \  #define IS_NEWLINE(p) \
313    ((NLBLOCK->nltype != NLTYPE_FIXED)? \    ((NLBLOCK->nltype != NLTYPE_FIXED)? \
314      ((p) < NLBLOCK->PSEND && \      ((p) < NLBLOCK->PSEND && \
315       _pcre_is_newline((p), NLBLOCK->PSEND, &(NLBLOCK->nllen), utf8) \       PRIV(is_newline)((p), NLBLOCK->nltype, NLBLOCK->PSEND, \
316      ) \         &(NLBLOCK->nllen), utf)) \
317      : \      : \
318      ((p) <= NLBLOCK->PSEND - NLBLOCK->nllen && \      ((p) <= NLBLOCK->PSEND - NLBLOCK->nllen && \
319       (p)[0] == NLBLOCK->nl[0] && \       RAWUCHARTEST(p) == NLBLOCK->nl[0] && \
320       (NLBLOCK->nllen == 1 || (p)[1] == NLBLOCK->nl[1]) \       (NLBLOCK->nllen == 1 || RAWUCHARTEST(p+1) == NLBLOCK->nl[1])       \
321      ) \      ) \
322    )    )
323    
# Line 152  string field names are. */ Line 326  string field names are. */
326  #define WAS_NEWLINE(p) \  #define WAS_NEWLINE(p) \
327    ((NLBLOCK->nltype != NLTYPE_FIXED)? \    ((NLBLOCK->nltype != NLTYPE_FIXED)? \
328      ((p) > NLBLOCK->PSSTART && \      ((p) > NLBLOCK->PSSTART && \
329       _pcre_was_newline((p), NLBLOCK->PSSTART, &(NLBLOCK->nllen), utf8) \       PRIV(was_newline)((p), NLBLOCK->nltype, NLBLOCK->PSSTART, \
330      ) \         &(NLBLOCK->nllen), utf)) \
331      : \      : \
332      ((p) >= NLBLOCK->PSSTART + NLBLOCK->nllen && \      ((p) >= NLBLOCK->PSSTART + NLBLOCK->nllen && \
333       (p)[-NLBLOCK->nllen] == NLBLOCK->nl[0] && \       RAWUCHARTEST(p - NLBLOCK->nllen) == NLBLOCK->nl[0] &&              \
334       (NLBLOCK->nllen == 1 || (p)[-NLBLOCK->nllen+1] == NLBLOCK->nl[1]) \       (NLBLOCK->nllen == 1 || RAWUCHARTEST(p - NLBLOCK->nllen + 1) == NLBLOCK->nl[1]) \
335      ) \      ) \
336    )    )
337    
# Line 171  used for the external interface and appe Line 345  used for the external interface and appe
345  must begin with PCRE_. */  must begin with PCRE_. */
346    
347  #ifdef CUSTOM_SUBJECT_PTR  #ifdef CUSTOM_SUBJECT_PTR
348  #define PCRE_SPTR CUSTOM_SUBJECT_PTR  #define PCRE_PUCHAR CUSTOM_SUBJECT_PTR
 #define USPTR CUSTOM_SUBJECT_PTR  
349  #else  #else
350  #define PCRE_SPTR const char *  #define PCRE_PUCHAR const pcre_uchar *
 #define USPTR const unsigned char *  
351  #endif  #endif
352    
353  /* Include the public PCRE header and the definitions of UCP character property  /* Include the public PCRE header and the definitions of UCP character property
354  values. */  values. */
355    
356  #include <pcre.h>  #include "pcre.h"
357  #include "ucp.h"  #include "ucp.h"
358    
359    #ifdef COMPILE_PCRE32
360    /* Assert that the public PCRE_UCHAR32 is a 32-bit type */
361    typedef int __assert_pcre_uchar32_size[sizeof(PCRE_UCHAR32) == 4 ? 1 : -1];
362    #endif
363    
364  /* When compiling for use with the Virtual Pascal compiler, these functions  /* When compiling for use with the Virtual Pascal compiler, these functions
365  need to have their names changed. PCRE must be compiled with the -DVPCOMPAT  need to have their names changed. PCRE must be compiled with the -DVPCOMPAT
366  option on the command line. */  option on the command line. */
# Line 245  The macros are controlled by the value o Line 422  The macros are controlled by the value o
422  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
423  is automated on Unix systems via the "configure" command. */  is automated on Unix systems via the "configure" command. */
424    
425    #if defined COMPILE_PCRE8
426    
427  #if LINK_SIZE == 2  #if LINK_SIZE == 2
428    
429  #define PUT(a,n,d)   \  #define PUT(a,n,d)   \
# Line 281  is automated on Unix systems via the "co Line 460  is automated on Unix systems via the "co
460  #define GET(a,n) \  #define GET(a,n) \
461    (((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])
462    
463  #define MAX_PATTERN_SIZE (1 << 30)   /* Keep it positive */  /* Keep it positive */
464    #define MAX_PATTERN_SIZE (1 << 30)
465    
466    #else
467    #error LINK_SIZE must be either 2, 3, or 4
468    #endif
469    
470    #elif defined COMPILE_PCRE16
471    
472    #if LINK_SIZE == 2
473    
474    /* Redefine LINK_SIZE as a multiple of sizeof(pcre_uchar) */
475    #undef LINK_SIZE
476    #define LINK_SIZE 1
477    
478    #define PUT(a,n,d)   \
479      (a[n] = (d))
480    
481    #define GET(a,n) \
482      (a[n])
483    
484    #define MAX_PATTERN_SIZE (1 << 16)
485    
486    #elif LINK_SIZE == 3 || LINK_SIZE == 4
487    
488    /* Redefine LINK_SIZE as a multiple of sizeof(pcre_uchar) */
489    #undef LINK_SIZE
490    #define LINK_SIZE 2
491    
492    #define PUT(a,n,d)   \
493      (a[n] = (d) >> 16), \
494      (a[(n)+1] = (d) & 65535)
495    
496    #define GET(a,n) \
497      (((a)[n] << 16) | (a)[(n)+1])
498    
499    /* Keep it positive */
500    #define MAX_PATTERN_SIZE (1 << 30)
501    
502  #else  #else
503  #error LINK_SIZE must be either 2, 3, or 4  #error LINK_SIZE must be either 2, 3, or 4
504  #endif  #endif
505    
506    #elif defined COMPILE_PCRE32
507    
508    /* Only supported LINK_SIZE is 4 */
509    /* Redefine LINK_SIZE as a multiple of sizeof(pcre_uchar) */
510    #undef LINK_SIZE
511    #define LINK_SIZE 1
512    
513    #define PUT(a,n,d)   \
514      (a[n] = (d))
515    
516    #define GET(a,n) \
517      (a[n])
518    
519    /* Keep it positive */
520    #define MAX_PATTERN_SIZE (1 << 30)
521    
522    #else
523    #error Unsupported compiling mode
524    #endif /* COMPILE_PCRE[8|16|32] */
525    
526  /* Convenience macro defined in terms of the others */  /* Convenience macro defined in terms of the others */
527    
# Line 298  is automated on Unix systems via the "co Line 532  is automated on Unix systems via the "co
532  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
533  capturing parenthesis numbers in back references. */  capturing parenthesis numbers in back references. */
534    
535    #if defined COMPILE_PCRE8
536    
537    #define IMM2_SIZE 2
538    
539  #define PUT2(a,n,d)   \  #define PUT2(a,n,d)   \
540    a[n] = (d) >> 8; \    a[n] = (d) >> 8; \
541    a[(n)+1] = (d) & 255    a[(n)+1] = (d) & 255
542    
543    /* For reasons that I do not understand, the expression in this GET2 macro is
544    treated by gcc as a signed expression, even when a is declared as unsigned. It
545    seems that any kind of arithmetic results in a signed value. */
546    
547  #define GET2(a,n) \  #define GET2(a,n) \
548    (((a)[n] << 8) | (a)[(n)+1])    (unsigned int)(((a)[n] << 8) | (a)[(n)+1])
549    
550  #define PUT2INC(a,n,d)  PUT2(a,n,d), a += 2  #elif defined COMPILE_PCRE16
551    
552    #define IMM2_SIZE 1
553    
554  /* When UTF-8 encoding is being used, a character is no longer just a single  #define PUT2(a,n,d)   \
555  byte. The macros for character handling generate simple sequences when used in     a[n] = d
556  byte-mode, and more complicated ones for UTF-8 characters. */  
557    #define GET2(a,n) \
558       a[n]
559    
560    #elif defined COMPILE_PCRE32
561    
562    #define IMM2_SIZE 1
563    
564  #ifndef SUPPORT_UTF8  #define PUT2(a,n,d)   \
565       a[n] = d
566    
567    #define GET2(a,n) \
568       a[n]
569    
570    #else
571    #error Unsupported compiling mode
572    #endif /* COMPILE_PCRE[8|16|32] */
573    
574    #define PUT2INC(a,n,d)  PUT2(a,n,d), a += IMM2_SIZE
575    
576    /* The maximum length of a MARK name is currently one data unit; it may be
577    changed in future to be a fixed number of bytes or to depend on LINK_SIZE. */
578    
579    #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
580    #define MAX_MARK ((1u << 16) - 1)
581    #else
582    #define MAX_MARK ((1u << 8) - 1)
583    #endif
584    
585    /* When UTF encoding is being used, a character is no longer just a single
586    byte. The macros for character handling generate simple sequences when used in
587    character-mode, and more complicated ones for UTF characters. GETCHARLENTEST
588    and other macros are not used when UTF is not supported, so they are not
589    defined. To make sure they can never even appear when UTF support is omitted,
590    we don't even define them. */
591    
592    #ifndef SUPPORT_UTF
593    
594    /* #define MAX_VALUE_FOR_SINGLE_CHAR */
595    /* #define HAS_EXTRALEN(c) */
596    /* #define GET_EXTRALEN(c) */
597    /* #define NOT_FIRSTCHAR(c) */
598  #define GETCHAR(c, eptr) c = *eptr;  #define GETCHAR(c, eptr) c = *eptr;
599  #define GETCHARTEST(c, eptr) c = *eptr;  #define GETCHARTEST(c, eptr) c = *eptr;
600  #define GETCHARINC(c, eptr) c = *eptr++;  #define GETCHARINC(c, eptr) c = *eptr++;
601  #define GETCHARINCTEST(c, eptr) c = *eptr++;  #define GETCHARINCTEST(c, eptr) c = *eptr++;
602  #define GETCHARLEN(c, eptr, len) c = *eptr;  #define GETCHARLEN(c, eptr, len) c = *eptr;
603  #define BACKCHAR(eptr)  #define RAWUCHAR(eptr) (*(eptr))
604    #define RAWUCHARINC(eptr) (*(eptr)++)
605    #define RAWUCHARTEST(eptr) (*(eptr))
606    #define RAWUCHARINCTEST(eptr) (*(eptr)++)
607    /* #define GETCHARLENTEST(c, eptr, len) */
608    /* #define BACKCHAR(eptr) */
609    /* #define FORWARDCHAR(eptr) */
610    /* #define ACROSSCHAR(condition, eptr, action) */
611    
612  #else   /* SUPPORT_UTF8 */  #else   /* SUPPORT_UTF */
613    
614  /* Get the next UTF-8 character, not advancing the pointer. This is called when  /* Tests whether the code point needs extra characters to decode. */
 we know we are in UTF-8 mode. */  
615    
616  #define GETCHAR(c, eptr) \  #define HASUTF8EXTRALEN(c) ((c) >= 0xc0)
617    c = *eptr; \  
618    if (c >= 0xc0) \  /* Base macro to pick up the remaining bytes of a UTF-8 character, not
619    advancing the pointer. */
620    
621    #define GETUTF8(c, eptr) \
622        { \
623        if ((c & 0x20) == 0) \
624          c = ((c & 0x1f) << 6) | (eptr[1] & 0x3f); \
625        else if ((c & 0x10) == 0) \
626          c = ((c & 0x0f) << 12) | ((eptr[1] & 0x3f) << 6) | (eptr[2] & 0x3f); \
627        else if ((c & 0x08) == 0) \
628          c = ((c & 0x07) << 18) | ((eptr[1] & 0x3f) << 12) | \
629          ((eptr[2] & 0x3f) << 6) | (eptr[3] & 0x3f); \
630        else if ((c & 0x04) == 0) \
631          c = ((c & 0x03) << 24) | ((eptr[1] & 0x3f) << 18) | \
632              ((eptr[2] & 0x3f) << 12) | ((eptr[3] & 0x3f) << 6) | \
633              (eptr[4] & 0x3f); \
634        else \
635          c = ((c & 0x01) << 30) | ((eptr[1] & 0x3f) << 24) | \
636              ((eptr[2] & 0x3f) << 18) | ((eptr[3] & 0x3f) << 12) | \
637              ((eptr[4] & 0x3f) << 6) | (eptr[5] & 0x3f); \
638        }
639    
640    /* Base macro to pick up the remaining bytes of a UTF-8 character, advancing
641    the pointer. */
642    
643    #define GETUTF8INC(c, eptr) \
644      { \      { \
645      int gcii; \      if ((c & 0x20) == 0) \
646      int gcaa = _pcre_utf8_table4[c & 0x3f];  /* Number of additional bytes */ \        c = ((c & 0x1f) << 6) | (*eptr++ & 0x3f); \
647      int gcss = 6*gcaa; \      else if ((c & 0x10) == 0) \
648      c = (c & _pcre_utf8_table3[gcaa]) << gcss; \        { \
649      for (gcii = 1; gcii <= gcaa; gcii++) \        c = ((c & 0x0f) << 12) | ((*eptr & 0x3f) << 6) | (eptr[1] & 0x3f); \
650          eptr += 2; \
651          } \
652        else if ((c & 0x08) == 0) \
653          { \
654          c = ((c & 0x07) << 18) | ((*eptr & 0x3f) << 12) | \
655              ((eptr[1] & 0x3f) << 6) | (eptr[2] & 0x3f); \
656          eptr += 3; \
657          } \
658        else if ((c & 0x04) == 0) \
659          { \
660          c = ((c & 0x03) << 24) | ((*eptr & 0x3f) << 18) | \
661              ((eptr[1] & 0x3f) << 12) | ((eptr[2] & 0x3f) << 6) | \
662              (eptr[3] & 0x3f); \
663          eptr += 4; \
664          } \
665        else \
666        { \        { \
667        gcss -= 6; \        c = ((c & 0x01) << 30) | ((*eptr & 0x3f) << 24) | \
668        c |= (eptr[gcii] & 0x3f) << gcss; \            ((eptr[1] & 0x3f) << 18) | ((eptr[2] & 0x3f) << 12) | \
669              ((eptr[3] & 0x3f) << 6) | (eptr[4] & 0x3f); \
670          eptr += 5; \
671        } \        } \
672      }      }
673    
674    #if defined COMPILE_PCRE8
675    
676    /* These macros were originally written in the form of loops that used data
677    from the tables whose names start with PRIV(utf8_table). They were rewritten by
678    a user so as not to use loops, because in some environments this gives a
679    significant performance advantage, and it seems never to do any harm. */
680    
681    /* Tells the biggest code point which can be encoded as a single character. */
682    
683    #define MAX_VALUE_FOR_SINGLE_CHAR 127
684    
685    /* Tests whether the code point needs extra characters to decode. */
686    
687    #define HAS_EXTRALEN(c) ((c) >= 0xc0)
688    
689    /* Returns with the additional number of characters if IS_MULTICHAR(c) is TRUE.
690    Otherwise it has an undefined behaviour. */
691    
692    #define GET_EXTRALEN(c) (PRIV(utf8_table4)[(c) & 0x3f])
693    
694    /* Returns TRUE, if the given character is not the first character
695    of a UTF sequence. */
696    
697    #define NOT_FIRSTCHAR(c) (((c) & 0xc0) == 0x80)
698    
699    /* Get the next UTF-8 character, not advancing the pointer. This is called when
700    we know we are in UTF-8 mode. */
701    
702    #define GETCHAR(c, eptr) \
703      c = *eptr; \
704      if (c >= 0xc0) GETUTF8(c, eptr);
705    
706  /* 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
707  pointer. */  pointer. */
708    
709  #define GETCHARTEST(c, eptr) \  #define GETCHARTEST(c, eptr) \
710    c = *eptr; \    c = *eptr; \
711    if (utf8 && c >= 0xc0) \    if (utf && 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; \  
       } \  
     }  
712    
713  /* Get the next UTF-8 character, advancing the pointer. This is called when we  /* Get the next UTF-8 character, advancing the pointer. This is called when we
714  know we are in UTF-8 mode. */  know we are in UTF-8 mode. */
715    
716  #define GETCHARINC(c, eptr) \  #define GETCHARINC(c, eptr) \
717    c = *eptr++; \    c = *eptr++; \
718    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; \  
       } \  
     }  
719    
720  /* 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.
721    This is called when we don't know if we are in UTF-8 mode. */
722    
723  #define GETCHARINCTEST(c, eptr) \  #define GETCHARINCTEST(c, eptr) \
724    c = *eptr++; \    c = *eptr++; \
725    if (utf8 && c >= 0xc0) \    if (utf && c >= 0xc0) GETUTF8INC(c, eptr);
726    
727    /* Base macro to pick up the remaining bytes of a UTF-8 character, not
728    advancing the pointer, incrementing the length. */
729    
730    #define GETUTF8LEN(c, eptr, len) \
731      { \      { \
732      int gcaa = _pcre_utf8_table4[c & 0x3f];  /* Number of additional bytes */ \      if ((c & 0x20) == 0) \
733      int gcss = 6*gcaa; \        { \
734      c = (c & _pcre_utf8_table3[gcaa]) << gcss; \        c = ((c & 0x1f) << 6) | (eptr[1] & 0x3f); \
735      while (gcaa-- > 0) \        len++; \
736          } \
737        else if ((c & 0x10)  == 0) \
738        { \        { \
739        gcss -= 6; \        c = ((c & 0x0f) << 12) | ((eptr[1] & 0x3f) << 6) | (eptr[2] & 0x3f); \
740        c |= (*eptr++ & 0x3f) << gcss; \        len += 2; \
741          } \
742        else if ((c & 0x08)  == 0) \
743          {\
744          c = ((c & 0x07) << 18) | ((eptr[1] & 0x3f) << 12) | \
745              ((eptr[2] & 0x3f) << 6) | (eptr[3] & 0x3f); \
746          len += 3; \
747          } \
748        else if ((c & 0x04)  == 0) \
749          { \
750          c = ((c & 0x03) << 24) | ((eptr[1] & 0x3f) << 18) | \
751              ((eptr[2] & 0x3f) << 12) | ((eptr[3] & 0x3f) << 6) | \
752              (eptr[4] & 0x3f); \
753          len += 4; \
754          } \
755        else \
756          {\
757          c = ((c & 0x01) << 30) | ((eptr[1] & 0x3f) << 24) | \
758              ((eptr[2] & 0x3f) << 18) | ((eptr[3] & 0x3f) << 12) | \
759              ((eptr[4] & 0x3f) << 6) | (eptr[5] & 0x3f); \
760          len += 5; \
761        } \        } \
762      }      }
763    
# Line 396  if there are extra bytes. This is called Line 766  if there are extra bytes. This is called
766    
767  #define GETCHARLEN(c, eptr, len) \  #define GETCHARLEN(c, eptr, len) \
768    c = *eptr; \    c = *eptr; \
769    if (c >= 0xc0) \    if (c >= 0xc0) GETUTF8LEN(c, eptr, len);
770      { \  
771      int gcii; \  /* Get the next UTF-8 character, testing for UTF-8 mode, not advancing the
772      int gcaa = _pcre_utf8_table4[c & 0x3f];  /* Number of additional bytes */ \  pointer, incrementing length if there are extra bytes. This is called when we
773      int gcss = 6*gcaa; \  do not know if we are in UTF-8 mode. */
774      c = (c & _pcre_utf8_table3[gcaa]) << gcss; \  
775      for (gcii = 1; gcii <= gcaa; gcii++) \  #define GETCHARLENTEST(c, eptr, len) \
776        { \    c = *eptr; \
777        gcss -= 6; \    if (utf && c >= 0xc0) GETUTF8LEN(c, eptr, len);
778        c |= (eptr[gcii] & 0x3f) << gcss; \  
779        } \  /* Returns the next uchar, not advancing the pointer. This is called when
780      len += gcaa; \  we know we are in UTF mode. */
781      }  
782    #define RAWUCHAR(eptr) \
783      (*(eptr))
784    
785    /* Returns the next uchar, advancing the pointer. This is called when
786    we know we are in UTF mode. */
787    
788    #define RAWUCHARINC(eptr) \
789      (*((eptr)++))
790    
791    /* Returns the next uchar, testing for UTF mode, and not advancing the
792    pointer. */
793    
794    #define RAWUCHARTEST(eptr) \
795      (*(eptr))
796    
797    /* Returns the next uchar, testing for UTF mode, advancing the
798    pointer. */
799    
800    #define RAWUCHARINCTEST(eptr) \
801      (*((eptr)++))
802    
803  /* 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
804  it is. Called only in UTF-8 mode. */  it is. This is called only in UTF-8 mode - we don't put a test within the macro
805    because almost all calls are already within a block of UTF-8 only code. */
806    
807  #define BACKCHAR(eptr) while((*eptr & 0xc0) == 0x80) eptr--;  #define BACKCHAR(eptr) while((*eptr & 0xc0) == 0x80) eptr--
808    
809  #endif  /* Same as above, just in the other direction. */
810    #define FORWARDCHAR(eptr) while((*eptr & 0xc0) == 0x80) eptr++
811    
812    /* Same as above, but it allows a fully customizable form. */
813    #define ACROSSCHAR(condition, eptr, action) \
814      while((condition) && ((eptr) & 0xc0) == 0x80) action
815    
816  /* In case there is no definition of offsetof() provided - though any proper  #elif defined COMPILE_PCRE16
 Standard C system should have one. */  
817    
818  #ifndef offsetof  /* Tells the biggest code point which can be encoded as a single character. */
 #define offsetof(p_type,field) ((size_t)&(((p_type *)0)->field))  
 #endif  
819    
820    #define MAX_VALUE_FOR_SINGLE_CHAR 65535
821    
822  /* These are the public options that can change during matching. */  /* Tests whether the code point needs extra characters to decode. */
823    
824  #define PCRE_IMS (PCRE_CASELESS|PCRE_MULTILINE|PCRE_DOTALL)  #define HAS_EXTRALEN(c) (((c) & 0xfc00) == 0xd800)
825    
826  /* Private options flags start at the most significant end of the four bytes.  /* Returns with the additional number of characters if IS_MULTICHAR(c) is TRUE.
827  The public options defined in pcre.h start at the least significant end. Make  Otherwise it has an undefined behaviour. */
 sure they don't overlap! The bits are getting a bit scarce now -- when we run  
 out, there is a dummy word in the structure that could be used for the private  
 bits. */  
828    
829  #define PCRE_NOPARTIAL     0x80000000  /* can't use partial with this regex */  #define GET_EXTRALEN(c) 1
 #define PCRE_FIRSTSET      0x40000000  /* first_byte is set */  
 #define PCRE_REQCHSET      0x20000000  /* req_byte is set */  
 #define PCRE_STARTLINE     0x10000000  /* start after \n for multiline */  
 #define PCRE_JCHANGED      0x08000000  /* j option changes within regex */  
830    
831  /* Options for the "extra" block produced by pcre_study(). */  /* Returns TRUE, if the given character is not the first character
832    of a UTF sequence. */
833    
834  #define PCRE_STUDY_MAPPED   0x01     /* a map of starting chars exists */  #define NOT_FIRSTCHAR(c) (((c) & 0xfc00) == 0xdc00)
835    
836    /* Base macro to pick up the low surrogate of a UTF-16 character, not
837    advancing the pointer. */
838    
839    #define GETUTF16(c, eptr) \
840       { c = (((c & 0x3ff) << 10) | (eptr[1] & 0x3ff)) + 0x10000; }
841    
842    /* Get the next UTF-16 character, not advancing the pointer. This is called when
843    we know we are in UTF-16 mode. */
844    
845    #define GETCHAR(c, eptr) \
846      c = *eptr; \
847      if ((c & 0xfc00) == 0xd800) GETUTF16(c, eptr);
848    
849    /* Get the next UTF-16 character, testing for UTF-16 mode, and not advancing the
850    pointer. */
851    
852    #define GETCHARTEST(c, eptr) \
853      c = *eptr; \
854      if (utf && (c & 0xfc00) == 0xd800) GETUTF16(c, eptr);
855    
856    /* Base macro to pick up the low surrogate of a UTF-16 character, advancing
857    the pointer. */
858    
859    #define GETUTF16INC(c, eptr) \
860       { c = (((c & 0x3ff) << 10) | (*eptr++ & 0x3ff)) + 0x10000; }
861    
862    /* Get the next UTF-16 character, advancing the pointer. This is called when we
863    know we are in UTF-16 mode. */
864    
865    #define GETCHARINC(c, eptr) \
866      c = *eptr++; \
867      if ((c & 0xfc00) == 0xd800) GETUTF16INC(c, eptr);
868    
869    /* Get the next character, testing for UTF-16 mode, and advancing the pointer.
870    This is called when we don't know if we are in UTF-16 mode. */
871    
872    #define GETCHARINCTEST(c, eptr) \
873      c = *eptr++; \
874      if (utf && (c & 0xfc00) == 0xd800) GETUTF16INC(c, eptr);
875    
876    /* Base macro to pick up the low surrogate of a UTF-16 character, not
877    advancing the pointer, incrementing the length. */
878    
879    #define GETUTF16LEN(c, eptr, len) \
880       { c = (((c & 0x3ff) << 10) | (eptr[1] & 0x3ff)) + 0x10000; len++; }
881    
882    /* Get the next UTF-16 character, not advancing the pointer, incrementing
883    length if there is a low surrogate. This is called when we know we are in
884    UTF-16 mode. */
885    
886    #define GETCHARLEN(c, eptr, len) \
887      c = *eptr; \
888      if ((c & 0xfc00) == 0xd800) GETUTF16LEN(c, eptr, len);
889    
890    /* Get the next UTF-816character, testing for UTF-16 mode, not advancing the
891    pointer, incrementing length if there is a low surrogate. This is called when
892    we do not know if we are in UTF-16 mode. */
893    
894    #define GETCHARLENTEST(c, eptr, len) \
895      c = *eptr; \
896      if (utf && (c & 0xfc00) == 0xd800) GETUTF16LEN(c, eptr, len);
897    
898    /* Returns the next uchar, not advancing the pointer. This is called when
899    we know we are in UTF mode. */
900    
901    #define RAWUCHAR(eptr) \
902      (*(eptr))
903    
904    /* Returns the next uchar, advancing the pointer. This is called when
905    we know we are in UTF mode. */
906    
907    #define RAWUCHARINC(eptr) \
908      (*((eptr)++))
909    
910    /* Returns the next uchar, testing for UTF mode, and not advancing the
911    pointer. */
912    
913    #define RAWUCHARTEST(eptr) \
914      (*(eptr))
915    
916    /* Returns the next uchar, testing for UTF mode, advancing the
917    pointer. */
918    
919    #define RAWUCHARINCTEST(eptr) \
920      (*((eptr)++))
921    
922    /* If the pointer is not at the start of a character, move it back until
923    it is. This is called only in UTF-16 mode - we don't put a test within the
924    macro because almost all calls are already within a block of UTF-16 only
925    code. */
926    
927    #define BACKCHAR(eptr) if ((*eptr & 0xfc00) == 0xdc00) eptr--
928    
929    /* Same as above, just in the other direction. */
930    #define FORWARDCHAR(eptr) if ((*eptr & 0xfc00) == 0xdc00) eptr++
931    
932    /* Same as above, but it allows a fully customizable form. */
933    #define ACROSSCHAR(condition, eptr, action) \
934      if ((condition) && ((eptr) & 0xfc00) == 0xdc00) action
935    
936    #elif defined COMPILE_PCRE32
937    
938    /* These are trivial for the 32-bit library, since all UTF-32 characters fit
939    into one pcre_uchar unit. */
940    #define MAX_VALUE_FOR_SINGLE_CHAR (0x10ffffu)
941    #define HAS_EXTRALEN(c) (0)
942    #define GET_EXTRALEN(c) (0)
943    #define NOT_FIRSTCHAR(c) (0)
944    
945    /* Get the next UTF-32 character, not advancing the pointer. This is called when
946    we know we are in UTF-32 mode. */
947    
948    #define GETCHAR(c, eptr) \
949      c = *(eptr);
950    
951    /* Get the next UTF-32 character, testing for UTF-32 mode, and not advancing the
952    pointer. */
953    
954    #define GETCHARTEST(c, eptr) \
955      c = *(eptr);
956    
957    /* Get the next UTF-32 character, advancing the pointer. This is called when we
958    know we are in UTF-32 mode. */
959    
960    #define GETCHARINC(c, eptr) \
961      c = *((eptr)++);
962    
963    /* Get the next character, testing for UTF-32 mode, and advancing the pointer.
964    This is called when we don't know if we are in UTF-32 mode. */
965    
966    #define GETCHARINCTEST(c, eptr) \
967      c = *((eptr)++);
968    
969    /* Get the next UTF-32 character, not advancing the pointer, not incrementing
970    length (since all UTF-32 is of length 1). This is called when we know we are in
971    UTF-32 mode. */
972    
973    #define GETCHARLEN(c, eptr, len) \
974      GETCHAR(c, eptr)
975    
976    /* Get the next UTF-32character, testing for UTF-32 mode, not advancing the
977    pointer, not incrementing the length (since all UTF-32 is of length 1).
978    This is called when we do not know if we are in UTF-32 mode. */
979    
980    #define GETCHARLENTEST(c, eptr, len) \
981      GETCHARTEST(c, eptr)
982    
983    /* Returns the next uchar, not advancing the pointer. This is called when
984    we know we are in UTF mode. */
985    
986    #define RAWUCHAR(eptr) \
987      (*(eptr))
988    
989    /* Returns the next uchar, advancing the pointer. This is called when
990    we know we are in UTF mode. */
991    
992    #define RAWUCHARINC(eptr) \
993      (*((eptr)++))
994    
995    /* Returns the next uchar, testing for UTF mode, and not advancing the
996    pointer. */
997    
998    #define RAWUCHARTEST(eptr) \
999      (*(eptr))
1000    
1001    /* Returns the next uchar, testing for UTF mode, advancing the
1002    pointer. */
1003    
1004    #define RAWUCHARINCTEST(eptr) \
1005      (*((eptr)++))
1006    
1007    /* If the pointer is not at the start of a character, move it back until
1008    it is. This is called only in UTF-32 mode - we don't put a test within the
1009    macro because almost all calls are already within a block of UTF-32 only
1010    code.
1011    These are all no-ops since all UTF-32 characters fit into one pcre_uchar. */
1012    
1013    #define BACKCHAR(eptr) do { } while (0)
1014    
1015    /* Same as above, just in the other direction. */
1016    #define FORWARDCHAR(eptr) do { } while (0)
1017    
1018    /* Same as above, but it allows a fully customizable form. */
1019    #define ACROSSCHAR(condition, eptr, action) do { } while (0)
1020    
1021    #else
1022    #error Unsupported compiling mode
1023    #endif /* COMPILE_PCRE[8|16|32] */
1024    
1025    #endif  /* SUPPORT_UTF */
1026    
1027    /* Tests for Unicode horizontal and vertical whitespace characters must check a
1028    number of different values. Using a switch statement for this generates the
1029    fastest code (no loop, no memory access), and there are several places in the
1030    interpreter code where this happens. In order to ensure that all the case lists
1031    remain in step, we use macros so that there is only one place where the lists
1032    are defined.
1033    
1034    These values are also required as lists in pcre_compile.c when processing \h,
1035    \H, \v and \V in a character class. The lists are defined in pcre_tables.c, but
1036    macros that define the values are here so that all the definitions are
1037    together. The lists must be in ascending character order, terminated by
1038    NOTACHAR (which is 0xffffffff).
1039    
1040    Any changes should ensure that the various macros are kept in step with each
1041    other. NOTE: The values also appear in pcre_jit_compile.c. */
1042    
1043    /* ------ ASCII/Unicode environments ------ */
1044    
1045    #ifndef EBCDIC
1046    
1047    #define HSPACE_LIST \
1048      CHAR_HT, CHAR_SPACE, 0xa0, \
1049      0x1680, 0x180e, 0x2000, 0x2001, 0x2002, 0x2003, 0x2004, 0x2005, \
1050      0x2006, 0x2007, 0x2008, 0x2009, 0x200A, 0x202f, 0x205f, 0x3000, \
1051      NOTACHAR
1052    
1053    #define HSPACE_MULTIBYTE_CASES \
1054      case 0x1680:  /* OGHAM SPACE MARK */ \
1055      case 0x180e:  /* MONGOLIAN VOWEL SEPARATOR */ \
1056      case 0x2000:  /* EN QUAD */ \
1057      case 0x2001:  /* EM QUAD */ \
1058      case 0x2002:  /* EN SPACE */ \
1059      case 0x2003:  /* EM SPACE */ \
1060      case 0x2004:  /* THREE-PER-EM SPACE */ \
1061      case 0x2005:  /* FOUR-PER-EM SPACE */ \
1062      case 0x2006:  /* SIX-PER-EM SPACE */ \
1063      case 0x2007:  /* FIGURE SPACE */ \
1064      case 0x2008:  /* PUNCTUATION SPACE */ \
1065      case 0x2009:  /* THIN SPACE */ \
1066      case 0x200A:  /* HAIR SPACE */ \
1067      case 0x202f:  /* NARROW NO-BREAK SPACE */ \
1068      case 0x205f:  /* MEDIUM MATHEMATICAL SPACE */ \
1069      case 0x3000   /* IDEOGRAPHIC SPACE */
1070    
1071    #define HSPACE_BYTE_CASES \
1072      case CHAR_HT: \
1073      case CHAR_SPACE: \
1074      case 0xa0     /* NBSP */
1075    
1076    #define HSPACE_CASES \
1077      HSPACE_BYTE_CASES: \
1078      HSPACE_MULTIBYTE_CASES
1079    
1080    #define VSPACE_LIST \
1081      CHAR_LF, CHAR_VT, CHAR_FF, CHAR_CR, CHAR_NEL, 0x2028, 0x2029, NOTACHAR
1082    
1083    #define VSPACE_MULTIBYTE_CASES \
1084      case 0x2028:    /* LINE SEPARATOR */ \
1085      case 0x2029     /* PARAGRAPH SEPARATOR */
1086    
1087    #define VSPACE_BYTE_CASES \
1088      case CHAR_LF: \
1089      case CHAR_VT: \
1090      case CHAR_FF: \
1091      case CHAR_CR: \
1092      case CHAR_NEL
1093    
1094    #define VSPACE_CASES \
1095      VSPACE_BYTE_CASES: \
1096      VSPACE_MULTIBYTE_CASES
1097    
1098    /* ------ EBCDIC environments ------ */
1099    
1100    #else
1101    #define HSPACE_LIST CHAR_HT, CHAR_SPACE
1102    
1103    #define HSPACE_BYTE_CASES \
1104      case CHAR_HT: \
1105      case CHAR_SPACE
1106    
1107    #define HSPACE_CASES HSPACE_BYTE_CASES
1108    
1109    #ifdef EBCDIC_NL25
1110    #define VSPACE_LIST \
1111      CHAR_VT, CHAR_FF, CHAR_CR, CHAR_NEL, CHAR_LF, NOTACHAR
1112    #else
1113    #define VSPACE_LIST \
1114      CHAR_VT, CHAR_FF, CHAR_CR, CHAR_LF, CHAR_NEL, NOTACHAR
1115    #endif
1116    
1117    #define VSPACE_BYTE_CASES \
1118      case CHAR_LF: \
1119      case CHAR_VT: \
1120      case CHAR_FF: \
1121      case CHAR_CR: \
1122      case CHAR_NEL
1123    
1124    #define VSPACE_CASES VSPACE_BYTE_CASES
1125    #endif  /* EBCDIC */
1126    
1127    /* ------ End of whitespace macros ------ */
1128    
1129    
1130    
1131    /* Private flags containing information about the compiled regex. They used to
1132    live at the top end of the options word, but that got almost full, so they were
1133    moved to a 16-bit flags word - which got almost full, so now they are in a
1134    32-bit flags word. From release 8.00, PCRE_NOPARTIAL is unused, as the
1135    restrictions on partial matching have been lifted. It remains for backwards
1136    compatibility. */
1137    
1138    #define PCRE_MODE8         0x00000001  /* compiled in 8 bit mode */
1139    #define PCRE_MODE16        0x00000002  /* compiled in 16 bit mode */
1140    #define PCRE_MODE32        0x00000004  /* compiled in 32 bit mode */
1141    #define PCRE_FIRSTSET      0x00000010  /* first_char is set */
1142    #define PCRE_FCH_CASELESS  0x00000020  /* caseless first char */
1143    #define PCRE_REQCHSET      0x00000040  /* req_byte is set */
1144    #define PCRE_RCH_CASELESS  0x00000080  /* caseless requested char */
1145    #define PCRE_STARTLINE     0x00000100  /* start after \n for multiline */
1146    #define PCRE_NOPARTIAL     0x00000200  /* can't use partial with this regex */
1147    #define PCRE_JCHANGED      0x00000400  /* j option used in regex */
1148    #define PCRE_HASCRORLF     0x00000800  /* explicit \r or \n in pattern */
1149    #define PCRE_HASTHEN       0x00001000  /* pattern contains (*THEN) */
1150    #define PCRE_MLSET         0x00002000  /* match limit set by regex */
1151    #define PCRE_RLSET         0x00004000  /* recursion limit set by regex */
1152    #define PCRE_MATCH_EMPTY   0x00008000  /* pattern can match empty string */
1153    
1154    #if defined COMPILE_PCRE8
1155    #define PCRE_MODE          PCRE_MODE8
1156    #elif defined COMPILE_PCRE16
1157    #define PCRE_MODE          PCRE_MODE16
1158    #elif defined COMPILE_PCRE32
1159    #define PCRE_MODE          PCRE_MODE32
1160    #endif
1161    #define PCRE_MODE_MASK     (PCRE_MODE8 | PCRE_MODE16 | PCRE_MODE32)
1162    
1163    /* Flags for the "extra" block produced by pcre_study(). */
1164    
1165    #define PCRE_STUDY_MAPPED  0x0001  /* a map of starting chars exists */
1166    #define PCRE_STUDY_MINLEN  0x0002  /* a minimum length field exists */
1167    
1168  /* Masks for identifying the public options that are permitted at compile  /* Masks for identifying the public options that are permitted at compile
1169  time, run time, or study time, respectively. */  time, run time, or study time, respectively. */
1170    
1171  #define PCRE_NEWLINE_BITS (PCRE_NEWLINE_CR|PCRE_NEWLINE_LF|PCRE_NEWLINE_ANY)  #define PCRE_NEWLINE_BITS (PCRE_NEWLINE_CR|PCRE_NEWLINE_LF|PCRE_NEWLINE_ANY| \
1172                               PCRE_NEWLINE_ANYCRLF)
1173    
1174  #define PUBLIC_OPTIONS \  #define PUBLIC_COMPILE_OPTIONS \
1175    (PCRE_CASELESS|PCRE_EXTENDED|PCRE_ANCHORED|PCRE_MULTILINE| \    (PCRE_CASELESS|PCRE_EXTENDED|PCRE_ANCHORED|PCRE_MULTILINE| \
1176     PCRE_DOTALL|PCRE_DOLLAR_ENDONLY|PCRE_EXTRA|PCRE_UNGREEDY|PCRE_UTF8| \     PCRE_DOTALL|PCRE_DOLLAR_ENDONLY|PCRE_EXTRA|PCRE_UNGREEDY|PCRE_UTF8| \
1177     PCRE_NO_AUTO_CAPTURE|PCRE_NO_UTF8_CHECK|PCRE_AUTO_CALLOUT|PCRE_FIRSTLINE| \     PCRE_NO_AUTO_CAPTURE|PCRE_NO_AUTO_POSSESSIFY| \
1178     PCRE_DUPNAMES|PCRE_NEWLINE_BITS)     PCRE_NO_UTF8_CHECK|PCRE_AUTO_CALLOUT|PCRE_FIRSTLINE| \
1179       PCRE_DUPNAMES|PCRE_NEWLINE_BITS|PCRE_BSR_ANYCRLF|PCRE_BSR_UNICODE| \
1180       PCRE_JAVASCRIPT_COMPAT|PCRE_UCP|PCRE_NO_START_OPTIMIZE|PCRE_NEVER_UTF)
1181    
1182  #define PUBLIC_EXEC_OPTIONS \  #define PUBLIC_EXEC_OPTIONS \
1183    (PCRE_ANCHORED|PCRE_NOTBOL|PCRE_NOTEOL|PCRE_NOTEMPTY|PCRE_NO_UTF8_CHECK| \    (PCRE_ANCHORED|PCRE_NOTBOL|PCRE_NOTEOL|PCRE_NOTEMPTY|PCRE_NOTEMPTY_ATSTART| \
1184     PCRE_PARTIAL|PCRE_NEWLINE_BITS)     PCRE_NO_UTF8_CHECK|PCRE_PARTIAL_HARD|PCRE_PARTIAL_SOFT|PCRE_NEWLINE_BITS| \
1185       PCRE_BSR_ANYCRLF|PCRE_BSR_UNICODE|PCRE_NO_START_OPTIMIZE)
1186    
1187  #define PUBLIC_DFA_EXEC_OPTIONS \  #define PUBLIC_DFA_EXEC_OPTIONS \
1188    (PCRE_ANCHORED|PCRE_NOTBOL|PCRE_NOTEOL|PCRE_NOTEMPTY|PCRE_NO_UTF8_CHECK| \    (PCRE_ANCHORED|PCRE_NOTBOL|PCRE_NOTEOL|PCRE_NOTEMPTY|PCRE_NOTEMPTY_ATSTART| \
1189     PCRE_PARTIAL|PCRE_DFA_SHORTEST|PCRE_DFA_RESTART|PCRE_NEWLINE_BITS)     PCRE_NO_UTF8_CHECK|PCRE_PARTIAL_HARD|PCRE_PARTIAL_SOFT|PCRE_DFA_SHORTEST| \
1190       PCRE_DFA_RESTART|PCRE_NEWLINE_BITS|PCRE_BSR_ANYCRLF|PCRE_BSR_UNICODE| \
1191       PCRE_NO_START_OPTIMIZE)
1192    
1193    #define PUBLIC_STUDY_OPTIONS \
1194       (PCRE_STUDY_JIT_COMPILE|PCRE_STUDY_JIT_PARTIAL_SOFT_COMPILE| \
1195        PCRE_STUDY_JIT_PARTIAL_HARD_COMPILE|PCRE_STUDY_EXTRA_NEEDED)
1196    
1197    #define PUBLIC_JIT_EXEC_OPTIONS \
1198       (PCRE_NO_UTF8_CHECK|PCRE_NOTBOL|PCRE_NOTEOL|PCRE_NOTEMPTY|\
1199        PCRE_NOTEMPTY_ATSTART|PCRE_PARTIAL_SOFT|PCRE_PARTIAL_HARD)
1200    
1201  #define PUBLIC_STUDY_OPTIONS 0   /* None defined */  /* Magic number to provide a small check against being handed junk. */
   
 /* Magic number to provide a small check against being handed junk. Also used  
 to detect whether a pattern was compiled on a host of different endianness. */  
1202    
1203  #define MAGIC_NUMBER  0x50435245UL   /* 'PCRE' */  #define MAGIC_NUMBER  0x50435245UL   /* 'PCRE' */
1204    
1205  /* Negative values for the firstchar and reqchar variables */  /* This variable is used to detect a loaded regular expression
1206    in different endianness. */
1207    
1208  #define REQ_UNSET (-2)  #define REVERSED_MAGIC_NUMBER  0x45524350UL   /* 'ERCP' */
 #define REQ_NONE  (-1)  
1209    
1210  /* The maximum remaining length of subject we are prepared to search for a  /* The maximum remaining length of subject we are prepared to search for a
1211  req_byte match. */  req_byte match. */
1212    
1213  #define REQ_BYTE_MAX 1000  #define REQ_BYTE_MAX 1000
1214    
1215  /* Flags added to firstbyte or reqbyte; a "non-literal" item is either a  /* Miscellaneous definitions. The #ifndef is to pacify compiler warnings in
1216  variable-length repeat, or a anything other than literal characters. */  environments where these macros are defined elsewhere. Unfortunately, there
1217    is no way to do the same for the typedef. */
 #define REQ_CASELESS 0x0100    /* indicates caselessness */  
 #define REQ_VARY     0x0200    /* reqbyte followed non-literal item */  
   
 /* Miscellaneous definitions */  
1218    
1219  typedef int BOOL;  typedef int BOOL;
1220    
1221    #ifndef FALSE
1222  #define FALSE   0  #define FALSE   0
1223  #define TRUE    1  #define TRUE    1
1224    #endif
1225    
1226    /* If PCRE is to support UTF-8 on EBCDIC platforms, we cannot use normal
1227    character constants like '*' because the compiler would emit their EBCDIC code,
1228    which is different from their ASCII/UTF-8 code. Instead we define macros for
1229    the characters so that they always use the ASCII/UTF-8 code when UTF-8 support
1230    is enabled. When UTF-8 support is not enabled, the definitions use character
1231    literals. Both character and string versions of each character are needed, and
1232    there are some longer strings as well.
1233    
1234    This means that, on EBCDIC platforms, the PCRE library can handle either
1235    EBCDIC, or UTF-8, but not both. To support both in the same compiled library
1236    would need different lookups depending on whether PCRE_UTF8 was set or not.
1237    This would make it impossible to use characters in switch/case statements,
1238    which would reduce performance. For a theoretical use (which nobody has asked
1239    for) in a minority area (EBCDIC platforms), this is not sensible. Any
1240    application that did need both could compile two versions of the library, using
1241    macros to give the functions distinct names. */
1242    
1243    #ifndef SUPPORT_UTF
1244    
1245    /* UTF-8 support is not enabled; use the platform-dependent character literals
1246    so that PCRE works in both ASCII and EBCDIC environments, but only in non-UTF
1247    mode. Newline characters are problematic in EBCDIC. Though it has CR and LF
1248    characters, a common practice has been to use its NL (0x15) character as the
1249    line terminator in C-like processing environments. However, sometimes the LF
1250    (0x25) character is used instead, according to this Unicode document:
1251    
1252    http://unicode.org/standard/reports/tr13/tr13-5.html
1253    
1254    PCRE defaults EBCDIC NL to 0x15, but has a build-time option to select 0x25
1255    instead. Whichever is *not* chosen is defined as NEL.
1256    
1257    In both ASCII and EBCDIC environments, CHAR_NL and CHAR_LF are synonyms for the
1258    same code point. */
1259    
1260    #ifdef EBCDIC
1261    
1262    #ifndef EBCDIC_NL25
1263    #define CHAR_NL                     '\x15'
1264    #define CHAR_NEL                    '\x25'
1265    #define STR_NL                      "\x15"
1266    #define STR_NEL                     "\x25"
1267    #else
1268    #define CHAR_NL                     '\x25'
1269    #define CHAR_NEL                    '\x15'
1270    #define STR_NL                      "\x25"
1271    #define STR_NEL                     "\x15"
1272    #endif
1273    
1274    #define CHAR_LF                     CHAR_NL
1275    #define STR_LF                      STR_NL
1276    
1277    #define CHAR_ESC                    '\047'
1278    #define CHAR_DEL                    '\007'
1279    #define STR_ESC                     "\047"
1280    #define STR_DEL                     "\007"
1281    
1282    #else  /* Not EBCDIC */
1283    
1284    /* In ASCII/Unicode, linefeed is '\n' and we equate this to NL for
1285    compatibility. NEL is the Unicode newline character; make sure it is
1286    a positive value. */
1287    
1288    #define CHAR_LF                     '\n'
1289    #define CHAR_NL                     CHAR_LF
1290    #define CHAR_NEL                    ((unsigned char)'\x85')
1291    #define CHAR_ESC                    '\033'
1292    #define CHAR_DEL                    '\177'
1293    
1294    #define STR_LF                      "\n"
1295    #define STR_NL                      STR_LF
1296    #define STR_NEL                     "\x85"
1297    #define STR_ESC                     "\033"
1298    #define STR_DEL                     "\177"
1299    
1300    #endif  /* EBCDIC */
1301    
1302    /* The remaining definitions work in both environments. */
1303    
1304    #define CHAR_NULL                   '\0'
1305    #define CHAR_HT                     '\t'
1306    #define CHAR_VT                     '\v'
1307    #define CHAR_FF                     '\f'
1308    #define CHAR_CR                     '\r'
1309    #define CHAR_BS                     '\b'
1310    #define CHAR_BEL                    '\a'
1311    
1312    #define CHAR_SPACE                  ' '
1313    #define CHAR_EXCLAMATION_MARK       '!'
1314    #define CHAR_QUOTATION_MARK         '"'
1315    #define CHAR_NUMBER_SIGN            '#'
1316    #define CHAR_DOLLAR_SIGN            '$'
1317    #define CHAR_PERCENT_SIGN           '%'
1318    #define CHAR_AMPERSAND              '&'
1319    #define CHAR_APOSTROPHE             '\''
1320    #define CHAR_LEFT_PARENTHESIS       '('
1321    #define CHAR_RIGHT_PARENTHESIS      ')'
1322    #define CHAR_ASTERISK               '*'
1323    #define CHAR_PLUS                   '+'
1324    #define CHAR_COMMA                  ','
1325    #define CHAR_MINUS                  '-'
1326    #define CHAR_DOT                    '.'
1327    #define CHAR_SLASH                  '/'
1328    #define CHAR_0                      '0'
1329    #define CHAR_1                      '1'
1330    #define CHAR_2                      '2'
1331    #define CHAR_3                      '3'
1332    #define CHAR_4                      '4'
1333    #define CHAR_5                      '5'
1334    #define CHAR_6                      '6'
1335    #define CHAR_7                      '7'
1336    #define CHAR_8                      '8'
1337    #define CHAR_9                      '9'
1338    #define CHAR_COLON                  ':'
1339    #define CHAR_SEMICOLON              ';'
1340    #define CHAR_LESS_THAN_SIGN         '<'
1341    #define CHAR_EQUALS_SIGN            '='
1342    #define CHAR_GREATER_THAN_SIGN      '>'
1343    #define CHAR_QUESTION_MARK          '?'
1344    #define CHAR_COMMERCIAL_AT          '@'
1345    #define CHAR_A                      'A'
1346    #define CHAR_B                      'B'
1347    #define CHAR_C                      'C'
1348    #define CHAR_D                      'D'
1349    #define CHAR_E                      'E'
1350    #define CHAR_F                      'F'
1351    #define CHAR_G                      'G'
1352    #define CHAR_H                      'H'
1353    #define CHAR_I                      'I'
1354    #define CHAR_J                      'J'
1355    #define CHAR_K                      'K'
1356    #define CHAR_L                      'L'
1357    #define CHAR_M                      'M'
1358    #define CHAR_N                      'N'
1359    #define CHAR_O                      'O'
1360    #define CHAR_P                      'P'
1361    #define CHAR_Q                      'Q'
1362    #define CHAR_R                      'R'
1363    #define CHAR_S                      'S'
1364    #define CHAR_T                      'T'
1365    #define CHAR_U                      'U'
1366    #define CHAR_V                      'V'
1367    #define CHAR_W                      'W'
1368    #define CHAR_X                      'X'
1369    #define CHAR_Y                      'Y'
1370    #define CHAR_Z                      'Z'
1371    #define CHAR_LEFT_SQUARE_BRACKET    '['
1372    #define CHAR_BACKSLASH              '\\'
1373    #define CHAR_RIGHT_SQUARE_BRACKET   ']'
1374    #define CHAR_CIRCUMFLEX_ACCENT      '^'
1375    #define CHAR_UNDERSCORE             '_'
1376    #define CHAR_GRAVE_ACCENT           '`'
1377    #define CHAR_a                      'a'
1378    #define CHAR_b                      'b'
1379    #define CHAR_c                      'c'
1380    #define CHAR_d                      'd'
1381    #define CHAR_e                      'e'
1382    #define CHAR_f                      'f'
1383    #define CHAR_g                      'g'
1384    #define CHAR_h                      'h'
1385    #define CHAR_i                      'i'
1386    #define CHAR_j                      'j'
1387    #define CHAR_k                      'k'
1388    #define CHAR_l                      'l'
1389    #define CHAR_m                      'm'
1390    #define CHAR_n                      'n'
1391    #define CHAR_o                      'o'
1392    #define CHAR_p                      'p'
1393    #define CHAR_q                      'q'
1394    #define CHAR_r                      'r'
1395    #define CHAR_s                      's'
1396    #define CHAR_t                      't'
1397    #define CHAR_u                      'u'
1398    #define CHAR_v                      'v'
1399    #define CHAR_w                      'w'
1400    #define CHAR_x                      'x'
1401    #define CHAR_y                      'y'
1402    #define CHAR_z                      'z'
1403    #define CHAR_LEFT_CURLY_BRACKET     '{'
1404    #define CHAR_VERTICAL_LINE          '|'
1405    #define CHAR_RIGHT_CURLY_BRACKET    '}'
1406    #define CHAR_TILDE                  '~'
1407    
1408    #define STR_HT                      "\t"
1409    #define STR_VT                      "\v"
1410    #define STR_FF                      "\f"
1411    #define STR_CR                      "\r"
1412    #define STR_BS                      "\b"
1413    #define STR_BEL                     "\a"
1414    
1415    #define STR_SPACE                   " "
1416    #define STR_EXCLAMATION_MARK        "!"
1417    #define STR_QUOTATION_MARK          "\""
1418    #define STR_NUMBER_SIGN             "#"
1419    #define STR_DOLLAR_SIGN             "$"
1420    #define STR_PERCENT_SIGN            "%"
1421    #define STR_AMPERSAND               "&"
1422    #define STR_APOSTROPHE              "'"
1423    #define STR_LEFT_PARENTHESIS        "("
1424    #define STR_RIGHT_PARENTHESIS       ")"
1425    #define STR_ASTERISK                "*"
1426    #define STR_PLUS                    "+"
1427    #define STR_COMMA                   ","
1428    #define STR_MINUS                   "-"
1429    #define STR_DOT                     "."
1430    #define STR_SLASH                   "/"
1431    #define STR_0                       "0"
1432    #define STR_1                       "1"
1433    #define STR_2                       "2"
1434    #define STR_3                       "3"
1435    #define STR_4                       "4"
1436    #define STR_5                       "5"
1437    #define STR_6                       "6"
1438    #define STR_7                       "7"
1439    #define STR_8                       "8"
1440    #define STR_9                       "9"
1441    #define STR_COLON                   ":"
1442    #define STR_SEMICOLON               ";"
1443    #define STR_LESS_THAN_SIGN          "<"
1444    #define STR_EQUALS_SIGN             "="
1445    #define STR_GREATER_THAN_SIGN       ">"
1446    #define STR_QUESTION_MARK           "?"
1447    #define STR_COMMERCIAL_AT           "@"
1448    #define STR_A                       "A"
1449    #define STR_B                       "B"
1450    #define STR_C                       "C"
1451    #define STR_D                       "D"
1452    #define STR_E                       "E"
1453    #define STR_F                       "F"
1454    #define STR_G                       "G"
1455    #define STR_H                       "H"
1456    #define STR_I                       "I"
1457    #define STR_J                       "J"
1458    #define STR_K                       "K"
1459    #define STR_L                       "L"
1460    #define STR_M                       "M"
1461    #define STR_N                       "N"
1462    #define STR_O                       "O"
1463    #define STR_P                       "P"
1464    #define STR_Q                       "Q"
1465    #define STR_R                       "R"
1466    #define STR_S                       "S"
1467    #define STR_T                       "T"
1468    #define STR_U                       "U"
1469    #define STR_V                       "V"
1470    #define STR_W                       "W"
1471    #define STR_X                       "X"
1472    #define STR_Y                       "Y"
1473    #define STR_Z                       "Z"
1474    #define STR_LEFT_SQUARE_BRACKET     "["
1475    #define STR_BACKSLASH               "\\"
1476    #define STR_RIGHT_SQUARE_BRACKET    "]"
1477    #define STR_CIRCUMFLEX_ACCENT       "^"
1478    #define STR_UNDERSCORE              "_"
1479    #define STR_GRAVE_ACCENT            "`"
1480    #define STR_a                       "a"
1481    #define STR_b                       "b"
1482    #define STR_c                       "c"
1483    #define STR_d                       "d"
1484    #define STR_e                       "e"
1485    #define STR_f                       "f"
1486    #define STR_g                       "g"
1487    #define STR_h                       "h"
1488    #define STR_i                       "i"
1489    #define STR_j                       "j"
1490    #define STR_k                       "k"
1491    #define STR_l                       "l"
1492    #define STR_m                       "m"
1493    #define STR_n                       "n"
1494    #define STR_o                       "o"
1495    #define STR_p                       "p"
1496    #define STR_q                       "q"
1497    #define STR_r                       "r"
1498    #define STR_s                       "s"
1499    #define STR_t                       "t"
1500    #define STR_u                       "u"
1501    #define STR_v                       "v"
1502    #define STR_w                       "w"
1503    #define STR_x                       "x"
1504    #define STR_y                       "y"
1505    #define STR_z                       "z"
1506    #define STR_LEFT_CURLY_BRACKET      "{"
1507    #define STR_VERTICAL_LINE           "|"
1508    #define STR_RIGHT_CURLY_BRACKET     "}"
1509    #define STR_TILDE                   "~"
1510    
1511    #define STRING_ACCEPT0              "ACCEPT\0"
1512    #define STRING_COMMIT0              "COMMIT\0"
1513    #define STRING_F0                   "F\0"
1514    #define STRING_FAIL0                "FAIL\0"
1515    #define STRING_MARK0                "MARK\0"
1516    #define STRING_PRUNE0               "PRUNE\0"
1517    #define STRING_SKIP0                "SKIP\0"
1518    #define STRING_THEN                 "THEN"
1519    
1520    #define STRING_alpha0               "alpha\0"
1521    #define STRING_lower0               "lower\0"
1522    #define STRING_upper0               "upper\0"
1523    #define STRING_alnum0               "alnum\0"
1524    #define STRING_ascii0               "ascii\0"
1525    #define STRING_blank0               "blank\0"
1526    #define STRING_cntrl0               "cntrl\0"
1527    #define STRING_digit0               "digit\0"
1528    #define STRING_graph0               "graph\0"
1529    #define STRING_print0               "print\0"
1530    #define STRING_punct0               "punct\0"
1531    #define STRING_space0               "space\0"
1532    #define STRING_word0                "word\0"
1533    #define STRING_xdigit               "xdigit"
1534    
1535    #define STRING_DEFINE               "DEFINE"
1536    
1537    #define STRING_CR_RIGHTPAR             "CR)"
1538    #define STRING_LF_RIGHTPAR             "LF)"
1539    #define STRING_CRLF_RIGHTPAR           "CRLF)"
1540    #define STRING_ANY_RIGHTPAR            "ANY)"
1541    #define STRING_ANYCRLF_RIGHTPAR        "ANYCRLF)"
1542    #define STRING_BSR_ANYCRLF_RIGHTPAR    "BSR_ANYCRLF)"
1543    #define STRING_BSR_UNICODE_RIGHTPAR    "BSR_UNICODE)"
1544    #define STRING_UTF8_RIGHTPAR           "UTF8)"
1545    #define STRING_UTF16_RIGHTPAR          "UTF16)"
1546    #define STRING_UTF32_RIGHTPAR          "UTF32)"
1547    #define STRING_UTF_RIGHTPAR            "UTF)"
1548    #define STRING_UCP_RIGHTPAR            "UCP)"
1549    #define STRING_NO_START_OPT_RIGHTPAR   "NO_START_OPT)"
1550    #define STRING_LIMIT_MATCH_EQ          "LIMIT_MATCH="
1551    #define STRING_LIMIT_RECURSION_EQ      "LIMIT_RECURSION="
1552    
1553    #else  /* SUPPORT_UTF */
1554    
1555    /* UTF-8 support is enabled; always use UTF-8 (=ASCII) character codes. This
1556    works in both modes non-EBCDIC platforms, and on EBCDIC platforms in UTF-8 mode
1557    only. */
1558    
1559    #define CHAR_HT                     '\011'
1560    #define CHAR_VT                     '\013'
1561    #define CHAR_FF                     '\014'
1562    #define CHAR_CR                     '\015'
1563    #define CHAR_LF                     '\012'
1564    #define CHAR_NL                     CHAR_LF
1565    #define CHAR_NEL                    ((unsigned char)'\x85')
1566    #define CHAR_BS                     '\010'
1567    #define CHAR_BEL                    '\007'
1568    #define CHAR_ESC                    '\033'
1569    #define CHAR_DEL                    '\177'
1570    
1571    #define CHAR_NULL                   '\0'
1572    #define CHAR_SPACE                  '\040'
1573    #define CHAR_EXCLAMATION_MARK       '\041'
1574    #define CHAR_QUOTATION_MARK         '\042'
1575    #define CHAR_NUMBER_SIGN            '\043'
1576    #define CHAR_DOLLAR_SIGN            '\044'
1577    #define CHAR_PERCENT_SIGN           '\045'
1578    #define CHAR_AMPERSAND              '\046'
1579    #define CHAR_APOSTROPHE             '\047'
1580    #define CHAR_LEFT_PARENTHESIS       '\050'
1581    #define CHAR_RIGHT_PARENTHESIS      '\051'
1582    #define CHAR_ASTERISK               '\052'
1583    #define CHAR_PLUS                   '\053'
1584    #define CHAR_COMMA                  '\054'
1585    #define CHAR_MINUS                  '\055'
1586    #define CHAR_DOT                    '\056'
1587    #define CHAR_SLASH                  '\057'
1588    #define CHAR_0                      '\060'
1589    #define CHAR_1                      '\061'
1590    #define CHAR_2                      '\062'
1591    #define CHAR_3                      '\063'
1592    #define CHAR_4                      '\064'
1593    #define CHAR_5                      '\065'
1594    #define CHAR_6                      '\066'
1595    #define CHAR_7                      '\067'
1596    #define CHAR_8                      '\070'
1597    #define CHAR_9                      '\071'
1598    #define CHAR_COLON                  '\072'
1599    #define CHAR_SEMICOLON              '\073'
1600    #define CHAR_LESS_THAN_SIGN         '\074'
1601    #define CHAR_EQUALS_SIGN            '\075'
1602    #define CHAR_GREATER_THAN_SIGN      '\076'
1603    #define CHAR_QUESTION_MARK          '\077'
1604    #define CHAR_COMMERCIAL_AT          '\100'
1605    #define CHAR_A                      '\101'
1606    #define CHAR_B                      '\102'
1607    #define CHAR_C                      '\103'
1608    #define CHAR_D                      '\104'
1609    #define CHAR_E                      '\105'
1610    #define CHAR_F                      '\106'
1611    #define CHAR_G                      '\107'
1612    #define CHAR_H                      '\110'
1613    #define CHAR_I                      '\111'
1614    #define CHAR_J                      '\112'
1615    #define CHAR_K                      '\113'
1616    #define CHAR_L                      '\114'
1617    #define CHAR_M                      '\115'
1618    #define CHAR_N                      '\116'
1619    #define CHAR_O                      '\117'
1620    #define CHAR_P                      '\120'
1621    #define CHAR_Q                      '\121'
1622    #define CHAR_R                      '\122'
1623    #define CHAR_S                      '\123'
1624    #define CHAR_T                      '\124'
1625    #define CHAR_U                      '\125'
1626    #define CHAR_V                      '\126'
1627    #define CHAR_W                      '\127'
1628    #define CHAR_X                      '\130'
1629    #define CHAR_Y                      '\131'
1630    #define CHAR_Z                      '\132'
1631    #define CHAR_LEFT_SQUARE_BRACKET    '\133'
1632    #define CHAR_BACKSLASH              '\134'
1633    #define CHAR_RIGHT_SQUARE_BRACKET   '\135'
1634    #define CHAR_CIRCUMFLEX_ACCENT      '\136'
1635    #define CHAR_UNDERSCORE             '\137'
1636    #define CHAR_GRAVE_ACCENT           '\140'
1637    #define CHAR_a                      '\141'
1638    #define CHAR_b                      '\142'
1639    #define CHAR_c                      '\143'
1640    #define CHAR_d                      '\144'
1641    #define CHAR_e                      '\145'
1642    #define CHAR_f                      '\146'
1643    #define CHAR_g                      '\147'
1644    #define CHAR_h                      '\150'
1645    #define CHAR_i                      '\151'
1646    #define CHAR_j                      '\152'
1647    #define CHAR_k                      '\153'
1648    #define CHAR_l                      '\154'
1649    #define CHAR_m                      '\155'
1650    #define CHAR_n                      '\156'
1651    #define CHAR_o                      '\157'
1652    #define CHAR_p                      '\160'
1653    #define CHAR_q                      '\161'
1654    #define CHAR_r                      '\162'
1655    #define CHAR_s                      '\163'
1656    #define CHAR_t                      '\164'
1657    #define CHAR_u                      '\165'
1658    #define CHAR_v                      '\166'
1659    #define CHAR_w                      '\167'
1660    #define CHAR_x                      '\170'
1661    #define CHAR_y                      '\171'
1662    #define CHAR_z                      '\172'
1663    #define CHAR_LEFT_CURLY_BRACKET     '\173'
1664    #define CHAR_VERTICAL_LINE          '\174'
1665    #define CHAR_RIGHT_CURLY_BRACKET    '\175'
1666    #define CHAR_TILDE                  '\176'
1667    
1668    #define STR_HT                      "\011"
1669    #define STR_VT                      "\013"
1670    #define STR_FF                      "\014"
1671    #define STR_CR                      "\015"
1672    #define STR_NL                      "\012"
1673    #define STR_BS                      "\010"
1674    #define STR_BEL                     "\007"
1675    #define STR_ESC                     "\033"
1676    #define STR_DEL                     "\177"
1677    
1678    #define STR_SPACE                   "\040"
1679    #define STR_EXCLAMATION_MARK        "\041"
1680    #define STR_QUOTATION_MARK          "\042"
1681    #define STR_NUMBER_SIGN             "\043"
1682    #define STR_DOLLAR_SIGN             "\044"
1683    #define STR_PERCENT_SIGN            "\045"
1684    #define STR_AMPERSAND               "\046"
1685    #define STR_APOSTROPHE              "\047"
1686    #define STR_LEFT_PARENTHESIS        "\050"
1687    #define STR_RIGHT_PARENTHESIS       "\051"
1688    #define STR_ASTERISK                "\052"
1689    #define STR_PLUS                    "\053"
1690    #define STR_COMMA                   "\054"
1691    #define STR_MINUS                   "\055"
1692    #define STR_DOT                     "\056"
1693    #define STR_SLASH                   "\057"
1694    #define STR_0                       "\060"
1695    #define STR_1                       "\061"
1696    #define STR_2                       "\062"
1697    #define STR_3                       "\063"
1698    #define STR_4                       "\064"
1699    #define STR_5                       "\065"
1700    #define STR_6                       "\066"
1701    #define STR_7                       "\067"
1702    #define STR_8                       "\070"
1703    #define STR_9                       "\071"
1704    #define STR_COLON                   "\072"
1705    #define STR_SEMICOLON               "\073"
1706    #define STR_LESS_THAN_SIGN          "\074"
1707    #define STR_EQUALS_SIGN             "\075"
1708    #define STR_GREATER_THAN_SIGN       "\076"
1709    #define STR_QUESTION_MARK           "\077"
1710    #define STR_COMMERCIAL_AT           "\100"
1711    #define STR_A                       "\101"
1712    #define STR_B                       "\102"
1713    #define STR_C                       "\103"
1714    #define STR_D                       "\104"
1715    #define STR_E                       "\105"
1716    #define STR_F                       "\106"
1717    #define STR_G                       "\107"
1718    #define STR_H                       "\110"
1719    #define STR_I                       "\111"
1720    #define STR_J                       "\112"
1721    #define STR_K                       "\113"
1722    #define STR_L                       "\114"
1723    #define STR_M                       "\115"
1724    #define STR_N                       "\116"
1725    #define STR_O                       "\117"
1726    #define STR_P                       "\120"
1727    #define STR_Q                       "\121"
1728    #define STR_R                       "\122"
1729    #define STR_S                       "\123"
1730    #define STR_T                       "\124"
1731    #define STR_U                       "\125"
1732    #define STR_V                       "\126"
1733    #define STR_W                       "\127"
1734    #define STR_X                       "\130"
1735    #define STR_Y                       "\131"
1736    #define STR_Z                       "\132"
1737    #define STR_LEFT_SQUARE_BRACKET     "\133"
1738    #define STR_BACKSLASH               "\134"
1739    #define STR_RIGHT_SQUARE_BRACKET    "\135"
1740    #define STR_CIRCUMFLEX_ACCENT       "\136"
1741    #define STR_UNDERSCORE              "\137"
1742    #define STR_GRAVE_ACCENT            "\140"
1743    #define STR_a                       "\141"
1744    #define STR_b                       "\142"
1745    #define STR_c                       "\143"
1746    #define STR_d                       "\144"
1747    #define STR_e                       "\145"
1748    #define STR_f                       "\146"
1749    #define STR_g                       "\147"
1750    #define STR_h                       "\150"
1751    #define STR_i                       "\151"
1752    #define STR_j                       "\152"
1753    #define STR_k                       "\153"
1754    #define STR_l                       "\154"
1755    #define STR_m                       "\155"
1756    #define STR_n                       "\156"
1757    #define STR_o                       "\157"
1758    #define STR_p                       "\160"
1759    #define STR_q                       "\161"
1760    #define STR_r                       "\162"
1761    #define STR_s                       "\163"
1762    #define STR_t                       "\164"
1763    #define STR_u                       "\165"
1764    #define STR_v                       "\166"
1765    #define STR_w                       "\167"
1766    #define STR_x                       "\170"
1767    #define STR_y                       "\171"
1768    #define STR_z                       "\172"
1769    #define STR_LEFT_CURLY_BRACKET      "\173"
1770    #define STR_VERTICAL_LINE           "\174"
1771    #define STR_RIGHT_CURLY_BRACKET     "\175"
1772    #define STR_TILDE                   "\176"
1773    
1774    #define STRING_ACCEPT0              STR_A STR_C STR_C STR_E STR_P STR_T "\0"
1775    #define STRING_COMMIT0              STR_C STR_O STR_M STR_M STR_I STR_T "\0"
1776    #define STRING_F0                   STR_F "\0"
1777    #define STRING_FAIL0                STR_F STR_A STR_I STR_L "\0"
1778    #define STRING_MARK0                STR_M STR_A STR_R STR_K "\0"
1779    #define STRING_PRUNE0               STR_P STR_R STR_U STR_N STR_E "\0"
1780    #define STRING_SKIP0                STR_S STR_K STR_I STR_P "\0"
1781    #define STRING_THEN                 STR_T STR_H STR_E STR_N
1782    
1783    #define STRING_alpha0               STR_a STR_l STR_p STR_h STR_a "\0"
1784    #define STRING_lower0               STR_l STR_o STR_w STR_e STR_r "\0"
1785    #define STRING_upper0               STR_u STR_p STR_p STR_e STR_r "\0"
1786    #define STRING_alnum0               STR_a STR_l STR_n STR_u STR_m "\0"
1787    #define STRING_ascii0               STR_a STR_s STR_c STR_i STR_i "\0"
1788    #define STRING_blank0               STR_b STR_l STR_a STR_n STR_k "\0"
1789    #define STRING_cntrl0               STR_c STR_n STR_t STR_r STR_l "\0"
1790    #define STRING_digit0               STR_d STR_i STR_g STR_i STR_t "\0"
1791    #define STRING_graph0               STR_g STR_r STR_a STR_p STR_h "\0"
1792    #define STRING_print0               STR_p STR_r STR_i STR_n STR_t "\0"
1793    #define STRING_punct0               STR_p STR_u STR_n STR_c STR_t "\0"
1794    #define STRING_space0               STR_s STR_p STR_a STR_c STR_e "\0"
1795    #define STRING_word0                STR_w STR_o STR_r STR_d       "\0"
1796    #define STRING_xdigit               STR_x STR_d STR_i STR_g STR_i STR_t
1797    
1798    #define STRING_DEFINE               STR_D STR_E STR_F STR_I STR_N STR_E
1799    
1800    #define STRING_CR_RIGHTPAR             STR_C STR_R STR_RIGHT_PARENTHESIS
1801    #define STRING_LF_RIGHTPAR             STR_L STR_F STR_RIGHT_PARENTHESIS
1802    #define STRING_CRLF_RIGHTPAR           STR_C STR_R STR_L STR_F STR_RIGHT_PARENTHESIS
1803    #define STRING_ANY_RIGHTPAR            STR_A STR_N STR_Y STR_RIGHT_PARENTHESIS
1804    #define STRING_ANYCRLF_RIGHTPAR        STR_A STR_N STR_Y STR_C STR_R STR_L STR_F STR_RIGHT_PARENTHESIS
1805    #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
1806    #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
1807    #define STRING_UTF8_RIGHTPAR           STR_U STR_T STR_F STR_8 STR_RIGHT_PARENTHESIS
1808    #define STRING_UTF16_RIGHTPAR          STR_U STR_T STR_F STR_1 STR_6 STR_RIGHT_PARENTHESIS
1809    #define STRING_UTF32_RIGHTPAR          STR_U STR_T STR_F STR_3 STR_2 STR_RIGHT_PARENTHESIS
1810    #define STRING_UTF_RIGHTPAR            STR_U STR_T STR_F STR_RIGHT_PARENTHESIS
1811    #define STRING_UCP_RIGHTPAR            STR_U STR_C STR_P STR_RIGHT_PARENTHESIS
1812    #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
1813    #define STRING_LIMIT_MATCH_EQ          STR_L STR_I STR_M STR_I STR_T STR_UNDERSCORE STR_M STR_A STR_T STR_C STR_H STR_EQUALS_SIGN
1814    #define STRING_LIMIT_RECURSION_EQ      STR_L STR_I STR_M STR_I STR_T STR_UNDERSCORE STR_R STR_E STR_C STR_U STR_R STR_S STR_I STR_O STR_N STR_EQUALS_SIGN
1815    
1816    #endif  /* SUPPORT_UTF */
1817    
1818  /* Escape items that are just an encoding of a particular data value. */  /* Escape items that are just an encoding of a particular data value. */
1819    
1820  #ifndef ESC_e  #ifndef ESC_e
1821  #define ESC_e 27  #define ESC_e CHAR_ESC
1822  #endif  #endif
1823    
1824  #ifndef ESC_f  #ifndef ESC_f
1825  #define ESC_f '\f'  #define ESC_f CHAR_FF
1826  #endif  #endif
1827    
1828  #ifndef ESC_n  #ifndef ESC_n
1829  #define ESC_n '\n'  #define ESC_n CHAR_LF
1830  #endif  #endif
1831    
1832  #ifndef ESC_r  #ifndef ESC_r
1833  #define ESC_r '\r'  #define ESC_r CHAR_CR
1834  #endif  #endif
1835    
1836  /* We can't officially use ESC_t because it is a POSIX reserved identifier  /* We can't officially use ESC_t because it is a POSIX reserved identifier
1837  (presumably because of all the others like size_t). */  (presumably because of all the others like size_t). */
1838    
1839  #ifndef ESC_tee  #ifndef ESC_tee
1840  #define ESC_tee '\t'  #define ESC_tee CHAR_HT
1841  #endif  #endif
1842    
1843  /* Codes for different types of Unicode property */  /* Codes for different types of Unicode property */
1844    
1845  #define PT_ANY        0    /* Any property - matches all chars */  #define PT_ANY        0    /* Any property - matches all chars */
1846  #define PT_LAMP       1    /* L& - the union of Lu, Ll, Lt */  #define PT_LAMP       1    /* L& - the union of Lu, Ll, Lt */
1847  #define PT_GC         2    /* General characteristic (e.g. L) */  #define PT_GC         2    /* Specified general characteristic (e.g. L) */
1848  #define PT_PC         3    /* Particular characteristic (e.g. Lu) */  #define PT_PC         3    /* Specified particular characteristic (e.g. Lu) */
1849  #define PT_SC         4    /* Script (e.g. Han) */  #define PT_SC         4    /* Script (e.g. Han) */
1850    #define PT_ALNUM      5    /* Alphanumeric - the union of L and N */
1851    #define PT_SPACE      6    /* Perl space - Z plus 9,10,12,13 */
1852    #define PT_PXSPACE    7    /* POSIX space - Z plus 9,10,11,12,13 */
1853    #define PT_WORD       8    /* Word - L plus N plus underscore */
1854    #define PT_CLIST      9    /* Pseudo-property: match character list */
1855    #define PT_UCNC      10    /* Universal Character nameable character */
1856    #define PT_TABSIZE   11    /* Size of square table for autopossessify tests */
1857    
1858    /* The following special properties are used only in XCLASS items, when POSIX
1859    classes are specified and PCRE_UCP is set - in other words, for Unicode
1860    handling of these classes. They are not available via the \p or \P escapes like
1861    those in the above list, and so they do not take part in the autopossessifying
1862    table. */
1863    
1864    #define PT_PXGRAPH   11    /* [:graph:] - characters that mark the paper */
1865    #define PT_PXPRINT   12    /* [:print:] - [:graph:] plus non-control spaces */
1866    #define PT_PXPUNCT   13    /* [:punct:] - punctuation characters */
1867    
1868  /* 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
1869  contain UTF-8 characters with values greater than 255. */  contain characters with values greater than 255. */
1870    
1871  #define XCL_NOT    0x01    /* Flag: this is a negative class */  #define XCL_NOT    0x01    /* Flag: this is a negative class */
1872  #define XCL_MAP    0x02    /* Flag: a 32-byte map is present */  #define XCL_MAP    0x02    /* Flag: a 32-byte map is present */
# Line 541  contain UTF-8 characters with values gre Line 1878  contain UTF-8 characters with values gre
1878  #define XCL_NOTPROP   4    /* Unicode inverted property (ditto) */  #define XCL_NOTPROP   4    /* Unicode inverted property (ditto) */
1879    
1880  /* 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
1881  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 0
1882  their negation. Also, they must appear in the same order as in the opcode  for a data character.  Also, they must appear in the same order as in the
1883  definitions below, up to ESC_z. There's a dummy for OP_ANY because it  opcode definitions below, up to ESC_z. There's a dummy for OP_ALLANY because it
1884  corresponds to "." rather than an escape sequence. The final one must be  corresponds to "." in DOTALL mode rather than an escape sequence. It is also
1885  ESC_REF as subsequent values are used for backreferences (\1, \2, \3, etc).  used for [^] in JavaScript compatibility mode, and for \C in non-utf mode. In
1886  There are two tests in the code for an escape greater than ESC_b and less than  non-DOTALL mode, "." behaves like \N.
1887  ESC_Z to detect the types that may be repeated. These are the types that  
1888  consume characters. If any new escapes are put in between that don't consume a  The special values ESC_DU, ESC_du, etc. are used instead of ESC_D, ESC_d, etc.
1889  character, that code will have to change. */  when PCRE_UCP is set and replacement of \d etc by \p sequences is required.
1890    They must be contiguous, and remain in order so that the replacements can be
1891  enum { ESC_A = 1, ESC_G, ESC_B, ESC_b, ESC_D, ESC_d, ESC_S, ESC_s, ESC_W,  looked up from a table.
1892         ESC_w, ESC_dum1, ESC_C, ESC_P, ESC_p, ESC_R, ESC_X, ESC_Z, ESC_z,  
1893         ESC_E, ESC_Q, ESC_k, ESC_REF };  Negative numbers are used to encode a backreference (\1, \2, \3, etc.) in
1894    check_escape(). There are two tests in the code for an escape
1895    greater than ESC_b and less than ESC_Z to detect the types that may be
1896  /* Opcode table: OP_BRA must be last, as all values >= it are used for brackets  repeated. These are the types that consume characters. If any new escapes are
1897  that extract substrings. Starting from 1 (i.e. after OP_END), the values up to  put in between that don't consume a character, that code will have to change.
1898  OP_EOD must correspond in order to the list of escapes immediately above.  */
1899    
1900  To keep stored, compiled patterns compatible, new opcodes should be added  enum { ESC_A = 1, ESC_G, ESC_K, ESC_B, ESC_b, ESC_D, ESC_d, ESC_S, ESC_s,
1901  immediately before OP_BRA, where (since release 7.0) a gap is left for this         ESC_W, ESC_w, ESC_N, ESC_dum, ESC_C, ESC_P, ESC_p, ESC_R, ESC_H,
1902  purpose.         ESC_h, ESC_V, ESC_v, ESC_X, ESC_Z, ESC_z,
1903           ESC_E, ESC_Q, ESC_g, ESC_k,
1904  *** NOTE NOTE NOTE *** Whenever this list is updated, the two macro definitions         ESC_DU, ESC_du, ESC_SU, ESC_su, ESC_WU, ESC_wu };
1905  that follow must also be updated to match. There is also a table called  
1906  "coptable" in pcre_dfa_exec.c that must be updated. */  
1907    /********************** Opcode definitions ******************/
1908    
1909    /****** NOTE NOTE NOTE ******
1910    
1911    Starting from 1 (i.e. after OP_END), the values up to OP_EOD must correspond in
1912    order to the list of escapes immediately above. Furthermore, values up to
1913    OP_DOLLM must not be changed without adjusting the table called autoposstab in
1914    pcre_compile.c
1915    
1916    Whenever this list is updated, the two macro definitions that follow must be
1917    updated to match. The possessification table called "opcode_possessify" in
1918    pcre_compile.c must also be updated, and also the tables called "coptable"
1919    and "poptable" in pcre_dfa_exec.c.
1920    
1921    ****** NOTE NOTE NOTE ******/
1922    
1923    
1924    /* The values between FIRST_AUTOTAB_OP and LAST_AUTOTAB_RIGHT_OP, inclusive,
1925    are used in a table for deciding whether a repeated character type can be
1926    auto-possessified. */
1927    
1928    #define FIRST_AUTOTAB_OP       OP_NOT_DIGIT
1929    #define LAST_AUTOTAB_LEFT_OP   OP_EXTUNI
1930    #define LAST_AUTOTAB_RIGHT_OP  OP_DOLLM
1931    
1932  enum {  enum {
1933    OP_END,            /* 0 End of pattern */    OP_END,            /* 0 End of pattern */
# Line 575  enum { Line 1936  enum {
1936    
1937    OP_SOD,            /* 1 Start of data: \A */    OP_SOD,            /* 1 Start of data: \A */
1938    OP_SOM,            /* 2 Start of match (subject + offset): \G */    OP_SOM,            /* 2 Start of match (subject + offset): \G */
1939    OP_NOT_WORD_BOUNDARY,  /*  3 \B */    OP_SET_SOM,        /* 3 Set start of match (\K) */
1940    OP_WORD_BOUNDARY,      /*  4 \b */    OP_NOT_WORD_BOUNDARY,  /*  4 \B */
1941    OP_NOT_DIGIT,          /*  5 \D */    OP_WORD_BOUNDARY,      /*  5 \b */
1942    OP_DIGIT,              /*  6 \d */    OP_NOT_DIGIT,          /*  6 \D */
1943    OP_NOT_WHITESPACE,     /*  7 \S */    OP_DIGIT,              /*  7 \d */
1944    OP_WHITESPACE,         /*  8 \s */    OP_NOT_WHITESPACE,     /*  8 \S */
1945    OP_NOT_WORDCHAR,       /*  9 \W */    OP_WHITESPACE,         /*  9 \s */
1946    OP_WORDCHAR,           /* 10 \w */    OP_NOT_WORDCHAR,       /* 10 \W */
1947    OP_ANY,            /* 11 Match any character */    OP_WORDCHAR,           /* 11 \w */
1948    OP_ANYBYTE,        /* 12 Match any byte (\C); different to OP_ANY for UTF-8 */  
1949    OP_NOTPROP,        /* 13 \P (not Unicode property) */    OP_ANY,            /* 12 Match any character except newline (\N) */
1950    OP_PROP,           /* 14 \p (Unicode property) */    OP_ALLANY,         /* 13 Match any character */
1951    OP_ANYNL,          /* 15 \R (any newline sequence) */    OP_ANYBYTE,        /* 14 Match any byte (\C); different to OP_ANY for UTF-8 */
1952    OP_EXTUNI,         /* 16 \X (extended Unicode sequence */    OP_NOTPROP,        /* 15 \P (not Unicode property) */
1953    OP_EODN,           /* 17 End of data or \n at end of data: \Z. */    OP_PROP,           /* 16 \p (Unicode property) */
1954    OP_EOD,            /* 18 End of data: \z */    OP_ANYNL,          /* 17 \R (any newline sequence) */
1955      OP_NOT_HSPACE,     /* 18 \H (not horizontal whitespace) */
1956    OP_OPT,            /* 19 Set runtime options */    OP_HSPACE,         /* 19 \h (horizontal whitespace) */
1957    OP_CIRC,           /* 20 Start of line - varies with multiline switch */    OP_NOT_VSPACE,     /* 20 \V (not vertical whitespace) */
1958    OP_DOLL,           /* 21 End of line - varies with multiline switch */    OP_VSPACE,         /* 21 \v (vertical whitespace) */
1959    OP_CHAR,           /* 22 Match one character, casefully */    OP_EXTUNI,         /* 22 \X (extended Unicode sequence */
1960    OP_CHARNC,         /* 23 Match one character, caselessly */    OP_EODN,           /* 23 End of data or \n at end of data (\Z) */
1961    OP_NOT,            /* 24 Match one character, not the following one */    OP_EOD,            /* 24 End of data (\z) */
1962    
1963    OP_STAR,           /* 25 The maximizing and minimizing versions of */    /* Line end assertions */
1964    OP_MINSTAR,        /* 26 these six opcodes must come in pairs, with */  
1965    OP_PLUS,           /* 27 the minimizing one second. */    OP_DOLL,           /* 25 End of line - not multiline */
1966    OP_MINPLUS,        /* 28 This first set applies to single characters.*/    OP_DOLLM,          /* 26 End of line - multiline */
1967    OP_QUERY,          /* 29 */    OP_CIRC,           /* 27 Start of line - not multiline */
1968    OP_MINQUERY,       /* 30 */    OP_CIRCM,          /* 28 Start of line - multiline */
1969    
1970    OP_UPTO,           /* 31 From 0 to n matches */    /* Single characters; caseful must precede the caseless ones */
1971    OP_MINUPTO,        /* 32 */  
1972    OP_EXACT,          /* 33 Exactly n matches */    OP_CHAR,           /* 29 Match one character, casefully */
1973      OP_CHARI,          /* 30 Match one character, caselessly */
1974    OP_POSSTAR,        /* 34 Possessified star */    OP_NOT,            /* 31 Match one character, not the given one, casefully */
1975    OP_POSPLUS,        /* 35 Possessified plus */    OP_NOTI,           /* 32 Match one character, not the given one, caselessly */
1976    OP_POSQUERY,       /* 36 Posesssified query */  
1977    OP_POSUPTO,        /* 37 Possessified upto */    /* The following sets of 13 opcodes must always be kept in step because
1978      the offset from the first one is used to generate the others. */
1979    OP_NOTSTAR,        /* 38 The maximizing and minimizing versions of */  
1980    OP_NOTMINSTAR,     /* 39 these six opcodes must come in pairs, with */    /* Repeated characters; caseful must precede the caseless ones */
1981    OP_NOTPLUS,        /* 40 the minimizing one second. They must be in */  
1982    OP_NOTMINPLUS,     /* 41 exactly the same order as those above. */    OP_STAR,           /* 33 The maximizing and minimizing versions of */
1983    OP_NOTQUERY,       /* 42 This set applies to "not" single characters. */    OP_MINSTAR,        /* 34 these six opcodes must come in pairs, with */
1984    OP_NOTMINQUERY,    /* 43 */    OP_PLUS,           /* 35 the minimizing one second. */
1985      OP_MINPLUS,        /* 36 */
1986    OP_NOTUPTO,        /* 44 From 0 to n matches */    OP_QUERY,          /* 37 */
1987    OP_NOTMINUPTO,     /* 45 */    OP_MINQUERY,       /* 38 */
1988    OP_NOTEXACT,       /* 46 Exactly n matches */  
1989      OP_UPTO,           /* 39 From 0 to n matches of one character, caseful*/
1990    OP_NOTPOSSTAR,     /* 47 Possessified versions */    OP_MINUPTO,        /* 40 */
1991    OP_NOTPOSPLUS,     /* 48 */    OP_EXACT,          /* 41 Exactly n matches */
1992    OP_NOTPOSQUERY,    /* 49 */  
1993    OP_NOTPOSUPTO,     /* 50 */    OP_POSSTAR,        /* 42 Possessified star, caseful */
1994      OP_POSPLUS,        /* 43 Possessified plus, caseful */
1995    OP_TYPESTAR,       /* 51 The maximizing and minimizing versions of */    OP_POSQUERY,       /* 44 Posesssified query, caseful */
1996    OP_TYPEMINSTAR,    /* 52 these six opcodes must come in pairs, with */    OP_POSUPTO,        /* 45 Possessified upto, caseful */
1997    OP_TYPEPLUS,       /* 53 the minimizing one second. These codes must */  
1998    OP_TYPEMINPLUS,    /* 54 be in exactly the same order as those above. */    /* Repeated characters; caseless must follow the caseful ones */
1999    OP_TYPEQUERY,      /* 55 This set applies to character types such as \d */  
2000    OP_TYPEMINQUERY,   /* 56 */    OP_STARI,          /* 46 */
2001      OP_MINSTARI,       /* 47 */
2002    OP_TYPEUPTO,       /* 57 From 0 to n matches */    OP_PLUSI,          /* 48 */
2003    OP_TYPEMINUPTO,    /* 58 */    OP_MINPLUSI,       /* 49 */
2004    OP_TYPEEXACT,      /* 59 Exactly n matches */    OP_QUERYI,         /* 50 */
2005      OP_MINQUERYI,      /* 51 */
2006    OP_TYPEPOSSTAR,    /* 60 Possessified versions */  
2007    OP_TYPEPOSPLUS,    /* 61 */    OP_UPTOI,          /* 52 From 0 to n matches of one character, caseless */
2008    OP_TYPEPOSQUERY,   /* 62 */    OP_MINUPTOI,       /* 53 */
2009    OP_TYPEPOSUPTO,    /* 63 */    OP_EXACTI,         /* 54 */
2010    
2011    OP_CRSTAR,         /* 64 The maximizing and minimizing versions of */    OP_POSSTARI,       /* 55 Possessified star, caseless */
2012    OP_CRMINSTAR,      /* 65 all these opcodes must come in pairs, with */    OP_POSPLUSI,       /* 56 Possessified plus, caseless */
2013    OP_CRPLUS,         /* 66 the minimizing one second. These codes must */    OP_POSQUERYI,      /* 57 Posesssified query, caseless */
2014    OP_CRMINPLUS,      /* 67 be in exactly the same order as those above. */    OP_POSUPTOI,       /* 58 Possessified upto, caseless */
2015    OP_CRQUERY,        /* 68 These are for character classes and back refs */  
2016    OP_CRMINQUERY,     /* 69 */    /* The negated ones must follow the non-negated ones, and match them */
2017    OP_CRRANGE,        /* 70 These are different to the three sets above. */    /* Negated repeated character, caseful; must precede the caseless ones */
2018    OP_CRMINRANGE,     /* 71 */  
2019      OP_NOTSTAR,        /* 59 The maximizing and minimizing versions of */
2020    OP_CLASS,          /* 72 Match a character class, chars < 256 only */    OP_NOTMINSTAR,     /* 60 these six opcodes must come in pairs, with */
2021    OP_NCLASS,         /* 73 Same, but the bitmap was created from a negative    OP_NOTPLUS,        /* 61 the minimizing one second. They must be in */
2022                             class - the difference is relevant only when a UTF-8    OP_NOTMINPLUS,     /* 62 exactly the same order as those above. */
2023                             character > 255 is encountered. */    OP_NOTQUERY,       /* 63 */
2024      OP_NOTMINQUERY,    /* 64 */
2025    OP_XCLASS,         /* 74 Extended class for handling UTF-8 chars within the  
2026                             class. This does both positive and negative. */    OP_NOTUPTO,        /* 65 From 0 to n matches, caseful */
2027      OP_NOTMINUPTO,     /* 66 */
2028    OP_REF,            /* 75 Match a back reference */    OP_NOTEXACT,       /* 67 Exactly n matches */
2029    OP_RECURSE,        /* 76 Match a numbered subpattern (possibly recursive) */  
2030    OP_CALLOUT,        /* 77 Call out to external function if provided */    OP_NOTPOSSTAR,     /* 68 Possessified versions, caseful */
2031      OP_NOTPOSPLUS,     /* 69 */
2032    OP_ALT,            /* 78 Start of alternation */    OP_NOTPOSQUERY,    /* 70 */
2033    OP_KET,            /* 79 End of group that doesn't have an unbounded repeat */    OP_NOTPOSUPTO,     /* 71 */
2034    OP_KETRMAX,        /* 80 These two must remain together and in this */  
2035    OP_KETRMIN,        /* 81 order. They are for groups the repeat for ever. */    /* Negated repeated character, caseless; must follow the caseful ones */
2036    
2037    /* The assertions must come before BRA, CBRA, ONCE, and COND.*/    OP_NOTSTARI,       /* 72 */
2038      OP_NOTMINSTARI,    /* 73 */
2039    OP_ASSERT,         /* 82 Positive lookahead */    OP_NOTPLUSI,       /* 74 */
2040    OP_ASSERT_NOT,     /* 83 Negative lookahead */    OP_NOTMINPLUSI,    /* 75 */
2041    OP_ASSERTBACK,     /* 84 Positive lookbehind */    OP_NOTQUERYI,      /* 76 */
2042    OP_ASSERTBACK_NOT, /* 85 Negative lookbehind */    OP_NOTMINQUERYI,   /* 77 */
2043    OP_REVERSE,        /* 86 Move pointer back - used in lookbehind assertions */  
2044      OP_NOTUPTOI,       /* 78 From 0 to n matches, caseless */
2045    /* ONCE, BRA, CBRA, and COND must come after the assertions, with ONCE first,    OP_NOTMINUPTOI,    /* 79 */
2046    as there's a test for >= ONCE for a subpattern that isn't an assertion. */    OP_NOTEXACTI,      /* 80 Exactly n matches */
2047    
2048    OP_ONCE,           /* 87 Atomic group */    OP_NOTPOSSTARI,    /* 81 Possessified versions, caseless */
2049    OP_BRA,            /* 88 Start of non-capturing bracket */    OP_NOTPOSPLUSI,    /* 82 */
2050    OP_CBRA,           /* 89 Start of capturing bracket */    OP_NOTPOSQUERYI,   /* 83 */
2051    OP_COND,           /* 90 Conditional group */    OP_NOTPOSUPTOI,    /* 84 */
2052    
2053      /* Character types */
2054    
2055      OP_TYPESTAR,       /* 85 The maximizing and minimizing versions of */
2056      OP_TYPEMINSTAR,    /* 86 these six opcodes must come in pairs, with */
2057      OP_TYPEPLUS,       /* 87 the minimizing one second. These codes must */
2058      OP_TYPEMINPLUS,    /* 88 be in exactly the same order as those above. */
2059      OP_TYPEQUERY,      /* 89 */
2060      OP_TYPEMINQUERY,   /* 90 */
2061    
2062      OP_TYPEUPTO,       /* 91 From 0 to n matches */
2063      OP_TYPEMINUPTO,    /* 92 */
2064      OP_TYPEEXACT,      /* 93 Exactly n matches */
2065    
2066      OP_TYPEPOSSTAR,    /* 94 Possessified versions */
2067      OP_TYPEPOSPLUS,    /* 95 */
2068      OP_TYPEPOSQUERY,   /* 96 */
2069      OP_TYPEPOSUPTO,    /* 97 */
2070    
2071      /* These are used for character classes and back references; only the
2072      first six are the same as the sets above. */
2073    
2074      OP_CRSTAR,         /* 98 The maximizing and minimizing versions of */
2075      OP_CRMINSTAR,      /* 99 all these opcodes must come in pairs, with */
2076      OP_CRPLUS,         /* 100 the minimizing one second. These codes must */
2077      OP_CRMINPLUS,      /* 101 be in exactly the same order as those above. */
2078      OP_CRQUERY,        /* 102 */
2079      OP_CRMINQUERY,     /* 103 */
2080    
2081      OP_CRRANGE,        /* 104 These are different to the three sets above. */
2082      OP_CRMINRANGE,     /* 105 */
2083    
2084      OP_CRPOSSTAR,      /* 106 Possessified versions */
2085      OP_CRPOSPLUS,      /* 107 */
2086      OP_CRPOSQUERY,     /* 108 */
2087      OP_CRPOSRANGE,     /* 109 */
2088    
2089      /* End of quantifier opcodes */
2090    
2091      OP_CLASS,          /* 110 Match a character class, chars < 256 only */
2092      OP_NCLASS,         /* 111 Same, but the bitmap was created from a negative
2093                                  class - the difference is relevant only when a
2094                                  character > 255 is encountered. */
2095      OP_XCLASS,         /* 112 Extended class for handling > 255 chars within the
2096                                  class. This does both positive and negative. */
2097      OP_REF,            /* 113 Match a back reference, casefully */
2098      OP_REFI,           /* 114 Match a back reference, caselessly */
2099      OP_DNREF,          /* 115 Match a duplicate name backref, casefully */
2100      OP_DNREFI,         /* 116 Match a duplicate name backref, caselessly */
2101      OP_RECURSE,        /* 117 Match a numbered subpattern (possibly recursive) */
2102      OP_CALLOUT,        /* 118 Call out to external function if provided */
2103    
2104      OP_ALT,            /* 119 Start of alternation */
2105      OP_KET,            /* 120 End of group that doesn't have an unbounded repeat */
2106      OP_KETRMAX,        /* 121 These two must remain together and in this */
2107      OP_KETRMIN,        /* 122 order. They are for groups the repeat for ever. */
2108      OP_KETRPOS,        /* 123 Possessive unlimited repeat. */
2109    
2110      /* The assertions must come before BRA, CBRA, ONCE, and COND, and the four
2111      asserts must remain in order. */
2112    
2113      OP_REVERSE,        /* 124 Move pointer back - used in lookbehind assertions */
2114      OP_ASSERT,         /* 125 Positive lookahead */
2115      OP_ASSERT_NOT,     /* 126 Negative lookahead */
2116      OP_ASSERTBACK,     /* 127 Positive lookbehind */
2117      OP_ASSERTBACK_NOT, /* 128 Negative lookbehind */
2118    
2119      /* ONCE, ONCE_NC, BRA, BRAPOS, CBRA, CBRAPOS, and COND must come immediately
2120      after the assertions, with ONCE first, as there's a test for >= ONCE for a
2121      subpattern that isn't an assertion. The POS versions must immediately follow
2122      the non-POS versions in each case. */
2123    
2124      OP_ONCE,           /* 129 Atomic group, contains captures */
2125      OP_ONCE_NC,        /* 130 Atomic group containing no captures */
2126      OP_BRA,            /* 131 Start of non-capturing bracket */
2127      OP_BRAPOS,         /* 132 Ditto, with unlimited, possessive repeat */
2128      OP_CBRA,           /* 133 Start of capturing bracket */
2129      OP_CBRAPOS,        /* 134 Ditto, with unlimited, possessive repeat */
2130      OP_COND,           /* 135 Conditional group */
2131    
2132    /* 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
2133    check for >= SBRA to distinguish the two sets. */    check for >= SBRA to distinguish the two sets. */
2134    
2135    OP_SBRA,           /* 91 Start of non-capturing bracket, check empty  */    OP_SBRA,           /* 136 Start of non-capturing bracket, check empty  */
2136    OP_SCBRA,          /* 92 Start of capturing bracket, check empty */    OP_SBRAPOS,        /* 137 Ditto, with unlimited, possessive repeat */
2137    OP_SCOND,          /* 93 Conditional group, check empty */    OP_SCBRA,          /* 138 Start of capturing bracket, check empty */
2138      OP_SCBRAPOS,       /* 139 Ditto, with unlimited, possessive repeat */
2139    OP_CREF,           /* 94 Used to hold a capture number as condition */    OP_SCOND,          /* 140 Conditional group, check empty */
2140    OP_RREF,           /* 95 Used to hold a recursion number as condition */  
2141    OP_DEF,            /* 96 The DEFINE condition */    /* The next two pairs must (respectively) be kept together. */
2142    
2143      OP_CREF,           /* 141 Used to hold a capture number as condition */
2144      OP_DNCREF,         /* 142 Used to point to duplicate names as a condition */
2145      OP_RREF,           /* 143 Used to hold a recursion number as condition */
2146      OP_DNRREF,         /* 144 Used to point to duplicate names as a condition */
2147      OP_DEF,            /* 145 The DEFINE condition */
2148    
2149      OP_BRAZERO,        /* 146 These two must remain together and in this */
2150      OP_BRAMINZERO,     /* 147 order. */
2151      OP_BRAPOSZERO,     /* 148 */
2152    
2153      /* These are backtracking control verbs */
2154    
2155      OP_MARK,           /* 149 always has an argument */
2156      OP_PRUNE,          /* 150 */
2157      OP_PRUNE_ARG,      /* 151 same, but with argument */
2158      OP_SKIP,           /* 152 */
2159      OP_SKIP_ARG,       /* 153 same, but with argument */
2160      OP_THEN,           /* 154 */
2161      OP_THEN_ARG,       /* 155 same, but with argument */
2162      OP_COMMIT,         /* 156 */
2163    
2164      /* These are forced failure and success verbs */
2165    
2166      OP_FAIL,           /* 157 */
2167      OP_ACCEPT,         /* 158 */
2168      OP_ASSERT_ACCEPT,  /* 159 Used inside assertions */
2169      OP_CLOSE,          /* 160 Used before OP_ACCEPT to close open captures */
2170    
2171      /* This is used to skip a subpattern with a {0} quantifier */
2172    
2173      OP_SKIPZERO,       /* 161 */
2174    
2175      /* This is not an opcode, but is used to check that tables indexed by opcode
2176      are the correct length, in order to catch updating errors - there have been
2177      some in the past. */
2178    
2179    OP_BRAZERO,        /* 97 These two must remain together and in this */    OP_TABLE_LENGTH
   OP_BRAMINZERO      /* 98 order. */  
2180  };  };
2181    
2182    /* *** NOTE NOTE NOTE *** Whenever the list above is updated, the two macro
2183    definitions that follow must also be updated to match. There are also tables
2184    called "opcode_possessify" in pcre_compile.c and "coptable" and "poptable" in
2185    pcre_dfa_exec.c that must be updated. */
2186    
2187    
2188  /* 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
2189  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
2190    only in pcre_printint.c, which fills out the full names in many cases (and in
2191    some cases doesn't actually use these names at all). */
2192    
2193  #define OP_NAME_LIST \  #define OP_NAME_LIST \
2194    "End", "\\A", "\\G", "\\B", "\\b", "\\D", "\\d",                \    "End", "\\A", "\\G", "\\K", "\\B", "\\b", "\\D", "\\d",         \
2195    "\\S", "\\s", "\\W", "\\w", "Any", "Anybyte",                   \    "\\S", "\\s", "\\W", "\\w", "Any", "AllAny", "Anybyte",         \
2196    "notprop", "prop", "anynl", "extuni",                           \    "notprop", "prop", "\\R", "\\H", "\\h", "\\V", "\\v",           \
2197    "\\Z", "\\z",                                                   \    "extuni",  "\\Z", "\\z",                                        \
2198    "Opt", "^", "$", "char", "charnc", "not",                       \    "$", "$", "^", "^", "char", "chari", "not", "noti",             \
2199    "*", "*?", "+", "+?", "?", "??", "{", "{", "{",                 \    "*", "*?", "+", "+?", "?", "??",                                \
2200      "{", "{", "{",                                                  \
2201    "*+","++", "?+", "{",                                           \    "*+","++", "?+", "{",                                           \
2202    "*", "*?", "+", "+?", "?", "??", "{", "{", "{",                 \    "*", "*?", "+", "+?", "?", "??",                                \
2203      "{", "{", "{",                                                  \
2204      "*+","++", "?+", "{",                                           \
2205      "*", "*?", "+", "+?", "?", "??",                                \
2206      "{", "{", "{",                                                  \
2207      "*+","++", "?+", "{",                                           \
2208      "*", "*?", "+", "+?", "?", "??",                                \
2209      "{", "{", "{",                                                  \
2210    "*+","++", "?+", "{",                                           \    "*+","++", "?+", "{",                                           \
2211    "*", "*?", "+", "+?", "?", "??", "{", "{", "{",                 \    "*", "*?", "+", "+?", "?", "??", "{", "{", "{",                 \
2212    "*+","++", "?+", "{",                                           \    "*+","++", "?+", "{",                                           \
2213    "*", "*?", "+", "+?", "?", "??", "{", "{",                      \    "*", "*?", "+", "+?", "?", "??", "{", "{",                      \
2214    "class", "nclass", "xclass", "Ref", "Recurse", "Callout",       \    "*+","++", "?+", "{",                                           \
2215    "Alt", "Ket", "KetRmax", "KetRmin", "Assert", "Assert not",     \    "class", "nclass", "xclass", "Ref", "Refi", "DnRef", "DnRefi",  \
2216    "AssertB", "AssertB not", "Reverse",                            \    "Recurse", "Callout",                                           \
2217    "Once", "Bra 0", "Bra", "Cond", "SBra 0", "SBra", "SCond",      \    "Alt", "Ket", "KetRmax", "KetRmin", "KetRpos",                  \
2218    "Cond ref", "Cond rec", "Cond def", "Brazero", "Braminzero"    "Reverse", "Assert", "Assert not", "AssertB", "AssertB not",    \
2219      "Once", "Once_NC",                                              \
2220      "Bra", "BraPos", "CBra", "CBraPos",                             \
2221      "Cond",                                                         \
2222      "SBra", "SBraPos", "SCBra", "SCBraPos",                         \
2223      "SCond",                                                        \
2224      "Cond ref", "Cond dnref", "Cond rec", "Cond dnrec", "Cond def", \
2225      "Brazero", "Braminzero", "Braposzero",                          \
2226      "*MARK", "*PRUNE", "*PRUNE", "*SKIP", "*SKIP",                  \
2227      "*THEN", "*THEN", "*COMMIT", "*FAIL",                           \
2228      "*ACCEPT", "*ASSERT_ACCEPT",                                    \
2229      "Close", "Skip zero"
2230    
2231    
2232  /* This macro defines the length of fixed length operations in the compiled  /* This macro defines the length of fixed length operations in the compiled
# Line 739  in UTF-8 mode. The code that uses this t Line 2240  in UTF-8 mode. The code that uses this t
2240    
2241  #define OP_LENGTHS \  #define OP_LENGTHS \
2242    1,                             /* End                                    */ \    1,                             /* End                                    */ \
2243    1, 1, 1, 1, 1, 1, 1, 1, 1, 1,  /* \A, \G, \B, \B, \D, \d, \S, \s, \W, \w */ \    1, 1, 1, 1, 1,                 /* \A, \G, \K, \B, \b                     */ \
2244    1, 1,                          /* Any, Anybyte                           */ \    1, 1, 1, 1, 1, 1,              /* \D, \d, \S, \s, \W, \w                 */ \
2245    3, 3, 1, 1,                    /* NOTPROP, PROP, EXTUNI, ANYNL           */ \    1, 1, 1,                       /* Any, AllAny, Anybyte                   */ \
2246    1, 1, 2, 1, 1,                 /* \Z, \z, Opt, ^, $                      */ \    3, 3,                          /* \P, \p                                 */ \
2247      1, 1, 1, 1, 1,                 /* \R, \H, \h, \V, \v                     */ \
2248      1,                             /* \X                                     */ \
2249      1, 1, 1, 1, 1, 1,              /* \Z, \z, $, $M ^, ^M                    */ \
2250    2,                             /* Char  - the minimum length             */ \    2,                             /* Char  - the minimum length             */ \
2251    2,                             /* Charnc  - the minimum length           */ \    2,                             /* Chari  - the minimum length            */ \
2252    2,                             /* not                                    */ \    2,                             /* not                                    */ \
2253    /* Positive single-char repeats                            ** These are  */ \    2,                             /* noti                                   */ \
2254    2, 2, 2, 2, 2, 2,              /* *, *?, +, +?, ?, ??      ** minima in  */ \    /* Positive single-char repeats                             ** These are */ \
2255    4, 4, 4,                       /* upto, minupto, exact     ** UTF-8 mode */ \    2, 2, 2, 2, 2, 2,              /* *, *?, +, +?, ?, ??       ** minima in */ \
2256    2, 2, 2, 4,                    /* *+, ++, ?+, upto+                      */ \    2+IMM2_SIZE, 2+IMM2_SIZE,      /* upto, minupto             ** mode      */ \
2257      2+IMM2_SIZE,                   /* exact                                  */ \
2258      2, 2, 2, 2+IMM2_SIZE,          /* *+, ++, ?+, upto+                      */ \
2259      2, 2, 2, 2, 2, 2,              /* *I, *?I, +I, +?I, ?I, ??I ** UTF-8     */ \
2260      2+IMM2_SIZE, 2+IMM2_SIZE,      /* upto I, minupto I                      */ \
2261      2+IMM2_SIZE,                   /* exact I                                */ \
2262      2, 2, 2, 2+IMM2_SIZE,          /* *+I, ++I, ?+I, upto+I                  */ \
2263    /* Negative single-char repeats - only for chars < 256                   */ \    /* Negative single-char repeats - only for chars < 256                   */ \
2264    2, 2, 2, 2, 2, 2,              /* NOT *, *?, +, +?, ?, ??                */ \    2, 2, 2, 2, 2, 2,              /* NOT *, *?, +, +?, ?, ??                */ \
2265    4, 4, 4,                       /* NOT upto, minupto, exact               */ \    2+IMM2_SIZE, 2+IMM2_SIZE,      /* NOT upto, minupto                      */ \
2266    2, 2, 2, 4,                    /* Possessive *, +, ?, upto               */ \    2+IMM2_SIZE,                   /* NOT exact                              */ \
2267      2, 2, 2, 2+IMM2_SIZE,          /* Possessive NOT *, +, ?, upto           */ \
2268      2, 2, 2, 2, 2, 2,              /* NOT *I, *?I, +I, +?I, ?I, ??I          */ \
2269      2+IMM2_SIZE, 2+IMM2_SIZE,      /* NOT upto I, minupto I                  */ \
2270      2+IMM2_SIZE,                   /* NOT exact I                            */ \
2271      2, 2, 2, 2+IMM2_SIZE,          /* Possessive NOT *I, +I, ?I, upto I      */ \
2272    /* Positive type repeats                                                 */ \    /* Positive type repeats                                                 */ \
2273    2, 2, 2, 2, 2, 2,              /* Type *, *?, +, +?, ?, ??               */ \    2, 2, 2, 2, 2, 2,              /* Type *, *?, +, +?, ?, ??               */ \
2274    4, 4, 4,                       /* Type upto, minupto, exact              */ \    2+IMM2_SIZE, 2+IMM2_SIZE,      /* Type upto, minupto                     */ \
2275    2, 2, 2, 4,                    /* Possessive *+, ++, ?+, upto+           */ \    2+IMM2_SIZE,                   /* Type exact                             */ \
2276      2, 2, 2, 2+IMM2_SIZE,          /* Possessive *+, ++, ?+, upto+           */ \
2277    /* Character class & ref repeats                                         */ \    /* Character class & ref repeats                                         */ \
2278    1, 1, 1, 1, 1, 1,              /* *, *?, +, +?, ?, ??                    */ \    1, 1, 1, 1, 1, 1,              /* *, *?, +, +?, ?, ??                    */ \
2279    5, 5,                          /* CRRANGE, CRMINRANGE                    */ \    1+2*IMM2_SIZE, 1+2*IMM2_SIZE,  /* CRRANGE, CRMINRANGE                    */ \
2280   33,                             /* CLASS                                  */ \    1, 1, 1, 1+2*IMM2_SIZE,        /* Possessive *+, ++, ?+, CRPOSRANGE      */ \
2281   33,                             /* NCLASS                                 */ \    1+(32/sizeof(pcre_uchar)),     /* CLASS                                  */ \
2282      1+(32/sizeof(pcre_uchar)),     /* NCLASS                                 */ \
2283    0,                             /* XCLASS - variable length               */ \    0,                             /* XCLASS - variable length               */ \
2284    3,                             /* REF                                    */ \    1+IMM2_SIZE,                   /* REF                                    */ \
2285      1+IMM2_SIZE,                   /* REFI                                   */ \
2286      1+2*IMM2_SIZE,                 /* DNREF                                  */ \
2287      1+2*IMM2_SIZE,                 /* DNREFI                                 */ \
2288    1+LINK_SIZE,                   /* RECURSE                                */ \    1+LINK_SIZE,                   /* RECURSE                                */ \
2289    2+2*LINK_SIZE,                 /* CALLOUT                                */ \    2+2*LINK_SIZE,                 /* CALLOUT                                */ \
2290    1+LINK_SIZE,                   /* Alt                                    */ \    1+LINK_SIZE,                   /* Alt                                    */ \
2291    1+LINK_SIZE,                   /* Ket                                    */ \    1+LINK_SIZE,                   /* Ket                                    */ \
2292    1+LINK_SIZE,                   /* KetRmax                                */ \    1+LINK_SIZE,                   /* KetRmax                                */ \
2293    1+LINK_SIZE,                   /* KetRmin                                */ \    1+LINK_SIZE,                   /* KetRmin                                */ \
2294      1+LINK_SIZE,                   /* KetRpos                                */ \
2295      1+LINK_SIZE,                   /* Reverse                                */ \
2296    1+LINK_SIZE,                   /* Assert                                 */ \    1+LINK_SIZE,                   /* Assert                                 */ \
2297    1+LINK_SIZE,                   /* Assert not                             */ \    1+LINK_SIZE,                   /* Assert not                             */ \
2298    1+LINK_SIZE,                   /* Assert behind                          */ \    1+LINK_SIZE,                   /* Assert behind                          */ \
2299    1+LINK_SIZE,                   /* Assert behind not                      */ \    1+LINK_SIZE,                   /* Assert behind not                      */ \
   1+LINK_SIZE,                   /* Reverse                                */ \  
2300    1+LINK_SIZE,                   /* ONCE                                   */ \    1+LINK_SIZE,                   /* ONCE                                   */ \
2301      1+LINK_SIZE,                   /* ONCE_NC                                */ \
2302    1+LINK_SIZE,                   /* BRA                                    */ \    1+LINK_SIZE,                   /* BRA                                    */ \
2303    3+LINK_SIZE,                   /* CBRA                                   */ \    1+LINK_SIZE,                   /* BRAPOS                                 */ \
2304      1+LINK_SIZE+IMM2_SIZE,         /* CBRA                                   */ \
2305      1+LINK_SIZE+IMM2_SIZE,         /* CBRAPOS                                */ \
2306    1+LINK_SIZE,                   /* COND                                   */ \    1+LINK_SIZE,                   /* COND                                   */ \
2307    1+LINK_SIZE,                   /* SBRA                                   */ \    1+LINK_SIZE,                   /* SBRA                                   */ \
2308    3+LINK_SIZE,                   /* SCBRA                                  */ \    1+LINK_SIZE,                   /* SBRAPOS                                */ \
2309      1+LINK_SIZE+IMM2_SIZE,         /* SCBRA                                  */ \
2310      1+LINK_SIZE+IMM2_SIZE,         /* SCBRAPOS                               */ \
2311    1+LINK_SIZE,                   /* SCOND                                  */ \    1+LINK_SIZE,                   /* SCOND                                  */ \
2312    3,                             /* CREF                                   */ \    1+IMM2_SIZE, 1+2*IMM2_SIZE,    /* CREF, DNCREF                           */ \
2313    3,                             /* RREF                                   */ \    1+IMM2_SIZE, 1+2*IMM2_SIZE,    /* RREF, DNRREF                           */ \
2314    1,                             /* DEF                                    */ \    1,                             /* DEF                                    */ \
2315    1, 1,                          /* BRAZERO, BRAMINZERO                    */ \    1, 1, 1,                       /* BRAZERO, BRAMINZERO, BRAPOSZERO        */ \
2316      3, 1, 3,                       /* MARK, PRUNE, PRUNE_ARG                 */ \
2317      1, 3,                          /* SKIP, SKIP_ARG                         */ \
2318      1, 3,                          /* THEN, THEN_ARG                         */ \
2319      1, 1, 1, 1,                    /* COMMIT, FAIL, ACCEPT, ASSERT_ACCEPT    */ \
2320      1+IMM2_SIZE, 1                 /* CLOSE, SKIPZERO                        */
2321    
2322  /* A magic value for OP_RREF to indicate the "any recursion" condition. */  /* A magic value for OP_RREF to indicate the "any recursion" condition. */
2323    
2324  #define RREF_ANY  0xffff  #define RREF_ANY  0xffff
2325    
2326  /* Error code numbers. They are given names so that they can more easily be  /* Compile time error code numbers. They are given names so that they can more
2327  tracked. */  easily be tracked. When a new number is added, the table called eint in
2328    pcreposix.c must be updated. */
2329    
2330  enum { ERR0,  ERR1,  ERR2,  ERR3,  ERR4,  ERR5,  ERR6,  ERR7,  ERR8,  ERR9,  enum { ERR0,  ERR1,  ERR2,  ERR3,  ERR4,  ERR5,  ERR6,  ERR7,  ERR8,  ERR9,
2331         ERR10, ERR11, ERR12, ERR13, ERR14, ERR15, ERR16, ERR17, ERR18, ERR19,         ERR10, ERR11, ERR12, ERR13, ERR14, ERR15, ERR16, ERR17, ERR18, ERR19,
2332         ERR20, ERR21, ERR22, ERR23, ERR24, ERR25, ERR26, ERR27, ERR28, ERR29,         ERR20, ERR21, ERR22, ERR23, ERR24, ERR25, ERR26, ERR27, ERR28, ERR29,
2333         ERR30, ERR31, ERR32, ERR33, ERR34, ERR35, ERR36, ERR37, ERR38, ERR39,         ERR30, ERR31, ERR32, ERR33, ERR34, ERR35, ERR36, ERR37, ERR38, ERR39,
2334         ERR40, ERR41, ERR42, ERR43, ERR44, ERR45, ERR46, ERR47, ERR48, ERR49,         ERR40, ERR41, ERR42, ERR43, ERR44, ERR45, ERR46, ERR47, ERR48, ERR49,
2335         ERR50, ERR51, ERR52, ERR53, ERR54, ERR55, ERR56, ERR57 };         ERR50, ERR51, ERR52, ERR53, ERR54, ERR55, ERR56, ERR57, ERR58, ERR59,
2336           ERR60, ERR61, ERR62, ERR63, ERR64, ERR65, ERR66, ERR67, ERR68, ERR69,
2337           ERR70, ERR71, ERR72, ERR73, ERR74, ERR75, ERR76, ERR77, ERR78, ERR79,
2338           ERR80, ERR81, ERR82, ERRCOUNT };
2339    
2340    /* JIT compiling modes. The function list is indexed by them. */
2341    
2342    enum { JIT_COMPILE, JIT_PARTIAL_SOFT_COMPILE, JIT_PARTIAL_HARD_COMPILE,
2343           JIT_NUMBER_OF_COMPILE_MODES };
2344    
2345  /* 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
2346  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
2347  offset to the name table so that if a regex is compiled on one host, saved, and  offset to the name table so that if a regex is compiled on one host, saved, and
2348  then run on another where the size of pointers is different, all might still  then run on another where the size of pointers is different, all might still
2349  be well. For the case of compiled-on-4 and run-on-8, we include an extra  be well.
2350  pointer that is always NULL. For future-proofing, a few dummy fields were  
2351  originally included - even though you can never get this planning right - but  The size of the structure must be a multiple of 8 bytes. For the case of
2352  there is only one left now.  compiled-on-4 and run-on-8, we include an extra pointer that is always NULL so
2353    that there are an even number of pointers which therefore are a multiple of 8
2354  NOTE NOTE NOTE:  bytes.
2355  Because people can now save and re-use compiled patterns, any additions to this  
2356  structure should be made at the end, and something earlier (e.g. a new  It is necessary to fork the struct for the 32 bit library, since it needs to
2357  flag in the options or one of the dummy fields) should indicate that the new  use pcre_uint32 for first_char and req_char. We can't put an ifdef inside the
2358  fields are present. Currently PCRE always sets the dummy fields to zero.  typedef because pcretest needs access to the struct of the 8-, 16- and 32-bit
2359  NOTE NOTE NOTE:  variants.
2360    
2361    *** WARNING ***
2362    When new fields are added to these structures, remember to adjust the code in
2363    pcre_byte_order.c that is concerned with swapping the byte order of the fields
2364    when a compiled regex is reloaded on a host with different endianness.
2365    *** WARNING ***
2366    There is also similar byte-flipping code in pcretest.c, which is used for
2367    testing the byte-flipping features. It must also be kept in step.
2368    *** WARNING ***
2369  */  */
2370    
2371  typedef struct real_pcre {  typedef struct real_pcre8_or_16 {
2372    pcre_uint32 magic_number;    pcre_uint32 magic_number;
2373    pcre_uint32 size;               /* Total that was malloced */    pcre_uint32 size;               /* Total that was malloced */
2374    pcre_uint32 options;    pcre_uint32 options;            /* Public options */
2375    pcre_uint32 dummy1;             /* For future use, maybe */    pcre_uint32 flags;              /* Private flags */
2376      pcre_uint32 limit_match;        /* Limit set from regex */
2377      pcre_uint32 limit_recursion;    /* Limit set from regex */
2378      pcre_uint16 first_char;         /* Starting character */
2379      pcre_uint16 req_char;           /* This character must be seen */
2380      pcre_uint16 max_lookbehind;     /* Longest lookbehind (characters) */
2381      pcre_uint16 top_bracket;        /* Highest numbered group */
2382      pcre_uint16 top_backref;        /* Highest numbered back reference */
2383      pcre_uint16 name_table_offset;  /* Offset to name table that follows */
2384      pcre_uint16 name_entry_size;    /* Size of any name items */
2385      pcre_uint16 name_count;         /* Number of name items */
2386      pcre_uint16 ref_count;          /* Reference count */
2387      pcre_uint16 dummy1;             /* To ensure size is a multiple of 8 */
2388      pcre_uint16 dummy2;             /* To ensure size is a multiple of 8 */
2389      pcre_uint16 dummy3;             /* To ensure size is a multiple of 8 */
2390      const pcre_uint8 *tables;       /* Pointer to tables or NULL for std */
2391      void             *nullpad;      /* NULL padding */
2392    } real_pcre8_or_16;
2393    
2394    typedef struct real_pcre8_or_16 real_pcre;
2395    typedef struct real_pcre8_or_16 real_pcre16;
2396    
2397    pcre_uint16 top_bracket;  typedef struct real_pcre32 {
2398    pcre_uint16 top_backref;    pcre_uint32 magic_number;
2399    pcre_uint16 first_byte;    pcre_uint32 size;               /* Total that was malloced */
2400    pcre_uint16 req_byte;    pcre_uint32 options;            /* Public options */
2401      pcre_uint32 flags;              /* Private flags */
2402      pcre_uint32 limit_match;        /* Limit set from regex */
2403      pcre_uint32 limit_recursion;    /* Limit set from regex */
2404      pcre_uint32 first_char;         /* Starting character */
2405      pcre_uint32 req_char;           /* This character must be seen */
2406      pcre_uint16 max_lookbehind;     /* Longest lookbehind (characters) */
2407      pcre_uint16 top_bracket;        /* Highest numbered group */
2408      pcre_uint16 top_backref;        /* Highest numbered back reference */
2409    pcre_uint16 name_table_offset;  /* Offset to name table that follows */    pcre_uint16 name_table_offset;  /* Offset to name table that follows */
2410    pcre_uint16 name_entry_size;    /* Size of any name items */    pcre_uint16 name_entry_size;    /* Size of any name items */
2411    pcre_uint16 name_count;         /* Number of name items */    pcre_uint16 name_count;         /* Number of name items */
2412    pcre_uint16 ref_count;          /* Reference count */    pcre_uint16 ref_count;          /* Reference count */
2413      pcre_uint16 dummy;              /* To ensure size is a multiple of 8 */
2414      const pcre_uint8 *tables;       /* Pointer to tables or NULL for std */
2415      void             *nullpad;      /* NULL padding */
2416    } real_pcre32;
2417    
2418    #if defined COMPILE_PCRE8
2419    #define REAL_PCRE real_pcre
2420    #elif defined COMPILE_PCRE16
2421    #define REAL_PCRE real_pcre16
2422    #elif defined COMPILE_PCRE32
2423    #define REAL_PCRE real_pcre32
2424    #endif
2425    
2426    /* Assert that the size of REAL_PCRE is divisible by 8 */
2427    typedef int __assert_real_pcre_size_divisible_8[(sizeof(REAL_PCRE) % 8) == 0 ? 1 : -1];
2428    
2429    const unsigned char *tables;    /* Pointer to tables or NULL for std */  /* Needed in pcretest to access some fields in the real_pcre* structures
2430    const unsigned char *nullpad;   /* NULL padding */   * directly. They're unified for 8/16/32 bits since the structs only differ
2431  } real_pcre;   * after these fields; if that ever changes, need to fork those defines into
2432     * 8/16 and 32 bit versions. */
2433    #define REAL_PCRE_MAGIC(re)     (((REAL_PCRE*)re)->magic_number)
2434    #define REAL_PCRE_SIZE(re)      (((REAL_PCRE*)re)->size)
2435    #define REAL_PCRE_OPTIONS(re)   (((REAL_PCRE*)re)->options)
2436    #define REAL_PCRE_FLAGS(re)     (((REAL_PCRE*)re)->flags)
2437    
2438  /* 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
2439  remark (see NOTE above) about extending this structure applies. */  remark (see NOTE above) about extending this structure applies. */
2440    
2441  typedef struct pcre_study_data {  typedef struct pcre_study_data {
2442    pcre_uint32 size;               /* Total that was malloced */    pcre_uint32 size;               /* Total that was malloced */
2443    pcre_uint32 options;    pcre_uint32 flags;              /* Private flags */
2444    uschar start_bits[32];    pcre_uint8 start_bits[32];      /* Starting char bits */
2445      pcre_uint32 minlength;          /* Minimum subject length */
2446  } pcre_study_data;  } pcre_study_data;
2447    
2448    /* Structure for building a chain of open capturing subpatterns during
2449    compiling, so that instructions to close them can be compiled when (*ACCEPT) is
2450    encountered. This is also used to identify subpatterns that contain recursive
2451    back references to themselves, so that they can be made atomic. */
2452    
2453    typedef struct open_capitem {
2454      struct open_capitem *next;    /* Chain link */
2455      pcre_uint16 number;           /* Capture number */
2456      pcre_uint16 flag;             /* Set TRUE if recursive back ref */
2457    } open_capitem;
2458    
2459    /* Structure for building a list of named groups during the first pass of
2460    compiling. */
2461    
2462    typedef struct named_group {
2463      const pcre_uchar  *name;          /* Points to the name in the pattern */
2464      int                length;        /* Length of the name */
2465      pcre_uint32        number;        /* Group number */
2466    } named_group;
2467    
2468  /* Structure for passing "static" information around between the functions  /* Structure for passing "static" information around between the functions
2469  doing the compiling, so that they are thread-safe. */  doing the compiling, so that they are thread-safe. */
2470    
2471  typedef struct compile_data {  typedef struct compile_data {
2472    const uschar *lcc;            /* Points to lower casing table */    const pcre_uint8 *lcc;            /* Points to lower casing table */
2473    const uschar *fcc;            /* Points to case-flipping table */    const pcre_uint8 *fcc;            /* Points to case-flipping table */
2474    const uschar *cbits;          /* Points to character type table */    const pcre_uint8 *cbits;          /* Points to character type table */
2475    const uschar *ctypes;         /* Points to table of type maps */    const pcre_uint8 *ctypes;         /* Points to table of type maps */
2476    const uschar *start_workspace;/* The start of working space */    const pcre_uchar *start_workspace;/* The start of working space */
2477    const uschar *start_code;     /* The start of the compiled code */    const pcre_uchar *start_code;     /* The start of the compiled code */
2478    const uschar *start_pattern;  /* The start of the pattern */    const pcre_uchar *start_pattern;  /* The start of the pattern */
2479    const uschar *end_pattern;    /* The end of the pattern */    const pcre_uchar *end_pattern;    /* The end of the pattern */
2480    uschar *hwm;                  /* High watermark of workspace */    pcre_uchar *hwm;                  /* High watermark of workspace */
2481    uschar *name_table;           /* The name/number table */    open_capitem *open_caps;          /* Chain of open capture items */
2482    int  names_found;             /* Number of entries so far */    named_group *named_groups;        /* Points to vector in pre-compile */
2483    int  name_entry_size;         /* Size of each entry */    pcre_uchar *name_table;           /* The name/number table */
2484    int  bracount;                /* Count of capturing parens */    int  names_found;                 /* Number of entries so far */
2485    int  top_backref;             /* Maximum back reference */    int  name_entry_size;             /* Size of each entry */
2486    unsigned int backref_map;     /* Bitmap of low back refs */    int  named_group_list_size;       /* Number of entries in the list */
2487    int  external_options;        /* External (initial) options */    int  workspace_size;              /* Size of workspace */
2488    int  req_varyopt;             /* "After variable item" flag for reqbyte */    unsigned int bracount;            /* Count of capturing parens as we compile */
2489    BOOL nopartial;               /* Set TRUE if partial won't work */    int  final_bracount;              /* Saved value after first pass */
2490    int  nltype;                  /* Newline type */    int  max_lookbehind;              /* Maximum lookbehind (characters) */
2491    int  nllen;                   /* Newline string length */    int  top_backref;                 /* Maximum back reference */
2492    uschar nl[4];                 /* Newline string when fixed length */    unsigned int backref_map;         /* Bitmap of low back refs */
2493      unsigned int namedrefcount;       /* Number of backreferences by name */
2494      int  parens_depth;                /* Depth of nested parentheses */
2495      int  assert_depth;                /* Depth of nested assertions */
2496      pcre_uint32 external_options;     /* External (initial) options */
2497      pcre_uint32 external_flags;       /* External flag bits to be set */
2498      int  req_varyopt;                 /* "After variable item" flag for reqbyte */
2499      BOOL had_accept;                  /* (*ACCEPT) encountered */
2500      BOOL had_pruneorskip;             /* (*PRUNE) or (*SKIP) encountered */
2501      BOOL check_lookbehind;            /* Lookbehinds need later checking */
2502      BOOL dupnames;                    /* Duplicate names exist */
2503      int  nltype;                      /* Newline type */
2504      int  nllen;                       /* Newline string length */
2505      pcre_uchar nl[4];                 /* Newline string when fixed length */
2506  } compile_data;  } compile_data;
2507    
2508  /* Structure for maintaining a chain of pointers to the currently incomplete  /* Structure for maintaining a chain of pointers to the currently incomplete
2509  branches, for testing for left recursion. */  branches, for testing for left recursion while compiling. */
2510    
2511  typedef struct branch_chain {  typedef struct branch_chain {
2512    struct branch_chain *outer;    struct branch_chain *outer;
2513    uschar *current;    pcre_uchar *current_branch;
2514  } branch_chain;  } branch_chain;
2515    
2516  /* Structure for items in a linked list that represents an explicit recursive  /* Structure for items in a linked list that represents an explicit recursive
2517  call within the pattern. */  call within the pattern; used by pcre_exec(). */
2518    
2519  typedef struct recursion_info {  typedef struct recursion_info {
2520    struct recursion_info *prevrec; /* Previous recursion record (or NULL) */    struct recursion_info *prevrec; /* Previous recursion record (or NULL) */
2521    int group_num;                /* Number of group that was called */    unsigned int group_num;         /* Number of group that was called */
2522    const uschar *after_call;     /* "Return value": points after the call in the expr */    int *offset_save;               /* Pointer to start of saved offsets */
2523    USPTR save_start;             /* Old value of md->start_match */    int saved_max;                  /* Number of saved offsets */
2524    int *offset_save;             /* Pointer to start of saved offsets */    int saved_capture_last;         /* Last capture number */
2525    int saved_max;                /* Number of saved offsets */    PCRE_PUCHAR subject_position;   /* Position at start of recursion */
2526  } recursion_info;  } recursion_info;
2527    
2528  /* When compiling in a mode that doesn't use recursive calls to match(),  /* A similar structure for pcre_dfa_exec(). */
 a structure is used to remember local variables on the heap. It is defined in  
 pcre_exec.c, close to the match() function, so that it is easy to keep it in  
 step with any changes of local variable. However, the pointer to the current  
 frame must be saved in some "static" place over a longjmp(). We declare the  
 structure here so that we can put a pointer in the match_data structure. NOTE:  
 This isn't used for a "normal" compilation of pcre. */  
2529    
2530  struct heapframe;  typedef struct dfa_recursion_info {
2531      struct dfa_recursion_info *prevrec;
2532      int group_num;
2533      PCRE_PUCHAR subject_position;
2534    } dfa_recursion_info;
2535    
2536  /* 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
2537  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
2538  has been matched by a subpattern - to break infinite loops. */  has been matched by a subpattern - to break infinite loops; used by
2539    pcre_exec(). */
2540    
2541  typedef struct eptrblock {  typedef struct eptrblock {
2542    struct eptrblock *epb_prev;    struct eptrblock *epb_prev;
2543    USPTR epb_saved_eptr;    PCRE_PUCHAR epb_saved_eptr;
2544  } eptrblock;  } eptrblock;
2545    
2546    
# Line 922  typedef struct match_data { Line 2551  typedef struct match_data {
2551    unsigned long int match_call_count;      /* As it says */    unsigned long int match_call_count;      /* As it says */
2552    unsigned long int match_limit;           /* As it says */    unsigned long int match_limit;           /* As it says */
2553    unsigned long int match_limit_recursion; /* As it says */    unsigned long int match_limit_recursion; /* As it says */
2554    int   *offset_vector;         /* Offset vector */    int   *offset_vector;           /* Offset vector */
2555    int    offset_end;            /* One past the end */    int    offset_end;              /* One past the end */
2556    int    offset_max;            /* The maximum usable for return data */    int    offset_max;              /* The maximum usable for return data */
2557    int    nltype;                /* Newline type */    int    nltype;                  /* Newline type */
2558    int    nllen;                 /* Newline string length */    int    nllen;                   /* Newline string length */
2559    uschar nl[4];                 /* Newline string when fixed */    int    name_count;              /* Number of names in name table */
2560    const uschar *lcc;            /* Points to lower casing table */    int    name_entry_size;         /* Size of entry in names table */
2561    const uschar *ctypes;         /* Points to table of type maps */    unsigned int skip_arg_count;    /* For counting SKIP_ARGs */
2562    BOOL   offset_overflow;       /* Set if too many extractions */    unsigned int ignore_skip_arg;   /* For re-run when SKIP arg name not found */
2563    BOOL   notbol;                /* NOTBOL flag */    pcre_uchar *name_table;         /* Table of names */
2564    BOOL   noteol;                /* NOTEOL flag */    pcre_uchar nl[4];               /* Newline string when fixed */
2565    BOOL   utf8;                  /* UTF8 flag */    const  pcre_uint8 *lcc;         /* Points to lower casing table */
2566    BOOL   endonly;               /* Dollar not before final \n */    const  pcre_uint8 *fcc;         /* Points to case-flipping table */
2567    BOOL   notempty;              /* Empty string match not wanted */    const  pcre_uint8 *ctypes;      /* Points to table of type maps */
2568    BOOL   partial;               /* PARTIAL flag */    BOOL   notbol;                  /* NOTBOL flag */
2569    BOOL   hitend;                /* Hit the end of the subject at some point */    BOOL   noteol;                  /* NOTEOL flag */
2570    const uschar *start_code;     /* For use when recursing */    BOOL   utf;                     /* UTF-8 / UTF-16 flag */
2571    USPTR  start_subject;         /* Start of the subject string */    BOOL   jscript_compat;          /* JAVASCRIPT_COMPAT flag */
2572    USPTR  end_subject;           /* End of the subject string */    BOOL   use_ucp;                 /* PCRE_UCP flag */
2573    USPTR  start_match;           /* Start of this match attempt */    BOOL   endonly;                 /* Dollar not before final \n */
2574    USPTR  end_match_ptr;         /* Subject position at end match */    BOOL   notempty;                /* Empty string match not wanted */
2575    int    end_offset_top;        /* Highwater mark at end of match */    BOOL   notempty_atstart;        /* Empty string match at start not wanted */
2576    int    capture_last;          /* Most recent capture number */    BOOL   hitend;                  /* Hit the end of the subject at some point */
2577    int    start_offset;          /* The start offset value */    BOOL   bsr_anycrlf;             /* \R is just any CRLF, not full Unicode */
2578    eptrblock *eptrchain;         /* Chain of eptrblocks for tail recursions */    BOOL   hasthen;                 /* Pattern contains (*THEN) */
2579    int    eptrn;                 /* Next free eptrblock */    const  pcre_uchar *start_code;  /* For use when recursing */
2580    recursion_info *recursive;    /* Linked list of recursion data */    PCRE_PUCHAR start_subject;      /* Start of the subject string */
2581    void  *callout_data;          /* To pass back to callouts */    PCRE_PUCHAR end_subject;        /* End of the subject string */
2582    struct heapframe *thisframe;  /* Used only when compiling for no recursion */    PCRE_PUCHAR start_match_ptr;    /* Start of matched string */
2583      PCRE_PUCHAR end_match_ptr;      /* Subject position at end match */
2584      PCRE_PUCHAR start_used_ptr;     /* Earliest consulted character */
2585      int    partial;                 /* PARTIAL options */
2586      int    end_offset_top;          /* Highwater mark at end of match */
2587      pcre_int32 capture_last;        /* Most recent capture number + overflow flag */
2588      int    start_offset;            /* The start offset value */
2589      int    match_function_type;     /* Set for certain special calls of MATCH() */
2590      eptrblock *eptrchain;           /* Chain of eptrblocks for tail recursions */
2591      int    eptrn;                   /* Next free eptrblock */
2592      recursion_info *recursive;      /* Linked list of recursion data */
2593      void  *callout_data;            /* To pass back to callouts */
2594      const  pcre_uchar *mark;        /* Mark pointer to pass back on success */
2595      const  pcre_uchar *nomatch_mark;/* Mark pointer to pass back on failure */
2596      const  pcre_uchar *once_target; /* Where to back up to for atomic groups */
2597    #ifdef NO_RECURSE
2598      void  *match_frames_base;       /* For remembering malloc'd frames */
2599    #endif
2600  } match_data;  } match_data;
2601    
2602  /* 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
2603  functions. */  functions. */
2604    
2605  typedef struct dfa_match_data {  typedef struct dfa_match_data {
2606    const uschar *start_code;     /* Start of the compiled pattern */    const pcre_uchar *start_code;     /* Start of the compiled pattern */
2607    const uschar *start_subject;  /* Start of the subject string */    const pcre_uchar *start_subject ; /* Start of the subject string */
2608    const uschar *end_subject;    /* End of subject string */    const pcre_uchar *end_subject;    /* End of subject string */
2609    const uschar *tables;         /* Character tables */    const pcre_uchar *start_used_ptr; /* Earliest consulted character */
2610    int   moptions;               /* Match options */    const pcre_uint8 *tables;         /* Character tables */
2611    int   poptions;               /* Pattern options */    int   start_offset;               /* The start offset value */
2612    int    nltype;                /* Newline type */    int   moptions;                   /* Match options */
2613    int    nllen;                 /* Newline string length */    int   poptions;                   /* Pattern options */
2614    uschar nl[4];                 /* Newline string when fixed */    int   nltype;                     /* Newline type */
2615    void  *callout_data;          /* To pass back to callouts */    int   nllen;                      /* Newline string length */
2616      pcre_uchar nl[4];                 /* Newline string when fixed */
2617      void *callout_data;               /* To pass back to callouts */
2618      dfa_recursion_info *recursive;    /* Linked list of recursion data */
2619  } dfa_match_data;  } dfa_match_data;
2620    
2621  /* Bit definitions for entries in the pcre_ctypes table. */  /* Bit definitions for entries in the pcre_ctypes table. */
# Line 975  typedef struct dfa_match_data { Line 2624  typedef struct dfa_match_data {
2624  #define ctype_letter  0x02  #define ctype_letter  0x02
2625  #define ctype_digit   0x04  #define ctype_digit   0x04
2626  #define ctype_xdigit  0x08  #define ctype_xdigit  0x08
2627  #define ctype_word    0x10   /* alphameric or '_' */  #define ctype_word    0x10   /* alphanumeric or '_' */
2628  #define ctype_meta    0x80   /* regexp meta char or zero (end pattern) */  #define ctype_meta    0x80   /* regexp meta char or zero (end pattern) */
2629    
2630  /* Offsets for the bitmap tables in pcre_cbits. Each table contains a set  /* Offsets for the bitmap tables in pcre_cbits. Each table contains a set
# Line 1002  total length. */ Line 2651  total length. */
2651  #define ctypes_offset (cbits_offset + cbit_length)  #define ctypes_offset (cbits_offset + cbit_length)
2652  #define tables_length (ctypes_offset + 256)  #define tables_length (ctypes_offset + 256)
2653    
2654    /* Internal function and data prefixes. */
2655    
2656    #if defined COMPILE_PCRE8
2657    #ifndef PUBL
2658    #define PUBL(name) pcre_##name
2659    #endif
2660    #ifndef PRIV
2661    #define PRIV(name) _pcre_##name
2662    #endif
2663    #elif defined COMPILE_PCRE16
2664    #ifndef PUBL
2665    #define PUBL(name) pcre16_##name
2666    #endif
2667    #ifndef PRIV
2668    #define PRIV(name) _pcre16_##name
2669    #endif
2670    #elif defined COMPILE_PCRE32
2671    #ifndef PUBL
2672    #define PUBL(name) pcre32_##name
2673    #endif
2674    #ifndef PRIV
2675    #define PRIV(name) _pcre32_##name
2676    #endif
2677    #else
2678    #error Unsupported compiling mode
2679    #endif /* COMPILE_PCRE[8|16|32] */
2680    
2681  /* 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
2682  codes. */  codes. Each entry used to point directly to a name, but to reduce the number of
2683    relocations in shared libraries, it now has an offset into a single string
2684    instead. */
2685    
2686  typedef struct {  typedef struct {
2687    const char *name;    pcre_uint16 name_offset;
2688    pcre_uint16 type;    pcre_uint16 type;
2689    pcre_uint16 value;    pcre_uint16 value;
2690  } ucp_type_table;  } ucp_type_table;
# Line 1017  of the exported public functions. They h Line 2695  of the exported public functions. They h
2695  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
2696  pcre_tables.c module. */  pcre_tables.c module. */
2697    
2698  extern const int    _pcre_utf8_table1[];  #ifdef COMPILE_PCRE8
2699  extern const int    _pcre_utf8_table2[];  extern const int            PRIV(utf8_table1)[];
2700  extern const int    _pcre_utf8_table3[];  extern const int            PRIV(utf8_table1_size);
2701  extern const uschar _pcre_utf8_table4[];  extern const int            PRIV(utf8_table2)[];
2702    extern const int            PRIV(utf8_table3)[];
2703  extern const int    _pcre_utf8_table1_size;  extern const pcre_uint8     PRIV(utf8_table4)[];
2704    #endif /* COMPILE_PCRE8 */
2705  extern const ucp_type_table _pcre_utt[];  
2706  extern const int _pcre_utt_size;  extern const char           PRIV(utt_names)[];
2707    extern const ucp_type_table PRIV(utt)[];
2708    extern const int            PRIV(utt_size);
2709    
2710  extern const uschar _pcre_default_tables[];  extern const pcre_uint8     PRIV(OP_lengths)[];
2711    extern const pcre_uint8     PRIV(default_tables)[];
2712    
2713  extern const uschar _pcre_OP_lengths[];  extern const pcre_uint32    PRIV(hspace_list)[];
2714    extern const pcre_uint32    PRIV(vspace_list)[];
2715    
2716    
2717  /* Internal shared functions. These are functions that are used by more than  /* Internal shared functions. These are functions that are used by more than
2718  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
2719  sense, but are not part of the PCRE public API. */  sense, but are not part of the PCRE public API. */
2720    
2721  extern BOOL         _pcre_is_newline(const uschar *, const uschar *, int *,  /* String comparison functions. */
2722                        BOOL);  #if defined COMPILE_PCRE8
2723  extern int          _pcre_ord2utf8(int, uschar *);  
2724  extern real_pcre   *_pcre_try_flipped(const real_pcre *, real_pcre *,  #define STRCMP_UC_UC(str1, str2) \
2725                        const pcre_study_data *, pcre_study_data *);    strcmp((char *)(str1), (char *)(str2))
2726  extern int          _pcre_ucp_findprop(const unsigned int, int *, int *);  #define STRCMP_UC_C8(str1, str2) \
2727  extern unsigned int _pcre_ucp_othercase(const unsigned int);    strcmp((char *)(str1), (str2))
2728  extern int          _pcre_valid_utf8(const uschar *, int);  #define STRNCMP_UC_UC(str1, str2, num) \
2729  extern BOOL         _pcre_was_newline(const uschar *, const uschar *, int *,    strncmp((char *)(str1), (char *)(str2), (num))
2730                        BOOL);  #define STRNCMP_UC_C8(str1, str2, num) \
2731  extern BOOL         _pcre_xclass(int, const uschar *);    strncmp((char *)(str1), (str2), (num))
2732    #define STRLEN_UC(str) strlen((const char *)str)
2733    
2734    #elif defined COMPILE_PCRE16 || defined COMPILE_PCRE32
2735    
2736    extern int               PRIV(strcmp_uc_uc)(const pcre_uchar *,
2737                               const pcre_uchar *);
2738    extern int               PRIV(strcmp_uc_c8)(const pcre_uchar *,
2739                               const char *);
2740    extern int               PRIV(strncmp_uc_uc)(const pcre_uchar *,
2741                               const pcre_uchar *, unsigned int num);
2742    extern int               PRIV(strncmp_uc_c8)(const pcre_uchar *,
2743                               const char *, unsigned int num);
2744    extern unsigned int      PRIV(strlen_uc)(const pcre_uchar *str);
2745    
2746    #define STRCMP_UC_UC(str1, str2) \
2747      PRIV(strcmp_uc_uc)((str1), (str2))
2748    #define STRCMP_UC_C8(str1, str2) \
2749      PRIV(strcmp_uc_c8)((str1), (str2))
2750    #define STRNCMP_UC_UC(str1, str2, num) \
2751      PRIV(strncmp_uc_uc)((str1), (str2), (num))
2752    #define STRNCMP_UC_C8(str1, str2, num) \
2753      PRIV(strncmp_uc_c8)((str1), (str2), (num))
2754    #define STRLEN_UC(str) PRIV(strlen_uc)(str)
2755    
2756    #endif /* COMPILE_PCRE[8|16|32] */
2757    
2758    #if defined COMPILE_PCRE8 || defined COMPILE_PCRE16
2759    
2760    #define STRCMP_UC_UC_TEST(str1, str2) STRCMP_UC_UC(str1, str2)
2761    #define STRCMP_UC_C8_TEST(str1, str2) STRCMP_UC_C8(str1, str2)
2762    
2763    #elif defined COMPILE_PCRE32
2764    
2765    extern int               PRIV(strcmp_uc_uc_utf)(const pcre_uchar *,
2766                               const pcre_uchar *);
2767    extern int               PRIV(strcmp_uc_c8_utf)(const pcre_uchar *,
2768                               const char *);
2769    
2770    #define STRCMP_UC_UC_TEST(str1, str2) \
2771      (utf ? PRIV(strcmp_uc_uc_utf)((str1), (str2)) : PRIV(strcmp_uc_uc)((str1), (str2)))
2772    #define STRCMP_UC_C8_TEST(str1, str2) \
2773      (utf ? PRIV(strcmp_uc_c8_utf)((str1), (str2)) : PRIV(strcmp_uc_c8)((str1), (str2)))
2774    
2775    #endif /* COMPILE_PCRE[8|16|32] */
2776    
2777    extern const pcre_uchar *PRIV(find_bracket)(const pcre_uchar *, BOOL, int);
2778    extern BOOL              PRIV(is_newline)(PCRE_PUCHAR, int, PCRE_PUCHAR,
2779                               int *, BOOL);
2780    extern unsigned int      PRIV(ord2utf)(pcre_uint32, pcre_uchar *);
2781    extern int               PRIV(valid_utf)(PCRE_PUCHAR, int, int *);
2782    extern BOOL              PRIV(was_newline)(PCRE_PUCHAR, int, PCRE_PUCHAR,
2783                               int *, BOOL);
2784    extern BOOL              PRIV(xclass)(pcre_uint32, const pcre_uchar *, BOOL);
2785    
2786    #ifdef SUPPORT_JIT
2787    extern void              PRIV(jit_compile)(const REAL_PCRE *,
2788                               PUBL(extra) *, int);
2789    extern int               PRIV(jit_exec)(const PUBL(extra) *,
2790                               const pcre_uchar *, int, int, int, int *, int);
2791    extern void              PRIV(jit_free)(void *);
2792    extern int               PRIV(jit_get_size)(void *);
2793    extern const char*       PRIV(jit_get_target)(void);
2794    #endif
2795    
2796    /* Unicode character database (UCD) */
2797    
2798    typedef struct {
2799      pcre_uint8 script;     /* ucp_Arabic, etc. */
2800      pcre_uint8 chartype;   /* ucp_Cc, etc. (general categories) */
2801      pcre_uint8 gbprop;     /* ucp_gbControl, etc. (grapheme break property) */
2802      pcre_uint8 caseset;    /* offset to multichar other cases or zero */
2803      pcre_int32 other_case; /* offset to other case, or zero if none */
2804    } ucd_record;
2805    
2806    extern const pcre_uint32 PRIV(ucd_caseless_sets)[];
2807    extern const ucd_record  PRIV(ucd_records)[];
2808    extern const pcre_uint8  PRIV(ucd_stage1)[];
2809    extern const pcre_uint16 PRIV(ucd_stage2)[];
2810    extern const pcre_uint32 PRIV(ucp_gentype)[];
2811    extern const pcre_uint32 PRIV(ucp_gbtable)[];
2812    #ifdef SUPPORT_JIT
2813    extern const int         PRIV(ucp_typerange)[];
2814    #endif
2815    
2816    #ifdef SUPPORT_UCP
2817    /* UCD access macros */
2818    
2819    #define UCD_BLOCK_SIZE 128
2820    #define GET_UCD(ch) (PRIV(ucd_records) + \
2821            PRIV(ucd_stage2)[PRIV(ucd_stage1)[(int)(ch) / UCD_BLOCK_SIZE] * \
2822            UCD_BLOCK_SIZE + (int)(ch) % UCD_BLOCK_SIZE])
2823    
2824    #define UCD_CHARTYPE(ch)    GET_UCD(ch)->chartype
2825    #define UCD_SCRIPT(ch)      GET_UCD(ch)->script
2826    #define UCD_CATEGORY(ch)    PRIV(ucp_gentype)[UCD_CHARTYPE(ch)]
2827    #define UCD_GRAPHBREAK(ch)  GET_UCD(ch)->gbprop
2828    #define UCD_CASESET(ch)     GET_UCD(ch)->caseset
2829    #define UCD_OTHERCASE(ch)   ((pcre_uint32)((int)ch + (int)(GET_UCD(ch)->other_case)))
2830    
2831    #endif /* SUPPORT_UCP */
2832    
2833  #endif  #endif
2834    

Legend:
Removed from v.137  
changed lines
  Added in v.1389

  ViewVC Help
Powered by ViewVC 1.1.5