Aren
/
NetBSD
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
NetBSD/sys/arch/i386/isa/pcvt/pcvt_drv.c

1366 lines
28 KiB
C
Raw Blame History

/*
* Copyright (c) 1992, 1995 Hellmuth Michaelis and Joerg Wunsch.
*
* Copyright (c) 1992, 1993 Brian Dunford-Shore and Scott Turner.
*
* Copyright (c) 1993 Charles Hannum.
*
* All rights reserved.
*
* Parts of this code regarding the NetBSD interface were written
* by Charles Hannum.
*
* This code is derived from software contributed to Berkeley by
* William Jolitz and Don Ahn.
*
* 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
* Hellmuth Michaelis, Brian Dunford-Shore, Joerg Wunsch, Scott Turner
* and Charles Hannum.
* 4. The name authors may not be used to endorse or promote products
* derived from this software without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``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 AUTHORS 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.
*
*
* @(#)pcvt_drv.c, 3.32, Last Edit-Date: [Tue Oct 3 11:19:47 1995]
*
*/
/*---------------------------------------------------------------------------*
*
* pcvt_drv.c VT220 Driver Main Module / OS - Interface
* ---------------------------------------------------------
* -hm ------------ Release 3.00 --------------
* -hm integrating NetBSD-current patches
* -hm adding ttrstrt() proto for NetBSD 0.9
* -hm kernel/console output cursor positioning fixed
* -hm kernel/console output switches optional to screen 0
* -hm FreeBSD 1.1 porting
* -hm the NetBSD 0.9 compiler detected a nondeclared var which was
* NOT detected by neither the NetBSD-current nor FreeBSD 1.x!
* -hm including Michael's keyboard fifo code
* -hm Joergs patch for FreeBSD tty-malloc code
* -hm adjustments for NetBSD-current
* -hm FreeBSD bugfix from Joerg re timeout/untimeout casts
* -jw including Thomas Gellekum's FreeBSD 1.1.5 patch
* -hm adjusting #if's for NetBSD-current
* -hm applying Joerg's patch for FreeBSD 2.0
* -hm patch from Onno & Martin for NetBSD-current (post 1.0)
* -hm some adjustments for NetBSD 1.0
* -hm NetBSD PR #400: screen size report for new session
* -hm patch from Rafael Boni/Lon Willett for NetBSD-current
* -hm bell patch from Thomas Eberhardt for NetBSD
* -hm multiple X server bugfixes from Lon Willett
* -hm patch from joerg - pcdevtotty for FreeBSD pre-2.1
* -hm delay patch from Martin Husemann after port-i386 ml-discussion
* -jw add some code to provide more FreeBSD pre-2.1 support
* -hm patches from Michael for NetBSD-current (Apr/21/95) support
* -hm merged in changes from FreeBSD 2.0.5-RELEASE
* -hm NetBSD-current patches from John Kohl
* -hm ---------------- Release 3.30 -----------------------
* -hm patch from Joerg in pcopen() to make mouse emulator work again
* -hm patch from Frank van der Linden for keyboard state per VT
* -hm no TS_ASLEEP anymore in FreeBSD 2.1.0 SNAP 950928
* -hm ---------------- Release 3.32 -----------------------
*
*---------------------------------------------------------------------------*/
#include "vt.h"
#if NVT > 0
#define EXTERN /* allocate mem */
#include "pcvt_hdr.h" /* global include */
#ifdef NOTDEF
unsigned __debug = 0; /*0xffe */;
static __color;
static nrow;
#endif
static void vgapelinit(void); /* read initial VGA DAC palette */
int getchar(void);
#if PCVT_FREEBSD > 205
static struct kern_devconf kdc_vt[];
static inline void
vt_registerdev(struct isa_device *id, const char *name);
static char vt_description[];
#define VT_DESCR_LEN 40
#endif /* PCVT_FREEBSD > 205 */
#if PCVT_NETBSD > 100
void pccnpollc(Dev_t, int);
#endif
#if PCVT_NETBSD > 100
int pcprobe(struct device *, void *, void *);
#endif
#if PCVT_NETBSD > 9
void pcattach(struct device *, struct device *, void *);
#endif
#if PCVT_NETBSD > 100 /* NetBSD-current Feb 20 1995 */
int
pcprobe(struct device *parent, void *match, void *aux)
#else /* !PCVT_NETBSD > 100 */
#if PCVT_NETBSD > 9
int
pcprobe(struct device *parent, struct device *self, void *aux)
#else /* !PCVT_NETBSD > 9 */
int
pcprobe(struct isa_device *dev)
#endif /* PCVT_NETBSD > 9 */
#endif /* PCVT_NETBSD > 100 */
{
kbd_code_init();
#if PCVT_NETBSD > 9
((struct isa_attach_args *)aux)->ia_iosize = 16;
return 1;
#else /* !PCVT_NETBSD > 9 */
#if PCVT_NETBSD || PCVT_FREEBSD
return (16);
#else
return 1;
#endif /* PCVT_NETBSD || PCVT_FREEBSD */
#endif /* PCVT_NETBSD > 9 */
}
#if PCVT_NETBSD > 9
void
pcattach(struct device *parent, struct device *self, void *aux)
{
struct isa_attach_args *ia = aux;
#if PCVT_NETBSD > 101
struct vt_softc *sc = (void *) self;
#else /* !PCVT_NETBSD > 101 */
static struct intrhand vthand;
#endif /* PCVT_NETBSD > 101 */
#else /* !PCVT_NETBSD > 9 */
int
pcattach(struct isa_device *dev)
{
#endif /* PCVT_NETBSD > 9 */
int i;
if(do_initialization)
vt_coldinit();
vt_coldmalloc(); /* allocate memory for screens */
#if PCVT_NETBSD || PCVT_FREEBSD
#if PCVT_NETBSD > 9
printf(": ");
#else
printf("vt%d: ", dev->id_unit);
#endif /* PCVT_NETBSD > 9 */
switch(adaptor_type)
{
case MDA_ADAPTOR:
printf("mda");
break;
case CGA_ADAPTOR:
printf("cga");
break;
case EGA_ADAPTOR:
printf("ega");
break;
case VGA_ADAPTOR:
printf("%s, ", (char *)vga_string(vga_type));
if(can_do_132col)
printf("80/132 col");
else
printf("80 col");
vgapelinit();
break;
default:
printf("unknown");
break;
}
if(color == 0)
printf(", mono");
else
printf(", color");
printf(", %d scr, ", totalscreens);
switch(keyboard_type)
{
case KB_AT:
printf("at-");
break;
case KB_MFII:
printf("mf2-");
break;
default:
printf("unknown ");
break;
}
printf("kbd, [R%s]\n", PCVT_REL);
#if PCVT_NETBSD || (PCVT_FREEBSD > 110 && PCVT_FREEBSD < 200)
for(i = 0; i < totalscreens; i++)
{
#if PCVT_NETBSD > 100
vs[i].vs_tty = ttymalloc();
#else /* !PCVT_NETBSD > 100 */
#if PCVT_NETBSD
pc_tty[i] = ttymalloc();
vs[i].vs_tty = pc_tty[i];
#else /* !PCVT_NETBSD */
pccons[i] = ttymalloc(pccons[i]);
vs[i].vs_tty = pccons[i];
#endif /* PCVT_NETBSD */
#endif /* PCVT_NETBSD > 100 */
}
#if PCVT_EMU_MOUSE
#if PCVT_NETBSD
pc_tty[totalscreens] = ttymalloc(); /* the mouse emulator tty */
#else /* !PCVT_NETBSD */
/* the mouse emulator tty */
pc_tty[totalscreens] = ttymalloc(pccons[totalscreens]);
#endif /* PCVT_NETBSD */
#endif /* PCVT_EMU_MOUSE */
#if PCVT_NETBSD
pcconsp = vs[0].vs_tty;
#else /* !PCVT_NETBSD */
pcconsp = pccons[0];
#endif /* PCVT_NETBSD */
#endif /* #if PCVT_NETBSD || (PCVT_FREEBSD > 110 && PCVT_FREEBSD < 200) */
#else /* !PCVT_NETBSD && !PCVT_FREEBSD*/
switch(adaptor_type)
{
case MDA_ADAPTOR:
printf(" <mda");
break;
case CGA_ADAPTOR:
printf(" <cga");
break;
case EGA_ADAPTOR:
printf(" <ega");
break;
case VGA_ADAPTOR:
printf(" <%s,", (char *)vga_string(vga_type));
if(can_do_132col)
printf("80/132 col");
else
printf("80 col");
vgapelinit();
break;
default:
printf(" <unknown");
break;
}
if(color == 0)
printf(",mono");
else
printf(",color");
printf(",%d scr,", totalscreens);
switch(keyboard_type)
{
case KB_AT:
printf("at-");
break;
case KB_MFII:
printf("mf2-");
break;
default:
printf("unknown ");
break;
}
printf("kbd,[R%s]>", PCVT_REL);
#endif /* PCVT_NETBSD || PCVT_FREEBSD */
#if !PCVT_NETBSD && !(PCVT_FREEBSD > 110 && PCVT_FREEBSD < 200)
for(i = 0; i < totalscreens; i++)
vs[i].vs_tty = &pccons[i];
#endif /* !PCVT_NETBSD && !(PCVT_FREEBSD > 110 && PCVT_FREEBSD < 200) */
async_update();
#if PCVT_FREEBSD > 205
/* mark the device busy now if we are the console */
kdc_vt[dev->id_unit].kdc_state =
pcvt_is_console? DC_IDLE: DC_BUSY;
vt_registerdev(dev, (char *)vga_string(vga_type));
#endif /* PCVT_FREEBSD > 205 */
#if PCVT_NETBSD > 9
#if PCVT_NETBSD > 101
sc->sc_ih = isa_intr_establish(ia->ia_ic, ia->ia_irq, IST_EDGE,
IPL_TTY, pcintr, (void *)0);
#if PCVT_NETBSD > 110
/*
* Look for children of the keyboard controller.
* XXX Really should decouple keyboard controller
* from the console code.
*/
while (config_found(self, ia->ia_ic, NULL) != NULL)
/* will break when no more children */ ;
#endif /* PCVT_NETBSD > 110 */
#else /* PCVT_NETBSD > 100 */
vthand.ih_fun = pcrint;
vthand.ih_arg = 0;
vthand.ih_level = IPL_TTY;
intr_establish(ia->ia_irq, &vthand);
#endif /* PCVT_NETBSD > 100 */
#else /* PCVT_NETBSD > 9 */
return 1;
#endif /* PCVT_NETBSD > 9 */
}
/* had a look at the friedl driver */
#if !PCVT_NETBSD
struct tty *
get_pccons(Dev_t dev)
{
register int i = minor(dev);
#if PCVT_EMU_MOUSE
if(i == totalscreens)
#if !(PCVT_FREEBSD > 110 && PCVT_FREEBSD < 200)
return(&pccons[i]);
#else
return(pccons[i]);
#endif /* !(PCVT_FREEBSD > 110 && PCVT_FREEBSD < 200) */
#endif /* PCVT_EMU_MOUSE */
if(i >= PCVT_NSCREENS)
return(NULL);
#if !(PCVT_FREEBSD > 110 && PCVT_FREEBSD < 200)
return(&pccons[i]);
#else
return(pccons[i]);
#endif
}
#else
struct tty *
get_pccons(Dev_t dev)
{
register int i = minor(dev);
#if PCVT_EMU_MOUSE
if(i == totalscreens)
return(pc_tty[i]);
#endif /* PCVT_EMU_MOUSE */
if(i >= PCVT_NSCREENS)
return(NULL);
return(vs[i].vs_tty);
}
#endif /* !PCVT_NETBSD */
/*---------------------------------------------------------------------------*
* /dev/ttyc0, /dev/ttyc1, etc.
*---------------------------------------------------------------------------*/
int
pcopen(Dev_t dev, int flag, int mode, struct proc *p)
{
register struct tty *tp;
register struct video_state *vsx;
int s, retval;
int winsz = 0;
int i = minor(dev);
#if PCVT_EMU_MOUSE
if(i == totalscreens)
vsx = 0;
else
#endif /* PCVT_EMU_MOUSE */
vsx = &vs[i];
if((tp = get_pccons(dev)) == NULL)
return ENXIO;
#if PCVT_EMU_MOUSE
if(i == totalscreens)
{
if(mouse.opened == 0)
mouse.buttons = mouse.extendedseen =
mouse.breakseen = mouse.lastmove.tv_sec = 0;
mouse.minor = i;
mouse.opened++;
}
else
#endif /* PCVT_EMU_MOUSE */
vsx->openf++;
tp->t_oproc = pcstart;
tp->t_param = pcparam;
tp->t_dev = dev;
if ((tp->t_state & TS_ISOPEN) == 0)
{
#if !(PCVT_FREEBSD > 114)
tp->t_state |= TS_WOPEN;
#endif /* !(PCVT_FREEBSD > 114) */
ttychars(tp);
tp->t_iflag = TTYDEF_IFLAG;
tp->t_oflag = TTYDEF_OFLAG;
tp->t_cflag = TTYDEF_CFLAG;
tp->t_lflag = TTYDEF_LFLAG;
tp->t_ispeed = tp->t_ospeed = TTYDEF_SPEED;
pcparam(tp, &tp->t_termios);
ttsetwater(tp);
}
else if (tp->t_state & TS_XCLUDE && p->p_ucred->cr_uid != 0)
return (EBUSY);
tp->t_state |= TS_CARR_ON;
tp->t_cflag |= CLOCAL; /* cannot be a modem (:-) */
if ((tp->t_state & TS_ISOPEN) == 0) /* is this a "cold" open ? */
winsz = 1; /* yes, set winsize later */
#if PCVT_NETBSD || (PCVT_FREEBSD >= 200)
retval = ((*linesw[tp->t_line].l_open)(dev, tp));
#else
retval = ((*linesw[tp->t_line].l_open)(dev, tp, flag));
#endif /* PCVT_NETBSD || (PCVT_FREEBSD >= 200) */
if(winsz == 1
#if PCVT_EMU_MOUSE
&& vsx /* the mouse device has no vsx */
#endif /* PCVT_EMU_MOUSE */
)
{
/*
* The line discipline has clobbered t_winsize if TS_ISOPEN
* was clear. (NetBSD PR #400 from Bill Sommerfeld)
* We have to do this after calling the open routine, because
* it does some other things in other/older *BSD releases -hm
*/
s = spltty();
tp->t_winsize.ws_col = vsx->maxcol;
tp->t_winsize.ws_row = vsx->screen_rows;
tp->t_winsize.ws_xpixel = (vsx->maxcol == 80)? 720: 1056;
tp->t_winsize.ws_ypixel = 400;
splx(s);
}
#if PCVT_FREEBSD > 205
if(retval == 0)
{
/* XXX currently, only one vt device is supported */
kdc_vt[0].kdc_state = DC_BUSY;
}
#endif
return(retval);
}
int
pcclose(Dev_t dev, int flag, int mode, struct proc *p)
{
register struct tty *tp;
register struct video_state *vsx;
int i = minor(dev);
#if PCVT_EMU_MOUSE
if(i == totalscreens)
vsx = 0;
else
#endif /* PCVT_EMU_MOUSE */
vsx = &vs[i];
if((tp = get_pccons(dev)) == NULL)
return ENXIO;
(*linesw[tp->t_line].l_close)(tp, flag);
ttyclose(tp);
#if PCVT_EMU_MOUSE
if(i == totalscreens)
mouse.opened = 0;
else
#endif /* PCVT_EMU_MOUSE */
vsx->openf = 0;
#if PCVT_EMU_MOUSE
if(i == totalscreens)
return (0);
#endif /* PCVT_EMU_MOUSE */
reset_usl_modes(vsx);
#if PCVT_FREEBSD > 205
if(!pcvt_is_console)
{
/* XXX currently, only one vt device is supported */
kdc_vt[0].kdc_state = DC_IDLE;
}
#endif
return(0);
}
int
pcread(Dev_t dev, struct uio *uio, int flag)
{
register struct tty *tp;
if((tp = get_pccons(dev)) == NULL)
return ENXIO;
return ((*linesw[tp->t_line].l_read)(tp, uio, flag));
}
int
pcwrite(Dev_t dev, struct uio *uio, int flag)
{
register struct tty *tp;
if((tp = get_pccons(dev)) == NULL)
return ENXIO;
return ((*linesw[tp->t_line].l_write)(tp, uio, flag));
}
#if PCVT_NETBSD > 101
struct tty *
pctty(Dev_t dev)
{
register struct tty *tp;
if((tp = get_pccons(dev)) == NULL)
return 0;
return tp;
}
#endif /* PCVT_NETBSD > 101 */
int
pcioctl(Dev_t dev, int cmd, caddr_t data, int flag, struct proc *p)
{
register error;
register struct tty *tp;
if((tp = get_pccons(dev)) == NULL)
return(ENXIO);
/* note that some ioctl's are global, e.g. KBSTPMAT: There is
* only one keyboard and different repeat rates for instance between
* sessions are a suspicious wish. If you really need this make the
* appropriate variables arrays
*/
#if PCVT_EMU_MOUSE
if(minor(dev) == totalscreens)
{
if((error = mouse_ioctl(dev, cmd, data)) >= 0)
return error;
goto do_standard;
}
#endif /* PCVT_EMU_MOUSE */
if((error = usl_vt_ioctl(dev, cmd, data, flag, p)) >= 0)
return (error == PCVT_ERESTART) ? ERESTART : error;
#ifdef XSERVER
/*
* just for compatibility:
* XFree86 < 2.0 and SuperProbe still might use it
*
* NB: THIS IS A HACK! Do not use it unless you explicitly need.
* Especially, since the vty is not put into process-controlled
* mode (this would require the application to co-operate), any
* attempts to switch vtys while this kind of X mode is active
* may cause serious trouble.
*/
switch(cmd)
{
case CONSOLE_X_MODE_ON:
{
int i;
if((error = usl_vt_ioctl(dev, KDENABIO, 0, flag, p)) > 0)
return error;
i = KD_GRAPHICS;
if((error = usl_vt_ioctl(dev, KDSETMODE, (caddr_t)&i, flag, p))
> 0)
return error;
i = K_RAW;
error = usl_vt_ioctl(dev, KDSKBMODE, (caddr_t)&i, flag, p);
return error;
}
case CONSOLE_X_MODE_OFF:
{
int i;
(void)usl_vt_ioctl(dev, KDDISABIO, 0, flag, p);
i = KD_TEXT;
(void)usl_vt_ioctl(dev, KDSETMODE, (caddr_t)&i, flag, p);
i = K_XLATE;
(void)usl_vt_ioctl(dev, KDSKBMODE, (caddr_t)&i, flag, p);
return 0;
}
case CONSOLE_X_BELL:
/*
* If `data' is non-null, the first int value denotes
* the pitch, the second a duration. Otherwise, behaves
* like BEL.
*/
if (data)
{
#if PCVT_NETBSD
sysbeep(((int *)data)[0],
((int *)data)[1] * hz / 1000);
#else /* PCVT_NETBSD */
sysbeep(PCVT_SYSBEEPF / ((int *)data)[0],
((int *)data)[1] * hz / 3000);
#endif /* PCVT_NETBSD */
}
else
{
sysbeep(PCVT_SYSBEEPF / 1493, hz / 4);
}
return (0);
default: /* fall through */ ;
}
#endif /* XSERVER */
if((error = kbdioctl(dev,cmd,data,flag)) >= 0)
return error;
if((error = vgaioctl(dev,cmd,data,flag)) >= 0)
return error;
#if PCVT_EMU_MOUSE
do_standard:
#endif /* PCVT_EMU_MOUSE */
#if PCVT_NETBSD > 9 || PCVT_FREEBSD >= 200
if((error = (*linesw[tp->t_line].l_ioctl)(tp, cmd, data, flag, p)) >= 0)
return (error);
#else
if((error = (*linesw[tp->t_line].l_ioctl)(tp, cmd, data, flag)) >= 0)
return(error);
#endif /* PCVT_NETBSD > 9 || PCVT_FREEBSD >= 200 */
#if PCVT_NETBSD > 9
if((error = ttioctl(tp, cmd, data, flag, p)) >= 0)
return (error);
#else
if((error = ttioctl(tp, cmd, data, flag)) >= 0)
return (error);
#endif /* PCVT_NETBSD > 9 */
return (ENOTTY);
}
int
pcmmap(Dev_t dev, int offset, int nprot)
{
if (offset > 0x20000)
return -1;
return i386_btop((0xa0000 + offset));
}
#if PCVT_FREEBSD > 205
struct tty *
pcdevtotty(Dev_t dev)
{
return get_pccons(dev);
}
static char vt_descr[VT_DESCR_LEN] = "Graphics console: ";
static struct kern_devconf kdc_vt[NVT] = {
0, 0, 0, /* filled in by dev_attach */
"vt", 0, { MDDT_ISA, 0, "tty" },
isa_generic_externalize, 0, 0, ISA_EXTERNALLEN,
&kdc_isa0, /* parent */
0, /* parentdata */
DC_UNCONFIGURED, /* until we know it better */
vt_descr
};
static inline void
vt_registerdev(struct isa_device *id, const char *name)
{
if(id->id_unit)
kdc_vt[id->id_unit] = kdc_vt[0];
kdc_vt[id->id_unit].kdc_unit = id->id_unit;
kdc_vt[id->id_unit].kdc_isa = id;
/* XXX only vt0 currently allowed */
strncpy(vt_descr + sizeof("Graphics console: ") - 1,
name,
VT_DESCR_LEN - sizeof("Graphics console: "));
dev_attach(&kdc_vt[id->id_unit]);
}
#endif /* PCVT_FREEBSD > 205 */
/*---------------------------------------------------------------------------*
*
* handle a keyboard receive interrupt
*
* NOTE: the keyboard is multiplexed by means of "pcconsp"
* between virtual screens. pcconsp - switching is done in
* the vgapage() routine
*
*---------------------------------------------------------------------------*/
#if PCVT_KBD_FIFO
u_char pcvt_kbd_fifo[PCVT_KBD_FIFO_SZ];
int pcvt_kbd_wptr = 0;
int pcvt_kbd_rptr = 0;
short pcvt_kbd_count= 0;
static u_char pcvt_timeout_scheduled = 0;
static void pcvt_timeout (void *arg)
{
u_char *cp;
#if PCVT_SLOW_INTERRUPT
int s;
#endif
pcvt_timeout_scheduled = 0;
#if PCVT_SCREENSAVER
pcvt_scrnsv_reset();
#endif /* PCVT_SCREENSAVER */
while (pcvt_kbd_count)
{
if (((cp = sgetc(1)) != 0) &&
(vs[current_video_screen].openf))
{
#if PCVT_NULLCHARS
if(*cp == '\0')
{
/* pass a NULL character */
(*linesw[pcconsp->t_line].l_rint)('\0', pcconsp);
}
/* XXX */ else
#endif /* PCVT_NULLCHARS */
while (*cp)
(*linesw[pcconsp->t_line].l_rint)(*cp++ & 0xff, pcconsp);
}
PCVT_DISABLE_INTR ();
if (!pcvt_kbd_count)
pcvt_timeout_scheduled = 0;
PCVT_ENABLE_INTR ();
}
return;
}
#endif
#if PCVT_NETBSD > 101
int
pcintr(void *arg)
#else
int
pcrint(void)
#endif
{
#if PCVT_KBD_FIFO
u_char dt;
u_char ret = -1;
# if PCVT_SLOW_INTERRUPT
int s;
# endif
#else /* !PCVT_KBD_FIFO */
u_char *cp;
#endif /* PCVT_KBD_FIFO */
#if PCVT_SCREENSAVER
pcvt_scrnsv_reset();
#endif /* PCVT_SCREENSAVER */
#if PCVT_KBD_FIFO
if (kbd_polling)
{
if(sgetc(1) == 0)
return -1;
else
return 1;
}
while (inb(CONTROLLER_CTRL) & STATUS_OUTPBF) /* check 8042 buffer */
{
ret = 1; /* got something */
PCVT_KBD_DELAY(); /* 7 us delay */
dt = inb(CONTROLLER_DATA); /* get it 8042 data */
if (pcvt_kbd_count >= PCVT_KBD_FIFO_SZ) /* fifo overflow ? */
{
log (LOG_WARNING, "pcvt: keyboard buffer overflow\n");
}
else
{
pcvt_kbd_fifo[pcvt_kbd_wptr++] = dt; /* data -> fifo */
PCVT_DISABLE_INTR (); /* XXX necessary ? */
pcvt_kbd_count++; /* update fifo count */
PCVT_ENABLE_INTR ();
if (pcvt_kbd_wptr >= PCVT_KBD_FIFO_SZ)
pcvt_kbd_wptr = 0; /* wraparound pointer */
}
}
if (ret == 1) /* got data from keyboard ? */
{
if (!pcvt_timeout_scheduled) /* if not already active .. */
{
PCVT_DISABLE_INTR ();
pcvt_timeout_scheduled = 1; /* flag active */
timeout((TIMEOUT_FUNC_T)pcvt_timeout, (caddr_t) 0, 1); /* fire off */
PCVT_ENABLE_INTR ();
}
}
return (ret);
#else /* !PCVT_KBD_FIFO */
if((cp = sgetc(1)) == 0)
return -1;
if (kbd_polling)
return 1;
if(!(vs[current_video_screen].openf)) /* XXX was vs[minor(dev)] */
return 1;
#if PCVT_NULLCHARS
if(*cp == '\0')
{
/* pass a NULL character */
(*linesw[pcconsp->t_line].l_rint)('\0', pcconsp);
return 1;
}
#endif /* PCVT_NULLCHARS */
while (*cp)
(*linesw[pcconsp->t_line].l_rint)(*cp++ & 0xff, pcconsp);
return 1;
#endif /* PCVT_KBD_FIFO */
}
#if PCVT_NETBSD || PCVT_FREEBSD >= 200
#if PCVT_NETBSD == 9
extern void ttrstrt();
#endif /* PCVT_NETBSD == 9 */
void
pcstart(register struct tty *tp)
{
int s, len;
u_char buf[PCVT_PCBURST];
s = spltty();
if (tp->t_state & (TS_TIMEOUT|TS_BUSY|TS_TTSTOP))
goto out;
if (tp->t_outq.c_cc == 0 &&
tp->t_wsel.si_pid == 0)
{
async_update();
goto low;
}
tp->t_state |= TS_BUSY;
splx(s);
/*
* We need to do this outside spl since it could be fairly
* expensive and we don't want our serial ports to overflow.
*/
while ((len = q_to_b(&tp->t_outq, buf, PCVT_PCBURST)) != 0)
sput(&buf[0], 0, len, minor(tp->t_dev));
s = spltty();
tp->t_state &= ~TS_BUSY;
tp->t_state |= TS_TIMEOUT;
timeout(ttrstrt, tp, 1);
#if PCVT_FREEBSD >= 210 && !defined(TS_ASLEEP)
ttwakeup(tp);
#else
if (tp->t_outq.c_cc <= tp->t_lowat)
{
low:
if (tp->t_state&TS_ASLEEP)
{
tp->t_state &= ~TS_ASLEEP;
wakeup((caddr_t)&tp->t_outq);
}
selwakeup(&tp->t_wsel);
}
#endif
out:
splx(s);
}
void
pcstop(struct tty *tp, int flag)
{
}
#else /* PCVT_NETBSD || PCVT_FREEBSD >= 200 */
void
pcstart(struct tty *tp)
{
int s;
unsigned char c;
s = spltty();
if (tp->t_state & (TS_TIMEOUT|TS_BUSY|TS_TTSTOP))
{
goto out;
}
for(;;)
{
#if !(PCVT_FREEBSD > 114)
#if !(PCVT_FREEBSD > 111)
if (RB_LEN(&tp->t_out) <= tp->t_lowat)
#else
if (RB_LEN(tp->t_out) <= tp->t_lowat)
#endif
{
if (tp->t_state&TS_ASLEEP)
{
tp->t_state &= ~TS_ASLEEP;
#if !(PCVT_FREEBSD > 111)
wakeup((caddr_t)&tp->t_out);
#else
wakeup((caddr_t)tp->t_out);
#endif
}
if (tp->t_wsel)
{
selwakeup(tp->t_wsel, tp->t_state & TS_WCOLL);
tp->t_wsel = 0;
tp->t_state &= ~TS_WCOLL;
}
}
#else /* PCVT_FREEBSD > 114 */
if (tp->t_state & (TS_SO_OCOMPLETE | TS_SO_OLOWAT)
|| tp->t_wsel) {
ttwwakeup(tp);
}
#endif /* !PCVT_FREEBSD > 114 */
#if !(PCVT_FREEBSD > 111)
if (RB_LEN(&tp->t_out) == 0)
#else
if (RB_LEN(tp->t_out) == 0)
#endif
{
goto out;
}
#if !(PCVT_FREEBSD > 111)
c = getc(&tp->t_out);
#else
c = getc(tp->t_out);
#endif
tp->t_state |= TS_BUSY; /* patch from Frank Maclachlan */
splx(s);
sput(&c, 0, 1, minor(tp->t_dev));
spltty();
tp->t_state &= ~TS_BUSY; /* patch from Frank Maclachlan */
}
out:
splx(s);
}
#endif /* PCVT_NETBSD || PCVT_FREEBSD >= 200 */
/*---------------------------------------------------------------------------*
* /dev/console
*---------------------------------------------------------------------------*/
#if !PCVT_NETBSD /* has moved to cons.c in netbsd-current */
void
consinit() /* init for kernel messages during boot */
{
}
#endif /* PCVT_NETBSD */
#if (PCVT_NETBSD > 101 || PCVT_FREEBSD > 205)
void
pccnprobe(struct consdev *cp)
#else
int
pccnprobe(struct consdev *cp)
#endif
{
int maj;
/* locate the major number */
for (maj = 0; maj < nchrdev; maj++)
{
if ((u_int)cdevsw[maj].d_open == (u_int)pcopen)
break;
}
if (maj == nchrdev)
{
/* we are not in cdevsw[], give up */
panic("pcvt is not in cdevsw[]");
}
/* initialize required fields */
cp->cn_dev = makedev(maj, 0);
cp->cn_pri = CN_INTERNAL;
#if !PCVT_NETBSD
#if !(PCVT_FREEBSD > 110 && PCVT_FREEBSD < 200)
cp->cn_tp = &pccons[0];
#else
cp->cn_tp = pccons[0];
#endif /* !(PCVT_FREEBSD > 110 && PCVT_FREEBSD < 200) */
#endif /* !PCVT_NETBSD */
#if ((PCVT_NETBSD && (PCVT_NETBSD <= 101)) || \
(PCVT_FREEBSD && (PCVT_FREEBSD <= 205)))
return 1;
#endif
}
#if (PCVT_NETBSD > 101 || PCVT_FREEBSD > 205)
void
pccninit(struct consdev *cp)
#else
int
pccninit(struct consdev *cp)
#endif
{
pcvt_is_console = 1;
#if ((PCVT_NETBSD && (PCVT_NETBSD <= 101)) || \
(PCVT_FREEBSD && (PCVT_FREEBSD <= 205)))
return 0;
#endif
}
#if (PCVT_NETBSD > 101 || PCVT_FREEBSD > 205)
void
pccnputc(Dev_t dev, U_char c)
#else
int
pccnputc(Dev_t dev, U_char c)
#endif
{
#if PCVT_SW0CNOUTP
if(current_video_screen != 0)
{
switch_screen(0, 0);
}
#endif /* PCVT_SW0CNOUTP */
if (c == '\n')
sput("\r", 1, 1, 0);
sput((char *) &c, 1, 1, 0);
async_update();
#if ((PCVT_NETBSD && (PCVT_NETBSD <= 101)) || \
(PCVT_FREEBSD && (PCVT_FREEBSD <= 205)))
return 0;
#endif
}
int
pccngetc(Dev_t dev)
{
register int s;
register u_char *cp;
#ifdef XSERVER
if (vs[minor(dev)].kbd_state == K_RAW)
return 0;
#endif /* XSERVER */
s = spltty(); /* block pcrint while we poll */
cp = sgetc(0);
splx(s);
async_update();
#if ! (PCVT_FREEBSD >= 201)
/* this belongs to cons.c */
if (*cp == '\r')
return('\n');
#endif /* ! (PCVT_FREEBSD >= 201) */
return (*cp);
}
#if PCVT_FREEBSD >= 200
int
pccncheckc(Dev_t dev)
{
return (sgetc(1) != 0); /* did someone press the "Any" key? */
}
#endif /* PCVT_FREEBSD >= 200 */
#if PCVT_NETBSD >= 100
void
pccnpollc(Dev_t dev, int on)
{
#if PCVT_NETBSD > 110
struct vt_softc *sc = NULL; /* XXX not used */
#else
#if PCVT_NETBSD > 101
struct vt_softc *sc = vtcd.cd_devs[0]; /* XXX */
#endif
#endif
kbd_polling = on;
if (!on) {
register int s;
/*
* If disabling polling, make sure there are no bytes left in
* the FIFO, holding up the interrupt line. Otherwise we
* won't get any further interrupts.
*/
s = spltty();
#if PCVT_NETBSD > 101
pcintr(sc);
#else
pcrint();
#endif
splx(s);
}
}
#endif /* PCVT_NETBSD >= 100 */
/*---------------------------------------------------------------------------*
* Set line parameters
*---------------------------------------------------------------------------*/
int
pcparam(struct tty *tp, struct termios *t)
{
register int cflag = t->c_cflag;
/* and copy to tty */
tp->t_ispeed = t->c_ispeed;
tp->t_ospeed = t->c_ospeed;
tp->t_cflag = cflag;
return(0);
}
/* special characters */
#define bs 8
#define lf 10
#define cr 13
#define cntlc 3
#define del 0177
#define cntld 4
int
getchar(void)
{
u_char thechar;
int x;
kbd_polling = 1;
x = splhigh();
sput(">", 1, 1, 0);
async_update();
thechar = *(sgetc(0));
kbd_polling = 0;
splx(x);
switch (thechar)
{
default:
if (thechar >= ' ')
sput(&thechar, 1, 1, 0);
return(thechar);
case cr:
case lf:
sput("\r\n", 1, 2, 0);
return(lf);
case bs:
case del:
sput("\b \b", 1, 3, 0);
return(thechar);
case cntlc:
sput("^C\r\n", 1, 4, 0) ;
cpu_reset();
case cntld:
sput("^D\r\n", 1, 4, 0) ;
return(0);
}
}
/*----------------------------------------------------------------------*
* read initial VGA palette (as stored by VGA ROM BIOS) into
* palette save area
*----------------------------------------------------------------------*/
void
vgapelinit(void)
{
register unsigned idx;
register struct rgb *val;
/* first, read all and store to first screen's save buffer */
for(idx = 0, val = vs[0].palette; idx < NVGAPEL; idx++, val++)
vgapaletteio(idx, val, 0 /* read it */);
/* now, duplicate for remaining screens */
for(idx = 1; idx < PCVT_NSCREENS; idx++)
bcopy(vs[0].palette, vs[idx].palette,
NVGAPEL * sizeof(struct rgb));
}
#endif /* NVT > 0 */
/*-------------------------- E O F -------------------------------------*/
Reference in New Issue View Git Blame Copy Permalink