/* $OpenBSD: ite.c,v 1.11 2011/08/18 20:02:58 miod Exp $ */ /* $NetBSD: ite.c,v 1.12 1997/01/30 10:32:55 thorpej Exp $ */ /* * Copyright (c) 1988 University of Utah. * Copyright (c) 1990, 1993 * The Regents of the University of California. All rights reserved. * * This code is derived from software contributed to Berkeley by * the Systems Programming Group of the University of Utah Computer * Science Department. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. * * from: Utah $Hdr: ite.c 1.24 93/06/25$ * * @(#)ite.c 8.1 (Berkeley) 7/8/93 */ /* * Standalone Internal Terminal Emulator (CRT and keyboard) */ #ifdef ITECONSOLE #include #include #include #include #include #include "samachdep.h" #include "consdefs.h" #include "device.h" #include "itevar.h" #include "kbdvar.h" void itecheckwrap(struct ite_data *, struct itesw *); void iteconfig(void); void ite_clrtoeol(struct ite_data *, struct itesw *, int, int); #define GID_STI 0x100 /* any value which is not a DIO fb, really */ struct itesw itesw[] = { { GID_TOPCAT, NULL, topcat_init, ite_dio_clear, ite_dio_putc8bpp, ite_dio_cursor, ite_dio_scroll }, { GID_GATORBOX, NULL, gbox_init, ite_dio_clear, ite_dio_putc8bpp, ite_dio_cursor, gbox_scroll }, { GID_RENAISSANCE, NULL, rbox_init, ite_dio_clear, ite_dio_putc8bpp, ite_dio_cursor, ite_dio_scroll }, { GID_LRCATSEYE, NULL, topcat_init, ite_dio_clear, ite_dio_putc8bpp, ite_dio_cursor, ite_dio_scroll }, { GID_HRCCATSEYE, NULL, topcat_init, ite_dio_clear, ite_dio_putc8bpp, ite_dio_cursor, ite_dio_scroll }, { GID_HRMCATSEYE, NULL, topcat_init, ite_dio_clear, ite_dio_putc8bpp, ite_dio_cursor, ite_dio_scroll }, { GID_DAVINCI, NULL, dvbox_init, ite_dio_clear, ite_dio_putc8bpp, ite_dio_cursor, ite_dio_scroll }, { GID_HYPERION, NULL, hyper_init, ite_dio_clear, ite_dio_putc1bpp, ite_dio_cursor, ite_dio_scroll }, { GID_TIGER, NULL, tvrx_init, ite_dio_clear, ite_dio_putc1bpp, ite_dio_cursor, ite_dio_scroll }, { GID_FB3X2_A, sti_dio_probe, sti_iteinit_dio, sti_clear, sti_putc, sti_cursor, sti_scroll }, { GID_FB3X2_B, sti_dio_probe, sti_iteinit_dio, sti_clear, sti_putc, sti_cursor, sti_scroll }, { GID_STI, NULL, sti_iteinit_sgc, sti_clear, sti_putc, sti_cursor, sti_scroll } }; /* these guys need to be in initialized data */ int itecons = -1; struct ite_data ite_data[NITE] = { { 0 } }; /* * Locate all bitmapped displays */ void iteconfig() { extern struct hp_hw sc_table[]; int dtype, fboff, slotno, i; u_int8_t *va; struct hp_hw *hw; struct diofbreg *fb; struct ite_data *ip; i = 0; for (hw = sc_table; hw < &sc_table[MAXCTLRS]; hw++) { if (!HW_ISDEV(hw, D_BITMAP)) continue; fb = (struct diofbreg *)hw->hw_kva; /* XXX: redundent but safe */ if (badaddr((caddr_t)fb) || fb->id != GRFHWID) continue; for (dtype = 0; dtype < nitems(itesw); dtype++) if (itesw[dtype].ite_hwid == fb->fbid) break; if (dtype == nitems(itesw)) continue; if (i >= NITE) break; ip = &ite_data[i]; ip->scode = hw->hw_sc; ip->isw = &itesw[dtype]; ip->regbase = (caddr_t)fb; fboff = (fb->fbomsb << 8) | fb->fbolsb; ip->fbbase = (caddr_t) (*((u_char *)ip->regbase+fboff) << 16); /* DIO II: FB offset is relative to select code space */ if (DIO_ISDIOII(ip->scode)) ip->fbbase += (int)ip->regbase; ip->fbwidth = fb->fbwmsb << 8 | fb->fbwlsb; ip->fbheight = fb->fbhmsb << 8 | fb->fbhlsb; ip->dwidth = fb->dwmsb << 8 | fb->dwlsb; ip->dheight = fb->dhmsb << 8 | fb->dhlsb; /* * XXX some displays (e.g. the davinci) appear * to return a display height greater than the * returned FB height. Guess we should go back * to getting the display dimensions from the * fontrom... */ if (ip->dwidth > ip->fbwidth) ip->dwidth = ip->fbwidth; if (ip->dheight > ip->fbheight) ip->dheight = ip->fbheight; /* confirm hardware is what we think it is */ if (itesw[dtype].ite_probe != NULL && (*itesw[dtype].ite_probe)(ip) != 0) continue; ip->alive = 1; i++; } /* * Now probe for SGC frame buffers. */ switch (machineid) { case HP_400: case HP_425: case HP_433: break; default: return; } /* SGC frame buffers can only be STI... */ for (dtype = 0; dtype < nitems(itesw); dtype++) if (itesw[dtype].ite_hwid == GID_STI) break; if (dtype == nitems(itesw)) return; for (slotno = 0; slotno < SGC_NSLOTS; slotno++) { va = (u_int8_t *)IIOV(SGC_BASE + (slotno * SGC_DEVSIZE)); /* Check to see if hardware exists. */ if (badaddr(va) != 0) continue; /* Check hardware. */ if (va[3] == STI_DEVTYPE1) { if (i >= NITE) break; ip = &ite_data[i]; ip->scode = slotno; ip->isw = &itesw[dtype]; ip->regbase = (caddr_t)GRFIADDR; /* to get CN_MIDPRI */ /* ...and do not need an ite_probe() check */ ip->alive = 1; i++; /* we only support one SGC frame buffer at the moment */ break; } } } void iteprobe(struct consdev *cp) { int ite; struct ite_data *ip; int unit, pri; iteconfig(); unit = -1; pri = CN_DEAD; for (ite = 0; ite < NITE; ite++) { ip = &ite_data[ite]; if (ip->alive == 0) continue; if ((int)ip->regbase == GRFIADDR) { pri = CN_MIDPRI; unit = ite; } else if (unit < 0) { pri = CN_LOWPRI; unit = ite; } } cp->cn_dev = unit; cp->cn_pri = pri; } void iteinit(struct consdev *cp) { int ite = cp->cn_dev; struct ite_data *ip; ip = &ite_data[ite]; ip->curx = 0; ip->cury = 0; ip->cursorx = 0; ip->cursory = 0; (*ip->isw->ite_init)(ip); (*ip->isw->ite_cursor)(ip, DRAW_CURSOR); itecons = ite; kbdinit(); } /* ARGSUSED */ void iteputchar(dev_t dev, int c) { struct ite_data *ip = &ite_data[itecons]; struct itesw *sp = ip->isw; c &= 0x7F; switch (c) { case '\n': if (++ip->cury == ip->rows) { ip->cury--; (*sp->ite_scroll)(ip); ite_clrtoeol(ip, sp, ip->cury, 0); } else (*sp->ite_cursor)(ip, MOVE_CURSOR); break; case '\r': ip->curx = 0; (*sp->ite_cursor)(ip, MOVE_CURSOR); break; case '\b': if (--ip->curx < 0) ip->curx = 0; else (*sp->ite_cursor)(ip, MOVE_CURSOR); break; default: if (c < ' ' || c == 0177) break; (*sp->ite_putc)(ip, c, ip->cury, ip->curx); (*sp->ite_cursor)(ip, DRAW_CURSOR); itecheckwrap(ip, sp); break; } } void itecheckwrap(struct ite_data *ip, struct itesw *sp) { if (++ip->curx == ip->cols) { ip->curx = 0; if (++ip->cury == ip->rows) { --ip->cury; (*sp->ite_scroll)(ip); ite_clrtoeol(ip, sp, ip->cury, 0); return; } } (*sp->ite_cursor)(ip, MOVE_CURSOR); } void ite_clrtoeol(struct ite_data *ip, struct itesw *sp, int y, int x) { (*sp->ite_clear)(ip, y, x, 1, ip->cols - x); (*sp->ite_cursor)(ip, DRAW_CURSOR); } /* ARGSUSED */ int itegetchar(dev_t dev) { #ifdef SMALL return (0); #else return (kbdgetc()); #endif } #endif