303 lines
8.0 KiB
C
303 lines
8.0 KiB
C
/* $NetBSD: ite.c,v 1.7 1994/10/26 07:27:29 cgd 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. All advertising materials mentioning features or use of this software
|
|
* must display the following acknowledgement:
|
|
* This product includes software developed by the University of
|
|
* California, Berkeley and its contributors.
|
|
* 4. 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)
|
|
*/
|
|
#include <hp300/stand/samachdep.h>
|
|
|
|
#ifdef ITECONSOLE
|
|
|
|
#include <sys/param.h>
|
|
#include <dev/cons.h>
|
|
#include <hp300/dev/device.h>
|
|
#include <hp300/dev/itevar.h>
|
|
#include <hp300/dev/grfreg.h>
|
|
|
|
extern int nodev();
|
|
extern u_char ite_readbyte();
|
|
extern int ite_writeglyph();
|
|
|
|
extern int topcat_init(), topcat_putc();
|
|
extern int topcat_clear(), topcat_cursor(), topcat_scroll();
|
|
extern int gbox_init(), gbox_clear();
|
|
extern int gbox_putc(), gbox_cursor(), gbox_scroll();
|
|
extern int rbox_init(), rbox_clear();
|
|
extern int rbox_putc(), rbox_cursor(), rbox_scroll();
|
|
extern int dvbox_init(), dvbox_clear();
|
|
extern int dvbox_putc(), dvbox_cursor(), dvbox_scroll();
|
|
extern int hyper_init(), hyper_clear();
|
|
extern int hyper_putc(), hyper_cursor(), hyper_scroll();
|
|
|
|
struct itesw itesw[] = {
|
|
GID_TOPCAT,
|
|
topcat_init, nodev, topcat_clear, topcat_putc,
|
|
topcat_cursor, topcat_scroll, ite_readbyte, ite_writeglyph,
|
|
GID_GATORBOX,
|
|
gbox_init, nodev, gbox_clear, gbox_putc,
|
|
gbox_cursor, gbox_scroll, ite_readbyte, ite_writeglyph,
|
|
GID_RENAISSANCE,
|
|
rbox_init, nodev, rbox_clear, rbox_putc,
|
|
rbox_cursor, rbox_scroll, ite_readbyte, ite_writeglyph,
|
|
GID_LRCATSEYE,
|
|
topcat_init, nodev, topcat_clear, topcat_putc,
|
|
topcat_cursor, topcat_scroll, ite_readbyte, ite_writeglyph,
|
|
GID_HRCCATSEYE,
|
|
topcat_init, nodev, topcat_clear, topcat_putc,
|
|
topcat_cursor, topcat_scroll, ite_readbyte, ite_writeglyph,
|
|
GID_HRMCATSEYE,
|
|
topcat_init, nodev, topcat_clear, topcat_putc,
|
|
topcat_cursor, topcat_scroll, ite_readbyte, ite_writeglyph,
|
|
GID_DAVINCI,
|
|
dvbox_init, nodev, dvbox_clear, dvbox_putc,
|
|
dvbox_cursor, dvbox_scroll, ite_readbyte, ite_writeglyph,
|
|
GID_HYPERION,
|
|
hyper_init, nodev, hyper_clear, hyper_putc,
|
|
hyper_cursor, hyper_scroll, ite_readbyte, ite_writeglyph,
|
|
};
|
|
int nitesw = sizeof(itesw) / sizeof(itesw[0]);
|
|
|
|
/* these guys need to be in initialized data */
|
|
int itecons = -1;
|
|
struct ite_softc ite_softc[NITE] = { 0 };
|
|
|
|
/*
|
|
* Locate all bitmapped displays
|
|
*/
|
|
iteconfig()
|
|
{
|
|
extern struct hp_hw sc_table[];
|
|
int dtype, fboff, i;
|
|
struct hp_hw *hw;
|
|
struct grfreg *gr;
|
|
struct ite_softc *ip;
|
|
|
|
i = 0;
|
|
for (hw = sc_table; hw < &sc_table[MAXCTLRS]; hw++) {
|
|
if (!HW_ISDEV(hw, D_BITMAP))
|
|
continue;
|
|
gr = (struct grfreg *) hw->hw_kva;
|
|
/* XXX: redundent but safe */
|
|
if (badaddr((caddr_t)gr) || gr->gr_id != GRFHWID)
|
|
continue;
|
|
for (dtype = 0; dtype < nitesw; dtype++)
|
|
if (itesw[dtype].ite_hwid == gr->gr_id2)
|
|
break;
|
|
if (dtype == nitesw)
|
|
continue;
|
|
if (i >= NITE)
|
|
break;
|
|
ip = &ite_softc[i];
|
|
ip->isw = &itesw[dtype];
|
|
ip->regbase = (caddr_t) gr;
|
|
fboff = (gr->gr_fbomsb << 8) | gr->gr_fbolsb;
|
|
ip->fbbase = (caddr_t) (*((u_char *)ip->regbase+fboff) << 16);
|
|
/* DIO II: FB offset is relative to select code space */
|
|
if (ip->regbase >= (caddr_t)DIOIIBASE)
|
|
ip->fbbase += (int)ip->regbase;
|
|
ip->fbwidth = gr->gr_fbwidth_h << 8 | gr->gr_fbwidth_l;
|
|
ip->fbheight = gr->gr_fbheight_h << 8 | gr->gr_fbheight_l;
|
|
ip->dwidth = gr->gr_dwidth_h << 8 | gr->gr_dwidth_l;
|
|
ip->dheight = gr->gr_dheight_h << 8 | gr->gr_dheight_l;
|
|
/*
|
|
* 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;
|
|
ip->flags = ITE_ALIVE|ITE_CONSOLE;
|
|
i++;
|
|
}
|
|
}
|
|
|
|
#ifdef CONSDEBUG
|
|
/*
|
|
* Allows us to cycle through all possible consoles (NITE ites and serial port)
|
|
* by using SHIFT-RESET on the keyboard.
|
|
*/
|
|
int whichconsole = -1;
|
|
#endif
|
|
|
|
iteprobe(cp)
|
|
struct consdev *cp;
|
|
{
|
|
register int ite;
|
|
register struct ite_softc *ip;
|
|
int unit, pri;
|
|
|
|
#ifdef CONSDEBUG
|
|
whichconsole = ++whichconsole % (NITE+1);
|
|
#endif
|
|
|
|
if (itecons != -1)
|
|
return(1);
|
|
|
|
iteconfig();
|
|
unit = -1;
|
|
pri = CN_DEAD;
|
|
for (ite = 0; ite < NITE; ite++) {
|
|
#ifdef CONSDEBUG
|
|
if (ite < whichconsole)
|
|
continue;
|
|
#endif
|
|
ip = &ite_softc[ite];
|
|
if ((ip->flags & (ITE_ALIVE|ITE_CONSOLE))
|
|
!= (ITE_ALIVE|ITE_CONSOLE))
|
|
continue;
|
|
if ((int)ip->regbase == GRFIADDR) {
|
|
pri = CN_INTERNAL;
|
|
unit = ite;
|
|
} else if (unit < 0) {
|
|
pri = CN_NORMAL;
|
|
unit = ite;
|
|
}
|
|
}
|
|
cp->cn_dev = unit;
|
|
cp->cn_pri = pri;
|
|
}
|
|
|
|
iteinit(cp)
|
|
struct consdev *cp;
|
|
{
|
|
int ite = cp->cn_dev;
|
|
struct ite_softc *ip;
|
|
|
|
if (itecons != -1)
|
|
return(1);
|
|
|
|
ip = &ite_softc[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();
|
|
}
|
|
|
|
iteputchar(c)
|
|
register int c;
|
|
{
|
|
register struct ite_softc *ip = &ite_softc[itecons];
|
|
register struct itesw *sp = ip->isw;
|
|
|
|
c &= 0x7F;
|
|
switch (c) {
|
|
|
|
case '\n':
|
|
if (++ip->cury == ip->rows) {
|
|
ip->cury--;
|
|
(*sp->ite_scroll)(ip, 1, 0, 1, SCROLL_UP);
|
|
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, ATTR_NOR);
|
|
(*sp->ite_cursor)(ip, DRAW_CURSOR);
|
|
itecheckwrap(ip, sp);
|
|
break;
|
|
}
|
|
}
|
|
|
|
itecheckwrap(ip, sp)
|
|
register struct ite_softc *ip;
|
|
register struct itesw *sp;
|
|
{
|
|
if (++ip->curx == ip->cols) {
|
|
ip->curx = 0;
|
|
if (++ip->cury == ip->rows) {
|
|
--ip->cury;
|
|
(*sp->ite_scroll)(ip, 1, 0, 1, SCROLL_UP);
|
|
ite_clrtoeol(ip, sp, ip->cury, 0);
|
|
return;
|
|
}
|
|
}
|
|
(*sp->ite_cursor)(ip, MOVE_CURSOR);
|
|
}
|
|
|
|
ite_clrtoeol(ip, sp, y, x)
|
|
register struct ite_softc *ip;
|
|
register struct itesw *sp;
|
|
register int y, x;
|
|
{
|
|
(*sp->ite_clear)(ip, y, x, 1, ip->cols - x);
|
|
(*sp->ite_cursor)(ip, DRAW_CURSOR);
|
|
}
|
|
|
|
itegetchar()
|
|
{
|
|
#ifdef SMALL
|
|
return (0);
|
|
#else
|
|
return (kbdgetc());
|
|
#endif
|
|
}
|
|
#endif
|