Apple-2gs-SW/hush
1
0
Fork 0
mirror of https://github.com/sheumann/hush.git synced 2024-09-12 00:55:11 +00:00
Code Issues Projects Releases Wiki Activity

expr: a bit more robust handling of regexps with groups (closes bug 87)

Browse Source
This commit is contained in:
Denis Vlasenko 2009-03-03 14:27:36 +00:00
parent 6852effbc2
commit 230997bd61
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
coreutils/expr.c
View File

@ -223,13 +223,13 @@ static VALUE *docolon(VALUE *sv, VALUE *pv)
tostring(pv); tostring(pv);
if (pv->u.s[0] == '^') { if (pv->u.s[0] == '^') {
bb_error_msg("\ bb_error_msg(
warning: unportable BRE: `%s': using `^' as the first character\n\ "warning: '%s': using '^' as the first character\n"
of a basic regular expression is not portable; it is being ignored", pv->u.s); "of a basic regular expression is not portable; it is ignored", pv->u.s);
} }
memset(&re_buffer, 0, sizeof(re_buffer)); memset(&re_buffer, 0, sizeof(re_buffer));
memset(re_regs, 0, sizeof(*re_regs)); memset(re_regs, 0, sizeof(re_regs));
xregcomp(&re_buffer, pv->u.s, 0); xregcomp(&re_buffer, pv->u.s, 0);
/* expr uses an anchored pattern match, so check that there was a /* expr uses an anchored pattern match, so check that there was a
@ -238,7 +238,7 @@ of a basic regular expression is not portable; it is being ignored", pv->u.s);
&& re_regs[0].rm_so == 0 && re_regs[0].rm_so == 0
) { ) {
/* Were \(...\) used? */ /* Were \(...\) used? */
if (re_buffer.re_nsub > 0) { if (re_buffer.re_nsub > 0 && re_regs[1].rm_so >= 0) {
sv->u.s[re_regs[1].rm_eo] = '\0'; sv->u.s[re_regs[1].rm_eo] = '\0';
v = str_value(sv->u.s + re_regs[1].rm_so); v = str_value(sv->u.s + re_regs[1].rm_so);
} else { } else {
@ -251,7 +251,7 @@ of a basic regular expression is not portable; it is being ignored", pv->u.s);
else else
v = int_value(0); v = int_value(0);
} }
//FIXME: sounds like here is a bit missing: regfree(&re_buffer); regfree(&re_buffer);
return v; return v;
} }