/[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 926 by ph10, Wed Feb 22 15:01:32 2012 UTC revision 1092 by chpe, Tue Oct 16 15:55:55 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 142  Arguments: Line 141  Arguments:
141    
142  Returns:      >= 0 the number of subject bytes matched  Returns:      >= 0 the number of subject bytes matched
143                -1 no match                -1 no match
144                -2 partial match; always given if at end subject                -2 partial match; always given if at end subject
145  */  */
146    
147  static int  static int
# Line 165  pchars(p, length, FALSE, md); Line 164  pchars(p, length, FALSE, md);
164  printf("\n");  printf("\n");
165  #endif  #endif
166    
167  /* Always fail if reference not set (and not JavaScript compatible - in that  /* Always fail if reference not set (and not JavaScript compatible - in that
168  case the length is passed as zero). */  case the length is passed as zero). */
169    
170  if (length < 0) return -1;  if (length < 0) return -1;
# Line 181  if (caseless) Line 180  if (caseless)
180    if (md->utf)    if (md->utf)
181      {      {
182      /* 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
183      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
184      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.
185      (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
186      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
187      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
188      reference, not along the subject (earlier code did this wrong). */      length along the reference, not along the subject (earlier code did this
189        wrong). */
190    
191      PCRE_PUCHAR endptr = p + length;      PCRE_PUCHAR endptr = p + length;
192      while (p < endptr)      while (p < endptr)
193        {        {
194        int c, d;        pcre_uint32 c, d;
195          const ucd_record *ur;
196        if (eptr >= md->end_subject) return -2;   /* Partial match */        if (eptr >= md->end_subject) return -2;   /* Partial match */
197        GETCHARINC(c, eptr);        GETCHARINC(c, eptr);
198        GETCHARINC(d, p);        GETCHARINC(d, p);
199        if (c != d && c != UCD_OTHERCASE(d)) return -1;        ur = GET_UCD(d);
200          if (c != d && c != d + ur->other_case)
201            {
202            const pcre_uint32 *pp = PRIV(ucd_caseless_sets) + ur->caseset;
203            for (;;)
204              {
205              if (c < *pp) return -1;
206              if (c == *pp++) break;
207              }
208            }
209        }        }
210      }      }
211    else    else
# Line 220  are in UTF-8 mode. */ Line 230  are in UTF-8 mode. */
230    
231  else  else
232    {    {
233    while (length-- > 0)    while (length-- > 0)
234      {      {
235      if (eptr >= md->end_subject) return -2;   /* Partial match */      if (eptr >= md->end_subject) return -2;   /* Partial match */
236      if (*p++ != *eptr++) return -1;      if (*p++ != *eptr++) return -1;
237      }      }
238    }    }
239    
240  return (int)(eptr - eptr_start);  return (int)(eptr - eptr_start);
# Line 317  argument of match(), which never changes Line 327  argument of match(), which never changes
327    
328  #define RMATCH(ra,rb,rc,rd,re,rw)\  #define RMATCH(ra,rb,rc,rd,re,rw)\
329    {\    {\
330    heapframe *newframe = (heapframe *)(PUBL(stack_malloc))(sizeof(heapframe));\    heapframe *newframe = frame->Xnextframe;\
331    if (newframe == NULL) RRETURN(PCRE_ERROR_NOMEMORY);\    if (newframe == NULL)\
332    frame->Xwhere = rw; \      {\
333        newframe = (heapframe *)(PUBL(stack_malloc))(sizeof(heapframe));\
334        if (newframe == NULL) RRETURN(PCRE_ERROR_NOMEMORY);\
335        newframe->Xnextframe = NULL;\
336        frame->Xnextframe = newframe;\
337        }\
338      frame->Xwhere = rw;\
339    newframe->Xeptr = ra;\    newframe->Xeptr = ra;\
340    newframe->Xecode = rb;\    newframe->Xecode = rb;\
341    newframe->Xmstart = mstart;\    newframe->Xmstart = mstart;\
# Line 338  argument of match(), which never changes Line 354  argument of match(), which never changes
354    {\    {\
355    heapframe *oldframe = frame;\    heapframe *oldframe = frame;\
356    frame = oldframe->Xprevframe;\    frame = oldframe->Xprevframe;\
   if (oldframe != &frame_zero) (PUBL(stack_free))(oldframe);\  
357    if (frame != NULL)\    if (frame != NULL)\
358      {\      {\
359      rrc = ra;\      rrc = ra;\
# Line 352  argument of match(), which never changes Line 367  argument of match(), which never changes
367    
368  typedef struct heapframe {  typedef struct heapframe {
369    struct heapframe *Xprevframe;    struct heapframe *Xprevframe;
370      struct heapframe *Xnextframe;
371    
372    /* Function arguments that may change */    /* Function arguments that may change */
373    
# Line 483  so they can be ordinary variables in all Line 499  so they can be ordinary variables in all
499    
500  register int  rrc;         /* Returns from recursive calls */  register int  rrc;         /* Returns from recursive calls */
501  register int  i;           /* Used for loops not involving calls to RMATCH() */  register int  i;           /* Used for loops not involving calls to RMATCH() */
502  register unsigned int c;   /* Character values not kept over RMATCH() calls */  register pcre_uint32 c;    /* Character values not kept over RMATCH() calls */
503  register BOOL utf;         /* Local copy of UTF flag for speed */  register BOOL utf;         /* Local copy of UTF flag for speed */
504    
505  BOOL minimize, possessive; /* Quantifier options */  BOOL minimize, possessive; /* Quantifier options */
# Line 498  the top-level on the stack rather than m Line 514  the top-level on the stack rather than m
514  boost in many cases where there is not much "recursion". */  boost in many cases where there is not much "recursion". */
515    
516  #ifdef NO_RECURSE  #ifdef NO_RECURSE
517  heapframe frame_zero;  heapframe *frame = (heapframe *)md->match_frames_base;
 heapframe *frame = &frame_zero;  
 frame->Xprevframe = NULL;            /* Marks the top level */  
518    
519  /* Copy in the original argument variables */  /* Copy in the original argument variables */
520    
# Line 615  int max; Line 629  int max;
629  int min;  int min;
630  int number;  int number;
631  int offset;  int offset;
632  int op;  pcre_uchar op;
633  int save_capture_last;  int save_capture_last;
634  int save_offset1, save_offset2, save_offset3;  int save_offset1, save_offset2, save_offset3;
635  int stacksave[REC_STACK_SAVE_MAX];  int stacksave[REC_STACK_SAVE_MAX];
# Line 903  for (;;) Line 917  for (;;)
917        }        }
918      else  /* OP_KETRMAX */      else  /* OP_KETRMAX */
919        {        {
       md->match_function_type = MATCH_CBEGROUP;  
920        RMATCH(eptr, prev, offset_top, md, eptrb, RM66);        RMATCH(eptr, prev, offset_top, md, eptrb, RM66);
921        if (rrc != MATCH_NOMATCH) RRETURN(rrc);        if (rrc != MATCH_NOMATCH) RRETURN(rrc);
922        ecode += 1 + LINK_SIZE;        ecode += 1 + LINK_SIZE;
# Line 1032  for (;;) Line 1045  for (;;)
1045    
1046      for (;;)      for (;;)
1047        {        {
1048        if (op >= OP_SBRA || op == OP_ONCE) md->match_function_type = MATCH_CBEGROUP;        if (op >= OP_SBRA || op == OP_ONCE)
1049            md->match_function_type = MATCH_CBEGROUP;
1050    
1051        /* 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
1052        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 1273  for (;;)
1273          cb.version          = 2;   /* Version 1 of the callout block */          cb.version          = 2;   /* Version 1 of the callout block */
1274          cb.callout_number   = ecode[LINK_SIZE+2];          cb.callout_number   = ecode[LINK_SIZE+2];
1275          cb.offset_vector    = md->offset_vector;          cb.offset_vector    = md->offset_vector;
1276  #ifdef COMPILE_PCRE8  #if defined COMPILE_PCRE8
1277          cb.subject          = (PCRE_SPTR)md->start_subject;          cb.subject          = (PCRE_SPTR)md->start_subject;
1278  #else  #elif defined COMPILE_PCRE16
1279          cb.subject          = (PCRE_SPTR16)md->start_subject;          cb.subject          = (PCRE_SPTR16)md->start_subject;
1280    #elif defined COMPILE_PCRE32
1281            cb.subject          = (PCRE_SPTR32)md->start_subject;
1282  #endif  #endif
1283          cb.subject_length   = (int)(md->end_subject - md->start_subject);          cb.subject_length   = (int)(md->end_subject - md->start_subject);
1284          cb.start_match      = (int)(mstart - md->start_subject);          cb.start_match      = (int)(mstart - md->start_subject);
# Line 1571  for (;;) Line 1587  for (;;)
1587          mstart = md->start_match_ptr;   /* In case \K reset it */          mstart = md->start_match_ptr;   /* In case \K reset it */
1588          break;          break;
1589          }          }
1590          md->mark = save_mark;
1591    
1592        /* PCRE does not allow THEN to escape beyond an assertion; it is treated        /* A COMMIT failure must fail the entire assertion, without trying any
1593        as NOMATCH. */        subsequent branches. */
1594    
1595          if (rrc == MATCH_COMMIT) RRETURN(MATCH_NOMATCH);
1596    
1597          /* PCRE does not allow THEN to escape beyond an assertion; it
1598          is treated as NOMATCH. */
1599    
1600        if (rrc != MATCH_NOMATCH && rrc != MATCH_THEN) RRETURN(rrc);        if (rrc != MATCH_NOMATCH && rrc != MATCH_THEN) RRETURN(rrc);
1601        ecode += GET(ecode, 1);        ecode += GET(ecode, 1);
       md->mark = save_mark;  
1602        }        }
1603      while (*ecode == OP_ALT);      while (*ecode == OP_ALT);
1604    
# Line 1677  for (;;) Line 1698  for (;;)
1698        cb.version          = 2;   /* Version 1 of the callout block */        cb.version          = 2;   /* Version 1 of the callout block */
1699        cb.callout_number   = ecode[1];        cb.callout_number   = ecode[1];
1700        cb.offset_vector    = md->offset_vector;        cb.offset_vector    = md->offset_vector;
1701  #ifdef COMPILE_PCRE8  #if defined COMPILE_PCRE8
1702        cb.subject          = (PCRE_SPTR)md->start_subject;        cb.subject          = (PCRE_SPTR)md->start_subject;
1703  #else  #elif defined COMPILE_PCRE16
1704        cb.subject          = (PCRE_SPTR16)md->start_subject;        cb.subject          = (PCRE_SPTR16)md->start_subject;
1705    #elif defined COMPILE_PCRE32
1706          cb.subject          = (PCRE_SPTR32)md->start_subject;
1707  #endif  #endif
1708        cb.subject_length   = (int)(md->end_subject - md->start_subject);        cb.subject_length   = (int)(md->end_subject - md->start_subject);
1709        cb.start_match      = (int)(mstart - md->start_subject);        cb.start_match      = (int)(mstart - md->start_subject);
# Line 1785  for (;;) Line 1808  for (;;)
1808            goto RECURSION_MATCHED;        /* Exit loop; end processing */            goto RECURSION_MATCHED;        /* Exit loop; end processing */
1809            }            }
1810    
1811          /* 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
1812          as NOMATCH. */          is treated as NOMATCH. */
1813    
1814          else if (rrc != MATCH_NOMATCH && rrc != MATCH_THEN)          else if (rrc != MATCH_NOMATCH && rrc != MATCH_THEN &&
1815                     rrc != MATCH_COMMIT)
1816            {            {
1817            DPRINTF(("Recursion gave error %d\n", rrc));            DPRINTF(("Recursion gave error %d\n", rrc));
1818            if (new_recursive.offset_save != stacksave)            if (new_recursive.offset_save != stacksave)
# Line 1999  for (;;) Line 2023  for (;;)
2023          }          }
2024        if (*prev >= OP_SBRA)    /* Could match an empty string */        if (*prev >= OP_SBRA)    /* Could match an empty string */
2025          {          {
         md->match_function_type = MATCH_CBEGROUP;  
2026          RMATCH(eptr, prev, offset_top, md, eptrb, RM50);          RMATCH(eptr, prev, offset_top, md, eptrb, RM50);
2027          RRETURN(rrc);          RRETURN(rrc);
2028          }          }
# Line 2008  for (;;) Line 2031  for (;;)
2031        }        }
2032      else  /* OP_KETRMAX */      else  /* OP_KETRMAX */
2033        {        {
       if (*prev >= OP_SBRA) md->match_function_type = MATCH_CBEGROUP;  
2034        RMATCH(eptr, prev, offset_top, md, eptrb, RM13);        RMATCH(eptr, prev, offset_top, md, eptrb, RM13);
2035        if (rrc == MATCH_ONCE && md->once_target == prev) rrc = MATCH_NOMATCH;        if (rrc == MATCH_ONCE && md->once_target == prev) rrc = MATCH_NOMATCH;
2036        if (rrc != MATCH_NOMATCH) RRETURN(rrc);        if (rrc != MATCH_NOMATCH) RRETURN(rrc);
# Line 2065  for (;;) Line 2087  for (;;)
2087    
2088      case OP_DOLLM:      case OP_DOLLM:
2089      if (eptr < md->end_subject)      if (eptr < md->end_subject)
2090        {        {
2091        if (!IS_NEWLINE(eptr))        if (!IS_NEWLINE(eptr))
2092          {          {
2093          if (md->partial != 0 &&          if (md->partial != 0 &&
2094              eptr + 1 >= md->end_subject &&              eptr + 1 >= md->end_subject &&
2095              NLBLOCK->nltype == NLTYPE_FIXED &&              NLBLOCK->nltype == NLTYPE_FIXED &&
2096              NLBLOCK->nllen == 2 &&              NLBLOCK->nllen == 2 &&
2097              *eptr == NLBLOCK->nl[0])              *eptr == NLBLOCK->nl[0])
2098            {            {
2099            md->hitend = TRUE;            md->hitend = TRUE;
2100            if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);            if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);
2101            }            }
2102          RRETURN(MATCH_NOMATCH);          RRETURN(MATCH_NOMATCH);
2103          }          }
2104        }        }
2105      else      else
2106        {        {
# Line 2115  for (;;) Line 2137  for (;;)
2137        if (md->partial != 0 &&        if (md->partial != 0 &&
2138            eptr + 1 >= md->end_subject &&            eptr + 1 >= md->end_subject &&
2139            NLBLOCK->nltype == NLTYPE_FIXED &&            NLBLOCK->nltype == NLTYPE_FIXED &&
2140            NLBLOCK->nllen == 2 &&            NLBLOCK->nllen == 2 &&
2141            *eptr == NLBLOCK->nl[0])            *eptr == NLBLOCK->nl[0])
2142          {          {
2143          md->hitend = TRUE;          md->hitend = TRUE;
2144          if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);          if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);
2145          }          }
2146        RRETURN(MATCH_NOMATCH);        RRETURN(MATCH_NOMATCH);
2147        }        }
2148    
2149      /* Either at end of string or \n before end. */      /* Either at end of string or \n before end. */
2150    
# Line 2258  for (;;) Line 2280  for (;;)
2280      if (md->partial != 0 &&      if (md->partial != 0 &&
2281          eptr + 1 >= md->end_subject &&          eptr + 1 >= md->end_subject &&
2282          NLBLOCK->nltype == NLTYPE_FIXED &&          NLBLOCK->nltype == NLTYPE_FIXED &&
2283          NLBLOCK->nllen == 2 &&          NLBLOCK->nllen == 2 &&
2284          *eptr == NLBLOCK->nl[0])          *eptr == NLBLOCK->nl[0])
2285        {        {
2286        md->hitend = TRUE;        md->hitend = TRUE;
2287        if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);        if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);
2288        }        }
2289    
2290      /* Fall through */      /* Fall through */
2291    
2292      /* Match any single character whatsoever. */      /* Match any single character whatsoever. */
2293    
2294      case OP_ALLANY:      case OP_ALLANY:
2295      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 */
2296        {                            /* not be updated before SCHECK_PARTIAL. */        {                            /* not be updated before SCHECK_PARTIAL. */
# Line 2408  for (;;) Line 2430  for (;;)
2430        {        {
2431        default: RRETURN(MATCH_NOMATCH);        default: RRETURN(MATCH_NOMATCH);
2432    
2433        case 0x000d:        case CHAR_CR:
2434        if (eptr >= md->end_subject)        if (eptr >= md->end_subject)
2435          {          {
2436          SCHECK_PARTIAL();          SCHECK_PARTIAL();
2437          }          }
2438        else if (*eptr == 0x0a) eptr++;        else if (*eptr == CHAR_LF) eptr++;
2439        break;        break;
2440    
2441        case 0x000a:        case CHAR_LF:
2442        break;        break;
2443    
2444        case 0x000b:        case CHAR_VT:
2445        case 0x000c:        case CHAR_FF:
2446        case 0x0085:        case CHAR_NEL:
2447    #ifndef EBCDIC
2448        case 0x2028:        case 0x2028:
2449        case 0x2029:        case 0x2029:
2450    #endif  /* Not EBCDIC */
2451        if (md->bsr_anycrlf) RRETURN(MATCH_NOMATCH);        if (md->bsr_anycrlf) RRETURN(MATCH_NOMATCH);
2452        break;        break;
2453        }        }
# Line 2439  for (;;) Line 2463  for (;;)
2463      GETCHARINCTEST(c, eptr);      GETCHARINCTEST(c, eptr);
2464      switch(c)      switch(c)
2465        {        {
2466          HSPACE_CASES: RRETURN(MATCH_NOMATCH);  /* Byte and multibyte cases */
2467        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);  
2468        }        }
2469      ecode++;      ecode++;
2470      break;      break;
# Line 2473  for (;;) Line 2478  for (;;)
2478      GETCHARINCTEST(c, eptr);      GETCHARINCTEST(c, eptr);
2479      switch(c)      switch(c)
2480        {        {
2481          HSPACE_CASES: break;  /* Byte and multibyte cases */
2482        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;  
2483        }        }
2484      ecode++;      ecode++;
2485      break;      break;
# Line 2507  for (;;) Line 2493  for (;;)
2493      GETCHARINCTEST(c, eptr);      GETCHARINCTEST(c, eptr);
2494      switch(c)      switch(c)
2495        {        {
2496          VSPACE_CASES: RRETURN(MATCH_NOMATCH);
2497        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);  
2498        }        }
2499      ecode++;      ecode++;
2500      break;      break;
# Line 2529  for (;;) Line 2508  for (;;)
2508      GETCHARINCTEST(c, eptr);      GETCHARINCTEST(c, eptr);
2509      switch(c)      switch(c)
2510        {        {
2511          VSPACE_CASES: break;
2512        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;  
2513        }        }
2514      ecode++;      ecode++;
2515      break;      break;
# Line 2555  for (;;) Line 2527  for (;;)
2527        }        }
2528      GETCHARINCTEST(c, eptr);      GETCHARINCTEST(c, eptr);
2529        {        {
2530          const pcre_uint32 *cp;
2531        const ucd_record *prop = GET_UCD(c);        const ucd_record *prop = GET_UCD(c);
2532    
2533        switch(ecode[1])        switch(ecode[1])
# Line 2615  for (;;) Line 2588  for (;;)
2588            RRETURN(MATCH_NOMATCH);            RRETURN(MATCH_NOMATCH);
2589          break;          break;
2590    
2591            case PT_CLIST:
2592            cp = PRIV(ucd_caseless_sets) + prop->caseset;
2593            for (;;)
2594              {
2595              if (c < *cp)
2596                { if (op == OP_PROP) { RRETURN(MATCH_NOMATCH); } else break; }
2597              if (c == *cp++)
2598                { if (op == OP_PROP) break; else { RRETURN(MATCH_NOMATCH); } }
2599              }
2600            break;
2601    
2602          /* This should never occur */          /* This should never occur */
2603    
2604          default:          default:
# Line 2634  for (;;) Line 2618  for (;;)
2618        SCHECK_PARTIAL();        SCHECK_PARTIAL();
2619        RRETURN(MATCH_NOMATCH);        RRETURN(MATCH_NOMATCH);
2620        }        }
2621      GETCHARINCTEST(c, eptr);      else
     if (UCD_CATEGORY(c) == ucp_M) RRETURN(MATCH_NOMATCH);  
     while (eptr < md->end_subject)  
2622        {        {
2623        int len = 1;        int lgb, rgb;
2624        if (!utf) c = *eptr; else { GETCHARLEN(c, eptr, len); }        GETCHARINCTEST(c, eptr);
2625        if (UCD_CATEGORY(c) != ucp_M) break;        lgb = UCD_GRAPHBREAK(c);
2626        eptr += len;        while (eptr < md->end_subject)
2627            {
2628            int len = 1;
2629            if (!utf) c = *eptr; else { GETCHARLEN(c, eptr, len); }
2630            rgb = UCD_GRAPHBREAK(c);
2631            if ((PRIV(ucp_gbtable)[lgb] & (1 << rgb)) == 0) break;
2632            lgb = rgb;
2633            eptr += len;
2634            }
2635        }        }
2636      CHECK_PARTIAL();      CHECK_PARTIAL();
2637      ecode++;      ecode++;
2638      break;      break;
2639  #endif  #endif  /* SUPPORT_UCP */
2640    
2641    
2642      /* 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 2699  for (;;)
2699        default:               /* No repeat follows */        default:               /* No repeat follows */
2700        if ((length = match_ref(offset, eptr, length, md, caseless)) < 0)        if ((length = match_ref(offset, eptr, length, md, caseless)) < 0)
2701          {          {
2702          if (length == -2) eptr = md->end_subject;   /* Partial match */          if (length == -2) eptr = md->end_subject;   /* Partial match */
2703          CHECK_PARTIAL();          CHECK_PARTIAL();
2704          RRETURN(MATCH_NOMATCH);          RRETURN(MATCH_NOMATCH);
2705          }          }
# Line 2735  for (;;) Line 2725  for (;;)
2725        int slength;        int slength;
2726        if ((slength = match_ref(offset, eptr, length, md, caseless)) < 0)        if ((slength = match_ref(offset, eptr, length, md, caseless)) < 0)
2727          {          {
2728          if (slength == -2) eptr = md->end_subject;   /* Partial match */          if (slength == -2) eptr = md->end_subject;   /* Partial match */
2729          CHECK_PARTIAL();          CHECK_PARTIAL();
2730          RRETURN(MATCH_NOMATCH);          RRETURN(MATCH_NOMATCH);
2731          }          }
# Line 2759  for (;;) Line 2749  for (;;)
2749          if (fi >= max) RRETURN(MATCH_NOMATCH);          if (fi >= max) RRETURN(MATCH_NOMATCH);
2750          if ((slength = match_ref(offset, eptr, length, md, caseless)) < 0)          if ((slength = match_ref(offset, eptr, length, md, caseless)) < 0)
2751            {            {
2752            if (slength == -2) eptr = md->end_subject;   /* Partial match */            if (slength == -2) eptr = md->end_subject;   /* Partial match */
2753            CHECK_PARTIAL();            CHECK_PARTIAL();
2754            RRETURN(MATCH_NOMATCH);            RRETURN(MATCH_NOMATCH);
2755            }            }
# Line 2778  for (;;) Line 2768  for (;;)
2768          int slength;          int slength;
2769          if ((slength = match_ref(offset, eptr, length, md, caseless)) < 0)          if ((slength = match_ref(offset, eptr, length, md, caseless)) < 0)
2770            {            {
2771            /* 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
2772            the soft partial matching case. */            the soft partial matching case. */
2773    
2774            if (slength == -2 && md->partial != 0 &&            if (slength == -2 && md->partial != 0 &&
2775                md->end_subject > md->start_used_ptr)                md->end_subject > md->start_used_ptr)
2776              {              {
2777              md->hitend = TRUE;              md->hitend = TRUE;
2778              if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);              if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);
2779              }              }
# Line 2791  for (;;) Line 2781  for (;;)
2781            }            }
2782          eptr += slength;          eptr += slength;
2783          }          }
2784    
2785        while (eptr >= pp)        while (eptr >= pp)
2786          {          {
2787          RMATCH(eptr, ecode, offset_top, md, eptrb, RM15);          RMATCH(eptr, ecode, offset_top, md, eptrb, RM15);
# Line 3207  for (;;) Line 3197  for (;;)
3197    
3198        else        else
3199          {          {
3200          unsigned int dc;          pcre_uint32 dc;
3201          GETCHARINC(dc, eptr);          GETCHARINC(dc, eptr);
3202          ecode += length;          ecode += length;
3203    
# Line 3421  for (;;) Line 3411  for (;;)
3411      maximizing, find the maximum number of characters and work backwards. */      maximizing, find the maximum number of characters and work backwards. */
3412    
3413      DPRINTF(("matching %c{%d,%d} against subject %.*s\n", fc, min, max,      DPRINTF(("matching %c{%d,%d} against subject %.*s\n", fc, min, max,
3414        max, eptr));        max, (char *)eptr));
3415    
3416      if (op >= OP_STARI)  /* Caseless */      if (op >= OP_STARI)  /* Caseless */
3417        {        {
# Line 3568  for (;;) Line 3558  for (;;)
3558  #ifdef SUPPORT_UTF  #ifdef SUPPORT_UTF
3559      if (utf)      if (utf)
3560        {        {
3561        register unsigned int ch, och;        register pcre_uint32 ch, och;
3562    
3563        ecode++;        ecode++;
3564        GETCHARINC(ch, ecode);        GETCHARINC(ch, ecode);
# Line 3595  for (;;) Line 3585  for (;;)
3585      else      else
3586  #endif  #endif
3587        {        {
3588        register unsigned int ch = ecode[1];        register pcre_uint32 ch = ecode[1];
3589        c = *eptr++;        c = *eptr++;
3590        if (ch == c || (op == OP_NOTI && TABLE_GET(ch, md->fcc, ch) == c))        if (ch == c || (op == OP_NOTI && TABLE_GET(ch, md->fcc, ch) == c))
3591          RRETURN(MATCH_NOMATCH);          RRETURN(MATCH_NOMATCH);
# Line 3690  for (;;) Line 3680  for (;;)
3680      characters and work backwards. */      characters and work backwards. */
3681    
3682      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,
3683        max, eptr));        max, (char *)eptr));
3684    
3685      if (op >= OP_NOTSTARI)     /* Caseless */      if (op >= OP_NOTSTARI)     /* Caseless */
3686        {        {
# Line 4199  for (;;) Line 4189  for (;;)
4189                RRETURN(MATCH_NOMATCH);                RRETURN(MATCH_NOMATCH);
4190              }              }
4191            break;            break;
4192    
4193              case PT_CLIST:
4194              for (i = 1; i <= min; i++)
4195                {
4196                const pcre_uint32 *cp;
4197                if (eptr >= md->end_subject)
4198                  {
4199                  SCHECK_PARTIAL();
4200                  RRETURN(MATCH_NOMATCH);
4201                  }
4202                GETCHARINCTEST(c, eptr);
4203                cp = PRIV(ucd_caseless_sets) + UCD_CASESET(c);
4204                for (;;)
4205                  {
4206                  if (c < *cp)
4207                    { if (prop_fail_result) break; else { RRETURN(MATCH_NOMATCH); } }
4208                  if (c == *cp++)
4209                    { if (prop_fail_result) { RRETURN(MATCH_NOMATCH); } else break; }
4210                  }
4211                }
4212              break;
4213    
4214            /* This should not occur */            /* This should not occur */
4215    
4216            default:            default:
# Line 4219  for (;;) Line 4230  for (;;)
4230              SCHECK_PARTIAL();              SCHECK_PARTIAL();
4231              RRETURN(MATCH_NOMATCH);              RRETURN(MATCH_NOMATCH);
4232              }              }
4233            GETCHARINCTEST(c, eptr);            else
           if (UCD_CATEGORY(c) == ucp_M) RRETURN(MATCH_NOMATCH);  
           while (eptr < md->end_subject)  
4234              {              {
4235              int len = 1;              int lgb, rgb;
4236              if (!utf) c = *eptr; else { GETCHARLEN(c, eptr, len); }              GETCHARINCTEST(c, eptr);
4237              if (UCD_CATEGORY(c) != ucp_M) break;              lgb = UCD_GRAPHBREAK(c);
4238              eptr += len;             while (eptr < md->end_subject)
4239                  {
4240                  int len = 1;
4241                  if (!utf) c = *eptr; else { GETCHARLEN(c, eptr, len); }
4242                  rgb = UCD_GRAPHBREAK(c);
4243                  if ((PRIV(ucp_gbtable)[lgb] & (1 << rgb)) == 0) break;
4244                  lgb = rgb;
4245                  eptr += len;
4246                  }
4247              }              }
4248            CHECK_PARTIAL();            CHECK_PARTIAL();
4249            }            }
4250          }          }
4251    
# Line 4252  for (;;) Line 4269  for (;;)
4269            if (md->partial != 0 &&            if (md->partial != 0 &&
4270                eptr + 1 >= md->end_subject &&                eptr + 1 >= md->end_subject &&
4271                NLBLOCK->nltype == NLTYPE_FIXED &&                NLBLOCK->nltype == NLTYPE_FIXED &&
4272                NLBLOCK->nllen == 2 &&                NLBLOCK->nllen == 2 &&
4273                *eptr == NLBLOCK->nl[0])                *eptr == NLBLOCK->nl[0])
4274              {              {
4275              md->hitend = TRUE;              md->hitend = TRUE;
4276              if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);              if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);
4277              }              }
# Line 4294  for (;;) Line 4311  for (;;)
4311              {              {
4312              default: RRETURN(MATCH_NOMATCH);              default: RRETURN(MATCH_NOMATCH);
4313    
4314              case 0x000d:              case CHAR_CR:
4315              if (eptr < md->end_subject && *eptr == 0x0a) eptr++;              if (eptr < md->end_subject && *eptr == CHAR_LF) eptr++;
4316              break;              break;
4317    
4318              case 0x000a:              case CHAR_LF:
4319              break;              break;
4320    
4321              case 0x000b:              case CHAR_VT:
4322              case 0x000c:              case CHAR_FF:
4323              case 0x0085:              case CHAR_NEL:
4324    #ifndef EBCDIC
4325              case 0x2028:              case 0x2028:
4326              case 0x2029:              case 0x2029:
4327    #endif  /* Not EBCDIC */
4328              if (md->bsr_anycrlf) RRETURN(MATCH_NOMATCH);              if (md->bsr_anycrlf) RRETURN(MATCH_NOMATCH);
4329              break;              break;
4330              }              }
# Line 4323  for (;;) Line 4342  for (;;)
4342            GETCHARINC(c, eptr);            GETCHARINC(c, eptr);
4343            switch(c)            switch(c)
4344              {              {
4345                HSPACE_CASES: RRETURN(MATCH_NOMATCH);  /* Byte and multibyte cases */
4346              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);  
4347              }              }
4348            }            }
4349          break;          break;
# Line 4359  for (;;) Line 4359  for (;;)
4359            GETCHARINC(c, eptr);            GETCHARINC(c, eptr);
4360            switch(c)            switch(c)
4361              {              {
4362                HSPACE_CASES: break;  /* Byte and multibyte cases */
4363              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;  
4364              }              }
4365            }            }
4366          break;          break;
# Line 4395  for (;;) Line 4376  for (;;)
4376            GETCHARINC(c, eptr);            GETCHARINC(c, eptr);
4377            switch(c)            switch(c)
4378              {              {
4379                VSPACE_CASES: RRETURN(MATCH_NOMATCH);
4380              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);  
4381              }              }
4382            }            }
4383          break;          break;
# Line 4419  for (;;) Line 4393  for (;;)
4393            GETCHARINC(c, eptr);            GETCHARINC(c, eptr);
4394            switch(c)            switch(c)
4395              {              {
4396                VSPACE_CASES: break;
4397              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;  
4398              }              }
4399            }            }
4400          break;          break;
# Line 4545  for (;;) Line 4512  for (;;)
4512            if (md->partial != 0 &&            if (md->partial != 0 &&
4513                eptr + 1 >= md->end_subject &&                eptr + 1 >= md->end_subject &&
4514                NLBLOCK->nltype == NLTYPE_FIXED &&                NLBLOCK->nltype == NLTYPE_FIXED &&
4515                NLBLOCK->nllen == 2 &&                NLBLOCK->nllen == 2 &&
4516                *eptr == NLBLOCK->nl[0])                *eptr == NLBLOCK->nl[0])
4517              {              {
4518              md->hitend = TRUE;              md->hitend = TRUE;
4519              if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);              if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);
4520              }              }
# Line 4585  for (;;) Line 4552  for (;;)
4552              {              {
4553              default: RRETURN(MATCH_NOMATCH);              default: RRETURN(MATCH_NOMATCH);
4554    
4555              case 0x000d:              case CHAR_CR:
4556              if (eptr < md->end_subject && *eptr == 0x0a) eptr++;              if (eptr < md->end_subject && *eptr == CHAR_LF) eptr++;
4557              break;              break;
4558    
4559              case 0x000a:              case CHAR_LF:
4560              break;              break;
4561    
4562              case 0x000b:              case CHAR_VT:
4563              case 0x000c:              case CHAR_FF:
4564              case 0x0085:              case CHAR_NEL:
4565  #ifdef COMPILE_PCRE16  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
4566              case 0x2028:              case 0x2028:
4567              case 0x2029:              case 0x2029:
4568  #endif  #endif
# Line 4616  for (;;) Line 4583  for (;;)
4583            switch(*eptr++)            switch(*eptr++)
4584              {              {
4585              default: break;              default: break;
4586              case 0x09:      /* HT */              HSPACE_BYTE_CASES:
4587              case 0x20:      /* SPACE */  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
4588              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 */  
4589  #endif  #endif
4590              RRETURN(MATCH_NOMATCH);              RRETURN(MATCH_NOMATCH);
4591              }              }
# Line 4653  for (;;) Line 4603  for (;;)
4603            switch(*eptr++)            switch(*eptr++)
4604              {              {
4605              default: RRETURN(MATCH_NOMATCH);              default: RRETURN(MATCH_NOMATCH);
4606              case 0x09:      /* HT */              HSPACE_BYTE_CASES:
4607              case 0x20:      /* SPACE */  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
4608              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 */  
4609  #endif  #endif
4610              break;              break;
4611              }              }
# Line 4689  for (;;) Line 4622  for (;;)
4622              }              }
4623            switch(*eptr++)            switch(*eptr++)
4624              {              {
4625              default: break;              VSPACE_BYTE_CASES:
4626              case 0x0a:      /* LF */  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
4627              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 */  
4628  #endif  #endif
4629              RRETURN(MATCH_NOMATCH);              RRETURN(MATCH_NOMATCH);
4630                default: break;
4631              }              }
4632            }            }
4633          break;          break;
# Line 4715  for (;;) Line 4643  for (;;)
4643            switch(*eptr++)            switch(*eptr++)
4644              {              {
4645              default: RRETURN(MATCH_NOMATCH);              default: RRETURN(MATCH_NOMATCH);
4646              case 0x0a:      /* LF */              VSPACE_BYTE_CASES:
4647              case 0x0b:      /* VT */  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
4648              case 0x0c:      /* FF */              VSPACE_MULTIBYTE_CASES:
             case 0x0d:      /* CR */  
             case 0x85:      /* NEL */  
 #ifdef COMPILE_PCRE16  
             case 0x2028:    /* LINE SEPARATOR */  
             case 0x2029:    /* PARAGRAPH SEPARATOR */  
4649  #endif  #endif
4650              break;              break;
4651              }              }
# Line 5000  for (;;) Line 4923  for (;;)
4923              }              }
4924            /* Control never gets here */            /* Control never gets here */
4925    
4926            /* This should never occur */            case PT_CLIST:
4927              for (fi = min;; fi++)
4928                {
4929                const pcre_uint32 *cp;
4930                RMATCH(eptr, ecode, offset_top, md, eptrb, RM62);
4931                if (rrc != MATCH_NOMATCH) RRETURN(rrc);
4932                if (fi >= max) RRETURN(MATCH_NOMATCH);
4933                if (eptr >= md->end_subject)
4934                  {
4935                  SCHECK_PARTIAL();
4936                  RRETURN(MATCH_NOMATCH);
4937                  }
4938                GETCHARINCTEST(c, eptr);
4939                cp = PRIV(ucd_caseless_sets) + UCD_CASESET(c);
4940                for (;;)
4941                  {
4942                  if (c < *cp)
4943                    { if (prop_fail_result) break; else { RRETURN(MATCH_NOMATCH); } }
4944                  if (c == *cp++)
4945                    { if (prop_fail_result) { RRETURN(MATCH_NOMATCH); } else break; }
4946                  }
4947                }
4948              /* Control never gets here */
4949    
4950              /* This should never occur */
4951            default:            default:
4952            RRETURN(PCRE_ERROR_INTERNAL);            RRETURN(PCRE_ERROR_INTERNAL);
4953            }            }
# Line 5022  for (;;) Line 4968  for (;;)
4968              SCHECK_PARTIAL();              SCHECK_PARTIAL();
4969              RRETURN(MATCH_NOMATCH);              RRETURN(MATCH_NOMATCH);
4970              }              }
4971            GETCHARINCTEST(c, eptr);            else
           if (UCD_CATEGORY(c) == ucp_M) RRETURN(MATCH_NOMATCH);  
           while (eptr < md->end_subject)  
4972              {              {
4973              int len = 1;              int lgb, rgb;
4974              if (!utf) c = *eptr; else { GETCHARLEN(c, eptr, len); }              GETCHARINCTEST(c, eptr);
4975              if (UCD_CATEGORY(c) != ucp_M) break;              lgb = UCD_GRAPHBREAK(c);
4976              eptr += len;              while (eptr < md->end_subject)
4977                  {
4978                  int len = 1;
4979                  if (!utf) c = *eptr; else { GETCHARLEN(c, eptr, len); }
4980                  rgb = UCD_GRAPHBREAK(c);
4981                  if ((PRIV(ucp_gbtable)[lgb] & (1 << rgb)) == 0) break;
4982                  lgb = rgb;
4983                  eptr += len;
4984                  }
4985              }              }
4986            CHECK_PARTIAL();            CHECK_PARTIAL();
4987            }            }
4988          }          }
4989        else        else
# Line 5059  for (;;) Line 5011  for (;;)
5011              if (md->partial != 0 &&    /* Take care with CRLF partial */              if (md->partial != 0 &&    /* Take care with CRLF partial */
5012                  eptr >= md->end_subject &&                  eptr >= md->end_subject &&
5013                  NLBLOCK->nltype == NLTYPE_FIXED &&                  NLBLOCK->nltype == NLTYPE_FIXED &&
5014                  NLBLOCK->nllen == 2 &&                  NLBLOCK->nllen == 2 &&
5015                  c == NLBLOCK->nl[0])                  c == NLBLOCK->nl[0])
5016                {                {
5017                md->hitend = TRUE;                md->hitend = TRUE;
5018                if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);                if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);
5019                }                }
5020              break;              break;
5021    
5022              case OP_ALLANY:              case OP_ALLANY:
5023              case OP_ANYBYTE:              case OP_ANYBYTE:
5024              break;              break;
# Line 5075  for (;;) Line 5027  for (;;)
5027              switch(c)              switch(c)
5028                {                {
5029                default: RRETURN(MATCH_NOMATCH);                default: RRETURN(MATCH_NOMATCH);
5030                case 0x000d:                case CHAR_CR:
5031                if (eptr < md->end_subject && *eptr == 0x0a) eptr++;                if (eptr < md->end_subject && *eptr == CHAR_LF) eptr++;
5032                break;                break;
5033                case 0x000a:  
5034                  case CHAR_LF:
5035                break;                break;
5036    
5037                case 0x000b:                case CHAR_VT:
5038                case 0x000c:                case CHAR_FF:
5039                case 0x0085:                case CHAR_NEL:
5040    #ifndef EBCDIC
5041                case 0x2028:                case 0x2028:
5042                case 0x2029:                case 0x2029:
5043    #endif  /* Not EBCDIC */
5044                if (md->bsr_anycrlf) RRETURN(MATCH_NOMATCH);                if (md->bsr_anycrlf) RRETURN(MATCH_NOMATCH);
5045                break;                break;
5046                }                }
# Line 5094  for (;;) Line 5049  for (;;)
5049              case OP_NOT_HSPACE:              case OP_NOT_HSPACE:
5050              switch(c)              switch(c)
5051                {                {
5052                  HSPACE_CASES: RRETURN(MATCH_NOMATCH);
5053                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);  
5054                }                }
5055              break;              break;
5056    
5057              case OP_HSPACE:              case OP_HSPACE:
5058              switch(c)              switch(c)
5059                {                {
5060                  HSPACE_CASES: break;
5061                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;  
5062                }                }
5063              break;              break;
5064    
5065              case OP_NOT_VSPACE:              case OP_NOT_VSPACE:
5066              switch(c)              switch(c)
5067                {                {
5068                  VSPACE_CASES: RRETURN(MATCH_NOMATCH);
5069                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);  
5070                }                }
5071              break;              break;
5072    
5073              case OP_VSPACE:              case OP_VSPACE:
5074              switch(c)              switch(c)
5075                {                {
5076                  VSPACE_CASES: break;
5077                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;  
5078                }                }
5079              break;              break;
5080    
# Line 5233  for (;;) Line 5136  for (;;)
5136              if (md->partial != 0 &&    /* Take care with CRLF partial */              if (md->partial != 0 &&    /* Take care with CRLF partial */
5137                  eptr >= md->end_subject &&                  eptr >= md->end_subject &&
5138                  NLBLOCK->nltype == NLTYPE_FIXED &&                  NLBLOCK->nltype == NLTYPE_FIXED &&
5139                  NLBLOCK->nllen == 2 &&                  NLBLOCK->nllen == 2 &&
5140                  c == NLBLOCK->nl[0])                  c == NLBLOCK->nl[0])
5141                {                {
5142                md->hitend = TRUE;                md->hitend = TRUE;
5143                if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);                if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);
5144                }                }
5145              break;              break;
5146    
5147              case OP_ALLANY:              case OP_ALLANY:
5148              case OP_ANYBYTE:              case OP_ANYBYTE:
5149              break;              break;
# Line 5249  for (;;) Line 5152  for (;;)
5152              switch(c)              switch(c)
5153                {                {
5154                default: RRETURN(MATCH_NOMATCH);                default: RRETURN(MATCH_NOMATCH);
5155                case 0x000d:                case CHAR_CR:
5156                if (eptr < md->end_subject && *eptr == 0x0a) eptr++;                if (eptr < md->end_subject && *eptr == CHAR_LF) eptr++;
5157                break;                break;
5158    
5159                case 0x000a:                case CHAR_LF:
5160                break;                break;
5161    
5162                case 0x000b:                case CHAR_VT:
5163                case 0x000c:                case CHAR_FF:
5164                case 0x0085:                case CHAR_NEL:
5165  #ifdef COMPILE_PCRE16  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
5166                case 0x2028:                case 0x2028:
5167                case 0x2029:                case 0x2029:
5168  #endif  #endif
# Line 5272  for (;;) Line 5175  for (;;)
5175              switch(c)              switch(c)
5176                {                {
5177                default: break;                default: break;
5178                case 0x09:      /* HT */                HSPACE_BYTE_CASES:
5179                case 0x20:      /* SPACE */  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
5180                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 */  
5181  #endif  #endif
5182                RRETURN(MATCH_NOMATCH);                RRETURN(MATCH_NOMATCH);
5183                }                }
# Line 5301  for (;;) Line 5187  for (;;)
5187              switch(c)              switch(c)
5188                {                {
5189                default: RRETURN(MATCH_NOMATCH);                default: RRETURN(MATCH_NOMATCH);
5190                case 0x09:      /* HT */                HSPACE_BYTE_CASES:
5191                case 0x20:      /* SPACE */  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
5192                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 */  
5193  #endif  #endif
5194                break;                break;
5195                }                }
# Line 5330  for (;;) Line 5199  for (;;)
5199              switch(c)              switch(c)
5200                {                {
5201                default: break;                default: break;
5202                case 0x0a:      /* LF */                VSPACE_BYTE_CASES:
5203                case 0x0b:      /* VT */  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
5204                case 0x0c:      /* FF */                VSPACE_MULTIBYTE_CASES:
               case 0x0d:      /* CR */  
               case 0x85:      /* NEL */  
 #ifdef COMPILE_PCRE16  
               case 0x2028:    /* LINE SEPARATOR */  
               case 0x2029:    /* PARAGRAPH SEPARATOR */  
5205  #endif  #endif
5206                RRETURN(MATCH_NOMATCH);                RRETURN(MATCH_NOMATCH);
5207                }                }
# Line 5347  for (;;) Line 5211  for (;;)
5211              switch(c)              switch(c)
5212                {                {
5213                default: RRETURN(MATCH_NOMATCH);                default: RRETURN(MATCH_NOMATCH);
5214                case 0x0a:      /* LF */                VSPACE_BYTE_CASES:
5215                case 0x0b:      /* VT */  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
5216                case 0x0c:      /* FF */                VSPACE_MULTIBYTE_CASES:
               case 0x0d:      /* CR */  
               case 0x85:      /* NEL */  
 #ifdef COMPILE_PCRE16  
               case 0x2028:    /* LINE SEPARATOR */  
               case 0x2029:    /* PARAGRAPH SEPARATOR */  
5217  #endif  #endif
5218                break;                break;
5219                }                }
# Line 5557  for (;;) Line 5416  for (;;)
5416              eptr+= len;              eptr+= len;
5417              }              }
5418            break;            break;
5419    
5420              case PT_CLIST:
5421              for (i = min; i < max; i++)
5422                {
5423                const pcre_uint32 *cp;
5424                int len = 1;
5425                if (eptr >= md->end_subject)
5426                  {
5427                  SCHECK_PARTIAL();
5428                  break;
5429                  }
5430                GETCHARLENTEST(c, eptr, len);
5431                cp = PRIV(ucd_caseless_sets) + UCD_CASESET(c);
5432                for (;;)
5433                  {
5434                  if (c < *cp)
5435                    { if (prop_fail_result) break; else goto GOT_MAX; }
5436                  if (c == *cp++)
5437                    { if (prop_fail_result) goto GOT_MAX; else break; }
5438                  }
5439                eptr += len;
5440                }
5441              GOT_MAX:
5442              break;
5443    
5444            default:            default:
5445            RRETURN(PCRE_ERROR_INTERNAL);            RRETURN(PCRE_ERROR_INTERNAL);
# Line 5581  for (;;) Line 5464  for (;;)
5464          {          {
5465          for (i = min; i < max; i++)          for (i = min; i < max; i++)
5466            {            {
           int len = 1;  
5467            if (eptr >= md->end_subject)            if (eptr >= md->end_subject)
5468              {              {
5469              SCHECK_PARTIAL();              SCHECK_PARTIAL();
5470              break;              break;
5471              }              }
5472            if (!utf) c = *eptr; else { GETCHARLEN(c, eptr, len); }            else
           if (UCD_CATEGORY(c) == ucp_M) break;  
           eptr += len;  
           while (eptr < md->end_subject)  
5473              {              {
5474              len = 1;              int lgb, rgb;
5475              if (!utf) c = *eptr; else { GETCHARLEN(c, eptr, len); }              GETCHARINCTEST(c, eptr);
5476              if (UCD_CATEGORY(c) != ucp_M) break;              lgb = UCD_GRAPHBREAK(c);
5477              eptr += len;              while (eptr < md->end_subject)
5478                  {
5479                  int len = 1;
5480                  if (!utf) c = *eptr; else { GETCHARLEN(c, eptr, len); }
5481                  rgb = UCD_GRAPHBREAK(c);
5482                  if ((PRIV(ucp_gbtable)[lgb] & (1 << rgb)) == 0) break;
5483                  lgb = rgb;
5484                  eptr += len;
5485                  }
5486              }              }
5487            CHECK_PARTIAL();            CHECK_PARTIAL();
5488            }            }
5489    
5490          /* eptr is now past the end of the maximum run */          /* eptr is now past the end of the maximum run */
# Line 5644  for (;;) Line 5531  for (;;)
5531                if (md->partial != 0 &&    /* Take care with CRLF partial */                if (md->partial != 0 &&    /* Take care with CRLF partial */
5532                    eptr + 1 >= md->end_subject &&                    eptr + 1 >= md->end_subject &&
5533                    NLBLOCK->nltype == NLTYPE_FIXED &&                    NLBLOCK->nltype == NLTYPE_FIXED &&
5534                    NLBLOCK->nllen == 2 &&                    NLBLOCK->nllen == 2 &&
5535                    *eptr == NLBLOCK->nl[0])                    *eptr == NLBLOCK->nl[0])
5536                  {                  {
5537                  md->hitend = TRUE;                  md->hitend = TRUE;
5538                  if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);                  if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);
5539                  }                  }
# Line 5670  for (;;) Line 5557  for (;;)
5557                if (md->partial != 0 &&    /* Take care with CRLF partial */                if (md->partial != 0 &&    /* Take care with CRLF partial */
5558                    eptr + 1 >= md->end_subject &&                    eptr + 1 >= md->end_subject &&
5559                    NLBLOCK->nltype == NLTYPE_FIXED &&                    NLBLOCK->nltype == NLTYPE_FIXED &&
5560                    NLBLOCK->nllen == 2 &&                    NLBLOCK->nllen == 2 &&
5561                    *eptr == NLBLOCK->nl[0])                    *eptr == NLBLOCK->nl[0])
5562                  {                  {
5563                  md->hitend = TRUE;                  md->hitend = TRUE;
5564                  if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);                  if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);
5565                  }                  }
# Line 5725  for (;;) Line 5612  for (;;)
5612                break;                break;
5613                }                }
5614              GETCHARLEN(c, eptr, len);              GETCHARLEN(c, eptr, len);
5615              if (c == 0x000d)              if (c == CHAR_CR)
5616                {                {
5617                if (++eptr >= md->end_subject) break;                if (++eptr >= md->end_subject) break;
5618                if (*eptr == 0x000a) eptr++;                if (*eptr == CHAR_LF) eptr++;
5619                }                }
5620              else              else
5621                {                {
5622                if (c != 0x000a &&                if (c != CHAR_LF &&
5623                    (md->bsr_anycrlf ||                    (md->bsr_anycrlf ||
5624                     (c != 0x000b && c != 0x000c &&                     (c != CHAR_VT && c != CHAR_FF && c != CHAR_NEL
5625                      c != 0x0085 && c != 0x2028 && c != 0x2029)))  #ifndef EBCDIC
5626                        && c != 0x2028 && c != 0x2029
5627    #endif  /* Not EBCDIC */
5628                        )))
5629                  break;                  break;
5630                eptr += len;                eptr += len;
5631                }                }
# Line 5756  for (;;) Line 5646  for (;;)
5646              GETCHARLEN(c, eptr, len);              GETCHARLEN(c, eptr, len);
5647              switch(c)              switch(c)
5648                {                {
5649                  HSPACE_CASES: gotspace = TRUE; break;
5650                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;  
5651                }                }
5652              if (gotspace == (ctype == OP_NOT_HSPACE)) break;              if (gotspace == (ctype == OP_NOT_HSPACE)) break;
5653              eptr += len;              eptr += len;
# Line 5798  for (;;) Line 5668  for (;;)
5668              GETCHARLEN(c, eptr, len);              GETCHARLEN(c, eptr, len);
5669              switch(c)              switch(c)
5670                {                {
5671                  VSPACE_CASES: gotspace = TRUE; break;
5672                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;  
5673                }                }
5674              if (gotspace == (ctype == OP_NOT_VSPACE)) break;              if (gotspace == (ctype == OP_NOT_VSPACE)) break;
5675              eptr += len;              eptr += len;
# Line 5921  for (;;) Line 5783  for (;;)
5783            if (rrc != MATCH_NOMATCH) RRETURN(rrc);            if (rrc != MATCH_NOMATCH) RRETURN(rrc);
5784            if (eptr-- == pp) break;        /* Stop if tried at original pos */            if (eptr-- == pp) break;        /* Stop if tried at original pos */
5785            BACKCHAR(eptr);            BACKCHAR(eptr);
5786            if (ctype == OP_ANYNL && eptr > pp  && *eptr == '\n' &&            if (ctype == OP_ANYNL && eptr > pp  && *eptr == CHAR_NL &&
5787                eptr[-1] == '\r') eptr--;                eptr[-1] == CHAR_CR) eptr--;
5788            }            }
5789          }          }
5790        else        else
# Line 5943  for (;;) Line 5805  for (;;)
5805              if (md->partial != 0 &&    /* Take care with CRLF partial */              if (md->partial != 0 &&    /* Take care with CRLF partial */
5806                  eptr + 1 >= md->end_subject &&                  eptr + 1 >= md->end_subject &&
5807                  NLBLOCK->nltype == NLTYPE_FIXED &&                  NLBLOCK->nltype == NLTYPE_FIXED &&
5808                  NLBLOCK->nllen == 2 &&                  NLBLOCK->nllen == 2 &&
5809                  *eptr == NLBLOCK->nl[0])                  *eptr == NLBLOCK->nl[0])
5810                {                {
5811                md->hitend = TRUE;                md->hitend = TRUE;
5812                if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);                if (md->partial > 1) RRETURN(PCRE_ERROR_PARTIAL);
5813                }                }
# Line 5973  for (;;) Line 5835  for (;;)
5835                break;                break;
5836                }                }
5837              c = *eptr;              c = *eptr;
5838              if (c == 0x000d)              if (c == CHAR_CR)
5839                {                {
5840                if (++eptr >= md->end_subject) break;                if (++eptr >= md->end_subject) break;
5841                if (*eptr == 0x000a) eptr++;                if (*eptr == CHAR_LF) eptr++;
5842                }                }
5843              else              else
5844                {                {
5845                if (c != 0x000a && (md->bsr_anycrlf ||                if (c != CHAR_LF && (md->bsr_anycrlf ||
5846                  (c != 0x000b && c != 0x000c && c != 0x0085                   (c != CHAR_VT && c != CHAR_FF && c != CHAR_NEL
5847  #ifdef COMPILE_PCRE16  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
5848                  && c != 0x2028 && c != 0x2029                   && c != 0x2028 && c != 0x2029
5849  #endif  #endif
5850                  ))) break;                   ))) break;
5851                eptr++;                eptr++;
5852                }                }
5853              }              }
# Line 5999  for (;;) Line 5861  for (;;)
5861                SCHECK_PARTIAL();                SCHECK_PARTIAL();
5862                break;                break;
5863                }                }
5864              c = *eptr;              switch(*eptr)
5865              if (c == 0x09 || c == 0x20 || c == 0xa0                {
5866  #ifdef COMPILE_PCRE16                default: eptr++; break;
5867                || c == 0x1680 || c == 0x180e || (c >= 0x2000 && c <= 0x200A)                HSPACE_BYTE_CASES:
5868                || c == 0x202f || c == 0x205f || c == 0x3000  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
5869                  HSPACE_MULTIBYTE_CASES:
5870  #endif  #endif
5871                ) break;                goto ENDLOOP00;
5872              eptr++;                }
5873              }              }
5874              ENDLOOP00:
5875            break;            break;
5876    
5877            case OP_HSPACE:            case OP_HSPACE:
# Line 6018  for (;;) Line 5882  for (;;)
5882                SCHECK_PARTIAL();                SCHECK_PARTIAL();
5883                break;                break;
5884                }                }
5885              c = *eptr;              switch(*eptr)
5886              if (c != 0x09 && c != 0x20 && c != 0xa0                {
5887  #ifdef COMPILE_PCRE16                default: goto ENDLOOP01;
5888                && c != 0x1680 && c != 0x180e && (c < 0x2000 || c > 0x200A)                HSPACE_BYTE_CASES:
5889                && c != 0x202f && c != 0x205f && c != 0x3000  #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
5890                  HSPACE_MULTIBYTE_CASES:
5891  #endif  #endif
5892                ) break;                eptr++; break;
5893              eptr++;                }
5894              }              }
5895              ENDLOOP01:
5896            break;            break;
5897    
5898            case OP_NOT_VSPACE:            case OP_NOT_VSPACE:
# Line 6037  for (;;) Line 5903  for (;;)
5903                SCHECK_PARTIAL();                SCHECK_PARTIAL();
5904                break;                break;
5905                }                }
5906              c = *eptr;              switch(*eptr)
5907              if (c == 0x0a || c == 0x0b || c == 0x0c || c == 0x0d || c == 0x85                {
5908  #ifdef COMPILE_PCRE16                default: eptr++; break;
5909                || c == 0x2028 || c == 0x2029                VSPACE_BYTE_CASES:
5910    #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
5911                  VSPACE_MULTIBYTE_CASES:
5912  #endif  #endif
5913                ) break;                goto ENDLOOP02;
5914              eptr++;                }
5915              }              }
5916              ENDLOOP02:
5917            break;            break;
5918    
5919            case OP_VSPACE:            case OP_VSPACE:
# Line 6055  for (;;) Line 5924  for (;;)
5924                SCHECK_PARTIAL();                SCHECK_PARTIAL();
5925                break;                break;
5926                }                }
5927              c = *eptr;              switch(*eptr)
5928              if (c != 0x0a && c != 0x0b && c != 0x0c && c != 0x0d && c != 0x85                {
5929  #ifdef COMPILE_PCRE16                default: goto ENDLOOP03;
5930                && c != 0x2028 && c != 0x2029                VSPACE_BYTE_CASES:
5931    #if defined COMPILE_PCRE16 || defined COMPILE_PCRE32
5932                  VSPACE_MULTIBYTE_CASES:
5933  #endif  #endif
5934                ) break;                eptr++; break;
5935              eptr++;                }
5936              }              }
5937              ENDLOOP03:
5938            break;            break;
5939    
5940            case OP_NOT_DIGIT:            case OP_NOT_DIGIT:
# Line 6159  for (;;) Line 6031  for (;;)
6031            RMATCH(eptr, ecode, offset_top, md, eptrb, RM47);            RMATCH(eptr, ecode, offset_top, md, eptrb, RM47);
6032            if (rrc != MATCH_NOMATCH) RRETURN(rrc);            if (rrc != MATCH_NOMATCH) RRETURN(rrc);
6033            eptr--;            eptr--;
6034            if (ctype == OP_ANYNL && eptr > pp  && *eptr == '\n' &&            if (ctype == OP_ANYNL && eptr > pp  && *eptr == CHAR_LF &&
6035                eptr[-1] == '\r') eptr--;                eptr[-1] == CHAR_CR) eptr--;
6036            }            }
6037          }          }
6038    
# Line 6279  Undefine all the macros that were define Line 6151  Undefine all the macros that were define
6151  ***************************************************************************/  ***************************************************************************/
6152    
6153    
6154    #ifdef NO_RECURSE
6155    /*************************************************
6156    *          Release allocated heap frames         *
6157    *************************************************/
6158    
6159    /* This function releases all the allocated frames. The base frame is on the
6160    machine stack, and so must not be freed.
6161    
6162    Argument: the address of the base frame
6163    Returns:  nothing
6164    */
6165    
6166    static void
6167    release_match_heapframes (heapframe *frame_base)
6168    {
6169    heapframe *nextframe = frame_base->Xnextframe;
6170    while (nextframe != NULL)
6171      {
6172      heapframe *oldframe = nextframe;
6173      nextframe = nextframe->Xnextframe;
6174      (PUBL(stack_free))(oldframe);
6175      }
6176    }
6177    #endif
6178    
6179    
6180  /*************************************************  /*************************************************
6181  *         Execute a Regular Expression           *  *         Execute a Regular Expression           *
# Line 6304  Returns:          > 0 => success; value Line 6201  Returns:          > 0 => success; value
6201                   < -1 => some kind of unexpected problem                   < -1 => some kind of unexpected problem
6202  */  */
6203    
6204  #ifdef COMPILE_PCRE8  #if defined COMPILE_PCRE8
6205  PCRE_EXP_DEFN int PCRE_CALL_CONVENTION  PCRE_EXP_DEFN int PCRE_CALL_CONVENTION
6206  pcre_exec(const pcre *argument_re, const pcre_extra *extra_data,  pcre_exec(const pcre *argument_re, const pcre_extra *extra_data,
6207    PCRE_SPTR subject, int length, int start_offset, int options, int *offsets,    PCRE_SPTR subject, int length, int start_offset, int options, int *offsets,
6208    int offsetcount)    int offsetcount)
6209  #else  #elif defined COMPILE_PCRE16
6210  PCRE_EXP_DEFN int PCRE_CALL_CONVENTION  PCRE_EXP_DEFN int PCRE_CALL_CONVENTION
6211  pcre16_exec(const pcre16 *argument_re, const pcre16_extra *extra_data,  pcre16_exec(const pcre16 *argument_re, const pcre16_extra *extra_data,
6212    PCRE_SPTR16 subject, int length, int start_offset, int options, int *offsets,    PCRE_SPTR16 subject, int length, int start_offset, int options, int *offsets,
6213    int offsetcount)    int offsetcount)
6214    #elif defined COMPILE_PCRE32
6215    PCRE_EXP_DEFN int PCRE_CALL_CONVENTION
6216    pcre32_exec(const pcre32 *argument_re, const pcre32_extra *extra_data,
6217      PCRE_SPTR32 subject, int length, int start_offset, int options, int *offsets,
6218      int offsetcount)
6219  #endif  #endif
6220  {  {
6221  int rc, ocount, arg_offset_max;  int rc, ocount, arg_offset_max;
# Line 6341  PCRE_PUCHAR req_char_ptr = start_match - Line 6243  PCRE_PUCHAR req_char_ptr = start_match -
6243  const pcre_study_data *study;  const pcre_study_data *study;
6244  const REAL_PCRE *re = (const REAL_PCRE *)argument_re;  const REAL_PCRE *re = (const REAL_PCRE *)argument_re;
6245    
6246    #ifdef NO_RECURSE
6247    heapframe frame_zero;
6248    frame_zero.Xprevframe = NULL;            /* Marks the top level */
6249    frame_zero.Xnextframe = NULL;            /* None are allocated yet */
6250    md->match_frames_base = &frame_zero;
6251    #endif
6252    
6253  /* 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
6254  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
6255  compiler gave this error: "unary minus operator applied to unsigned type,  compiler gave this error: "unary minus operator applied to unsigned type,
6256  result still unsigned". Hopefully the cast fixes that. */  result still unsigned". Hopefully the cast fixes that. */
6257    
# Line 6397  if (utf && (options & PCRE_NO_UTF8_CHECK Line 6306  if (utf && (options & PCRE_NO_UTF8_CHECK
6306        offsets[0] = erroroffset;        offsets[0] = erroroffset;
6307        offsets[1] = errorcode;        offsets[1] = errorcode;
6308        }        }
6309  #ifdef COMPILE_PCRE16  #if defined COMPILE_PCRE8
     return (errorcode <= PCRE_UTF16_ERR1 && md->partial > 1)?  
       PCRE_ERROR_SHORTUTF16 : PCRE_ERROR_BADUTF16;  
 #else  
6310      return (errorcode <= PCRE_UTF8_ERR5 && md->partial > 1)?      return (errorcode <= PCRE_UTF8_ERR5 && md->partial > 1)?
6311        PCRE_ERROR_SHORTUTF8 : PCRE_ERROR_BADUTF8;        PCRE_ERROR_SHORTUTF8 : PCRE_ERROR_BADUTF8;
6312    #elif defined COMPILE_PCRE16
6313        return (errorcode <= PCRE_UTF16_ERR1 && md->partial > 1)?
6314          PCRE_ERROR_SHORTUTF16 : PCRE_ERROR_BADUTF16;
6315    #elif defined COMPILE_PCRE32
6316        return PCRE_ERROR_BADUTF32;
6317  #endif  #endif
6318      }      }
6319    #if defined COMPILE_PCRE8 || defined COMPILE_PCRE16
6320    /* 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. */
6321    if (start_offset > 0 && start_offset < length &&    if (start_offset > 0 && start_offset < length &&
6322        NOT_FIRSTCHAR(((PCRE_PUCHAR)subject)[start_offset]))        NOT_FIRSTCHAR(((PCRE_PUCHAR)subject)[start_offset]))
6323      return PCRE_ERROR_BADUTF8_OFFSET;      return PCRE_ERROR_BADUTF8_OFFSET;
6324    #endif
6325    }    }
6326  #endif  #endif
6327    
# Line 6427  if (extra_data != NULL Line 6339  if (extra_data != NULL
6339                      PCRE_NOTEMPTY | PCRE_NOTEMPTY_ATSTART |                      PCRE_NOTEMPTY | PCRE_NOTEMPTY_ATSTART |
6340                      PCRE_PARTIAL_SOFT | PCRE_PARTIAL_HARD)) == 0)                      PCRE_PARTIAL_SOFT | PCRE_PARTIAL_HARD)) == 0)
6341    {    {
6342    rc = PRIV(jit_exec)(re, extra_data->executable_jit,    rc = PRIV(jit_exec)(re, extra_data, (const pcre_uchar *)subject, length,
6343      (const pcre_uchar *)subject, length, start_offset, options,         start_offset, options, offsets, offsetcount);
6344      ((extra_data->flags & PCRE_EXTRA_MATCH_LIMIT) == 0)  
     ? MATCH_LIMIT : extra_data->match_limit, offsets, offsetcount);  
   
6345    /* PCRE_ERROR_NULL means that the selected normal or partial matching    /* PCRE_ERROR_NULL means that the selected normal or partial matching
6346    mode is not compiled. In this case we simply fallback to interpreter. */    mode is not compiled. In this case we simply fallback to interpreter. */
6347    
6348    if (rc != PCRE_ERROR_NULL) return rc;    if (rc != PCRE_ERROR_NULL) return rc;
6349    }    }
6350  #endif  #endif
# Line 6835  for(;;) Line 6745  for(;;)
6745            {            {
6746            while (p < end_subject)            while (p < end_subject)
6747              {              {
6748              register int pp = *p++;              register pcre_uint32 pp = *p++;
6749              if (pp == req_char || pp == req_char2) { p--; break; }              if (pp == req_char || pp == req_char2) { p--; break; }
6750              }              }
6751            }            }
# Line 7030  if (rc == MATCH_MATCH || rc == MATCH_ACC Line 6940  if (rc == MATCH_MATCH || rc == MATCH_ACC
6940      {      {
6941      register int *iptr, *iend;      register int *iptr, *iend;
6942      int resetcount = 2 + re->top_bracket * 2;      int resetcount = 2 + re->top_bracket * 2;
6943      if (resetcount > offsetcount) resetcount = ocount;      if (resetcount > offsetcount) resetcount = offsetcount;
6944      iptr = offsets + md->end_offset_top;      iptr = offsets + md->end_offset_top;
6945      iend = offsets + resetcount;      iend = offsets + resetcount;
6946      while (iptr < iend) *iptr++ = -1;      while (iptr < iend) *iptr++ = -1;
# Line 7051  if (rc == MATCH_MATCH || rc == MATCH_ACC Line 6961  if (rc == MATCH_MATCH || rc == MATCH_ACC
6961    if (extra_data != NULL && (extra_data->flags & PCRE_EXTRA_MARK) != 0)    if (extra_data != NULL && (extra_data->flags & PCRE_EXTRA_MARK) != 0)
6962      *(extra_data->mark) = (pcre_uchar *)md->mark;      *(extra_data->mark) = (pcre_uchar *)md->mark;
6963    DPRINTF((">>>> returning %d\n", rc));    DPRINTF((">>>> returning %d\n", rc));
6964    #ifdef NO_RECURSE
6965      release_match_heapframes(&frame_zero);
6966    #endif
6967    return rc;    return rc;
6968    }    }
6969    
# Line 7068  if (using_temporary_offsets) Line 6981  if (using_temporary_offsets)
6981  if (rc != MATCH_NOMATCH && rc != PCRE_ERROR_PARTIAL)  if (rc != MATCH_NOMATCH && rc != PCRE_ERROR_PARTIAL)
6982    {    {
6983    DPRINTF((">>>> error: returning %d\n", rc));    DPRINTF((">>>> error: returning %d\n", rc));
6984    #ifdef NO_RECURSE
6985      release_match_heapframes(&frame_zero);
6986    #endif
6987    return rc;    return rc;
6988    }    }
6989    
# Line 7097  else Line 7013  else
7013    
7014  if (extra_data != NULL && (extra_data->flags & PCRE_EXTRA_MARK) != 0)  if (extra_data != NULL && (extra_data->flags & PCRE_EXTRA_MARK) != 0)
7015    *(extra_data->mark) = (pcre_uchar *)md->nomatch_mark;    *(extra_data->mark) = (pcre_uchar *)md->nomatch_mark;
7016    #ifdef NO_RECURSE
7017      release_match_heapframes(&frame_zero);
7018    #endif
7019  return rc;  return rc;
7020  }  }
7021    

Legend:
Removed from v.926  
changed lines
  Added in v.1092

  ViewVC Help
Powered by ViewVC 1.1.5