![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to cons.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSDReno / sys / vax|
Return to cons.c CVS log | Up to [CSRG BSD Unix] / 43BSDReno / sys / vax |
1.1 ! root 1: /* ! 2: * Copyright (c) 1982, 1986 Regents of the University of California. ! 3: * All rights reserved. The Berkeley software License Agreement ! 4: * specifies the terms and conditions for redistribution. ! 5: * ! 6: * @(#)cons.c 7.9 (Berkeley) 2/17/90 ! 7: */ ! 8: ! 9: /* ! 10: * VAX console driver (and floppy interface) ! 11: */ ! 12: #include "param.h" ! 13: #include "conf.h" ! 14: #include "user.h" ! 15: #include "proc.h" ! 16: #include "ioctl.h" ! 17: #include "tty.h" ! 18: #include "systm.h" ! 19: ! 20: #include "cpu.h" ! 21: #include "cons.h" ! 22: #include "mtpr.h" ! 23: ! 24: /* ! 25: * On some machines (e.g. MicroVAX), a secondary console ! 26: * such as a display may supercede the standard serial console. ! 27: * On such machines, consops will be set to point to the cdevsw ! 28: * entry for the secondary console, and the standard console device ! 29: * (minor number 0) will be redirected. Other minor numbers still ! 30: * refer to the standard console serial line. ! 31: * ! 32: * Also, console output may be redirected to another tty ! 33: * (e.g. a window); if so, constty will point to the current ! 34: * virtual console. ! 35: */ ! 36: struct cdevsw *consops = 0; ! 37: struct tty *constty = 0; ! 38: struct tty cons; ! 39: int cnstart(); ! 40: int ttrstrt(); ! 41: char partab[]; ! 42: ! 43: /*ARGSUSED*/ ! 44: cnopen(dev, flag) ! 45: dev_t dev; ! 46: { ! 47: register struct tty *tp = &cons; ! 48: ! 49: if (consops && minor(dev) == 0) ! 50: return ((*consops->d_open)(dev, flag)); ! 51: tp->t_oproc = cnstart; ! 52: if ((tp->t_state&TS_ISOPEN) == 0) { ! 53: ttychars(tp); ! 54: tp->t_iflag = TTYDEF_IFLAG|ICRNL; ! 55: tp->t_oflag = TTYDEF_OFLAG|OPOST|ONLCR; ! 56: tp->t_lflag = TTYDEF_LFLAG; ! 57: tp->t_cflag = CS8|CREAD; ! 58: tp->t_ispeed = tp->t_ospeed = TTYDEF_SPEED; ! 59: tp->t_state = TS_ISOPEN|TS_CARR_ON; ! 60: ttsetwater(tp); ! 61: } ! 62: if (tp->t_state&TS_XCLUDE && u.u_uid != 0) ! 63: return (EBUSY); ! 64: mtpr(RXCS, mfpr(RXCS)|RXCS_IE); ! 65: mtpr(TXCS, mfpr(TXCS)|TXCS_IE); ! 66: return ((*linesw[tp->t_line].l_open)(dev, tp)); ! 67: } ! 68: ! 69: /*ARGSUSED*/ ! 70: cnclose(dev) ! 71: dev_t dev; ! 72: { ! 73: register struct tty *tp = &cons; ! 74: ! 75: if (consops && minor(dev) == 0) ! 76: return ((*consops->d_close)(dev)); ! 77: (*linesw[tp->t_line].l_close)(tp); ! 78: ttyclose(tp); ! 79: return (0); ! 80: } ! 81: ! 82: /*ARGSUSED*/ ! 83: cnread(dev, uio, flag) ! 84: dev_t dev; ! 85: struct uio *uio; ! 86: int flag; ! 87: { ! 88: register struct tty *tp = &cons; ! 89: ! 90: if (consops && minor(dev) == 0) ! 91: return ((*consops->d_read)(dev, uio, flag)); ! 92: return ((*linesw[tp->t_line].l_read)(tp, uio, flag)); ! 93: } ! 94: ! 95: /*ARGSUSED*/ ! 96: cnwrite(dev, uio, flag) ! 97: dev_t dev; ! 98: struct uio *uio; ! 99: int flag; ! 100: { ! 101: register struct tty *tp = &cons; ! 102: ! 103: if (minor(dev) == 0) { ! 104: if (constty && (constty->t_state & (TS_CARR_ON | TS_ISOPEN)) == ! 105: (TS_CARR_ON | TS_ISOPEN)) ! 106: tp = constty; ! 107: else if (consops) ! 108: return ((*consops->d_write)(dev, uio, flag)); ! 109: } ! 110: return ((*linesw[tp->t_line].l_write)(tp, uio, flag)); ! 111: } ! 112: ! 113: static int cnpolling = 0; ! 114: /* ! 115: * Got a level-20 receive interrupt - ! 116: * the LSI wants to give us a character. ! 117: * Catch the character, and see who it goes to. ! 118: */ ! 119: /*ARGSUSED*/ ! 120: cnrint(dev) ! 121: dev_t dev; ! 122: { ! 123: register int c; ! 124: register struct tty *tp; ! 125: ! 126: if (cnpolling) ! 127: return; ! 128: c = mfpr(RXDB)&0xff; ! 129: if (c&RXDB_ID) { ! 130: #if VAX780 ! 131: if (cpu == VAX_780) ! 132: cnrfl(c); ! 133: #endif ! 134: return; ! 135: } ! 136: tp = &cons; ! 137: #ifdef KADB ! 138: if (!kdbrintr(c, tp)) ! 139: #endif ! 140: if ((tp->t_cflag&CSIZE) == CS7) { ! 141: #ifdef notyet ! 142: if (tp->t_cflag&PARENB) { ! 143: if ((tp->t_cflag&PARODD) && ! 144: (partab[c&0177]&0200) == (c&0200)) ! 145: c |= TTY_PE; ! 146: else if ((partab[c&0177]&0200) != (c&0200)) ! 147: c |= TTY_PE; ! 148: } ! 149: #endif ! 150: c &= ~0200; ! 151: } ! 152: (*linesw[tp->t_line].l_rint)(c, tp); ! 153: } ! 154: ! 155: /*ARGSUSED*/ ! 156: cnioctl(dev, cmd, addr, flag) ! 157: dev_t dev; ! 158: caddr_t addr; ! 159: { ! 160: register struct tty *tp = &cons; ! 161: int error; ! 162: ! 163: if (consops && minor(dev) == 0) ! 164: return ((*consops->d_ioctl)(dev, cmd, addr, flag)); ! 165: error = (*linesw[tp->t_line].l_ioctl)(tp, cmd, addr); ! 166: if (error >= 0) ! 167: return (error); ! 168: error = ttioctl(tp, cmd, addr, flag); ! 169: if (error < 0) ! 170: error = ENOTTY; ! 171: return (error); ! 172: } ! 173: ! 174: int consdone = 1; ! 175: /* ! 176: * Got a level-20 transmission interrupt - ! 177: * the LSI wants another character. First, ! 178: * see if we can send something to the typewriter. ! 179: * If not, try the floppy. ! 180: */ ! 181: /*ARGSUSED*/ ! 182: cnxint(dev) ! 183: dev_t dev; ! 184: { ! 185: register struct tty *tp = &cons; ! 186: ! 187: consdone++; ! 188: tp->t_state &= ~TS_BUSY; ! 189: if (tp->t_line) ! 190: (*linesw[tp->t_line].l_start)(tp); ! 191: else ! 192: cnstart(tp); ! 193: #if VAX780 ! 194: if (cpu==VAX_780 && (tp->t_state & TS_BUSY) == 0) ! 195: conxfl(); ! 196: #endif ! 197: } ! 198: ! 199: cnstart(tp) ! 200: register struct tty *tp; ! 201: { ! 202: register int c, s; ! 203: ! 204: s = spl5(); ! 205: if (tp->t_state & (TS_TIMEOUT|TS_BUSY|TS_TTSTOP)) ! 206: goto out; ! 207: if (tp->t_outq.c_cc <= tp->t_lowat) { ! 208: if (tp->t_state&TS_ASLEEP) { ! 209: tp->t_state &= ~TS_ASLEEP; ! 210: wakeup((caddr_t)&tp->t_outq); ! 211: } ! 212: if (tp->t_wsel) { ! 213: selwakeup(tp->t_wsel, tp->t_state & TS_WCOLL); ! 214: tp->t_wsel = 0; ! 215: tp->t_state &= ~TS_WCOLL; ! 216: } ! 217: } ! 218: if (tp->t_outq.c_cc == 0) ! 219: goto out; ! 220: if (consdone == 0) ! 221: goto out; ! 222: c = getc(&tp->t_outq) & 0xff; ! 223: #ifdef notdef ! 224: if (tp->t_cflag&PARENB && ((tp->t_cflag&CSIZE)==CS7)) { ! 225: c &= 0177; ! 226: c |= (tp->t_cflag&PARODD ? ~partab[c] : partab[c]) & 0200; ! 227: } ! 228: #else ! 229: if ((tp->t_cflag&CSIZE) == CS7) { ! 230: #ifdef notyet ! 231: if (tp->t_cflag&PARENB) { ! 232: if (tp->t_cflag&PARODD) ! 233: c = (~(partab[c&0177])&0200)|(c&0177); ! 234: else ! 235: c = (partab[c&0177]&0200)|(c&0177); ! 236: } else ! 237: #endif ! 238: c &= 0177; ! 239: } ! 240: #endif ! 241: mtpr(TXDB, c); ! 242: consdone = 0; ! 243: tp->t_state |= TS_BUSY; ! 244: out: ! 245: splx(s); ! 246: } ! 247: ! 248: /* ! 249: * Print a character on console. ! 250: * Attempts to save and restore device ! 251: * status. ! 252: */ ! 253: cnputc(c) ! 254: register int c; ! 255: { ! 256: register int s, timo; ! 257: ! 258: timo = 30000; ! 259: /* ! 260: * Try waiting for the console tty to come ready, ! 261: * otherwise give up after a reasonable time. ! 262: */ ! 263: while ((mfpr(TXCS)&TXCS_RDY) == 0) ! 264: if(--timo == 0) ! 265: break; ! 266: if (c == 0) ! 267: return; ! 268: s = mfpr(TXCS); ! 269: mtpr(TXCS, 0); ! 270: mtpr(TXDB, c&0xff); ! 271: if (c == '\n') ! 272: cnputc('\r'); ! 273: cnputc(0); ! 274: mtpr(TXCS, s); ! 275: } ! 276: ! 277: #if (defined(KADB) || defined(GENERIC)) && !defined(lint) ! 278: /* ! 279: * Get character from console. ! 280: */ ! 281: cngetc() ! 282: { ! 283: register int c, s; ! 284: ! 285: s = splhigh(); ! 286: while ((mfpr(RXCS)&RXCS_DONE) == 0 || (c = mfpr(RXDB)&0177) <= 0) ! 287: ; ! 288: if (c == '\r') ! 289: c = '\n'; ! 290: (void) splx(s); ! 291: return (c); ! 292: } ! 293: #endif ! 294: ! 295: #ifdef KADB ! 296: cnpoll(onoff) ! 297: int onoff; ! 298: { ! 299: ! 300: cnpolling = onoff; ! 301: } ! 302: #endif
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.