/[pcre]/code/trunk/pcre_exec.c
ViewVC logotype

Diff of /code/trunk/pcre_exec.c

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

revision 919 by ph10, Fri Feb 17 11:48:02 2012 UTC revision 1189 by ph10, Tue Oct 30 16:34:17 2012 UTC
# Line 37  POSSIBILITY OF SUCH DAMAGE. Line 37  POSSIBILITY OF SUCH DAMAGE.
37  -----------------------------------------------------------------------------  -----------------------------------------------------------------------------
38  */  */
39    
   
40  /* This module contains pcre_exec(), the externally visible function that does  /* This module contains pcre_exec(), the externally visible function that does
41  pattern matching using an NFA algorithm, trying to mimic Perl as closely as  pattern matching using an NFA algorithm, trying to mimic Perl as closely as
42  possible. There are also some static supporting functions. */  possible. There are also some static supporting functions. */
# Line 93  because the offset vector is always a mu Line 92  because the offset vector is always a mu
92  static const char rep_min[] = { 0, 0, 1, 1, 0, 0 };  static const char rep_min[] = { 0, 0, 1, 1, 0, 0 };
93  static const char rep_max[] = { 0, 0, 0, 0, 1, 1 };  static const char rep_max[] = { 0, 0, 0, 0, 1, 1 };
94    
   
   
95  #ifdef PCRE_DEBUG  #ifdef PCRE_DEBUG
96  /*************************************************  /*************************************************
97  *        Debugging function to print chars       *  *        Debugging function to print chars       *
# Line 115  Returns:     nothing Line 112  Returns:     nothing
112  static void  static void
113  pchars(const pcre_uchar *p, int length, BOOL is_subject, match_data *md)  pchars(const pcre_uchar *p, int length, BOOL is_subject, match_data *md)
114  {  {
115  unsigned int c;  pcre_uint32 c;
116    BOOL utf = md->utf;
117  if (is_subject && length > md->end_subject - p) length = md->end_subject - p;  if (is_subject && length > md->end_subject - p) length = md->end_subject - p;
118  while (length-- > 0)  while (length-- > 0)
119    if (isprint(c = *(p++))) printf("%c", c); else printf("\\x%02x", c);    if (isprint(c = RAWUCHARINCTEST(p))) printf("%c", (char)c); else printf("\\x{%02x}", c);
120  }  }
121  #endif  #endif
122    
# Line 142  Arguments: Line 140  Arguments:
140    
141  Returns:      >= 0 the number of subject bytes matched  Returns:      >= 0 the number of subject bytes matched
142                -1 no match                -1 no match
143                -2 partial match; always given if at end subject                -2 partial match; always given if at end subject
144  */  */
145    
146  static int  static int
# Line 151  match_ref(int offset, register PCRE_PUCH Line 149  match_ref(int offset, register PCRE_PUCH
149  {  {
150  PCRE_PUCHAR eptr_start = eptr;  PCRE_PUCHAR eptr_start = eptr;
151  register PCRE_PUCHAR p = md->start_subject + md->offset_vector[offset];  register PCRE_PUCHAR p = md->start_subject + md->offset_vector[offset];
152    #ifdef SUPPORT_UTF
153    BOOL utf = md->utf;
154    #endif
155    
156  #ifdef PCRE_DEBUG  #ifdef PCRE_DEBUG
157  if (eptr >= md->end_subject)  if (eptr >= md->end_subject)
# Line 165  pchars(p, length, FALSE, md); Line 166  pchars(p, length, FALSE, md);
166  printf("\n");  printf("\n");
167  #endif  #endif
168    
169  /* Always fail if reference not set (and not JavaScript compatible - in that  /* Always fail if reference not set (and not JavaScript compatible - in that
170  case the length is passed as zero). */  case the length is passed as zero). */
171    
172  if (length < 0) return -1;  if (length < 0) return -1;
# Line 178  if (caseless) Line 179  if (caseless)
179    {    {
180  #ifdef SUPPORT_UTF  #ifdef SUPPORT_UTF
181  #ifdef SUPPORT_UCP  #ifdef SUPPORT_UCP
182    if (md->utf)    if (utf)
183      {      {
184      /* Match characters up to the end of the reference. NOTE: the number of      /* Match characters up to the end of the reference. NOTE: the number of
185      bytes matched may differ, because there are some characters whose upper and      data units matched may differ, because in UTF-8 there are some characters
186      lower case versions code as different numbers of bytes. For example, U+023A      whose upper and lower case versions code have different numbers of bytes.
187      (2 bytes in UTF-8) is the upper case version of U+2C65 (3 bytes in UTF-8);      For example, U+023A (2 bytes in UTF-8) is the upper case version of U+2C65
188      a sequence of 3 of the former uses 6 bytes, as does a sequence of two of      (3 bytes in UTF-8); a sequence of 3 of the former uses 6 bytes, as does a
189      the latter. It is important, therefore, to check the length along the      sequence of two of the latter. It is important, therefore, to check the
190      reference, not along the subject (earlier code did this wrong). */      length along the reference, not along the subject (earlier code did this
191        wrong). */
192    
193      PCRE_PUCHAR endptr = p + length;      PCRE_PUCHAR endptr = p + length;
194      while (p < endptr)      while (p < endptr)
195        {        {
196        int c, d;        pcre_uint32 c, d;
197          const ucd_record *ur;
198        if (eptr >= md->end_subject) return -2;   /* Partial match */        if (eptr >= md->end_subject) return -2;   /* Partial match */
199        GETCHARINC(c, eptr);        GETCHARINC(c, eptr);
200        GETCHARINC(d, p);        GETCHARINC(d, p);
201        if (c != d && c != UCD_OTHERCASE(d)) return -1;        ur = GET_UCD(d);
202          if (c != d && c != d + ur->other_case)
203            {
204            const pcre_uint32 *pp = PRIV(ucd_caseless_sets) + ur->caseset;
205            for (;;)
206              {
207              if (c < *pp) return -1;
208              if (c == *pp++) break;
209              }
210            }
211        }        }
212      }      }
213    else    else
# Line 207  if (caseless) Line 219  if (caseless)
219      {      {
220      while (length-- > 0)      while (length-- > 0)
221        {        {
222          pcre_uchar cc, cp;
223        if (eptr >= md->end_subject) return -2;   /* Partial match */        if (eptr >= md->end_subject) return -2;   /* Partial match */
224        if (TABLE_GET(*p, md->lcc, *p) != TABLE_GET(*eptr, md->lcc, *eptr)) return -1;        cc = RAWUCHARTEST(eptr);
225          cp = RAWUCHARTEST(p);
226          if (TABLE_GET(cp, md->lcc, cp) != TABLE_GET(cc, md->lcc, cc)) return -1;
227        p++;        p++;
228        eptr++;        eptr++;
229        }        }
# Line 220  are in UTF-8 mode. */ Line 235  are in UTF-8 mode. */
235    
236  else  else
237    {    {
238    while (length-- > 0)    while (length-- > 0)
239      {      {
240      if (eptr >= md->end_subject) return -2;   /* Partial match */      if (eptr >= md->end_subject) return -2;   /* Partial match */
241      if (*p++ != *eptr++) return -1;      if (RAWUCHARINCTEST(p) != RAWUCHARINCTEST(eptr)) return -1;
242      }      }
243    }    }
244    
245  return (int)(eptr - eptr_start);  return (int)(eptr - eptr_start);
# Line 279  enum { RM1=1, RM2,  RM3,  RM4,  RM5,  RM Line 294  enum { RM1=1, RM2,  RM3,  RM4,  RM5,  RM
294         RM31,  RM32, RM33, RM34, RM35, RM36, RM37, RM38, RM39, RM40,         RM31,  RM32, RM33, RM34, RM35, RM36, RM37, RM38, RM39, RM40,
295         RM41,  RM42, RM43, RM44, RM45, RM46, RM47, RM48, RM49, RM50,         RM41,  RM42, RM43, RM44, RM45, RM46, RM47, RM48, RM49, RM50,
296         RM51,  RM52, RM53, RM54, RM55, RM56, RM57, RM58, RM59, RM60,         RM51,  RM52, RM53, RM54, RM55, RM56, RM57, RM58, RM59, RM60,
297         RM61,  RM62, RM63, RM64, RM65, RM66 };         RM61,  RM62, RM63, RM64, RM65, RM66, RM67 };
298    
299  /* These versions of the macros use the stack, as normal. There are debugging  /* These versions of the macros use the stack, as normal. There are debugging
300  versions and production versions. Note that the "rw" argument of RMATCH isn't  versions and production versions. Note that the "rw" argument of RMATCH isn't
# Line 297  actually used in this definition. */ Line 312  actually used in this definition. */
312    }    }
313  #define RRETURN(ra) \  #define RRETURN(ra) \
314    { \    { \
315    printf("match() returned %d from line %d ", ra, __LINE__); \    printf("match() returned %d from line %d\n", ra, __LINE__); \
316    return ra; \    return ra; \
317    }    }
318  #else  #else
# Line 317  argument of match(), which never changes Line 332  argument of match(), which never changes
332    
333  #define RMATCH(ra,rb,rc,rd,re,rw)\  #define RMATCH(ra,rb,rc,rd,re,rw)\
334    {\    {\
335    heapframe *newframe = (heapframe *)(PUBL(stack_malloc))(sizeof(heapframe));\    heapframe *newframe = frame->Xnextframe;\
336    if (newframe == NULL) RRETURN(PCRE_ERROR_NOMEMORY);\    if (newframe == NULL)\
337    frame->Xwhere = rw; \      {\
338        newframe = (heapframe *)(PUBL(stack_malloc))(sizeof(heapframe));\
339        if (newframe == NULL) RRETURN(PCRE_ERROR_NOMEMORY);\
340        newframe->Xnextframe = NULL;\
341        frame->Xnextframe = newframe;\
342        }\
343      frame->Xwhere = rw;\
344    newframe->Xeptr = ra;\    newframe->Xeptr = ra;\
345    newframe->Xecode = rb;\    newframe->Xecode = rb;\
346    newframe->Xmstart = mstart;\    newframe->Xmstart = mstart;\
# Line 338  argument of match(), which never changes Line 359  argument of match(), which never changes
359    {\    {\
360    heapframe *oldframe = frame;\    heapframe *oldframe = frame;\
361    frame = oldframe->Xprevframe;\    frame = oldframe->Xprevframe;\
   if (oldframe != &frame_zero) (PUBL(stack_free))(oldframe);\  
362    if (frame != NULL)\    if (frame != NULL)\
363      {\      {\
364      rrc = ra;\      rrc = ra;\
# Line 352  argument of match(), which never changes Line 372  argument of match(), which never changes
372    
373  typedef struct heapframe {  typedef struct heapframe {
374    struct heapframe *Xprevframe;    struct heapframe *Xprevframe;
375      struct heapframe *Xnextframe;
376    
377    /* Function arguments that may change */    /* Function arguments that may change */
378    
# Line 382  typedef struct heapframe { Line 403  typedef struct heapframe {
403    
404  #ifdef SUPPORT_UCP  #ifdef SUPPORT_UCP
405    int Xprop_type;    int Xprop_type;
406    int Xprop_value;    unsigned int Xprop_value;
407    int Xprop_fail_result;    int Xprop_fail_result;
408    int Xoclength;    int Xoclength;
409    pcre_uchar Xocchars[6];    pcre_uchar Xocchars[6];
# Line 483  so they can be ordinary variables in all Line 504  so they can be ordinary variables in all
504    
505  register int  rrc;         /* Returns from recursive calls */  register int  rrc;         /* Returns from recursive calls */
506  register int  i;           /* Used for loops not involving calls to RMATCH() */  register int  i;           /* Used for loops not involving calls to RMATCH() */
507  register unsigned int c;   /* Character values not kept over RMATCH() calls */  register pcre_uint32 c;    /* Character values not kept over RMATCH() calls */
508  register BOOL utf;         /* Local copy of UTF flag for speed */  register BOOL utf;         /* Local copy of UTF flag for speed */
509    
510  BOOL minimize, possessive; /* Quantifier options */  BOOL minimize, possessive; /* Quantifier options */
# Line 498  the top-level on the stack rather than m Line 519  the top-level on the stack rather than m
519  boost in many cases where there is not much "recursion". */  boost in many cases where there is not much "recursion". */
520    
521  #ifdef NO_RECURSE  #ifdef NO_RECURSE
522  heapframe frame_zero;  heapframe *frame = (heapframe *)md->match_frames_base;
 heapframe *frame = &frame_zero;  
 frame->Xprevframe = NULL;            /* Marks the top level */  
523    
524  /* Copy in the original argument variables */  /* Copy in the original argument variables */
525    
# Line 602  BOOL prev_is_word; Line 621  BOOL prev_is_word;
621    
622  #ifdef SUPPORT_UCP  #ifdef SUPPORT_UCP
623  int prop_type;  int prop_type;
624  int prop_value;  unsigned int prop_value;
625  int prop_fail_result;  int prop_fail_result;
626  int oclength;  int oclength;
627  pcre_uchar occhars[6];  pcre_uchar occhars[6];
# Line 613  int ctype; Line 632  int ctype;
632  int length;  int length;
633  int max;  int max;
634  int min;  int min;
635  int number;  unsigned int number;
636  int offset;  int offset;
637  int op;  pcre_uchar op;
638  int save_capture_last;  int save_capture_last;
639  int save_offset1, save_offset2, save_offset3;  int save_offset1, save_offset2, save_offset3;
640  int stacksave[REC_STACK_SAVE_MAX];  int stacksave[REC_STACK_SAVE_MAX];
# Line 734  for (;;) Line 753  for (;;)
753      unaltered. */      unaltered. */
754    
755      else if (rrc == MATCH_SKIP_ARG &&      else if (rrc == MATCH_SKIP_ARG &&
756          STRCMP_UC_UC(ecode + 2, md->start_match_ptr) == 0)          STRCMP_UC_UC_TEST(ecode + 2, md->start_match_ptr) == 0)
757        {        {
758        md->start_match_ptr = eptr;        md->start_match_ptr = eptr;
759        RRETURN(MATCH_SKIP);        RRETURN(MATCH_SKIP);
# Line 903  for (;;) Line 922  for (;;)
922        }        }
923      else  /* OP_KETRMAX */      else  /* OP_KETRMAX */
924        {        {
       md->match_function_type = MATCH_CBEGROUP;  
925        RMATCH(eptr, prev, offset_top, md, eptrb, RM66);        RMATCH(eptr, prev, offset_top, md, eptrb, RM66);
926        if (rrc != MATCH_NOMATCH) RRETURN(rrc);        if (rrc != MATCH_NOMATCH) RRETURN(rrc);
927        ecode += 1 + LINK_SIZE;        ecode += 1 + LINK_SIZE;
# Line 1032  for (;;) Line 1050  for (;;)
1050    
1051      for (;;)      for (;;)
1052        {        {
1053        if (op >= OP_SBRA || op == OP_ONCE) md->match_function_type = MATCH_CBEGROUP;        if (op >= OP_SBRA || op == OP_ONCE)
1054            md->match_function_type = MATCH_CBEGROUP;
1055    
1056        /* If this is not a possibly empty group, and there are no (*THEN)s in        /* If this is not a possibly empty group, and there are no (*THEN)s in
1057        the pattern, and this is the final alternative, optimize as described        the pattern, and this is the final alternative, optimize as described
# Line 1259  for (;;) Line 1278  for (;;)
1278          cb.version          = 2;   /* Version 1 of the callout block */          cb.version          = 2;   /* Version 1 of the callout block */
1279          cb.callout_number   = ecode[LINK_SIZE+2];          cb.callout_number   = ecode[LINK_SIZE+2];
1280          cb.offset_vector    = md->offset_vector;          cb.offset_vector    = md->offset_vector;
1281  #ifdef COMPILE_PCRE8  #if defined COMPILE_PCRE8
1282          cb.subject          = (PCRE_SPTR)md->start_subject;          cb.subject          = (PCRE_SPTR)md->start_subject;
1283  #else  #elif defined COMPILE_PCRE16
1284          cb.subject          = (PCRE_SPTR16)md->start_subject;          cb.subject          = (PCRE_SPTR16)md->start_subject;
1285    #elif defined COMPILE_PCRE32
1286            cb.subject          = (PCRE_SPTR32)md->start_subject;
1287  #endif  #endif
1288          cb.subject_length   = (int)(md->end_subject - md->start_subject);          cb.subject_length   = (int)(md->end_subject - md->start_subject);
1289          cb.start_match      = (int)(mstart - md->start_subject);          cb.start_match      = (int)(mstart - md->start_subject);
# Line 1292  for (;;) Line 1313  for (;;)
1313          }          }
1314        else        else
1315          {          {
1316          int recno = GET2(ecode, LINK_SIZE + 2);   /* Recursion group number*/          unsigned int recno = GET2(ecode, LINK_SIZE + 2);   /* Recursion group number*/
1317          condition = (recno == RREF_ANY || recno == md->recursive->group_num);          condition = (recno == RREF_ANY || recno == md->recursive->group_num);
1318    
1319          /* If the test is for recursion into a specific subpattern, and it is          /* If the test is for recursion into a specific subpattern, and it is
# Line 1364  for (;;) Line 1385  for (;;)
1385    
1386        if (!condition && condcode == OP_NCREF)        if (!condition && condcode == OP_NCREF)
1387          {          {
1388          int refno = offset >> 1;          unsigned int refno = offset >> 1;
1389          pcre_uchar *slotA = md->name_table;          pcre_uchar *slotA = md->name_table;
1390    
1391          for (i = 0; i < md->name_count; i++)          for (i = 0; i < md->name_count; i++)
# Line 1571  for (;;) Line 1592  for (;;)
1592          mstart = md->start_match_ptr;   /* In case \K reset it */          mstart = md->start_match_ptr;   /* In case \K reset it */
1593          break;          break;
1594          }          }
1595          md->mark = save_mark;
1596    
1597        /* PCRE does not allow THEN to escape beyond an assertion; it is treated        /* A COMMIT failure must fail the entire assertion, without trying any
1598        as NOMATCH. */        subsequent branches. */
1599    
1600          if (rrc == MATCH_COMMIT) RRETURN(MATCH_NOMATCH);
1601    
1602          /* PCRE does not allow THEN to escape beyond an assertion; it
1603          is treated as NOMATCH. */
1604    
1605        if (rrc != MATCH_NOMATCH && rrc != MATCH_THEN) RRETURN(rrc);        if (rrc != MATCH_NOMATCH && rrc != MATCH_THEN) RRETURN(rrc);
1606        ecode += GET(ecode, 1);        ecode += GET(ecode, 1);
       md->mark = save_mark;  
1607        }        }
1608      while (*ecode == OP_ALT);      while (*ecode == OP_ALT);
1609    
# Line 1677  for (;;) Line 1703  for (;;)
1703        cb.version          = 2;   /* Version 1 of the callout block */        cb.version          = 2;   /* Version 1 of the callout block */
1704        cb.callout_number   = ecode[1];        cb.callout_number   = ecode[1];
1705        cb.offset_vector    = md->offset_vector;        cb.offset_vector    = md->offset_vector;
1706  #ifdef COMPILE_PCRE8  #if defined COMPILE_PCRE8
1707        cb.subject          = (PCRE_SPTR)md->start_subject;        cb.subject          = (PCRE_SPTR)md->start_subject;
1708  #else  #elif defined COMPILE_PCRE16
1709        cb.subject          = (PCRE_SPTR16)md->start_subject;        cb.subject          = (PCRE_SPTR16)md->start_subject;
1710    #elif defined COMPILE_PCRE32
1711          cb.subject          = (PCRE_SPTR32)md->start_subject;
1712  #endif  #endif
1713        cb.subject_length   = (int)(md->end_subject - md->start_subject);        cb.subject_length   = (int)(md->end_subject - md->start_subject);
1714        cb.start_match      = (int)(mstart - md->start_subject);        cb.start_match      = (int)(mstart - md->start_subject);
# Line 1717  for (;;) Line 1745  for (;;)
1745      case OP_RECURSE:      case OP_RECURSE:
1746        {        {
1747        recursion_info *ri;        recursion_info *ri;
1748        int recno;        unsigned int recno;
1749    
1750        callpat = md->start_code + GET(ecode, 1);        callpat = md->start_code + GET(ecode, 1);
1751        recno = (callpat == md->start_code)? 0 :        recno = (callpat == md->start_code)? 0 :
# Line 1785  for (;;) Line 1813  for (;;)
1813            goto RECURSION_MATCHED;        /* Exit loop; end processing */            goto RECURSION_MATCHED;        /* Exit loop; end processing */
1814            }            }
1815    
1816          /* PCRE does not allow THEN to escape beyond a recursion; it is treated          /* PCRE does not allow THEN or COMMIT to escape beyond a recursion; it
1817          as NOMATCH. */          is treated as NOMATCH. */
1818    
1819          else if (rrc != MATCH_NOMATCH && rrc != MATCH_THEN)          else if (rrc != MATCH_NOMATCH && rrc != MATCH_THEN &&
1820                     rrc != MATCH_COMMIT)
1821            {            {
1822            DPRINTF(("Recursion gave error %d\n", rrc));            DPRINTF(("Recursion gave error %d\n", rrc));
1823            if (new_recursive.offset_save != stacksave)            if (new_recursive.offset_save != stacksave)
# Line 1999  for (;;) Line 2028  for (;;)
2028          }          }
2029        if (*prev >= OP_SBRA)    /* Could match an empty string */        if (*prev >= OP_SBRA)    /* Could match an empty string */
2030          {          {
         md->match_function_type = MATCH_CBEGROUP;  
2031          RMATCH(eptr, prev, offset_top, md, eptrb, RM50);          RMATCH(eptr, prev, offset_top, md, eptrb, RM50);
2032          RRETURN(rrc);          RRETURN(rrc);
2033          }          }
# Line 2008  for (;;) Line 2036  for (;;)
2036        }        }
2037      else  /* OP_KETRMAX */      else  /* OP_KETRMAX */
2038        {        {
       if (*prev >= OP_SBRA) md->match_function_type = MATCH_CBEGROUP;  
2039        RMATCH(eptr, prev, offset_top, md, eptrb, RM13);        RMATCH(eptr, prev, offset_top, md, eptrb, RM13);
2040        if (rrc == MATCH_ONCE && md->once_target == prev) rrc = MATCH_NOMATCH;        if (rrc == MATCH_ONCE && md->once_target == prev) rrc = MATCH_NOMATCH;
2041        if (rrc != MATCH_NOMATCH) RRETURN(rrc);        if (rrc != MATCH_NOMATCH) RRETURN(rrc);
# Line 2065  for (;;) Line 2092  for (;;)
2092    
2093      case OP_DOLLM:      case OP_DOLLM:
2094      if (eptr < md->end_subject)      if (eptr < md->end_subject)
2095        {        {
2096        if (!IS_NEWLINE(eptr))        if (!IS_NEWLINE(eptr))
2097          {          {
2098          if (md->partial != 0 &&          if (md->partial != 0 &&
2099              eptr + 1 >= md->end_subject &&              eptr + 1 >= md->end_subject &&
2100              NLBLOCK->nltype == NLTYPE_FIXED &&              NLBLOCK->nltype == NLTYPE_FIXED &&
2101              NLBLOCK->nllen == 2 &&              NLBLOCK->nllen == 2 &&
2102              *eptr == NLBLOCK->nl[0])              RAWUCHARTEST(eptr) == NLBLOCK->nl[0])
2103            {            {
2104            md->hitend = TRUE;            md->hitend = TRUE;
2105            if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);            if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);
2106            }            }
2107          RRETURN(MATCH_NOMATCH);          RRETURN(MATCH_NOMATCH);
2108          }          }
2109        }        }
2110      else      else
2111        {        {
# Line 2115  for (;;) Line 2142  for (;;)
2142        if (md->partial != 0 &&        if (md->partial != 0 &&
2143            eptr + 1 >= md->end_subject &&            eptr + 1 >= md->end_subject &&
2144            NLBLOCK->nltype == NLTYPE_FIXED &&            NLBLOCK->nltype == NLTYPE_FIXED &&
2145            NLBLOCK->nllen == 2 &&            NLBLOCK->nllen == 2 &&
2146            *eptr == NLBLOCK->nl[0])            RAWUCHARTEST(eptr) == NLBLOCK->nl[0])
2147          {          {
2148          md->hitend = TRUE;          md->hitend = TRUE;
2149          if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);          if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);
2150          }          }
2151        RRETURN(MATCH_NOMATCH);        RRETURN(MATCH_NOMATCH);
2152        }        }
2153    
2154      /* Either at end of string or \n before end. */      /* Either at end of string or \n before end. */
2155    
# Line 2258  for (;;) Line 2285  for (;;)
2285      if (md->partial != 0 &&      if (md->partial != 0 &&
2286          eptr + 1 >= md->end_subject &&          eptr + 1 >= md->end_subject &&
2287          NLBLOCK->nltype == NLTYPE_FIXED &&          NLBLOCK->nltype == NLTYPE_FIXED &&
2288          NLBLOCK->nllen == 2 &&          NLBLOCK->nllen == 2 &&
2289          *eptr == NLBLOCK->nl[0])          RAWUCHARTEST(eptr) == NLBLOCK->nl[0])
2290        {        {
2291        md->hitend = TRUE;        md->hitend = TRUE;
2292        if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);        if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);
2293        }        }
2294    
2295      /* Fall through */      /* Fall through */
2296    
2297      /* Match any single character whatsoever. */      /* Match any single character whatsoever. */
2298    
2299      case OP_ALLANY:      case OP_ALLANY:
2300      if (eptr >= md->end_subject)   /* DO NOT merge the eptr++ here; it must */      if (eptr >= md->end_subject)   /* DO NOT merge the eptr++ here; it must */
2301        {                            /* not be updated before SCHECK_PARTIAL. */        {                            /* not be updated before SCHECK_PARTIAL. */
# Line 2408  for (;;) Line 2435  for (;;)
2435        {        {
2436        default: RRETURN(MATCH_NOMATCH);        default: RRETURN(MATCH_NOMATCH);
2437    
2438        case 0x000d:        case CHAR_CR:
2439        if (eptr >= md->end_subject)        if (eptr >= md->end_subject)
2440          {          {
2441          SCHECK_PARTIAL();          SCHECK_PARTIAL();
2442          }          }
2443        else if (*eptr == 0x0a) eptr++;        else if (RAWUCHARTEST(eptr) == CHAR_LF) eptr++;
2444        break;        break;
2445    
2446        case 0x000a:        case CHAR_LF:
2447        break;        break;
2448    
2449        case 0x000b:        case CHAR_VT:
2450        case 0x000c:        case CHAR_FF:
2451        case 0x0085:        case CHAR_NEL:
2452    #ifndef EBCDIC
2453        case 0x2028:        case 0x2028:
2454        case 0x2029:        case 0x2029:
2455    #endif  /* Not EBCDIC */
2456        if (md->bsr_anycrlf) RRETURN(MATCH_NOMATCH);        if (md->bsr_anycrlf) RRETURN(MATCH_NOMATCH);
2457        break;        break;
2458        }        }
# Line 2439  for (;;) Line 2468  for (;;)
2468      GETCHARINCTEST(c, eptr);      GETCHARINCTEST(c, eptr);
2469      switch(c)      switch(c)
2470        {        {
2471          HSPACE_CASES: RRETURN(MATCH_NOMATCH);  /* Byte and multibyte cases */
2472        default: break;        default: break;
       case 0x09:      /* HT */  
       case 0x20:      /* SPACE */  
       case 0xa0:      /* NBSP */  
       case 0x1680:    /* OGHAM SPACE MARK */  
       case 0x180e:    /* MONGOLIAN VOWEL SEPARATOR */  
       case 0x2000:    /* EN QUAD */  
       case 0x2001:    /* EM QUAD */  
       case 0x2002:    /* EN SPACE */  
       case 0x2003:    /* EM SPACE */  
       case 0x2004:    /* THREE-PER-EM SPACE */  
       case 0x2005:    /* FOUR-PER-EM SPACE */  
       case 0x2006:    /* SIX-PER-EM SPACE */  
       case 0x2007:    /* FIGURE SPACE */  
       case 0x2008:    /* PUNCTUATION SPACE */  
       case 0x2009:    /* THIN SPACE */  
       case 0x200A:    /* HAIR SPACE */  
       case 0x202f:    /* NARROW NO-BREAK SPACE */  
       case 0x205f:    /* MEDIUM MATHEMATICAL SPACE */  
       case 0x3000:    /* IDEOGRAPHIC SPACE */  
       RRETURN(MATCH_NOMATCH);  
2473        }        }
2474      ecode++;      ecode++;
2475      break;      break;
# Line 2473  for (;;) Line 2483  for (;;)
2483      GETCHARINCTEST(c, eptr);      GETCHARINCTEST(c, eptr);
2484      switch(c)      switch(c)
2485        {        {
2486          HSPACE_CASES: break;  /* Byte and multibyte cases */
2487        default: RRETURN(MATCH_NOMATCH);        default: RRETURN(MATCH_NOMATCH);
       case 0x09:      /* HT */  
       case 0x20:      /* SPACE */  
       case 0xa0:      /* NBSP */  
       case 0x1680:    /* OGHAM SPACE MARK */  
       case 0x180e:    /* MONGOLIAN VOWEL SEPARATOR */  
       case 0x2000:    /* EN QUAD */  
       case 0x2001:    /* EM QUAD */  
       case 0x2002:    /* EN SPACE */  
       case 0x2003:    /* EM SPACE */  
       case 0x2004:    /* THREE-PER-EM SPACE */  
       case 0x2005:    /* FOUR-PER-EM SPACE */  
       case 0x2006:    /* SIX-PER-EM SPACE */  
       case 0x2007:    /* FIGURE SPACE */  
       case 0x2008:    /* PUNCTUATION SPACE */  
       case 0x2009:    /* THIN SPACE */  
       case 0x200A:    /* HAIR SPACE */  
       case 0x202f:    /* NARROW NO-BREAK SPACE */  
       case 0x205f:    /* MEDIUM MATHEMATICAL SPACE */  
       case 0x3000:    /* IDEOGRAPHIC SPACE */  
       break;  
2488        }        }
2489      ecode++;      ecode++;
2490      break;      break;
# Line 2507  for (;;) Line 2498  for (;;)
2498      GETCHARINCTEST(c, eptr);      GETCHARINCTEST(c, eptr);
2499      switch(c)      switch(c)
2500        {        {
2501          VSPACE_CASES: RRETURN(MATCH_NOMATCH);
2502        default: break;        default: break;
       case 0x0a:      /* LF */  
       case 0x0b:      /* VT */  
       case 0x0c:      /* FF */  
       case 0x0d:      /* CR */  
       case 0x85:      /* NEL */  
       case 0x2028:    /* LINE SEPARATOR */  
       case 0x2029:    /* PARAGRAPH SEPARATOR */  
       RRETURN(MATCH_NOMATCH);  
2503        }        }
2504      ecode++;      ecode++;
2505      break;      break;
# Line 2529  for (;;) Line 2513  for (;;)
2513      GETCHARINCTEST(c, eptr);      GETCHARINCTEST(c, eptr);
2514      switch(c)      switch(c)
2515        {        {
2516          VSPACE_CASES: break;
2517        default: RRETURN(MATCH_NOMATCH);        default: RRETURN(MATCH_NOMATCH);
       case 0x0a:      /* LF */  
       case 0x0b:      /* VT */  
       case 0x0c:      /* FF */  
       case 0x0d:      /* CR */  
       case 0x85:      /* NEL */  
       case 0x2028:    /* LINE SEPARATOR */  
       case 0x2029:    /* PARAGRAPH SEPARATOR */  
       break;  
2518        }        }
2519      ecode++;      ecode++;
2520      break;      break;
# Line 2555  for (;;) Line 2532  for (;;)
2532        }        }
2533      GETCHARINCTEST(c, eptr);      GETCHARINCTEST(c, eptr);
2534        {        {
2535          const pcre_uint32 *cp;
2536        const ucd_record *prop = GET_UCD(c);        const ucd_record *prop = GET_UCD(c);
2537    
2538        switch(ecode[1])        switch(ecode[1])
# Line 2615  for (;;) Line 2593  for (;;)
2593            RRETURN(MATCH_NOMATCH);            RRETURN(MATCH_NOMATCH);
2594          break;          break;
2595    
2596            case PT_CLIST:
2597            cp = PRIV(ucd_caseless_sets) + prop->caseset;
2598            for (;;)
2599              {
2600              if (c < *cp)
2601                { if (op == OP_PROP) { RRETURN(MATCH_NOMATCH); } else break; }
2602              if (c == *cp++)
2603                { if (op == OP_PROP) break; else { RRETURN(MATCH_NOMATCH); } }
2604              }
2605            break;
2606    
2607          /* This should never occur */          /* This should never occur */
2608    
2609          default:          default:
# Line 2634  for (;;) Line 2623  for (;;)
2623        SCHECK_PARTIAL();        SCHECK_PARTIAL();
2624        RRETURN(MATCH_NOMATCH);        RRETURN(MATCH_NOMATCH);
2625        }        }
2626      GETCHARINCTEST(c, eptr);      else
     if (UCD_CATEGORY(c) == ucp_M) RRETURN(MATCH_NOMATCH);  
     while (eptr < md->end_subject)  
2627        {        {
2628        int len = 1;        int lgb, rgb;
2629        if (!utf) c = *eptr; else { GETCHARLEN(c, eptr, len); }        GETCHARINCTEST(c, eptr);
2630        if (UCD_CATEGORY(c) != ucp_M) break;        lgb = UCD_GRAPHBREAK(c);
2631        eptr += len;        while (eptr < md->end_subject)
2632            {
2633            int len = 1;
2634            if (!utf) c = *eptr; else { GETCHARLEN(c, eptr, len); }
2635            rgb = UCD_GRAPHBREAK(c);
2636            if ((PRIV(ucp_gbtable)[lgb] & (1 << rgb)) == 0) break;
2637            lgb = rgb;
2638            eptr += len;
2639            }
2640        }        }
2641      CHECK_PARTIAL();      CHECK_PARTIAL();
2642      ecode++;      ecode++;
2643      break;      break;
2644  #endif  #endif  /* SUPPORT_UCP */
2645    
2646    
2647      /* Match a back reference, possibly repeatedly. Look past the end of the      /* Match a back reference, possibly repeatedly. Look past the end of the
# Line 2709  for (;;) Line 2704  for (;;)
2704        default:               /* No repeat follows */        default:               /* No repeat follows */
2705        if ((length = match_ref(offset, eptr, length, md, caseless)) < 0)        if ((length = match_ref(offset, eptr, length, md, caseless)) < 0)
2706          {          {
2707          if (length == -2) eptr = md->end_subject;   /* Partial match */          if (length == -2) eptr = md->end_subject;   /* Partial match */
2708          CHECK_PARTIAL();          CHECK_PARTIAL();
2709          RRETURN(MATCH_NOMATCH);          RRETURN(MATCH_NOMATCH);
2710          }          }
# Line 2735  for (;;) Line 2730  for (;;)
2730        int slength;        int slength;
2731        if ((slength = match_ref(offset, eptr, length, md, caseless)) < 0)        if ((slength = match_ref(offset, eptr, length, md, caseless)) < 0)
2732          {          {
2733          if (slength == -2) eptr = md->end_subject;   /* Partial match */          if (slength == -2) eptr = md->end_subject;   /* Partial match */
2734          CHECK_PARTIAL();          CHECK_PARTIAL();
2735          RRETURN(MATCH_NOMATCH);          RRETURN(MATCH_NOMATCH);
2736          }          }
# Line 2759  for (;;) Line 2754  for (;;)
2754          if (fi >= max) RRETURN(MATCH_NOMATCH);          if (fi >= max) RRETURN(MATCH_NOMATCH);
2755          if ((slength = match_ref(offset, eptr, length, md, caseless)) < 0)          if ((slength = match_ref(offset, eptr, length, md, caseless)) < 0)
2756            {            {
2757            if (slength == -2) eptr = md->end_subject;   /* Partial match */            if (slength == -2) eptr = md->end_subject;   /* Partial match */
2758            CHECK_PARTIAL();            CHECK_PARTIAL();
2759            RRETURN(MATCH_NOMATCH);            RRETURN(MATCH_NOMATCH);
2760            }            }
# Line 2778  for (;;) Line 2773  for (;;)
2773          int slength;          int slength;
2774          if ((slength = match_ref(offset, eptr, length, md, caseless)) < 0)          if ((slength = match_ref(offset, eptr, length, md, caseless)) < 0)
2775            {            {
2776            /* Can't use CHECK_PARTIAL because we don't want to update eptr in            /* Can't use CHECK_PARTIAL because we don't want to update eptr in
2777            the soft partial matching case. */            the soft partial matching case. */
2778    
2779            if (slength == -2 && md->partial != 0 &&            if (slength == -2 && md->partial != 0 &&
2780                md->end_subject > md->start_used_ptr)                md->end_subject > md->start_used_ptr)
2781              {              {
2782              md->hitend = TRUE;              md->hitend = TRUE;
2783              if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);              if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);
2784              }              }
# Line 2791  for (;;) Line 2786  for (;;)
2786            }            }
2787          eptr += slength;          eptr += slength;
2788          }          }
2789    
2790        while (eptr >= pp)        while (eptr >= pp)
2791          {          {
2792          RMATCH(eptr, ecode, offset_top, md, eptrb, RM15);          RMATCH(eptr, ecode, offset_top, md, eptrb, RM15);
# Line 3155  for (;;) Line 3150  for (;;)
3150          CHECK_PARTIAL();             /* Not SCHECK_PARTIAL() */          CHECK_PARTIAL();             /* Not SCHECK_PARTIAL() */
3151          RRETURN(MATCH_NOMATCH);          RRETURN(MATCH_NOMATCH);
3152          }          }
3153        while (length-- > 0) if (*ecode++ != *eptr++) RRETURN(MATCH_NOMATCH);        while (length-- > 0) if (*ecode++ != RAWUCHARINC(eptr)) RRETURN(MATCH_NOMATCH);
3154        }        }
3155      else      else
3156  #endif  #endif
# Line 3195  for (;;) Line 3190  for (;;)
3190    
3191        if (fc < 128)        if (fc < 128)
3192          {          {
3193          if (md->lcc[fc]          pcre_uchar cc = RAWUCHAR(eptr);
3194              != TABLE_GET(*eptr, md->lcc, *eptr)) RRETURN(MATCH_NOMATCH);          if (md->lcc[fc] != TABLE_GET(cc, md->lcc, cc)) RRETURN(MATCH_NOMATCH);
3195          ecode++;          ecode++;
3196          eptr++;          eptr++;
3197          }          }
# Line 3207  for (;;) Line 3202  for (;;)
3202    
3203        else        else
3204          {          {
3205          unsigned int dc;          pcre_uint32 dc;
3206          GETCHARINC(dc, eptr);          GETCHARINC(dc, eptr);
3207          ecode += length;          ecode += length;
3208    
# Line 3317  for (;;) Line 3312  for (;;)
3312        if (length > 1)        if (length > 1)
3313          {          {
3314  #ifdef SUPPORT_UCP  #ifdef SUPPORT_UCP
3315          unsigned int othercase;          pcre_uint32 othercase;
3316          if (op >= OP_STARI &&     /* Caseless */          if (op >= OP_STARI &&     /* Caseless */
3317              (othercase = UCD_OTHERCASE(fc)) != fc)              (othercase = UCD_OTHERCASE(fc)) != fc)
3318            oclength = PRIV(ord2utf)(othercase, occhars);            oclength = PRIV(ord2utf)(othercase, occhars);
# Line 3421  for (;;) Line 3416  for (;;)
3416      maximizing, find the maximum number of characters and work backwards. */      maximizing, find the maximum number of characters and work backwards. */
3417    
3418      DPRINTF(("matching %c{%d,%d} against subject %.*s\n", fc, min, max,      DPRINTF(("matching %c{%d,%d} against subject %.*s\n", fc, min, max,
3419        max, eptr));        max, (char *)eptr));
3420    
3421      if (op >= OP_STARI)  /* Caseless */      if (op >= OP_STARI)  /* Caseless */
3422        {        {
# Line 3444  for (;;) Line 3439  for (;;)
3439    
3440        for (i = 1; i <= min; i++)        for (i = 1; i <= min; i++)
3441          {          {
3442            pcre_uchar cc;
3443    
3444          if (eptr >= md->end_subject)          if (eptr >= md->end_subject)
3445            {            {
3446            SCHECK_PARTIAL();            SCHECK_PARTIAL();
3447            RRETURN(MATCH_NOMATCH);            RRETURN(MATCH_NOMATCH);
3448            }            }
3449          if (fc != *eptr && foc != *eptr) RRETURN(MATCH_NOMATCH);          cc = RAWUCHARTEST(eptr);
3450            if (fc != cc && foc != cc) RRETURN(MATCH_NOMATCH);
3451          eptr++;          eptr++;
3452          }          }
3453        if (min == max) continue;        if (min == max) continue;
# Line 3457  for (;;) Line 3455  for (;;)
3455          {          {
3456          for (fi = min;; fi++)          for (fi = min;; fi++)
3457            {            {
3458              pcre_uchar cc;
3459    
3460            RMATCH(eptr, ecode, offset_top, md, eptrb, RM24);            RMATCH(eptr, ecode, offset_top, md, eptrb, RM24);
3461            if (rrc != MATCH_NOMATCH) RRETURN(rrc);            if (rrc != MATCH_NOMATCH) RRETURN(rrc);
3462            if (fi >= max) RRETURN(MATCH_NOMATCH);            if (fi >= max) RRETURN(MATCH_NOMATCH);
# Line 3465  for (;;) Line 3465  for (;;)
3465              SCHECK_PARTIAL();              SCHECK_PARTIAL();
3466              RRETURN(MATCH_NOMATCH);              RRETURN(MATCH_NOMATCH);
3467              }              }
3468            if (fc != *eptr && foc != *eptr) RRETURN(MATCH_NOMATCH);            cc = RAWUCHARTEST(eptr);
3469              if (fc != cc && foc != cc) RRETURN(MATCH_NOMATCH);
3470            eptr++;            eptr++;
3471            }            }
3472          /* Control never gets here */          /* Control never gets here */
# Line 3475  for (;;) Line 3476  for (;;)
3476          pp = eptr;          pp = eptr;
3477          for (i = min; i < max; i++)          for (i = min; i < max; i++)
3478            {            {
3479              pcre_uchar cc;
3480    
3481            if (eptr >= md->end_subject)            if (eptr >= md->end_subject)
3482              {              {
3483              SCHECK_PARTIAL();              SCHECK_PARTIAL();
3484              break;              break;
3485              }              }
3486            if (fc != *eptr && foc != *eptr) break;            cc = RAWUCHARTEST(eptr);
3487              if (fc != cc && foc != cc) break;
3488            eptr++;            eptr++;
3489            }            }
3490    
# Line 3508  for (;;) Line 3512  for (;;)
3512            SCHECK_PARTIAL();            SCHECK_PARTIAL();
3513            RRETURN(MATCH_NOMATCH);            RRETURN(MATCH_NOMATCH);
3514            }            }
3515          if (fc != *eptr++) RRETURN(MATCH_NOMATCH);          if (fc != RAWUCHARINCTEST(eptr)) RRETURN(MATCH_NOMATCH);
3516          }          }
3517    
3518        if (min == max) continue;        if (min == max) continue;
# Line 3525  for (;;) Line 3529  for (;;)
3529              SCHECK_PARTIAL();              SCHECK_PARTIAL();
3530              RRETURN(MATCH_NOMATCH);              RRETURN(MATCH_NOMATCH);
3531              }              }
3532            if (fc != *eptr++) RRETURN(MATCH_NOMATCH);            if (fc != RAWUCHARINCTEST(eptr)) RRETURN(MATCH_NOMATCH);
3533            }            }
3534          /* Control never gets here */          /* Control never gets here */
3535          }          }
# Line 3539  for (;;) Line 3543  for (;;)
3543              SCHECK_PARTIAL();              SCHECK_PARTIAL();
3544              break;              break;
3545              }              }
3546            if (fc != *eptr) break;            if (fc != RAWUCHARTEST(eptr)) break;
3547            eptr++;            eptr++;
3548            }            }
3549          if (possessive) continue;          if (possessive) continue;
# Line 3565  for (;;) Line 3569  for (;;)
3569        SCHECK_PARTIAL();        SCHECK_PARTIAL();
3570        RRETURN(MATCH_NOMATCH);        RRETURN(MATCH_NOMATCH);
3571        }        }
     ecode++;  
     GETCHARINCTEST(c, eptr);  
     if (op == OP_NOTI)         /* The caseless case */  
       {  
       register unsigned int ch, och;  
       ch = *ecode++;  
 #ifdef COMPILE_PCRE8  
       /* ch must be < 128 if UTF is enabled. */  
       och = md->fcc[ch];  
 #else  
3572  #ifdef SUPPORT_UTF  #ifdef SUPPORT_UTF
3573        if (utf)
3574          {
3575          register pcre_uint32 ch, och;
3576    
3577          ecode++;
3578          GETCHARINC(ch, ecode);
3579          GETCHARINC(c, eptr);
3580    
3581          if (op == OP_NOT)
3582            {
3583            if (ch == c) RRETURN(MATCH_NOMATCH);
3584            }
3585          else
3586            {
3587  #ifdef SUPPORT_UCP  #ifdef SUPPORT_UCP
3588        if (utf && ch > 127)          if (ch > 127)
3589          och = UCD_OTHERCASE(ch);            och = UCD_OTHERCASE(ch);
3590  #else  #else
3591        if (utf && ch > 127)          if (ch > 127)
3592          och = ch;            och = ch;
3593  #endif /* SUPPORT_UCP */  #endif /* SUPPORT_UCP */
3594        else          else
3595  #endif /* SUPPORT_UTF */            och = TABLE_GET(ch, md->fcc, ch);
3596          och = TABLE_GET(ch, md->fcc, ch);          if (ch == c || och == c) RRETURN(MATCH_NOMATCH);
3597  #endif /* COMPILE_PCRE8 */          }
       if (ch == c || och == c) RRETURN(MATCH_NOMATCH);  
3598        }        }
3599      else    /* Caseful */      else
3600    #endif
3601        {        {
3602        if (*ecode++ == c) RRETURN(MATCH_NOMATCH);        register pcre_uint32 ch = ecode[1];
3603          c = *eptr++;
3604          if (ch == c || (op == OP_NOTI && TABLE_GET(ch, md->fcc, ch) == c))
3605            RRETURN(MATCH_NOMATCH);
3606          ecode += 2;
3607        }        }
3608      break;      break;
3609    
# Line 3671  for (;;) Line 3683  for (;;)
3683      /* Common code for all repeated single-byte matches. */      /* Common code for all repeated single-byte matches. */
3684    
3685      REPEATNOTCHAR:      REPEATNOTCHAR:
3686      fc = *ecode++;      GETCHARINCTEST(fc, ecode);
3687    
3688      /* The code is duplicated for the caseless and caseful cases, for speed,      /* The code is duplicated for the caseless and caseful cases, for speed,
3689      since matching characters is likely to be quite common. First, ensure the      since matching characters is likely to be quite common. First, ensure the
# Line 3682  for (;;) Line 3694  for (;;)
3694      characters and work backwards. */      characters and work backwards. */
3695    
3696      DPRINTF(("negative matching %c{%d,%d} against subject %.*s\n", fc, min, max,      DPRINTF(("negative matching %c{%d,%d} against subject %.*s\n", fc, min, max,
3697        max, eptr));        max, (char *)eptr));
3698    
3699      if (op >= OP_NOTSTARI)     /* Caseless */      if (op >= OP_NOTSTARI)     /* Caseless */
3700        {        {
 #ifdef COMPILE_PCRE8  
       /* fc must be < 128 if UTF is enabled. */  
       foc = md->fcc[fc];  
 #else  
3701  #ifdef SUPPORT_UTF  #ifdef SUPPORT_UTF
3702  #ifdef SUPPORT_UCP  #ifdef SUPPORT_UCP
3703        if (utf && fc > 127)        if (utf && fc > 127)
# Line 3701  for (;;) Line 3709  for (;;)
3709        else        else
3710  #endif /* SUPPORT_UTF */  #endif /* SUPPORT_UTF */
3711          foc = TABLE_GET(fc, md->fcc, fc);          foc = TABLE_GET(fc, md->fcc, fc);
 #endif /* COMPILE_PCRE8 */  
3712    
3713  #ifdef SUPPORT_UTF  #ifdef SUPPORT_UTF
3714        if (utf)        if (utf)
3715          {          {
3716          register unsigned int d;          register pcre_uint32 d;
3717          for (i = 1; i <= min; i++)          for (i = 1; i <= min; i++)
3718            {            {
3719            if (eptr >= md->end_subject)            if (eptr >= md->end_subject)
# Line 3715  for (;;) Line 3722  for (;;)
3722              RRETURN(MATCH_NOMATCH);              RRETURN(MATCH_NOMATCH);
3723              }              }
3724            GETCHARINC(d, eptr);            GETCHARINC(d, eptr);
3725            if (fc == d || (unsigned int) foc == d) RRETURN(MATCH_NOMATCH);            if (fc == d || (unsigned int)foc == d) RRETURN(MATCH_NOMATCH);
3726            }            }
3727          }          }
3728        else        else
# Line 3741  for (;;) Line 3748  for (;;)
3748  #ifdef SUPPORT_UTF  #ifdef SUPPORT_UTF
3749          if (utf)          if (utf)
3750            {            {
3751            register unsigned int d;            register pcre_uint32 d;
3752            for (fi = min;; fi++)            for (fi = min;; fi++)
3753              {              {
3754              RMATCH(eptr, ecode, offset_top, md, eptrb, RM28);              RMATCH(eptr, ecode, offset_top, md, eptrb, RM28);
# Line 3786  for (;;) Line 3793  for (;;)
3793  #ifdef SUPPORT_UTF  #ifdef SUPPORT_UTF
3794          if (utf)          if (utf)
3795            {            {
3796            register unsigned int d;            register pcre_uint32 d;
3797            for (i = min; i < max; i++)            for (i = min; i < max; i++)
3798              {              {
3799              int len = 1;              int len = 1;
# Line 3843  for (;;) Line 3850  for (;;)
3850  #ifdef SUPPORT_UTF  #ifdef SUPPORT_UTF
3851        if (utf)        if (utf)
3852          {          {
3853          register unsigned int d;          register pcre_uint32 d;
3854          for (i = 1; i <= min; i++)          for (i = 1; i <= min; i++)
3855            {            {
3856            if (eptr >= md->end_subject)            if (eptr >= md->end_subject)
# Line 3877  for (;;) Line 3884  for (;;)
3884  #ifdef SUPPORT_UTF  #ifdef SUPPORT_UTF
3885          if (utf)          if (utf)
3886            {            {
3887            register unsigned int d;            register pcre_uint32 d;
3888            for (fi = min;; fi++)            for (fi = min;; fi++)
3889              {              {
3890              RMATCH(eptr, ecode, offset_top, md, eptrb, RM32);              RMATCH(eptr, ecode, offset_top, md, eptrb, RM32);
# Line 3921  for (;;) Line 3928  for (;;)
3928  #ifdef SUPPORT_UTF  #ifdef SUPPORT_UTF
3929          if (utf)          if (utf)
3930            {            {
3931            register unsigned int d;            register pcre_uint32 d;
3932            for (i = min; i < max; i++)            for (i = min; i < max; i++)
3933              {              {
3934              int len = 1;              int len = 1;
# Line 4196  for (;;) Line 4203  for (;;)
4203                RRETURN(MATCH_NOMATCH);                RRETURN(MATCH_NOMATCH);
4204              }              }
4205            break;            break;
4206    
4207              case PT_CLIST:
4208              for (i = 1; i <= min; i++)
4209                {
4210                const pcre_uint32 *cp;
4211                if (eptr >= md->end_subject)
4212                  {
4213                  SCHECK_PARTIAL();
4214                  RRETURN(MATCH_NOMATCH);
4215                  }
4216                GETCHARINCTEST(c, eptr);
4217                cp = PRIV(ucd_caseless_sets) + UCD_CASESET(c);
4218                for (;;)
4219                  {
4220                  if (c < *cp)
4221                    { if (prop_fail_result) break; else { RRETURN(MATCH_NOMATCH); } }
4222                  if (c == *cp++)
4223                    { if (prop_fail_result) { RRETURN(MATCH_NOMATCH); } else break; }
4224                  }
4225                }
4226              break;
4227    
4228            /* This should not occur */            /* This should not occur */
4229    
4230            default:            default:
# Line 4216  for (;;) Line 4244  for (;;)
4244              SCHECK_PARTIAL();              SCHECK_PARTIAL();
4245              RRETURN(MATCH_NOMATCH);              RRETURN(MATCH_NOMATCH);
4246              }              }
4247            GETCHARINCTEST(c, eptr);            else
           if (UCD_CATEGORY(c) == ucp_M) RRETURN(MATCH_NOMATCH);  
           while (eptr < md->end_subject)  
4248              {              {
4249              int len = 1;              int lgb, rgb;
4250              if (!utf) c = *eptr; else { GETCHARLEN(c, eptr, len); }              GETCHARINCTEST(c, eptr);
4251              if (UCD_CATEGORY(c) != ucp_M) break;              lgb = UCD_GRAPHBREAK(c);
4252              eptr += len;             while (eptr < md->end_subject)
4253                  {
4254                  int len = 1;
4255                  if (!utf) c = *eptr; else { GETCHARLEN(c, eptr, len); }
4256                  rgb = UCD_GRAPHBREAK(c);
4257                  if ((PRIV(ucp_gbtable)[lgb] & (1 << rgb)) == 0) break;
4258                  lgb = rgb;
4259                  eptr += len;
4260                  }
4261              }              }
4262            CHECK_PARTIAL();            CHECK_PARTIAL();
4263            }            }
4264          }          }
4265    
# Line 4249  for (;;) Line 4283  for (;;)
4283            if (md->partial != 0 &&            if (md->partial != 0 &&
4284                eptr + 1 >= md->end_subject &&                eptr + 1 >= md->end_subject &&
4285                NLBLOCK->nltype == NLTYPE_FIXED &&                NLBLOCK->nltype == NLTYPE_FIXED &&
4286                NLBLOCK->nllen == 2 &&                NLBLOCK->nllen == 2 &&
4287                *eptr == NLBLOCK->nl[0])                RAWUCHAR(eptr) == NLBLOCK->nl[0])
4288              {              {
4289              md->hitend = TRUE;              md->hitend = TRUE;
4290              if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);              if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);
4291              }              }
# Line 4291  for (;;) Line 4325  for (;;)
4325              {              {
4326              default: RRETURN(MATCH_NOMATCH);              default: RRETURN(MATCH_NOMATCH);
4327    
4328              case 0x000d:              case CHAR_CR:
4329              if (eptr < md->end_subject && *eptr == 0x0a) eptr++;              if (eptr < md->end_subject && RAWUCHAR(eptr) == CHAR_LF) eptr++;
4330              break;              break;
4331    
4332              case 0x000a:              case CHAR_LF:
4333              break;              break;
4334    
4335              case 0x000b:              case CHAR_VT:
4336              case 0x000c:              case CHAR_FF:
4337              case 0x0085:              case CHAR_NEL:
4338    #ifndef EBCDIC
4339              case 0x2028:              case 0x2028:
4340              case 0x2029:              case 0x2029:
4341    #endif  /* Not EBCDIC */
4342              if (md->bsr_anycrlf) RRETURN(MATCH_NOMATCH);              if (md->bsr_anycrlf) RRETURN(MATCH_NOMATCH);
4343              break;              break;
4344              }              }
# Line 4320  for (;;) Line 4356  for (;;)
4356            GETCHARINC(c, eptr);            GETCHARINC(c, eptr);
4357            switch(c)            switch(c)
4358              {              {
4359                HSPACE_CASES: RRETURN(MATCH_NOMATCH);  /* Byte and multibyte cases */
4360              default: break;              default: break;
             case 0x09:      /* HT */  
             case 0x20:      /* SPACE */  
             case 0xa0:      /* NBSP */  
             case 0x1680:    /* OGHAM SPACE MARK */  
             case 0x180e:    /* MONGOLIAN VOWEL SEPARATOR */  
             case 0x2000:    /* EN QUAD */  
             case 0x2001:    /* EM QUAD */  
             case 0x2002:    /* EN SPACE */  
             case 0x2003:    /* EM SPACE */  
             case 0x2004:    /* THREE-PER-EM SPACE */  
             case 0x2005:    /* FOUR-PER-EM SPACE */  
             case 0x2006:    /* SIX-PER-EM SPACE */  
             case 0x2007:    /* FIGURE SPACE */  
             case 0x2008:    /* PUNCTUATION SPACE */  
             case 0x2009:    /* THIN SPACE */  
             case 0x200A:    /* HAIR SPACE */  
             case 0x202f:    /* NARROW NO-BREAK SPACE */  
             case 0x205f:    /* MEDIUM MATHEMATICAL SPACE */  
             case 0x3000:    /* IDEOGRAPHIC SPACE */  
             RRETURN(MATCH_NOMATCH);  
4361              }              }
4362            }            }
4363          break;          break;
# Line 4356  for (;;) Line 4373  for (;;)
4373            GETCHARINC(c, eptr);            GETCHARINC(c, eptr);
4374            switch(c)            switch(c)
4375              {              {
4376                HSPACE_CASES: break;  /* Byte and multibyte cases */
4377              default: RRETURN(MATCH_NOMATCH);              default: RRETURN(MATCH_NOMATCH);
             case 0x09:      /* HT */  
             case 0x20:      /* SPACE */  
             case 0xa0:      /* NBSP */  
             case 0x1680:    /* OGHAM SPACE MARK */  
             case 0x180e:    /* MONGOLIAN VOWEL SEPARATOR */  
             case 0x2000:    /* EN QUAD */  
             case 0x2001:    /* EM QUAD */  
             case 0x2002:    /* EN SPACE */  
             case 0x2003:    /* EM SPACE */  
             case 0x2004:    /* THREE-PER-EM SPACE */  
             case 0x2005:    /* FOUR-PER-EM SPACE */  
             case 0x2006:    /* SIX-PER-EM SPACE */  
             case 0x2007:    /* FIGURE SPACE */  
             case 0x2008:    /* PUNCTUATION SPACE */  
             case 0x2009:    /* THIN SPACE */  
             case 0x200A:    /* HAIR SPACE */  
             case 0x202f:    /* NARROW NO-BREAK SPACE */  
             case 0x205f:    /* MEDIUM MATHEMATICAL SPACE */  
             case 0x3000:    /* IDEOGRAPHIC SPACE */  
             break;  
4378              }              }
4379            }            }
4380          break;          break;
# Line 4392  for (;;) Line 4390  for (;;)
4390            GETCHARINC(c, eptr);            GETCHARINC(c, eptr);
4391            switch(c)            switch(c)
4392              {              {
4393                VSPACE_CASES: RRETURN(MATCH_NOMATCH);
4394              default: break;              default: break;
             case 0x0a:      /* LF */  
             case 0x0b:      /* VT */  
             case 0x0c:      /* FF */  
             case 0x0d:      /* CR */  
             case 0x85:      /* NEL */  
             case 0x2028:    /* LINE SEPARATOR */  
             case 0x2029:    /* PARAGRAPH SEPARATOR */  
             RRETURN(MATCH_NOMATCH);  
4395              }              }
4396            }            }
4397          break;          break;
# Line 4416  for (;;) Line 4407  for (;;)
4407            GETCHARINC(c, eptr);            GETCHARINC(c, eptr);
4408            switch(c)            switch(c)
4409              {              {
4410                VSPACE_CASES: break;
4411              default: RRETURN(MATCH_NOMATCH);              default: RRETURN(MATCH_NOMATCH);
             case 0x0a:      /* LF */  
             case 0x0b:      /* VT */  
             case 0x0c:      /* FF */  
             case 0x0d:      /* CR */  
             case 0x85:      /* NEL */  
             case 0x2028:    /* LINE SEPARATOR */  
             case 0x2029:    /* PARAGRAPH SEPARATOR */  
             break;  
4412              }              }
4413            }            }
4414          break;          break;
# Line 4446  for (;;) Line 4430  for (;;)
4430          case OP_DIGIT:          case OP_DIGIT:
4431          for (i = 1; i <= min; i++)          for (i = 1; i <= min; i++)
4432            {            {
4433              pcre_uchar cc;
4434    
4435            if (eptr >= md->end_subject)            if (eptr >= md->end_subject)
4436              {              {
4437              SCHECK_PARTIAL();              SCHECK_PARTIAL();
4438              RRETURN(MATCH_NOMATCH);              RRETURN(MATCH_NOMATCH);
4439              }              }
4440            if (*eptr >= 128 || (md->ctypes[*eptr] & ctype_digit) == 0)            cc = RAWUCHAR(eptr);
4441              if (cc >= 128 || (md->ctypes[cc] & ctype_digit) == 0)
4442              RRETURN(MATCH_NOMATCH);              RRETURN(MATCH_NOMATCH);
4443            eptr++;            eptr++;
4444            /* No need to skip more bytes - we know it's a 1-byte character */            /* No need to skip more bytes - we know it's a 1-byte character */
# Line 4461  for (;;) Line 4448  for (;;)
4448          case OP_NOT_WHITESPACE:          case OP_NOT_WHITESPACE:
4449          for (i = 1; i <= min; i++)          for (i = 1; i <= min; i++)
4450            {            {
4451              pcre_uchar cc;
4452    
4453            if (eptr >= md->end_subject)            if (eptr >= md->end_subject)
4454              {              {
4455              SCHECK_PARTIAL();              SCHECK_PARTIAL();
4456              RRETURN(MATCH_NOMATCH);              RRETURN(MATCH_NOMATCH);
4457              }              }
4458            if (*eptr < 128 && (md->ctypes[*eptr] & ctype_space) != 0)            cc = RAWUCHAR(eptr);
4459              if (cc < 128 && (md->ctypes[cc] & ctype_space) != 0)
4460              RRETURN(MATCH_NOMATCH);              RRETURN(MATCH_NOMATCH);
4461            eptr++;            eptr++;
4462            ACROSSCHAR(eptr < md->end_subject, *eptr, eptr++);            ACROSSCHAR(eptr < md->end_subject, *eptr, eptr++);
# Line 4476  for (;;) Line 4466  for (;;)
4466          case OP_WHITESPACE:          case OP_WHITESPACE:
4467          for (i = 1; i <= min; i++)          for (i = 1; i <= min; i++)
4468            {            {
4469              pcre_uchar cc;
4470    
4471            if (eptr >= md->end_subject)            if (eptr >= md->end_subject)
4472              {              {
4473              SCHECK_PARTIAL();              SCHECK_PARTIAL();
4474              RRETURN(MATCH_NOMATCH);              RRETURN(MATCH_NOMATCH);
4475              }              }
4476            if (*eptr >= 128 || (md->ctypes[*eptr] & ctype_space) == 0)            cc = RAWUCHAR(eptr);
4477              if (cc >= 128 || (md->ctypes[cc] & ctype_space) == 0)
4478              RRETURN(MATCH_NOMATCH);              RRETURN(MATCH_NOMATCH);
4479            eptr++;            eptr++;
4480            /* No need to skip more bytes - we know it's a 1-byte character */            /* No need to skip more bytes - we know it's a 1-byte character */
# Line 4491  for (;;) Line 4484  for (;;)
4484          case OP_NOT_WORDCHAR:          case OP_NOT_WORDCHAR:
4485          for (i = 1; i <= min; i++)          for (i = 1; i <= min; i++)
4486            {            {
4487              pcre_uchar cc;
4488    
4489            if (eptr >= md->end_subject)            if (eptr >= md->end_subject)
4490              {              {
4491              SCHECK_PARTIAL();              SCHECK_PARTIAL();
4492              RRETURN(MATCH_NOMATCH);              RRETURN(MATCH_NOMATCH);
4493              }              }
4494            if (*eptr < 128 && (md->ctypes[*eptr] & ctype_word) != 0)            cc = RAWUCHAR(eptr);
4495              if (cc < 128 && (md->ctypes[cc] & ctype_word) != 0)
4496              RRETURN(MATCH_NOMATCH);              RRETURN(MATCH_NOMATCH);
4497            eptr++;            eptr++;
4498            ACROSSCHAR(eptr < md->end_subject, *eptr, eptr++);            ACROSSCHAR(eptr < md->end_subject, *eptr, eptr++);
# Line 4506  for (;;) Line 4502  for (;;)
4502          case OP_WORDCHAR:          case OP_WORDCHAR:
4503          for (i = 1; i <= min; i++)          for (i = 1; i <= min; i++)
4504            {            {
4505              pcre_uchar cc;
4506    
4507            if (eptr >= md->end_subject)            if (eptr >= md->end_subject)
4508              {              {
4509              SCHECK_PARTIAL();              SCHECK_PARTIAL();
4510              RRETURN(MATCH_NOMATCH);              RRETURN(MATCH_NOMATCH);
4511              }              }
4512            if (*eptr >= 128 || (md->ctypes[*eptr] & ctype_word) == 0)            cc = RAWUCHAR(eptr);
4513              if (cc >= 128 || (md->ctypes[cc] & ctype_word) == 0)
4514              RRETURN(MATCH_NOMATCH);              RRETURN(MATCH_NOMATCH);
4515            eptr++;            eptr++;
4516            /* No need to skip more bytes - we know it's a 1-byte character */            /* No need to skip more bytes - we know it's a 1-byte character */
# Line 4542  for (;;) Line 4541  for (;;)
4541            if (md->partial != 0 &&            if (md->partial != 0 &&
4542                eptr + 1 >= md->end_subject &&                eptr + 1 >= md->end_subject &&
4543                NLBLOCK->nltype == NLTYPE_FIXED &&                NLBLOCK->nltype == NLTYPE_FIXED &&
4544                NLBLOCK->nllen == 2 &&                NLBLOCK->nllen == 2 &&
4545                *eptr == NLBLOCK->nl[0])                *eptr == NLBLOCK->nl[0])
4546              {              {
4547              md->hitend = TRUE;              md->hitend = TRUE;
4548              if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);              if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);
4549              }              }
# Line 4582  for (;;) Line 4581  for (;;)
4581              {              {
4582              default: RRETURN(MATCH_NOMATCH);              default: RRETURN(MATCH_NOMATCH);
4583    
4584              case 0x000d:              case CHAR_CR:
4585              if (eptr < md->end_subject && *eptr == 0x0a) eptr++;              if (eptr < md->end_subject && *eptr == CHAR_LF) eptr++;
4586              break;              break;
4587    
4588              case 0x000a:              case CHAR_LF:
4589              break;              break;
4590    
4591              case 0x000b:              case CHAR_VT:
4592              case 0x000c:              case CHAR_FF:
4593              case 0x0085:              case CHAR_NEL:
4594  #ifdef COMPILE_PCRE16  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
4595              case 0x2028:              case 0x2028:
4596              case 0x2029:              case 0x2029:
4597  #endif  #endif
# Line 4613  for (;;) Line 4612  for (;;)
4612            switch(*eptr++)            switch(*eptr++)
4613              {              {
4614              default: break;              default: break;
4615              case 0x09:      /* HT */              HSPACE_BYTE_CASES:
4616              case 0x20:      /* SPACE */  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
4617              case 0xa0:      /* NBSP */              HSPACE_MULTIBYTE_CASES:
 #ifdef COMPILE_PCRE16  
             case 0x1680:    /* OGHAM SPACE MARK */  
             case 0x180e:    /* MONGOLIAN VOWEL SEPARATOR */  
             case 0x2000:    /* EN QUAD */  
             case 0x2001:    /* EM QUAD */  
             case 0x2002:    /* EN SPACE */  
             case 0x2003:    /* EM SPACE */  
             case 0x2004:    /* THREE-PER-EM SPACE */  
             case 0x2005:    /* FOUR-PER-EM SPACE */  
             case 0x2006:    /* SIX-PER-EM SPACE */  
             case 0x2007:    /* FIGURE SPACE */  
             case 0x2008:    /* PUNCTUATION SPACE */  
             case 0x2009:    /* THIN SPACE */  
             case 0x200A:    /* HAIR SPACE */  
             case 0x202f:    /* NARROW NO-BREAK SPACE */  
             case 0x205f:    /* MEDIUM MATHEMATICAL SPACE */  
             case 0x3000:    /* IDEOGRAPHIC SPACE */  
4618  #endif  #endif
4619              RRETURN(MATCH_NOMATCH);              RRETURN(MATCH_NOMATCH);
4620              }              }
# Line 4650  for (;;) Line 4632  for (;;)
4632            switch(*eptr++)            switch(*eptr++)
4633              {              {
4634              default: RRETURN(MATCH_NOMATCH);              default: RRETURN(MATCH_NOMATCH);
4635              case 0x09:      /* HT */              HSPACE_BYTE_CASES:
4636              case 0x20:      /* SPACE */  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
4637              case 0xa0:      /* NBSP */              HSPACE_MULTIBYTE_CASES:
 #ifdef COMPILE_PCRE16  
             case 0x1680:    /* OGHAM SPACE MARK */  
             case 0x180e:    /* MONGOLIAN VOWEL SEPARATOR */  
             case 0x2000:    /* EN QUAD */  
             case 0x2001:    /* EM QUAD */  
             case 0x2002:    /* EN SPACE */  
             case 0x2003:    /* EM SPACE */  
             case 0x2004:    /* THREE-PER-EM SPACE */  
             case 0x2005:    /* FOUR-PER-EM SPACE */  
             case 0x2006:    /* SIX-PER-EM SPACE */  
             case 0x2007:    /* FIGURE SPACE */  
             case 0x2008:    /* PUNCTUATION SPACE */  
             case 0x2009:    /* THIN SPACE */  
             case 0x200A:    /* HAIR SPACE */  
             case 0x202f:    /* NARROW NO-BREAK SPACE */  
             case 0x205f:    /* MEDIUM MATHEMATICAL SPACE */  
             case 0x3000:    /* IDEOGRAPHIC SPACE */  
4638  #endif  #endif
4639              break;              break;
4640              }              }
# Line 4686  for (;;) Line 4651  for (;;)
4651              }              }
4652            switch(*eptr++)            switch(*eptr++)
4653              {              {
4654              default: break;              VSPACE_BYTE_CASES:
4655              case 0x0a:      /* LF */  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
4656              case 0x0b:      /* VT */              VSPACE_MULTIBYTE_CASES:
             case 0x0c:      /* FF */  
             case 0x0d:      /* CR */  
             case 0x85:      /* NEL */  
 #ifdef COMPILE_PCRE16  
             case 0x2028:    /* LINE SEPARATOR */  
             case 0x2029:    /* PARAGRAPH SEPARATOR */  
4657  #endif  #endif
4658              RRETURN(MATCH_NOMATCH);              RRETURN(MATCH_NOMATCH);
4659                default: break;
4660              }              }
4661            }            }
4662          break;          break;
# Line 4712  for (;;) Line 4672  for (;;)
4672            switch(*eptr++)            switch(*eptr++)
4673              {              {
4674              default: RRETURN(MATCH_NOMATCH);              default: RRETURN(MATCH_NOMATCH);
4675              case 0x0a:      /* LF */              VSPACE_BYTE_CASES:
4676              case 0x0b:      /* VT */  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
4677              case 0x0c:      /* FF */              VSPACE_MULTIBYTE_CASES:
             case 0x0d:      /* CR */  
             case 0x85:      /* NEL */  
 #ifdef COMPILE_PCRE16  
             case 0x2028:    /* LINE SEPARATOR */  
             case 0x2029:    /* PARAGRAPH SEPARATOR */  
4678  #endif  #endif
4679              break;              break;
4680              }              }
# Line 4997  for (;;) Line 4952  for (;;)
4952              }              }
4953            /* Control never gets here */            /* Control never gets here */
4954    
4955            /* This should never occur */            case PT_CLIST:
4956              for (fi = min;; fi++)
4957                {
4958                const pcre_uint32 *cp;
4959                RMATCH(eptr, ecode, offset_top, md, eptrb, RM67);
4960                if (rrc != MATCH_NOMATCH) RRETURN(rrc);
4961                if (fi >= max) RRETURN(MATCH_NOMATCH);
4962                if (eptr >= md->end_subject)
4963                  {
4964                  SCHECK_PARTIAL();
4965                  RRETURN(MATCH_NOMATCH);
4966                  }
4967                GETCHARINCTEST(c, eptr);
4968                cp = PRIV(ucd_caseless_sets) + UCD_CASESET(c);
4969                for (;;)
4970                  {
4971                  if (c < *cp)
4972                    { if (prop_fail_result) break; else { RRETURN(MATCH_NOMATCH); } }
4973                  if (c == *cp++)
4974                    { if (prop_fail_result) { RRETURN(MATCH_NOMATCH); } else break; }
4975                  }
4976                }
4977              /* Control never gets here */
4978    
4979              /* This should never occur */
4980            default:            default:
4981            RRETURN(PCRE_ERROR_INTERNAL);            RRETURN(PCRE_ERROR_INTERNAL);
4982            }            }
# Line 5019  for (;;) Line 4997  for (;;)
4997              SCHECK_PARTIAL();              SCHECK_PARTIAL();
4998              RRETURN(MATCH_NOMATCH);              RRETURN(MATCH_NOMATCH);
4999              }              }
5000            GETCHARINCTEST(c, eptr);            else
           if (UCD_CATEGORY(c) == ucp_M) RRETURN(MATCH_NOMATCH);  
           while (eptr < md->end_subject)  
5001              {              {
5002              int len = 1;              int lgb, rgb;
5003              if (!utf) c = *eptr; else { GETCHARLEN(c, eptr, len); }              GETCHARINCTEST(c, eptr);
5004              if (UCD_CATEGORY(c) != ucp_M) break;              lgb = UCD_GRAPHBREAK(c);
5005              eptr += len;              while (eptr < md->end_subject)
5006                  {
5007                  int len = 1;
5008                  if (!utf) c = *eptr; else { GETCHARLEN(c, eptr, len); }
5009                  rgb = UCD_GRAPHBREAK(c);
5010                  if ((PRIV(ucp_gbtable)[lgb] & (1 << rgb)) == 0) break;
5011                  lgb = rgb;
5012                  eptr += len;
5013                  }
5014              }              }
5015            CHECK_PARTIAL();            CHECK_PARTIAL();
5016            }            }
5017          }          }
5018        else        else
# Line 5056  for (;;) Line 5040  for (;;)
5040              if (md->partial != 0 &&    /* Take care with CRLF partial */              if (md->partial != 0 &&    /* Take care with CRLF partial */
5041                  eptr >= md->end_subject &&                  eptr >= md->end_subject &&
5042                  NLBLOCK->nltype == NLTYPE_FIXED &&                  NLBLOCK->nltype == NLTYPE_FIXED &&
5043                  NLBLOCK->nllen == 2 &&                  NLBLOCK->nllen == 2 &&
5044                  c == NLBLOCK->nl[0])                  c == NLBLOCK->nl[0])
5045                {                {
5046                md->hitend = TRUE;                md->hitend = TRUE;
5047                if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);                if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);
5048                }                }
5049              break;              break;
5050    
5051              case OP_ALLANY:              case OP_ALLANY:
5052              case OP_ANYBYTE:              case OP_ANYBYTE:
5053              break;              break;
# Line 5072  for (;;) Line 5056  for (;;)
5056              switch(c)              switch(c)
5057                {                {
5058                default: RRETURN(MATCH_NOMATCH);                default: RRETURN(MATCH_NOMATCH);
5059                case 0x000d:                case CHAR_CR:
5060                if (eptr < md->end_subject && *eptr == 0x0a) eptr++;                if (eptr < md->end_subject && RAWUCHAR(eptr) == CHAR_LF) eptr++;
5061                break;                break;
5062                case 0x000a:  
5063                  case CHAR_LF:
5064                break;                break;
5065    
5066                case 0x000b:                case CHAR_VT:
5067                case 0x000c:                case CHAR_FF:
5068                case 0x0085:                case CHAR_NEL:
5069    #ifndef EBCDIC
5070                case 0x2028:                case 0x2028:
5071                case 0x2029:                case 0x2029:
5072    #endif  /* Not EBCDIC */
5073                if (md->bsr_anycrlf) RRETURN(MATCH_NOMATCH);                if (md->bsr_anycrlf) RRETURN(MATCH_NOMATCH);
5074                break;                break;
5075                }                }
# Line 5091  for (;;) Line 5078  for (;;)
5078              case OP_NOT_HSPACE:              case OP_NOT_HSPACE:
5079              switch(c)              switch(c)
5080                {                {
5081                  HSPACE_CASES: RRETURN(MATCH_NOMATCH);
5082                default: break;                default: break;
               case 0x09:      /* HT */  
               case 0x20:      /* SPACE */  
               case 0xa0:      /* NBSP */  
               case 0x1680:    /* OGHAM SPACE MARK */  
               case 0x180e:    /* MONGOLIAN VOWEL SEPARATOR */  
               case 0x2000:    /* EN QUAD */  
               case 0x2001:    /* EM QUAD */  
               case 0x2002:    /* EN SPACE */  
               case 0x2003:    /* EM SPACE */  
               case 0x2004:    /* THREE-PER-EM SPACE */  
               case 0x2005:    /* FOUR-PER-EM SPACE */  
               case 0x2006:    /* SIX-PER-EM SPACE */  
               case 0x2007:    /* FIGURE SPACE */  
               case 0x2008:    /* PUNCTUATION SPACE */  
               case 0x2009:    /* THIN SPACE */  
               case 0x200A:    /* HAIR SPACE */  
               case 0x202f:    /* NARROW NO-BREAK SPACE */  
               case 0x205f:    /* MEDIUM MATHEMATICAL SPACE */  
               case 0x3000:    /* IDEOGRAPHIC SPACE */  
               RRETURN(MATCH_NOMATCH);  
5083                }                }
5084              break;              break;
5085    
5086              case OP_HSPACE:              case OP_HSPACE:
5087              switch(c)              switch(c)
5088                {                {
5089                  HSPACE_CASES: break;
5090                default: RRETURN(MATCH_NOMATCH);                default: RRETURN(MATCH_NOMATCH);
               case 0x09:      /* HT */  
               case 0x20:      /* SPACE */  
               case 0xa0:      /* NBSP */  
               case 0x1680:    /* OGHAM SPACE MARK */  
               case 0x180e:    /* MONGOLIAN VOWEL SEPARATOR */  
               case 0x2000:    /* EN QUAD */  
               case 0x2001:    /* EM QUAD */  
               case 0x2002:    /* EN SPACE */  
               case 0x2003:    /* EM SPACE */  
               case 0x2004:    /* THREE-PER-EM SPACE */  
               case 0x2005:    /* FOUR-PER-EM SPACE */  
               case 0x2006:    /* SIX-PER-EM SPACE */  
               case 0x2007:    /* FIGURE SPACE */  
               case 0x2008:    /* PUNCTUATION SPACE */  
               case 0x2009:    /* THIN SPACE */  
               case 0x200A:    /* HAIR SPACE */  
               case 0x202f:    /* NARROW NO-BREAK SPACE */  
               case 0x205f:    /* MEDIUM MATHEMATICAL SPACE */  
               case 0x3000:    /* IDEOGRAPHIC SPACE */  
               break;  
5091                }                }
5092              break;              break;
5093    
5094              case OP_NOT_VSPACE:              case OP_NOT_VSPACE:
5095              switch(c)              switch(c)
5096                {                {
5097                  VSPACE_CASES: RRETURN(MATCH_NOMATCH);
5098                default: break;                default: break;
               case 0x0a:      /* LF */  
               case 0x0b:      /* VT */  
               case 0x0c:      /* FF */  
               case 0x0d:      /* CR */  
               case 0x85:      /* NEL */  
               case 0x2028:    /* LINE SEPARATOR */  
               case 0x2029:    /* PARAGRAPH SEPARATOR */  
               RRETURN(MATCH_NOMATCH);  
5099                }                }
5100              break;              break;
5101    
5102              case OP_VSPACE:              case OP_VSPACE:
5103              switch(c)              switch(c)
5104                {                {
5105                  VSPACE_CASES: break;
5106                default: RRETURN(MATCH_NOMATCH);                default: RRETURN(MATCH_NOMATCH);
               case 0x0a:      /* LF */  
               case 0x0b:      /* VT */  
               case 0x0c:      /* FF */  
               case 0x0d:      /* CR */  
               case 0x85:      /* NEL */  
               case 0x2028:    /* LINE SEPARATOR */  
               case 0x2029:    /* PARAGRAPH SEPARATOR */  
               break;  
5107                }                }
5108              break;              break;
5109    
# Line 5230  for (;;) Line 5165  for (;;)
5165              if (md->partial != 0 &&    /* Take care with CRLF partial */              if (md->partial != 0 &&    /* Take care with CRLF partial */
5166                  eptr >= md->end_subject &&                  eptr >= md->end_subject &&
5167                  NLBLOCK->nltype == NLTYPE_FIXED &&                  NLBLOCK->nltype == NLTYPE_FIXED &&
5168                  NLBLOCK->nllen == 2 &&                  NLBLOCK->nllen == 2 &&
5169                  c == NLBLOCK->nl[0])                  c == NLBLOCK->nl[0])
5170                {                {
5171                md->hitend = TRUE;                md->hitend = TRUE;
5172                if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);                if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);
5173                }                }
5174              break;              break;
5175    
5176              case OP_ALLANY:              case OP_ALLANY:
5177              case OP_ANYBYTE:              case OP_ANYBYTE:
5178              break;              break;
# Line 5246  for (;;) Line 5181  for (;;)
5181              switch(c)              switch(c)
5182                {                {
5183                default: RRETURN(MATCH_NOMATCH);                default: RRETURN(MATCH_NOMATCH);
5184                case 0x000d:                case CHAR_CR:
5185                if (eptr < md->end_subject && *eptr == 0x0a) eptr++;                if (eptr < md->end_subject && *eptr == CHAR_LF) eptr++;
5186                break;                break;
5187    
5188                case 0x000a:                case CHAR_LF:
5189                break;                break;
5190    
5191                case 0x000b:                case CHAR_VT:
5192                case 0x000c:                case CHAR_FF:
5193                case 0x0085:                case CHAR_NEL:
5194  #ifdef COMPILE_PCRE16  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
5195                case 0x2028:                case 0x2028:
5196                case 0x2029:                case 0x2029:
5197  #endif  #endif
# Line 5269  for (;;) Line 5204  for (;;)
5204              switch(c)              switch(c)
5205                {                {
5206                default: break;                default: break;
5207                case 0x09:      /* HT */                HSPACE_BYTE_CASES:
5208                case 0x20:      /* SPACE */  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
5209                case 0xa0:      /* NBSP */                HSPACE_MULTIBYTE_CASES:
 #ifdef COMPILE_PCRE16  
               case 0x1680:    /* OGHAM SPACE MARK */  
               case 0x180e:    /* MONGOLIAN VOWEL SEPARATOR */  
               case 0x2000:    /* EN QUAD */  
               case 0x2001:    /* EM QUAD */  
               case 0x2002:    /* EN SPACE */  
               case 0x2003:    /* EM SPACE */  
               case 0x2004:    /* THREE-PER-EM SPACE */  
               case 0x2005:    /* FOUR-PER-EM SPACE */  
               case 0x2006:    /* SIX-PER-EM SPACE */  
               case 0x2007:    /* FIGURE SPACE */  
               case 0x2008:    /* PUNCTUATION SPACE */  
               case 0x2009:    /* THIN SPACE */  
               case 0x200A:    /* HAIR SPACE */  
               case 0x202f:    /* NARROW NO-BREAK SPACE */  
               case 0x205f:    /* MEDIUM MATHEMATICAL SPACE */  
               case 0x3000:    /* IDEOGRAPHIC SPACE */  
5210  #endif  #endif
5211                RRETURN(MATCH_NOMATCH);                RRETURN(MATCH_NOMATCH);
5212                }                }
# Line 5298  for (;;) Line 5216  for (;;)
5216              switch(c)              switch(c)
5217                {                {
5218                default: RRETURN(MATCH_NOMATCH);                default: RRETURN(MATCH_NOMATCH);
5219                case 0x09:      /* HT */                HSPACE_BYTE_CASES:
5220                case 0x20:      /* SPACE */  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
5221                case 0xa0:      /* NBSP */                HSPACE_MULTIBYTE_CASES:
 #ifdef COMPILE_PCRE16  
               case 0x1680:    /* OGHAM SPACE MARK */  
               case 0x180e:    /* MONGOLIAN VOWEL SEPARATOR */  
               case 0x2000:    /* EN QUAD */  
               case 0x2001:    /* EM QUAD */  
               case 0x2002:    /* EN SPACE */  
               case 0x2003:    /* EM SPACE */  
               case 0x2004:    /* THREE-PER-EM SPACE */  
               case 0x2005:    /* FOUR-PER-EM SPACE */  
               case 0x2006:    /* SIX-PER-EM SPACE */  
               case 0x2007:    /* FIGURE SPACE */  
               case 0x2008:    /* PUNCTUATION SPACE */  
               case 0x2009:    /* THIN SPACE */  
               case 0x200A:    /* HAIR SPACE */  
               case 0x202f:    /* NARROW NO-BREAK SPACE */  
               case 0x205f:    /* MEDIUM MATHEMATICAL SPACE */  
               case 0x3000:    /* IDEOGRAPHIC SPACE */  
5222  #endif  #endif
5223                break;                break;
5224                }                }
# Line 5327  for (;;) Line 5228  for (;;)
5228              switch(c)              switch(c)
5229                {                {
5230                default: break;                default: break;
5231                case 0x0a:      /* LF */                VSPACE_BYTE_CASES:
5232                case 0x0b:      /* VT */  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
5233                case 0x0c:      /* FF */                VSPACE_MULTIBYTE_CASES:
               case 0x0d:      /* CR */  
               case 0x85:      /* NEL */  
 #ifdef COMPILE_PCRE16  
               case 0x2028:    /* LINE SEPARATOR */  
               case 0x2029:    /* PARAGRAPH SEPARATOR */  
5234  #endif  #endif
5235                RRETURN(MATCH_NOMATCH);                RRETURN(MATCH_NOMATCH);
5236                }                }
# Line 5344  for (;;) Line 5240  for (;;)
5240              switch(c)              switch(c)
5241                {                {
5242                default: RRETURN(MATCH_NOMATCH);                default: RRETURN(MATCH_NOMATCH);
5243                case 0x0a:      /* LF */                VSPACE_BYTE_CASES:
5244                case 0x0b:      /* VT */  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
5245                case 0x0c:      /* FF */                VSPACE_MULTIBYTE_CASES:
               case 0x0d:      /* CR */  
               case 0x85:      /* NEL */  
 #ifdef COMPILE_PCRE16  
               case 0x2028:    /* LINE SEPARATOR */  
               case 0x2029:    /* PARAGRAPH SEPARATOR */  
5246  #endif  #endif
5247                break;                break;
5248                }                }
# Line 5554  for (;;) Line 5445  for (;;)
5445              eptr+= len;              eptr+= len;
5446              }              }
5447            break;            break;
5448    
5449              case PT_CLIST:
5450              for (i = min; i < max; i++)
5451                {
5452                const pcre_uint32 *cp;
5453                int len = 1;
5454                if (eptr >= md->end_subject)
5455                  {
5456                  SCHECK_PARTIAL();
5457                  break;
5458                  }
5459                GETCHARLENTEST(c, eptr, len);
5460                cp = PRIV(ucd_caseless_sets) + UCD_CASESET(c);
5461                for (;;)
5462                  {
5463                  if (c < *cp)
5464                    { if (prop_fail_result) break; else goto GOT_MAX; }
5465                  if (c == *cp++)
5466                    { if (prop_fail_result) goto GOT_MAX; else break; }
5467                  }
5468                eptr += len;
5469                }
5470              GOT_MAX:
5471              break;
5472    
5473            default:            default:
5474            RRETURN(PCRE_ERROR_INTERNAL);            RRETURN(PCRE_ERROR_INTERNAL);
# Line 5578  for (;;) Line 5493  for (;;)
5493          {          {
5494          for (i = min; i < max; i++)          for (i = min; i < max; i++)
5495            {            {
           int len = 1;  
5496            if (eptr >= md->end_subject)            if (eptr >= md->end_subject)
5497              {              {
5498              SCHECK_PARTIAL();              SCHECK_PARTIAL();
5499              break;              break;
5500              }              }
5501            if (!utf) c = *eptr; else { GETCHARLEN(c, eptr, len); }            else
           if (UCD_CATEGORY(c) == ucp_M) break;  
           eptr += len;  
           while (eptr < md->end_subject)  
5502              {              {
5503              len = 1;              int lgb, rgb;
5504              if (!utf) c = *eptr; else { GETCHARLEN(c, eptr, len); }              GETCHARINCTEST(c, eptr);
5505              if (UCD_CATEGORY(c) != ucp_M) break;              lgb = UCD_GRAPHBREAK(c);
5506              eptr += len;              while (eptr < md->end_subject)
5507                  {
5508                  int len = 1;
5509                  if (!utf) c = *eptr; else { GETCHARLEN(c, eptr, len); }
5510                  rgb = UCD_GRAPHBREAK(c);
5511                  if ((PRIV(ucp_gbtable)[lgb] & (1 << rgb)) == 0) break;
5512                  lgb = rgb;
5513                  eptr += len;
5514                  }
5515              }              }
5516            CHECK_PARTIAL();            CHECK_PARTIAL();
5517            }            }
5518    
5519          /* eptr is now past the end of the maximum run */          /* eptr is now past the end of the maximum run */
# Line 5641  for (;;) Line 5560  for (;;)
5560                if (md->partial != 0 &&    /* Take care with CRLF partial */                if (md->partial != 0 &&    /* Take care with CRLF partial */
5561                    eptr + 1 >= md->end_subject &&                    eptr + 1 >= md->end_subject &&
5562                    NLBLOCK->nltype == NLTYPE_FIXED &&                    NLBLOCK->nltype == NLTYPE_FIXED &&
5563                    NLBLOCK->nllen == 2 &&                    NLBLOCK->nllen == 2 &&
5564                    *eptr == NLBLOCK->nl[0])                    RAWUCHAR(eptr) == NLBLOCK->nl[0])
5565                  {                  {
5566                  md->hitend = TRUE;                  md->hitend = TRUE;
5567                  if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);                  if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);
5568                  }                  }
# Line 5667  for (;;) Line 5586  for (;;)
5586                if (md->partial != 0 &&    /* Take care with CRLF partial */                if (md->partial != 0 &&    /* Take care with CRLF partial */
5587                    eptr + 1 >= md->end_subject &&                    eptr + 1 >= md->end_subject &&
5588                    NLBLOCK->nltype == NLTYPE_FIXED &&                    NLBLOCK->nltype == NLTYPE_FIXED &&
5589                    NLBLOCK->nllen == 2 &&                    NLBLOCK->nllen == 2 &&
5590                    *eptr == NLBLOCK->nl[0])                    RAWUCHAR(eptr) == NLBLOCK->nl[0])
5591                  {                  {
5592                  md->hitend = TRUE;                  md->hitend = TRUE;
5593                  if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);                  if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);
5594                  }                  }
# Line 5722  for (;;) Line 5641  for (;;)
5641                break;                break;
5642                }                }
5643              GETCHARLEN(c, eptr, len);              GETCHARLEN(c, eptr, len);
5644              if (c == 0x000d)              if (c == CHAR_CR)
5645                {                {
5646                if (++eptr >= md->end_subject) break;                if (++eptr >= md->end_subject) break;
5647                if (*eptr == 0x000a) eptr++;                if (RAWUCHAR(eptr) == CHAR_LF) eptr++;
5648                }                }
5649              else              else
5650                {                {
5651                if (c != 0x000a &&                if (c != CHAR_LF &&
5652                    (md->bsr_anycrlf ||                    (md->bsr_anycrlf ||
5653                     (c != 0x000b && c != 0x000c &&                     (c != CHAR_VT && c != CHAR_FF && c != CHAR_NEL
5654                      c != 0x0085 && c != 0x2028 && c != 0x2029)))  #ifndef EBCDIC
5655                        && c != 0x2028 && c != 0x2029
5656    #endif  /* Not EBCDIC */
5657                        )))
5658                  break;                  break;
5659                eptr += len;                eptr += len;
5660                }                }
# Line 5753  for (;;) Line 5675  for (;;)
5675              GETCHARLEN(c, eptr, len);              GETCHARLEN(c, eptr, len);
5676              switch(c)              switch(c)
5677                {                {
5678                  HSPACE_CASES: gotspace = TRUE; break;
5679                default: gotspace = FALSE; break;                default: gotspace = FALSE; break;
               case 0x09:      /* HT */  
               case 0x20:      /* SPACE */  
               case 0xa0:      /* NBSP */  
               case 0x1680:    /* OGHAM SPACE MARK */  
               case 0x180e:    /* MONGOLIAN VOWEL SEPARATOR */  
               case 0x2000:    /* EN QUAD */  
               case 0x2001:    /* EM QUAD */  
               case 0x2002:    /* EN SPACE */  
               case 0x2003:    /* EM SPACE */  
               case 0x2004:    /* THREE-PER-EM SPACE */  
               case 0x2005:    /* FOUR-PER-EM SPACE */  
               case 0x2006:    /* SIX-PER-EM SPACE */  
               case 0x2007:    /* FIGURE SPACE */  
               case 0x2008:    /* PUNCTUATION SPACE */  
               case 0x2009:    /* THIN SPACE */  
               case 0x200A:    /* HAIR SPACE */  
               case 0x202f:    /* NARROW NO-BREAK SPACE */  
               case 0x205f:    /* MEDIUM MATHEMATICAL SPACE */  
               case 0x3000:    /* IDEOGRAPHIC SPACE */  
               gotspace = TRUE;  
               break;  
5680                }                }
5681              if (gotspace == (ctype == OP_NOT_HSPACE)) break;              if (gotspace == (ctype == OP_NOT_HSPACE)) break;
5682              eptr += len;              eptr += len;
# Line 5795  for (;;) Line 5697  for (;;)
5697              GETCHARLEN(c, eptr, len);              GETCHARLEN(c, eptr, len);
5698              switch(c)              switch(c)
5699                {                {
5700                  VSPACE_CASES: gotspace = TRUE; break;
5701                default: gotspace = FALSE; break;                default: gotspace = FALSE; break;
               case 0x0a:      /* LF */  
               case 0x0b:      /* VT */  
               case 0x0c:      /* FF */  
               case 0x0d:      /* CR */  
               case 0x85:      /* NEL */  
               case 0x2028:    /* LINE SEPARATOR */  
               case 0x2029:    /* PARAGRAPH SEPARATOR */  
               gotspace = TRUE;  
               break;  
5702                }                }
5703              if (gotspace == (ctype == OP_NOT_VSPACE)) break;              if (gotspace == (ctype == OP_NOT_VSPACE)) break;
5704              eptr += len;              eptr += len;
# Line 5918  for (;;) Line 5812  for (;;)
5812            if (rrc != MATCH_NOMATCH) RRETURN(rrc);            if (rrc != MATCH_NOMATCH) RRETURN(rrc);
5813            if (eptr-- == pp) break;        /* Stop if tried at original pos */            if (eptr-- == pp) break;        /* Stop if tried at original pos */
5814            BACKCHAR(eptr);            BACKCHAR(eptr);
5815            if (ctype == OP_ANYNL && eptr > pp  && *eptr == '\n' &&            if (ctype == OP_ANYNL && eptr > pp  && RAWUCHAR(eptr) == CHAR_NL &&
5816                eptr[-1] == '\r') eptr--;                RAWUCHAR(eptr - 1) == CHAR_CR) eptr--;
5817            }            }
5818          }          }
5819        else        else
# Line 5940  for (;;) Line 5834  for (;;)
5834              if (md->partial != 0 &&    /* Take care with CRLF partial */              if (md->partial != 0 &&    /* Take care with CRLF partial */
5835                  eptr + 1 >= md->end_subject &&                  eptr + 1 >= md->end_subject &&
5836                  NLBLOCK->nltype == NLTYPE_FIXED &&                  NLBLOCK->nltype == NLTYPE_FIXED &&
5837                  NLBLOCK->nllen == 2 &&                  NLBLOCK->nllen == 2 &&
5838                  *eptr == NLBLOCK->nl[0])                  *eptr == NLBLOCK->nl[0])
5839                {                {
5840                md->hitend = TRUE;                md->hitend = TRUE;
5841                if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);                if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);
5842                }                }
# Line 5970  for (;;) Line 5864  for (;;)
5864                break;                break;
5865                }                }
5866              c = *eptr;              c = *eptr;
5867              if (c == 0x000d)              if (c == CHAR_CR)
5868                {                {
5869                if (++eptr >= md->end_subject) break;                if (++eptr >= md->end_subject) break;
5870                if (*eptr == 0x000a) eptr++;                if (*eptr == CHAR_LF) eptr++;
5871                }                }
5872              else              else
5873                {                {
5874                if (c != 0x000a && (md->bsr_anycrlf ||                if (c != CHAR_LF && (md->bsr_anycrlf ||
5875                  (c != 0x000b && c != 0x000c && c != 0x0085                   (c != CHAR_VT && c != CHAR_FF && c != CHAR_NEL
5876  #ifdef COMPILE_PCRE16  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
5877                  && c != 0x2028 && c != 0x2029                   && c != 0x2028 && c != 0x2029
5878  #endif  #endif
5879                  ))) break;                   ))) break;
5880                eptr++;                eptr++;
5881                }                }
5882              }              }
# Line 5996  for (;;) Line 5890  for (;;)
5890                SCHECK_PARTIAL();                SCHECK_PARTIAL();
5891                break;                break;
5892                }                }
5893              c = *eptr;              switch(*eptr)
5894              if (c == 0x09 || c == 0x20 || c == 0xa0                {
5895  #ifdef COMPILE_PCRE16                default: eptr++; break;
5896                || c == 0x1680 || c == 0x180e || (c >= 0x2000 && c <= 0x200A)                HSPACE_BYTE_CASES:
5897                || c == 0x202f || c == 0x205f || c == 0x3000  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
5898                  HSPACE_MULTIBYTE_CASES:
5899  #endif  #endif
5900                ) break;                goto ENDLOOP00;
5901              eptr++;                }
5902              }              }
5903              ENDLOOP00:
5904            break;            break;
5905    
5906            case OP_HSPACE:            case OP_HSPACE:
# Line 6015  for (;;) Line 5911  for (;;)
5911                SCHECK_PARTIAL();                SCHECK_PARTIAL();
5912                break;                break;
5913                }                }
5914              c = *eptr;              switch(*eptr)
5915              if (c != 0x09 && c != 0x20 && c != 0xa0                {
5916  #ifdef COMPILE_PCRE16                default: goto ENDLOOP01;
5917                && c != 0x1680 && c != 0x180e && (c < 0x2000 || c > 0x200A)                HSPACE_BYTE_CASES:
5918                && c != 0x202f && c != 0x205f && c != 0x3000  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
5919                  HSPACE_MULTIBYTE_CASES:
5920  #endif  #endif
5921                ) break;                eptr++; break;
5922              eptr++;                }
5923              }              }
5924              ENDLOOP01:
5925            break;            break;
5926    
5927            case OP_NOT_VSPACE:            case OP_NOT_VSPACE:
# Line 6034  for (;;) Line 5932  for (;;)
5932                SCHECK_PARTIAL();                SCHECK_PARTIAL();
5933                break;                break;
5934                }                }
5935              c = *eptr;              switch(*eptr)
5936              if (c == 0x0a || c == 0x0b || c == 0x0c || c == 0x0d || c == 0x85                {
5937  #ifdef COMPILE_PCRE16                default: eptr++; break;
5938                || c == 0x2028 || c == 0x2029                VSPACE_BYTE_CASES:
5939    #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
5940                  VSPACE_MULTIBYTE_CASES:
5941  #endif  #endif
5942                ) break;                goto ENDLOOP02;
5943              eptr++;                }
5944              }              }
5945              ENDLOOP02:
5946            break;            break;
5947    
5948            case OP_VSPACE:            case OP_VSPACE:
# Line 6052  for (;;) Line 5953  for (;;)
5953                SCHECK_PARTIAL();                SCHECK_PARTIAL();
5954                break;                break;
5955                }                }
5956              c = *eptr;              switch(*eptr)
5957              if (c != 0x0a && c != 0x0b && c != 0x0c && c != 0x0d && c != 0x85                {
5958  #ifdef COMPILE_PCRE16                default: goto ENDLOOP03;
5959                && c != 0x2028 && c != 0x2029                VSPACE_BYTE_CASES:
5960    #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
5961                  VSPACE_MULTIBYTE_CASES:
5962  #endif  #endif
5963                ) break;                eptr++; break;
5964              eptr++;                }
5965              }              }
5966              ENDLOOP03:
5967            break;            break;
5968    
5969            case OP_NOT_DIGIT:            case OP_NOT_DIGIT:
# Line 6156  for (;;) Line 6060  for (;;)
6060            RMATCH(eptr, ecode, offset_top, md, eptrb, RM47);            RMATCH(eptr, ecode, offset_top, md, eptrb, RM47);
6061            if (rrc != MATCH_NOMATCH) RRETURN(rrc);            if (rrc != MATCH_NOMATCH) RRETURN(rrc);
6062            eptr--;            eptr--;
6063            if (ctype == OP_ANYNL && eptr > pp  && *eptr == '\n' &&            if (ctype == OP_ANYNL && eptr > pp  && *eptr == CHAR_LF &&
6064                eptr[-1] == '\r') eptr--;                eptr[-1] == CHAR_CR) eptr--;
6065            }            }
6066          }          }
6067    
# Line 6207  switch (frame->Xwhere) Line 6111  switch (frame->Xwhere)
6111    LBL(32) LBL(34) LBL(42) LBL(46)    LBL(32) LBL(34) LBL(42) LBL(46)
6112  #ifdef SUPPORT_UCP  #ifdef SUPPORT_UCP
6113    LBL(36) LBL(37) LBL(38) LBL(39) LBL(40) LBL(41) LBL(44) LBL(45)    LBL(36) LBL(37) LBL(38) LBL(39) LBL(40) LBL(41) LBL(44) LBL(45)
6114    LBL(59) LBL(60) LBL(61) LBL(62)    LBL(59) LBL(60) LBL(61) LBL(62) LBL(67)
6115  #endif  /* SUPPORT_UCP */  #endif  /* SUPPORT_UCP */
6116  #endif  /* SUPPORT_UTF */  #endif  /* SUPPORT_UTF */
6117    default:    default:
6118    DPRINTF(("jump error in pcre match: label %d non-existent\n", frame->Xwhere));    DPRINTF(("jump error in pcre match: label %d non-existent\n", frame->Xwhere));
   
 printf("+++jump error in pcre match: label %d non-existent\n", frame->Xwhere);  
   
6119    return PCRE_ERROR_INTERNAL;    return PCRE_ERROR_INTERNAL;
6120    }    }
6121  #undef LBL  #undef LBL
# Line 6276  Undefine all the macros that were define Line 6177  Undefine all the macros that were define
6177  ***************************************************************************/  ***************************************************************************/
6178    
6179    
6180    #ifdef NO_RECURSE
6181    /*************************************************
6182    *          Release allocated heap frames         *
6183    *************************************************/
6184    
6185    /* This function releases all the allocated frames. The base frame is on the
6186    machine stack, and so must not be freed.
6187    
6188    Argument: the address of the base frame
6189    Returns:  nothing
6190    */
6191    
6192    static void
6193    release_match_heapframes (heapframe *frame_base)
6194    {
6195    heapframe *nextframe = frame_base->Xnextframe;
6196    while (nextframe != NULL)
6197      {
6198      heapframe *oldframe = nextframe;
6199      nextframe = nextframe->Xnextframe;
6200      (PUBL(stack_free))(oldframe);
6201      }
6202    }
6203    #endif
6204    
6205    
6206  /*************************************************  /*************************************************
6207  *         Execute a Regular Expression           *  *         Execute a Regular Expression           *
# Line 6301  Returns:          > 0 => success; value Line 6227  Returns:          > 0 => success; value
6227                   < -1 => some kind of unexpected problem                   < -1 => some kind of unexpected problem
6228  */  */
6229    
6230  #ifdef COMPILE_PCRE8  #if defined COMPILE_PCRE8
6231  PCRE_EXP_DEFN int PCRE_CALL_CONVENTION  PCRE_EXP_DEFN int PCRE_CALL_CONVENTION
6232  pcre_exec(const pcre *argument_re, const pcre_extra *extra_data,  pcre_exec(const pcre *argument_re, const pcre_extra *extra_data,
6233    PCRE_SPTR subject, int length, int start_offset, int options, int *offsets,    PCRE_SPTR subject, int length, int start_offset, int options, int *offsets,
6234    int offsetcount)    int offsetcount)
6235  #else  #elif defined COMPILE_PCRE16
6236  PCRE_EXP_DEFN int PCRE_CALL_CONVENTION  PCRE_EXP_DEFN int PCRE_CALL_CONVENTION
6237  pcre16_exec(const pcre16 *argument_re, const pcre16_extra *extra_data,  pcre16_exec(const pcre16 *argument_re, const pcre16_extra *extra_data,
6238    PCRE_SPTR16 subject, int length, int start_offset, int options, int *offsets,    PCRE_SPTR16 subject, int length, int start_offset, int options, int *offsets,
6239    int offsetcount)    int offsetcount)
6240    #elif defined COMPILE_PCRE32
6241    PCRE_EXP_DEFN int PCRE_CALL_CONVENTION
6242    pcre32_exec(const pcre32 *argument_re, const pcre32_extra *extra_data,
6243      PCRE_SPTR32 subject, int length, int start_offset, int options, int *offsets,
6244      int offsetcount)
6245  #endif  #endif
6246  {  {
6247  int rc, ocount, arg_offset_max;  int rc, ocount, arg_offset_max;
# Line 6338  PCRE_PUCHAR req_char_ptr = start_match - Line 6269  PCRE_PUCHAR req_char_ptr = start_match -
6269  const pcre_study_data *study;  const pcre_study_data *study;
6270  const REAL_PCRE *re = (const REAL_PCRE *)argument_re;  const REAL_PCRE *re = (const REAL_PCRE *)argument_re;
6271    
6272    #ifdef NO_RECURSE
6273    heapframe frame_zero;
6274    frame_zero.Xprevframe = NULL;            /* Marks the top level */
6275    frame_zero.Xnextframe = NULL;            /* None are allocated yet */
6276    md->match_frames_base = &frame_zero;
6277    #endif
6278    
6279  /* Check for the special magic call that measures the size of the stack used  /* Check for the special magic call that measures the size of the stack used
6280  per recursive call of match(). Without the funny casting for sizeof, a Windows  per recursive call of match(). Without the funny casting for sizeof, a Windows
6281  compiler gave this error: "unary minus operator applied to unsigned type,  compiler gave this error: "unary minus operator applied to unsigned type,
6282  result still unsigned". Hopefully the cast fixes that. */  result still unsigned". Hopefully the cast fixes that. */
6283    
# Line 6357  if ((options & ~PUBLIC_EXEC_OPTIONS) != Line 6295  if ((options & ~PUBLIC_EXEC_OPTIONS) !=
6295  if (re == NULL || subject == NULL || (offsets == NULL && offsetcount > 0))  if (re == NULL || subject == NULL || (offsets == NULL && offsetcount > 0))
6296    return PCRE_ERROR_NULL;    return PCRE_ERROR_NULL;
6297  if (offsetcount < 0) return PCRE_ERROR_BADCOUNT;  if (offsetcount < 0) return PCRE_ERROR_BADCOUNT;
6298    if (length < 0) return PCRE_ERROR_BADLENGTH;
6299  if (start_offset < 0 || start_offset > length) return PCRE_ERROR_BADOFFSET;  if (start_offset < 0 || start_offset > length) return PCRE_ERROR_BADOFFSET;
6300    
6301  /* Check that the first field in the block is the magic number. If it is not,  /* Check that the first field in the block is the magic number. If it is not,
# Line 6394  if (utf && (options & PCRE_NO_UTF8_CHECK Line 6333  if (utf && (options & PCRE_NO_UTF8_CHECK
6333        offsets[0] = erroroffset;        offsets[0] = erroroffset;
6334        offsets[1] = errorcode;        offsets[1] = errorcode;
6335        }        }
6336  #ifdef COMPILE_PCRE16  #if defined COMPILE_PCRE8
     return (errorcode <= PCRE_UTF16_ERR1 && md->partial > 1)?  
       PCRE_ERROR_SHORTUTF16 : PCRE_ERROR_BADUTF16;  
 #else  
6337      return (errorcode <= PCRE_UTF8_ERR5 && md->partial > 1)?      return (errorcode <= PCRE_UTF8_ERR5 && md->partial > 1)?
6338        PCRE_ERROR_SHORTUTF8 : PCRE_ERROR_BADUTF8;        PCRE_ERROR_SHORTUTF8 : PCRE_ERROR_BADUTF8;
6339    #elif defined COMPILE_PCRE16
6340        return (errorcode <= PCRE_UTF16_ERR1 && md->partial > 1)?
6341          PCRE_ERROR_SHORTUTF16 : PCRE_ERROR_BADUTF16;
6342    #elif defined COMPILE_PCRE32
6343        return PCRE_ERROR_BADUTF32;
6344  #endif  #endif
6345      }      }
6346    #if defined COMPILE_PCRE8 || defined COMPILE_PCRE16
6347    /* Check that a start_offset points to the start of a UTF character. */    /* Check that a start_offset points to the start of a UTF character. */
6348    if (start_offset > 0 && start_offset < length &&    if (start_offset > 0 && start_offset < length &&
6349        NOT_FIRSTCHAR(((PCRE_PUCHAR)subject)[start_offset]))        NOT_FIRSTCHAR(((PCRE_PUCHAR)subject)[start_offset]))
6350      return PCRE_ERROR_BADUTF8_OFFSET;      return PCRE_ERROR_BADUTF8_OFFSET;
6351    #endif
6352    }    }
6353  #endif  #endif
6354    
# Line 6420  if (extra_data != NULL Line 6362  if (extra_data != NULL
6362      && (extra_data->flags & (PCRE_EXTRA_EXECUTABLE_JIT |      && (extra_data->flags & (PCRE_EXTRA_EXECUTABLE_JIT |
6363                               PCRE_EXTRA_TABLES)) == PCRE_EXTRA_EXECUTABLE_JIT                               PCRE_EXTRA_TABLES)) == PCRE_EXTRA_EXECUTABLE_JIT
6364      && extra_data->executable_jit != NULL      && extra_data->executable_jit != NULL
6365      && (options & ~(PCRE_NO_UTF8_CHECK | PCRE_NOTBOL | PCRE_NOTEOL |      && (options & ~PUBLIC_JIT_EXEC_OPTIONS) == 0)
                     PCRE_NOTEMPTY | PCRE_NOTEMPTY_ATSTART |  
                     PCRE_PARTIAL_SOFT | PCRE_PARTIAL_HARD)) == 0)  
6366    {    {
6367    rc = PRIV(jit_exec)(re, extra_data->executable_jit,    rc = PRIV(jit_exec)(extra_data, (const pcre_uchar *)subject, length,
6368      (const pcre_uchar *)subject, length, start_offset, options,         start_offset, options, offsets, offsetcount);
6369      ((extra_data->flags & PCRE_EXTRA_MATCH_LIMIT) == 0)  
     ? MATCH_LIMIT : extra_data->match_limit, offsets, offsetcount);  
   
6370    /* PCRE_ERROR_NULL means that the selected normal or partial matching    /* PCRE_ERROR_NULL means that the selected normal or partial matching
6371    mode is not compiled. In this case we simply fallback to interpreter. */    mode is not compiled. In this case we simply fallback to interpreter. */
6372    
6373    if (rc != PCRE_ERROR_NULL) return rc;    if (rc != PCRE_ERROR_JIT_BADOPTION) return rc;
6374    }    }
6375  #endif  #endif
6376    
# Line 6716  for(;;) Line 6654  for(;;)
6654    
6655      if (has_first_char)      if (has_first_char)
6656        {        {
6657          pcre_uchar smc;
6658    
6659        if (first_char != first_char2)        if (first_char != first_char2)
6660          while (start_match < end_subject &&          while (start_match < end_subject &&
6661              *start_match != first_char && *start_match != first_char2)            (smc = RAWUCHARTEST(start_match)) != first_char && smc != first_char2)
6662            start_match++;            start_match++;
6663        else        else
6664          while (start_match < end_subject && *start_match != first_char)          while (start_match < end_subject && RAWUCHARTEST(start_match) != first_char)
6665            start_match++;            start_match++;
6666        }        }
6667    
# Line 6753  for(;;) Line 6693  for(;;)
6693          if (start_match[-1] == CHAR_CR &&          if (start_match[-1] == CHAR_CR &&
6694               (md->nltype == NLTYPE_ANY || md->nltype == NLTYPE_ANYCRLF) &&               (md->nltype == NLTYPE_ANY || md->nltype == NLTYPE_ANYCRLF) &&
6695               start_match < end_subject &&               start_match < end_subject &&
6696               *start_match == CHAR_NL)               RAWUCHARTEST(start_match) == CHAR_NL)
6697            start_match++;            start_match++;
6698          }          }
6699        }        }
# Line 6764  for(;;) Line 6704  for(;;)
6704        {        {
6705        while (start_match < end_subject)        while (start_match < end_subject)
6706          {          {
6707          register unsigned int c = *start_match;          register pcre_uint32 c = RAWUCHARTEST(start_match);
6708  #ifndef COMPILE_PCRE8  #ifndef COMPILE_PCRE8
6709          if (c > 255) c = 255;          if (c > 255) c = 255;
6710  #endif  #endif
# Line 6832  for(;;) Line 6772  for(;;)
6772            {            {
6773            while (p < end_subject)            while (p < end_subject)
6774              {              {
6775              register int pp = *p++;              register pcre_uint32 pp = RAWUCHARINCTEST(p);
6776              if (pp == req_char || pp == req_char2) { p--; break; }              if (pp == req_char || pp == req_char2) { p--; break; }
6777              }              }
6778            }            }
# Line 6840  for(;;) Line 6780  for(;;)
6780            {            {
6781            while (p < end_subject)            while (p < end_subject)
6782              {              {
6783              if (*p++ == req_char) { p--; break; }              if (RAWUCHARINCTEST(p) == req_char) { p--; break; }
6784              }              }
6785            }            }
6786    
# Line 7027  if (rc == MATCH_MATCH || rc == MATCH_ACC Line 6967  if (rc == MATCH_MATCH || rc == MATCH_ACC
6967      {      {
6968      register int *iptr, *iend;      register int *iptr, *iend;
6969      int resetcount = 2 + re->top_bracket * 2;      int resetcount = 2 + re->top_bracket * 2;
6970      if (resetcount > offsetcount) resetcount = ocount;      if (resetcount > offsetcount) resetcount = offsetcount;
6971      iptr = offsets + md->end_offset_top;      iptr = offsets + md->end_offset_top;
6972      iend = offsets + resetcount;      iend = offsets + resetcount;
6973      while (iptr < iend) *iptr++ = -1;      while (iptr < iend) *iptr++ = -1;
# Line 7048  if (rc == MATCH_MATCH || rc == MATCH_ACC Line 6988  if (rc == MATCH_MATCH || rc == MATCH_ACC
6988    if (extra_data != NULL && (extra_data->flags & PCRE_EXTRA_MARK) != 0)    if (extra_data != NULL && (extra_data->flags & PCRE_EXTRA_MARK) != 0)
6989      *(extra_data->mark) = (pcre_uchar *)md->mark;      *(extra_data->mark) = (pcre_uchar *)md->mark;
6990    DPRINTF((">>>> returning %d\n", rc));    DPRINTF((">>>> returning %d\n", rc));
6991    #ifdef NO_RECURSE
6992      release_match_heapframes(&frame_zero);
6993    #endif
6994    return rc;    return rc;
6995    }    }
6996    
# Line 7065  if (using_temporary_offsets) Line 7008  if (using_temporary_offsets)
7008  if (rc != MATCH_NOMATCH && rc != PCRE_ERROR_PARTIAL)  if (rc != MATCH_NOMATCH && rc != PCRE_ERROR_PARTIAL)
7009    {    {
7010    DPRINTF((">>>> error: returning %d\n", rc));    DPRINTF((">>>> error: returning %d\n", rc));
7011    #ifdef NO_RECURSE
7012      release_match_heapframes(&frame_zero);
7013    #endif
7014    return rc;    return rc;
7015    }    }
7016    
# Line 7094  else Line 7040  else
7040    
7041  if (extra_data != NULL && (extra_data->flags & PCRE_EXTRA_MARK) != 0)  if (extra_data != NULL && (extra_data->flags & PCRE_EXTRA_MARK) != 0)
7042    *(extra_data->mark) = (pcre_uchar *)md->nomatch_mark;    *(extra_data->mark) = (pcre_uchar *)md->nomatch_mark;
7043    #ifdef NO_RECURSE
7044      release_match_heapframes(&frame_zero);
7045    #endif
7046  return rc;  return rc;
7047  }  }
7048    

Legend:
Removed from v.919  
changed lines
  Added in v.1189

  ViewVC Help
Powered by ViewVC 1.1.5