Lines Matching defs:iop
465 #define INSUB() (e.iop->task == XGRAVE || e.iop->task == XDOLL)
486 static int gravechar(struct ioarg *ap, struct io *iop);
487 static int qgravechar(struct ioarg *ap, struct io *iop);
493 static void markhere(char *s, struct ioword *iop);
532 static int iosetup(struct ioword *iop, int pipein, int pipeout);
713 struct io *iop;
722 iostack - 1, /* iop: struct io ptr */
867 e.iop = e.iobase = iostack;
1588 if (interactive && e.iop <= iostack) {
1713 struct ioword *iop;
1727 iop = io(iounit, i, yylval.cp);
1731 markhere(yylval.cp, iop);
2153 struct ioword **iop;
2155 iop = (struct ioword **) getwords(iolist);
2157 return iop;
2162 struct ioword *iop;
2164 iop = (struct ioword *) tree(sizeof(*iop));
2165 iop->io_unit = u;
2166 iop->io_flag = f;
2167 iop->io_name = cp;
2168 iolist = addword((char *) iop, iolist);
2169 return iop;
2264 if (interactive && e.iop <= iostack) {
2328 if (interactive && c == '\n' && e.iop <= iostack) {
2887 static int iosetup(struct ioword *iop, int pipein, int pipeout)
2893 DBGPRINTF(("IOSETUP: iop %p, pipein %i, pipeout %i\n", iop,
2896 if (iop->io_unit == IODEFAULT) /* take default */
2897 iop->io_unit = iop->io_flag & (IOREAD | IOHERE) ? 0 : 1;
2899 if (pipein && iop->io_unit == 0)
2902 if (pipeout && iop->io_unit == 1)
2905 msg = iop->io_flag & (IOREAD | IOHERE) ? "open" : "create";
2906 if ((iop->io_flag & IOHERE) == 0) {
2907 cp = iop->io_name; /* huh?? */
2913 if (iop->io_flag & IODUP) {
2920 iop->io_flag = IOCLOSE;
2921 iop->io_flag &= ~(IOREAD | IOWRITE);
2923 switch (iop->io_flag) {
2930 u = herein(iop->io_name, iop->io_flag & IOXHERE);
2945 u = dup2(*cp - '0', iop->io_unit);
2949 close(iop->io_unit);
2958 if (u != iop->io_unit) {
2959 dup2(u, iop->io_unit);
3144 e.iobase = e.iop;
3755 e.iobase = e.iop;
3880 e.iop->task = XGRAVE;
3886 e.iop->task = XDOLL;
3919 oiop = e.iop;
3920 otask = e.iop->task;
3922 e.iop->task = XOTHER;
3926 if (oiop == e.iop)
3927 e.iop->task = otask;
4023 for (cp = e.iop->argp->aword; *cp != '`'; cp++) {
4031 src = e.iop->argp->aword;
4154 e.iop->argp->aword = ++cp;
4529 if ((ec != '\'') && (ec != '`') && (e.iop->task != XGRAVE)) {
4542 if (e.iop >= e.iobase)
4543 e.iop->peekc = c;
4548 return e.iop < e.iobase || (e.iop->peekc == 0 && e.iop->prev == 0);
4555 RCPRINTF(("READC: e.iop %p, e.iobase %p\n", e.iop, e.iobase));
4557 for (; e.iop >= e.iobase; e.iop--) {
4558 RCPRINTF(("READC: e.iop %p, peekc 0x%x\n", e.iop, e.iop->peekc));
4559 c = e.iop->peekc;
4561 e.iop->peekc = 0;
4564 if (e.iop->prev != 0) {
4565 c = (*e.iop->iofn)(e.iop->argp, e.iop);
4568 e.iop++;
4571 if (e.iop == iostack)
4573 e.iop->prev = c;
4574 return e.iop->prev;
4576 if (e.iop->task == XIO && e.iop->prev != '\n') {
4577 e.iop->prev = 0;
4578 if (e.iop == iostack)
4583 if (e.iop->task == XIO) {
4585 e.iop->prev = 0;
4586 return e.iop->prev;
4588 if (interactive && e.iop == iostack + 1) {
4598 if (e.iop >= iostack) {
4599 RCPRINTF(("READC: return 0, e.iop %p\n", e.iop));
4619 DBGPRINTF(("PUSHIO: argp %p, argp->afid 0x%x, e.iop %p\n", argp,
4620 argp->afid, e.iop));
4623 if (++e.iop >= &iostack[NPUSH]) {
4624 e.iop--;
4632 e.iop->iofn = (int (*)(struct ioarg *, struct io *)) fn; /* Store data source func ptr */
4635 e.iop->argp = argp;
4638 e.iop->argp = ioargstack + (e.iop - iostack); /* MAL - index into stack */
4639 *e.iop->argp = *argp; /* copy data from temp area into stack spot */
4643 if (e.iop == &iostack[0])
4644 e.iop->argp->afbuf = &mainbuf;
4646 e.iop->argp->afbuf = &sharedbuf;
4650 if ((isatty(e.iop->argp->afile) == 0)
4651 && (e.iop == &iostack[0]
4652 || lseek(e.iop->argp->afile, 0L, SEEK_CUR) != -1)) {
4656 e.iop->argp->afid = bufid; /* assign buffer id */
4659 DBGPRINTF(("PUSHIO: iostack %p, e.iop %p, afbuf %p\n",
4660 iostack, e.iop, e.iop->argp->afbuf));
4661 DBGPRINTF(("PUSHIO: mbuf %p, sbuf %p, bid %d, e.iop %p\n",
4662 &mainbuf, &sharedbuf, bufid, e.iop));
4666 e.iop->prev = ~'\n';
4667 e.iop->peekc = 0;
4668 e.iop->xchar = 0;
4669 e.iop->nlcount = 0;
4672 e.iop->task = XIO;
4675 e.iop->task = XGRAVE;
4677 e.iop->task = XOTHER;
4854 static int gravechar(struct ioarg *ap, struct io *iop)
4858 c = qgravechar(ap, iop) & ~QUOTE;
4864 static int qgravechar(struct ioarg *ap, struct io *iop)
4868 DBGPRINTF3(("QGRAVECHAR: enter, ap=%p, iop=%p\n", ap, iop));
4870 if (iop->xchar) {
4871 if (iop->nlcount) {
4872 iop->nlcount--;
4875 c = iop->xchar;
4876 iop->xchar = 0;
4878 iop->nlcount = 1;
4880 iop->nlcount++;
4881 iop->xchar = c;
4884 iop->nlcount--;
4964 static void markhere(char *s, struct ioword *iop)
4978 h->h_iop = iop;
4979 iop->io_name = 0;
4991 iop->io_flag |= IOHERE | IOXHERE;
4994 iop->io_flag &= ~IOXHERE;
4998 h->h_dosub = iop->io_flag & IOXHERE;
5039 pushio(e.iop->argp, (int (*)(struct ioarg *)) e.iop->iofn);
5040 e.iobase = e.iop;
5042 if (interactive && e.iop <= iostack) {
5108 setbase(e.iop);
5307 if (e.iop < iostack) {
5352 DBGPRINTF(("MSH_MAIN: begin FOR loop, interactive %d, e.iop %p, iostack %p\n", interactive, e.iop, iostack));
5355 if (interactive && e.iop <= iostack) {