diff options
| -rw-r--r-- | shell/msh.c | 557 |
1 files changed, 287 insertions, 270 deletions
diff --git a/shell/msh.c b/shell/msh.c index 754a6fc..4964351 100644 --- a/shell/msh.c +++ b/shell/msh.c @@ -105,6 +105,27 @@ typedef void xint; /* base type of jmp_buf, for not broken compilers */ #define NOWORDS ((char **)NULL) #define NOPIPE ((int *)NULL) + +/* + * redirection + */ +struct ioword { + short io_unit; /* unit affected */ + short io_flag; /* action (below) */ + char *io_name; /* file name */ +}; + +#define IOREAD 1 /* < */ +#define IOHERE 2 /* << (here file) */ +#define IOWRITE 4 /* > */ +#define IOCAT 8 /* >> */ +#define IOXHERE 16 /* ${}, ` in << */ +#define IODUP 32 /* >&digit */ +#define IOCLOSE 64 /* >&- */ + +#define IODEFAULT (-1) /* token for default IO unit */ + + /* * Description of a command or an operation on commands. * Might eventually use a union. @@ -183,7 +204,6 @@ static const char *const T_CMD_NAMES[] = { /* PROTOTYPES */ static int newfile(char *s); -static char *cclass(char *p, int sub); struct brkcon { @@ -193,39 +213,6 @@ struct brkcon { /* - * redirection - */ -struct ioword { - short io_unit; /* unit affected */ - short io_flag; /* action (below) */ - char *io_name; /* file name */ -}; - -#define IOREAD 1 /* < */ -#define IOHERE 2 /* << (here file) */ -#define IOWRITE 4 /* > */ -#define IOCAT 8 /* >> */ -#define IOXHERE 16 /* ${}, ` in << */ -#define IODUP 32 /* >&digit */ -#define IOCLOSE 64 /* >&- */ - -#define IODEFAULT (-1) /* token for default IO unit */ - - - -/* - * parsing & execution environment - */ -static struct env { - char *linep; - struct io *iobase; - struct io *iop; - xint *errpt; /* void * */ - int iofd; - struct env *oenv; -} e; - -/* * flags: * -e: quit on error * -k: look for name=value everywhere on command line @@ -264,10 +251,7 @@ static int areanum; /* current allocation area */ /* * other functions */ -typedef int (*builtin_func_ptr)(struct op *); -static builtin_func_ptr inbuilt(char *s); - -static char *rexecve(char *c, char **v, char **envp); +static const char *rexecve(char *c, char **v, char **envp); static char *evalstr(char *cp, int f); static char *putn(int n); static char *unquote(char *as); @@ -284,13 +268,10 @@ static void onintr(int s); /* SIGINT handler */ static int newenv(int f); static void quitenv(void); -static int anys(const char *s1, const char *s2); -static int any(int c, const char *s); static void next(int f); static void setdash(void); static void onecommand(void); static void runtrap(int i); -static int gmatch(char *s, char *p); /* -------- area stuff -------- */ @@ -391,41 +372,40 @@ static int yyparse(void); static int execute(struct op *t, int *pin, int *pout, int act); +#define AFID_NOBUF (~0) +#define AFID_ID 0 + + /* -------- io.h -------- */ /* io buffer */ struct iobuf { - unsigned id; /* buffer id */ - char buf[512]; /* buffer */ - char *bufp; /* pointer into buffer */ - char *ebufp; /* pointer to end of buffer */ + unsigned id; /* buffer id */ + char buf[512]; /* buffer */ + char *bufp; /* pointer into buffer */ + char *ebufp; /* pointer to end of buffer */ }; /* possible arguments to an IO function */ struct ioarg { - char *aword; + const char *aword; char **awordlist; - int afile; /* file descriptor */ - unsigned afid; /* buffer id */ - long afpos; /* file position */ - struct iobuf *afbuf; /* buffer for this file */ + int afile; /* file descriptor */ + unsigned afid; /* buffer id */ + long afpos; /* file position */ + struct iobuf *afbuf; /* buffer for this file */ }; -//static struct ioarg ioargstack[NPUSH]; -#define AFID_NOBUF (~0) -#define AFID_ID 0 - /* an input generator's state */ struct io { int (*iofn) (struct ioarg *, struct io *); struct ioarg *argp; int peekc; - char prev; /* previous character read by readc() */ - char nlcount; /* for `'s */ - char xchar; /* for `'s */ - char task; /* reason for pushed IO */ + char prev; /* previous character read by readc() */ + char nlcount; /* for `'s */ + char xchar; /* for `'s */ + char task; /* reason for pushed IO */ }; -//static struct io iostack[NPUSH]; #define XOTHER 0 /* none of the below */ #define XDOLL 1 /* expanding ${} */ #define XGRAVE 2 /* expanding `'s */ @@ -434,6 +414,29 @@ struct io { /* in substitution */ #define INSUB() (e.iop->task == XGRAVE || e.iop->task == XDOLL) +static struct ioarg temparg = { 0, 0, 0, AFID_NOBUF, 0 }; /* temporary for PUSHIO */ +static struct ioarg ioargstack[NPUSH]; +static struct io iostack[NPUSH]; +static struct iobuf sharedbuf = { AFID_NOBUF }; +static struct iobuf mainbuf = { AFID_NOBUF }; +static unsigned bufid = AFID_ID; /* buffer id counter */ + +#define PUSHIO(what,arg,gen) ((temparg.what = (arg)), pushio(&temparg,(gen))) +#define RUN(what,arg,gen) ((temparg.what = (arg)), run(&temparg,(gen))) + + +/* + * parsing & execution environment + */ +static struct env { + char *linep; + struct io *iobase; + struct io *iop; + xint *errpt; /* void * */ + int iofd; + struct env *oenv; +} e; + /* * input generators for IO structure @@ -471,9 +474,6 @@ static int openpipe(int *pv); static void closepipe(int *pv); static struct io *setbase(struct io *ip); -#define PUSHIO(what,arg,gen) ((temparg.what = (arg)),pushio(&temparg,(gen))) -#define RUN(what,arg,gen) ((temparg.what = (arg)), run(&temparg,(gen))) - /* -------- word.h -------- */ #define NSTART 16 /* default number of words to allow for initially */ @@ -493,9 +493,6 @@ static char **getwords(struct wdblock *wb); static int forkexec(struct op *t, int *pin, int *pout, int act, char **wp); static int iosetup(struct ioword *iop, int pipein, int pipeout); -static void echo(char **wp); -static struct op **find1case(struct op *t, char *w); -static struct op *findcase(struct op *t, char *w); static void brkset(struct brkcon *bc); static int dolabel(struct op *t); static int dohelp(struct op *t); @@ -523,7 +520,7 @@ static void badid(char *s); static int doset(struct op *t); static void varput(char *s, int out); static int dotimes(struct op *t); -static int expand(char *cp, struct wdblock **wbp, int f); +static int expand(const char *cp, struct wdblock **wbp, int f); static char *blank(int f); static int dollar(int quoted); static int grave(int quoted); @@ -533,9 +530,6 @@ static int anyspcl(struct wdblock *wb); static int xstrcmp(char *p1, char *p2); static void glob0(char *a0, unsigned a1, int a2, int (*a3) (char *, char *)); -static void glob1(char *base, char *lim); -static void glob2(char *i, char *j); -static void glob3(char *i, char *j, char *k); static void readhere(char **name, char *s, int ec); static void pushio(struct ioarg *argp, int (*f) (struct ioarg *)); static int xxchar(struct ioarg *ap); @@ -661,7 +655,7 @@ static struct var *ifs; /* field separators */ static int areanum; /* current allocation area */ static int intr; static int inparse; -static char *null = ""; +static char *null = (char*)""; static int heedint = 1; static void (*qflag) (int) = SIG_IGN; static int startl; @@ -671,12 +665,6 @@ static int iounit = IODEFAULT; static YYSTYPE yylval; static char *elinep = line + sizeof(line) - 5; -static struct ioarg temparg = { 0, 0, 0, AFID_NOBUF, 0 }; /* temporary for PUSHIO */ -static struct ioarg ioargstack[NPUSH]; -static struct io iostack[NPUSH]; -static struct iobuf sharedbuf = { AFID_NOBUF }; -static struct iobuf mainbuf = { AFID_NOBUF }; -static unsigned bufid = AFID_ID; /* buffer id counter */ static struct here *inhere; /* list of hear docs while parsing */ static struct here *acthere; /* list of active here documents */ @@ -739,6 +727,19 @@ static void prn(unsigned u) prs(itoa(u)); } +static void echo(char **wp) +{ + int i; + + prs("+"); + for (i = 0; wp[i]; i++) { + if (i) + prs(" "); + prs(wp[i]); + } + prs("\n"); +} + static void closef(int i) { if (i > 2) @@ -968,7 +969,7 @@ static char *space(int n) char *cp; cp = getcell(n); - if (cp == '\0') + if (cp == NULL) err("out of string space"); return cp; } @@ -978,12 +979,13 @@ static char *strsave(const char *s, int a) char *cp; cp = space(strlen(s) + 1); - if (cp != NULL) { - setarea(cp, a); - strcpy(cp, s); - return cp; + if (cp == NULL) { +// FIXME: I highly doubt this is good. + return (char*)""; } - return ""; + setarea(cp, a); + strcpy(cp, s); + return cp; } @@ -997,7 +999,7 @@ static int eqname(const char *n1, const char *n2) return *n2 == '\0' || *n2 == '='; } -static char *findeq(const char *cp) +static const char *findeq(const char *cp) { while (*cp != '\0' && *cp != '=') cp++; @@ -1012,32 +1014,39 @@ static char *findeq(const char *cp) */ static struct var *lookup(const char *n) { +// FIXME: dirty hack + static struct var dummy; + struct var *vp; - char *cp; + const char *cp; + char *xp; int c; - static struct var dummy; if (isdigit(*n)) { - dummy.name = n; + dummy.name = (char*)n; for (c = 0; isdigit(*n) && c < 1000; n++) c = c * 10 + *n - '0'; dummy.status = RONLY; dummy.value = (c <= dolc ? dolv[c] : null); return &dummy; } + for (vp = vlist; vp; vp = vp->next) if (eqname(vp->name, n)) return vp; + cp = findeq(n); vp = (struct var *) space(sizeof(*vp)); if (vp == 0 || (vp->name = space((int) (cp - n) + 2)) == 0) { - dummy.name = dummy.value = ""; + dummy.name = dummy.value = (char*)""; return &dummy; } - for (cp = vp->name; (*cp = *n++) && *cp != '='; cp++); - if (*cp == '\0') - *cp = '='; - *++cp = '\0'; + + xp = vp->name; + while ((*xp = *n++) != '\0' && *xp != '=') + xp++; + *xp++ = '='; + *xp = '\0'; setarea((char *) vp, 0); setarea((char *) vp->name, 0); vp->value = null; @@ -1085,8 +1094,8 @@ static void nameval(struct var *vp, const char *val, const char *name) } if (vp->status & GETCELL) freecell(vp->name); /* form new string `name=value' */ - vp->name = name; - vp->value = val; + vp->name = (char*)name; + vp->value = (char*)val; vp->status |= fl; } @@ -1139,7 +1148,7 @@ static int isassign(const char *s) static int assign(const char *s, int cf) { - char *cp; + const char *cp; struct var *vp; DBGPRINTF7(("ASSIGN: enter, s=%s, cf=%d\n", s, cf)); @@ -1172,7 +1181,7 @@ static void putvlist(int f, int out) { struct var *vp; - for (vp = vlist; vp; vp = vp->next) + for (vp = vlist; vp; vp = vp->next) { if (vp->status & f && (isalpha(*vp->name) || *vp->name == '_')) { if (vp->status & EXPORT) write(out, "export ", 7); @@ -1181,6 +1190,7 @@ static void putvlist(int f, int out) write(out, vp->name, (int) (findeq(vp->name) - vp->name)); write(out, "\n", 1); } + } } @@ -1429,6 +1439,7 @@ static void onintr(int s) /* ANSI C requires a parameter */ } } + /* -------- gmatch.c -------- */ /* * int gmatch(string, pattern) @@ -1442,12 +1453,36 @@ static void onintr(int s) /* ANSI C requires a parameter */ #define QMASK (CMASK&~QUOTE) #define NOT '!' /* might use ^ */ -static int gmatch(char *s, char *p) +static const char *cclass(const char *p, int sub) +{ + int c, d, not, found; + + not = (*p == NOT); + if (not != 0) + p++; + found = not; + do { + if (*p == '\0') + return NULL; + c = *p & CMASK; + if (p[1] == '-' && p[2] != ']') { + d = p[2] & CMASK; + p++; + } else + d = c; + if (c == sub || (c <= sub && sub <= d)) + found = !not; + } while (*++p != ']'); + return found ? p + 1 : NULL; +} + +static int gmatch(const char *s, const char *p) { int sc, pc; if (s == NULL || p == NULL) return 0; + while ((pc = *p++ & CMASK) != '\0') { sc = *s++ & QMASK; switch (pc) { @@ -1478,29 +1513,6 @@ static int gmatch(char *s, char *p) return *s == '\0'; } -static char *cclass(char *p, int sub) -{ - int c, d, not, found; - - not = (*p == NOT); - if (not != 0) - p++; - found = not; - do { - if (*p == '\0') - return NULL; - c = *p & CMASK; - if (p[1] == '-' && p[2] != ']') { - d = p[2] & CMASK; - p++; - } else - d = c; - if (c == sub || (c <= sub && sub <= d)) - found = !not; - } while (*++p != ']'); - return found ? p + 1 : NULL; -} - /* -------- csyn.c -------- */ /* @@ -2323,21 +2335,68 @@ static char *tree(unsigned size) return t; } + /* VARARGS1 */ /* ARGSUSED */ /* -------- exec.c -------- */ +static struct op **find1case(struct op *t, const char *w) +{ + struct op *t1; + struct op **tp; + char **wp; + char *cp; + + if (t == NULL) { + DBGPRINTF3(("FIND1CASE: enter, t==NULL, returning.\n")); + return NULL; + } + + DBGPRINTF3(("FIND1CASE: enter, t->type=%d (%s)\n", t->type, + T_CMD_NAMES[t->type])); + + if (t->type == TLIST) { + tp = find1case(t->left, w); + if (tp != NULL) { + DBGPRINTF3(("FIND1CASE: found one to the left, returning tp=%p\n", tp)); + return tp; + } + t1 = t->right; /* TPAT */ + } else + t1 = t; + + for (wp = t1->words; *wp;) { + cp = evalstr(*wp++, DOSUB); + if (cp && gmatch(w, cp)) { + DBGPRINTF3(("FIND1CASE: returning &t1->left= %p.\n", + &t1->left)); + return &t1->left; + } + } + + DBGPRINTF(("FIND1CASE: returning NULL\n")); + return NULL; +} + +static struct op *findcase(struct op *t, const char *w) +{ + struct op **tp; + + tp = find1case(t, w); + return tp != NULL ? *tp : NULL; +} + /* * execute tree */ - static int execute(struct op *t, int *pin, int *pout, int act) { struct op *t1; volatile int i, rv, a; - char *cp, **wp, **wp2; + const char *cp; + char **wp, **wp2; struct var *vp; struct op *outtree_save; struct brkcon bc; @@ -2551,14 +2610,25 @@ static int execute(struct op *t, int *pin, int *pout, int act) return rv; } -static int -forkexec(struct op *t, int *pin, int *pout, int act, char **wp) +typedef int (*builtin_func_ptr)(struct op *); + +static builtin_func_ptr inbuilt(const char *s) { + const struct builtincmd *bp; + + for (bp = builtincmds; bp->name != NULL; bp++) + if (strcmp(bp->name, s) == 0) + return bp->builtinfunc; + + return NULL; +} + +static int forkexec(struct op *t, int *pin, int *pout, int act, char **wp) { pid_t newpid; int i, rv; builtin_func_ptr shcom = NULL; int f; - char *cp = NULL; + const char *cp = NULL; struct ioword **iopp; int resetsig; char **owp; @@ -2592,7 +2662,7 @@ forkexec(struct op *t, int *pin, int *pout, int act, char **wp) resetsig = 0; rv = -1; /* system-detected error */ if (t->type == TCOM) { - while ((cp = *wp++) != NULL); + while (*wp++ != NULL); cp = *wp; /* strip all initial assignments */ @@ -2755,7 +2825,8 @@ forkexec(struct op *t, int *pin, int *pout, int act, char **wp) static int iosetup(struct ioword *iop, int pipein, int pipeout) { int u = -1; - char *cp = NULL, *msg; + char *cp = NULL; + const char *msg; DBGPRINTF(("IOSETUP: iop %p, pipein %i, pipeout %i\n", iop, pipein, pipeout)); @@ -2795,7 +2866,7 @@ static int iosetup(struct ioword *iop, int pipein, int pipeout) case IOHERE: case IOHERE | IOXHERE: u = herein(iop->io_name, iop->io_flag & IOXHERE); - cp = "here file"; + cp = (char*)"here file"; break; case IOWRITE | IOCAT: @@ -2829,64 +2900,6 @@ static int iosetup(struct ioword *iop, int pipein, int pipeout) return 0; } -static void echo(char **wp) -{ - int i; - - prs("+"); - for (i = 0; wp[i]; i++) { - if (i) - prs(" "); - prs(wp[i]); - } - prs("\n"); -} - -static struct op **find1case(struct op *t, char *w) -{ - struct op *t1; - struct op **tp; - char **wp, *cp; - - if (t == NULL) { - DBGPRINTF3(("FIND1CASE: enter, t==NULL, returning.\n")); - return NULL; - } - - DBGPRINTF3(("FIND1CASE: enter, t->type=%d (%s)\n", t->type, - T_CMD_NAMES[t->type])); - - if (t->type == TLIST) { - tp = find1case(t->left, w); - if (tp != NULL) { - DBGPRINTF3(("FIND1CASE: found one to the left, returning tp=%p\n", tp)); - return tp; - } - t1 = t->right; /* TPAT */ - } else - t1 = t; - - for (wp = t1->words; *wp;) { - cp = evalstr(*wp++, DOSUB); - if (cp && gmatch(w, cp)) { - DBGPRINTF3(("FIND1CASE: returning &t1->left= %p.\n", - &t1->left)); - return &t1->left; - } - } - - DBGPRINTF(("FIND1CASE: returning NULL\n")); - return NULL; -} - -static struct op *findcase(struct op *t, char *w) -{ - struct op **tp; - - tp = find1case(t, w); - return tp != NULL ? *tp : NULL; -} - /* * Enter a new loop level (marked for break/continue). */ @@ -2971,10 +2984,11 @@ static int setstatus(int s) * If getenv("PATH") were kept up-to-date, * execvp might be used. */ -static char *rexecve(char *c, char **v, char **envp) +static const char *rexecve(char *c, char **v, char **envp) { int i; - char *sp, *tp; + const char *sp; + char *tp; int eacces = 0, asis = 0; char *name = c; @@ -2991,7 +3005,7 @@ static char *rexecve(char *c, char **v, char **envp) DBGPRINTF(("REXECVE: c=%p, v=%p, envp=%p\n", c, v, envp)); sp = any('/', c) ? "" : path->value; - asis = *sp == '\0'; + asis = (*sp == '\0'); while (asis || *sp != '\0') { asis = 0; tp = e.linep; @@ -3138,7 +3152,7 @@ static int dolabel(struct op *t) static int dochdir(struct op *t) { - char *cp, *er; + const char *cp, *er; cp = t->words[1]; if (cp == NULL) { @@ -3175,7 +3189,7 @@ static int doshift(struct op *t) */ static int dologin(struct op *t) { - char *cp; + const char *cp; if (interactive) { signal(SIGINT, SIG_DFL); @@ -3232,7 +3246,8 @@ static int doexec(struct op *t) static int dodot(struct op *t) { int i; - char *sp, *tp; + const char *sp; + char *tp; char *cp; int maltmp; @@ -3578,16 +3593,6 @@ static int dotimes(struct op *t) } -static builtin_func_ptr inbuilt(char *s) { - const struct builtincmd *bp; - - for (bp = builtincmds; bp->name != NULL; bp++) - if (strcmp(bp->name, s) == 0) - return bp->builtinfunc; - - return NULL; -} - /* -------- eval.c -------- */ /* @@ -3639,6 +3644,7 @@ static char **eval(char **ap, int f) return gflg ? (char **) NULL : wp; } + /* * Make the exported environment from the exported * names in the dictionary. Keyword assignments @@ -3657,26 +3663,10 @@ static char **makenv(int all, struct wdblock *wb) return getwords(wb); } -static char *evalstr(char *cp, int f) -{ - struct wdblock *wb; - - DBGPRINTF6(("EVALSTR: enter, cp=%p, f=%d\n", cp, f)); - - wb = NULL; - if (expand(cp, &wb, f)) { - if (wb == NULL || wb->w_nword == 0 - || (cp = wb->w_words[0]) == NULL) - cp = ""; - DELETE(wb); - } else - cp = NULL; - return cp; -} - -static int expand(char *cp, struct wdblock **wbp, int f) +static int expand(const char *cp, struct wdblock **wbp, int f) { jmp_buf ev; + char *xp; #if __GNUC__ /* Avoid longjmp clobbering */ @@ -3690,27 +3680,28 @@ static int expand(char *cp, struct wdblock **wbp, int f) if (cp == NULL) return 0; - if (!anys("$`'\"", cp) && - !anys(ifs->value, cp) && ((f & DOGLOB) == 0 || !anys("[*?", cp))) { - cp = strsave(cp, areanum); + if (!anys("$`'\"", cp) && !anys(ifs->value, cp) + && ((f & DOGLOB) == 0 || !anys("[*?", cp)) + ) { + xp = strsave(cp, areanum); if (f & DOTRIM) - unquote(cp); - *wbp = addword(cp, *wbp); + unquote(xp); + *wbp = addword(xp, *wbp); return 1; } errpt = ev; if (newenv(setjmp(errpt)) == 0) { PUSHIO(aword, cp, strchar); e.iobase = e.iop; - while ((cp = blank(f)) && gflg == 0) { - e.linep = cp; - cp = strsave(cp, areanum); + while ((xp = blank(f)) && gflg == 0) { + e.linep = xp; + xp = strsave(xp, areanum); if ((f & DOGLOB) == 0) { if (f & DOTRIM) - unquote(cp); - *wbp = addword(cp, *wbp); + unquote(xp); + *wbp = addword(xp, *wbp); } else - *wbp = glob(cp, *wbp); + *wbp = glob(xp, *wbp); } quitenv(); } else @@ -3718,6 +3709,29 @@ static int expand(char *cp, struct wdblock **wbp, int f) return gflg == 0; } +static char *evalstr(char *cp, int f) +{ + struct wdblock *wb; + + DBGPRINTF6(("EVALSTR: enter, cp=%p, f=%d\n", cp, f)); + + wb = NULL; + if (expand(cp, &wb, f)) { + if (wb == NULL || wb->w_nword == 0 + || (cp = wb->w_words[0]) == NULL + ) { +// TODO: I suspect that +// char *evalstr(char *cp, int f) is actually +// const char *evalstr(const char *cp, int f)! + cp = (char*)""; + } + DELETE(wb); + } else + cp = NULL; + return cp; +} + + /* * Blank interpretation and quoting */ @@ -3927,12 +3941,12 @@ static int dollar(int quoted) static int grave(int quoted) { - char *cp; + const char *cp; int i; int j; int pf[2]; static char child_cmd[LINELIM]; - char *src; + const char *src; char *dest; int count; int ignore; @@ -3945,11 +3959,12 @@ static int grave(int quoted) (void) &cp; #endif - for (cp = e.iop->argp->aword; *cp != '`'; cp++) + for (cp = e.iop->argp->aword; *cp != '`'; cp++) { if (*cp == 0) { err("no closing `"); return 0; } + } /* string copy with dollar expansion */ src = e.iop->argp->aword; @@ -4078,8 +4093,7 @@ static int grave(int quoted) e.iop->argp->aword = ++cp; close(pf[1]); PUSHIO(afile, remap(pf[0]), - (int (*)(struct ioarg *)) ((quoted) ? qgravechar : - gravechar)); + (int (*)(struct ioarg *)) ((quoted) ? qgravechar : gravechar)); return 1; } /* allow trapped signals */ @@ -4092,9 +4106,9 @@ static int grave(int quoted) closepipe(pf); argument_list[0] = (char *) DEFAULT_SHELL; - argument_list[1] = "-c"; + argument_list[1] = (char *) "-c"; argument_list[2] = child_cmd; - argument_list[3] = 0; + argument_list[3] = NULL; cp = rexecve(argument_list[0], argument_list, makenv(1, wb)); prs(argument_list[0]); @@ -4263,6 +4277,7 @@ static int xstrcmp(char *p1, char *p2) return strcmp(*(char **) p1, *(char **) p2); } + /* -------- word.c -------- */ static struct wdblock *newword(int nw) @@ -4316,11 +4331,37 @@ char **getwords(struct wdblock *wb) static int (*func) (char *, char *); static int globv; -static void glob0(char *a0, unsigned a1, int a2, int (*a3) (char *, char *)) +static void glob3(char *i, char *j, char *k) { - func = a3; - globv = a2; - glob1(a0, a0 + a1 * a2); + char *index1, *index2, *index3; + int c; + int m; + + m = globv; + index1 = i; + index2 = j; + index3 = k; + do { + c = *index1; + *index1++ = *index3; + *index3++ = *index2; + *index2++ = c; + } while (--m); +} + +static void glob2(char *i, char *j) +{ + char *index1, *index2, c; + int m; + + m = globv; + index1 = i; + index2 = j; + do { + c = *index1; + *index1++ = *index2; + *index2++ = c; + } while (--m); } static void glob1(char *base, char *lim) @@ -4397,38 +4438,13 @@ static void glob1(char *base, char *lim) } } -static void glob2(char *i, char *j) +static void glob0(char *a0, unsigned a1, int a2, int (*a3) (char *, char *)) { - char *index1, *index2, c; - int m; - - m = globv; - index1 = i; - index2 = j; - do { - c = *index1; - *index1++ = *index2; - *index2++ = c; - } while (--m); + func = a3; + globv = a2; + glob1(a0, a0 + a1 * a2); } -static void glob3(char *i, char *j, char *k) -{ - char *index1, *index2, *index3; - int c; - int m; - - m = globv; - index1 = i; - index2 = j; - index3 = k; - do { - c = *index1; - *index1++ = *index3; - *index3++ = *index2; - *index2++ = c; - } while (--m); -} /* -------- io.c -------- */ @@ -4875,6 +4891,7 @@ static void closepipe(int *pv) } } + /* -------- here.c -------- */ /* |