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

Diff of /code/trunk/pcre_internal.h

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

revision 773 by ph10, Wed Nov 30 18:10:27 2011 UTC revision 1128 by chpe, Thu Oct 18 18:35:08 2012 UTC
# Line 7  Line 7 
7  and semantics are as close as possible to those of the Perl 5 language.  and semantics are as close as possible to those of the Perl 5 language.
8    
9                         Written by Philip Hazel                         Written by Philip Hazel
10             Copyright (c) 1997-2011 University of Cambridge             Copyright (c) 1997-2012 University of Cambridge
11    
12  -----------------------------------------------------------------------------  -----------------------------------------------------------------------------
13  Redistribution and use in source and binary forms, with or without  Redistribution and use in source and binary forms, with or without
# Line 40  POSSIBILITY OF SUCH DAMAGE. Line 40  POSSIBILITY OF SUCH DAMAGE.
40    
41  /* This header contains definitions that are shared between the different  /* This header contains definitions that are shared between the different
42  modules, but which are not relevant to the exported API. This includes some  modules, but which are not relevant to the exported API. This includes some
43  functions whose names all begin with "_pcre_". */  functions whose names all begin with "_pcre_", "_pcre16_" or "_pcre32_"
44    depending on the PRIV macro. */
45    
46  #ifndef PCRE_INTERNAL_H  #ifndef PCRE_INTERNAL_H
47  #define PCRE_INTERNAL_H  #define PCRE_INTERNAL_H
# Line 51  functions whose names all begin with "_p Line 52  functions whose names all begin with "_p
52  #define PCRE_DEBUG  #define PCRE_DEBUG
53  #endif  #endif
54    
55  /* We do not support both EBCDIC and UTF-8 at the same time. The "configure"  /* PCRE is compiled as an 8 bit library if it is not requested otherwise. */
56  script prevents both being selected, but not everybody uses "configure". */  #if !defined COMPILE_PCRE16 && !defined COMPILE_PCRE32
57    #define COMPILE_PCRE8
 #if defined EBCDIC && defined SUPPORT_UTF8  
 #error The use of both EBCDIC and SUPPORT_UTF8 is not supported.  
58  #endif  #endif
59    
60  /* If SUPPORT_UCP is defined, SUPPORT_UTF8 must also be defined. The  /* If SUPPORT_UCP is defined, SUPPORT_UTF must also be defined. The
61  "configure" script ensures this, but not everybody uses "configure". */  "configure" script ensures this, but not everybody uses "configure". */
62    
63  #if defined SUPPORT_UCP && !defined SUPPORT_UTF8  #if defined SUPPORT_UCP && !(defined SUPPORT_UTF)
64    #define SUPPORT_UTF 1
65    #endif
66    
67    /* We define SUPPORT_UTF if SUPPORT_UTF8 is enabled for compatibility
68    reasons with existing code. */
69    
70    #if defined SUPPORT_UTF8 && !(defined SUPPORT_UTF)
71    #define SUPPORT_UTF 1
72    #endif
73    
74    /* Fixme: SUPPORT_UTF8 should be eventually disappear from the code.
75    Until then we define it if SUPPORT_UTF is defined. */
76    
77    #if defined SUPPORT_UTF && !(defined SUPPORT_UTF8)
78  #define SUPPORT_UTF8 1  #define SUPPORT_UTF8 1
79  #endif  #endif
80    
81    /* We do not support both EBCDIC and UTF-8/16/32 at the same time. The "configure"
82    script prevents both being selected, but not everybody uses "configure". */
83    
84    #if defined EBCDIC && defined SUPPORT_UTF
85    #error The use of both EBCDIC and SUPPORT_UTF is not supported.
86    #endif
87    
88  /* Use a macro for debugging printing, 'cause that eliminates the use of #ifdef  /* Use a macro for debugging printing, 'cause that eliminates the use of #ifdef
89  inline, and there are *still* stupid compilers about that don't like indented  inline, and there are *still* stupid compilers about that don't like indented
90  pre-processor statements, or at least there were when I first wrote this. After  pre-processor statements, or at least there were when I first wrote this. After
# Line 158  set, we ensure here that it has no effec Line 178  set, we ensure here that it has no effec
178  #define PCRE_CALL_CONVENTION  #define PCRE_CALL_CONVENTION
179  #endif  #endif
180    
181  /* We need to have types that specify unsigned 16-bit and 32-bit integers. We  /* We need to have types that specify unsigned 8, 16 and 32-bit integers. We
182  cannot determine these outside the compilation (e.g. by running a program as  cannot determine these outside the compilation (e.g. by running a program as
183  part of "configure") because PCRE is often cross-compiled for use on other  part of "configure") because PCRE is often cross-compiled for use on other
184  systems. Instead we make use of the maximum sizes that are available at  systems. Instead we make use of the maximum sizes that are available at
185  preprocessor time in standard C environments. */  preprocessor time in standard C environments. */
186    
187    typedef unsigned char pcre_uint8;
188    
189  #if USHRT_MAX == 65535  #if USHRT_MAX == 65535
190    typedef unsigned short pcre_uint16;    typedef unsigned short pcre_uint16;
191    typedef short pcre_int16;    typedef short pcre_int16;
# Line 206  by "configure". */ Line 228  by "configure". */
228    
229  /* All character handling must be done as unsigned characters. Otherwise there  /* All character handling must be done as unsigned characters. Otherwise there
230  are problems with top-bit-set characters and functions such as isspace().  are problems with top-bit-set characters and functions such as isspace().
231  However, we leave the interface to the outside world as char *, because that  However, we leave the interface to the outside world as char * or short *,
232  should make things easier for callers. We define a short type for unsigned char  because that should make things easier for callers. This character type is
233  to save lots of typing. I tried "uchar", but it causes problems on Digital  called pcre_uchar.
234  Unix, where it is defined in sys/types, so use "uschar" instead. */  
235    The IN_UCHARS macro multiply its argument with the byte size of the current
236    pcre_uchar type. Useful for memcpy and such operations, whose require the
237    byte size of their input/output buffers.
238    
239    The MAX_255 macro checks whether its pcre_uchar input is less than 256.
240    
241    The TABLE_GET macro is designed for accessing elements of tables whose contain
242    exactly 256 items. When the character is able to contain more than 256
243    items, some check is needed before accessing these tables.
244    */
245    
246    #if defined COMPILE_PCRE8
247    
248    typedef unsigned char pcre_uchar;
249    #define IN_UCHARS(x) (x)
250    #define MAX_255(c) 1
251    #define TABLE_GET(c, table, default) ((table)[c])
252    
253    #elif defined COMPILE_PCRE16
254    
255    #if USHRT_MAX != 65535
256    /* This is a warning message. Change PCRE_UCHAR16 to a 16 bit data type in
257    pcre.h(.in) and disable (comment out) this message. */
258    #error Warning: PCRE_UCHAR16 is not a 16 bit data type.
259    #endif
260    
261    typedef pcre_uint16 pcre_uchar;
262    #define UCHAR_SHIFT (1)
263    #define IN_UCHARS(x) ((x) << UCHAR_SHIFT)
264    #define MAX_255(c) ((c) <= 255u)
265    #define TABLE_GET(c, table, default) (MAX_255(c)? ((table)[c]):(default))
266    
267  typedef unsigned char uschar;  #elif defined COMPILE_PCRE32
268    
269    typedef pcre_uint32 pcre_uchar;
270    #define UCHAR_SHIFT (2)
271    #define IN_UCHARS(x) ((x) << UCHAR_SHIFT)
272    #define MAX_255(c) ((c) <= 255u)
273    #define TABLE_GET(c, table, default) (MAX_255(c)? ((table)[c]):(default))
274    
275    /* Assert that pcre_uchar32 is a 32-bit type */
276    typedef int __assert_pcre_uchar32_size[sizeof(pcre_uchar) == 4 ? 1 : -1];
277    
278    #else
279    #error Unsupported compiling mode
280    #endif /* COMPILE_PCRE[8|16|32] */
281    
282  /* This is an unsigned int value that no character can ever have. UTF-8  /* This is an unsigned int value that no character can ever have. UTF-8
283  characters only go up to 0x7fffffff (though Unicode doesn't go beyond  characters only go up to 0x7fffffff (though Unicode doesn't go beyond
# Line 234  start/end of string field names are. */ Line 300  start/end of string field names are. */
300  #define IS_NEWLINE(p) \  #define IS_NEWLINE(p) \
301    ((NLBLOCK->nltype != NLTYPE_FIXED)? \    ((NLBLOCK->nltype != NLTYPE_FIXED)? \
302      ((p) < NLBLOCK->PSEND && \      ((p) < NLBLOCK->PSEND && \
303       _pcre_is_newline((p), NLBLOCK->nltype, NLBLOCK->PSEND, &(NLBLOCK->nllen),\       PRIV(is_newline)((p), NLBLOCK->nltype, NLBLOCK->PSEND, \
304         utf8)) \         &(NLBLOCK->nllen), utf)) \
305      : \      : \
306      ((p) <= NLBLOCK->PSEND - NLBLOCK->nllen && \      ((p) <= NLBLOCK->PSEND - NLBLOCK->nllen && \
307       (p)[0] == NLBLOCK->nl[0] && \       RAWUCHARTEST(p) == NLBLOCK->nl[0] && \
308       (NLBLOCK->nllen == 1 || (p)[1] == NLBLOCK->nl[1]) \       (NLBLOCK->nllen == 1 || RAWUCHARTEST(p+1) == NLBLOCK->nl[1])       \
309      ) \      ) \
310    )    )
311    
# Line 248  start/end of string field names are. */ Line 314  start/end of string field names are. */
314  #define WAS_NEWLINE(p) \  #define WAS_NEWLINE(p) \
315    ((NLBLOCK->nltype != NLTYPE_FIXED)? \    ((NLBLOCK->nltype != NLTYPE_FIXED)? \
316      ((p) > NLBLOCK->PSSTART && \      ((p) > NLBLOCK->PSSTART && \
317       _pcre_was_newline((p), NLBLOCK->nltype, NLBLOCK->PSSTART, \       PRIV(was_newline)((p), NLBLOCK->nltype, NLBLOCK->PSSTART, \
318         &(NLBLOCK->nllen), utf8)) \         &(NLBLOCK->nllen), utf)) \
319      : \      : \
320      ((p) >= NLBLOCK->PSSTART + NLBLOCK->nllen && \      ((p) >= NLBLOCK->PSSTART + NLBLOCK->nllen && \
321       (p)[-NLBLOCK->nllen] == NLBLOCK->nl[0] && \       RAWUCHARTEST(p - NLBLOCK->nllen) == NLBLOCK->nl[0] &&              \
322       (NLBLOCK->nllen == 1 || (p)[-NLBLOCK->nllen+1] == NLBLOCK->nl[1]) \       (NLBLOCK->nllen == 1 || RAWUCHARTEST(p - NLBLOCK->nllen + 1) == NLBLOCK->nl[1]) \
323      ) \      ) \
324    )    )
325    
# Line 267  used for the external interface and appe Line 333  used for the external interface and appe
333  must begin with PCRE_. */  must begin with PCRE_. */
334    
335  #ifdef CUSTOM_SUBJECT_PTR  #ifdef CUSTOM_SUBJECT_PTR
336  #define PCRE_SPTR CUSTOM_SUBJECT_PTR  #define PCRE_PUCHAR CUSTOM_SUBJECT_PTR
 #define USPTR CUSTOM_SUBJECT_PTR  
337  #else  #else
338  #define PCRE_SPTR const char *  #define PCRE_PUCHAR const pcre_uchar *
 #define USPTR const unsigned char *  
339  #endif  #endif
340    
   
   
341  /* Include the public PCRE header and the definitions of UCP character property  /* Include the public PCRE header and the definitions of UCP character property
342  values. */  values. */
343    
# Line 343  The macros are controlled by the value o Line 405  The macros are controlled by the value o
405  the config.h file, but can be overridden by using -D on the command line. This  the config.h file, but can be overridden by using -D on the command line. This
406  is automated on Unix systems via the "configure" command. */  is automated on Unix systems via the "configure" command. */
407    
408    #if defined COMPILE_PCRE8
409    
410  #if LINK_SIZE == 2  #if LINK_SIZE == 2
411    
412  #define PUT(a,n,d)   \  #define PUT(a,n,d)   \
# Line 379  is automated on Unix systems via the "co Line 443  is automated on Unix systems via the "co
443  #define GET(a,n) \  #define GET(a,n) \
444    (((a)[n] << 24) | ((a)[(n)+1] << 16) | ((a)[(n)+2] << 8) | (a)[(n)+3])    (((a)[n] << 24) | ((a)[(n)+1] << 16) | ((a)[(n)+2] << 8) | (a)[(n)+3])
445    
446  #define MAX_PATTERN_SIZE (1 << 30)   /* Keep it positive */  /* Keep it positive */
447    #define MAX_PATTERN_SIZE (1 << 30)
448    
449    #else
450    #error LINK_SIZE must be either 2, 3, or 4
451    #endif
452    
453    #elif defined COMPILE_PCRE16
454    
455    #if LINK_SIZE == 2
456    
457    /* Redefine LINK_SIZE as a multiple of sizeof(pcre_uchar) */
458    #undef LINK_SIZE
459    #define LINK_SIZE 1
460    
461    #define PUT(a,n,d)   \
462      (a[n] = (d))
463    
464    #define GET(a,n) \
465      (a[n])
466    
467    #define MAX_PATTERN_SIZE (1 << 16)
468    
469    #elif LINK_SIZE == 3 || LINK_SIZE == 4
470    
471    /* Redefine LINK_SIZE as a multiple of sizeof(pcre_uchar) */
472    #undef LINK_SIZE
473    #define LINK_SIZE 2
474    
475    #define PUT(a,n,d)   \
476      (a[n] = (d) >> 16), \
477      (a[(n)+1] = (d) & 65535)
478    
479    #define GET(a,n) \
480      (((a)[n] << 16) | (a)[(n)+1])
481    
482    /* Keep it positive */
483    #define MAX_PATTERN_SIZE (1 << 30)
484    
485  #else  #else
486  #error LINK_SIZE must be either 2, 3, or 4  #error LINK_SIZE must be either 2, 3, or 4
487  #endif  #endif
488    
489    #elif defined COMPILE_PCRE32
490    
491    /* Only supported LINK_SIZE is 4 */
492    /* Redefine LINK_SIZE as a multiple of sizeof(pcre_uchar) */
493    #undef LINK_SIZE
494    #define LINK_SIZE 1
495    
496    #define PUT(a,n,d)   \
497      (a[n] = (d))
498    
499    #define GET(a,n) \
500      (a[n])
501    
502    /* Keep it positive */
503    #define MAX_PATTERN_SIZE (1 << 30)
504    
505    #else
506    #error Unsupported compiling mode
507    #endif /* COMPILE_PCRE[8|16|32] */
508    
509  /* Convenience macro defined in terms of the others */  /* Convenience macro defined in terms of the others */
510    
# Line 396  is automated on Unix systems via the "co Line 515  is automated on Unix systems via the "co
515  offsets changes. There are used for repeat counts and for other things such as  offsets changes. There are used for repeat counts and for other things such as
516  capturing parenthesis numbers in back references. */  capturing parenthesis numbers in back references. */
517    
518    #if defined COMPILE_PCRE8
519    
520    #define IMM2_SIZE 2
521    
522  #define PUT2(a,n,d)   \  #define PUT2(a,n,d)   \
523    a[n] = (d) >> 8; \    a[n] = (d) >> 8; \
524    a[(n)+1] = (d) & 255    a[(n)+1] = (d) & 255
# Line 403  capturing parenthesis numbers in back re Line 526  capturing parenthesis numbers in back re
526  #define GET2(a,n) \  #define GET2(a,n) \
527    (((a)[n] << 8) | (a)[(n)+1])    (((a)[n] << 8) | (a)[(n)+1])
528    
529  #define PUT2INC(a,n,d)  PUT2(a,n,d), a += 2  #elif defined COMPILE_PCRE16
530    
531    #define IMM2_SIZE 1
532    
533  /* When UTF-8 encoding is being used, a character is no longer just a single  #define PUT2(a,n,d)   \
534  byte. The macros for character handling generate simple sequences when used in     a[n] = d
 byte-mode, and more complicated ones for UTF-8 characters. GETCHARLENTEST is  
 not used when UTF-8 is not supported, so it is not defined, and BACKCHAR should  
 never be called in byte mode. To make sure they can never even appear when  
 UTF-8 support is omitted, we don't even define them. */  
535    
536  #ifndef SUPPORT_UTF8  #define GET2(a,n) \
537       a[n]
538    
539    #elif defined COMPILE_PCRE32
540    
541    #define IMM2_SIZE 1
542    
543    #define PUT2(a,n,d)   \
544       a[n] = d
545    
546    #define GET2(a,n) \
547       a[n]
548    
549    #else
550    #error Unsupported compiling mode
551    #endif /* COMPILE_PCRE[8|16|32] */
552    
553    #define PUT2INC(a,n,d)  PUT2(a,n,d), a += IMM2_SIZE
554    
555    /* The maximum length of a MARK name is currently one data unit; it may be
556    changed in future to be a fixed number of bytes or to depend on LINK_SIZE. */
557    
558    #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
559    #define MAX_MARK ((1u << 16) - 1)
560    #else
561    #define MAX_MARK ((1u << 8) - 1)
562    #endif
563    
564    /* When UTF encoding is being used, a character is no longer just a single
565    byte. The macros for character handling generate simple sequences when used in
566    character-mode, and more complicated ones for UTF characters. GETCHARLENTEST
567    and other macros are not used when UTF is not supported, so they are not
568    defined. To make sure they can never even appear when UTF support is omitted,
569    we don't even define them. */
570    
571    #ifndef SUPPORT_UTF
572    
573    /* #define MAX_VALUE_FOR_SINGLE_CHAR */
574    /* #define HAS_EXTRALEN(c) */
575    /* #define GET_EXTRALEN(c) */
576    /* #define NOT_FIRSTCHAR(c) */
577  #define GETCHAR(c, eptr) c = *eptr;  #define GETCHAR(c, eptr) c = *eptr;
578  #define GETCHARTEST(c, eptr) c = *eptr;  #define GETCHARTEST(c, eptr) c = *eptr;
579  #define GETCHARINC(c, eptr) c = *eptr++;  #define GETCHARINC(c, eptr) c = *eptr++;
580  #define GETCHARINCTEST(c, eptr) c = *eptr++;  #define GETCHARINCTEST(c, eptr) c = *eptr++;
581  #define GETCHARLEN(c, eptr, len) c = *eptr;  #define GETCHARLEN(c, eptr, len) c = *eptr;
582    #define RAWUCHAR(eptr) (*(eptr))
583    #define RAWUCHARINC(eptr) (*(eptr)++)
584    #define RAWUCHARTEST(eptr) (*(eptr))
585    #define RAWUCHARINCTEST(eptr) (*(eptr)++)
586  /* #define GETCHARLENTEST(c, eptr, len) */  /* #define GETCHARLENTEST(c, eptr, len) */
587  /* #define BACKCHAR(eptr) */  /* #define BACKCHAR(eptr) */
588    /* #define FORWARDCHAR(eptr) */
589    /* #define ACROSSCHAR(condition, eptr, action) */
590    
591  #else   /* SUPPORT_UTF8 */  #else   /* SUPPORT_UTF */
592    
593  /* These macros were originally written in the form of loops that used data  /* Tests whether the code point needs extra characters to decode. */
594  from the tables whose names start with _pcre_utf8_table. They were rewritten by  
595  a user so as not to use loops, because in some environments this gives a  #define HASUTF8EXTRALEN(c) ((c) >= 0xc0)
 significant performance advantage, and it seems never to do any harm. */  
596    
597  /* Base macro to pick up the remaining bytes of a UTF-8 character, not  /* Base macro to pick up the remaining bytes of a UTF-8 character, not
598  advancing the pointer. */  advancing the pointer. */
# Line 451  advancing the pointer. */ Line 616  advancing the pointer. */
616            ((eptr[4] & 0x3f) << 6) | (eptr[5] & 0x3f); \            ((eptr[4] & 0x3f) << 6) | (eptr[5] & 0x3f); \
617      }      }
618    
 /* Get the next UTF-8 character, not advancing the pointer. This is called when  
 we know we are in UTF-8 mode. */  
   
 #define GETCHAR(c, eptr) \  
   c = *eptr; \  
   if (c >= 0xc0) GETUTF8(c, eptr);  
   
 /* Get the next UTF-8 character, testing for UTF-8 mode, and not advancing the  
 pointer. */  
   
 #define GETCHARTEST(c, eptr) \  
   c = *eptr; \  
   if (utf8 && c >= 0xc0) GETUTF8(c, eptr);  
   
619  /* Base macro to pick up the remaining bytes of a UTF-8 character, advancing  /* Base macro to pick up the remaining bytes of a UTF-8 character, advancing
620  the pointer. */  the pointer. */
621    
# Line 499  the pointer. */ Line 650  the pointer. */
650        } \        } \
651      }      }
652    
653    #if defined COMPILE_PCRE8
654    
655    /* These macros were originally written in the form of loops that used data
656    from the tables whose names start with PRIV(utf8_table). They were rewritten by
657    a user so as not to use loops, because in some environments this gives a
658    significant performance advantage, and it seems never to do any harm. */
659    
660    /* Tells the biggest code point which can be encoded as a single character. */
661    
662    #define MAX_VALUE_FOR_SINGLE_CHAR 127
663    
664    /* Tests whether the code point needs extra characters to decode. */
665    
666    #define HAS_EXTRALEN(c) ((c) >= 0xc0)
667    
668    /* Returns with the additional number of characters if IS_MULTICHAR(c) is TRUE.
669    Otherwise it has an undefined behaviour. */
670    
671    #define GET_EXTRALEN(c) (PRIV(utf8_table4)[(c) & 0x3f])
672    
673    /* Returns TRUE, if the given character is not the first character
674    of a UTF sequence. */
675    
676    #define NOT_FIRSTCHAR(c) (((c) & 0xc0) == 0x80)
677    
678    /* Get the next UTF-8 character, not advancing the pointer. This is called when
679    we know we are in UTF-8 mode. */
680    
681    #define GETCHAR(c, eptr) \
682      c = *eptr; \
683      if (c >= 0xc0) GETUTF8(c, eptr);
684    
685    /* Get the next UTF-8 character, testing for UTF-8 mode, and not advancing the
686    pointer. */
687    
688    #define GETCHARTEST(c, eptr) \
689      c = *eptr; \
690      if (utf && c >= 0xc0) GETUTF8(c, eptr);
691    
692  /* Get the next UTF-8 character, advancing the pointer. This is called when we  /* Get the next UTF-8 character, advancing the pointer. This is called when we
693  know we are in UTF-8 mode. */  know we are in UTF-8 mode. */
694    
# Line 511  This is called when we don't know if we Line 701  This is called when we don't know if we
701    
702  #define GETCHARINCTEST(c, eptr) \  #define GETCHARINCTEST(c, eptr) \
703    c = *eptr++; \    c = *eptr++; \
704    if (utf8 && c >= 0xc0) GETUTF8INC(c, eptr);    if (utf && c >= 0xc0) GETUTF8INC(c, eptr);
705    
706  /* Base macro to pick up the remaining bytes of a UTF-8 character, not  /* Base macro to pick up the remaining bytes of a UTF-8 character, not
707  advancing the pointer, incrementing the length. */  advancing the pointer, incrementing the length. */
# Line 563  do not know if we are in UTF-8 mode. */ Line 753  do not know if we are in UTF-8 mode. */
753    
754  #define GETCHARLENTEST(c, eptr, len) \  #define GETCHARLENTEST(c, eptr, len) \
755    c = *eptr; \    c = *eptr; \
756    if (utf8 && c >= 0xc0) GETUTF8LEN(c, eptr, len);    if (utf && c >= 0xc0) GETUTF8LEN(c, eptr, len);
757    
758    /* Returns the next uchar, not advancing the pointer. This is called when
759    we know we are in UTF mode. */
760    
761    #define RAWUCHAR(eptr) \
762      (*(eptr))
763    
764    /* Returns the next uchar, advancing the pointer. This is called when
765    we know we are in UTF mode. */
766    
767    #define RAWUCHARINC(eptr) \
768      (*(eptr)++)
769    
770    /* Returns the next uchar, testing for UTF mode, and not advancing the
771    pointer. */
772    
773    #define RAWUCHARTEST(eptr) \
774      (*(eptr))
775    
776    /* Returns the next uchar, testing for UTF mode, advancing the
777    pointer. */
778    
779    #define RAWUCHARINCTEST(eptr) \
780      (*(eptr)++)
781    
782  /* If the pointer is not at the start of a character, move it back until  /* If the pointer is not at the start of a character, move it back until
783  it is. This is called only in UTF-8 mode - we don't put a test within the macro  it is. This is called only in UTF-8 mode - we don't put a test within the macro
# Line 571  because almost all calls are already wit Line 785  because almost all calls are already wit
785    
786  #define BACKCHAR(eptr) while((*eptr & 0xc0) == 0x80) eptr--  #define BACKCHAR(eptr) while((*eptr & 0xc0) == 0x80) eptr--
787    
788  #endif  /* SUPPORT_UTF8 */  /* Same as above, just in the other direction. */
789    #define FORWARDCHAR(eptr) while((*eptr & 0xc0) == 0x80) eptr++
790    
791    /* Same as above, but it allows a fully customizable form. */
792    #define ACROSSCHAR(condition, eptr, action) \
793      while((condition) && ((eptr) & 0xc0) == 0x80) action
794    
795  /* In case there is no definition of offsetof() provided - though any proper  #elif defined COMPILE_PCRE16
796  Standard C system should have one. */  
797    /* Tells the biggest code point which can be encoded as a single character. */
798    
799    #define MAX_VALUE_FOR_SINGLE_CHAR 65535
800    
801    /* Tests whether the code point needs extra characters to decode. */
802    
803    #define HAS_EXTRALEN(c) (((c) & 0xfc00) == 0xd800)
804    
805    /* Returns with the additional number of characters if IS_MULTICHAR(c) is TRUE.
806    Otherwise it has an undefined behaviour. */
807    
808    #define GET_EXTRALEN(c) 1
809    
810    /* Returns TRUE, if the given character is not the first character
811    of a UTF sequence. */
812    
813    #define NOT_FIRSTCHAR(c) (((c) & 0xfc00) == 0xdc00)
814    
815    /* Base macro to pick up the low surrogate of a UTF-16 character, not
816    advancing the pointer. */
817    
818    #define GETUTF16(c, eptr) \
819       { c = (((c & 0x3ff) << 10) | (eptr[1] & 0x3ff)) + 0x10000; }
820    
821    /* Get the next UTF-16 character, not advancing the pointer. This is called when
822    we know we are in UTF-16 mode. */
823    
824    #define GETCHAR(c, eptr) \
825      c = *eptr; \
826      if ((c & 0xfc00) == 0xd800) GETUTF16(c, eptr);
827    
828    /* Get the next UTF-16 character, testing for UTF-16 mode, and not advancing the
829    pointer. */
830    
831    #define GETCHARTEST(c, eptr) \
832      c = *eptr; \
833      if (utf && (c & 0xfc00) == 0xd800) GETUTF16(c, eptr);
834    
835    /* Base macro to pick up the low surrogate of a UTF-16 character, advancing
836    the pointer. */
837    
838    #define GETUTF16INC(c, eptr) \
839       { c = (((c & 0x3ff) << 10) | (*eptr++ & 0x3ff)) + 0x10000; }
840    
841    /* Get the next UTF-16 character, advancing the pointer. This is called when we
842    know we are in UTF-16 mode. */
843    
844    #define GETCHARINC(c, eptr) \
845      c = *eptr++; \
846      if ((c & 0xfc00) == 0xd800) GETUTF16INC(c, eptr);
847    
848    /* Get the next character, testing for UTF-16 mode, and advancing the pointer.
849    This is called when we don't know if we are in UTF-16 mode. */
850    
851    #define GETCHARINCTEST(c, eptr) \
852      c = *eptr++; \
853      if (utf && (c & 0xfc00) == 0xd800) GETUTF16INC(c, eptr);
854    
855    /* Base macro to pick up the low surrogate of a UTF-16 character, not
856    advancing the pointer, incrementing the length. */
857    
858    #define GETUTF16LEN(c, eptr, len) \
859       { c = (((c & 0x3ff) << 10) | (eptr[1] & 0x3ff)) + 0x10000; len++; }
860    
861    /* Get the next UTF-16 character, not advancing the pointer, incrementing
862    length if there is a low surrogate. This is called when we know we are in
863    UTF-16 mode. */
864    
865    #define GETCHARLEN(c, eptr, len) \
866      c = *eptr; \
867      if ((c & 0xfc00) == 0xd800) GETUTF16LEN(c, eptr, len);
868    
869    /* Get the next UTF-816character, testing for UTF-16 mode, not advancing the
870    pointer, incrementing length if there is a low surrogate. This is called when
871    we do not know if we are in UTF-16 mode. */
872    
873    #define GETCHARLENTEST(c, eptr, len) \
874      c = *eptr; \
875      if (utf && (c & 0xfc00) == 0xd800) GETUTF16LEN(c, eptr, len);
876    
877    /* Returns the next uchar, not advancing the pointer. This is called when
878    we know we are in UTF mode. */
879    
880    #define RAWUCHAR(eptr) \
881      (*(eptr))
882    
883    /* Returns the next uchar, advancing the pointer. This is called when
884    we know we are in UTF mode. */
885    
886    #define RAWUCHARINC(eptr) \
887      (*(eptr)++)
888    
889    /* Returns the next uchar, testing for UTF mode, and not advancing the
890    pointer. */
891    
892    #define RAWUCHARTEST(eptr) \
893      (*(eptr))
894    
895    /* Returns the next uchar, testing for UTF mode, advancing the
896    pointer. */
897    
898    #define RAWUCHARINCTEST(eptr) \
899      (*(eptr)++)
900    
901    /* If the pointer is not at the start of a character, move it back until
902    it is. This is called only in UTF-16 mode - we don't put a test within the
903    macro because almost all calls are already within a block of UTF-16 only
904    code. */
905    
906    #define BACKCHAR(eptr) if ((*eptr & 0xfc00) == 0xdc00) eptr--
907    
908    /* Same as above, just in the other direction. */
909    #define FORWARDCHAR(eptr) if ((*eptr & 0xfc00) == 0xdc00) eptr++
910    
911    /* Same as above, but it allows a fully customizable form. */
912    #define ACROSSCHAR(condition, eptr, action) \
913      if ((condition) && ((eptr) & 0xfc00) == 0xdc00) action
914    
915    #elif defined COMPILE_PCRE32
916    
917    /* These are trivial for the 32-bit library, since all UTF-32 characters fit
918    into one pcre_uchar unit. */
919    #define MAX_VALUE_FOR_SINGLE_CHAR (0x10ffffu)
920    #define HAS_EXTRALEN(c) (0)
921    #define GET_EXTRALEN(c) (0)
922    #define NOT_FIRSTCHAR(c) (0)
923    
924    #define UTF32_MASK (0x1fffffu)
925    
926    /* Get the next UTF-32 character, not advancing the pointer. This is called when
927    we know we are in UTF-32 mode. */
928    
929    #define GETCHAR(c, eptr) \
930      c = (*eptr) & UTF32_MASK;
931    
932    /* Get the next UTF-32 character, testing for UTF-32 mode, and not advancing the
933    pointer. */
934    
935    #define GETCHARTEST(c, eptr) \
936      c = *eptr; \
937      if (utf) c &= UTF32_MASK;
938    
939    /* Get the next UTF-32 character, advancing the pointer. This is called when we
940    know we are in UTF-32 mode. */
941    
942    #define GETCHARINC(c, eptr) \
943      c = (*eptr++) & UTF32_MASK;
944    
945    /* Get the next character, testing for UTF-32 mode, and advancing the pointer.
946    This is called when we don't know if we are in UTF-32 mode. */
947    
948    #define GETCHARINCTEST(c, eptr) \
949      c = *eptr++; \
950      if (utf) c &= UTF32_MASK;
951    
952    /* Get the next UTF-32 character, not advancing the pointer, not incrementing
953    length (since all UTF-32 is of length 1). This is called when we know we are in
954    UTF-32 mode. */
955    
956    #define GETCHARLEN(c, eptr, len) \
957      GETCHAR(c, eptr)
958    
959    /* Get the next UTF-32character, testing for UTF-32 mode, not advancing the
960    pointer, not incrementing the length (since all UTF-32 is of length 1).
961    This is called when we do not know if we are in UTF-32 mode. */
962    
963    #define GETCHARLENTEST(c, eptr, len) \
964      GETCHARTEST(c, eptr)
965    
966    /* Returns the next uchar, not advancing the pointer. This is called when
967    we know we are in UTF mode. */
968    
969    #define RAWUCHAR(eptr) \
970      (*(eptr) & UTF32_MASK)
971    
972    /* Returns the next uchar, advancing the pointer. This is called when
973    we know we are in UTF mode. */
974    
975    #define RAWUCHARINC(eptr) \
976      (*(eptr)++ & UTF32_MASK)
977    
978    /* Returns the next uchar, testing for UTF mode, and not advancing the
979    pointer. */
980    
981    #define RAWUCHARTEST(eptr) \
982      (utf ? (*(eptr) & UTF32_MASK) : *(eptr))
983    
984    /* Returns the next uchar, testing for UTF mode, advancing the
985    pointer. */
986    
987    #define RAWUCHARINCTEST(eptr) \
988      (utf ? (*(eptr)++ & UTF32_MASK) : *(eptr)++)
989    
990    /* If the pointer is not at the start of a character, move it back until
991    it is. This is called only in UTF-32 mode - we don't put a test within the
992    macro because almost all calls are already within a block of UTF-32 only
993    code.
994    These are all no-ops since all UTF-32 characters fit into one pcre_uchar. */
995    
996    #define BACKCHAR(eptr) do { } while (0)
997    
998    /* Same as above, just in the other direction. */
999    #define FORWARDCHAR(eptr) do { } while (0)
1000    
1001    /* Same as above, but it allows a fully customizable form. */
1002    #define ACROSSCHAR(condition, eptr, action) do { } while (0)
1003    
1004    #else
1005    #error Unsupported compiling mode
1006    #endif /* COMPILE_PCRE[8|16|32] */
1007    
1008    #endif  /* SUPPORT_UTF */
1009    
1010    /* Tests for Unicode horizontal and vertical whitespace characters must check a
1011    number of different values. Using a switch statement for this generates the
1012    fastest code (no loop, no memory access), and there are several places in the
1013    interpreter code where this happens. In order to ensure that all the case lists
1014    remain in step, we use macros so that there is only one place where the lists
1015    are defined.
1016    
1017    These values are also required as lists in pcre_compile.c when processing \h,
1018    \H, \v and \V in a character class. The lists are defined in pcre_tables.c, but
1019    macros that define the values are here so that all the definitions are
1020    together. The lists must be in ascending character order, terminated by
1021    NOTACHAR (which is 0xffffffff).
1022    
1023    Any changes should ensure that the various macros are kept in step with each
1024    other. NOTE: The values also appear in pcre_jit_compile.c. */
1025    
1026    /* ------ ASCII/Unicode environments ------ */
1027    
1028    #ifndef EBCDIC
1029    
1030    #define HSPACE_LIST \
1031      CHAR_HT, CHAR_SPACE, 0xa0, \
1032      0x1680, 0x180e, 0x2000, 0x2001, 0x2002, 0x2003, 0x2004, 0x2005, \
1033      0x2006, 0x2007, 0x2008, 0x2009, 0x200A, 0x202f, 0x205f, 0x3000, \
1034      NOTACHAR
1035    
1036    #define HSPACE_MULTIBYTE_CASES \
1037      case 0x1680:  /* OGHAM SPACE MARK */ \
1038      case 0x180e:  /* MONGOLIAN VOWEL SEPARATOR */ \
1039      case 0x2000:  /* EN QUAD */ \
1040      case 0x2001:  /* EM QUAD */ \
1041      case 0x2002:  /* EN SPACE */ \
1042      case 0x2003:  /* EM SPACE */ \
1043      case 0x2004:  /* THREE-PER-EM SPACE */ \
1044      case 0x2005:  /* FOUR-PER-EM SPACE */ \
1045      case 0x2006:  /* SIX-PER-EM SPACE */ \
1046      case 0x2007:  /* FIGURE SPACE */ \
1047      case 0x2008:  /* PUNCTUATION SPACE */ \
1048      case 0x2009:  /* THIN SPACE */ \
1049      case 0x200A:  /* HAIR SPACE */ \
1050      case 0x202f:  /* NARROW NO-BREAK SPACE */ \
1051      case 0x205f:  /* MEDIUM MATHEMATICAL SPACE */ \
1052      case 0x3000   /* IDEOGRAPHIC SPACE */
1053    
1054    #define HSPACE_BYTE_CASES \
1055      case CHAR_HT: \
1056      case CHAR_SPACE: \
1057      case 0xa0     /* NBSP */
1058    
1059    #define HSPACE_CASES \
1060      HSPACE_BYTE_CASES: \
1061      HSPACE_MULTIBYTE_CASES
1062    
1063    #define VSPACE_LIST \
1064      CHAR_LF, CHAR_VT, CHAR_FF, CHAR_CR, CHAR_NEL, 0x2028, 0x2029, NOTACHAR
1065    
1066    #define VSPACE_MULTIBYTE_CASES \
1067      case 0x2028:    /* LINE SEPARATOR */ \
1068      case 0x2029     /* PARAGRAPH SEPARATOR */
1069    
1070    #define VSPACE_BYTE_CASES \
1071      case CHAR_LF: \
1072      case CHAR_VT: \
1073      case CHAR_FF: \
1074      case CHAR_CR: \
1075      case CHAR_NEL
1076    
1077    #define VSPACE_CASES \
1078      VSPACE_BYTE_CASES: \
1079      VSPACE_MULTIBYTE_CASES
1080    
1081    /* ------ EBCDIC environments ------ */
1082    
1083    #else
1084    #define HSPACE_LIST CHAR_HT, CHAR_SPACE
1085    
1086    #define HSPACE_BYTE_CASES \
1087      case CHAR_HT: \
1088      case CHAR_SPACE
1089    
1090    #define HSPACE_CASES HSPACE_BYTE_CASES
1091    
1092    #ifdef EBCDIC_NL25
1093    #define VSPACE_LIST \
1094      CHAR_VT, CHAR_FF, CHAR_CR, CHAR_NEL, CHAR_LF, NOTACHAR
1095    #else
1096    #define VSPACE_LIST \
1097      CHAR_VT, CHAR_FF, CHAR_CR, CHAR_LF, CHAR_NEL, NOTACHAR
1098    #endif
1099    
1100    #define VSPACE_BYTE_CASES \
1101      case CHAR_LF: \
1102      case CHAR_VT: \
1103      case CHAR_FF: \
1104      case CHAR_CR: \
1105      case CHAR_NEL
1106    
1107    #define VSPACE_CASES VSPACE_BYTE_CASES
1108    #endif  /* EBCDIC */
1109    
1110    /* ------ End of whitespace macros ------ */
1111    
 #ifndef offsetof  
 #define offsetof(p_type,field) ((size_t)&(((p_type *)0)->field))  
 #endif  
1112    
1113    
1114  /* Private flags containing information about the compiled regex. They used to  /* Private flags containing information about the compiled regex. They used to
# Line 588  are in a 16-bit flags word. From release Line 1117  are in a 16-bit flags word. From release
1117  the restrictions on partial matching have been lifted. It remains for backwards  the restrictions on partial matching have been lifted. It remains for backwards
1118  compatibility. */  compatibility. */
1119    
1120  #define PCRE_NOPARTIAL     0x0001  /* can't use partial with this regex */  #define PCRE_MODE8         0x0001  /* compiled in 8 bit mode */
1121  #define PCRE_FIRSTSET      0x0002  /* first_byte is set */  #define PCRE_MODE16        0x0002  /* compiled in 16 bit mode */
1122  #define PCRE_REQCHSET      0x0004  /* req_byte is set */  #define PCRE_MODE32        0x0004  /* compiled in 32 bit mode */
1123  #define PCRE_STARTLINE     0x0008  /* start after \n for multiline */  #define PCRE_FIRSTSET      0x0010  /* first_char is set */
1124  #define PCRE_JCHANGED      0x0010  /* j option used in regex */  #define PCRE_FCH_CASELESS  0x0020  /* caseless first char */
1125  #define PCRE_HASCRORLF     0x0020  /* explicit \r or \n in pattern */  #define PCRE_REQCHSET      0x0040  /* req_byte is set */
1126  #define PCRE_HASTHEN       0x0040  /* pattern contains (*THEN) */  #define PCRE_RCH_CASELESS  0x0080  /* caseless requested char */
1127    #define PCRE_STARTLINE     0x0100  /* start after \n for multiline */
1128    #define PCRE_NOPARTIAL     0x0200  /* can't use partial with this regex */
1129    #define PCRE_JCHANGED      0x0400  /* j option used in regex */
1130    #define PCRE_HASCRORLF     0x0800  /* explicit \r or \n in pattern */
1131    #define PCRE_HASTHEN       0x1000  /* pattern contains (*THEN) */
1132    
1133    #if defined COMPILE_PCRE8
1134    #define PCRE_MODE          PCRE_MODE8
1135    #elif defined COMPILE_PCRE16
1136    #define PCRE_MODE          PCRE_MODE16
1137    #elif defined COMPILE_PCRE32
1138    #define PCRE_MODE          PCRE_MODE32
1139    #endif
1140    #define PCRE_MODE_MASK     (PCRE_MODE8 | PCRE_MODE16 | PCRE_MODE32)
1141    
1142  /* Flags for the "extra" block produced by pcre_study(). */  /* Flags for the "extra" block produced by pcre_study(). */
1143    
# Line 626  time, run time, or study time, respectiv Line 1169  time, run time, or study time, respectiv
1169     PCRE_NO_START_OPTIMIZE)     PCRE_NO_START_OPTIMIZE)
1170    
1171  #define PUBLIC_STUDY_OPTIONS \  #define PUBLIC_STUDY_OPTIONS \
1172     PCRE_STUDY_JIT_COMPILE     (PCRE_STUDY_JIT_COMPILE|PCRE_STUDY_JIT_PARTIAL_SOFT_COMPILE| \
1173        PCRE_STUDY_JIT_PARTIAL_HARD_COMPILE|PCRE_STUDY_EXTRA_NEEDED)
1174    
1175  /* Magic number to provide a small check against being handed junk. Also used  /* Magic number to provide a small check against being handed junk. */
 to detect whether a pattern was compiled on a host of different endianness. */  
1176    
1177  #define MAGIC_NUMBER  0x50435245UL   /* 'PCRE' */  #define MAGIC_NUMBER  0x50435245UL   /* 'PCRE' */
1178    
1179  /* Negative values for the firstchar and reqchar variables */  /* This variable is used to detect a loaded regular expression
1180    in different endianness. */
1181    
1182  #define REQ_UNSET (-2)  #define REVERSED_MAGIC_NUMBER  0x45524350UL   /* 'ERCP' */
 #define REQ_NONE  (-1)  
1183    
1184  /* The maximum remaining length of subject we are prepared to search for a  /* The maximum remaining length of subject we are prepared to search for a
1185  req_byte match. */  req_byte match. */
1186    
1187  #define REQ_BYTE_MAX 1000  #define REQ_BYTE_MAX 1000
1188    
 /* Flags added to firstbyte or reqbyte; a "non-literal" item is either a  
 variable-length repeat, or a anything other than literal characters. */  
   
 #define REQ_CASELESS 0x0100    /* indicates caselessness */  
 #define REQ_VARY     0x0200    /* reqbyte followed non-literal item */  
   
1189  /* Miscellaneous definitions. The #ifndef is to pacify compiler warnings in  /* Miscellaneous definitions. The #ifndef is to pacify compiler warnings in
1190  environments where these macros are defined elsewhere. Unfortunately, there  environments where these macros are defined elsewhere. Unfortunately, there
1191  is no way to do the same for the typedef. */  is no way to do the same for the typedef. */
# Line 677  for) in a minority area (EBCDIC platform Line 1214  for) in a minority area (EBCDIC platform
1214  application that did need both could compile two versions of the library, using  application that did need both could compile two versions of the library, using
1215  macros to give the functions distinct names. */  macros to give the functions distinct names. */
1216    
1217  #ifndef SUPPORT_UTF8  #ifndef SUPPORT_UTF
1218    
1219  /* UTF-8 support is not enabled; use the platform-dependent character literals  /* UTF-8 support is not enabled; use the platform-dependent character literals
1220  so that PCRE works on both ASCII and EBCDIC platforms, in non-UTF-mode only. */  so that PCRE works in both ASCII and EBCDIC environments, but only in non-UTF
1221    mode. Newline characters are problematic in EBCDIC. Though it has CR and LF
1222    characters, a common practice has been to use its NL (0x15) character as the
1223    line terminator in C-like processing environments. However, sometimes the LF
1224    (0x25) character is used instead, according to this Unicode document:
1225    
1226    http://unicode.org/standard/reports/tr13/tr13-5.html
1227    
1228    PCRE defaults EBCDIC NL to 0x15, but has a build-time option to select 0x25
1229    instead. Whichever is *not* chosen is defined as NEL.
1230    
1231    In both ASCII and EBCDIC environments, CHAR_NL and CHAR_LF are synonyms for the
1232    same code point. */
1233    
1234    #ifdef EBCDIC
1235    
1236    #ifndef EBCDIC_NL25
1237    #define CHAR_NL                     '\x15'
1238    #define CHAR_NEL                    '\x25'
1239    #define STR_NL                      "\x15"
1240    #define STR_NEL                     "\x25"
1241    #else
1242    #define CHAR_NL                     '\x25'
1243    #define CHAR_NEL                    '\x15'
1244    #define STR_NL                      "\x25"
1245    #define STR_NEL                     "\x15"
1246    #endif
1247    
1248    #define CHAR_LF                     CHAR_NL
1249    #define STR_LF                      STR_NL
1250    
1251    #define CHAR_ESC                    '\047'
1252    #define CHAR_DEL                    '\007'
1253    #define STR_ESC                     "\047"
1254    #define STR_DEL                     "\007"
1255    
1256    #else  /* Not EBCDIC */
1257    
1258    /* In ASCII/Unicode, linefeed is '\n' and we equate this to NL for
1259    compatibility. NEL is the Unicode newline character; make sure it is
1260    a positive value. */
1261    
1262    #define CHAR_LF                     '\n'
1263    #define CHAR_NL                     CHAR_LF
1264    #define CHAR_NEL                    ((unsigned char)'\x85')
1265    #define CHAR_ESC                    '\033'
1266    #define CHAR_DEL                    '\177'
1267    
1268    #define STR_LF                      "\n"
1269    #define STR_NL                      STR_LF
1270    #define STR_NEL                     "\x85"
1271    #define STR_ESC                     "\033"
1272    #define STR_DEL                     "\177"
1273    
1274    #endif  /* EBCDIC */
1275    
1276    /* The remaining definitions work in both environments. */
1277    
1278  #define CHAR_HT                     '\t'  #define CHAR_HT                     '\t'
1279  #define CHAR_VT                     '\v'  #define CHAR_VT                     '\v'
1280  #define CHAR_FF                     '\f'  #define CHAR_FF                     '\f'
1281  #define CHAR_CR                     '\r'  #define CHAR_CR                     '\r'
 #define CHAR_NL                     '\n'  
1282  #define CHAR_BS                     '\b'  #define CHAR_BS                     '\b'
1283  #define CHAR_BEL                    '\a'  #define CHAR_BEL                    '\a'
 #ifdef EBCDIC  
 #define CHAR_ESC                    '\047'  
 #define CHAR_DEL                    '\007'  
 #else  
 #define CHAR_ESC                    '\033'  
 #define CHAR_DEL                    '\177'  
 #endif  
1284    
1285  #define CHAR_SPACE                  ' '  #define CHAR_SPACE                  ' '
1286  #define CHAR_EXCLAMATION_MARK       '!'  #define CHAR_EXCLAMATION_MARK       '!'
# Line 797  so that PCRE works on both ASCII and EBC Line 1382  so that PCRE works on both ASCII and EBC
1382  #define STR_VT                      "\v"  #define STR_VT                      "\v"
1383  #define STR_FF                      "\f"  #define STR_FF                      "\f"
1384  #define STR_CR                      "\r"  #define STR_CR                      "\r"
 #define STR_NL                      "\n"  
1385  #define STR_BS                      "\b"  #define STR_BS                      "\b"
1386  #define STR_BEL                     "\a"  #define STR_BEL                     "\a"
 #ifdef EBCDIC  
 #define STR_ESC                     "\047"  
 #define STR_DEL                     "\007"  
 #else  
 #define STR_ESC                     "\033"  
 #define STR_DEL                     "\177"  
 #endif  
1387    
1388  #define STR_SPACE                   " "  #define STR_SPACE                   " "
1389  #define STR_EXCLAMATION_MARK        "!"  #define STR_EXCLAMATION_MARK        "!"
# Line 937  so that PCRE works on both ASCII and EBC Line 1514  so that PCRE works on both ASCII and EBC
1514  #define STRING_ANYCRLF_RIGHTPAR        "ANYCRLF)"  #define STRING_ANYCRLF_RIGHTPAR        "ANYCRLF)"
1515  #define STRING_BSR_ANYCRLF_RIGHTPAR    "BSR_ANYCRLF)"  #define STRING_BSR_ANYCRLF_RIGHTPAR    "BSR_ANYCRLF)"
1516  #define STRING_BSR_UNICODE_RIGHTPAR    "BSR_UNICODE)"  #define STRING_BSR_UNICODE_RIGHTPAR    "BSR_UNICODE)"
1517  #define STRING_UTF8_RIGHTPAR           "UTF8)"  #ifdef COMPILE_PCRE8
1518    #define STRING_UTF_RIGHTPAR            "UTF8)"
1519    #endif
1520    #ifdef COMPILE_PCRE16
1521    #define STRING_UTF_RIGHTPAR            "UTF16)"
1522    #endif
1523    #ifdef COMPILE_PCRE32
1524    #define STRING_UTF_RIGHTPAR            "UTF32)"
1525    #endif
1526  #define STRING_UCP_RIGHTPAR            "UCP)"  #define STRING_UCP_RIGHTPAR            "UCP)"
1527  #define STRING_NO_START_OPT_RIGHTPAR   "NO_START_OPT)"  #define STRING_NO_START_OPT_RIGHTPAR   "NO_START_OPT)"
1528    
1529  #else  /* SUPPORT_UTF8 */  #else  /* SUPPORT_UTF */
1530    
1531  /* UTF-8 support is enabled; always use UTF-8 (=ASCII) character codes. This  /* UTF-8 support is enabled; always use UTF-8 (=ASCII) character codes. This
1532  works in both modes non-EBCDIC platforms, and on EBCDIC platforms in UTF-8 mode  works in both modes non-EBCDIC platforms, and on EBCDIC platforms in UTF-8 mode
# Line 951  only. */ Line 1536  only. */
1536  #define CHAR_VT                     '\013'  #define CHAR_VT                     '\013'
1537  #define CHAR_FF                     '\014'  #define CHAR_FF                     '\014'
1538  #define CHAR_CR                     '\015'  #define CHAR_CR                     '\015'
1539  #define CHAR_NL                     '\012'  #define CHAR_LF                     '\012'
1540    #define CHAR_NL                     CHAR_LF
1541    #define CHAR_NEL                    ((unsigned char)'\x85')
1542  #define CHAR_BS                     '\010'  #define CHAR_BS                     '\010'
1543  #define CHAR_BEL                    '\007'  #define CHAR_BEL                    '\007'
1544  #define CHAR_ESC                    '\033'  #define CHAR_ESC                    '\033'
# Line 1192  only. */ Line 1779  only. */
1779  #define STRING_ANYCRLF_RIGHTPAR        STR_A STR_N STR_Y STR_C STR_R STR_L STR_F STR_RIGHT_PARENTHESIS  #define STRING_ANYCRLF_RIGHTPAR        STR_A STR_N STR_Y STR_C STR_R STR_L STR_F STR_RIGHT_PARENTHESIS
1780  #define STRING_BSR_ANYCRLF_RIGHTPAR    STR_B STR_S STR_R STR_UNDERSCORE STR_A STR_N STR_Y STR_C STR_R STR_L STR_F STR_RIGHT_PARENTHESIS  #define STRING_BSR_ANYCRLF_RIGHTPAR    STR_B STR_S STR_R STR_UNDERSCORE STR_A STR_N STR_Y STR_C STR_R STR_L STR_F STR_RIGHT_PARENTHESIS
1781  #define STRING_BSR_UNICODE_RIGHTPAR    STR_B STR_S STR_R STR_UNDERSCORE STR_U STR_N STR_I STR_C STR_O STR_D STR_E STR_RIGHT_PARENTHESIS  #define STRING_BSR_UNICODE_RIGHTPAR    STR_B STR_S STR_R STR_UNDERSCORE STR_U STR_N STR_I STR_C STR_O STR_D STR_E STR_RIGHT_PARENTHESIS
1782  #define STRING_UTF8_RIGHTPAR           STR_U STR_T STR_F STR_8 STR_RIGHT_PARENTHESIS  #ifdef COMPILE_PCRE8
1783    #define STRING_UTF_RIGHTPAR            STR_U STR_T STR_F STR_8 STR_RIGHT_PARENTHESIS
1784    #endif
1785    #ifdef COMPILE_PCRE16
1786    #define STRING_UTF_RIGHTPAR            STR_U STR_T STR_F STR_1 STR_6 STR_RIGHT_PARENTHESIS
1787    #endif
1788    #ifdef COMPILE_PCRE32
1789    #define STRING_UTF_RIGHTPAR            STR_U STR_T STR_F STR_3 STR_2 STR_RIGHT_PARENTHESIS
1790    #endif
1791  #define STRING_UCP_RIGHTPAR            STR_U STR_C STR_P STR_RIGHT_PARENTHESIS  #define STRING_UCP_RIGHTPAR            STR_U STR_C STR_P STR_RIGHT_PARENTHESIS
1792  #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  #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
1793    
1794  #endif  /* SUPPORT_UTF8 */  #endif  /* SUPPORT_UTF */
1795    
1796  /* Escape items that are just an encoding of a particular data value. */  /* Escape items that are just an encoding of a particular data value. */
1797    
# Line 1209  only. */ Line 1804  only. */
1804  #endif  #endif
1805    
1806  #ifndef ESC_n  #ifndef ESC_n
1807  #define ESC_n CHAR_NL  #define ESC_n CHAR_LF
1808  #endif  #endif
1809    
1810  #ifndef ESC_r  #ifndef ESC_r
# Line 1234  only. */ Line 1829  only. */
1829  #define PT_SPACE      6    /* Perl space - Z plus 9,10,12,13 */  #define PT_SPACE      6    /* Perl space - Z plus 9,10,12,13 */
1830  #define PT_PXSPACE    7    /* POSIX space - Z plus 9,10,11,12,13 */  #define PT_PXSPACE    7    /* POSIX space - Z plus 9,10,11,12,13 */
1831  #define PT_WORD       8    /* Word - L plus N plus underscore */  #define PT_WORD       8    /* Word - L plus N plus underscore */
1832    #define PT_CLIST      9    /* Pseudo-property: match character list */
1833    
1834  /* Flag bits and data types for the extended class (OP_XCLASS) for classes that  /* Flag bits and data types for the extended class (OP_XCLASS) for classes that
1835  contain UTF-8 characters with values greater than 255. */  contain characters with values greater than 255. */
1836    
1837  #define XCL_NOT    0x01    /* Flag: this is a negative class */  #define XCL_NOT    0x01    /* Flag: this is a negative class */
1838  #define XCL_MAP    0x02    /* Flag: a 32-byte map is present */  #define XCL_MAP    0x02    /* Flag: a 32-byte map is present */
# Line 1249  contain UTF-8 characters with values gre Line 1845  contain UTF-8 characters with values gre
1845    
1846  /* These are escaped items that aren't just an encoding of a particular data  /* These are escaped items that aren't just an encoding of a particular data
1847  value such as \n. They must have non-zero values, as check_escape() returns  value such as \n. They must have non-zero values, as check_escape() returns
1848  their negation. Also, they must appear in the same order as in the opcode  0 for a data character.  Also, they must appear in the same order as in the opcode
1849  definitions below, up to ESC_z. There's a dummy for OP_ALLANY because it  definitions below, up to ESC_z. There's a dummy for OP_ALLANY because it
1850  corresponds to "." in DOTALL mode rather than an escape sequence. It is also  corresponds to "." in DOTALL mode rather than an escape sequence. It is also
1851  used for [^] in JavaScript compatibility mode, and for \C in non-utf8 mode. In  used for [^] in JavaScript compatibility mode, and for \C in non-utf mode. In
1852  non-DOTALL mode, "." behaves like \N.  non-DOTALL mode, "." behaves like \N.
1853    
1854  The special values ESC_DU, ESC_du, etc. are used instead of ESC_D, ESC_d, etc.  The special values ESC_DU, ESC_du, etc. are used instead of ESC_D, ESC_d, etc.
1855  when PCRE_UCP is set, when replacement of \d etc by \p sequences is required.  when PCRE_UCP is set and replacement of \d etc by \p sequences is required.
1856  They must be contiguous, and remain in order so that the replacements can be  They must be contiguous, and remain in order so that the replacements can be
1857  looked up from a table.  looked up from a table.
1858    
1859  The final escape must be ESC_REF as subsequent values are used for  Negative numbers are used to encode a backreference (\1, \2, \3, etc.) in
1860  backreferences (\1, \2, \3, etc). There are two tests in the code for an escape  check_escape(). There are two tests in the code for an escape
1861  greater than ESC_b and less than ESC_Z to detect the types that may be  greater than ESC_b and less than ESC_Z to detect the types that may be
1862  repeated. These are the types that consume characters. If any new escapes are  repeated. These are the types that consume characters. If any new escapes are
1863  put in between that don't consume a character, that code will have to change.  put in between that don't consume a character, that code will have to change.
# Line 1271  enum { ESC_A = 1, ESC_G, ESC_K, ESC_B, E Line 1867  enum { ESC_A = 1, ESC_G, ESC_K, ESC_B, E
1867         ESC_W, ESC_w, ESC_N, ESC_dum, ESC_C, ESC_P, ESC_p, ESC_R, ESC_H,         ESC_W, ESC_w, ESC_N, ESC_dum, ESC_C, ESC_P, ESC_p, ESC_R, ESC_H,
1868         ESC_h, ESC_V, ESC_v, ESC_X, ESC_Z, ESC_z,         ESC_h, ESC_V, ESC_v, ESC_X, ESC_Z, ESC_z,
1869         ESC_E, ESC_Q, ESC_g, ESC_k,         ESC_E, ESC_Q, ESC_g, ESC_k,
1870         ESC_DU, ESC_du, ESC_SU, ESC_su, ESC_WU, ESC_wu,         ESC_DU, ESC_du, ESC_SU, ESC_su, ESC_WU, ESC_wu };
        ESC_REF };  
1871    
1872  /* Opcode table: Starting from 1 (i.e. after OP_END), the values up to  /* Opcode table: Starting from 1 (i.e. after OP_END), the values up to
1873  OP_EOD must correspond in order to the list of escapes immediately above.  OP_EOD must correspond in order to the list of escapes immediately above.
# Line 1298  enum { Line 1893  enum {
1893    OP_NOT_WORDCHAR,       /* 10 \W */    OP_NOT_WORDCHAR,       /* 10 \W */
1894    OP_WORDCHAR,           /* 11 \w */    OP_WORDCHAR,           /* 11 \w */
1895    
1896    OP_ANY,            /* 12 Match any character except newline */    OP_ANY,            /* 12 Match any character except newline (\N) */
1897    OP_ALLANY,         /* 13 Match any character */    OP_ALLANY,         /* 13 Match any character */
1898    OP_ANYBYTE,        /* 14 Match any byte (\C); different to OP_ANY for UTF-8 */    OP_ANYBYTE,        /* 14 Match any byte (\C); different to OP_ANY for UTF-8 */
1899    OP_NOTPROP,        /* 15 \P (not Unicode property) */    OP_NOTPROP,        /* 15 \P (not Unicode property) */
# Line 1309  enum { Line 1904  enum {
1904    OP_NOT_VSPACE,     /* 20 \V (not vertical whitespace) */    OP_NOT_VSPACE,     /* 20 \V (not vertical whitespace) */
1905    OP_VSPACE,         /* 21 \v (vertical whitespace) */    OP_VSPACE,         /* 21 \v (vertical whitespace) */
1906    OP_EXTUNI,         /* 22 \X (extended Unicode sequence */    OP_EXTUNI,         /* 22 \X (extended Unicode sequence */
1907    OP_EODN,           /* 23 End of data or \n at end of data: \Z. */    OP_EODN,           /* 23 End of data or \n at end of data (\Z) */
1908    OP_EOD,            /* 24 End of data: \z */    OP_EOD,            /* 24 End of data (\z) */
1909    
1910    OP_CIRC,           /* 25 Start of line - not multiline */    OP_CIRC,           /* 25 Start of line - not multiline */
1911    OP_CIRCM,          /* 26 Start of line - multiline */    OP_CIRCM,          /* 26 Start of line - multiline */
# Line 1433  enum { Line 2028  enum {
2028    OP_CLASS,          /* 106 Match a character class, chars < 256 only */    OP_CLASS,          /* 106 Match a character class, chars < 256 only */
2029    OP_NCLASS,         /* 107 Same, but the bitmap was created from a negative    OP_NCLASS,         /* 107 Same, but the bitmap was created from a negative
2030                                class - the difference is relevant only when a                                class - the difference is relevant only when a
2031                                UTF-8 character > 255 is encountered. */                                character > 255 is encountered. */
2032    OP_XCLASS,         /* 108 Extended class for handling UTF-8 chars within the    OP_XCLASS,         /* 108 Extended class for handling > 255 chars within the
2033                                class. This does both positive and negative. */                                class. This does both positive and negative. */
2034    OP_REF,            /* 109 Match a back reference, casefully */    OP_REF,            /* 109 Match a back reference, casefully */
2035    OP_REFI,           /* 110 Match a back reference, caselessly */    OP_REFI,           /* 110 Match a back reference, caselessly */
# Line 1591  in UTF-8 mode. The code that uses this t Line 2186  in UTF-8 mode. The code that uses this t
2186    2,                             /* noti                                   */ \    2,                             /* noti                                   */ \
2187    /* Positive single-char repeats                             ** These are */ \    /* Positive single-char repeats                             ** These are */ \
2188    2, 2, 2, 2, 2, 2,              /* *, *?, +, +?, ?, ??       ** minima in */ \    2, 2, 2, 2, 2, 2,              /* *, *?, +, +?, ?, ??       ** minima in */ \
2189    4, 4, 4,                       /* upto, minupto, exact      ** mode      */ \    2+IMM2_SIZE, 2+IMM2_SIZE,      /* upto, minupto             ** mode      */ \
2190    2, 2, 2, 4,                    /* *+, ++, ?+, upto+                      */ \    2+IMM2_SIZE,                   /* exact                                  */ \
2191      2, 2, 2, 2+IMM2_SIZE,          /* *+, ++, ?+, upto+                      */ \
2192    2, 2, 2, 2, 2, 2,              /* *I, *?I, +I, +?I, ?I, ??I ** UTF-8     */ \    2, 2, 2, 2, 2, 2,              /* *I, *?I, +I, +?I, ?I, ??I ** UTF-8     */ \
2193    4, 4, 4,                       /* upto I, minupto I, exact I             */ \    2+IMM2_SIZE, 2+IMM2_SIZE,      /* upto I, minupto I                      */ \
2194    2, 2, 2, 4,                    /* *+I, ++I, ?+I, upto+I                  */ \    2+IMM2_SIZE,                   /* exact I                                */ \
2195      2, 2, 2, 2+IMM2_SIZE,          /* *+I, ++I, ?+I, upto+I                  */ \
2196    /* Negative single-char repeats - only for chars < 256                   */ \    /* Negative single-char repeats - only for chars < 256                   */ \
2197    2, 2, 2, 2, 2, 2,              /* NOT *, *?, +, +?, ?, ??                */ \    2, 2, 2, 2, 2, 2,              /* NOT *, *?, +, +?, ?, ??                */ \
2198    4, 4, 4,                       /* NOT upto, minupto, exact               */ \    2+IMM2_SIZE, 2+IMM2_SIZE,      /* NOT upto, minupto                      */ \
2199    2, 2, 2, 4,                    /* Possessive NOT *, +, ?, upto           */ \    2+IMM2_SIZE,                   /* NOT exact                              */ \
2200      2, 2, 2, 2+IMM2_SIZE,          /* Possessive NOT *, +, ?, upto           */ \
2201    2, 2, 2, 2, 2, 2,              /* NOT *I, *?I, +I, +?I, ?I, ??I          */ \    2, 2, 2, 2, 2, 2,              /* NOT *I, *?I, +I, +?I, ?I, ??I          */ \
2202    4, 4, 4,                       /* NOT upto I, minupto I, exact I         */ \    2+IMM2_SIZE, 2+IMM2_SIZE,      /* NOT upto I, minupto I                  */ \
2203    2, 2, 2, 4,                    /* Possessive NOT *I, +I, ?I, upto I      */ \    2+IMM2_SIZE,                   /* NOT exact I                            */ \
2204      2, 2, 2, 2+IMM2_SIZE,          /* Possessive NOT *I, +I, ?I, upto I      */ \
2205    /* Positive type repeats                                                 */ \    /* Positive type repeats                                                 */ \
2206    2, 2, 2, 2, 2, 2,              /* Type *, *?, +, +?, ?, ??               */ \    2, 2, 2, 2, 2, 2,              /* Type *, *?, +, +?, ?, ??               */ \
2207    4, 4, 4,                       /* Type upto, minupto, exact              */ \    2+IMM2_SIZE, 2+IMM2_SIZE,      /* Type upto, minupto                     */ \
2208    2, 2, 2, 4,                    /* Possessive *+, ++, ?+, upto+           */ \    2+IMM2_SIZE,                   /* Type exact                             */ \
2209      2, 2, 2, 2+IMM2_SIZE,          /* Possessive *+, ++, ?+, upto+           */ \
2210    /* Character class & ref repeats                                         */ \    /* Character class & ref repeats                                         */ \
2211    1, 1, 1, 1, 1, 1,              /* *, *?, +, +?, ?, ??                    */ \    1, 1, 1, 1, 1, 1,              /* *, *?, +, +?, ?, ??                    */ \
2212    5, 5,                          /* CRRANGE, CRMINRANGE                    */ \    1+2*IMM2_SIZE, 1+2*IMM2_SIZE,  /* CRRANGE, CRMINRANGE                    */ \
2213   33,                             /* CLASS                                  */ \    1+(32/sizeof(pcre_uchar)),     /* CLASS                                  */ \
2214   33,                             /* NCLASS                                 */ \    1+(32/sizeof(pcre_uchar)),     /* NCLASS                                 */ \
2215    0,                             /* XCLASS - variable length               */ \    0,                             /* XCLASS - variable length               */ \
2216    3,                             /* REF                                    */ \    1+IMM2_SIZE,                   /* REF                                    */ \
2217    3,                             /* REFI                                   */ \    1+IMM2_SIZE,                   /* REFI                                   */ \
2218    1+LINK_SIZE,                   /* RECURSE                                */ \    1+LINK_SIZE,                   /* RECURSE                                */ \
2219    2+2*LINK_SIZE,                 /* CALLOUT                                */ \    2+2*LINK_SIZE,                 /* CALLOUT                                */ \
2220    1+LINK_SIZE,                   /* Alt                                    */ \    1+LINK_SIZE,                   /* Alt                                    */ \
# Line 1631  in UTF-8 mode. The code that uses this t Line 2231  in UTF-8 mode. The code that uses this t
2231    1+LINK_SIZE,                   /* ONCE_NC                                */ \    1+LINK_SIZE,                   /* ONCE_NC                                */ \
2232    1+LINK_SIZE,                   /* BRA                                    */ \    1+LINK_SIZE,                   /* BRA                                    */ \
2233    1+LINK_SIZE,                   /* BRAPOS                                 */ \    1+LINK_SIZE,                   /* BRAPOS                                 */ \
2234    3+LINK_SIZE,                   /* CBRA                                   */ \    1+LINK_SIZE+IMM2_SIZE,         /* CBRA                                   */ \
2235    3+LINK_SIZE,                   /* CBRAPOS                                */ \    1+LINK_SIZE+IMM2_SIZE,         /* CBRAPOS                                */ \
2236    1+LINK_SIZE,                   /* COND                                   */ \    1+LINK_SIZE,                   /* COND                                   */ \
2237    1+LINK_SIZE,                   /* SBRA                                   */ \    1+LINK_SIZE,                   /* SBRA                                   */ \
2238    1+LINK_SIZE,                   /* SBRAPOS                                */ \    1+LINK_SIZE,                   /* SBRAPOS                                */ \
2239    3+LINK_SIZE,                   /* SCBRA                                  */ \    1+LINK_SIZE+IMM2_SIZE,         /* SCBRA                                  */ \
2240    3+LINK_SIZE,                   /* SCBRAPOS                               */ \    1+LINK_SIZE+IMM2_SIZE,         /* SCBRAPOS                               */ \
2241    1+LINK_SIZE,                   /* SCOND                                  */ \    1+LINK_SIZE,                   /* SCOND                                  */ \
2242    3, 3,                          /* CREF, NCREF                            */ \    1+IMM2_SIZE, 1+IMM2_SIZE,      /* CREF, NCREF                            */ \
2243    3, 3,                          /* RREF, NRREF                            */ \    1+IMM2_SIZE, 1+IMM2_SIZE,      /* RREF, NRREF                            */ \
2244    1,                             /* DEF                                    */ \    1,                             /* DEF                                    */ \
2245    1, 1, 1,                       /* BRAZERO, BRAMINZERO, BRAPOSZERO        */ \    1, 1, 1,                       /* BRAZERO, BRAMINZERO, BRAPOSZERO        */ \
2246    3, 1, 3,                       /* MARK, PRUNE, PRUNE_ARG                 */ \    3, 1, 3,                       /* MARK, PRUNE, PRUNE_ARG                 */ \
2247    1, 3,                          /* SKIP, SKIP_ARG                         */ \    1, 3,                          /* SKIP, SKIP_ARG                         */ \
2248    1, 3,                          /* THEN, THEN_ARG                         */ \    1, 3,                          /* THEN, THEN_ARG                         */ \
2249    1, 1, 1, 1,                    /* COMMIT, FAIL, ACCEPT, ASSERT_ACCEPT    */ \    1, 1, 1, 1,                    /* COMMIT, FAIL, ACCEPT, ASSERT_ACCEPT    */ \
2250    3, 1                           /* CLOSE, SKIPZERO  */    1+IMM2_SIZE, 1                 /* CLOSE, SKIPZERO                        */
2251    
2252  /* A magic value for OP_RREF and OP_NRREF to indicate the "any recursion"  /* A magic value for OP_RREF and OP_NRREF to indicate the "any recursion"
2253  condition. */  condition. */
# Line 1665  enum { ERR0,  ERR1,  ERR2,  ERR3,  ERR4, Line 2265  enum { ERR0,  ERR1,  ERR2,  ERR3,  ERR4,
2265         ERR40, ERR41, ERR42, ERR43, ERR44, ERR45, ERR46, ERR47, ERR48, ERR49,         ERR40, ERR41, ERR42, ERR43, ERR44, ERR45, ERR46, ERR47, ERR48, ERR49,
2266         ERR50, ERR51, ERR52, ERR53, ERR54, ERR55, ERR56, ERR57, ERR58, ERR59,         ERR50, ERR51, ERR52, ERR53, ERR54, ERR55, ERR56, ERR57, ERR58, ERR59,
2267         ERR60, ERR61, ERR62, ERR63, ERR64, ERR65, ERR66, ERR67, ERR68, ERR69,         ERR60, ERR61, ERR62, ERR63, ERR64, ERR65, ERR66, ERR67, ERR68, ERR69,
2268         ERR70, ERR71, ERR72, ERRCOUNT };         ERR70, ERR71, ERR72, ERR73, ERR74, ERR75, ERR76, ERR77, ERRCOUNT };
2269    
2270    /* JIT compiling modes. The function list is indexed by them. */
2271    enum { JIT_COMPILE, JIT_PARTIAL_SOFT_COMPILE, JIT_PARTIAL_HARD_COMPILE,
2272           JIT_NUMBER_OF_COMPILE_MODES };
2273    
2274  /* The real format of the start of the pcre block; the index of names and the  /* The real format of the start of the pcre block; the index of names and the
2275  code vector run on as long as necessary after the end. We store an explicit  code vector run on as long as necessary after the end. We store an explicit
# Line 1684  fields are present. Currently PCRE alway Line 2288  fields are present. Currently PCRE alway
2288  NOTE NOTE NOTE  NOTE NOTE NOTE
2289  */  */
2290    
2291  typedef struct real_pcre {  #if defined COMPILE_PCRE8
2292    #define REAL_PCRE real_pcre
2293    #elif defined COMPILE_PCRE16
2294    #define REAL_PCRE real_pcre16
2295    #elif defined COMPILE_PCRE32
2296    #define REAL_PCRE real_pcre32
2297    #endif
2298    
2299    /* It is necessary to fork the struct for 32 bit, since it needs to use
2300     * pcre_uchar for first_char and req_char. Can't put an ifdef inside the
2301     * typedef since pcretest needs access to  the struct of the 8-, 16-
2302     * and 32-bit variants. */
2303    
2304    typedef struct real_pcre8_or_16 {
2305    pcre_uint32 magic_number;    pcre_uint32 magic_number;
2306    pcre_uint32 size;               /* Total that was malloced */    pcre_uint32 size;               /* Total that was malloced */
2307    pcre_uint32 options;            /* Public options */    pcre_uint32 options;            /* Public options */
2308    pcre_uint16 flags;              /* Private flags */    pcre_uint16 flags;              /* Private flags */
2309    pcre_uint16 dummy1;             /* For future use */    pcre_uint16 max_lookbehind;     /* Longest lookbehind (characters) */
2310    pcre_uint16 top_bracket;    pcre_uint16 top_bracket;        /* Highest numbered group */
2311    pcre_uint16 top_backref;    pcre_uint16 top_backref;        /* Highest numbered back reference */
2312    pcre_uint16 first_byte;    pcre_uint16 first_char;         /* Starting character */
2313    pcre_uint16 req_byte;    pcre_uint16 req_char;           /* This character must be seen */
2314    pcre_uint16 name_table_offset;  /* Offset to name table that follows */    pcre_uint16 name_table_offset;  /* Offset to name table that follows */
2315    pcre_uint16 name_entry_size;    /* Size of any name items */    pcre_uint16 name_entry_size;    /* Size of any name items */
2316    pcre_uint16 name_count;         /* Number of name items */    pcre_uint16 name_count;         /* Number of name items */
2317    pcre_uint16 ref_count;          /* Reference count */    pcre_uint16 ref_count;          /* Reference count */
2318      const pcre_uint8 *tables;       /* Pointer to tables or NULL for std */
2319      const pcre_uint8 *nullpad;      /* NULL padding */
2320    } real_pcre8_or_16;
2321    
2322    const unsigned char *tables;    /* Pointer to tables or NULL for std */  typedef struct real_pcre8_or_16 real_pcre;
2323    const unsigned char *nullpad;   /* NULL padding */  typedef struct real_pcre8_or_16 real_pcre16;
2324  } real_pcre;  
2325    typedef struct real_pcre32 {
2326      pcre_uint32 magic_number;
2327      pcre_uint32 size;               /* Total that was malloced */
2328      pcre_uint32 options;            /* Public options */
2329      pcre_uint16 flags;              /* Private flags */
2330      pcre_uint16 max_lookbehind;     /* Longest lookbehind (characters) */
2331      pcre_uint16 top_bracket;        /* Highest numbered group */
2332      pcre_uint16 top_backref;        /* Highest numbered back reference */
2333      pcre_uint32 first_char;         /* Starting character */
2334      pcre_uint32 req_char;           /* This character must be seen */
2335      pcre_uint16 name_table_offset;  /* Offset to name table that follows */
2336      pcre_uint16 name_entry_size;    /* Size of any name items */
2337      pcre_uint16 name_count;         /* Number of name items */
2338      pcre_uint16 ref_count;          /* Reference count */
2339      pcre_uint16 dummy1;             /* for later expansion */
2340      pcre_uint16 dummy2;             /* for later expansion */
2341      const pcre_uint8 *tables;       /* Pointer to tables or NULL for std */
2342      void *nullpad;                  /* for later expansion */
2343    } real_pcre32;
2344    
2345    /* Assert that the size of REAL_PCRE is divisible by 8 */
2346    typedef int __assert_real_pcre_size_divisible_8[(sizeof(REAL_PCRE) % 8) == 0 ? 1 : -1];
2347    
2348    /* Needed in pcretest to access some fields in the real_pcre* structures
2349     * directly. They're unified for 8/16/32 bits since the structs only differ
2350     * after these fields; if that ever changes, need to fork those defines into
2351     * 8/16 and 32 bit versions. */
2352    #define REAL_PCRE_MAGIC(re)     (((REAL_PCRE*)re)->magic_number)
2353    #define REAL_PCRE_SIZE(re)      (((REAL_PCRE*)re)->size)
2354    #define REAL_PCRE_OPTIONS(re)   (((REAL_PCRE*)re)->options)
2355    #define REAL_PCRE_FLAGS(re)     (((REAL_PCRE*)re)->flags)
2356    
2357  /* The format of the block used to store data from pcre_study(). The same  /* The format of the block used to store data from pcre_study(). The same
2358  remark (see NOTE above) about extending this structure applies. */  remark (see NOTE above) about extending this structure applies. */
# Line 1709  remark (see NOTE above) about extending Line 2360  remark (see NOTE above) about extending
2360  typedef struct pcre_study_data {  typedef struct pcre_study_data {
2361    pcre_uint32 size;               /* Total that was malloced */    pcre_uint32 size;               /* Total that was malloced */
2362    pcre_uint32 flags;              /* Private flags */    pcre_uint32 flags;              /* Private flags */
2363    uschar start_bits[32];          /* Starting char bits */    pcre_uint8 start_bits[32];      /* Starting char bits */
2364    pcre_uint32 minlength;          /* Minimum subject length */    pcre_uint32 minlength;          /* Minimum subject length */
2365  } pcre_study_data;  } pcre_study_data;
2366    
# Line 1728  typedef struct open_capitem { Line 2379  typedef struct open_capitem {
2379  doing the compiling, so that they are thread-safe. */  doing the compiling, so that they are thread-safe. */
2380    
2381  typedef struct compile_data {  typedef struct compile_data {
2382    const uschar *lcc;            /* Points to lower casing table */    const pcre_uint8 *lcc;            /* Points to lower casing table */
2383    const uschar *fcc;            /* Points to case-flipping table */    const pcre_uint8 *fcc;            /* Points to case-flipping table */
2384    const uschar *cbits;          /* Points to character type table */    const pcre_uint8 *cbits;          /* Points to character type table */
2385    const uschar *ctypes;         /* Points to table of type maps */    const pcre_uint8 *ctypes;         /* Points to table of type maps */
2386    const uschar *start_workspace;/* The start of working space */    const pcre_uchar *start_workspace;/* The start of working space */
2387    const uschar *start_code;     /* The start of the compiled code */    const pcre_uchar *start_code;     /* The start of the compiled code */
2388    const uschar *start_pattern;  /* The start of the pattern */    const pcre_uchar *start_pattern;  /* The start of the pattern */
2389    const uschar *end_pattern;    /* The end of the pattern */    const pcre_uchar *end_pattern;    /* The end of the pattern */
2390    open_capitem *open_caps;      /* Chain of open capture items */    open_capitem *open_caps;          /* Chain of open capture items */
2391    uschar *hwm;                  /* High watermark of workspace */    pcre_uchar *hwm;                  /* High watermark of workspace */
2392    uschar *name_table;           /* The name/number table */    pcre_uchar *name_table;           /* The name/number table */
2393    int  names_found;             /* Number of entries so far */    int  names_found;                 /* Number of entries so far */
2394    int  name_entry_size;         /* Size of each entry */    int  name_entry_size;             /* Size of each entry */
2395    int  workspace_size;          /* Size of workspace */    int  workspace_size;              /* Size of workspace */
2396    int  bracount;                /* Count of capturing parens as we compile */    int  bracount;                    /* Count of capturing parens as we compile */
2397    int  final_bracount;          /* Saved value after first pass */    int  final_bracount;              /* Saved value after first pass */
2398    int  top_backref;             /* Maximum back reference */    int  max_lookbehind;              /* Maximum lookbehind (characters) */
2399    unsigned int backref_map;     /* Bitmap of low back refs */    int  top_backref;                 /* Maximum back reference */
2400    int  assert_depth;            /* Depth of nested assertions */    unsigned int backref_map;         /* Bitmap of low back refs */
2401    int  external_options;        /* External (initial) options */    int  assert_depth;                /* Depth of nested assertions */
2402    int  external_flags;          /* External flag bits to be set */    int  external_options;            /* External (initial) options */
2403    int  req_varyopt;             /* "After variable item" flag for reqbyte */    int  external_flags;              /* External flag bits to be set */
2404    BOOL had_accept;              /* (*ACCEPT) encountered */    int  req_varyopt;                 /* "After variable item" flag for reqbyte */
2405    BOOL check_lookbehind;        /* Lookbehinds need later checking */    BOOL had_accept;                  /* (*ACCEPT) encountered */
2406    int  nltype;                  /* Newline type */    BOOL had_pruneorskip;             /* (*PRUNE) or (*SKIP) encountered */
2407    int  nllen;                   /* Newline string length */    BOOL check_lookbehind;            /* Lookbehinds need later checking */
2408    uschar nl[4];                 /* Newline string when fixed length */    int  nltype;                      /* Newline type */
2409      int  nllen;                       /* Newline string length */
2410      pcre_uchar nl[4];                 /* Newline string when fixed length */
2411  } compile_data;  } compile_data;
2412    
2413  /* Structure for maintaining a chain of pointers to the currently incomplete  /* Structure for maintaining a chain of pointers to the currently incomplete
# Line 1762  branches, for testing for left recursion Line 2415  branches, for testing for left recursion
2415    
2416  typedef struct branch_chain {  typedef struct branch_chain {
2417    struct branch_chain *outer;    struct branch_chain *outer;
2418    uschar *current_branch;    pcre_uchar *current_branch;
2419  } branch_chain;  } branch_chain;
2420    
2421  /* Structure for items in a linked list that represents an explicit recursive  /* Structure for items in a linked list that represents an explicit recursive
# Line 1773  typedef struct recursion_info { Line 2426  typedef struct recursion_info {
2426    int group_num;                  /* Number of group that was called */    int group_num;                  /* Number of group that was called */
2427    int *offset_save;               /* Pointer to start of saved offsets */    int *offset_save;               /* Pointer to start of saved offsets */
2428    int saved_max;                  /* Number of saved offsets */    int saved_max;                  /* Number of saved offsets */
2429    USPTR subject_position;         /* Position at start of recursion */    PCRE_PUCHAR subject_position;   /* Position at start of recursion */
2430  } recursion_info;  } recursion_info;
2431    
2432  /* A similar structure for pcre_dfa_exec(). */  /* A similar structure for pcre_dfa_exec(). */
# Line 1781  typedef struct recursion_info { Line 2434  typedef struct recursion_info {
2434  typedef struct dfa_recursion_info {  typedef struct dfa_recursion_info {
2435    struct dfa_recursion_info *prevrec;    struct dfa_recursion_info *prevrec;
2436    int group_num;    int group_num;
2437    USPTR subject_position;    PCRE_PUCHAR subject_position;
2438  } dfa_recursion_info;  } dfa_recursion_info;
2439    
2440  /* Structure for building a chain of data for holding the values of the subject  /* Structure for building a chain of data for holding the values of the subject
# Line 1791  pcre_exec(). */ Line 2444  pcre_exec(). */
2444    
2445  typedef struct eptrblock {  typedef struct eptrblock {
2446    struct eptrblock *epb_prev;    struct eptrblock *epb_prev;
2447    USPTR epb_saved_eptr;    PCRE_PUCHAR epb_saved_eptr;
2448  } eptrblock;  } eptrblock;
2449    
2450    
# Line 1802  typedef struct match_data { Line 2455  typedef struct match_data {
2455    unsigned long int match_call_count;      /* As it says */    unsigned long int match_call_count;      /* As it says */
2456    unsigned long int match_limit;           /* As it says */    unsigned long int match_limit;           /* As it says */
2457    unsigned long int match_limit_recursion; /* As it says */    unsigned long int match_limit_recursion; /* As it says */
2458    int   *offset_vector;         /* Offset vector */    int   *offset_vector;           /* Offset vector */
2459    int    offset_end;            /* One past the end */    int    offset_end;              /* One past the end */
2460    int    offset_max;            /* The maximum usable for return data */    int    offset_max;              /* The maximum usable for return data */
2461    int    nltype;                /* Newline type */    int    nltype;                  /* Newline type */
2462    int    nllen;                 /* Newline string length */    int    nllen;                   /* Newline string length */
2463    int    name_count;            /* Number of names in name table */    int    name_count;              /* Number of names in name table */
2464    int    name_entry_size;       /* Size of entry in names table */    int    name_entry_size;         /* Size of entry in names table */
2465    uschar *name_table;           /* Table of names */    pcre_uchar *name_table;         /* Table of names */
2466    uschar nl[4];                 /* Newline string when fixed */    pcre_uchar nl[4];               /* Newline string when fixed */
2467    const  uschar *lcc;           /* Points to lower casing table */    const  pcre_uint8 *lcc;         /* Points to lower casing table */
2468    const  uschar *ctypes;        /* Points to table of type maps */    const  pcre_uint8 *fcc;         /* Points to case-flipping table */
2469    BOOL   offset_overflow;       /* Set if too many extractions */    const  pcre_uint8 *ctypes;      /* Points to table of type maps */
2470    BOOL   notbol;                /* NOTBOL flag */    BOOL   offset_overflow;         /* Set if too many extractions */
2471    BOOL   noteol;                /* NOTEOL flag */    BOOL   notbol;                  /* NOTBOL flag */
2472    BOOL   utf8;                  /* UTF8 flag */    BOOL   noteol;                  /* NOTEOL flag */
2473    BOOL   jscript_compat;        /* JAVASCRIPT_COMPAT flag */    BOOL   utf;                     /* UTF-8 / UTF-16 flag */
2474    BOOL   use_ucp;               /* PCRE_UCP flag */    BOOL   jscript_compat;          /* JAVASCRIPT_COMPAT flag */
2475    BOOL   endonly;               /* Dollar not before final \n */    BOOL   use_ucp;                 /* PCRE_UCP flag */
2476    BOOL   notempty;              /* Empty string match not wanted */    BOOL   endonly;                 /* Dollar not before final \n */
2477    BOOL   notempty_atstart;      /* Empty string match at start not wanted */    BOOL   notempty;                /* Empty string match not wanted */
2478    BOOL   hitend;                /* Hit the end of the subject at some point */    BOOL   notempty_atstart;        /* Empty string match at start not wanted */
2479    BOOL   bsr_anycrlf;           /* \R is just any CRLF, not full Unicode */    BOOL   hitend;                  /* Hit the end of the subject at some point */
2480    BOOL   hasthen;               /* Pattern contains (*THEN) */    BOOL   bsr_anycrlf;             /* \R is just any CRLF, not full Unicode */
2481    BOOL   ignore_skip_arg;       /* For re-run when SKIP name not found */    BOOL   hasthen;                 /* Pattern contains (*THEN) */
2482    const  uschar *start_code;    /* For use when recursing */    BOOL   ignore_skip_arg;         /* For re-run when SKIP name not found */
2483    USPTR  start_subject;         /* Start of the subject string */    const  pcre_uchar *start_code;  /* For use when recursing */
2484    USPTR  end_subject;           /* End of the subject string */    PCRE_PUCHAR start_subject;      /* Start of the subject string */
2485    USPTR  start_match_ptr;       /* Start of matched string */    PCRE_PUCHAR end_subject;        /* End of the subject string */
2486    USPTR  end_match_ptr;         /* Subject position at end match */    PCRE_PUCHAR start_match_ptr;    /* Start of matched string */
2487    USPTR  start_used_ptr;        /* Earliest consulted character */    PCRE_PUCHAR end_match_ptr;      /* Subject position at end match */
2488    int    partial;               /* PARTIAL options */    PCRE_PUCHAR start_used_ptr;     /* Earliest consulted character */
2489    int    end_offset_top;        /* Highwater mark at end of match */    int    partial;                 /* PARTIAL options */
2490    int    capture_last;          /* Most recent capture number */    int    end_offset_top;          /* Highwater mark at end of match */
2491    int    start_offset;          /* The start offset value */    int    capture_last;            /* Most recent capture number */
2492    int    match_function_type;   /* Set for certain special calls of MATCH() */    int    start_offset;            /* The start offset value */
2493    eptrblock *eptrchain;         /* Chain of eptrblocks for tail recursions */    int    match_function_type;     /* Set for certain special calls of MATCH() */
2494    int    eptrn;                 /* Next free eptrblock */    eptrblock *eptrchain;           /* Chain of eptrblocks for tail recursions */
2495    recursion_info *recursive;    /* Linked list of recursion data */    int    eptrn;                   /* Next free eptrblock */
2496    void  *callout_data;          /* To pass back to callouts */    recursion_info *recursive;      /* Linked list of recursion data */
2497    const  uschar *mark;          /* Mark pointer to pass back on success */    void  *callout_data;            /* To pass back to callouts */
2498    const  uschar *nomatch_mark;  /* Mark pointer to pass back on failure */    const  pcre_uchar *mark;        /* Mark pointer to pass back on success */
2499    const  uschar *once_target;   /* Where to back up to for atomic groups */    const  pcre_uchar *nomatch_mark;/* Mark pointer to pass back on failure */
2500      const  pcre_uchar *once_target; /* Where to back up to for atomic groups */
2501    #ifdef NO_RECURSE
2502      void  *match_frames_base;       /* For remembering malloc'd frames */
2503    #endif
2504  } match_data;  } match_data;
2505    
2506  /* A similar structure is used for the same purpose by the DFA matching  /* A similar structure is used for the same purpose by the DFA matching
2507  functions. */  functions. */
2508    
2509  typedef struct dfa_match_data {  typedef struct dfa_match_data {
2510    const uschar *start_code;      /* Start of the compiled pattern */    const pcre_uchar *start_code;     /* Start of the compiled pattern */
2511    const uschar *start_subject;   /* Start of the subject string */    const pcre_uchar *start_subject ; /* Start of the subject string */
2512    const uschar *end_subject;     /* End of subject string */    const pcre_uchar *end_subject;    /* End of subject string */
2513    const uschar *start_used_ptr;  /* Earliest consulted character */    const pcre_uchar *start_used_ptr; /* Earliest consulted character */
2514    const uschar *tables;          /* Character tables */    const pcre_uint8 *tables;         /* Character tables */
2515    int   start_offset;            /* The start offset value */    int   start_offset;               /* The start offset value */
2516    int   moptions;                /* Match options */    int   moptions;                   /* Match options */
2517    int   poptions;                /* Pattern options */    int   poptions;                   /* Pattern options */
2518    int    nltype;                 /* Newline type */    int   nltype;                     /* Newline type */
2519    int    nllen;                  /* Newline string length */    int   nllen;                      /* Newline string length */
2520    uschar nl[4];                  /* Newline string when fixed */    pcre_uchar nl[4];                 /* Newline string when fixed */
2521    void  *callout_data;           /* To pass back to callouts */    void *callout_data;               /* To pass back to callouts */
2522    dfa_recursion_info *recursive; /* Linked list of recursion data */    dfa_recursion_info *recursive;    /* Linked list of recursion data */
2523  } dfa_match_data;  } dfa_match_data;
2524    
2525  /* Bit definitions for entries in the pcre_ctypes table. */  /* Bit definitions for entries in the pcre_ctypes table. */
# Line 1898  total length. */ Line 2555  total length. */
2555  #define ctypes_offset (cbits_offset + cbit_length)  #define ctypes_offset (cbits_offset + cbit_length)
2556  #define tables_length (ctypes_offset + 256)  #define tables_length (ctypes_offset + 256)
2557    
2558    /* Internal function and data prefixes. */
2559    
2560    #if defined COMPILE_PCRE8
2561    #ifndef PUBL
2562    #define PUBL(name) pcre_##name
2563    #endif
2564    #ifndef PRIV
2565    #define PRIV(name) _pcre_##name
2566    #endif
2567    #elif defined COMPILE_PCRE16
2568    #ifndef PUBL
2569    #define PUBL(name) pcre16_##name
2570    #endif
2571    #ifndef PRIV
2572    #define PRIV(name) _pcre16_##name
2573    #endif
2574    #elif defined COMPILE_PCRE32
2575    #ifndef PUBL
2576    #define PUBL(name) pcre32_##name
2577    #endif
2578    #ifndef PRIV
2579    #define PRIV(name) _pcre32_##name
2580    #endif
2581    #else
2582    #error Unsupported compiling mode
2583    #endif /* COMPILE_PCRE[8|16|32] */
2584    
2585  /* Layout of the UCP type table that translates property names into types and  /* Layout of the UCP type table that translates property names into types and
2586  codes. Each entry used to point directly to a name, but to reduce the number of  codes. Each entry used to point directly to a name, but to reduce the number of
2587  relocations in shared libraries, it now has an offset into a single string  relocations in shared libraries, it now has an offset into a single string
# Line 1915  of the exported public functions. They h Line 2599  of the exported public functions. They h
2599  but are not part of the PCRE public API. The data for these tables is in the  but are not part of the PCRE public API. The data for these tables is in the
2600  pcre_tables.c module. */  pcre_tables.c module. */
2601    
2602  extern const int    _pcre_utf8_table1[];  #ifdef COMPILE_PCRE8
2603  extern const int    _pcre_utf8_table2[];  extern const int            PRIV(utf8_table1)[];
2604  extern const int    _pcre_utf8_table3[];  extern const int            PRIV(utf8_table1_size);
2605  extern const uschar _pcre_utf8_table4[];  extern const int            PRIV(utf8_table2)[];
2606    extern const int            PRIV(utf8_table3)[];
2607  #ifdef SUPPORT_JIT  extern const pcre_uint8     PRIV(utf8_table4)[];
2608  extern const uschar _pcre_utf8_char_sizes[];  #endif /* COMPILE_PCRE8 */
2609  #endif  
2610    extern const char           PRIV(utt_names)[];
2611    extern const ucp_type_table PRIV(utt)[];
2612    extern const int            PRIV(utt_size);
2613    
2614  extern const int    _pcre_utf8_table1_size;  extern const pcre_uint8     PRIV(OP_lengths)[];
2615    extern const pcre_uint8     PRIV(default_tables)[];
2616    
2617  extern const char   _pcre_utt_names[];  extern const pcre_uint32    PRIV(hspace_list)[];
2618  extern const ucp_type_table _pcre_utt[];  extern const pcre_uint32    PRIV(vspace_list)[];
 extern const int _pcre_utt_size;  
   
 extern const uschar _pcre_default_tables[];  
   
 extern const uschar _pcre_OP_lengths[];  
2619    
2620    
2621  /* Internal shared functions. These are functions that are used by more than  /* Internal shared functions. These are functions that are used by more than
2622  one of the exported public functions. They have to be "external" in the C  one of the exported public functions. They have to be "external" in the C
2623  sense, but are not part of the PCRE public API. */  sense, but are not part of the PCRE public API. */
2624    
2625  extern const uschar *_pcre_find_bracket(const uschar *, BOOL, int);  /* String comparison functions. */
2626  extern BOOL          _pcre_is_newline(USPTR, int, USPTR, int *, BOOL);  #if defined COMPILE_PCRE8
2627  extern int           _pcre_ord2utf8(int, uschar *);  
2628  extern real_pcre    *_pcre_try_flipped(const real_pcre *, real_pcre *,  #define STRCMP_UC_UC(str1, str2) \
2629                         const pcre_study_data *, pcre_study_data *);    strcmp((char *)(str1), (char *)(str2))
2630  extern int           _pcre_valid_utf8(USPTR, int, int *);  #define STRCMP_UC_C8(str1, str2) \
2631  extern BOOL          _pcre_was_newline(USPTR, int, USPTR, int *, BOOL);    strcmp((char *)(str1), (str2))
2632  extern BOOL          _pcre_xclass(int, const uschar *);  #define STRNCMP_UC_UC(str1, str2, num) \
2633      strncmp((char *)(str1), (char *)(str2), (num))
2634    #define STRNCMP_UC_C8(str1, str2, num) \
2635      strncmp((char *)(str1), (str2), (num))
2636    #define STRLEN_UC(str) strlen((const char *)str)
2637    
2638    #elif defined COMPILE_PCRE16 || defined COMPILE_PCRE32
2639    
2640    extern int               PRIV(strcmp_uc_uc)(const pcre_uchar *,
2641                               const pcre_uchar *);
2642    extern int               PRIV(strcmp_uc_c8)(const pcre_uchar *,
2643                               const char *);
2644    extern int               PRIV(strncmp_uc_uc)(const pcre_uchar *,
2645                               const pcre_uchar *, unsigned int num);
2646    extern int               PRIV(strncmp_uc_c8)(const pcre_uchar *,
2647                               const char *, unsigned int num);
2648    extern unsigned int      PRIV(strlen_uc)(const pcre_uchar *str);
2649    
2650    #define STRCMP_UC_UC(str1, str2) \
2651      PRIV(strcmp_uc_uc)((str1), (str2))
2652    #define STRCMP_UC_C8(str1, str2) \
2653      PRIV(strcmp_uc_c8)((str1), (str2))
2654    #define STRNCMP_UC_UC(str1, str2, num) \
2655      PRIV(strncmp_uc_uc)((str1), (str2), (num))
2656    #define STRNCMP_UC_C8(str1, str2, num) \
2657      PRIV(strncmp_uc_c8)((str1), (str2), (num))
2658    #define STRLEN_UC(str) PRIV(strlen_uc)(str)
2659    
2660    #endif /* COMPILE_PCRE[8|16|32] */
2661    
2662    #if defined COMPILE_PCRE8 || defined COMPILE_PCRE16
2663    
2664    #define STRCMP_UC_UC_TEST(str1, str2) STRCMP_UC_UC(str1, str2)
2665    #define STRCMP_UC_C8_TEST(str1, str2) STRCMP_UC_C8(str1, str2)
2666    
2667    #elif defined COMPILE_PCRE32
2668    
2669    extern int               PRIV(strcmp_uc_uc_utf)(const pcre_uchar *,
2670                               const pcre_uchar *);
2671    extern int               PRIV(strcmp_uc_c8_utf)(const pcre_uchar *,
2672                               const char *);
2673    
2674    #define STRCMP_UC_UC_TEST(str1, str2) \
2675      (utf ? PRIV(strcmp_uc_uc_utf)((str1), (str2)) : PRIV(strcmp_uc_uc)((str1), (str2)))
2676    #define STRCMP_UC_C8_TEST(str1, str2) \
2677      (utf ? PRIV(strcmp_uc_c8_utf)((str1), (str2)) : PRIV(strcmp_uc_c8)((str1), (str2)))
2678    
2679    #endif /* COMPILE_PCRE[8|16|32] */
2680    
2681    extern const pcre_uchar *PRIV(find_bracket)(const pcre_uchar *, BOOL, int);
2682    extern BOOL              PRIV(is_newline)(PCRE_PUCHAR, int, PCRE_PUCHAR,
2683                               int *, BOOL);
2684    extern int               PRIV(ord2utf)(pcre_uint32, pcre_uchar *);
2685    extern int               PRIV(valid_utf)(PCRE_PUCHAR, int, int *);
2686    extern BOOL              PRIV(was_newline)(PCRE_PUCHAR, int, PCRE_PUCHAR,
2687                               int *, BOOL);
2688    extern BOOL              PRIV(xclass)(pcre_uint32, const pcre_uchar *, BOOL);
2689    
2690  #ifdef SUPPORT_JIT  #ifdef SUPPORT_JIT
2691  extern void          _pcre_jit_compile(const real_pcre *, pcre_extra *);  extern void              PRIV(jit_compile)(const REAL_PCRE *,
2692  extern int           _pcre_jit_exec(const real_pcre *, void *, PCRE_SPTR,                             PUBL(extra) *, int);
2693                          int, int, int, int, int *, int);  extern int               PRIV(jit_exec)(const REAL_PCRE *, const PUBL(extra) *,
2694  extern void          _pcre_jit_free(void *);                             const pcre_uchar *, int, int, int, int *, int);
2695    extern void              PRIV(jit_free)(void *);
2696    extern int               PRIV(jit_get_size)(void *);
2697    extern const char*       PRIV(jit_get_target)(void);
2698  #endif  #endif
2699    
2700  /* Unicode character database (UCD) */  /* Unicode character database (UCD) */
2701    
2702  typedef struct {  typedef struct {
2703    uschar script;    pcre_uint8 script;     /* ucp_Arabic, etc. */
2704    uschar chartype;    pcre_uint8 chartype;   /* ucp_Cc, etc. (general categories) */
2705    pcre_int32 other_case;    pcre_uint8 gbprop;     /* ucp_gbControl, etc. (grapheme break property) */
2706      pcre_uint8 caseset;    /* offset to multichar other cases or zero */
2707      pcre_int32 other_case; /* offset to other case, or zero if none */
2708  } ucd_record;  } ucd_record;
2709    
2710  extern const ucd_record  _pcre_ucd_records[];  extern const pcre_uint32 PRIV(ucd_caseless_sets)[];
2711  extern const uschar      _pcre_ucd_stage1[];  extern const ucd_record  PRIV(ucd_records)[];
2712  extern const pcre_uint16 _pcre_ucd_stage2[];  extern const pcre_uint8  PRIV(ucd_stage1)[];
2713  extern const int         _pcre_ucp_gentype[];  extern const pcre_uint16 PRIV(ucd_stage2)[];
2714    extern const pcre_uint32 PRIV(ucp_gentype)[];
2715    extern const pcre_uint32 PRIV(ucp_gbtable)[];
2716  #ifdef SUPPORT_JIT  #ifdef SUPPORT_JIT
2717  extern const int         _pcre_ucp_typerange[];  extern const int         PRIV(ucp_typerange)[];
2718  #endif  #endif
2719    
2720    #ifdef SUPPORT_UCP
2721  /* UCD access macros */  /* UCD access macros */
2722    
2723  #define UCD_BLOCK_SIZE 128  #define UCD_BLOCK_SIZE 128
2724  #define GET_UCD(ch) (_pcre_ucd_records + \  #define GET_UCD(ch) (PRIV(ucd_records) + \
2725          _pcre_ucd_stage2[_pcre_ucd_stage1[(ch) / UCD_BLOCK_SIZE] * \          PRIV(ucd_stage2)[PRIV(ucd_stage1)[(int)(ch) / UCD_BLOCK_SIZE] * \
2726          UCD_BLOCK_SIZE + (ch) % UCD_BLOCK_SIZE])          UCD_BLOCK_SIZE + (int)(ch) % UCD_BLOCK_SIZE])
2727    
2728  #define UCD_CHARTYPE(ch)  GET_UCD(ch)->chartype  #define UCD_CHARTYPE(ch)    GET_UCD(ch)->chartype
2729  #define UCD_SCRIPT(ch)    GET_UCD(ch)->script  #define UCD_SCRIPT(ch)      GET_UCD(ch)->script
2730  #define UCD_CATEGORY(ch)  _pcre_ucp_gentype[UCD_CHARTYPE(ch)]  #define UCD_CATEGORY(ch)    PRIV(ucp_gentype)[UCD_CHARTYPE(ch)]
2731  #define UCD_OTHERCASE(ch) (ch + GET_UCD(ch)->other_case)  #define UCD_GRAPHBREAK(ch)  GET_UCD(ch)->gbprop
2732    #define UCD_CASESET(ch)     GET_UCD(ch)->caseset
2733    #define UCD_OTHERCASE(ch)   ((pcre_uint32)((int)ch + (int)(GET_UCD(ch)->other_case)))
2734    
2735    #endif /* SUPPORT_UCP */
2736    
2737  #endif  #endif
2738    

Legend:
Removed from v.773  
changed lines
  Added in v.1128

  ViewVC Help
Powered by ViewVC 1.1.5