141480Smckusick /* 241480Smckusick * Copyright (c) 1988 University of Utah. 341480Smckusick * Copyright (c) 1990 The Regents of the University of California. 441480Smckusick * All rights reserved. 541480Smckusick * 641480Smckusick * This code is derived from software contributed to Berkeley by 741480Smckusick * the Systems Programming Group of the University of Utah Computer 841480Smckusick * Science Department. 941480Smckusick * 1041480Smckusick * %sccs.include.redist.c% 1141480Smckusick * 1245503Smckusick * from: Utah $Hdr: ite.c 1.1 90/07/09$ 1341480Smckusick * 14*52390Smckusick * @(#)ite.c 7.8 (Berkeley) 02/05/92 1541480Smckusick */ 1641480Smckusick 1741480Smckusick /* 1841480Smckusick * Bit-mapped display terminal emulator machine independent code. 1941480Smckusick * This is a very rudimentary. Much more can be abstracted out of 2041480Smckusick * the hardware dependent routines. 2141480Smckusick */ 2241480Smckusick #include "ite.h" 2341480Smckusick #if NITE > 0 2441480Smckusick 2541480Smckusick #include "grf.h" 2641480Smckusick 2741480Smckusick #undef NITE 2841480Smckusick #define NITE NGRF 2941480Smckusick 3049132Skarels #include "param.h" 3149132Skarels #include "conf.h" 3249132Skarels #include "proc.h" 3349132Skarels #include "ioctl.h" 3449132Skarels #include "tty.h" 3549132Skarels #include "systm.h" 3649132Skarels #include "malloc.h" 3741480Smckusick 3841480Smckusick #include "itevar.h" 3941480Smckusick #include "iteioctl.h" 4041480Smckusick #include "kbdmap.h" 4141480Smckusick 4249132Skarels #include "machine/cpu.h" 4341480Smckusick 4441480Smckusick #define set_attr(ip, attr) ((ip)->attribute |= (attr)) 4541480Smckusick #define clr_attr(ip, attr) ((ip)->attribute &= ~(attr)) 4641480Smckusick 4741480Smckusick extern int nodev(); 4841480Smckusick 4941480Smckusick int topcat_scroll(), topcat_init(), topcat_deinit(); 5041480Smckusick int topcat_clear(), topcat_putc(), topcat_cursor(); 5141480Smckusick int gatorbox_scroll(), gatorbox_init(), gatorbox_deinit(); 5241480Smckusick int gatorbox_clear(), gatorbox_putc(), gatorbox_cursor(); 5341480Smckusick int rbox_scroll(), rbox_init(), rbox_deinit(); 5441480Smckusick int rbox_clear(), rbox_putc(), rbox_cursor(); 5541480Smckusick int dvbox_scroll(), dvbox_init(), dvbox_deinit(); 5641480Smckusick int dvbox_clear(), dvbox_putc(), dvbox_cursor(); 5741480Smckusick 5841480Smckusick struct itesw itesw[] = 5941480Smckusick { 6041480Smckusick topcat_init, topcat_deinit, topcat_clear, 6141480Smckusick topcat_putc, topcat_cursor, topcat_scroll, 6241480Smckusick 6341480Smckusick gatorbox_init, gatorbox_deinit, gatorbox_clear, 6441480Smckusick gatorbox_putc, gatorbox_cursor, gatorbox_scroll, 6541480Smckusick 6641480Smckusick rbox_init, rbox_deinit, rbox_clear, 6741480Smckusick rbox_putc, rbox_cursor, rbox_scroll, 6841480Smckusick 6941480Smckusick dvbox_init, dvbox_deinit, dvbox_clear, 7041480Smckusick dvbox_putc, dvbox_cursor, dvbox_scroll, 7141480Smckusick }; 7241480Smckusick 7341480Smckusick /* 7441480Smckusick * # of chars are output in a single itestart() call. 7541480Smckusick * If this is too big, user processes will be blocked out for 7641480Smckusick * long periods of time while we are emptying the queue in itestart(). 7741480Smckusick * If it is too small, console output will be very ragged. 7841480Smckusick */ 7941480Smckusick int iteburst = 64; 8041480Smckusick 8141480Smckusick int nite = NITE; 8241480Smckusick struct tty *kbd_tty = NULL; 8341480Smckusick struct tty ite_tty[NITE]; 8441480Smckusick struct ite_softc ite_softc[NITE]; 8541480Smckusick 86*52390Smckusick void itestart(); 8741480Smckusick extern int ttrstrt(); 8841480Smckusick extern struct tty *constty; 8941480Smckusick 9041480Smckusick /* 9141480Smckusick * Primary attribute buffer to be used by the first bitmapped console 9241480Smckusick * found. Secondary displays alloc the attribute buffer as needed. 9341480Smckusick * Size is based on a 68x128 display, which is currently our largest. 9441480Smckusick */ 9541480Smckusick u_char console_attributes[0x2200]; 9641480Smckusick 9741480Smckusick /* 9841480Smckusick * Perform functions necessary to setup device as a terminal emulator. 9941480Smckusick */ 10041480Smckusick iteon(dev, flag) 10141480Smckusick dev_t dev; 10241480Smckusick { 10341480Smckusick int unit = UNIT(dev); 10441480Smckusick struct tty *tp = &ite_tty[unit]; 10541480Smckusick struct ite_softc *ip = &ite_softc[unit]; 10641480Smckusick 10741480Smckusick if (unit < 0 || unit >= NITE || (ip->flags&ITE_ALIVE) == 0) 10841480Smckusick return(ENXIO); 10941480Smckusick /* force ite active, overriding graphics mode */ 11041480Smckusick if (flag & 1) { 11141480Smckusick ip->flags |= ITE_ACTIVE; 11241480Smckusick ip->flags &= ~(ITE_INGRF|ITE_INITED); 11341480Smckusick } 11441480Smckusick /* leave graphics mode */ 11541480Smckusick if (flag & 2) { 11641480Smckusick ip->flags &= ~ITE_INGRF; 11741480Smckusick if ((ip->flags & ITE_ACTIVE) == 0) 11841480Smckusick return(0); 11941480Smckusick } 12041480Smckusick ip->flags |= ITE_ACTIVE; 12141480Smckusick if (ip->flags & ITE_INGRF) 12241480Smckusick return(0); 12341480Smckusick if (kbd_tty == NULL || kbd_tty == tp) { 12441480Smckusick kbd_tty = tp; 12541480Smckusick kbdenable(); 12641480Smckusick } 12741480Smckusick iteinit(dev); 12841480Smckusick return(0); 12941480Smckusick } 13041480Smckusick 13141480Smckusick iteinit(dev) 13241480Smckusick dev_t dev; 13341480Smckusick { 13441480Smckusick int unit = UNIT(dev); 13541480Smckusick struct ite_softc *ip = &ite_softc[unit]; 13641480Smckusick 13741480Smckusick if (ip->flags & ITE_INITED) 13841480Smckusick return; 13941480Smckusick 14041480Smckusick ip->curx = 0; 14141480Smckusick ip->cury = 0; 14241480Smckusick ip->cursorx = 0; 14341480Smckusick ip->cursory = 0; 14441480Smckusick 14541480Smckusick (*itesw[ip->type].ite_init)(ip); 14641480Smckusick (*itesw[ip->type].ite_cursor)(ip, DRAW_CURSOR); 14741480Smckusick 14841480Smckusick ip->attribute = 0; 14941480Smckusick if (ip->attrbuf == NULL) 15041480Smckusick ip->attrbuf = (u_char *) 15141480Smckusick malloc(ip->rows * ip->cols, M_DEVBUF, M_WAITOK); 15241480Smckusick bzero(ip->attrbuf, (ip->rows * ip->cols)); 15341480Smckusick 15441480Smckusick ip->imode = 0; 15541480Smckusick ip->flags |= ITE_INITED; 15641480Smckusick } 15741480Smckusick 15841480Smckusick /* 15941480Smckusick * "Shut down" device as terminal emulator. 16041480Smckusick * Note that we do not deinit the console device unless forced. 16141480Smckusick * Deinit'ing the console every time leads to a very active 16241480Smckusick * screen when processing /etc/rc. 16341480Smckusick */ 16441480Smckusick iteoff(dev, flag) 16541480Smckusick dev_t dev; 16641480Smckusick { 16741480Smckusick register struct ite_softc *ip = &ite_softc[UNIT(dev)]; 16841480Smckusick 16941480Smckusick if (flag & 2) 17041480Smckusick ip->flags |= ITE_INGRF; 17141480Smckusick if ((ip->flags & ITE_ACTIVE) == 0) 17241480Smckusick return; 17341480Smckusick if ((flag & 1) || 17441480Smckusick (ip->flags & (ITE_INGRF|ITE_ISCONS|ITE_INITED)) == ITE_INITED) 17541480Smckusick (*itesw[ip->type].ite_deinit)(ip); 17641480Smckusick if ((flag & 2) == 0) 17741480Smckusick ip->flags &= ~ITE_ACTIVE; 17841480Smckusick } 17941480Smckusick 18049132Skarels /* ARGSUSED */ 18149132Skarels #ifdef __STDC__ 18249132Skarels iteopen(dev_t dev, int mode, int devtype, struct proc *p) 18349132Skarels #else 18449132Skarels iteopen(dev, mode, devtype, p) 18541480Smckusick dev_t dev; 18649132Skarels int mode, devtype; 18749132Skarels struct proc *p; 18849132Skarels #endif 18941480Smckusick { 19041480Smckusick int unit = UNIT(dev); 19141480Smckusick register struct tty *tp = &ite_tty[unit]; 19241480Smckusick register struct ite_softc *ip = &ite_softc[unit]; 19341480Smckusick register int error; 19441480Smckusick int first = 0; 19541480Smckusick 19643409Shibler if ((tp->t_state&(TS_ISOPEN|TS_XCLUDE)) == (TS_ISOPEN|TS_XCLUDE) 19749132Skarels && p->p_ucred->cr_uid != 0) 19841480Smckusick return (EBUSY); 19941480Smckusick if ((ip->flags & ITE_ACTIVE) == 0) { 20041480Smckusick error = iteon(dev, 0); 20141480Smckusick if (error) 20241480Smckusick return (error); 20341480Smckusick first = 1; 20441480Smckusick } 20541480Smckusick tp->t_oproc = itestart; 20641480Smckusick tp->t_param = NULL; 20741480Smckusick tp->t_dev = dev; 20841480Smckusick if ((tp->t_state&TS_ISOPEN) == 0) { 20941480Smckusick ttychars(tp); 21041480Smckusick tp->t_iflag = TTYDEF_IFLAG; 21141480Smckusick tp->t_oflag = TTYDEF_OFLAG; 21241480Smckusick tp->t_cflag = CS8|CREAD; 21341480Smckusick tp->t_lflag = TTYDEF_LFLAG; 21441480Smckusick tp->t_ispeed = tp->t_ospeed = TTYDEF_SPEED; 21541480Smckusick tp->t_state = TS_ISOPEN|TS_CARR_ON; 21641480Smckusick ttsetwater(tp); 21741480Smckusick } 21841480Smckusick error = (*linesw[tp->t_line].l_open)(dev, tp); 21941480Smckusick if (error == 0) { 22041480Smckusick tp->t_winsize.ws_row = ip->rows; 22141480Smckusick tp->t_winsize.ws_col = ip->cols; 22241480Smckusick } else if (first) 22341480Smckusick iteoff(dev, 0); 22441480Smckusick return (error); 22541480Smckusick } 22641480Smckusick 22741480Smckusick /*ARGSUSED*/ 22849750Smarc iteclose(dev, flag, mode, p) 22941480Smckusick dev_t dev; 23049750Smarc int flag, mode; 23149750Smarc struct proc *p; 23241480Smckusick { 23341480Smckusick register struct tty *tp = &ite_tty[UNIT(dev)]; 23441480Smckusick 23549750Smarc (*linesw[tp->t_line].l_close)(tp, flag); 23641480Smckusick ttyclose(tp); 23741480Smckusick iteoff(dev, 0); 23841480Smckusick return(0); 23941480Smckusick } 24041480Smckusick 24141480Smckusick iteread(dev, uio, flag) 24241480Smckusick dev_t dev; 24341480Smckusick struct uio *uio; 24441480Smckusick { 24541480Smckusick register struct tty *tp = &ite_tty[UNIT(dev)]; 24641480Smckusick 24741480Smckusick return ((*linesw[tp->t_line].l_read)(tp, uio, flag)); 24841480Smckusick } 24941480Smckusick 25041480Smckusick itewrite(dev, uio, flag) 25141480Smckusick dev_t dev; 25241480Smckusick struct uio *uio; 25341480Smckusick { 25441480Smckusick int unit = UNIT(dev); 25541480Smckusick register struct tty *tp = &ite_tty[unit]; 25641480Smckusick 25741480Smckusick if ((ite_softc[unit].flags & ITE_ISCONS) && constty && 25841480Smckusick (constty->t_state&(TS_CARR_ON|TS_ISOPEN))==(TS_CARR_ON|TS_ISOPEN)) 25941480Smckusick tp = constty; 26041480Smckusick return ((*linesw[tp->t_line].l_write)(tp, uio, flag)); 26141480Smckusick } 26241480Smckusick 26341480Smckusick iteioctl(dev, cmd, addr, flag) 26441480Smckusick dev_t dev; 26541480Smckusick caddr_t addr; 26641480Smckusick { 26741480Smckusick register struct tty *tp = &ite_tty[UNIT(dev)]; 26841480Smckusick int error; 26941480Smckusick 27041480Smckusick error = (*linesw[tp->t_line].l_ioctl)(tp, cmd, addr, flag); 27141480Smckusick if (error >= 0) 27241480Smckusick return (error); 27341480Smckusick error = ttioctl(tp, cmd, addr, flag); 27441480Smckusick if (error >= 0) 27541480Smckusick return (error); 27641480Smckusick return (ENOTTY); 27741480Smckusick } 27841480Smckusick 279*52390Smckusick void 28041480Smckusick itestart(tp) 28141480Smckusick register struct tty *tp; 28241480Smckusick { 28341480Smckusick register int cc, s; 28441480Smckusick int hiwat = 0; 28541480Smckusick 28641480Smckusick s = spltty(); 28741480Smckusick if (tp->t_state & (TS_TIMEOUT|TS_BUSY|TS_TTSTOP)) { 28841480Smckusick splx(s); 28941480Smckusick return; 29041480Smckusick } 29141480Smckusick tp->t_state |= TS_BUSY; 29241480Smckusick cc = tp->t_outq.c_cc; 29341480Smckusick if (cc <= tp->t_lowat) { 29441480Smckusick if (tp->t_state & TS_ASLEEP) { 29541480Smckusick tp->t_state &= ~TS_ASLEEP; 296*52390Smckusick wakeup((caddr_t)&tp->t_outq); 29741480Smckusick } 29841480Smckusick if (tp->t_wsel) { 29941480Smckusick selwakeup(tp->t_wsel, tp->t_state & TS_WCOLL); 30041480Smckusick tp->t_wsel = 0; 30141480Smckusick tp->t_state &= ~TS_WCOLL; 30241480Smckusick } 30341480Smckusick } 30441480Smckusick /* 30541480Smckusick * Limit the amount of output we do in one burst 30641480Smckusick * to prevent hogging the CPU. 30741480Smckusick */ 30841480Smckusick if (cc > iteburst) { 30941480Smckusick hiwat++; 31041480Smckusick cc = iteburst; 31141480Smckusick } 31241480Smckusick while (--cc >= 0) { 31341480Smckusick register int c; 31441480Smckusick 31541480Smckusick c = getc(&tp->t_outq); 31641480Smckusick /* 31741480Smckusick * iteputchar() may take a long time and we don't want to 31841480Smckusick * block all interrupts for long periods of time. Since 31941480Smckusick * there is no need to stay at high priority while outputing 32041480Smckusick * the character (since we don't have to worry about 32141480Smckusick * interrupts), we don't. We just need to make sure that 32241480Smckusick * we don't reenter iteputchar, which is guarenteed by the 32341480Smckusick * earlier setting of TS_BUSY. 32441480Smckusick */ 32541480Smckusick splx(s); 32641480Smckusick iteputchar(c, tp->t_dev); 32741480Smckusick spltty(); 32841480Smckusick } 32941480Smckusick if (hiwat) { 33041480Smckusick tp->t_state |= TS_TIMEOUT; 33141480Smckusick timeout(ttrstrt, tp, 1); 33241480Smckusick } 33341480Smckusick tp->t_state &= ~TS_BUSY; 33441480Smckusick splx(s); 33541480Smckusick } 33641480Smckusick 33741480Smckusick itefilter(stat, c) 33841480Smckusick register char stat, c; 33941480Smckusick { 34041480Smckusick static int capsmode = 0; 34141480Smckusick static int metamode = 0; 34241480Smckusick register char code, *str; 34341480Smckusick 34441480Smckusick if (kbd_tty == NULL) 34541480Smckusick return; 34641480Smckusick 34741480Smckusick switch (c & 0xFF) { 34841480Smckusick case KBD_CAPSLOCK: 34941480Smckusick capsmode = !capsmode; 35041480Smckusick return; 35141480Smckusick 35241480Smckusick case KBD_EXT_LEFT_DOWN: 35341480Smckusick case KBD_EXT_RIGHT_DOWN: 35441480Smckusick metamode = 1; 35541480Smckusick return; 35641480Smckusick 35741480Smckusick case KBD_EXT_LEFT_UP: 35841480Smckusick case KBD_EXT_RIGHT_UP: 35941480Smckusick metamode = 0; 36041480Smckusick return; 36141480Smckusick } 36241480Smckusick 36341480Smckusick c &= KBD_CHARMASK; 36441480Smckusick switch ((stat>>KBD_SSHIFT) & KBD_SMASK) { 36541480Smckusick 36641480Smckusick case KBD_KEY: 36741480Smckusick if (!capsmode) { 36841480Smckusick code = kbd_keymap[c]; 36941480Smckusick break; 37041480Smckusick } 37141480Smckusick /* fall into... */ 37241480Smckusick 37341480Smckusick case KBD_SHIFT: 37441480Smckusick code = kbd_shiftmap[c]; 37541480Smckusick break; 37641480Smckusick 37741480Smckusick case KBD_CTRL: 37841480Smckusick code = kbd_ctrlmap[c]; 37941480Smckusick break; 38041480Smckusick 38141480Smckusick case KBD_CTRLSHIFT: 38241480Smckusick code = kbd_ctrlshiftmap[c]; 38341480Smckusick break; 38441480Smckusick } 38541480Smckusick 38641480Smckusick if (code == NULL && (str = kbd_stringmap[c]) != NULL) { 38741480Smckusick while (*str) 38841480Smckusick (*linesw[kbd_tty->t_line].l_rint)(*str++, kbd_tty); 38941480Smckusick } else { 39041480Smckusick if (metamode) 39141480Smckusick code |= 0x80; 39241480Smckusick (*linesw[kbd_tty->t_line].l_rint)(code, kbd_tty); 39341480Smckusick } 39441480Smckusick } 39541480Smckusick 39641480Smckusick iteputchar(c, dev) 39741480Smckusick register int c; 39841480Smckusick dev_t dev; 39941480Smckusick { 40041480Smckusick int unit = UNIT(dev); 40141480Smckusick register struct ite_softc *ip = &ite_softc[unit]; 40241480Smckusick register struct itesw *sp = &itesw[ip->type]; 40341480Smckusick register int n; 40441480Smckusick 40541480Smckusick if ((ip->flags & (ITE_ACTIVE|ITE_INGRF)) != ITE_ACTIVE) 40641480Smckusick return; 40741480Smckusick 40841480Smckusick if (ip->escape) { 40941480Smckusick doesc: 41041480Smckusick switch (ip->escape) { 41141480Smckusick 41241480Smckusick case '&': /* Next can be a,d, or s */ 41341480Smckusick if (ip->fpd++) { 41441480Smckusick ip->escape = c; 41541480Smckusick ip->fpd = 0; 41641480Smckusick } 41741480Smckusick return; 41841480Smckusick 41941480Smckusick case 'a': /* cursor change */ 42041480Smckusick switch (c) { 42141480Smckusick 42241480Smckusick case 'Y': /* Only y coord. */ 42341480Smckusick ip->cury = MIN(ip->pos, ip->rows-1); 42441480Smckusick ip->pos = 0; 42541480Smckusick ip->escape = 0; 42641480Smckusick (*sp->ite_cursor)(ip, MOVE_CURSOR); 42741480Smckusick clr_attr(ip, ATTR_INV); 42841480Smckusick break; 42941480Smckusick 43041480Smckusick case 'y': /* y coord first */ 43141480Smckusick ip->cury = MIN(ip->pos, ip->rows-1); 43241480Smckusick ip->pos = 0; 43341480Smckusick ip->fpd = 0; 43441480Smckusick break; 43541480Smckusick 43641480Smckusick case 'C': /* x coord */ 43741480Smckusick ip->curx = MIN(ip->pos, ip->cols-1); 43841480Smckusick ip->pos = 0; 43941480Smckusick ip->escape = 0; 44041480Smckusick (*sp->ite_cursor)(ip, MOVE_CURSOR); 44141480Smckusick clr_attr(ip, ATTR_INV); 44241480Smckusick break; 44341480Smckusick 44441480Smckusick default: /* Possibly a 3 digit number. */ 44541480Smckusick if (c >= '0' && c <= '9' && ip->fpd < 3) { 44641480Smckusick ip->pos = ip->pos * 10 + (c - '0'); 44741480Smckusick ip->fpd++; 44841480Smckusick } else { 44941480Smckusick ip->pos = 0; 45041480Smckusick ip->escape = 0; 45141480Smckusick } 45241480Smckusick break; 45341480Smckusick } 45441480Smckusick return; 45541480Smckusick 45641480Smckusick case 'd': /* attribute change */ 45741480Smckusick switch (c) { 45841480Smckusick 45941480Smckusick case 'B': 46041480Smckusick set_attr(ip, ATTR_INV); 46141480Smckusick break; 46241480Smckusick case 'D': 46341480Smckusick /* XXX: we don't do anything for underline */ 46441480Smckusick set_attr(ip, ATTR_UL); 46541480Smckusick break; 46641480Smckusick case '@': 46741480Smckusick clr_attr(ip, ATTR_ALL); 46841480Smckusick break; 46941480Smckusick } 47041480Smckusick ip->escape = 0; 47141480Smckusick return; 47241480Smckusick 47341480Smckusick case 's': /* keypad control */ 47441480Smckusick switch (ip->fpd) { 47541480Smckusick 47641480Smckusick case 0: 47741480Smckusick ip->hold = c; 47841480Smckusick ip->fpd++; 47941480Smckusick return; 48041480Smckusick 48141480Smckusick case 1: 48241480Smckusick if (c == 'A') { 48341480Smckusick switch (ip->hold) { 48441480Smckusick 48541480Smckusick case '0': 48641480Smckusick clr_attr(ip, ATTR_KPAD); 48741480Smckusick break; 48841480Smckusick case '1': 48941480Smckusick set_attr(ip, ATTR_KPAD); 49041480Smckusick break; 49141480Smckusick } 49241480Smckusick } 49341480Smckusick ip->hold = 0; 49441480Smckusick } 49541480Smckusick ip->escape = 0; 49641480Smckusick return; 49741480Smckusick 49841480Smckusick case 'i': /* back tab */ 49941480Smckusick if (ip->curx > TABSIZE) { 50041480Smckusick n = ip->curx - (ip->curx & (TABSIZE - 1)); 50141480Smckusick ip->curx -= n; 50241480Smckusick } else 50341480Smckusick ip->curx = 0; 50441480Smckusick (*sp->ite_cursor)(ip, MOVE_CURSOR); 50541480Smckusick ip->escape = 0; 50641480Smckusick return; 50741480Smckusick 50841480Smckusick case '3': /* clear all tabs */ 50941480Smckusick goto ignore; 51041480Smckusick 51141480Smckusick case 'K': /* clear_eol */ 51241480Smckusick ite_clrtoeol(ip, sp, ip->cury, ip->curx); 51341480Smckusick ip->escape = 0; 51441480Smckusick return; 51541480Smckusick 51641480Smckusick case 'J': /* clear_eos */ 51741480Smckusick ite_clrtoeos(ip, sp); 51841480Smckusick ip->escape = 0; 51941480Smckusick return; 52041480Smckusick 52141480Smckusick case 'B': /* cursor down 1 line */ 52241480Smckusick if (++ip->cury == ip->rows) { 52341480Smckusick --ip->cury; 52441480Smckusick (*sp->ite_scroll)(ip, 1, 0, 1, SCROLL_UP); 52541480Smckusick ite_clrtoeol(ip, sp, ip->cury, 0); 52641480Smckusick } 52741480Smckusick else 52841480Smckusick (*sp->ite_cursor)(ip, MOVE_CURSOR); 52941480Smckusick clr_attr(ip, ATTR_INV); 53041480Smckusick ip->escape = 0; 53141480Smckusick return; 53241480Smckusick 53341480Smckusick case 'C': /* cursor forward 1 char */ 53441480Smckusick ip->escape = 0; 53541480Smckusick itecheckwrap(ip, sp); 53641480Smckusick return; 53741480Smckusick 53841480Smckusick case 'A': /* cursor up 1 line */ 53941480Smckusick if (ip->cury > 0) { 54041480Smckusick ip->cury--; 54141480Smckusick (*sp->ite_cursor)(ip, MOVE_CURSOR); 54241480Smckusick } 54341480Smckusick ip->escape = 0; 54441480Smckusick clr_attr(ip, ATTR_INV); 54541480Smckusick return; 54641480Smckusick 54741480Smckusick case 'P': /* delete character */ 54841480Smckusick ite_dchar(ip, sp); 54941480Smckusick ip->escape = 0; 55041480Smckusick return; 55141480Smckusick 55241480Smckusick case 'M': /* delete line */ 55341480Smckusick ite_dline(ip, sp); 55441480Smckusick ip->escape = 0; 55541480Smckusick return; 55641480Smckusick 55741480Smckusick case 'Q': /* enter insert mode */ 55841480Smckusick ip->imode = 1; 55941480Smckusick ip->escape = 0; 56041480Smckusick return; 56141480Smckusick 56241480Smckusick case 'R': /* exit insert mode */ 56341480Smckusick ip->imode = 0; 56441480Smckusick ip->escape = 0; 56541480Smckusick return; 56641480Smckusick 56741480Smckusick case 'L': /* insert blank line */ 56841480Smckusick ite_iline(ip, sp); 56941480Smckusick ip->escape = 0; 57041480Smckusick return; 57141480Smckusick 57241480Smckusick case 'h': /* home key */ 57341480Smckusick ip->cury = ip->curx = 0; 57441480Smckusick (*sp->ite_cursor)(ip, MOVE_CURSOR); 57541480Smckusick ip->escape = 0; 57641480Smckusick return; 57741480Smckusick 57841480Smckusick case 'D': /* left arrow key */ 57941480Smckusick if (ip->curx > 0) { 58041480Smckusick ip->curx--; 58141480Smckusick (*sp->ite_cursor)(ip, MOVE_CURSOR); 58241480Smckusick } 58341480Smckusick ip->escape = 0; 58441480Smckusick return; 58541480Smckusick 58641480Smckusick case '1': /* set tab in all rows */ 58741480Smckusick goto ignore; 58841480Smckusick 58941480Smckusick case ESC: 59041480Smckusick if ((ip->escape = c) == ESC) 59141480Smckusick break; 59241480Smckusick ip->fpd = 0; 59341480Smckusick goto doesc; 59441480Smckusick 59541480Smckusick default: 59641480Smckusick ignore: 59741480Smckusick ip->escape = 0; 59841480Smckusick return; 59941480Smckusick 60041480Smckusick } 60141480Smckusick } 60241480Smckusick 60341480Smckusick switch (c &= 0x7F) { 60441480Smckusick 60541480Smckusick case '\n': 60641480Smckusick 60741480Smckusick if (++ip->cury == ip->rows) { 60841480Smckusick --ip->cury; 60941480Smckusick (*sp->ite_scroll)(ip, 1, 0, 1, SCROLL_UP); 61041480Smckusick ite_clrtoeol(ip, sp, ip->cury, 0); 61141480Smckusick } 61241480Smckusick else 61341480Smckusick (*sp->ite_cursor)(ip, MOVE_CURSOR); 61441480Smckusick clr_attr(ip, ATTR_INV); 61541480Smckusick break; 61641480Smckusick 61741480Smckusick case '\r': 61841480Smckusick if (ip->curx) { 61941480Smckusick ip->curx = 0; 62041480Smckusick (*sp->ite_cursor)(ip, MOVE_CURSOR); 62141480Smckusick } 62241480Smckusick break; 62341480Smckusick 62441480Smckusick case '\b': 62541480Smckusick if (--ip->curx < 0) 62641480Smckusick ip->curx = 0; 62741480Smckusick else 62841480Smckusick (*sp->ite_cursor)(ip, MOVE_CURSOR); 62941480Smckusick break; 63041480Smckusick 63141480Smckusick case '\t': 63241480Smckusick if (ip->curx < TABEND(unit)) { 63341480Smckusick n = TABSIZE - (ip->curx & (TABSIZE - 1)); 63441480Smckusick ip->curx += n; 63541480Smckusick (*sp->ite_cursor)(ip, MOVE_CURSOR); 63641480Smckusick } else 63741480Smckusick itecheckwrap(ip, sp); 63841480Smckusick break; 63941480Smckusick 64041480Smckusick case CTRL('G'): 64141480Smckusick if (&ite_tty[unit] == kbd_tty) 64241480Smckusick kbdbell(); 64341480Smckusick break; 64441480Smckusick 64541480Smckusick case ESC: 64641480Smckusick ip->escape = ESC; 64741480Smckusick break; 64841480Smckusick 64941480Smckusick default: 65041480Smckusick if (c < ' ' || c == DEL) 65141480Smckusick break; 65241480Smckusick if (ip->imode) 65341480Smckusick ite_ichar(ip, sp); 65441480Smckusick if ((ip->attribute & ATTR_INV) || attrtest(ip, ATTR_INV)) { 65541480Smckusick attrset(ip, ATTR_INV); 65641480Smckusick (*sp->ite_putc)(ip, c, ip->cury, ip->curx, ATTR_INV); 65741480Smckusick } 65841480Smckusick else 65941480Smckusick (*sp->ite_putc)(ip, c, ip->cury, ip->curx, ATTR_NOR); 66041480Smckusick (*sp->ite_cursor)(ip, DRAW_CURSOR); 66141480Smckusick itecheckwrap(ip, sp); 66241480Smckusick break; 66341480Smckusick } 66441480Smckusick } 66541480Smckusick 66641480Smckusick itecheckwrap(ip, sp) 66741480Smckusick register struct ite_softc *ip; 66841480Smckusick register struct itesw *sp; 66941480Smckusick { 67041480Smckusick if (++ip->curx == ip->cols) { 67141480Smckusick ip->curx = 0; 67241480Smckusick clr_attr(ip, ATTR_INV); 67341480Smckusick if (++ip->cury == ip->rows) { 67441480Smckusick --ip->cury; 67541480Smckusick (*sp->ite_scroll)(ip, 1, 0, 1, SCROLL_UP); 67641480Smckusick ite_clrtoeol(ip, sp, ip->cury, 0); 67741480Smckusick return; 67841480Smckusick } 67941480Smckusick } 68041480Smckusick (*sp->ite_cursor)(ip, MOVE_CURSOR); 68141480Smckusick } 68241480Smckusick 68341480Smckusick ite_dchar(ip, sp) 68441480Smckusick register struct ite_softc *ip; 68541480Smckusick register struct itesw *sp; 68641480Smckusick { 68741480Smckusick (*sp->ite_scroll)(ip, ip->cury, ip->curx + 1, 1, SCROLL_LEFT); 68841480Smckusick attrmov(ip, ip->cury, ip->curx + 1, ip->cury, ip->curx, 68941480Smckusick 1, ip->cols - ip->curx - 1); 69041480Smckusick attrclr(ip, ip->cury, ip->cols - 1, 1, 1); 69141480Smckusick (*sp->ite_putc)(ip, ' ', ip->cury, ip->cols - 1, ATTR_NOR); 69241480Smckusick (*sp->ite_cursor)(ip, DRAW_CURSOR); 69341480Smckusick } 69441480Smckusick 69541480Smckusick ite_ichar(ip, sp) 69641480Smckusick register struct ite_softc *ip; 69741480Smckusick register struct itesw *sp; 69841480Smckusick { 69941480Smckusick (*sp->ite_scroll)(ip, ip->cury, ip->curx, 1, SCROLL_RIGHT); 70041480Smckusick attrmov(ip, ip->cury, ip->curx, ip->cury, ip->curx + 1, 70141480Smckusick 1, ip->cols - ip->curx - 1); 70241480Smckusick attrclr(ip, ip->cury, ip->curx, 1, 1); 70341480Smckusick (*sp->ite_putc)(ip, ' ', ip->cury, ip->curx, ATTR_NOR); 70441480Smckusick (*sp->ite_cursor)(ip, DRAW_CURSOR); 70541480Smckusick } 70641480Smckusick 70741480Smckusick ite_dline(ip, sp) 70841480Smckusick register struct ite_softc *ip; 70941480Smckusick register struct itesw *sp; 71041480Smckusick { 71141480Smckusick (*sp->ite_scroll)(ip, ip->cury + 1, 0, 1, SCROLL_UP); 71241480Smckusick attrmov(ip, ip->cury + 1, 0, ip->cury, 0, 71341480Smckusick ip->rows - ip->cury - 1, ip->cols); 71441480Smckusick ite_clrtoeol(ip, sp, ip->rows - 1, 0); 71541480Smckusick } 71641480Smckusick 71741480Smckusick ite_iline(ip, sp) 71841480Smckusick register struct ite_softc *ip; 71941480Smckusick register struct itesw *sp; 72041480Smckusick { 72141480Smckusick (*sp->ite_scroll)(ip, ip->cury, 0, 1, SCROLL_DOWN); 72241480Smckusick attrmov(ip, ip->cury, 0, ip->cury + 1, 0, 72341480Smckusick ip->rows - ip->cury - 1, ip->cols); 72441480Smckusick ite_clrtoeol(ip, sp, ip->cury, 0); 72541480Smckusick } 72641480Smckusick 72741480Smckusick ite_clrtoeol(ip, sp, y, x) 72841480Smckusick register struct ite_softc *ip; 72941480Smckusick register struct itesw *sp; 73041480Smckusick register int y, x; 73141480Smckusick { 73241480Smckusick (*sp->ite_clear)(ip, y, x, 1, ip->cols - x); 73341480Smckusick attrclr(ip, y, x, 1, ip->cols - x); 73441480Smckusick (*sp->ite_cursor)(ip, DRAW_CURSOR); 73541480Smckusick } 73641480Smckusick 73741480Smckusick ite_clrtoeos(ip, sp) 73841480Smckusick register struct ite_softc *ip; 73941480Smckusick register struct itesw *sp; 74041480Smckusick { 74141480Smckusick (*sp->ite_clear)(ip, ip->cury, 0, ip->rows - ip->cury, ip->cols); 74241480Smckusick attrclr(ip, ip->cury, 0, ip->rows - ip->cury, ip->cols); 74341480Smckusick (*sp->ite_cursor)(ip, DRAW_CURSOR); 74441480Smckusick } 74541480Smckusick 74641480Smckusick /* 74741480Smckusick * Console functions 74841480Smckusick */ 74945788Sbostic #include "../hp300/cons.h" 75041480Smckusick #include "grfioctl.h" 75141480Smckusick #include "grfvar.h" 75241480Smckusick 75341480Smckusick #ifdef DEBUG 75441480Smckusick /* 75541480Smckusick * Minimum ITE number at which to start looking for a console. 75641480Smckusick * Setting to 0 will do normal search, 1 will skip first ITE device, 75741480Smckusick * NITE will skip ITEs and use serial port. 75841480Smckusick */ 75941480Smckusick int whichconsole = 0; 76041480Smckusick #endif 76141480Smckusick 76241480Smckusick itecnprobe(cp) 76341480Smckusick struct consdev *cp; 76441480Smckusick { 76541480Smckusick register struct ite_softc *ip; 76641480Smckusick int i, maj, unit, pri; 76741480Smckusick 76841480Smckusick /* locate the major number */ 76941480Smckusick for (maj = 0; maj < nchrdev; maj++) 77041480Smckusick if (cdevsw[maj].d_open == iteopen) 77141480Smckusick break; 77241480Smckusick 77341480Smckusick /* urk! */ 77441480Smckusick grfconfig(); 77541480Smckusick 77641480Smckusick /* check all the individual displays and find the best */ 77741480Smckusick unit = -1; 77841480Smckusick pri = CN_DEAD; 77941480Smckusick for (i = 0; i < NITE; i++) { 78041480Smckusick struct grf_softc *gp = &grf_softc[i]; 78141480Smckusick 78241480Smckusick ip = &ite_softc[i]; 78341480Smckusick if ((gp->g_flags & GF_ALIVE) == 0) 78441480Smckusick continue; 78541480Smckusick ip->flags = (ITE_ALIVE|ITE_CONSOLE); 78641480Smckusick 78741480Smckusick /* XXX - we need to do something about mapping these */ 78841480Smckusick switch (gp->g_type) { 78941480Smckusick 79041480Smckusick case GT_TOPCAT: 79141480Smckusick case GT_LRCATSEYE: 79241480Smckusick case GT_HRCCATSEYE: 79341480Smckusick case GT_HRMCATSEYE: 79441480Smckusick ip->type = ITE_TOPCAT; 79541480Smckusick break; 79641480Smckusick case GT_GATORBOX: 79741480Smckusick ip->type = ITE_GATORBOX; 79841480Smckusick break; 79941480Smckusick case GT_RENAISSANCE: 80041480Smckusick ip->type = ITE_RENAISSANCE; 80141480Smckusick break; 80241480Smckusick case GT_DAVINCI: 80341480Smckusick ip->type = ITE_DAVINCI; 80441480Smckusick break; 80541480Smckusick } 80641480Smckusick #ifdef DEBUG 80741480Smckusick if (i < whichconsole) 80841480Smckusick continue; 80941480Smckusick #endif 81041480Smckusick if ((int)gp->g_display.gd_regaddr == GRFIADDR) { 81141480Smckusick pri = CN_INTERNAL; 81241480Smckusick unit = i; 81341480Smckusick } else if (unit < 0) { 81441480Smckusick pri = CN_NORMAL; 81541480Smckusick unit = i; 81641480Smckusick } 81741480Smckusick } 81841480Smckusick 81941480Smckusick /* initialize required fields */ 82041480Smckusick cp->cn_dev = makedev(maj, unit); 82141480Smckusick cp->cn_tp = &ite_tty[unit]; 82241480Smckusick cp->cn_pri = pri; 82341480Smckusick } 82441480Smckusick 82541480Smckusick itecninit(cp) 82641480Smckusick struct consdev *cp; 82741480Smckusick { 82841480Smckusick int unit = UNIT(cp->cn_dev); 82941480Smckusick struct ite_softc *ip = &ite_softc[unit]; 83041480Smckusick 83141480Smckusick ip->attrbuf = console_attributes; 83241480Smckusick iteinit(cp->cn_dev); 83341480Smckusick ip->flags |= (ITE_ACTIVE|ITE_ISCONS); 83441480Smckusick kbd_tty = &ite_tty[unit]; 83541480Smckusick } 83641480Smckusick 83741480Smckusick /*ARGSUSED*/ 83841480Smckusick itecngetc(dev) 83941480Smckusick dev_t dev; 84041480Smckusick { 84141480Smckusick register int c; 84241480Smckusick int stat; 84341480Smckusick 84441480Smckusick c = kbdgetc(&stat); 84541480Smckusick switch ((stat >> KBD_SSHIFT) & KBD_SMASK) { 84641480Smckusick case KBD_SHIFT: 84741480Smckusick c = kbd_shiftmap[c & KBD_CHARMASK]; 84841480Smckusick break; 84941480Smckusick case KBD_CTRL: 85041480Smckusick c = kbd_ctrlmap[c & KBD_CHARMASK]; 85141480Smckusick break; 85241480Smckusick case KBD_KEY: 85341480Smckusick c = kbd_keymap[c & KBD_CHARMASK]; 85441480Smckusick break; 85541480Smckusick default: 85641480Smckusick c = 0; 85741480Smckusick break; 85841480Smckusick } 85941480Smckusick return(c); 86041480Smckusick } 86141480Smckusick 86241480Smckusick itecnputc(dev, c) 86341480Smckusick dev_t dev; 86441480Smckusick int c; 86541480Smckusick { 86641480Smckusick static int paniced = 0; 86741480Smckusick struct ite_softc *ip = &ite_softc[UNIT(dev)]; 86841480Smckusick 86941480Smckusick if (panicstr && !paniced && 87041480Smckusick (ip->flags & (ITE_ACTIVE|ITE_INGRF)) != ITE_ACTIVE) { 87141480Smckusick (void) iteon(dev, 3); 87241480Smckusick paniced = 1; 87341480Smckusick } 87441480Smckusick iteputchar(c, dev); 87541480Smckusick } 87641480Smckusick #endif 877