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

implement that if we run in FPOSIX mode we don't set up the standard

Browse Source 
Korn aliases
This commit is contained in:
tg 2007-06-15 20:52:19 +00:00
parent f9b33dffea
commit 1b16db54f1
1 changed files with 14 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
main.c
View File

@ -13,7 +13,7 @@
#include <locale.h>
#endif
__RCSID("$MirOS: src/bin/mksh/main.c,v 1.76 2007/06/06 23:28:16 tg Exp $");
__RCSID("$MirOS: src/bin/mksh/main.c,v 1.77 2007/06/15 20:52:19 tg Exp $");
extern char **environ;
@ -34,6 +34,10 @@ static const char *initcoms[] = {
"typeset", "-x", "SHELL", "PATH", "HOME", NULL,
"typeset", "-i", "PPID", "OPTIND=1", NULL,
"eval", "typeset -i RANDOM SECONDS=\"${SECONDS-0}\" TMOUT=\"${TMOUT-0}\"", NULL,
NULL
};
static const char *initcoms_korn[] = {
"alias",
/* Standard ksh aliases */
"hash=alias -t", /* not "alias -t --": hash -r needs to work */
@ -219,11 +223,10 @@ main(int argc, const char *argv[])
#endif
setint(global("PPID"), (long)ppid);
/* execute initialisation statements */
for (wp = initcoms; *wp != NULL; wp++) {
shcomexec(wp);
for (; *wp != NULL; wp++)
;
while (*wp != NULL)
wp++;
}
safe_prompt = (ksheuid = geteuid()) ? "$ " : "# ";
@ -248,6 +251,13 @@ main(int argc, const char *argv[])
if (argi < 0)
exit(1);
if (!Flag(FPOSIX))
for (wp = initcoms_korn; *wp != NULL; wp++) {
shcomexec(wp);
while (*wp != NULL)
wp++;
}
if (Flag(FCOMMAND)) {
s = pushs(SSTRING, ATEMP);
if (!(s->start = s->str = argv[argi++]))