Page MenuHomeFreeBSD
Differential D10510 Diff 27755 lib/libc/regex/regcomp.c

Changeset View

Standalone View

View Options

lib/libc/regex/regcomp.c

Show First 20 Lines • Show All 91 Lines • ▼ Show 20 Lines
static int p_simp_re(struct parse *p, int starordinary); static int p_simp_re(struct parse *p, int starordinary);
static int p_count(struct parse *p); static int p_count(struct parse *p);
static void p_bracket(struct parse *p); static void p_bracket(struct parse *p);
static void p_b_term(struct parse *p, cset *cs); static void p_b_term(struct parse *p, cset *cs);
static void p_b_cclass(struct parse *p, cset *cs); static void p_b_cclass(struct parse *p, cset *cs);
static void p_b_eclass(struct parse *p, cset *cs); static void p_b_eclass(struct parse *p, cset *cs);
static wint_t p_b_symbol(struct parse *p); static wint_t p_b_symbol(struct parse *p);
static wint_t p_b_coll_elem(struct parse *p, wint_t endc); static wint_t p_b_coll_elem(struct parse *p, wint_t endc);
static int may_escape(struct parse *p, const wint_t ch);
static wint_t othercase(wint_t ch); static wint_t othercase(wint_t ch);
static void bothcases(struct parse *p, wint_t ch); static void bothcases(struct parse *p, wint_t ch);
static void ordinary(struct parse *p, wint_t ch); static void ordinary(struct parse *p, wint_t ch);
static void nonnewline(struct parse *p); static void nonnewline(struct parse *p);
static void repeat(struct parse *p, sopno start, int from, int to); static void repeat(struct parse *p, sopno start, int from, int to);
static int seterr(struct parse *p, int e); static int seterr(struct parse *p, int e);
static cset *allocset(struct parse *p); static cset *allocset(struct parse *p);
static void freeset(struct parse *p, cset *cs); static void freeset(struct parse *p, cset *cs);
▲ Show 20 Lines • Show All 323 Lines • ▼ Show 20 Lines case '\\':
switch (wc) { switch (wc) {
case '<': case '<':
EMIT(OBOW, 0); EMIT(OBOW, 0);
break; break;
case '>': case '>':
EMIT(OEOW, 0); EMIT(OEOW, 0);
break; break;
default: default:
if (may_escape(p, wc) == 0)
ordinary(p, wc); ordinary(p, wc);
else
SETERROR(REG_EESCAPE);
break; break;
} }
break; break;
case '{': /* okay as ordinary except if digit follows */ case '{': /* okay as ordinary except if digit follows */
(void)REQUIRE(!MORE() || !isdigit((uch)PEEK()), REG_BADRPT); (void)REQUIRE(!MORE() || !isdigit((uch)PEEK()), REG_BADRPT);
/* FALLTHROUGH */ /* FALLTHROUGH */
default: default:
p->next--; p->next--;
▲ Show 20 Lines • Show All 200 Lines • ▼ Show 20 Lines case BACKSL|'9':
p->g->backrefs = 1; p->g->backrefs = 1;
break; break;
case '*': case '*':
(void)REQUIRE(starordinary, REG_BADRPT); (void)REQUIRE(starordinary, REG_BADRPT);
/* FALLTHROUGH */ /* FALLTHROUGH */
default: default:
p->next--; p->next--;
wc = WGETNEXT(); wc = WGETNEXT();
/* Throw an error if we're not dealing with an escapable */
if (c&BACKSL && may_escape(p, wc) != 0)
SETERROR(REG_EESCAPE);
else
ordinary(p, wc); ordinary(p, wc);
break; break;
} }
if (EAT('*')) { /* implemented as +? */ if (EAT('*')) { /* implemented as +? */
/* this case does not require the (y|) trick, noKLUDGE */ /* this case does not require the (y|) trick, noKLUDGE */
INSERT(OPLUS_, pos); INSERT(OPLUS_, pos);
ASTERN(O_PLUS, pos); ASTERN(O_PLUS, pos);
INSERT(OQUEST_, pos); INSERT(OQUEST_, pos);
▲ Show 20 Lines • Show All 257 Lines • ▼ Show 20 Linesp_b_coll_elem(struct parse *p,
memset(&mbs, 0, sizeof(mbs)); memset(&mbs, 0, sizeof(mbs));
if ((clen = mbrtowc(&wc, sp, len, &mbs)) == len) if ((clen = mbrtowc(&wc, sp, len, &mbs)) == len)
return (wc); /* single character */ return (wc); /* single character */
else if (clen == (size_t)-1 || clen == (size_t)-2) else if (clen == (size_t)-1 || clen == (size_t)-2)
SETERROR(REG_ILLSEQ); SETERROR(REG_ILLSEQ);
else else
SETERROR(REG_ECOLLATE); /* neither */ SETERROR(REG_ECOLLATE); /* neither */
return(0); return(0);
}
/*
- may_escape - determine whether 'ch' is escape-able in the current context
== static int may_escape(struct parse *p, const wint_t ch)
*/
static int
may_escape(struct parse *p, const wint_t ch)
{
/*
* Build a whitelist of characters that may be escaped to produce an
* ordinary in the current context. This assumes that these have not
* been otherwise interpreted as a special character. Escaping an
* ordinary character yields undefined results according to
* IEEE 1003.1-2008. Some extensions (notably, some GNU extensions) take
* advantage of this and use escaped ordinary characters to provide
* special meaning, e.g. \b, \B, \w, \W, \s, \S.
*/
switch(ch) {
case '(':
case ')':
case '+':
case '{':
case '}':
case '?':
/* The above characters may not be escaped in BREs */
if (!(p->g->cflags&REG_EXTENDED))
return 1;
/* Fallthrough */
case '.':
case '[':
case ']':
case '\\':
case '*':
case '^':
case '$':
return 0;
default:
return 1;
}
} }
/* /*
- othercase - return the case counterpart of an alphabetic - othercase - return the case counterpart of an alphabetic
== static wint_t othercase(wint_t ch); == static wint_t othercase(wint_t ch);
*/ */
static wint_t /* if no counterpart, return ch */ static wint_t /* if no counterpart, return ch */
othercase(wint_t ch) othercase(wint_t ch)
▲ Show 20 Lines • Show All 879 Lines • Show Last 20 Lines