JehanneOS/mksh
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

give C_VAR1 precedence over display variable name; izabera pointed out,

Browse Source 
rightfully, that, in POSIX shell, ${!#} is defined, and ${!#123} should work
This commit is contained in:
tg 2016-05-05 22:45:58 +00:00
parent b6e438037f
commit 3d130b606a
3 changed files with 27 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
eval.c
View File

@ -23,7 +23,7 @@
#include "sh.h" #include "sh.h"
__RCSID("$MirOS: src/bin/mksh/eval.c,v 1.186 2016/05/05 22:19:04 tg Exp $"); __RCSID("$MirOS: src/bin/mksh/eval.c,v 1.187 2016/05/05 22:45:57 tg Exp $");
/* /*
* string expansion * string expansion
@ -1258,7 +1258,7 @@ varsub(Expand *xp, const char *sp, const char *word,
if ((stype & 0x17F) == '=' && if ((stype & 0x17F) == '=' &&
ctype(*sp, C_VAR1 | C_DIGIT)) ctype(*sp, C_VAR1 | C_DIGIT))
return (-1); return (-1);
if (*sp == '!' && sp[1]) { if (*sp == '!' && sp[1] && !ctype(sp[1], C_VAR1)) {
++sp; ++sp;
xp->var = global(sp); xp->var = global(sp);
if (vstrchr(sp, '[')) if (vstrchr(sp, '['))

25
lex.c
View File

@ -23,7 +23,7 @@
#include "sh.h" #include "sh.h"
__RCSID("$MirOS: src/bin/mksh/lex.c,v 1.223 2016/04/09 13:55:11 tg Exp $"); __RCSID("$MirOS: src/bin/mksh/lex.c,v 1.224 2016/05/05 22:45:58 tg Exp $");
/* /*
* states while lexing word * states while lexing word
@ -1566,20 +1566,34 @@ get_brace_var(XString *wsp, char *wp)
{ {
char c; char c;
enum parse_state { enum parse_state {
PS_INITIAL, PS_SAW_HASH, PS_IDENT, PS_INITIAL, PS_SAW_PERCENT, PS_SAW_HASH, PS_SAW_BANG,
PS_NUMBER, PS_VAR1 PS_IDENT, PS_NUMBER, PS_VAR1
} state = PS_INITIAL; } state = PS_INITIAL;
while (/* CONSTCOND */ 1) { while (/* CONSTCOND */ 1) {
c = getsc(); c = getsc();
/* State machine to figure out where the variable part ends. */ /* State machine to figure out where the variable part ends. */
switch (state) { switch (state) {
case PS_SAW_BANG:
if (ctype(c, C_VAR1))
goto out;
if (0)
/* FALLTHROUGH */
case PS_INITIAL: case PS_INITIAL:
if (c == '#' || c == '!' || c == '%') { switch (c) {
case '%':
state = PS_SAW_PERCENT;
goto next;
case '#':
state = PS_SAW_HASH; state = PS_SAW_HASH;
break; goto next;
case '!':
state = PS_SAW_BANG;
goto next;
} }
/* FALLTHROUGH */ /* FALLTHROUGH */
case PS_SAW_PERCENT:
case PS_SAW_HASH: case PS_SAW_HASH:
if (ksh_isalphx(c)) if (ksh_isalphx(c))
state = PS_IDENT; state = PS_IDENT;
@ -1620,6 +1634,7 @@ get_brace_var(XString *wsp, char *wp)
} }
goto out; goto out;
} }
next:
break; break;
case PS_NUMBER: case PS_NUMBER:
if (!ksh_isdigit(c)) if (!ksh_isdigit(c))

8
mksh.1
View File

@ -1,4 +1,4 @@
.\" $MirOS: src/bin/mksh/mksh.1,v 1.394 2016/03/12 20:45:38 tg Exp $ .\" $MirOS: src/bin/mksh/mksh.1,v 1.395 2016/05/05 22:45:58 tg Exp $
.\" $OpenBSD: ksh.1,v 1.160 2015/07/04 13:27:04 feinerer Exp $ .\" $OpenBSD: ksh.1,v 1.160 2015/07/04 13:27:04 feinerer Exp $
.\"- .\"-
.\" Copyright © 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, .\" Copyright © 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009,
@ -76,7 +76,7 @@
.\" with -mandoc, it might implement .Mx itself, but we want to .\" with -mandoc, it might implement .Mx itself, but we want to
.\" use our own definition. And .Dd must come *first*, always. .\" use our own definition. And .Dd must come *first*, always.
.\" .\"
.Dd $Mdocdate: March 12 2016 $ .Dd $Mdocdate: May 5 2016 $
.\" .\"
.\" Check which macro package we use, and do other -mdoc setup. .\" Check which macro package we use, and do other -mdoc setup.
.\" .\"
@ -1593,6 +1593,8 @@ is a name reference (bound variable), created by the
.Ic nameref .Ic nameref
command (which is an alias for command (which is an alias for
.Ic typeset Fl n ) . .Ic typeset Fl n ) .
.Ar name
cannot be one of most special parameters (see below).
.Pp .Pp
.It Pf ${! Ns Ar name Ns \&[*]} .It Pf ${! Ns Ar name Ns \&[*]}
.It Pf ${! Ns Ar name Ns \&[@]} .It Pf ${! Ns Ar name Ns \&[@]}
@ -6587,7 +6589,7 @@ for the in-memory portion of the history is slow, should use
.Xr memmove 3 . .Xr memmove 3 .
.Pp .Pp
This document attempts to describe This document attempts to describe
.Nm mksh\ R52c .Nm mksh\ R52c+CVS
and up, and up,
.\" with vendor patches from insert-your-name-here, .\" with vendor patches from insert-your-name-here,
compiled without any options impacting functionality, such as compiled without any options impacting functionality, such as