diff options
Diffstat (limited to 'sys/arch/hp300/dev/apci.c.orig')
-rw-r--r-- | sys/arch/hp300/dev/apci.c.orig | 1042 |
1 files changed, 0 insertions, 1042 deletions
diff --git a/sys/arch/hp300/dev/apci.c.orig b/sys/arch/hp300/dev/apci.c.orig deleted file mode 100644 index 2f29f253f47..00000000000 --- a/sys/arch/hp300/dev/apci.c.orig +++ /dev/null @@ -1,1042 +0,0 @@ -/* $OpenBSD: apci.c.orig,v 1.1 2005/04/22 11:59:11 miod Exp $ */ -/* $NetBSD: apci.c,v 1.9 2000/11/02 00:35:05 eeh Exp $ */ - -/*- - * Copyright (c) 1996, 1997, 1999 The NetBSD Foundation, Inc. - * All rights reserved. - * - * This code is derived from software contributed to The NetBSD Foundation - * by Jason R. Thorpe. - * - * 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 NetBSD - * Foundation, Inc. and its contributors. - * 4. Neither the name of The NetBSD Foundation 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 NETBSD FOUNDATION, INC. 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 FOUNDATION 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. - */ - -/* - * Copyright (c) 1997 Michael Smith. All rights reserved. - * Copyright (c) 1982, 1986, 1990, 1993 - * The Regents of the University of California. All rights reserved. - * - * 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. - * - * @(#)dca.c 8.2 (Berkeley) 1/12/94 - */ - -/* - * Device driver for the APCI 8250-like UARTs found on the Apollo - * Utility Chip on HP 9000/400-series workstations. - * - * There are 4 APCI UARTs on the Frodo ASIC. The first one - * is used to communicate with the Domain keyboard. The second - * one is the serial console port when the firmware is in Domain/OS - * mode, and is mapped to select code 9 by the HP-UX firmware (except - * on 425e models). - * - * We don't bother attaching a tty to the first UART; it lacks modem/flow - * control, and is directly connected to the keyboard connector anyhow. - */ - -/* - * XXX This driver is very similar to the dca driver, and much - * XXX more code could be shared. (Currently, no code is shared.) - * XXX FIXME! - */ - -#include <sys/param.h> -#include <sys/systm.h> -#include <sys/ioctl.h> -#include <sys/proc.h> -#include <sys/tty.h> -#include <sys/conf.h> -#include <sys/file.h> -#include <sys/uio.h> -#include <sys/kernel.h> -#include <sys/syslog.h> -#include <sys/device.h> -#include <sys/timeout.h> - -#include <machine/autoconf.h> -#include <machine/cpu.h> -#include <machine/hp300spu.h> - -#include <dev/cons.h> - -#include <hp300/dev/dioreg.h> /* to check for dca at 9 */ -#include <hp300/dev/diovar.h> -#include <hp300/dev/diodevs.h> - -#include <hp300/dev/frodoreg.h> -#include <hp300/dev/frodovar.h> -#include <hp300/dev/apcireg.h> -#include <hp300/dev/dcareg.h> /* register bit definitions */ - -#ifdef DDB -#include <ddb/db_var.h> -#endif - -struct apci_softc { - struct device sc_dev; /* generic device glue */ - struct isr sc_isr; - struct apciregs *sc_apci; /* device registers */ - struct tty *sc_tty; /* tty glue */ - struct timeout sc_timeout; /* timeout */ - int sc_ferr, - sc_perr, - sc_oflow, - sc_toterr; /* stats */ - int sc_flags; - u_char sc_cua; /* callout mode */ -}; - -/* sc_flags */ -#define APCI_HASFIFO 0x01 /* unit has a fifo */ -#define APCI_ISCONSOLE 0x02 /* unit is console */ -#define APCI_SOFTCAR 0x04 /* soft carrier */ - -int apcimatch(struct device *, void *, void *); -void apciattach(struct device *, struct device *, void *); - -struct cfattach apci_ca = { - sizeof(struct apci_softc), apcimatch, apciattach -}; - -struct cfdriver apci_cd = { - NULL, "apci", DV_TTY -}; - -int apciintr(void *); -void apcieint(struct apci_softc *, int); -void apcimint(struct apci_softc *, u_char); -int apciparam(struct tty *, struct termios *); -void apcistart(struct tty *); -int apcimctl(struct apci_softc *, int, int); -void apciinit(struct apciregs *, int); -void apcitimeout(void *); - -cdev_decl(apci); - -#define APCIUNIT(x) (minor(x) & 0x7f) -#define APCICUA(x) (minor(x) & 0x80) - -int apcidefaultrate = TTYDEF_SPEED; - -const struct speedtab apcispeedtab[] = { - { 0, 0 }, - { 50, APCIBRD(50) }, - { 75, APCIBRD(75) }, - { 110, APCIBRD(110) }, - { 134, APCIBRD(134) }, - { 150, APCIBRD(150) }, - { 200, APCIBRD(200) }, - { 300, APCIBRD(300) }, - { 600, APCIBRD(600) }, - { 1200, APCIBRD(1200) }, - { 1800, APCIBRD(1800) }, - { 2400, APCIBRD(2400) }, - { 4800, APCIBRD(4800) }, - { 9600, APCIBRD(9600) }, - { 19200, APCIBRD(19200) }, - { 38400, APCIBRD(38400) }, - { -1, -1 }, -}; - -/* - * Console support. - */ -struct apciregs *apci_cn = NULL; /* console hardware */ -int apciconsinit; /* has been initialized */ -int apcimajor; /* our major number */ - -cons_decl(apci); - -int -apcimatch(parent, match, aux) - struct device *parent; - void *match, *aux; -{ - struct frodo_attach_args *fa = aux; - - /* Looking for an apci? */ - if (strcmp(fa->fa_name, apci_cd.cd_name) != 0) - return (0); - - /* Are we checking a valid APCI offset? */ - switch (fa->fa_offset) { - case FRODO_APCI_OFFSET(1): - case FRODO_APCI_OFFSET(2): - case FRODO_APCI_OFFSET(3): - /* Yup, we exist! */ - return (1); - } - - return (0); -} - -void -apciattach(parent, self, aux) - struct device *parent, *self; - void *aux; -{ - struct apci_softc *sc = (struct apci_softc *)self; - struct apciregs *apci; - struct frodo_attach_args *fa = aux; - - sc->sc_apci = apci = - (struct apciregs *)IIOV(FRODO_BASE + fa->fa_offset); - sc->sc_flags = 0; - - /* Initialize timeout structure */ - timeout_set(&sc->sc_timeout, apcitimeout, sc); - - /* Are we the console? */ - if (apci == apci_cn) { - sc->sc_flags |= APCI_ISCONSOLE; - delay(100000); - - /* - * We didn't know which unit this would be during - * the console probe, so we have to fixup cn_dev here. - */ - cn_tab->cn_dev = makedev(apcimajor, self->dv_unit); - } - - /* Look for a FIFO. */ - apci->ap_fifo = FIFO_ENABLE|FIFO_RCV_RST|FIFO_XMT_RST|FIFO_TRIGGER_14; - delay(100); - if ((apci->ap_iir & IIR_FIFO_MASK) == IIR_FIFO_MASK) - sc->sc_flags |= APCI_HASFIFO; - - /* Establish our interrupt handler. */ - sc->sc_isr.isr_func = apciintr; - sc->sc_isr.isr_arg = sc; - sc->sc_isr.isr_priority = - (sc->sc_flags & APCI_HASFIFO) ? IPL_TTY : IPL_TTYNOBUF; - frodo_intr_establish(parent, fa->fa_line, &sc->sc_isr, self->dv_xname); - - /* Set soft carrier if requested by operator. */ - if (self->dv_cfdata->cf_flags) - sc->sc_flags |= APCI_SOFTCAR; - - /* - * Need to reset baud rate, etc. of next print, so reset apciconsinit. - * Also make sure console is always "hardwired". - */ - if (sc->sc_flags & APCI_ISCONSOLE) { - apciconsinit = 0; - sc->sc_flags |= APCI_SOFTCAR; - printf(": console, "); - } else - printf(": "); - - if (sc->sc_flags & APCI_HASFIFO) - printf("working fifo\n"); - else - printf("no fifo\n"); -} - -/* ARGSUSED */ -int -apciopen(dev, flag, mode, p) - dev_t dev; - int flag, mode; - struct proc *p; -{ - int unit = APCIUNIT(dev); - struct apci_softc *sc; - struct tty *tp; - struct apciregs *apci; - u_char code; - int s, error = 0; - - if (unit >= apci_cd.cd_ndevs || - (sc = apci_cd.cd_devs[unit]) == NULL) - return (ENXIO); - - apci = sc->sc_apci; - - s = spltty(); - if (sc->sc_tty == NULL) { - tp = sc->sc_tty = ttymalloc(); - } else - tp = sc->sc_tty; - splx(s); - - tp->t_oproc = apcistart; - tp->t_param = apciparam; - tp->t_dev = dev; - - if ((tp->t_state & TS_ISOPEN) == 0) { - /* - * Sanity clause: reset the chip on first open. - * The chip might be left in an inconsistent state - * if it is read inadventently. - */ - apciinit(apci, apcidefaultrate); - - tp->t_state |= TS_WOPEN; - 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 = apcidefaultrate; - - s = spltty(); - - apciparam(tp, &tp->t_termios); - ttsetwater(tp); - - /* Set the FIFO threshold based on the receive speed. */ - if (sc->sc_flags & APCI_HASFIFO) - apci->ap_fifo = FIFO_ENABLE | FIFO_RCV_RST | - FIFO_XMT_RST | - (tp->t_ispeed <= 1200 ? FIFO_TRIGGER_1 : - FIFO_TRIGGER_14); - - /* Flush any pending I/O. */ - while ((apci->ap_iir & IIR_IMASK) == IIR_RXRDY) - code = apci->ap_data; - } else if (tp->t_state & TS_XCLUDE && p->p_ucred->cr_uid != 0) - return (EBUSY); - else - s = spltty(); - - /* Set the modem control state. */ - (void) apcimctl(sc, MCR_DTR | MCR_RTS, DMSET); - - /* Set soft-carrier if so configured. */ - if ((sc->sc_flags & APCI_SOFTCAR) || APCICUA(dev) || - (apcimctl(sc, 0, DMGET) & MSR_DCD)) - tp->t_state |= TS_CARR_ON; - - if (APCICUA(dev)) { - if (tp->t_state & TS_ISOPEN) { - /* Ah, but someone already is dialed in... */ - splx(s); - return (EBUSY); - } - sc->sc_cua = 1; /* We go into CUA mode */ - } - - /* Wait for carrier if necessary. */ - if (flag & O_NONBLOCK) { - if (!APCICUA(dev) && sc->sc_cua) { - /* Opening TTY non-blocking... but the CUA is busy */ - splx(s); - return (EBUSY); - } - } else { - while (sc->sc_cua || - ((tp->t_cflag & CLOCAL) == 0 && - (tp->t_state & TS_CARR_ON) == 0)) { - tp->t_state |= TS_WOPEN; - error = ttysleep(tp, (caddr_t)&tp->t_rawq, - TTIPRI | PCATCH, ttopen, 0); - if (!APCICUA(dev) && sc->sc_cua && error == EINTR) - continue; - if (error) { - if (APCICUA(dev)) - sc->sc_cua = 0; - splx(s); - return (error); - } - if (!APCICUA(dev) && sc->sc_cua) - continue; - } - } - - splx(s); - - if (error == 0) - error = (*linesw[tp->t_line].l_open)(dev, tp); - - if (error == 0) { - /* clear errors, start timeout */ - sc->sc_ferr = sc->sc_perr = sc->sc_oflow = sc->sc_toterr = 0; - timeout_add(&sc->sc_timeout, hz); - } - - return (error); -} - -/* ARGSUSED */ -int -apciclose(dev, flag, mode, p) - dev_t dev; - int flag, mode; - struct proc *p; -{ - struct apci_softc *sc; - struct tty *tp; - struct apciregs *apci; - int unit = APCIUNIT(dev); - int s; - - sc = apci_cd.cd_devs[unit]; - apci = sc->sc_apci; - tp = sc->sc_tty; - - (*linesw[tp->t_line].l_close)(tp, flag); - - s = spltty(); - - apci->ap_cfcr &= ~CFCR_SBREAK; - apci->ap_ier = 0; - if (tp->t_cflag & HUPCL && (sc->sc_flags & APCI_SOFTCAR) == 0) { - /* XXX perhaps only clear DTR */ - (void) apcimctl(sc, 0, DMSET); - } - tp->t_state &= ~(TS_BUSY | TS_FLUSH); - sc->sc_cua = 0; - splx(s); - ttyclose(tp); -#if 0 - ttyfree(tp); - sc->sc_tty = NULL; -#endif - return (0); -} - -int -apciread(dev, uio, flag) - dev_t dev; - struct uio *uio; - int flag; -{ - struct apci_softc *sc = apci_cd.cd_devs[APCIUNIT(dev)]; - struct tty *tp = sc->sc_tty; - - return ((*linesw[tp->t_line].l_read)(tp, uio, flag)); -} - -int -apciwrite(dev, uio, flag) - dev_t dev; - struct uio *uio; - int flag; -{ - struct apci_softc *sc = apci_cd.cd_devs[APCIUNIT(dev)]; - struct tty *tp = sc->sc_tty; - - return ((*linesw[tp->t_line].l_write)(tp, uio, flag)); -} - -struct tty * -apcitty(dev) - dev_t dev; -{ - struct apci_softc *sc = apci_cd.cd_devs[APCIUNIT(dev)]; - - return (sc->sc_tty); -} - -int -apciintr(arg) - void *arg; -{ - struct apci_softc *sc = arg; - struct apciregs *apci = sc->sc_apci; - struct tty *tp = sc->sc_tty; - u_char iir, lsr, c; - int iflowdone = 0, claimed = 0; - -#define RCVBYTE() \ - c = apci->ap_data; \ - if (tp != NULL && (tp->t_state & TS_ISOPEN) != 0) \ - (*linesw[tp->t_line].l_rint)(c, tp) - - for (;;) { - iir = apci->ap_iir; /* get UART status */ - - switch (iir & IIR_IMASK) { - case IIR_RLS: - apcieint(sc, apci->ap_lsr); - break; - - case IIR_RXRDY: - case IIR_RXTOUT: - RCVBYTE(); - if (sc->sc_flags & APCI_HASFIFO) { - while ((lsr = apci->ap_lsr) & LSR_RCV_MASK) { - if (lsr == LSR_RXRDY) { - RCVBYTE(); - } else - apcieint(sc, lsr); - } - } - if (iflowdone == 0 && tp != NULL && - (tp->t_cflag & CRTS_IFLOW) && - tp->t_rawq.c_cc > (TTYHOG / 2)) { - apci->ap_mcr &= ~MCR_RTS; - iflowdone = 1; - } - break; - - case IIR_TXRDY: - if (tp != NULL) { - tp->t_state &=~ (TS_BUSY|TS_FLUSH); - if (tp->t_line) - (*linesw[tp->t_line].l_start)(tp); - else - apcistart(tp); - } - break; - - default: - if (iir & IIR_NOPEND) - return (claimed); - log(LOG_WARNING, "%s: weird interrupt: 0x%x\n", - sc->sc_dev.dv_xname, iir); - /* FALLTHROUGH */ - - case IIR_MLSC: - apcimint(sc, apci->ap_msr); - break; - } - - claimed = 1; - } -} - -void -apcieint(sc, stat) - struct apci_softc *sc; - int stat; -{ - struct tty *tp = sc->sc_tty; - struct apciregs *apci = sc->sc_apci; - int c; - - c = apci->ap_data; - -#ifdef DDB - if ((sc->sc_flags & APCI_ISCONSOLE) && db_console && (stat & LSR_BI)) { - Debugger(); - return; - } -#endif - - if (tp == NULL || (tp->t_state & TS_ISOPEN) == 0) - return; - - if (stat & (LSR_BI | LSR_FE)) { - c |= TTY_FE; - sc->sc_ferr++; - } else if (stat & LSR_PE) { - c |= TTY_PE; - sc->sc_perr++; - } else if (stat & LSR_OE) - sc->sc_oflow++; - (*linesw[tp->t_line].l_rint)(c, tp); -} - -void -apcimint(sc, stat) - struct apci_softc *sc; - u_char stat; -{ - struct tty *tp = sc->sc_tty; - struct apciregs *apci = sc->sc_apci; - - if (tp == NULL) - return; - - if ((stat & MSR_DDCD) && - (sc->sc_flags & APCI_SOFTCAR) == 0) { - if (stat & MSR_DCD) - (void)(*linesw[tp->t_line].l_modem)(tp, 1); - else if ((*linesw[tp->t_line].l_modem)(tp, 0) == 0) - apci->ap_mcr &= ~(MCR_DTR | MCR_RTS); - } - - /* - * CTS change. - * If doing HW output flow control, start/stop output as appropriate. - */ - if ((stat & MSR_DCTS) && - (tp->t_state & TS_ISOPEN) && (tp->t_cflag & CCTS_OFLOW)) { - if (stat & MSR_CTS) { - tp->t_state &=~ TS_TTSTOP; - apcistart(tp); - } else - tp->t_state |= TS_TTSTOP; - } -} - -int -apciioctl(dev, cmd, data, flag, p) - dev_t dev; - u_long cmd; - caddr_t data; - int flag; - struct proc *p; -{ - struct apci_softc *sc = apci_cd.cd_devs[APCIUNIT(dev)]; - struct tty *tp = sc->sc_tty; - struct apciregs *apci = sc->sc_apci; - int error; - - error = (*linesw[tp->t_line].l_ioctl)(tp, cmd, data, flag, p); - if (error >= 0) - return (error); - error = ttioctl(tp, cmd, data, flag, p); - if (error >= 0) - return (error); - - switch (cmd) { - case TIOCSBRK: - apci->ap_cfcr |= CFCR_SBREAK; - break; - - case TIOCCBRK: - apci->ap_cfcr &= ~CFCR_SBREAK; - break; - - case TIOCSDTR: - (void) apcimctl(sc, MCR_DTR | MCR_RTS, DMBIS); - break; - - case TIOCCDTR: - (void) apcimctl(sc, MCR_DTR | MCR_RTS, DMBIC); - break; - - case TIOCMSET: - (void) apcimctl(sc, *(int *)data, DMSET); - break; - - case TIOCMBIS: - (void) apcimctl(sc, *(int *)data, DMBIS); - break; - - case TIOCMBIC: - (void) apcimctl(sc, *(int *)data, DMBIC); - break; - - case TIOCMGET: - *(int *)data = apcimctl(sc, 0, DMGET); - break; - - case TIOCGFLAGS: { - int bits = 0; - - if (sc->sc_flags & APCI_SOFTCAR) - bits |= TIOCFLAG_SOFTCAR; - - if (tp->t_cflag & CLOCAL) - bits |= TIOCFLAG_CLOCAL; - - *(int *)data = bits; - break; - } - - case TIOCSFLAGS: { - int userbits; - - error = suser(p, 0); - if (error) - return (EPERM); - - userbits = *(int *)data; - - if ((userbits & TIOCFLAG_SOFTCAR) || - (sc->sc_flags & APCI_ISCONSOLE)) - sc->sc_flags |= APCI_SOFTCAR; - - if (userbits & TIOCFLAG_CLOCAL) - tp->t_cflag |= CLOCAL; - - break; - } - - default: - return (ENOTTY); - } - return (0); -} - -int -apciparam(tp, t) - struct tty *tp; - struct termios *t; -{ - struct apci_softc *sc = apci_cd.cd_devs[APCIUNIT(tp->t_dev)]; - struct apciregs *apci = sc->sc_apci; - int cfcr, cflag = t->c_cflag; - int ospeed = ttspeedtab(t->c_ospeed, apcispeedtab); - int s; - - /* check requested parameters */ - if (ospeed < 0 || (t->c_ispeed && t->c_ispeed != t->c_ospeed)) - return (EINVAL); - - switch (cflag & CSIZE) { - case CS5: - cfcr = CFCR_5BITS; - break; - - case CS6: - cfcr = CFCR_6BITS; - break; - - case CS7: - cfcr = CFCR_7BITS; - break; - - case CS8: - default: /* XXX gcc whines about cfcr being uninitialized... */ - cfcr = CFCR_8BITS; - break; - } - if (cflag & PARENB) { - cfcr |= CFCR_PENAB; - if ((cflag & PARODD) == 0) - cfcr |= CFCR_PEVEN; - } - if (cflag & CSTOPB) - cfcr |= CFCR_STOPB; - - s = spltty(); - - if (ospeed == 0) - (void) apcimctl(sc, 0, DMSET); /* hang up line */ - - /* - * Set the FIFO threshold based on the receive speed, if we - * are changing it. - */ - if (tp->t_ispeed != t->c_ispeed) { - if (sc->sc_flags & APCI_HASFIFO) - apci->ap_fifo = FIFO_ENABLE | - (t->c_ispeed <= 1200 ? FIFO_TRIGGER_1 : - FIFO_TRIGGER_14); - } - - if (ospeed != 0) { - apci->ap_cfcr |= CFCR_DLAB; - apci->ap_data = ospeed & 0xff; - apci->ap_ier = (ospeed >> 8) & 0xff; - apci->ap_cfcr = cfcr; - } else - apci->ap_cfcr = cfcr; - - /* and copy to tty */ - tp->t_ispeed = t->c_ispeed; - tp->t_ospeed = t->c_ospeed; - tp->t_cflag = cflag; - - apci->ap_ier = IER_ERXRDY | IER_ETXRDY | IER_ERLS | IER_EMSC; - - splx(s); - return (0); -} - -void -apcistart(tp) - struct tty *tp; -{ - struct apci_softc *sc = apci_cd.cd_devs[APCIUNIT(tp->t_dev)]; - struct apciregs *apci = sc->sc_apci; - int s, c; - - s = spltty(); - - if (tp->t_state & (TS_TIMEOUT|TS_TTSTOP)) - goto out; - if (tp->t_outq.c_cc <= tp->t_lowat) { - if (tp->t_state & TS_ASLEEP) { - tp->t_state &= ~TS_ASLEEP; - wakeup((caddr_t)&tp->t_outq); - } - if (tp->t_outq.c_cc == 0) - goto out; - selwakeup(&tp->t_wsel); - } - if (apci->ap_lsr & LSR_TXRDY) { - tp->t_state |= TS_BUSY; - if (sc->sc_flags & APCI_HASFIFO) { - for (c = 0; c < 16 && tp->t_outq.c_cc; ++c) - apci->ap_data = getc(&tp->t_outq); - } else - apci->ap_data = getc(&tp->t_outq); - } - - out: - splx(s); -} - -/* - * Stop output on a line. - */ -/* ARGSUSED */ -int -apcistop(tp, flag) - struct tty *tp; - int flag; -{ - int s; - - s = spltty(); - if (tp->t_state & TS_BUSY) - if ((tp->t_state & TS_TTSTOP) == 0) - tp->t_state |= TS_FLUSH; - splx(s); - return (0); -} - -int -apcimctl(sc, bits, how) - struct apci_softc *sc; - int bits, how; -{ - struct apciregs *apci = sc->sc_apci; - int s; - - s = spltty(); - - switch (how) { - case DMSET: - apci->ap_mcr = bits; - break; - - case DMBIS: - apci->ap_mcr |= bits; - break; - - case DMBIC: - apci->ap_mcr &= ~bits; - break; - - case DMGET: - bits = apci->ap_msr; - break; - } - - splx(s); - return (bits); -} - -void -apciinit(apci, rate) - struct apciregs *apci; - int rate; -{ - int s; - short stat; - - s = splhigh(); - - rate = ttspeedtab(rate, apcispeedtab); - - apci->ap_cfcr = CFCR_DLAB; - apci->ap_data = rate & 0xff; - apci->ap_ier = (rate >> 8) & 0xff; - apci->ap_cfcr = CFCR_8BITS; - apci->ap_ier = IER_ERXRDY | IER_ETXRDY; - apci->ap_fifo = - FIFO_ENABLE | FIFO_RCV_RST | FIFO_XMT_RST | FIFO_TRIGGER_1; - apci->ap_mcr = MCR_DTR | MCR_RTS; - delay(100); - stat = apci->ap_iir; - splx(s); -} - -void -apcitimeout(arg) - void *arg; -{ - struct apci_softc *sc = arg; - int ferr, perr, oflow, s; - - if (sc->sc_tty == NULL || - (sc->sc_tty->t_state & TS_ISOPEN) == 0) - return; - - /* Log any errors. */ - if (sc->sc_ferr || sc->sc_perr || sc->sc_oflow) { - s = spltty(); /* XXX necessary? */ - ferr = sc->sc_ferr; - perr = sc->sc_perr; - oflow = sc->sc_oflow; - sc->sc_ferr = sc->sc_perr = sc->sc_oflow = 0; - splx(s); - sc->sc_toterr += ferr + perr + oflow; - log(LOG_WARNING, - "%s: %d frame, %d parity, %d overflow, %d total errors\n", - sc->sc_dev.dv_xname, ferr, perr, oflow, sc->sc_toterr); - } - - timeout_add(&sc->sc_timeout, hz); -} - -/* - * The following routines are required for the APCI to act as the console. - */ - -void -apcicnprobe(cp) - struct consdev *cp; -{ - volatile u_int8_t *frodoregs; - - /* locate the major number */ - for (apcimajor = 0; apcimajor < nchrdev; apcimajor++) - if (cdevsw[apcimajor].d_open == apciopen) - break; - - /* initialize the required fields */ - cp->cn_dev = makedev(apcimajor, 0); /* XXX */ - cp->cn_pri = CN_DEAD; - - /* Abort early if console is already forced. */ - if (conforced) - return; - - /* - * The APCI can only be a console on a 425e; on other 4xx - * models, the "first" serial port is mapped to the DCA - * at select code 9. See frodo.c for the autoconfiguration - * version of this check. - */ - if (machineid != HP_425 || mmuid != MMUID_425_E) - return; - - /* - * Check the service switch. On the 425e, this is a physical - * switch, unlike other frodo-based machines, so we can use it - * as a serial vs internal video selector, since the PROM can not - * be configured for serial console. - */ - frodoregs = (volatile u_int8_t *)IIOV(FRODO_BASE); - if (badaddr((caddr_t)frodoregs) == 0 && - !ISSET(frodoregs[FRODO_IISR], FRODO_IISR_SERVICE)) { - cp->cn_pri = CN_REMOTE; - conforced = 1; - conscode = -2; /* XXX */ - } else { - cp->cn_pri = CN_NORMAL; - } - - /* - * If our priority is higher than the currently-remembered - * console, install ourselves. - */ - if (((cn_tab == NULL) || (cp->cn_pri > cn_tab->cn_pri)) || conforced) - cn_tab = cp; -} - -/* ARGSUSED */ -void -apcicninit(cp) - struct consdev *cp; -{ - - /* - * We are not interested by the second console pass. - */ - if (consolepass != 0) - return; - - apci_cn = (struct apciregs *)IIOV(FRODO_BASE + FRODO_APCI_OFFSET(1)); - apciinit(apci_cn, apcidefaultrate); - apciconsinit = 1; -} - -/* ARGSUSED */ -int -apcicngetc(dev) - dev_t dev; -{ - u_char stat; - int c, s; - - s = splhigh(); - while (((stat = apci_cn->ap_lsr) & LSR_RXRDY) == 0) - ; - c = apci_cn->ap_data; - - /* clear any interrupts generated by this transmission */ - stat = apci_cn->ap_iir; - splx(s); - return (c); -} - -/* ARGSUSED */ -void -apcicnputc(dev, c) - dev_t dev; - int c; -{ - int timo; - u_char stat; - int s; - - s = splhigh(); - - if (apciconsinit == 0) { - apciinit(apci_cn, apcidefaultrate); - apciconsinit = 1; - } - - /* wait for any pending transmission to finish */ - timo = 50000; - while (((stat = apci_cn->ap_lsr) & LSR_TXRDY) == 0 && --timo) - ; - - apci_cn->ap_data = c & 0xff; - - /* wait for this transmission to complete */ - timo = 1500000; - while (((stat = apci_cn->ap_lsr) & LSR_TXRDY) == 0 && --timo) - ; - - /* clear any interrupts generated by this transmission */ - stat = apci_cn->ap_iir; - splx(s); -} |