wcstod no more convert d and D characters
[scilab.git] / scilab / modules / string / src / c / pcre_internal.h
1 /*************************************************
2 *      Perl-Compatible Regular Expressions       *
3 *************************************************/
4
5
6 /* PCRE is a library of functions to support regular expressions whose syntax
7 and semantics are as close as possible to those of the Perl 5 language.
8
9                        Written by Philip Hazel
10            Copyright (c) 1997-2008 University of Cambridge
11
12 -----------------------------------------------------------------------------
13 Redistribution and use in source and binary forms, with or without
14 modification, 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
27 THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
28 AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
29 IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
30 ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
31 LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
32 CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
33 SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
34 INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
35 CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
36 ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
37 POSSIBILITY OF SUCH DAMAGE.
38 -----------------------------------------------------------------------------
39 */
40
41 /* This header contains definitions that are shared between the different
42 modules, but which are not relevant to the exported API. This includes some
43 functions whose names all begin with "_pcre_". */
44
45 #ifndef PCRE_INTERNAL_H
46 #define PCRE_INTERNAL_H
47
48 /* Define DEBUG to get debugging output on stdout. */
49
50 #if 0
51 #define DEBUG
52 #endif
53
54 /* Use a macro for debugging printing, 'cause that eliminates the use of #ifdef
55 inline, and there are *still* stupid compilers about that don't like indented
56 pre-processor statements, or at least there were when I first wrote this. After
57 all, it had only been about 10 years then...
58
59 It turns out that the Mac Debugging.h header also defines the macro DPRINTF, so
60 be absolutely sure we get our version. */
61
62 #undef DPRINTF
63 #ifdef DEBUG
64 #define DPRINTF(p) printf p
65 #else
66 #define DPRINTF(p) /* Nothing */
67 #endif
68
69
70 /* Standard C headers plus the external interface definition. The only time
71 setjmp and stdarg are used is when NO_RECURSE is set. */
72
73 #include <ctype.h>
74 #include <limits.h>
75 #include <setjmp.h>
76 #include <stdarg.h>
77 #include <stddef.h>
78 #include <stdio.h>
79 #include <stdlib.h>
80 #include <string.h>
81
82 /* When compiling a DLL for Windows, the exported symbols have to be declared
83 using some MS magic. I found some useful information on this web page:
84 http://msdn2.microsoft.com/en-us/library/y4h7bcy6(VS.80).aspx. According to the
85 information there, using __declspec(dllexport) without "extern" we have a
86 definition; with "extern" we have a declaration. The settings here override the
87 setting in pcre.h (which is included below); it defines only PCRE_EXP_DECL,
88 which is all that is needed for applications (they just import the symbols). We
89 use:
90
91   PCRE_EXP_DECL       for declarations
92   PCRE_EXP_DEFN       for definitions of exported functions
93   PCRE_EXP_DATA_DEFN  for definitions of exported variables
94
95 The reason for the two DEFN macros is that in non-Windows environments, one
96 does not want to have "extern" before variable definitions because it leads to
97 compiler warnings. So we distinguish between functions and variables. In
98 Windows, the two should always be the same.
99
100 The reason for wrapping this in #ifndef PCRE_EXP_DECL is so that pcretest,
101 which is an application, but needs to import this file in order to "peek" at
102 internals, can #include pcre.h first to get an application's-eye view.
103
104 In principle, people compiling for non-Windows, non-Unix-like (i.e. uncommon,
105 special-purpose environments) might want to stick other stuff in front of
106 exported symbols. That's why, in the non-Windows case, we set PCRE_EXP_DEFN and
107 PCRE_EXP_DATA_DEFN only if they are not already set. */
108
109 #ifndef PCRE_EXP_DECL
110 #  ifdef _WIN32
111 #    ifndef PCRE_STATIC
112 #      define PCRE_EXP_DECL       extern __declspec(dllexport)
113 #      define PCRE_EXP_DEFN       __declspec(dllexport)
114 #      define PCRE_EXP_DATA_DEFN  __declspec(dllexport)
115 #    else
116 #      define PCRE_EXP_DECL       extern
117 #      define PCRE_EXP_DEFN
118 #      define PCRE_EXP_DATA_DEFN
119 #    endif
120 #  else
121 #    ifdef __cplusplus
122 #      define PCRE_EXP_DECL       extern "C"
123 #    else
124 #      define PCRE_EXP_DECL       extern
125 #    endif
126 #    ifndef PCRE_EXP_DEFN
127 #      define PCRE_EXP_DEFN       PCRE_EXP_DECL
128 #    endif
129 #    ifndef PCRE_EXP_DATA_DEFN
130 #      define PCRE_EXP_DATA_DEFN
131 #    endif
132 #  endif
133 #endif
134
135 /* We need to have types that specify unsigned 16-bit and 32-bit integers. We
136 cannot determine these outside the compilation (e.g. by running a program as
137 part of "configure") because PCRE is often cross-compiled for use on other
138 systems. Instead we make use of the maximum sizes that are available at
139 preprocessor time in standard C environments. */
140
141 #if USHRT_MAX == 65535
142 typedef unsigned short pcre_uint16;
143 #elif UINT_MAX == 65535
144 typedef unsigned int pcre_uint16;
145 #else
146 #error Cannot determine a type for 16-bit unsigned integers
147 #endif
148
149 #if UINT_MAX == 4294967295
150 typedef unsigned int pcre_uint32;
151 #elif ULONG_MAX == 4294967295
152 typedef unsigned long int pcre_uint32;
153 #else
154 #error Cannot determine a type for 32-bit unsigned integers
155 #endif
156
157 /* All character handling must be done as unsigned characters. Otherwise there
158 are problems with top-bit-set characters and functions such as isspace().
159 However, we leave the interface to the outside world as char *, because that
160 should make things easier for callers. We define a short type for unsigned char
161 to save lots of typing. I tried "uchar", but it causes problems on Digital
162 Unix, where it is defined in sys/types, so use "uschar" instead. */
163
164 typedef unsigned char uschar;
165
166 /* This is an unsigned int value that no character can ever have. UTF-8
167 characters only go up to 0x7fffffff (though Unicode doesn't go beyond
168 0x0010ffff). */
169
170 #define NOTACHAR 0xffffffff
171
172 /* PCRE is able to support several different kinds of newline (CR, LF, CRLF,
173 "any" and "anycrlf" at present). The following macros are used to package up
174 testing for newlines. NLBLOCK, PSSTART, and PSEND are defined in the various
175 modules to indicate in which datablock the parameters exist, and what the
176 start/end of string field names are. */
177
178 #define NLTYPE_FIXED    0     /* Newline is a fixed length string */
179 #define NLTYPE_ANY      1     /* Newline is any Unicode line ending */
180 #define NLTYPE_ANYCRLF  2     /* Newline is CR, LF, or CRLF */
181
182 /* This macro checks for a newline at the given position */
183
184 #define IS_NEWLINE(p) \
185   ((NLBLOCK->nltype != NLTYPE_FIXED)? \
186     ((p) < NLBLOCK->PSEND && \
187      _pcre_is_newline((p), NLBLOCK->nltype, NLBLOCK->PSEND, &(NLBLOCK->nllen),\
188        utf8)) \
189     : \
190     ((p) <= NLBLOCK->PSEND - NLBLOCK->nllen && \
191      (p)[0] == NLBLOCK->nl[0] && \
192      (NLBLOCK->nllen == 1 || (p)[1] == NLBLOCK->nl[1]) \
193     ) \
194   )
195
196 /* This macro checks for a newline immediately preceding the given position */
197
198 #define WAS_NEWLINE(p) \
199   ((NLBLOCK->nltype != NLTYPE_FIXED)? \
200     ((p) > NLBLOCK->PSSTART && \
201      _pcre_was_newline((p), NLBLOCK->nltype, NLBLOCK->PSSTART, \
202        &(NLBLOCK->nllen), utf8)) \
203     : \
204     ((p) >= NLBLOCK->PSSTART + NLBLOCK->nllen && \
205      (p)[-NLBLOCK->nllen] == NLBLOCK->nl[0] && \
206      (NLBLOCK->nllen == 1 || (p)[-NLBLOCK->nllen+1] == NLBLOCK->nl[1]) \
207     ) \
208   )
209
210 /* When PCRE is compiled as a C++ library, the subject pointer can be replaced
211 with a custom type. This makes it possible, for example, to allow pcre_exec()
212 to process subject strings that are discontinuous by using a smart pointer
213 class. It must always be possible to inspect all of the subject string in
214 pcre_exec() because of the way it backtracks. Two macros are required in the
215 normal case, for sign-unspecified and unsigned char pointers. The former is
216 used for the external interface and appears in pcre.h, which is why its name
217 must begin with PCRE_. */
218
219 #ifdef CUSTOM_SUBJECT_PTR
220 #define PCRE_SPTR CUSTOM_SUBJECT_PTR
221 #define USPTR CUSTOM_SUBJECT_PTR
222 #else
223 #define PCRE_SPTR const char *
224 #define USPTR const unsigned char *
225 #endif
226
227
228
229 /* Include the public PCRE header and the definitions of UCP character property
230 values. */
231
232 #include "pcre.h"
233 #include "ucp.h"
234
235 /* When compiling for use with the Virtual Pascal compiler, these functions
236 need to have their names changed. PCRE must be compiled with the -DVPCOMPAT
237 option on the command line. */
238
239 #ifdef VPCOMPAT
240 #define strlen(s)        _strlen(s)
241 #define strncmp(s1,s2,m) _strncmp(s1,s2,m)
242 #define memcmp(s,c,n)    _memcmp(s,c,n)
243 #define memcpy(d,s,n)    _memcpy(d,s,n)
244 #define memmove(d,s,n)   _memmove(d,s,n)
245 #define memset(s,c,n)    _memset(s,c,n)
246 #endif   /* not VPCOMPAT */
247
248
249 /* PCRE keeps offsets in its compiled code as 2-byte quantities (always stored
250 in big-endian order) by default. These are used, for example, to link from the
251 start of a subpattern to its alternatives and its end. The use of 2 bytes per
252 offset limits the size of the compiled regex to around 64K, which is big enough
253 for almost everybody. However, I received a request for an even bigger limit.
254 For this reason, and also to make the code easier to maintain, the storing and
255 loading of offsets from the byte string is now handled by the macros that are
256 defined here.
257
258 The macros are controlled by the value of LINK_SIZE. This defaults to 2 in
259 the config.h file, but can be overridden by using -D on the command line. This
260 is automated on Unix systems via the "configure" command. */
261
262 #if LINK_SIZE == 2
263
264 #define PUT(a,n,d)   \
265   (a[n] = (d) >> 8), \
266   (a[(n)+1] = (d) & 255)
267
268 #define GET(a,n) \
269   (((a)[n] << 8) | (a)[(n)+1])
270
271 #define MAX_PATTERN_SIZE (1 << 16)
272
273
274 #elif LINK_SIZE == 3
275
276 #define PUT(a,n,d)       \
277   (a[n] = (d) >> 16),    \
278   (a[(n)+1] = (d) >> 8), \
279   (a[(n)+2] = (d) & 255)
280
281 #define GET(a,n) \
282   (((a)[n] << 16) | ((a)[(n)+1] << 8) | (a)[(n)+2])
283
284 #define MAX_PATTERN_SIZE (1 << 24)
285
286
287 #elif LINK_SIZE == 4
288
289 #define PUT(a,n,d)        \
290   (a[n] = (d) >> 24),     \
291   (a[(n)+1] = (d) >> 16), \
292   (a[(n)+2] = (d) >> 8),  \
293   (a[(n)+3] = (d) & 255)
294
295 #define GET(a,n) \
296   (((a)[n] << 24) | ((a)[(n)+1] << 16) | ((a)[(n)+2] << 8) | (a)[(n)+3])
297
298 #define MAX_PATTERN_SIZE (1 << 30)   /* Keep it positive */
299
300
301 #else
302 #error LINK_SIZE must be either 2, 3, or 4
303 #endif
304
305
306 /* Convenience macro defined in terms of the others */
307
308 #define PUTINC(a,n,d)   PUT(a,n,d), a += LINK_SIZE
309
310
311 /* PCRE uses some other 2-byte quantities that do not change when the size of
312 offsets changes. There are used for repeat counts and for other things such as
313 capturing parenthesis numbers in back references. */
314
315 #define PUT2(a,n,d)   \
316   a[n] = (d) >> 8; \
317   a[(n)+1] = (d) & 255
318
319 #define GET2(a,n) \
320   (((a)[n] << 8) | (a)[(n)+1])
321
322 #define PUT2INC(a,n,d)  PUT2(a,n,d), a += 2
323
324
325 /* When UTF-8 encoding is being used, a character is no longer just a single
326 byte. The macros for character handling generate simple sequences when used in
327 byte-mode, and more complicated ones for UTF-8 characters. BACKCHAR should
328 never be called in byte mode. To make sure it can never even appear when UTF-8
329 support is omitted, we don't even define it. */
330
331 #ifndef SUPPORT_UTF8
332 #define NEXTCHAR(p) p++;
333 #define GETCHAR(c, eptr) c = *eptr;
334 #define GETCHARTEST(c, eptr) c = *eptr;
335 #define GETCHARINC(c, eptr) c = *eptr++;
336 #define GETCHARINCTEST(c, eptr) c = *eptr++;
337 #define GETCHARLEN(c, eptr, len) c = *eptr;
338 /* #define BACKCHAR(eptr) */
339
340 #else   /* SUPPORT_UTF8 */
341
342 /* Advance a character pointer one byte in non-UTF-8 mode and by one character
343 in UTF-8 mode. */
344
345 #define NEXTCHAR(p) \
346   p++; \
347   if (utf8) { while((*p & 0xc0) == 0x80) p++; }
348
349 /* Get the next UTF-8 character, not advancing the pointer. This is called when
350 we know we are in UTF-8 mode. */
351
352 #define GETCHAR(c, eptr) \
353   c = *eptr; \
354   if (c >= 0xc0) \
355     { \
356     int gcii; \
357     int gcaa = _pcre_utf8_table4[c & 0x3f];  /* Number of additional bytes */ \
358     int gcss = 6*gcaa; \
359     c = (c & _pcre_utf8_table3[gcaa]) << gcss; \
360     for (gcii = 1; gcii <= gcaa; gcii++) \
361       { \
362       gcss -= 6; \
363       c |= (eptr[gcii] & 0x3f) << gcss; \
364       } \
365     }
366
367 /* Get the next UTF-8 character, testing for UTF-8 mode, and not advancing the
368 pointer. */
369
370 #define GETCHARTEST(c, eptr) \
371   c = *eptr; \
372   if (utf8 && c >= 0xc0) \
373     { \
374     int gcii; \
375     int gcaa = _pcre_utf8_table4[c & 0x3f];  /* Number of additional bytes */ \
376     int gcss = 6*gcaa; \
377     c = (c & _pcre_utf8_table3[gcaa]) << gcss; \
378     for (gcii = 1; gcii <= gcaa; gcii++) \
379       { \
380       gcss -= 6; \
381       c |= (eptr[gcii] & 0x3f) << gcss; \
382       } \
383     }
384
385 /* Get the next UTF-8 character, advancing the pointer. This is called when we
386 know we are in UTF-8 mode. */
387
388 #define GETCHARINC(c, eptr) \
389   c = *eptr++; \
390   if (c >= 0xc0) \
391     { \
392     int gcaa = _pcre_utf8_table4[c & 0x3f];  /* Number of additional bytes */ \
393     int gcss = 6*gcaa; \
394     c = (c & _pcre_utf8_table3[gcaa]) << gcss; \
395     while (gcaa-- > 0) \
396       { \
397       gcss -= 6; \
398       c |= (*eptr++ & 0x3f) << gcss; \
399       } \
400     }
401
402 /* Get the next character, testing for UTF-8 mode, and advancing the pointer */
403
404 #define GETCHARINCTEST(c, eptr) \
405   c = *eptr++; \
406   if (utf8 && c >= 0xc0) \
407     { \
408     int gcaa = _pcre_utf8_table4[c & 0x3f];  /* Number of additional bytes */ \
409     int gcss = 6*gcaa; \
410     c = (c & _pcre_utf8_table3[gcaa]) << gcss; \
411     while (gcaa-- > 0) \
412       { \
413       gcss -= 6; \
414       c |= (*eptr++ & 0x3f) << gcss; \
415       } \
416     }
417
418 /* Get the next UTF-8 character, not advancing the pointer, incrementing length
419 if there are extra bytes. This is called when we know we are in UTF-8 mode. */
420
421 #define GETCHARLEN(c, eptr, len) \
422   c = *eptr; \
423   if (c >= 0xc0) \
424     { \
425     int gcii; \
426     int gcaa = _pcre_utf8_table4[c & 0x3f];  /* Number of additional bytes */ \
427     int gcss = 6*gcaa; \
428     c = (c & _pcre_utf8_table3[gcaa]) << gcss; \
429     for (gcii = 1; gcii <= gcaa; gcii++) \
430       { \
431       gcss -= 6; \
432       c |= (eptr[gcii] & 0x3f) << gcss; \
433       } \
434     len += gcaa; \
435     }
436
437 /* If the pointer is not at the start of a character, move it back until
438 it is. This is called only in UTF-8 mode - we don't put a test within the macro
439 because almost all calls are already within a block of UTF-8 only code. */
440
441 #define BACKCHAR(eptr) while((*eptr & 0xc0) == 0x80) eptr--
442
443 #endif
444
445
446 /* In case there is no definition of offsetof() provided - though any proper
447 Standard C system should have one. */
448
449 #ifndef offsetof
450 #define offsetof(p_type,field) ((size_t)&(((p_type *)0)->field))
451 #endif
452
453
454 /* These are the public options that can change during matching. */
455
456 #define PCRE_IMS (PCRE_CASELESS|PCRE_MULTILINE|PCRE_DOTALL)
457
458 /* Private flags containing information about the compiled regex. They used to
459 live at the top end of the options word, but that got almost full, so now they
460 are in a 16-bit flags word. */
461
462 #define PCRE_NOPARTIAL     0x0001  /* can't use partial with this regex */
463 #define PCRE_FIRSTSET      0x0002  /* first_byte is set */
464 #define PCRE_REQCHSET      0x0004  /* req_byte is set */
465 #define PCRE_STARTLINE     0x0008  /* start after \n for multiline */
466 #define PCRE_JCHANGED      0x0010  /* j option used in regex */
467 #define PCRE_HASCRORLF     0x0020  /* explicit \r or \n in pattern */
468
469 /* Options for the "extra" block produced by pcre_study(). */
470
471 #define PCRE_STUDY_MAPPED   0x01     /* a map of starting chars exists */
472
473 /* Masks for identifying the public options that are permitted at compile
474 time, run time, or study time, respectively. */
475
476 #define PCRE_NEWLINE_BITS (PCRE_NEWLINE_CR|PCRE_NEWLINE_LF|PCRE_NEWLINE_ANY| \
477                            PCRE_NEWLINE_ANYCRLF)
478
479 #define PUBLIC_OPTIONS \
480   (PCRE_CASELESS|PCRE_EXTENDED|PCRE_ANCHORED|PCRE_MULTILINE| \
481    PCRE_DOTALL|PCRE_DOLLAR_ENDONLY|PCRE_EXTRA|PCRE_UNGREEDY|PCRE_UTF8| \
482    PCRE_NO_AUTO_CAPTURE|PCRE_NO_UTF8_CHECK|PCRE_AUTO_CALLOUT|PCRE_FIRSTLINE| \
483    PCRE_DUPNAMES|PCRE_NEWLINE_BITS|PCRE_BSR_ANYCRLF|PCRE_BSR_UNICODE| \
484    PCRE_JAVASCRIPT_COMPAT)
485
486 #define PUBLIC_EXEC_OPTIONS \
487   (PCRE_ANCHORED|PCRE_NOTBOL|PCRE_NOTEOL|PCRE_NOTEMPTY|PCRE_NO_UTF8_CHECK| \
488    PCRE_PARTIAL|PCRE_NEWLINE_BITS|PCRE_BSR_ANYCRLF|PCRE_BSR_UNICODE)
489
490 #define PUBLIC_DFA_EXEC_OPTIONS \
491   (PCRE_ANCHORED|PCRE_NOTBOL|PCRE_NOTEOL|PCRE_NOTEMPTY|PCRE_NO_UTF8_CHECK| \
492    PCRE_PARTIAL|PCRE_DFA_SHORTEST|PCRE_DFA_RESTART|PCRE_NEWLINE_BITS| \
493    PCRE_BSR_ANYCRLF|PCRE_BSR_UNICODE)
494
495 #define PUBLIC_STUDY_OPTIONS 0   /* None defined */
496
497 /* Magic number to provide a small check against being handed junk. Also used
498 to detect whether a pattern was compiled on a host of different endianness. */
499
500 #define MAGIC_NUMBER  0x50435245UL   /* 'PCRE' */
501
502 /* Negative values for the firstchar and reqchar variables */
503
504 #define REQ_UNSET (-2)
505 #define REQ_NONE  (-1)
506
507 /* The maximum remaining length of subject we are prepared to search for a
508 req_byte match. */
509
510 #define REQ_BYTE_MAX 1000
511
512 /* Flags added to firstbyte or reqbyte; a "non-literal" item is either a
513 variable-length repeat, or anything other than literal characters. */
514
515 #define REQ_CASELESS 0x0100    /* indicates caselessness */
516 #define REQ_VARY     0x0200    /* reqbyte followed non-literal item */
517
518 /* Miscellaneous definitions */
519
520 /* Already defined in scilab modules/core/includes/BOOL.h */
521 /* typedef int BOOL; */
522
523 #define FALSE   0
524 #define TRUE    1
525
526 /* Escape items that are just an encoding of a particular data value. */
527
528 #ifndef ESC_e
529 #define ESC_e 27
530 #endif
531
532 #ifndef ESC_f
533 #define ESC_f '\f'
534 #endif
535
536 #ifndef ESC_n
537 #define ESC_n '\n'
538 #endif
539
540 #ifndef ESC_r
541 #define ESC_r '\r'
542 #endif
543
544 /* We can't officially use ESC_t because it is a POSIX reserved identifier
545 (presumably because of all the others like size_t). */
546
547 #ifndef ESC_tee
548 #define ESC_tee '\t'
549 #endif
550
551 /* Codes for different types of Unicode property */
552
553 #define PT_ANY        0    /* Any property - matches all chars */
554 #define PT_LAMP       1    /* L& - the union of Lu, Ll, Lt */
555 #define PT_GC         2    /* General characteristic (e.g. L) */
556 #define PT_PC         3    /* Particular characteristic (e.g. Lu) */
557 #define PT_SC         4    /* Script (e.g. Han) */
558
559 /* Flag bits and data types for the extended class (OP_XCLASS) for classes that
560 contain UTF-8 characters with values greater than 255. */
561
562 #define XCL_NOT    0x01    /* Flag: this is a negative class */
563 #define XCL_MAP    0x02    /* Flag: a 32-byte map is present */
564
565 #define XCL_END       0    /* Marks end of individual items */
566 #define XCL_SINGLE    1    /* Single item (one multibyte char) follows */
567 #define XCL_RANGE     2    /* A range (two multibyte chars) follows */
568 #define XCL_PROP      3    /* Unicode property (2-byte property code follows) */
569 #define XCL_NOTPROP   4    /* Unicode inverted property (ditto) */
570
571 /* These are escaped items that aren't just an encoding of a particular data
572 value such as \n. They must have non-zero values, as check_escape() returns
573 their negation. Also, they must appear in the same order as in the opcode
574 definitions below, up to ESC_z. There's a dummy for OP_ANY because it
575 corresponds to "." rather than an escape sequence, and another for OP_ALLANY
576 (which is used for [^] in JavaScript compatibility mode).
577
578 The final escape must be ESC_REF as subsequent values are used for
579 backreferences (\1, \2, \3, etc). There are two tests in the code for an escape
580 greater than ESC_b and less than ESC_Z to detect the types that may be
581 repeated. These are the types that consume characters. If any new escapes are
582 put in between that don't consume a character, that code will have to change.
583 */
584
585 enum { ESC_A = 1, ESC_G, ESC_K, ESC_B, ESC_b, ESC_D, ESC_d, ESC_S, ESC_s,
586        ESC_W, ESC_w, ESC_dum1, ESC_dum2, ESC_C, ESC_P, ESC_p, ESC_R, ESC_H,
587        ESC_h, ESC_V, ESC_v, ESC_X, ESC_Z, ESC_z, ESC_E, ESC_Q, ESC_g, ESC_k,
588        ESC_REF
589      };
590
591
592 /* Opcode table: Starting from 1 (i.e. after OP_END), the values up to
593 OP_EOD must correspond in order to the list of escapes immediately above.
594
595 *** NOTE NOTE NOTE *** Whenever this list is updated, the two macro definitions
596 that follow must also be updated to match. There is also a table called
597 "coptable" in pcre_dfa_exec.c that must be updated. */
598
599 enum
600 {
601     OP_END,            /* 0 End of pattern */
602
603     /* Values corresponding to backslashed metacharacters */
604
605     OP_SOD,            /* 1 Start of data: \A */
606     OP_SOM,            /* 2 Start of match (subject + offset): \G */
607     OP_SET_SOM,        /* 3 Set start of match (\K) */
608     OP_NOT_WORD_BOUNDARY,  /*  4 \B */
609     OP_WORD_BOUNDARY,      /*  5 \b */
610     OP_NOT_DIGIT,          /*  6 \D */
611     OP_DIGIT,              /*  7 \d */
612     OP_NOT_WHITESPACE,     /*  8 \S */
613     OP_WHITESPACE,         /*  9 \s */
614     OP_NOT_WORDCHAR,       /* 10 \W */
615     OP_WORDCHAR,           /* 11 \w */
616     OP_ANY,            /* 12 Match any character (subject to DOTALL) */
617     OP_ALLANY,         /* 13 Match any character (not subject to DOTALL) */
618     OP_ANYBYTE,        /* 14 Match any byte (\C); different to OP_ANY for UTF-8 */
619     OP_NOTPROP,        /* 15 \P (not Unicode property) */
620     OP_PROP,           /* 16 \p (Unicode property) */
621     OP_ANYNL,          /* 17 \R (any newline sequence) */
622     OP_NOT_HSPACE,     /* 18 \H (not horizontal whitespace) */
623     OP_HSPACE,         /* 19 \h (horizontal whitespace) */
624     OP_NOT_VSPACE,     /* 20 \V (not vertical whitespace) */
625     OP_VSPACE,         /* 21 \v (vertical whitespace) */
626     OP_EXTUNI,         /* 22 \X (extended Unicode sequence */
627     OP_EODN,           /* 23 End of data or \n at end of data: \Z. */
628     OP_EOD,            /* 24 End of data: \z */
629
630     OP_OPT,            /* 25 Set runtime options */
631     OP_CIRC,           /* 26 Start of line - varies with multiline switch */
632     OP_DOLL,           /* 27 End of line - varies with multiline switch */
633     OP_CHAR,           /* 28 Match one character, casefully */
634     OP_CHARNC,         /* 29 Match one character, caselessly */
635     OP_NOT,            /* 30 Match one character, not the following one */
636
637     OP_STAR,           /* 31 The maximizing and minimizing versions of */
638     OP_MINSTAR,        /* 32 these six opcodes must come in pairs, with */
639     OP_PLUS,           /* 33 the minimizing one second. */
640     OP_MINPLUS,        /* 34 This first set applies to single characters.*/
641     OP_QUERY,          /* 35 */
642     OP_MINQUERY,       /* 36 */
643
644     OP_UPTO,           /* 37 From 0 to n matches */
645     OP_MINUPTO,        /* 38 */
646     OP_EXACT,          /* 39 Exactly n matches */
647
648     OP_POSSTAR,        /* 40 Possessified star */
649     OP_POSPLUS,        /* 41 Possessified plus */
650     OP_POSQUERY,       /* 42 Posesssified query */
651     OP_POSUPTO,        /* 43 Possessified upto */
652
653     OP_NOTSTAR,        /* 44 The maximizing and minimizing versions of */
654     OP_NOTMINSTAR,     /* 45 these six opcodes must come in pairs, with */
655     OP_NOTPLUS,        /* 46 the minimizing one second. They must be in */
656     OP_NOTMINPLUS,     /* 47 exactly the same order as those above. */
657     OP_NOTQUERY,       /* 48 This set applies to "not" single characters. */
658     OP_NOTMINQUERY,    /* 49 */
659
660     OP_NOTUPTO,        /* 50 From 0 to n matches */
661     OP_NOTMINUPTO,     /* 51 */
662     OP_NOTEXACT,       /* 52 Exactly n matches */
663
664     OP_NOTPOSSTAR,     /* 53 Possessified versions */
665     OP_NOTPOSPLUS,     /* 54 */
666     OP_NOTPOSQUERY,    /* 55 */
667     OP_NOTPOSUPTO,     /* 56 */
668
669     OP_TYPESTAR,       /* 57 The maximizing and minimizing versions of */
670     OP_TYPEMINSTAR,    /* 58 these six opcodes must come in pairs, with */
671     OP_TYPEPLUS,       /* 59 the minimizing one second. These codes must */
672     OP_TYPEMINPLUS,    /* 60 be in exactly the same order as those above. */
673     OP_TYPEQUERY,      /* 61 This set applies to character types such as \d */
674     OP_TYPEMINQUERY,   /* 62 */
675
676     OP_TYPEUPTO,       /* 63 From 0 to n matches */
677     OP_TYPEMINUPTO,    /* 64 */
678     OP_TYPEEXACT,      /* 65 Exactly n matches */
679
680     OP_TYPEPOSSTAR,    /* 66 Possessified versions */
681     OP_TYPEPOSPLUS,    /* 67 */
682     OP_TYPEPOSQUERY,   /* 68 */
683     OP_TYPEPOSUPTO,    /* 69 */
684
685     OP_CRSTAR,         /* 70 The maximizing and minimizing versions of */
686     OP_CRMINSTAR,      /* 71 all these opcodes must come in pairs, with */
687     OP_CRPLUS,         /* 72 the minimizing one second. These codes must */
688     OP_CRMINPLUS,      /* 73 be in exactly the same order as those above. */
689     OP_CRQUERY,        /* 74 These are for character classes and back refs */
690     OP_CRMINQUERY,     /* 75 */
691     OP_CRRANGE,        /* 76 These are different to the three sets above. */
692     OP_CRMINRANGE,     /* 77 */
693
694     OP_CLASS,          /* 78 Match a character class, chars < 256 only */
695     OP_NCLASS,         /* 79 Same, but the bitmap was created from a negative
696                            class - the difference is relevant only when a UTF-8
697                            character > 255 is encountered. */
698
699     OP_XCLASS,         /* 80 Extended class for handling UTF-8 chars within the
700                            class. This does both positive and negative. */
701
702     OP_REF,            /* 81 Match a back reference */
703     OP_RECURSE,        /* 82 Match a numbered subpattern (possibly recursive) */
704     OP_CALLOUT,        /* 83 Call out to external function if provided */
705
706     OP_ALT,            /* 84 Start of alternation */
707     OP_KET,            /* 85 End of group that doesn't have an unbounded repeat */
708     OP_KETRMAX,        /* 86 These two must remain together and in this */
709     OP_KETRMIN,        /* 87 order. They are for groups the repeat for ever. */
710
711     /* The assertions must come before BRA, CBRA, ONCE, and COND.*/
712
713     OP_ASSERT,         /* 88 Positive lookahead */
714     OP_ASSERT_NOT,     /* 89 Negative lookahead */
715     OP_ASSERTBACK,     /* 90 Positive lookbehind */
716     OP_ASSERTBACK_NOT, /* 91 Negative lookbehind */
717     OP_REVERSE,        /* 92 Move pointer back - used in lookbehind assertions */
718
719     /* ONCE, BRA, CBRA, and COND must come after the assertions, with ONCE first,
720     as there's a test for >= ONCE for a subpattern that isn't an assertion. */
721
722     OP_ONCE,           /* 93 Atomic group */
723     OP_BRA,            /* 94 Start of non-capturing bracket */
724     OP_CBRA,           /* 95 Start of capturing bracket */
725     OP_COND,           /* 96 Conditional group */
726
727     /* These three must follow the previous three, in the same order. There's a
728     check for >= SBRA to distinguish the two sets. */
729
730     OP_SBRA,           /* 97 Start of non-capturing bracket, check empty  */
731     OP_SCBRA,          /* 98 Start of capturing bracket, check empty */
732     OP_SCOND,          /* 99 Conditional group, check empty */
733
734     OP_CREF,           /* 100 Used to hold a capture number as condition */
735     OP_RREF,           /* 101 Used to hold a recursion number as condition */
736     OP_DEF,            /* 102 The DEFINE condition */
737
738     OP_BRAZERO,        /* 103 These two must remain together and in this */
739     OP_BRAMINZERO,     /* 104 order. */
740
741     /* These are backtracking control verbs */
742
743     OP_PRUNE,          /* 105 */
744     OP_SKIP,           /* 106 */
745     OP_THEN,           /* 107 */
746     OP_COMMIT,         /* 108 */
747
748     /* These are forced failure and success verbs */
749
750     OP_FAIL,           /* 109 */
751     OP_ACCEPT,         /* 110 */
752
753     /* This is used to skip a subpattern with a {0} quantifier */
754
755     OP_SKIPZERO        /* 111 */
756 };
757
758
759 /* This macro defines textual names for all the opcodes. These are used only
760 for debugging. The macro is referenced only in pcre_printint.c. */
761
762 #define OP_NAME_LIST \
763   "End", "\\A", "\\G", "\\K", "\\B", "\\b", "\\D", "\\d",         \
764   "\\S", "\\s", "\\W", "\\w", "Any", "AllAny", "Anybyte",         \
765   "notprop", "prop", "\\R", "\\H", "\\h", "\\V", "\\v",           \
766   "extuni",  "\\Z", "\\z",                                        \
767   "Opt", "^", "$", "char", "charnc", "not",                       \
768   "*", "*?", "+", "+?", "?", "??", "{", "{", "{",                 \
769   "*+","++", "?+", "{",                                           \
770   "*", "*?", "+", "+?", "?", "??", "{", "{", "{",                 \
771   "*+","++", "?+", "{",                                           \
772   "*", "*?", "+", "+?", "?", "??", "{", "{", "{",                 \
773   "*+","++", "?+", "{",                                           \
774   "*", "*?", "+", "+?", "?", "??", "{", "{",                      \
775   "class", "nclass", "xclass", "Ref", "Recurse", "Callout",       \
776   "Alt", "Ket", "KetRmax", "KetRmin", "Assert", "Assert not",     \
777   "AssertB", "AssertB not", "Reverse",                            \
778   "Once", "Bra", "CBra", "Cond", "SBra", "SCBra", "SCond",        \
779   "Cond ref", "Cond rec", "Cond def", "Brazero", "Braminzero",    \
780   "*PRUNE", "*SKIP", "*THEN", "*COMMIT", "*FAIL", "*ACCEPT",      \
781   "Skip zero"
782
783
784 /* This macro defines the length of fixed length operations in the compiled
785 regex. The lengths are used when searching for specific things, and also in the
786 debugging printing of a compiled regex. We use a macro so that it can be
787 defined close to the definitions of the opcodes themselves.
788
789 As things have been extended, some of these are no longer fixed lenths, but are
790 minima instead. For example, the length of a single-character repeat may vary
791 in UTF-8 mode. The code that uses this table must know about such things. */
792
793 #define OP_LENGTHS \
794   1,                             /* End                                    */ \
795   1, 1, 1, 1, 1,                 /* \A, \G, \K, \B, \b                     */ \
796   1, 1, 1, 1, 1, 1,              /* \D, \d, \S, \s, \W, \w                 */ \
797   1, 1, 1,                       /* Any, AllAny, Anybyte                   */ \
798   3, 3, 1,                       /* NOTPROP, PROP, EXTUNI                  */ \
799   1, 1, 1, 1, 1,                 /* \R, \H, \h, \V, \v                     */ \
800   1, 1, 2, 1, 1,                 /* \Z, \z, Opt, ^, $                      */ \
801   2,                             /* Char  - the minimum length             */ \
802   2,                             /* Charnc  - the minimum length           */ \
803   2,                             /* not                                    */ \
804   /* Positive single-char repeats                            ** These are  */ \
805   2, 2, 2, 2, 2, 2,              /* *, *?, +, +?, ?, ??      ** minima in  */ \
806   4, 4, 4,                       /* upto, minupto, exact     ** UTF-8 mode */ \
807   2, 2, 2, 4,                    /* *+, ++, ?+, upto+                      */ \
808   /* Negative single-char repeats - only for chars < 256                   */ \
809   2, 2, 2, 2, 2, 2,              /* NOT *, *?, +, +?, ?, ??                */ \
810   4, 4, 4,                       /* NOT upto, minupto, exact               */ \
811   2, 2, 2, 4,                    /* Possessive *, +, ?, upto               */ \
812   /* Positive type repeats                                                 */ \
813   2, 2, 2, 2, 2, 2,              /* Type *, *?, +, +?, ?, ??               */ \
814   4, 4, 4,                       /* Type upto, minupto, exact              */ \
815   2, 2, 2, 4,                    /* Possessive *+, ++, ?+, upto+           */ \
816   /* Character class & ref repeats                                         */ \
817   1, 1, 1, 1, 1, 1,              /* *, *?, +, +?, ?, ??                    */ \
818   5, 5,                          /* CRRANGE, CRMINRANGE                    */ \
819  33,                             /* CLASS                                  */ \
820  33,                             /* NCLASS                                 */ \
821   0,                             /* XCLASS - variable length               */ \
822   3,                             /* REF                                    */ \
823   1+LINK_SIZE,                   /* RECURSE                                */ \
824   2+2*LINK_SIZE,                 /* CALLOUT                                */ \
825   1+LINK_SIZE,                   /* Alt                                    */ \
826   1+LINK_SIZE,                   /* Ket                                    */ \
827   1+LINK_SIZE,                   /* KetRmax                                */ \
828   1+LINK_SIZE,                   /* KetRmin                                */ \
829   1+LINK_SIZE,                   /* Assert                                 */ \
830   1+LINK_SIZE,                   /* Assert not                             */ \
831   1+LINK_SIZE,                   /* Assert behind                          */ \
832   1+LINK_SIZE,                   /* Assert behind not                      */ \
833   1+LINK_SIZE,                   /* Reverse                                */ \
834   1+LINK_SIZE,                   /* ONCE                                   */ \
835   1+LINK_SIZE,                   /* BRA                                    */ \
836   3+LINK_SIZE,                   /* CBRA                                   */ \
837   1+LINK_SIZE,                   /* COND                                   */ \
838   1+LINK_SIZE,                   /* SBRA                                   */ \
839   3+LINK_SIZE,                   /* SCBRA                                  */ \
840   1+LINK_SIZE,                   /* SCOND                                  */ \
841   3,                             /* CREF                                   */ \
842   3,                             /* RREF                                   */ \
843   1,                             /* DEF                                    */ \
844   1, 1,                          /* BRAZERO, BRAMINZERO                    */ \
845   1, 1, 1, 1,                    /* PRUNE, SKIP, THEN, COMMIT,             */ \
846   1, 1, 1                        /* FAIL, ACCEPT, SKIPZERO                 */
847
848
849 /* A magic value for OP_RREF to indicate the "any recursion" condition. */
850
851 #define RREF_ANY  0xffff
852
853 /* Error code numbers. They are given names so that they can more easily be
854 tracked. */
855
856 enum { ERR0,  ERR1,  ERR2,  ERR3,  ERR4,  ERR5,  ERR6,  ERR7,  ERR8,  ERR9,
857        ERR10, ERR11, ERR12, ERR13, ERR14, ERR15, ERR16, ERR17, ERR18, ERR19,
858        ERR20, ERR21, ERR22, ERR23, ERR24, ERR25, ERR26, ERR27, ERR28, ERR29,
859        ERR30, ERR31, ERR32, ERR33, ERR34, ERR35, ERR36, ERR37, ERR38, ERR39,
860        ERR40, ERR41, ERR42, ERR43, ERR44, ERR45, ERR46, ERR47, ERR48, ERR49,
861        ERR50, ERR51, ERR52, ERR53, ERR54, ERR55, ERR56, ERR57, ERR58, ERR59,
862        ERR60, ERR61, ERR62, ERR63, ERR64
863      };
864
865 /* The real format of the start of the pcre block; the index of names and the
866 code vector run on as long as necessary after the end. We store an explicit
867 offset to the name table so that if a regex is compiled on one host, saved, and
868 then run on another where the size of pointers is different, all might still
869 be well. For the case of compiled-on-4 and run-on-8, we include an extra
870 pointer that is always NULL. For future-proofing, a few dummy fields were
871 originally included - even though you can never get this planning right - but
872 there is only one left now.
873
874 NOTE NOTE NOTE:
875 Because people can now save and re-use compiled patterns, any additions to this
876 structure should be made at the end, and something earlier (e.g. a new
877 flag in the options or one of the dummy fields) should indicate that the new
878 fields are present. Currently PCRE always sets the dummy fields to zero.
879 NOTE NOTE NOTE:
880 */
881
882 typedef struct real_pcre
883 {
884     pcre_uint32 magic_number;
885     pcre_uint32 size;               /* Total that was malloced */
886     pcre_uint32 options;            /* Public options */
887     pcre_uint16 flags;              /* Private flags */
888     pcre_uint16 dummy1;             /* For future use */
889     pcre_uint16 top_bracket;
890     pcre_uint16 top_backref;
891     pcre_uint16 first_byte;
892     pcre_uint16 req_byte;
893     pcre_uint16 name_table_offset;  /* Offset to name table that follows */
894     pcre_uint16 name_entry_size;    /* Size of any name items */
895     pcre_uint16 name_count;         /* Number of name items */
896     pcre_uint16 ref_count;          /* Reference count */
897
898     const unsigned char *tables;    /* Pointer to tables or NULL for std */
899     const unsigned char *nullpad;   /* NULL padding */
900 } real_pcre;
901
902 /* The format of the block used to store data from pcre_study(). The same
903 remark (see NOTE above) about extending this structure applies. */
904
905 typedef struct pcre_study_data
906 {
907     pcre_uint32 size;               /* Total that was malloced */
908     pcre_uint32 options;
909     uschar start_bits[32];
910 } pcre_study_data;
911
912 /* Structure for passing "static" information around between the functions
913 doing the compiling, so that they are thread-safe. */
914
915 typedef struct compile_data
916 {
917     const uschar *lcc;            /* Points to lower casing table */
918     const uschar *fcc;            /* Points to case-flipping table */
919     const uschar *cbits;          /* Points to character type table */
920     const uschar *ctypes;         /* Points to table of type maps */
921     const uschar *start_workspace;/* The start of working space */
922     const uschar *start_code;     /* The start of the compiled code */
923     const uschar *start_pattern;  /* The start of the pattern */
924     const uschar *end_pattern;    /* The end of the pattern */
925     uschar *hwm;                  /* High watermark of workspace */
926     uschar *name_table;           /* The name/number table */
927     int  names_found;             /* Number of entries so far */
928     int  name_entry_size;         /* Size of each entry */
929     int  bracount;                /* Count of capturing parens as we compile */
930     int  final_bracount;          /* Saved value after first pass */
931     int  top_backref;             /* Maximum back reference */
932     unsigned int backref_map;     /* Bitmap of low back refs */
933     int  external_options;        /* External (initial) options */
934     int  external_flags;          /* External flag bits to be set */
935     int  req_varyopt;             /* "After variable item" flag for reqbyte */
936     BOOL had_accept;              /* (*ACCEPT) encountered */
937     int  nltype;                  /* Newline type */
938     int  nllen;                   /* Newline string length */
939     uschar nl[4];                 /* Newline string when fixed length */
940 } compile_data;
941
942 /* Structure for maintaining a chain of pointers to the currently incomplete
943 branches, for testing for left recursion. */
944
945 typedef struct branch_chain
946 {
947     struct branch_chain *outer;
948     uschar *current;
949 } branch_chain;
950
951 /* Structure for items in a linked list that represents an explicit recursive
952 call within the pattern. */
953
954 typedef struct recursion_info
955 {
956     struct recursion_info *prevrec; /* Previous recursion record (or NULL) */
957     int group_num;                /* Number of group that was called */
958     const uschar *after_call;     /* "Return value": points after the call in the expr */
959     USPTR save_start;             /* Old value of mstart */
960     int *offset_save;             /* Pointer to start of saved offsets */
961     int saved_max;                /* Number of saved offsets */
962 } recursion_info;
963
964 /* Structure for building a chain of data for holding the values of the subject
965 pointer at the start of each subpattern, so as to detect when an empty string
966 has been matched by a subpattern - to break infinite loops. */
967
968 typedef struct eptrblock
969 {
970     struct eptrblock *epb_prev;
971     USPTR epb_saved_eptr;
972 } eptrblock;
973
974
975 /* Structure for passing "static" information around between the functions
976 doing traditional NFA matching, so that they are thread-safe. */
977
978 typedef struct match_data
979 {
980     unsigned long int match_call_count;      /* As it says */
981     unsigned long int match_limit;           /* As it says */
982     unsigned long int match_limit_recursion; /* As it says */
983     int   *offset_vector;         /* Offset vector */
984     int    offset_end;            /* One past the end */
985     int    offset_max;            /* The maximum usable for return data */
986     int    nltype;                /* Newline type */
987     int    nllen;                 /* Newline string length */
988     uschar nl[4];                 /* Newline string when fixed */
989     const uschar *lcc;            /* Points to lower casing table */
990     const uschar *ctypes;         /* Points to table of type maps */
991     BOOL   offset_overflow;       /* Set if too many extractions */
992     BOOL   notbol;                /* NOTBOL flag */
993     BOOL   noteol;                /* NOTEOL flag */
994     BOOL   utf8;                  /* UTF8 flag */
995     BOOL   jscript_compat;        /* JAVASCRIPT_COMPAT flag */
996     BOOL   endonly;               /* Dollar not before final \n */
997     BOOL   notempty;              /* Empty string match not wanted */
998     BOOL   partial;               /* PARTIAL flag */
999     BOOL   hitend;                /* Hit the end of the subject at some point */
1000     BOOL   bsr_anycrlf;           /* \R is just any CRLF, not full Unicode */
1001     const uschar *start_code;     /* For use when recursing */
1002     USPTR  start_subject;         /* Start of the subject string */
1003     USPTR  end_subject;           /* End of the subject string */
1004     USPTR  start_match_ptr;       /* Start of matched string */
1005     USPTR  end_match_ptr;         /* Subject position at end match */
1006     int    end_offset_top;        /* Highwater mark at end of match */
1007     int    capture_last;          /* Most recent capture number */
1008     int    start_offset;          /* The start offset value */
1009     eptrblock *eptrchain;         /* Chain of eptrblocks for tail recursions */
1010     int    eptrn;                 /* Next free eptrblock */
1011     recursion_info *recursive;    /* Linked list of recursion data */
1012     void  *callout_data;          /* To pass back to callouts */
1013 } match_data;
1014
1015 /* A similar structure is used for the same purpose by the DFA matching
1016 functions. */
1017
1018 typedef struct dfa_match_data
1019 {
1020     const uschar *start_code;     /* Start of the compiled pattern */
1021     const uschar *start_subject;  /* Start of the subject string */
1022     const uschar *end_subject;    /* End of subject string */
1023     const uschar *tables;         /* Character tables */
1024     int   moptions;               /* Match options */
1025     int   poptions;               /* Pattern options */
1026     int    nltype;                /* Newline type */
1027     int    nllen;                 /* Newline string length */
1028     uschar nl[4];                 /* Newline string when fixed */
1029     void  *callout_data;          /* To pass back to callouts */
1030 } dfa_match_data;
1031
1032 /* Bit definitions for entries in the pcre_ctypes table. */
1033
1034 #define ctype_space   0x01
1035 #define ctype_letter  0x02
1036 #define ctype_digit   0x04
1037 #define ctype_xdigit  0x08
1038 #define ctype_word    0x10   /* alphanumeric or '_' */
1039 #define ctype_meta    0x80   /* regexp meta char or zero (end pattern) */
1040
1041 /* Offsets for the bitmap tables in pcre_cbits. Each table contains a set
1042 of bits for a class map. Some classes are built by combining these tables. */
1043
1044 #define cbit_space     0      /* [:space:] or \s */
1045 #define cbit_xdigit   32      /* [:xdigit:] */
1046 #define cbit_digit    64      /* [:digit:] or \d */
1047 #define cbit_upper    96      /* [:upper:] */
1048 #define cbit_lower   128      /* [:lower:] */
1049 #define cbit_word    160      /* [:word:] or \w */
1050 #define cbit_graph   192      /* [:graph:] */
1051 #define cbit_print   224      /* [:print:] */
1052 #define cbit_punct   256      /* [:punct:] */
1053 #define cbit_cntrl   288      /* [:cntrl:] */
1054 #define cbit_length  320      /* Length of the cbits table */
1055
1056 /* Offsets of the various tables from the base tables pointer, and
1057 total length. */
1058
1059 #define lcc_offset      0
1060 #define fcc_offset    256
1061 #define cbits_offset  512
1062 #define ctypes_offset (cbits_offset + cbit_length)
1063 #define tables_length (ctypes_offset + 256)
1064
1065 /* Layout of the UCP type table that translates property names into types and
1066 codes. Each entry used to point directly to a name, but to reduce the number of
1067 relocations in shared libraries, it now has an offset into a single string
1068 instead. */
1069
1070 typedef struct
1071 {
1072     pcre_uint16 name_offset;
1073     pcre_uint16 type;
1074     pcre_uint16 value;
1075 } ucp_type_table;
1076
1077
1078 /* Internal shared data tables. These are tables that are used by more than one
1079 of the exported public functions. They have to be "external" in the C sense,
1080 but are not part of the PCRE public API. The data for these tables is in the
1081 pcre_tables.c module. */
1082
1083 extern const int    _pcre_utf8_table1[];
1084 extern const int    _pcre_utf8_table2[];
1085 extern const int    _pcre_utf8_table3[];
1086 extern const uschar _pcre_utf8_table4[];
1087
1088 extern const int    _pcre_utf8_table1_size;
1089
1090 extern const char   _pcre_utt_names[];
1091 extern const ucp_type_table _pcre_utt[];
1092 extern const int _pcre_utt_size;
1093
1094 extern const uschar _pcre_default_tables[];
1095
1096 extern const uschar _pcre_OP_lengths[];
1097
1098
1099 /* Internal shared functions. These are functions that are used by more than
1100 one of the exported public functions. They have to be "external" in the C
1101 sense, but are not part of the PCRE public API. */
1102
1103 extern BOOL         _pcre_is_newline(const uschar *, int, const uschar *,
1104                                      int *, BOOL);
1105 extern int          _pcre_ord2utf8(int, uschar *);
1106 extern real_pcre   *_pcre_try_flipped(const real_pcre *, real_pcre *,
1107                                       const pcre_study_data *, pcre_study_data *);
1108 extern int          _pcre_ucp_findprop(const unsigned int, int *, int *);
1109 extern unsigned int _pcre_ucp_othercase(const unsigned int);
1110 extern int          _pcre_valid_utf8(const uschar *, int);
1111 extern BOOL         _pcre_was_newline(const uschar *, int, const uschar *,
1112                                       int *, BOOL);
1113 extern BOOL         _pcre_xclass(int, const uschar *);
1114
1115 #endif
1116
1117 /* End of pcre_internal.h */