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