aniani/vim
0
0
Fork 1
mirror of https://github.com/vim/vim.git synced 2025-07-26 11:04:33 -04:00
Code

updated for version 7.3.1139

Browse Source 
Problem:    New regexp engine: negated flag is hardly used.
Solution:   Add separate _NEG states, remove negated flag.
This commit is contained in:
Bram Moolenaar 2013-06-07 16:31:50 +02:00
parent 8aca2e9bef
commit decd9540fd
3 changed files with 70 additions and 69 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/regexp.h
View File

@ -73,7 +73,6 @@ struct nfa_state
nfa_state_T *out1; nfa_state_T *out1;
int id; int id;
int lastlist[2]; /* 0: normal, 1: recursive */ int lastlist[2]; /* 0: normal, 1: recursive */
int negated;
int val; int val;
}; };

136
src/regexp_nfa.c
View File

@ -64,9 +64,12 @@ enum
NFA_NOPEN, /* Start of subexpression marked with \%( */ NFA_NOPEN, /* Start of subexpression marked with \%( */
NFA_NCLOSE, /* End of subexpr. marked with \%( ... \) */ NFA_NCLOSE, /* End of subexpr. marked with \%( ... \) */
NFA_START_INVISIBLE, NFA_START_INVISIBLE,
NFA_START_INVISIBLE_NEG,
NFA_START_INVISIBLE_BEFORE, NFA_START_INVISIBLE_BEFORE,
NFA_START_INVISIBLE_BEFORE_NEG,
NFA_START_PATTERN, NFA_START_PATTERN,
NFA_END_INVISIBLE, NFA_END_INVISIBLE,
NFA_END_INVISIBLE_NEG,
NFA_END_PATTERN, NFA_END_PATTERN,
NFA_COMPOSING, /* Next nodes in NFA are part of the NFA_COMPOSING, /* Next nodes in NFA are part of the
composing multibyte char */ composing multibyte char */
@ -481,7 +484,7 @@ nfa_get_regstart(start, depth)
} }
default: default:
if (p->c > 0 && !p->negated) if (p->c > 0)
return p->c; /* yes! */ return p->c; /* yes! */
return 0; return 0;
} }
@ -1991,10 +1994,15 @@ nfa_set_code(c)
case NFA_NOPEN: STRCPY(code, "NFA_NOPEN"); break; case NFA_NOPEN: STRCPY(code, "NFA_NOPEN"); break;
case NFA_NCLOSE: STRCPY(code, "NFA_NCLOSE"); break; case NFA_NCLOSE: STRCPY(code, "NFA_NCLOSE"); break;
case NFA_START_INVISIBLE: STRCPY(code, "NFA_START_INVISIBLE"); break; case NFA_START_INVISIBLE: STRCPY(code, "NFA_START_INVISIBLE"); break;
case NFA_START_INVISIBLE_NEG:
STRCPY(code, "NFA_START_INVISIBLE_NEG"); break;
case NFA_START_INVISIBLE_BEFORE: case NFA_START_INVISIBLE_BEFORE:
STRCPY(code, "NFA_START_INVISIBLE_BEFORE"); break; STRCPY(code, "NFA_START_INVISIBLE_BEFORE"); break;
case NFA_START_INVISIBLE_BEFORE_NEG:
STRCPY(code, "NFA_START_INVISIBLE_BEFORE_NEG"); break;
case NFA_START_PATTERN: STRCPY(code, "NFA_START_PATTERN"); break; case NFA_START_PATTERN: STRCPY(code, "NFA_START_PATTERN"); break;
case NFA_END_INVISIBLE: STRCPY(code, "NFA_END_INVISIBLE"); break; case NFA_END_INVISIBLE: STRCPY(code, "NFA_END_INVISIBLE"); break;
case NFA_END_INVISIBLE_NEG: STRCPY(code, "NFA_END_INVISIBLE_NEG"); break;
case NFA_END_PATTERN: STRCPY(code, "NFA_END_PATTERN"); break; case NFA_END_PATTERN: STRCPY(code, "NFA_END_PATTERN"); break;
case NFA_COMPOSING: STRCPY(code, "NFA_COMPOSING"); break; case NFA_COMPOSING: STRCPY(code, "NFA_COMPOSING"); break;
@ -2227,8 +2235,7 @@ nfa_print_state2(debugf, state, indent)
fprintf(debugf, " %s", p); fprintf(debugf, " %s", p);
nfa_set_code(state->c); nfa_set_code(state->c);
fprintf(debugf, "%s%s (%d) (id=%d) val=%d\n", fprintf(debugf, "%s (%d) (id=%d) val=%d\n",
state->negated ? "NOT " : "",
code, code,
state->c, state->c,
abs(state->id), abs(state->id),
@ -2330,7 +2337,6 @@ alloc_state(c, out, out1)
s->id = istate; s->id = istate;
s->lastlist[0] = 0; s->lastlist[0] = 0;
s->lastlist[1] = 0; s->lastlist[1] = 0;
s->negated = FALSE;
return s; return s;
} }
@ -2741,23 +2747,37 @@ post2nfa(postfix, end, nfa_calc_size)
case NFA_PREV_ATOM_JUST_BEFORE_NEG: case NFA_PREV_ATOM_JUST_BEFORE_NEG:
case NFA_PREV_ATOM_LIKE_PATTERN: case NFA_PREV_ATOM_LIKE_PATTERN:
{ {
int neg = (*p == NFA_PREV_ATOM_NO_WIDTH_NEG
|| *p == NFA_PREV_ATOM_JUST_BEFORE_NEG);
int before = (*p == NFA_PREV_ATOM_JUST_BEFORE int before = (*p == NFA_PREV_ATOM_JUST_BEFORE
|| *p == NFA_PREV_ATOM_JUST_BEFORE_NEG); || *p == NFA_PREV_ATOM_JUST_BEFORE_NEG);
int pattern = (*p == NFA_PREV_ATOM_LIKE_PATTERN); int pattern = (*p == NFA_PREV_ATOM_LIKE_PATTERN);
int start_state = NFA_START_INVISIBLE; int start_state;
int end_state = NFA_END_INVISIBLE; int end_state;
int n = 0; int n = 0;
nfa_state_T *zend; nfa_state_T *zend;
nfa_state_T *skip; nfa_state_T *skip;
if (before) switch (*p)
start_state = NFA_START_INVISIBLE_BEFORE;
else if (pattern)
{ {
start_state = NFA_START_PATTERN; case NFA_PREV_ATOM_NO_WIDTH:
end_state = NFA_END_PATTERN; start_state = NFA_START_INVISIBLE;
end_state = NFA_END_INVISIBLE;
break;
case NFA_PREV_ATOM_NO_WIDTH_NEG:
start_state = NFA_START_INVISIBLE_NEG;
end_state = NFA_END_INVISIBLE_NEG;
break;
case NFA_PREV_ATOM_JUST_BEFORE:
start_state = NFA_START_INVISIBLE_BEFORE;
end_state = NFA_END_INVISIBLE;
break;
case NFA_PREV_ATOM_JUST_BEFORE_NEG:
start_state = NFA_START_INVISIBLE_BEFORE_NEG;
end_state = NFA_END_INVISIBLE_NEG;
break;
case NFA_PREV_ATOM_LIKE_PATTERN:
start_state = NFA_START_PATTERN;
end_state = NFA_END_PATTERN;
break;
} }
if (before) if (before)
@ -2783,11 +2803,6 @@ post2nfa(postfix, end, nfa_calc_size)
s = alloc_state(start_state, e.start, s1); s = alloc_state(start_state, e.start, s1);
if (s == NULL) if (s == NULL)
goto theend; goto theend;
if (neg)
{
s->negated = TRUE;
s1->negated = TRUE;
}
if (before) if (before)
s->val = n; /* store the count */ s->val = n; /* store the count */
if (pattern) if (pattern)
@ -3009,7 +3024,6 @@ post2nfa(postfix, end, nfa_calc_size)
matchstate = &state_ptr[istate++]; /* the match state */ matchstate = &state_ptr[istate++]; /* the match state */
matchstate->c = NFA_MATCH; matchstate->c = NFA_MATCH;
matchstate->out = matchstate->out1 = NULL; matchstate->out = matchstate->out1 = NULL;
matchstate->negated = FALSE;
matchstate->id = 0; matchstate->id = 0;
patch(e.out, matchstate); patch(e.out, matchstate);
@ -3772,7 +3786,7 @@ check_char_class(class, c)
return OK; return OK;
break; break;
case NFA_CLASS_SPACE: case NFA_CLASS_SPACE:
if ((c >=9 && c <= 13) || (c == ' ')) if ((c >= 9 && c <= 13) || (c == ' '))
return OK; return OK;
break; break;
case NFA_CLASS_UPPER: case NFA_CLASS_UPPER:
@ -3971,7 +3985,8 @@ recursive_regmatch(state, prog, submatch, m, listids)
int result; int result;
int need_restore = FALSE; int need_restore = FALSE;
if (state->c == NFA_START_INVISIBLE_BEFORE) if (state->c == NFA_START_INVISIBLE_BEFORE
|| state->c == NFA_START_INVISIBLE_BEFORE_NEG)
{ {
/* The recursive match must end at the current position. */ /* The recursive match must end at the current position. */
endposp = &endpos; endposp = &endpos;
@ -4452,6 +4467,7 @@ nfa_regmatch(prog, start, submatch, m)
} }
case NFA_END_INVISIBLE: case NFA_END_INVISIBLE:
case NFA_END_INVISIBLE_NEG:
case NFA_END_PATTERN: case NFA_END_PATTERN:
/* /*
* This is only encountered after a NFA_START_INVISIBLE or * This is only encountered after a NFA_START_INVISIBLE or
@ -4489,7 +4505,7 @@ nfa_regmatch(prog, start, submatch, m)
break; break;
/* do not set submatches for \@! */ /* do not set submatches for \@! */
if (!t->state->negated) if (t->state->c != NFA_END_INVISIBLE_NEG)
{ {
copy_sub(&m->norm, &t->subs.norm); copy_sub(&m->norm, &t->subs.norm);
#ifdef FEAT_SYN_HL #ifdef FEAT_SYN_HL
@ -4505,7 +4521,9 @@ nfa_regmatch(prog, start, submatch, m)
break; break;
case NFA_START_INVISIBLE: case NFA_START_INVISIBLE:
case NFA_START_INVISIBLE_NEG:
case NFA_START_INVISIBLE_BEFORE: case NFA_START_INVISIBLE_BEFORE:
case NFA_START_INVISIBLE_BEFORE_NEG:
{ {
nfa_pim_T *pim; nfa_pim_T *pim;
int cout = t->state->out1->out->c; int cout = t->state->out1->out->c;
@ -4524,6 +4542,7 @@ nfa_regmatch(prog, start, submatch, m)
|| cout == NFA_NCLOSE || cout == NFA_NCLOSE
|| t->pim != NULL || t->pim != NULL
|| (t->state->c != NFA_START_INVISIBLE_BEFORE || (t->state->c != NFA_START_INVISIBLE_BEFORE
&& t->state->c != NFA_START_INVISIBLE_BEFORE_NEG
&& failure_chance(t->state->out1->out, 0) && failure_chance(t->state->out1->out, 0)
< failure_chance(t->state->out, 0))) < failure_chance(t->state->out, 0)))
{ {
@ -4534,8 +4553,11 @@ nfa_regmatch(prog, start, submatch, m)
result = recursive_regmatch(t->state, prog, result = recursive_regmatch(t->state, prog,
submatch, m, &listids); submatch, m, &listids);
/* for \@! it is a match when result is FALSE */ /* for \@! and \@<! it is a match when the result is
if (result != t->state->negated) * FALSE */
if (result != (t->state->c == NFA_START_INVISIBLE_NEG
|| t->state->c
== NFA_START_INVISIBLE_BEFORE_NEG))
{ {
/* Copy submatch info from the recursive call */ /* Copy submatch info from the recursive call */
copy_sub_off(&t->subs.norm, &m->norm); copy_sub_off(&t->subs.norm, &m->norm);
@ -4646,11 +4668,10 @@ nfa_regmatch(prog, start, submatch, m)
break; break;
case NFA_BOW: case NFA_BOW:
{ result = TRUE;
int bow = TRUE;
if (curc == NUL) if (curc == NUL)
bow = FALSE; result = FALSE;
#ifdef FEAT_MBYTE #ifdef FEAT_MBYTE
else if (has_mbyte) else if (has_mbyte)
{ {
@ -4659,27 +4680,24 @@ nfa_regmatch(prog, start, submatch, m)
/* Get class of current and previous char (if it exists). */ /* Get class of current and previous char (if it exists). */
this_class = mb_get_class_buf(reginput, reg_buf); this_class = mb_get_class_buf(reginput, reg_buf);
if (this_class <= 1) if (this_class <= 1)
bow = FALSE; result = FALSE;
else if (reg_prev_class() == this_class) else if (reg_prev_class() == this_class)
bow = FALSE; result = FALSE;
} }
#endif #endif
else if (!vim_iswordc_buf(curc, reg_buf) else if (!vim_iswordc_buf(curc, reg_buf)
|| (reginput > regline || (reginput > regline
&& vim_iswordc_buf(reginput[-1], reg_buf))) && vim_iswordc_buf(reginput[-1], reg_buf)))
bow = FALSE; result = FALSE;
if (bow) if (result)
addstate_here(thislist, t->state->out, &t->subs, addstate_here(thislist, t->state->out, &t->subs,
t->pim, &listidx); t->pim, &listidx);
break; break;
}
case NFA_EOW: case NFA_EOW:
{ result = TRUE;
int eow = TRUE;
if (reginput == regline) if (reginput == regline)
eow = FALSE; result = FALSE;
#ifdef FEAT_MBYTE #ifdef FEAT_MBYTE
else if (has_mbyte) else if (has_mbyte)
{ {
@ -4690,18 +4708,17 @@ nfa_regmatch(prog, start, submatch, m)
prev_class = reg_prev_class(); prev_class = reg_prev_class();
if (this_class == prev_class if (this_class == prev_class
|| prev_class == 0 || prev_class == 1) || prev_class == 0 || prev_class == 1)
eow = FALSE; result = FALSE;
} }
#endif #endif
else if (!vim_iswordc_buf(reginput[-1], reg_buf) else if (!vim_iswordc_buf(reginput[-1], reg_buf)
|| (reginput[0] != NUL || (reginput[0] != NUL
&& vim_iswordc_buf(curc, reg_buf))) && vim_iswordc_buf(curc, reg_buf)))
eow = FALSE; result = FALSE;
if (eow) if (result)
addstate_here(thislist, t->state->out, &t->subs, addstate_here(thislist, t->state->out, &t->subs,
t->pim, &listidx); t->pim, &listidx);
break; break;
}
case NFA_BOF: case NFA_BOF:
if (reglnum == 0 && reginput == regline if (reglnum == 0 && reginput == regline
@ -4740,7 +4757,6 @@ nfa_regmatch(prog, start, submatch, m)
{ {
/* If \Z was present, then ignore composing characters. /* If \Z was present, then ignore composing characters.
* When ignoring the base character this always matches. */ * When ignoring the base character this always matches. */
/* TODO: How about negated? */
if (len == 0 && sta->c != curc) if (len == 0 && sta->c != curc)
result = FAIL; result = FAIL;
else else
@ -4813,26 +4829,6 @@ nfa_regmatch(prog, start, submatch, m)
} }
break; break;
case NFA_CLASS_ALNUM:
case NFA_CLASS_ALPHA:
case NFA_CLASS_BLANK:
case NFA_CLASS_CNTRL:
case NFA_CLASS_DIGIT:
case NFA_CLASS_GRAPH:
case NFA_CLASS_LOWER:
case NFA_CLASS_PRINT:
case NFA_CLASS_PUNCT:
case NFA_CLASS_SPACE:
case NFA_CLASS_UPPER:
case NFA_CLASS_XDIGIT:
case NFA_CLASS_TAB:
case NFA_CLASS_RETURN:
case NFA_CLASS_BACKSPACE:
case NFA_CLASS_ESCAPE:
result = check_char_class(t->state->c, curc);
ADD_STATE_IF_MATCH(t->state);
break;
case NFA_START_COLL: case NFA_START_COLL:
case NFA_START_NEG_COLL: case NFA_START_NEG_COLL:
{ {
@ -5212,10 +5208,8 @@ nfa_regmatch(prog, start, submatch, m)
int c = t->state->c; int c = t->state->c;
/* TODO: put this in #ifdef later */ /* TODO: put this in #ifdef later */
if (c < -256) if (c < 0)
EMSGN("INTERNAL: Negative state char: %ld", c); EMSGN("INTERNAL: Negative state char: %ld", c);
if (is_Magic(c))
c = un_Magic(c);
result = (c == curc); result = (c == curc);
if (!result && ireg_ic) if (!result && ireg_ic)
@ -5252,8 +5246,12 @@ nfa_regmatch(prog, start, submatch, m)
prog, submatch, m, &listids); prog, submatch, m, &listids);
t->pim->result = result ? NFA_PIM_MATCH t->pim->result = result ? NFA_PIM_MATCH
: NFA_PIM_NOMATCH; : NFA_PIM_NOMATCH;
/* for \@! it is a match when result is FALSE */ /* for \@! and \@<! it is a match when the result is
if (result != t->pim->state->negated) * FALSE */
if (result != (t->pim->state->c
== NFA_START_INVISIBLE_NEG
|| t->pim->state->c
== NFA_START_INVISIBLE_BEFORE_NEG))
{ {
/* Copy submatch info from the recursive call */ /* Copy submatch info from the recursive call */
copy_sub_off(&t->pim->subs.norm, &m->norm); copy_sub_off(&t->pim->subs.norm, &m->norm);
@ -5274,8 +5272,10 @@ nfa_regmatch(prog, start, submatch, m)
#endif #endif
} }
/* for \@! it is a match when result is FALSE */ /* for \@! and \@<! it is a match when result is FALSE */
if (result != t->pim->state->negated) if (result != (t->pim->state->c == NFA_START_INVISIBLE_NEG
|| t->pim->state->c
== NFA_START_INVISIBLE_BEFORE_NEG))
{ {
/* Copy submatch info from the recursive call */ /* Copy submatch info from the recursive call */
copy_sub_off(&t->subs.norm, &t->pim->subs.norm); copy_sub_off(&t->subs.norm, &t->pim->subs.norm);

2
src/version.c
View File

@ -728,6 +728,8 @@ static char *(features[]) =
static int included_patches[] = static int included_patches[] =
{ /* Add new patch number below this line */ { /* Add new patch number below this line */
/**/
1139,
/**/ /**/
1138, 1138,
/**/ /**/