531 lines
12 KiB
C
531 lines
12 KiB
C
/* $NetBSD: promio.c,v 1.4 1995/09/20 05:13:06 jonathan Exp $ */
|
|
|
|
/*
|
|
* Copyright (c) 1988 University of Utah.
|
|
* Copyright (c) 1992, 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 and Ralph Campbell.
|
|
*
|
|
* 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: cons.c 1.1 90/07/09
|
|
*
|
|
* @(#)cons.c 8.2 (Berkeley) 1/11/94
|
|
*/
|
|
|
|
#include <sys/param.h>
|
|
#include <sys/device.h>
|
|
#include <dev/cons.h>
|
|
#include <sys/proc.h>
|
|
#include <sys/systm.h>
|
|
#include <sys/buf.h>
|
|
#include <sys/ioctl.h>
|
|
#include <sys/tty.h>
|
|
#include <sys/file.h>
|
|
#include <sys/conf.h>
|
|
|
|
#include <pmax/stand/dec_prom.h>
|
|
|
|
#include <pmax/dev/sccreg.h>
|
|
#include <pmax/pmax/kn01.h>
|
|
#include <pmax/pmax/kn02.h>
|
|
#include <pmax/pmax/kmin.h>
|
|
#include <pmax/pmax/maxine.h>
|
|
#include <pmax/pmax/kn03.h>
|
|
#include <pmax/pmax/asic.h>
|
|
#include <pmax/pmax/turbochannel.h>
|
|
#include <pmax/pmax/pmaxtype.h>
|
|
|
|
#include <machine/machConst.h>
|
|
#include <machine/pmioctl.h>
|
|
|
|
#include <machine/fbio.h>
|
|
#include <sparc/rcons/raster.h>
|
|
#include <machine/fbvar.h>
|
|
|
|
#include <pmax/dev/fbreg.h>
|
|
|
|
#include <machine/autoconf.h>
|
|
#include <pmax/tc/tc.h>
|
|
#include <pmax/dev/lk201.h>
|
|
|
|
|
|
#include <pm.h>
|
|
#include <cfb.h>
|
|
#include <mfb.h>
|
|
#include <xcfb.h>
|
|
#include <sfb.h>
|
|
#include <dc.h>
|
|
#include <dtop.h>
|
|
#include <scc.h>
|
|
#include <le.h>
|
|
#include <asc.h>
|
|
|
|
#if NDC > 0
|
|
#include <machine/dc7085cons.h>
|
|
extern int dcGetc(), dcparam();
|
|
extern void dcPutc();
|
|
#endif
|
|
#if NDTOP > 0
|
|
extern int dtopKBDGetc();
|
|
#endif
|
|
#if NSCC > 0
|
|
extern int sccGetc(), sccparam();
|
|
extern void sccPutc();
|
|
#endif
|
|
static int romgetc __P ((dev_t));
|
|
static void romputc __P ((dev_t, int));
|
|
static void rompollc __P((dev_t, int));
|
|
|
|
|
|
int pmax_boardtype; /* Mother board type */
|
|
|
|
/*
|
|
* Major device numbers for possible console devices. XXX
|
|
*/
|
|
#define DTOPDEV 15
|
|
#define DCDEV 16
|
|
#define SCCDEV 17
|
|
#define RCONSDEV 85
|
|
|
|
/*
|
|
* Console I/O is redirected to the appropriate device, either a screen and
|
|
* keyboard, a serial port, or the "virtual" console.
|
|
*/
|
|
|
|
extern struct consdev *cn_tab; /* Console I/O table... */
|
|
extern void rcons_vputc __P((dev_t, int)); /* XXX */
|
|
|
|
struct consdev cd = {
|
|
(void (*)(struct consdev *))0, /* probe */
|
|
(void (*)(struct consdev *))0, /* init */
|
|
(int (*)(dev_t)) romgetc, /* getc */
|
|
(void (*)(dev_t, int))romputc, /* putc */
|
|
(void (*)(dev_t, int))rompollc, /* pollc */
|
|
makedev (0, 0),
|
|
CN_DEAD,
|
|
};
|
|
|
|
/* should be locals of consinit, but that's split in two til
|
|
* new-style config of decstations is finished
|
|
*/
|
|
|
|
/*
|
|
* Forward declarations
|
|
*/
|
|
|
|
|
|
int consprobetc __P((int prom_slot));
|
|
int consprobeslot __P((int slot));
|
|
void consinit __P((void));
|
|
void xconsinit __P((void));
|
|
|
|
|
|
extern struct tc_cpu_desc * cpu_tcdesc __P ((int cputype));
|
|
|
|
|
|
int kbd;
|
|
int pending_remcons = 0;
|
|
|
|
/*
|
|
* Console initialization: called early on from main,
|
|
* before vm init or startup. Do enough configuration
|
|
* to choose and initialize a console.
|
|
*/
|
|
void
|
|
consinit()
|
|
{
|
|
int crt;
|
|
register char *oscon;
|
|
int screen = 0;
|
|
|
|
extern void (*v_putc) __P ((dev_t, int));
|
|
cn_tab = &cd;
|
|
|
|
|
|
/*
|
|
* First get the "osconsole" environment variable.
|
|
*/
|
|
oscon = (*callv->_getenv)("osconsole");
|
|
crt = kbd = -1;
|
|
if (oscon && *oscon >= '0' && *oscon <= '9') {
|
|
kbd = *oscon - '0';
|
|
/*cn_tab.cn_pri = CN_DEAD;*/
|
|
screen = 0;
|
|
while (*++oscon) {
|
|
if (*oscon == ',')
|
|
/*cn_tab.cn_pri = CN_INTERNAL;*/
|
|
screen = 1;
|
|
else if (screen &&
|
|
*oscon >= '0' && *oscon <= '9') {
|
|
crt = kbd;
|
|
kbd = *oscon - '0';
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
/* we can't do anything until auto-configuration
|
|
* has run, and that requires kmalloc(), which
|
|
* hasn't been initialized yet. Just keep using
|
|
* whatever the PROM vector gave us.
|
|
*/
|
|
|
|
if (pmax_boardtype == DS_PMAX && kbd == 1)
|
|
screen = 1;
|
|
/*
|
|
* The boot program uses PMAX ROM entrypoints so the ROM sets
|
|
* osconsole to '1' like the PMAX.
|
|
*/
|
|
if (pmax_boardtype == DS_3MAX && crt == -1 && kbd == 1) {
|
|
/* Try to use pmax onboard framebuffer */
|
|
screen = 1;
|
|
crt = 0;
|
|
kbd = 7;
|
|
}
|
|
|
|
/*
|
|
* First try the keyboard/crt cases then fall through to the
|
|
* remote serial lines.
|
|
*/
|
|
if (screen) {
|
|
switch (pmax_boardtype) {
|
|
case DS_PMAX:
|
|
#if NDC > 0 && NPM > 0
|
|
if (pminit(0, 0, 1)) {
|
|
cd.cn_pri = CN_INTERNAL;
|
|
cd.cn_dev = makedev(DCDEV, DCKBD_PORT);
|
|
cd.cn_getc = LKgetc;
|
|
lk_divert(dcGetc, makedev(DCDEV, DCKBD_PORT));
|
|
cd.cn_putc = rcons_vputc; /*XXX*/
|
|
return;
|
|
}
|
|
#endif /* NDC and NPM */
|
|
goto remcons;
|
|
|
|
case DS_MAXINE:
|
|
#if NDTOP > 0
|
|
if (kbd == 3) {
|
|
cd.cn_dev = makedev(DTOPDEV, 0);
|
|
cd.cn_getc = dtopKBDGetc;
|
|
} else
|
|
#endif /* NDTOP */
|
|
goto remcons;
|
|
#if NXCFB > 0
|
|
if (crt == 3 && xcfbinit(NULL, NULL, 0, 0)) {
|
|
cd.cn_pri = CN_INTERNAL;
|
|
cd.cn_putc = rcons_vputc; /*XXX*/
|
|
return;
|
|
}
|
|
#endif /* XCFB */
|
|
break;
|
|
|
|
case DS_3MAX:
|
|
#if NDC > 0
|
|
if (kbd == 7) {
|
|
cd.cn_dev = makedev(DCDEV, DCKBD_PORT);
|
|
cd.cn_getc = LKgetc;
|
|
lk_divert(dcGetc, makedev(DCDEV, DCKBD_PORT));
|
|
} else
|
|
#endif /* NDC */
|
|
goto remcons;
|
|
break;
|
|
|
|
case DS_3MIN:
|
|
case DS_3MAXPLUS:
|
|
#if NSCC > 0
|
|
if (kbd == 3) {
|
|
/*cd.cn_dev = makedev (RCONSDEV, 0);*/
|
|
cd.cn_dev = makedev(SCCDEV, SCCKBD_PORT);
|
|
lk_divert(sccGetc, makedev(SCCDEV, SCCKBD_PORT));
|
|
cd.cn_getc = LKgetc;
|
|
} else
|
|
#endif /* NSCC */
|
|
goto remcons;
|
|
break;
|
|
|
|
default:
|
|
goto remcons;
|
|
};
|
|
|
|
|
|
/*
|
|
* Check for a suitable turbochannel frame buffer.
|
|
*/
|
|
if (consprobetc(crt)) {
|
|
cd.cn_pri = CN_NORMAL;
|
|
#ifdef RCONS_HACK
|
|
/* FIXME */ cd.cn_putc = v_putc;
|
|
cd.cn_dev = makedev (RCONSDEV, 0);
|
|
#endif /* RCONS_HACK */
|
|
cd.cn_putc = rcons_vputc; /*XXX*/
|
|
return;
|
|
} else
|
|
printf("No crt console device in slot %d\n", crt);
|
|
}
|
|
|
|
|
|
remcons:
|
|
|
|
/*
|
|
* Configure a serial port as a remote console.
|
|
*/
|
|
|
|
/* XXX serial drivers need to be rewritten to handle
|
|
* init this early. Defer switching to non-PROM
|
|
* driver until later.
|
|
*/
|
|
pending_remcons = 1;
|
|
printf("Using PROM serial output until serial drivers initialized\n");
|
|
|
|
/* We never cahnged output; go back to using PROM input */
|
|
cd.cn_dev = makedev (0, 0);
|
|
cd.cn_getc = /*(int (*)(dev_t)) */ romgetc;
|
|
}
|
|
|
|
|
|
/*
|
|
* Configure a serial port as a remote console.
|
|
*/
|
|
void
|
|
xconsinit()
|
|
{
|
|
if (!pending_remcons)
|
|
return;
|
|
|
|
pending_remcons = 0;
|
|
switch (pmax_boardtype) {
|
|
case DS_PMAX:
|
|
#if NDC > 0
|
|
if (kbd == 4)
|
|
cd.cn_dev = makedev(DCDEV, DCCOMM_PORT);
|
|
else
|
|
cd.cn_dev = makedev(DCDEV, DCPRINTER_PORT);
|
|
cd.cn_getc = dcGetc;
|
|
cd.cn_putc = dcPutc;
|
|
cd.cn_pri = CN_REMOTE;
|
|
#endif /* NDC */
|
|
break;
|
|
|
|
case DS_3MAX:
|
|
#if NDC > 0
|
|
cd.cn_dev = makedev(DCDEV, DCPRINTER_PORT);
|
|
cd.cn_getc = dcGetc;
|
|
cd.cn_putc = dcPutc;
|
|
cd.cn_pri = CN_REMOTE;
|
|
#endif /* NDC */
|
|
break;
|
|
|
|
case DS_3MIN:
|
|
case DS_3MAXPLUS:
|
|
#if NSCC > 0
|
|
cd.cn_dev = makedev(SCCDEV, SCCCOMM3_PORT);
|
|
cd.cn_getc = sccGetc;
|
|
cd.cn_putc = sccPutc;
|
|
cd.cn_pri = CN_REMOTE;
|
|
#endif /* NSCC */
|
|
break;
|
|
|
|
case DS_MAXINE:
|
|
#if NSCC > 0
|
|
cd.cn_dev = makedev(SCCDEV, SCCCOMM2_PORT);
|
|
cd.cn_getc = sccGetc;
|
|
cd.cn_putc = sccPutc;
|
|
cd.cn_pri = CN_REMOTE;
|
|
#endif /* NSCC */
|
|
break;
|
|
};
|
|
if (cd.cn_dev == NODEV)
|
|
printf("Can't configure console!\n");
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
* Probe for a framebuffer option card. Configure the first one
|
|
* found as a console.
|
|
*/
|
|
int
|
|
consprobetc(preferred_slot)
|
|
int preferred_slot;
|
|
{
|
|
int slot;
|
|
|
|
struct tc_cpu_desc * sc_desc;
|
|
|
|
/*printf("Looking for fb console in slot %d", slot);*/
|
|
|
|
/* First, try the slot configured as console in NVRAM. */
|
|
/* if (consprobeslot(preferred_slot)) return (1); */
|
|
|
|
/*
|
|
* Try to configure each turbochannel (or CPU-internal) device.
|
|
* Knows about gross internals of TurboChannel bus autoconfig
|
|
* descriptor, which needs to be fixed badly.
|
|
*/
|
|
if ((sc_desc = cpu_tcdesc(pmax_boardtype)) == NULL)
|
|
return 0;
|
|
for (slot = 0; slot < sc_desc->tcd_ndevs; slot++) {
|
|
|
|
if (consprobeslot(slot))
|
|
return (1);
|
|
}
|
|
return (0);
|
|
}
|
|
|
|
/*
|
|
* Try and configure one slot as framebuffer console.
|
|
* Accept only the framebuffers configured in.
|
|
* Attach the framebuffer if found.
|
|
*/
|
|
int
|
|
consprobeslot(slot)
|
|
int slot;
|
|
{
|
|
void *slotaddr;
|
|
char name[20];
|
|
struct tc_cpu_desc * sc_desc;
|
|
|
|
if (slot < 0 || ((sc_desc = cpu_tcdesc(pmax_boardtype)) == NULL))
|
|
return 0;
|
|
slotaddr = (void *)sc_desc->tcd_slots[slot].tsd_dense;
|
|
|
|
/*printf("probing slot %d at 0x%x\n", slot, slotaddr);*/
|
|
|
|
if (tc_checkdevmem(slotaddr) == 0)
|
|
return (0);
|
|
|
|
if (tc_checkslot(slotaddr, name) == 0)
|
|
return (0);
|
|
|
|
/*
|
|
* We found an device in the given slot. Now see if it's a
|
|
* framebuffer for which we have a driver.
|
|
*/
|
|
|
|
/*printf(", trying to init a \"%s\"", name);*/
|
|
|
|
#define DRIVER_FOR_SLOT(slotname, drivername) \
|
|
(strcmp (slotname, drivername) == 0)
|
|
|
|
#if NMFB > 0
|
|
if (DRIVER_FOR_SLOT(name, "PMAG-AA ") &&
|
|
mfbinit(slotaddr, 0, 1)) {
|
|
cd.cn_pri = CN_NORMAL;
|
|
return (1);
|
|
}
|
|
#endif /* NMFB */
|
|
|
|
#if NSFB > 0
|
|
if (DRIVER_FOR_SLOT(name, "PMAGB-BA") &&
|
|
sfbinit(slotaddr, 0, 1)) {
|
|
cd.cn_pri = CN_NORMAL;
|
|
return (1);
|
|
}
|
|
#endif /* NSFB */
|
|
|
|
#if NCFB > 0
|
|
/*"cfb"*/
|
|
if (DRIVER_FOR_SLOT(name, "PMAG-BA ") &&
|
|
cfbinit(NULL, slotaddr, 0, 1)) {
|
|
cd.cn_pri = CN_NORMAL;
|
|
return (1);
|
|
}
|
|
#endif /* NCFB */
|
|
return (0);
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
* Get character from ROM console.
|
|
*/
|
|
static int romgetc(dev)
|
|
dev_t dev;
|
|
{
|
|
int s = splhigh ();
|
|
int chr;
|
|
chr = (*callv->_getchar)();
|
|
splx (s);
|
|
return chr;
|
|
}
|
|
|
|
/*
|
|
* Print a character on ROM console.
|
|
*/
|
|
static void romputc (dev, c)
|
|
dev_t dev;
|
|
register int c;
|
|
{
|
|
int s;
|
|
s = splhigh();
|
|
(*callv->_printf)("%c", c);
|
|
splx(s);
|
|
}
|
|
|
|
static void rompollc (dev, c)
|
|
dev_t dev;
|
|
register int c;
|
|
{
|
|
return;
|
|
}
|
|
|
|
|
|
extern struct tty *constty; /* virtual console output device */
|
|
extern struct consdev *cn_tab; /* physical console device info */
|
|
extern struct vnode *cn_devvp; /* vnode for underlying device. */
|
|
|
|
/*ARGSUSED*/
|
|
int
|
|
pmax_cnselect(dev, rw, p)
|
|
dev_t dev;
|
|
int rw;
|
|
struct proc *p;
|
|
{
|
|
|
|
/*
|
|
* Redirect the ioctl, if that's appropriate.
|
|
* I don't want to think of the possible side effects
|
|
* of console redirection here.
|
|
*/
|
|
if (constty != NULL && (cn_tab == NULL || cn_tab->cn_pri != CN_REMOTE))
|
|
dev = constty->t_dev;
|
|
else if (cn_tab == NULL)
|
|
return ENXIO;
|
|
else
|
|
dev = cn_tab->cn_dev;
|
|
#ifdef RCONS
|
|
if (cn_tab -> cn_dev == makedev (85, 0))
|
|
return rconsselect (cn_tab -> cn_dev, rw, p);
|
|
#endif
|
|
return (ttselect(cn_tab->cn_dev, rw, p));
|
|
}
|