Home | History | Annotate | Line # | Download | only in ic
com.c revision 1.119
      1  1.119  drochner /*	$NetBSD: com.c,v 1.119 1997/10/29 18:28:07 drochner Exp $	*/
      2   1.38       cgd 
      3    1.1       cgd /*-
      4   1.99   mycroft  * Copyright (c) 1993, 1994, 1995, 1996, 1997
      5   1.71   mycroft  *	Charles M. Hannum.  All rights reserved.
      6   1.99   mycroft  *
      7   1.99   mycroft  * Interrupt processing and hardware flow control partly based on code from
      8   1.99   mycroft  * Onno van der Linden and Gordon Ross.
      9   1.99   mycroft  *
     10   1.99   mycroft  * Redistribution and use in source and binary forms, with or without
     11   1.99   mycroft  * modification, are permitted provided that the following conditions
     12   1.99   mycroft  * are met:
     13   1.99   mycroft  * 1. Redistributions of source code must retain the above copyright
     14   1.99   mycroft  *    notice, this list of conditions and the following disclaimer.
     15   1.99   mycroft  * 2. Redistributions in binary form must reproduce the above copyright
     16   1.99   mycroft  *    notice, this list of conditions and the following disclaimer in the
     17   1.99   mycroft  *    documentation and/or other materials provided with the distribution.
     18   1.99   mycroft  * 3. All advertising materials mentioning features or use of this software
     19   1.99   mycroft  *    must display the following acknowledgement:
     20   1.99   mycroft  *	This product includes software developed by Charles M. Hannum.
     21   1.99   mycroft  * 4. The name of the author may not be used to endorse or promote products
     22   1.99   mycroft  *    derived from this software without specific prior written permission.
     23   1.99   mycroft  *
     24   1.99   mycroft  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     25   1.99   mycroft  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     26   1.99   mycroft  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     27   1.99   mycroft  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     28   1.99   mycroft  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     29   1.99   mycroft  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     30   1.99   mycroft  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     31   1.99   mycroft  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     32   1.99   mycroft  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     33   1.99   mycroft  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     34   1.99   mycroft  */
     35   1.99   mycroft 
     36   1.99   mycroft /*
     37    1.1       cgd  * Copyright (c) 1991 The Regents of the University of California.
     38    1.1       cgd  * All rights reserved.
     39    1.1       cgd  *
     40    1.1       cgd  * Redistribution and use in source and binary forms, with or without
     41    1.1       cgd  * modification, are permitted provided that the following conditions
     42    1.1       cgd  * are met:
     43    1.1       cgd  * 1. Redistributions of source code must retain the above copyright
     44    1.1       cgd  *    notice, this list of conditions and the following disclaimer.
     45    1.1       cgd  * 2. Redistributions in binary form must reproduce the above copyright
     46    1.1       cgd  *    notice, this list of conditions and the following disclaimer in the
     47    1.1       cgd  *    documentation and/or other materials provided with the distribution.
     48    1.1       cgd  * 3. All advertising materials mentioning features or use of this software
     49    1.1       cgd  *    must display the following acknowledgement:
     50    1.1       cgd  *	This product includes software developed by the University of
     51    1.1       cgd  *	California, Berkeley and its contributors.
     52    1.1       cgd  * 4. Neither the name of the University nor the names of its contributors
     53    1.1       cgd  *    may be used to endorse or promote products derived from this software
     54    1.1       cgd  *    without specific prior written permission.
     55    1.1       cgd  *
     56    1.1       cgd  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     57    1.1       cgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     58    1.1       cgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     59    1.1       cgd  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     60    1.1       cgd  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     61    1.1       cgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     62    1.1       cgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     63    1.1       cgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     64    1.1       cgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     65    1.1       cgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     66    1.1       cgd  * SUCH DAMAGE.
     67    1.1       cgd  *
     68   1.38       cgd  *	@(#)com.c	7.5 (Berkeley) 5/16/91
     69    1.1       cgd  */
     70    1.1       cgd 
     71    1.1       cgd /*
     72   1.99   mycroft  * COM driver, uses National Semiconductor NS16450/NS16550AF UART
     73  1.116      fvdl  * Supports automatic hardware flow control on StarTech ST16C650A UART
     74    1.1       cgd  */
     75  1.115  explorer 
     76  1.115  explorer #include "rnd.h"
     77  1.115  explorer #if NRND > 0 && defined(RND_COM)
     78  1.115  explorer #include <sys/rnd.h>
     79  1.115  explorer #endif
     80  1.115  explorer 
     81   1.14   mycroft #include <sys/param.h>
     82   1.14   mycroft #include <sys/systm.h>
     83   1.14   mycroft #include <sys/ioctl.h>
     84   1.14   mycroft #include <sys/select.h>
     85   1.14   mycroft #include <sys/tty.h>
     86   1.14   mycroft #include <sys/proc.h>
     87   1.14   mycroft #include <sys/user.h>
     88   1.14   mycroft #include <sys/conf.h>
     89   1.14   mycroft #include <sys/file.h>
     90   1.14   mycroft #include <sys/uio.h>
     91   1.14   mycroft #include <sys/kernel.h>
     92   1.14   mycroft #include <sys/syslog.h>
     93   1.14   mycroft #include <sys/types.h>
     94   1.21   mycroft #include <sys/device.h>
     95   1.14   mycroft 
     96   1.99   mycroft #include <machine/intr.h>
     97   1.82   mycroft #include <machine/bus.h>
     98   1.14   mycroft 
     99  1.113   thorpej #include <dev/ic/comreg.h>
    100  1.113   thorpej #include <dev/ic/comvar.h>
    101   1.60       cgd #include <dev/ic/ns16550reg.h>
    102  1.116      fvdl #include <dev/ic/st16650reg.h>
    103   1.65  christos #ifdef COM_HAYESP
    104   1.65  christos #include <dev/ic/hayespreg.h>
    105   1.65  christos #endif
    106   1.62   mycroft #define	com_lcr	com_cfcr
    107  1.106  drochner #include <dev/cons.h>
    108   1.14   mycroft 
    109   1.77       cgd #include "com.h"
    110   1.77       cgd 
    111   1.65  christos #ifdef COM_HAYESP
    112   1.99   mycroft int comprobeHAYESP __P((bus_space_handle_t hayespioh, struct com_softc *sc));
    113   1.65  christos #endif
    114  1.102   thorpej 
    115  1.104  drochner #if defined(DDB) || defined(KGDB)
    116  1.104  drochner static void com_enable_debugport __P((struct com_softc *));
    117  1.104  drochner #endif
    118   1.99   mycroft void	com_attach_subr	__P((struct com_softc *sc));
    119   1.80  christos void	comdiag		__P((void *));
    120  1.109        is int	comspeed	__P((long, long));
    121  1.106  drochner static	u_char	cflag2lcr __P((tcflag_t));
    122   1.80  christos int	comparam	__P((struct tty *, struct termios *));
    123   1.80  christos void	comstart	__P((struct tty *));
    124   1.99   mycroft void	comstop		__P((struct tty *, int));
    125   1.99   mycroft #ifdef __GENERIC_SOFT_INTERRUPTS
    126   1.99   mycroft void 	comsoft		__P((void *));
    127   1.99   mycroft #else
    128   1.99   mycroft #ifndef alpha
    129   1.99   mycroft void 	comsoft		__P((void));
    130   1.99   mycroft #else
    131   1.99   mycroft void 	comsoft		__P((void *));
    132   1.99   mycroft #endif
    133   1.99   mycroft #endif
    134   1.99   mycroft int	comhwiflow	__P((struct tty *, int));
    135   1.99   mycroft 
    136   1.99   mycroft void	com_loadchannelregs __P((struct com_softc *));
    137  1.101   mycroft void	com_hwiflow	__P((struct com_softc *));
    138   1.99   mycroft void	com_break	__P((struct com_softc *, int));
    139   1.99   mycroft void	com_modem	__P((struct com_softc *, int));
    140   1.99   mycroft void	com_iflush	__P((struct com_softc *));
    141   1.80  christos 
    142  1.102   thorpej int	com_common_getc	__P((bus_space_tag_t, bus_space_handle_t));
    143  1.102   thorpej void	com_common_putc	__P((bus_space_tag_t, bus_space_handle_t, int));
    144  1.102   thorpej 
    145   1.80  christos /* XXX: These belong elsewhere */
    146   1.80  christos cdev_decl(com);
    147   1.80  christos bdev_decl(com);
    148   1.80  christos 
    149   1.80  christos int	comcngetc	__P((dev_t));
    150   1.80  christos void	comcnputc	__P((dev_t, int));
    151   1.80  christos void	comcnpollc	__P((dev_t, int));
    152   1.80  christos 
    153   1.99   mycroft #define	integrate	static inline
    154   1.99   mycroft integrate void comrxint		__P((struct com_softc *, struct tty *));
    155   1.99   mycroft integrate void comtxint		__P((struct com_softc *, struct tty *));
    156   1.99   mycroft integrate void commsrint	__P((struct com_softc *, struct tty *));
    157  1.101   mycroft integrate void com_schedrx	__P((struct com_softc *));
    158   1.75       cgd 
    159   1.76   thorpej struct cfdriver com_cd = {
    160   1.76   thorpej 	NULL, "com", DV_TTY
    161    1.1       cgd };
    162   1.76   thorpej 
    163  1.106  drochner static int	comconsaddr;
    164  1.106  drochner static bus_space_tag_t comconstag;
    165  1.106  drochner static bus_space_handle_t comconsioh;
    166  1.106  drochner static int	comconsattached;
    167  1.106  drochner static int comconsrate;
    168  1.106  drochner static tcflag_t comconscflag;
    169   1.99   mycroft 
    170  1.111  christos static u_char tiocm_xxx2mcr __P((int));
    171  1.111  christos 
    172   1.99   mycroft #ifndef __GENERIC_SOFT_INTERRUPTS
    173   1.99   mycroft #ifdef alpha
    174   1.99   mycroft volatile int	com_softintr_scheduled;
    175   1.99   mycroft #endif
    176   1.99   mycroft #endif
    177    1.1       cgd 
    178    1.1       cgd #ifdef KGDB
    179  1.102   thorpej #include <sys/kgdb.h>
    180  1.106  drochner 
    181  1.106  drochner static int com_kgdb_addr;
    182  1.106  drochner static bus_space_tag_t com_kgdb_iot;
    183  1.106  drochner static bus_space_handle_t com_kgdb_ioh;
    184  1.106  drochner static int com_kgdb_attached;
    185  1.102   thorpej 
    186  1.102   thorpej int	com_kgdb_getc __P((void *));
    187  1.102   thorpej void	com_kgdb_putc __P((void *, int));
    188  1.102   thorpej #endif /* KGDB */
    189    1.1       cgd 
    190   1.21   mycroft #define	COMUNIT(x)	(minor(x))
    191    1.1       cgd 
    192   1.21   mycroft int
    193  1.109        is comspeed(speed, frequency)
    194  1.109        is 	long speed, frequency;
    195    1.1       cgd {
    196   1.21   mycroft #define	divrnd(n, q)	(((n)*2/(q)+1)/2)	/* divide and round off */
    197   1.21   mycroft 
    198   1.21   mycroft 	int x, err;
    199   1.21   mycroft 
    200   1.99   mycroft #if 0
    201   1.21   mycroft 	if (speed == 0)
    202   1.99   mycroft 		return (0);
    203   1.99   mycroft #endif
    204   1.99   mycroft 	if (speed <= 0)
    205   1.99   mycroft 		return (-1);
    206  1.109        is 	x = divrnd(frequency / 16, speed);
    207   1.21   mycroft 	if (x <= 0)
    208   1.99   mycroft 		return (-1);
    209  1.114        is 	err = divrnd(((quad_t)frequency) * 1000 / 16, speed * x) - 1000;
    210   1.21   mycroft 	if (err < 0)
    211   1.21   mycroft 		err = -err;
    212   1.21   mycroft 	if (err > COM_TOLERANCE)
    213   1.99   mycroft 		return (-1);
    214   1.99   mycroft 	return (x);
    215   1.21   mycroft 
    216   1.21   mycroft #undef	divrnd(n, q)
    217   1.21   mycroft }
    218   1.21   mycroft 
    219   1.99   mycroft #ifdef COM_DEBUG
    220  1.101   mycroft int	com_debug = 0;
    221  1.101   mycroft 
    222   1.99   mycroft void comstatus __P((struct com_softc *, char *));
    223   1.99   mycroft void
    224   1.99   mycroft comstatus(sc, str)
    225   1.99   mycroft 	struct com_softc *sc;
    226   1.99   mycroft 	char *str;
    227   1.99   mycroft {
    228   1.99   mycroft 	struct tty *tp = sc->sc_tty;
    229   1.99   mycroft 
    230   1.99   mycroft 	printf("%s: %s %sclocal  %sdcd %sts_carr_on %sdtr %stx_stopped\n",
    231   1.99   mycroft 	    sc->sc_dev.dv_xname, str,
    232   1.99   mycroft 	    ISSET(tp->t_cflag, CLOCAL) ? "+" : "-",
    233   1.99   mycroft 	    ISSET(sc->sc_msr, MSR_DCD) ? "+" : "-",
    234   1.99   mycroft 	    ISSET(tp->t_state, TS_CARR_ON) ? "+" : "-",
    235   1.99   mycroft 	    ISSET(sc->sc_mcr, MCR_DTR) ? "+" : "-",
    236   1.99   mycroft 	    sc->sc_tx_stopped ? "+" : "-");
    237   1.99   mycroft 
    238  1.101   mycroft 	printf("%s: %s %scrtscts %scts %sts_ttstop  %srts %xrx_flags\n",
    239   1.99   mycroft 	    sc->sc_dev.dv_xname, str,
    240   1.99   mycroft 	    ISSET(tp->t_cflag, CRTSCTS) ? "+" : "-",
    241   1.99   mycroft 	    ISSET(sc->sc_msr, MSR_CTS) ? "+" : "-",
    242   1.99   mycroft 	    ISSET(tp->t_state, TS_TTSTOP) ? "+" : "-",
    243   1.99   mycroft 	    ISSET(sc->sc_mcr, MCR_RTS) ? "+" : "-",
    244  1.101   mycroft 	    sc->sc_rx_flags);
    245   1.99   mycroft }
    246   1.99   mycroft #endif
    247   1.99   mycroft 
    248   1.21   mycroft int
    249   1.91   thorpej comprobe1(iot, ioh, iobase)
    250   1.91   thorpej 	bus_space_tag_t iot;
    251   1.91   thorpej 	bus_space_handle_t ioh;
    252   1.41   mycroft 	int iobase;
    253   1.21   mycroft {
    254   1.21   mycroft 
    255    1.1       cgd 	/* force access to id reg */
    256   1.91   thorpej 	bus_space_write_1(iot, ioh, com_lcr, 0);
    257   1.91   thorpej 	bus_space_write_1(iot, ioh, com_iir, 0);
    258   1.91   thorpej 	if (bus_space_read_1(iot, ioh, com_iir) & 0x38)
    259   1.99   mycroft 		return (0);
    260   1.21   mycroft 
    261   1.99   mycroft 	return (1);
    262    1.1       cgd }
    263    1.1       cgd 
    264   1.65  christos #ifdef COM_HAYESP
    265   1.65  christos int
    266   1.75       cgd comprobeHAYESP(hayespioh, sc)
    267   1.91   thorpej 	bus_space_handle_t hayespioh;
    268   1.64  christos 	struct com_softc *sc;
    269   1.64  christos {
    270   1.65  christos 	char	val, dips;
    271   1.64  christos 	int	combaselist[] = { 0x3f8, 0x2f8, 0x3e8, 0x2e8 };
    272   1.91   thorpej 	bus_space_tag_t iot = sc->sc_iot;
    273   1.64  christos 
    274   1.64  christos 	/*
    275   1.64  christos 	 * Hayes ESP cards have two iobases.  One is for compatibility with
    276   1.64  christos 	 * 16550 serial chips, and at the same ISA PC base addresses.  The
    277   1.64  christos 	 * other is for ESP-specific enhanced features, and lies at a
    278   1.65  christos 	 * different addressing range entirely (0x140, 0x180, 0x280, or 0x300).
    279   1.64  christos 	 */
    280   1.64  christos 
    281   1.64  christos 	/* Test for ESP signature */
    282   1.91   thorpej 	if ((bus_space_read_1(iot, hayespioh, 0) & 0xf3) == 0)
    283   1.99   mycroft 		return (0);
    284   1.64  christos 
    285   1.64  christos 	/*
    286   1.64  christos 	 * ESP is present at ESP enhanced base address; unknown com port
    287   1.64  christos 	 */
    288   1.64  christos 
    289   1.64  christos 	/* Get the dip-switch configurations */
    290   1.91   thorpej 	bus_space_write_1(iot, hayespioh, HAYESP_CMD1, HAYESP_GETDIPS);
    291   1.91   thorpej 	dips = bus_space_read_1(iot, hayespioh, HAYESP_STATUS1);
    292   1.64  christos 
    293   1.64  christos 	/* Determine which com port this ESP card services: bits 0,1 of  */
    294   1.64  christos 	/*  dips is the port # (0-3); combaselist[val] is the com_iobase */
    295   1.65  christos 	if (sc->sc_iobase != combaselist[dips & 0x03])
    296   1.99   mycroft 		return (0);
    297   1.65  christos 
    298   1.90  christos 	printf(": ESP");
    299   1.64  christos 
    300   1.65  christos  	/* Check ESP Self Test bits. */
    301   1.64  christos 	/* Check for ESP version 2.0: bits 4,5,6 == 010 */
    302   1.91   thorpej 	bus_space_write_1(iot, hayespioh, HAYESP_CMD1, HAYESP_GETTEST);
    303   1.99   mycroft 	val = bus_space_read_1(iot, hayespioh, HAYESP_STATUS1); /* Clear reg1 */
    304   1.91   thorpej 	val = bus_space_read_1(iot, hayespioh, HAYESP_STATUS2);
    305   1.64  christos 	if ((val & 0x70) < 0x20) {
    306   1.90  christos 		printf("-old (%o)", val & 0x70);
    307   1.64  christos 		/* we do not support the necessary features */
    308   1.99   mycroft 		return (0);
    309   1.64  christos 	}
    310   1.64  christos 
    311   1.64  christos 	/* Check for ability to emulate 16550: bit 8 == 1 */
    312   1.64  christos 	if ((dips & 0x80) == 0) {
    313   1.90  christos 		printf(" slave");
    314   1.64  christos 		/* XXX Does slave really mean no 16550 support?? */
    315   1.99   mycroft 		return (0);
    316   1.64  christos 	}
    317   1.64  christos 
    318   1.64  christos 	/*
    319   1.64  christos 	 * If we made it this far, we are a full-featured ESP v2.0 (or
    320   1.64  christos 	 * better), at the correct com port address.
    321   1.64  christos 	 */
    322   1.64  christos 
    323   1.65  christos 	SET(sc->sc_hwflags, COM_HW_HAYESP);
    324   1.90  christos 	printf(", 1024 byte fifo\n");
    325   1.99   mycroft 	return (1);
    326   1.64  christos }
    327   1.65  christos #endif
    328   1.64  christos 
    329  1.104  drochner #if defined(DDB) || defined(KGDB)
    330  1.104  drochner static void
    331  1.104  drochner com_enable_debugport(sc)
    332  1.104  drochner 	struct com_softc *sc;
    333  1.104  drochner {
    334  1.104  drochner 	int s;
    335  1.104  drochner 
    336  1.104  drochner 	/* Turn on line break interrupt, set carrier. */
    337  1.104  drochner 	s = splserial();
    338  1.104  drochner 	sc->sc_ier = IER_ERXRDY;
    339  1.104  drochner 	bus_space_write_1(sc->sc_iot, sc->sc_ioh, com_ier, sc->sc_ier);
    340  1.104  drochner 	SET(sc->sc_mcr, MCR_DTR | MCR_RTS);
    341  1.104  drochner 	bus_space_write_1(sc->sc_iot, sc->sc_ioh, com_mcr, sc->sc_mcr);
    342  1.104  drochner 	splx(s);
    343  1.104  drochner }
    344  1.104  drochner #endif
    345    1.1       cgd 
    346   1.29   mycroft void
    347   1.99   mycroft com_attach_subr(sc)
    348   1.99   mycroft 	struct com_softc *sc;
    349   1.29   mycroft {
    350   1.99   mycroft 	int iobase = sc->sc_iobase;
    351   1.99   mycroft 	bus_space_tag_t iot = sc->sc_iot;
    352   1.99   mycroft 	bus_space_handle_t ioh = sc->sc_ioh;
    353  1.118      fvdl #ifdef COM16650
    354  1.116      fvdl 	u_int8_t lcr;
    355  1.118      fvdl #endif
    356   1.65  christos #ifdef COM_HAYESP
    357   1.65  christos 	int	hayesp_ports[] = { 0x140, 0x180, 0x280, 0x300, 0 };
    358   1.65  christos 	int	*hayespp;
    359   1.65  christos #endif
    360  1.117   mycroft 
    361  1.117   mycroft 	/* Disable interrupts before configuring the device. */
    362  1.117   mycroft 	sc->sc_ier = 0;
    363  1.117   mycroft 	bus_space_write_1(sc->sc_iot, sc->sc_ioh, com_ier, sc->sc_ier);
    364    1.1       cgd 
    365  1.106  drochner 	if (iot == comconstag && iobase == comconsaddr) {
    366  1.105  drochner 		comconsattached = 1;
    367  1.105  drochner 
    368   1.96   mycroft 		/* Make sure the console is always "hardwired". */
    369   1.75       cgd 		delay(1000);			/* wait for output to finish */
    370   1.75       cgd 		SET(sc->sc_hwflags, COM_HW_CONSOLE);
    371   1.99   mycroft 		SET(sc->sc_swflags, TIOCFLAG_SOFTCAR);
    372   1.75       cgd 	}
    373   1.26       cgd 
    374   1.65  christos #ifdef COM_HAYESP
    375   1.65  christos 	/* Look for a Hayes ESP board. */
    376   1.75       cgd 	for (hayespp = hayesp_ports; *hayespp != 0; hayespp++) {
    377   1.91   thorpej 		bus_space_handle_t hayespioh;
    378   1.75       cgd 
    379   1.75       cgd #define	HAYESP_NPORTS	8			/* XXX XXX XXX ??? ??? ??? */
    380   1.92       cgd 		if (bus_space_map(iot, *hayespp, HAYESP_NPORTS, 0, &hayespioh))
    381   1.75       cgd 			continue;
    382   1.75       cgd 		if (comprobeHAYESP(hayespioh, sc)) {
    383   1.75       cgd 			sc->sc_hayespioh = hayespioh;
    384   1.99   mycroft 			sc->sc_fifolen = 1024;
    385   1.99   mycroft 
    386   1.99   mycroft 			/* Set 16550 compatibility mode */
    387   1.99   mycroft 			bus_space_write_1(iot, hayespioh, HAYESP_CMD1, HAYESP_SETMODE);
    388   1.99   mycroft 			bus_space_write_1(iot, hayespioh, HAYESP_CMD2,
    389   1.99   mycroft 			     HAYESP_MODE_FIFO|HAYESP_MODE_RTS|
    390   1.99   mycroft 			     HAYESP_MODE_SCALE);
    391   1.99   mycroft 
    392   1.99   mycroft 			/* Set RTS/CTS flow control */
    393   1.99   mycroft 			bus_space_write_1(iot, hayespioh, HAYESP_CMD1, HAYESP_SETFLOWTYPE);
    394   1.99   mycroft 			bus_space_write_1(iot, hayespioh, HAYESP_CMD2, HAYESP_FLOW_RTS);
    395   1.99   mycroft 			bus_space_write_1(iot, hayespioh, HAYESP_CMD2, HAYESP_FLOW_CTS);
    396   1.99   mycroft 
    397   1.99   mycroft 			/* Set flow control levels */
    398   1.99   mycroft 			bus_space_write_1(iot, hayespioh, HAYESP_CMD1, HAYESP_SETRXFLOW);
    399   1.99   mycroft 			bus_space_write_1(iot, hayespioh, HAYESP_CMD2,
    400   1.99   mycroft 			     HAYESP_HIBYTE(HAYESP_RXHIWMARK));
    401   1.99   mycroft 			bus_space_write_1(iot, hayespioh, HAYESP_CMD2,
    402   1.99   mycroft 			     HAYESP_LOBYTE(HAYESP_RXHIWMARK));
    403   1.99   mycroft 			bus_space_write_1(iot, hayespioh, HAYESP_CMD2,
    404   1.99   mycroft 			     HAYESP_HIBYTE(HAYESP_RXLOWMARK));
    405   1.99   mycroft 			bus_space_write_1(iot, hayespioh, HAYESP_CMD2,
    406   1.99   mycroft 			     HAYESP_LOBYTE(HAYESP_RXLOWMARK));
    407   1.99   mycroft 
    408   1.65  christos 			break;
    409   1.65  christos 		}
    410   1.91   thorpej 		bus_space_unmap(iot, hayespioh, HAYESP_NPORTS);
    411   1.75       cgd 	}
    412   1.65  christos 	/* No ESP; look for other things. */
    413   1.65  christos 	if (*hayespp == 0) {
    414   1.65  christos #endif
    415   1.99   mycroft 	sc->sc_fifolen = 1;
    416    1.1       cgd 	/* look for a NS 16550AF UART with FIFOs */
    417   1.91   thorpej 	bus_space_write_1(iot, ioh, com_fifo,
    418   1.21   mycroft 	    FIFO_ENABLE | FIFO_RCV_RST | FIFO_XMT_RST | FIFO_TRIGGER_14);
    419   1.20   mycroft 	delay(100);
    420   1.99   mycroft 	if (ISSET(bus_space_read_1(iot, ioh, com_iir), IIR_FIFO_MASK)
    421   1.99   mycroft 	    == IIR_FIFO_MASK)
    422   1.99   mycroft 		if (ISSET(bus_space_read_1(iot, ioh, com_fifo), FIFO_TRIGGER_14)
    423   1.99   mycroft 		    == FIFO_TRIGGER_14) {
    424   1.62   mycroft 			SET(sc->sc_hwflags, COM_HW_FIFO);
    425  1.116      fvdl 
    426  1.118      fvdl #ifdef COM16650
    427  1.116      fvdl 			/*
    428  1.116      fvdl 			 * IIR changes into the EFR if LCR is set to LCR_EERS
    429  1.116      fvdl 			 * on 16650s. We also know IIR != 0 at this point.
    430  1.116      fvdl 			 * Write 0 into the EFR, and read it. If the result
    431  1.116      fvdl 			 * is 0, we have a 16650.
    432  1.116      fvdl 			 *
    433  1.116      fvdl 			 * Older 16650s were broken; the test to detect them
    434  1.116      fvdl 			 * is taken from the Linux driver. Apparently
    435  1.116      fvdl 			 * setting DLAB enable gives access to the EFR on
    436  1.116      fvdl 			 * these chips.
    437  1.116      fvdl 			 */
    438  1.116      fvdl 			lcr = bus_space_read_1(iot, ioh, com_lcr);
    439  1.116      fvdl 			bus_space_write_1(iot, ioh, com_lcr, LCR_EERS);
    440  1.116      fvdl 			bus_space_write_1(iot, ioh, com_efr, 0);
    441  1.116      fvdl 			if (bus_space_read_1(iot, ioh, com_efr) == 0) {
    442  1.116      fvdl 				bus_space_write_1(iot, ioh, com_lcr,
    443  1.116      fvdl 				    lcr | LCR_DLAB);
    444  1.116      fvdl 				if (bus_space_read_1(iot, ioh, com_efr) == 0) {
    445  1.116      fvdl 					CLR(sc->sc_hwflags, COM_HW_FIFO);
    446  1.116      fvdl 					sc->sc_fifolen = 0;
    447  1.116      fvdl 				} else {
    448  1.116      fvdl 					SET(sc->sc_hwflags, COM_HW_FLOW);
    449  1.116      fvdl 					sc->sc_fifolen = 32;
    450  1.116      fvdl 				}
    451  1.118      fvdl 			} else
    452  1.118      fvdl #endif
    453  1.116      fvdl 				sc->sc_fifolen = 16;
    454  1.116      fvdl 
    455  1.118      fvdl #ifdef COM16650
    456  1.119  drochner 			bus_space_write_1(iot, ioh, com_lcr, lcr);
    457  1.119  drochner 			if (sc->sc_fifolen == 0)
    458  1.119  drochner 				printf(": st16650, broken fifo\n");
    459  1.119  drochner 			else if (sc->sc_fifolen == 32)
    460  1.119  drochner 				printf(": st16650a, working fifo\n");
    461  1.119  drochner 			else
    462  1.118      fvdl #endif
    463  1.119  drochner 				printf(": ns16550a, working fifo\n");
    464   1.21   mycroft 		} else
    465   1.90  christos 			printf(": ns16550, broken fifo\n");
    466   1.21   mycroft 	else
    467   1.90  christos 		printf(": ns8250 or ns16450, no fifo\n");
    468   1.91   thorpej 	bus_space_write_1(iot, ioh, com_fifo, 0);
    469   1.65  christos #ifdef COM_HAYESP
    470   1.65  christos 	}
    471   1.65  christos #endif
    472   1.21   mycroft 
    473   1.99   mycroft 	if (!ISSET(sc->sc_hwflags, COM_HW_NOIEN))
    474   1.99   mycroft 		SET(sc->sc_mcr, MCR_IENABLE);
    475   1.30   mycroft 
    476   1.96   mycroft 	if (ISSET(sc->sc_hwflags, COM_HW_CONSOLE)) {
    477  1.106  drochner 		int maj;
    478  1.106  drochner 
    479  1.106  drochner 		/* locate the major number */
    480  1.106  drochner 		for (maj = 0; maj < nchrdev; maj++)
    481  1.106  drochner 			if (cdevsw[maj].d_open == comopen)
    482  1.106  drochner 				break;
    483  1.106  drochner 
    484  1.106  drochner 		cn_tab->cn_dev = makedev(maj, sc->sc_dev.dv_unit);
    485  1.104  drochner #ifdef DDB
    486  1.104  drochner 		com_enable_debugport(sc);
    487  1.104  drochner #endif
    488   1.96   mycroft 		printf("%s: console\n", sc->sc_dev.dv_xname);
    489   1.96   mycroft 	}
    490   1.96   mycroft 
    491    1.1       cgd #ifdef KGDB
    492  1.102   thorpej 	/*
    493  1.102   thorpej 	 * Allow kgdb to "take over" this port.  If this is
    494  1.102   thorpej 	 * the kgdb device, it has exclusive use.
    495  1.102   thorpej 	 */
    496  1.106  drochner 	if (iot == com_kgdb_iot && iobase == com_kgdb_addr) {
    497  1.106  drochner 		com_kgdb_attached = 1;
    498  1.106  drochner 
    499  1.104  drochner 		SET(sc->sc_hwflags, COM_HW_KGDB);
    500  1.104  drochner 		com_enable_debugport(sc);
    501  1.103  drochner 		printf("%s: kgdb\n", sc->sc_dev.dv_xname);
    502  1.103  drochner 	}
    503   1.99   mycroft #endif
    504   1.99   mycroft 
    505   1.99   mycroft #ifdef __GENERIC_SOFT_INTERRUPTS
    506   1.99   mycroft 	sc->sc_si = softintr_establish(IPL_SOFTSERIAL, comsoft, sc);
    507    1.1       cgd #endif
    508  1.115  explorer 
    509  1.115  explorer #if NRND > 0 && defined(RND_COM)
    510  1.115  explorer 	rnd_attach_source(&sc->rnd_source, sc->sc_dev.dv_xname,
    511  1.115  explorer 			  RND_TYPE_TTY);
    512  1.115  explorer #endif
    513    1.1       cgd }
    514    1.1       cgd 
    515   1.21   mycroft int
    516   1.21   mycroft comopen(dev, flag, mode, p)
    517   1.21   mycroft 	dev_t dev;
    518   1.21   mycroft 	int flag, mode;
    519   1.21   mycroft 	struct proc *p;
    520    1.1       cgd {
    521   1.21   mycroft 	int unit = COMUNIT(dev);
    522   1.21   mycroft 	struct com_softc *sc;
    523   1.21   mycroft 	struct tty *tp;
    524   1.99   mycroft 	int s, s2;
    525    1.1       cgd 	int error = 0;
    526    1.1       cgd 
    527   1.76   thorpej 	if (unit >= com_cd.cd_ndevs)
    528   1.99   mycroft 		return (ENXIO);
    529   1.76   thorpej 	sc = com_cd.cd_devs[unit];
    530   1.29   mycroft 	if (!sc)
    531   1.99   mycroft 		return (ENXIO);
    532   1.21   mycroft 
    533  1.102   thorpej #ifdef KGDB
    534  1.102   thorpej 	/*
    535  1.102   thorpej 	 * If this is the kgdb port, no other use is permitted.
    536  1.102   thorpej 	 */
    537  1.102   thorpej 	if (ISSET(sc->sc_hwflags, COM_HW_KGDB))
    538  1.102   thorpej 		return (EBUSY);
    539  1.102   thorpej #endif
    540  1.102   thorpej 
    541   1.83       cgd 	if (!sc->sc_tty) {
    542   1.50   mycroft 		tp = sc->sc_tty = ttymalloc();
    543   1.83       cgd 		tty_attach(tp);
    544   1.83       cgd 	} else
    545   1.50   mycroft 		tp = sc->sc_tty;
    546   1.21   mycroft 
    547   1.99   mycroft 	if (ISSET(tp->t_state, TS_ISOPEN) &&
    548   1.99   mycroft 	    ISSET(tp->t_state, TS_XCLUDE) &&
    549   1.99   mycroft 	    p->p_ucred->cr_uid != 0)
    550   1.99   mycroft 		return (EBUSY);
    551   1.99   mycroft 
    552   1.99   mycroft 	s = spltty();
    553   1.99   mycroft 
    554   1.99   mycroft 	/* We need to set this early for the benefit of comsoft(). */
    555   1.99   mycroft 	SET(tp->t_state, TS_WOPEN);
    556   1.99   mycroft 
    557   1.99   mycroft 	/*
    558   1.99   mycroft 	 * Do the following iff this is a first open.
    559   1.99   mycroft 	 */
    560   1.62   mycroft 	if (!ISSET(tp->t_state, TS_ISOPEN)) {
    561   1.99   mycroft 		struct termios t;
    562   1.99   mycroft 
    563   1.99   mycroft 		/* Turn on interrupts. */
    564   1.99   mycroft 		sc->sc_ier = IER_ERXRDY | IER_ERLS | IER_EMSC;
    565   1.99   mycroft 		bus_space_write_1(sc->sc_iot, sc->sc_ioh, com_ier, sc->sc_ier);
    566   1.99   mycroft 
    567   1.99   mycroft 		/* Fetch the current modem control status, needed later. */
    568   1.99   mycroft 		sc->sc_msr = bus_space_read_1(sc->sc_iot, sc->sc_ioh, com_msr);
    569   1.99   mycroft 
    570   1.99   mycroft 		/* Add some entry points needed by the tty layer. */
    571   1.99   mycroft 		tp->t_oproc = comstart;
    572   1.99   mycroft 		tp->t_param = comparam;
    573   1.99   mycroft 		tp->t_hwiflow = comhwiflow;
    574   1.99   mycroft 		tp->t_dev = dev;
    575   1.99   mycroft 
    576   1.99   mycroft 		/*
    577   1.99   mycroft 		 * Initialize the termios status to the defaults.  Add in the
    578   1.99   mycroft 		 * sticky bits from TIOCSFLAGS.
    579   1.99   mycroft 		 */
    580   1.99   mycroft 		t.c_ispeed = 0;
    581   1.98   mycroft 		if (ISSET(sc->sc_hwflags, COM_HW_CONSOLE)) {
    582   1.99   mycroft 			t.c_ospeed = comconsrate;
    583   1.99   mycroft 			t.c_cflag = comconscflag;
    584   1.98   mycroft 		} else {
    585   1.99   mycroft 			t.c_ospeed = TTYDEF_SPEED;
    586   1.99   mycroft 			t.c_cflag = TTYDEF_CFLAG;
    587   1.98   mycroft 		}
    588   1.99   mycroft 		if (ISSET(sc->sc_swflags, TIOCFLAG_CLOCAL))
    589   1.99   mycroft 			SET(t.c_cflag, CLOCAL);
    590   1.99   mycroft 		if (ISSET(sc->sc_swflags, TIOCFLAG_CRTSCTS))
    591   1.99   mycroft 			SET(t.c_cflag, CRTSCTS);
    592   1.99   mycroft 		if (ISSET(sc->sc_swflags, TIOCFLAG_MDMBUF))
    593   1.99   mycroft 			SET(t.c_cflag, MDMBUF);
    594   1.99   mycroft 		tp->t_iflag = TTYDEF_IFLAG;
    595   1.99   mycroft 		tp->t_oflag = TTYDEF_OFLAG;
    596   1.16        ws 		tp->t_lflag = TTYDEF_LFLAG;
    597   1.99   mycroft 		ttychars(tp);
    598   1.99   mycroft 		(void) comparam(tp, &t);
    599    1.1       cgd 		ttsetwater(tp);
    600   1.21   mycroft 
    601   1.99   mycroft 		s2 = splserial();
    602   1.57   mycroft 
    603   1.99   mycroft 		/*
    604   1.99   mycroft 		 * Turn on DTR.  We must always do this, even if carrier is not
    605   1.99   mycroft 		 * present, because otherwise we'd have to use TIOCSDTR
    606   1.99   mycroft 		 * immediately after setting CLOCAL.  We will drop DTR only on
    607   1.99   mycroft 		 * the next high-low transition of DCD, or by explicit request.
    608   1.99   mycroft 		 */
    609   1.99   mycroft 		com_modem(sc, 1);
    610   1.65  christos 
    611   1.99   mycroft 		/* Clear the input ring, and unblock. */
    612   1.99   mycroft 		sc->sc_rbput = sc->sc_rbget = 0;
    613   1.99   mycroft 		sc->sc_rbavail = RXBUFSIZE;
    614   1.99   mycroft 		com_iflush(sc);
    615  1.101   mycroft 		CLR(sc->sc_rx_flags, RX_ANY_BLOCK);
    616  1.101   mycroft 		com_hwiflow(sc);
    617   1.65  christos 
    618   1.99   mycroft #ifdef COM_DEBUG
    619  1.101   mycroft 		if (com_debug)
    620  1.101   mycroft 			comstatus(sc, "comopen  ");
    621   1.65  christos #endif
    622   1.21   mycroft 
    623   1.99   mycroft 		splx(s2);
    624   1.99   mycroft 	}
    625   1.99   mycroft 	error = 0;
    626   1.21   mycroft 
    627   1.99   mycroft 	/* If we're doing a blocking open... */
    628   1.62   mycroft 	if (!ISSET(flag, O_NONBLOCK))
    629   1.99   mycroft 		/* ...then wait for carrier. */
    630   1.99   mycroft 		while (!ISSET(tp->t_state, TS_CARR_ON) &&
    631   1.99   mycroft 		    !ISSET(tp->t_cflag, CLOCAL | MDMBUF)) {
    632   1.62   mycroft 			error = ttysleep(tp, &tp->t_rawq, TTIPRI | PCATCH,
    633   1.62   mycroft 			    ttopen, 0);
    634   1.21   mycroft 			if (error) {
    635   1.99   mycroft 				/*
    636   1.99   mycroft 				 * If the open was interrupted and nobody
    637   1.99   mycroft 				 * else has the device open, then hang up.
    638   1.99   mycroft 				 */
    639   1.99   mycroft 				if (!ISSET(tp->t_state, TS_ISOPEN)) {
    640   1.99   mycroft 					com_modem(sc, 0);
    641   1.99   mycroft 					CLR(tp->t_state, TS_WOPEN);
    642   1.99   mycroft 					ttwakeup(tp);
    643   1.99   mycroft 				}
    644   1.99   mycroft 				break;
    645   1.21   mycroft 			}
    646   1.99   mycroft 			SET(tp->t_state, TS_WOPEN);
    647   1.21   mycroft 		}
    648   1.99   mycroft 
    649   1.21   mycroft 	splx(s);
    650   1.99   mycroft 	if (error == 0)
    651   1.99   mycroft 		error = (*linesw[tp->t_line].l_open)(dev, tp);
    652   1.99   mycroft 	return (error);
    653    1.1       cgd }
    654    1.1       cgd 
    655   1.21   mycroft int
    656    1.1       cgd comclose(dev, flag, mode, p)
    657    1.1       cgd 	dev_t dev;
    658    1.1       cgd 	int flag, mode;
    659    1.1       cgd 	struct proc *p;
    660    1.1       cgd {
    661   1.21   mycroft 	int unit = COMUNIT(dev);
    662   1.76   thorpej 	struct com_softc *sc = com_cd.cd_devs[unit];
    663   1.50   mycroft 	struct tty *tp = sc->sc_tty;
    664   1.57   mycroft 	int s;
    665   1.57   mycroft 
    666   1.57   mycroft 	/* XXX This is for cons.c. */
    667   1.62   mycroft 	if (!ISSET(tp->t_state, TS_ISOPEN))
    668   1.99   mycroft 		return (0);
    669   1.21   mycroft 
    670    1.1       cgd 	(*linesw[tp->t_line].l_close)(tp, flag);
    671    1.1       cgd 	ttyclose(tp);
    672   1.99   mycroft 
    673   1.99   mycroft 	/* If we were asserting flow control, then deassert it. */
    674  1.101   mycroft 	SET(sc->sc_rx_flags, RX_IBUF_BLOCKED);
    675  1.101   mycroft 	com_hwiflow(sc);
    676   1.99   mycroft 	/* Clear any break condition set with TIOCSBRK. */
    677   1.99   mycroft 	com_break(sc, 0);
    678   1.99   mycroft 	/*
    679   1.99   mycroft 	 * Hang up if necessary.  Wait a bit, so the other side has time to
    680   1.99   mycroft 	 * notice even if we immediately open the port again.
    681   1.99   mycroft 	 */
    682   1.99   mycroft 	if (ISSET(tp->t_cflag, HUPCL)) {
    683   1.99   mycroft 		com_modem(sc, 0);
    684   1.99   mycroft 		(void) tsleep(sc, TTIPRI, ttclos, hz);
    685   1.21   mycroft 	}
    686   1.99   mycroft 
    687   1.99   mycroft 	s = splserial();
    688   1.99   mycroft 	/* Turn off interrupts. */
    689  1.104  drochner #ifdef DDB
    690  1.104  drochner 	if(ISSET(sc->sc_hwflags, COM_HW_CONSOLE))
    691  1.104  drochner 		sc->sc_ier = IER_ERXRDY; /* interrupt on break */
    692  1.104  drochner 	else
    693  1.104  drochner #else
    694  1.104  drochner 		sc->sc_ier = 0;
    695  1.104  drochner #endif
    696   1.99   mycroft 	bus_space_write_1(sc->sc_iot, sc->sc_ioh, com_ier, sc->sc_ier);
    697   1.99   mycroft 	splx(s);
    698   1.99   mycroft 
    699   1.99   mycroft 	return (0);
    700    1.1       cgd }
    701    1.1       cgd 
    702   1.21   mycroft int
    703    1.1       cgd comread(dev, uio, flag)
    704    1.1       cgd 	dev_t dev;
    705    1.1       cgd 	struct uio *uio;
    706   1.21   mycroft 	int flag;
    707    1.1       cgd {
    708   1.76   thorpej 	struct com_softc *sc = com_cd.cd_devs[COMUNIT(dev)];
    709   1.52   mycroft 	struct tty *tp = sc->sc_tty;
    710    1.1       cgd 
    711    1.1       cgd 	return ((*linesw[tp->t_line].l_read)(tp, uio, flag));
    712    1.1       cgd }
    713    1.1       cgd 
    714   1.21   mycroft int
    715    1.1       cgd comwrite(dev, uio, flag)
    716    1.1       cgd 	dev_t dev;
    717    1.1       cgd 	struct uio *uio;
    718   1.21   mycroft 	int flag;
    719    1.1       cgd {
    720   1.76   thorpej 	struct com_softc *sc = com_cd.cd_devs[COMUNIT(dev)];
    721   1.52   mycroft 	struct tty *tp = sc->sc_tty;
    722    1.1       cgd 
    723    1.1       cgd 	return ((*linesw[tp->t_line].l_write)(tp, uio, flag));
    724    1.1       cgd }
    725   1.50   mycroft 
    726   1.50   mycroft struct tty *
    727   1.50   mycroft comtty(dev)
    728   1.50   mycroft 	dev_t dev;
    729   1.50   mycroft {
    730   1.76   thorpej 	struct com_softc *sc = com_cd.cd_devs[COMUNIT(dev)];
    731   1.52   mycroft 	struct tty *tp = sc->sc_tty;
    732   1.50   mycroft 
    733   1.52   mycroft 	return (tp);
    734   1.50   mycroft }
    735  1.111  christos 
    736  1.111  christos static u_char
    737  1.111  christos tiocm_xxx2mcr(data)
    738  1.111  christos 	int data;
    739  1.111  christos {
    740  1.111  christos 	u_char m = 0;
    741  1.111  christos 
    742  1.111  christos 	if (ISSET(data, TIOCM_DTR))
    743  1.111  christos 		SET(m, MCR_DTR);
    744  1.111  christos 	if (ISSET(data, TIOCM_RTS))
    745  1.111  christos 		SET(m, MCR_RTS);
    746  1.111  christos 	return m;
    747  1.111  christos }
    748    1.1       cgd 
    749   1.21   mycroft int
    750   1.19   mycroft comioctl(dev, cmd, data, flag, p)
    751    1.1       cgd 	dev_t dev;
    752   1.39       cgd 	u_long cmd;
    753    1.1       cgd 	caddr_t data;
    754   1.19   mycroft 	int flag;
    755   1.19   mycroft 	struct proc *p;
    756    1.1       cgd {
    757   1.21   mycroft 	int unit = COMUNIT(dev);
    758   1.76   thorpej 	struct com_softc *sc = com_cd.cd_devs[unit];
    759   1.50   mycroft 	struct tty *tp = sc->sc_tty;
    760   1.21   mycroft 	int error;
    761   1.21   mycroft 
    762   1.19   mycroft 	error = (*linesw[tp->t_line].l_ioctl)(tp, cmd, data, flag, p);
    763    1.1       cgd 	if (error >= 0)
    764   1.99   mycroft 		return (error);
    765   1.99   mycroft 
    766   1.19   mycroft 	error = ttioctl(tp, cmd, data, flag, p);
    767    1.1       cgd 	if (error >= 0)
    768   1.99   mycroft 		return (error);
    769    1.1       cgd 
    770    1.1       cgd 	switch (cmd) {
    771    1.1       cgd 	case TIOCSBRK:
    772   1.99   mycroft 		com_break(sc, 1);
    773    1.1       cgd 		break;
    774   1.99   mycroft 
    775    1.1       cgd 	case TIOCCBRK:
    776   1.99   mycroft 		com_break(sc, 0);
    777    1.1       cgd 		break;
    778   1.99   mycroft 
    779    1.1       cgd 	case TIOCSDTR:
    780   1.99   mycroft 		com_modem(sc, 1);
    781    1.1       cgd 		break;
    782   1.99   mycroft 
    783    1.1       cgd 	case TIOCCDTR:
    784   1.99   mycroft 		com_modem(sc, 0);
    785    1.1       cgd 		break;
    786   1.99   mycroft 
    787   1.99   mycroft 	case TIOCGFLAGS:
    788   1.99   mycroft 		*(int *)data = sc->sc_swflags;
    789   1.99   mycroft 		break;
    790   1.99   mycroft 
    791   1.99   mycroft 	case TIOCSFLAGS:
    792   1.99   mycroft 		error = suser(p->p_ucred, &p->p_acflag);
    793   1.99   mycroft 		if (error)
    794   1.99   mycroft 			return (error);
    795   1.99   mycroft 		sc->sc_swflags = *(int *)data;
    796   1.99   mycroft 		break;
    797   1.99   mycroft 
    798    1.1       cgd 	case TIOCMSET:
    799  1.111  christos 		CLR(sc->sc_mcr, MCR_DTR | MCR_RTS);
    800  1.111  christos 		/*FALLTHROUGH*/
    801  1.111  christos 
    802    1.1       cgd 	case TIOCMBIS:
    803  1.111  christos 		SET(sc->sc_mcr, tiocm_xxx2mcr(*(int *)data));
    804  1.111  christos 		bus_space_write_1(sc->sc_iot, sc->sc_ioh, com_mcr, sc->sc_mcr);
    805  1.111  christos 		break;
    806  1.111  christos 
    807    1.1       cgd 	case TIOCMBIC:
    808  1.111  christos 		CLR(sc->sc_mcr, tiocm_xxx2mcr(*(int *)data));
    809  1.111  christos 		bus_space_write_1(sc->sc_iot, sc->sc_ioh, com_mcr, sc->sc_mcr);
    810  1.111  christos 		break;
    811  1.111  christos 
    812  1.111  christos 	case TIOCMGET: {
    813  1.111  christos 		u_char m;
    814  1.111  christos 		int bits = 0;
    815  1.111  christos 
    816  1.111  christos 		m = sc->sc_mcr;
    817  1.111  christos 		if (ISSET(m, MCR_DTR))
    818  1.111  christos 			SET(bits, TIOCM_DTR);
    819  1.111  christos 		if (ISSET(m, MCR_RTS))
    820  1.111  christos 			SET(bits, TIOCM_RTS);
    821  1.111  christos 		m = sc->sc_msr;
    822  1.111  christos 		if (ISSET(m, MSR_DCD))
    823  1.111  christos 			SET(bits, TIOCM_CD);
    824  1.111  christos 		if (ISSET(m, MSR_CTS))
    825  1.111  christos 			SET(bits, TIOCM_CTS);
    826  1.111  christos 		if (ISSET(m, MSR_DSR))
    827  1.111  christos 			SET(bits, TIOCM_DSR);
    828  1.111  christos 		if (ISSET(m, MSR_RI | MSR_TERI))
    829  1.111  christos 			SET(bits, TIOCM_RI);
    830  1.111  christos 		if (bus_space_read_1(sc->sc_iot, sc->sc_ioh, com_ier))
    831  1.111  christos 			SET(bits, TIOCM_LE);
    832  1.111  christos 		*(int *)data = bits;
    833  1.111  christos 		break;
    834  1.111  christos 	}
    835   1.99   mycroft 	default:
    836   1.99   mycroft 		return (ENOTTY);
    837   1.21   mycroft 	}
    838   1.22       cgd 
    839   1.99   mycroft #ifdef COM_DEBUG
    840  1.101   mycroft 	if (com_debug)
    841   1.99   mycroft 		comstatus(sc, "comioctl ");
    842   1.99   mycroft #endif
    843   1.99   mycroft 
    844   1.99   mycroft 	return (0);
    845   1.99   mycroft }
    846   1.99   mycroft 
    847  1.101   mycroft integrate void
    848  1.101   mycroft com_schedrx(sc)
    849  1.101   mycroft 	struct com_softc *sc;
    850  1.101   mycroft {
    851  1.101   mycroft 
    852  1.101   mycroft 	sc->sc_rx_ready = 1;
    853  1.101   mycroft 
    854  1.101   mycroft 	/* Wake up the poller. */
    855  1.101   mycroft #ifdef __GENERIC_SOFT_INTERRUPTS
    856  1.101   mycroft 	softintr_schedule(sc->sc_si);
    857  1.101   mycroft #else
    858  1.101   mycroft #ifndef alpha
    859  1.101   mycroft 	setsoftserial();
    860  1.101   mycroft #else
    861  1.101   mycroft 	if (!com_softintr_scheduled) {
    862  1.101   mycroft 		com_softintr_scheduled = 1;
    863  1.101   mycroft 		timeout(comsoft, NULL, 1);
    864  1.101   mycroft 	}
    865  1.101   mycroft #endif
    866  1.101   mycroft #endif
    867  1.101   mycroft }
    868  1.101   mycroft 
    869   1.99   mycroft void
    870   1.99   mycroft com_break(sc, onoff)
    871   1.99   mycroft 	struct com_softc *sc;
    872   1.99   mycroft 	int onoff;
    873   1.99   mycroft {
    874   1.99   mycroft 	int s;
    875   1.99   mycroft 
    876   1.99   mycroft 	s = splserial();
    877   1.99   mycroft 	if (onoff)
    878   1.99   mycroft 		SET(sc->sc_lcr, LCR_SBREAK);
    879   1.99   mycroft 	else
    880   1.99   mycroft 		CLR(sc->sc_lcr, LCR_SBREAK);
    881   1.22       cgd 
    882   1.99   mycroft 	if (!sc->sc_heldchange) {
    883   1.99   mycroft 		if (sc->sc_tx_busy) {
    884   1.99   mycroft 			sc->sc_heldtbc = sc->sc_tbc;
    885   1.99   mycroft 			sc->sc_tbc = 0;
    886   1.99   mycroft 			sc->sc_heldchange = 1;
    887   1.99   mycroft 		} else
    888   1.99   mycroft 			com_loadchannelregs(sc);
    889   1.22       cgd 	}
    890   1.99   mycroft 	splx(s);
    891   1.99   mycroft }
    892   1.22       cgd 
    893   1.99   mycroft void
    894   1.99   mycroft com_modem(sc, onoff)
    895   1.99   mycroft 	struct com_softc *sc;
    896   1.99   mycroft 	int onoff;
    897   1.99   mycroft {
    898   1.99   mycroft 	int s;
    899   1.22       cgd 
    900   1.99   mycroft 	s = splserial();
    901   1.99   mycroft 	if (onoff)
    902   1.99   mycroft 		SET(sc->sc_mcr, sc->sc_mcr_dtr);
    903   1.99   mycroft 	else
    904   1.99   mycroft 		CLR(sc->sc_mcr, sc->sc_mcr_dtr);
    905   1.22       cgd 
    906   1.99   mycroft 	if (!sc->sc_heldchange) {
    907   1.99   mycroft 		if (sc->sc_tx_busy) {
    908   1.99   mycroft 			sc->sc_heldtbc = sc->sc_tbc;
    909   1.99   mycroft 			sc->sc_tbc = 0;
    910   1.99   mycroft 			sc->sc_heldchange = 1;
    911   1.99   mycroft 		} else
    912   1.99   mycroft 			com_loadchannelregs(sc);
    913   1.22       cgd 	}
    914   1.99   mycroft 	splx(s);
    915    1.1       cgd }
    916    1.1       cgd 
    917  1.106  drochner static u_char
    918  1.106  drochner cflag2lcr(cflag)
    919  1.110     enami 	tcflag_t cflag;
    920  1.106  drochner {
    921  1.106  drochner 	u_char lcr = 0;
    922  1.106  drochner 
    923  1.106  drochner 	switch (ISSET(cflag, CSIZE)) {
    924  1.106  drochner 	    case CS5:
    925  1.106  drochner 		SET(lcr, LCR_5BITS);
    926  1.106  drochner 		break;
    927  1.106  drochner 	    case CS6:
    928  1.106  drochner 		SET(lcr, LCR_6BITS);
    929  1.106  drochner 		break;
    930  1.106  drochner 	    case CS7:
    931  1.106  drochner 		SET(lcr, LCR_7BITS);
    932  1.106  drochner 		break;
    933  1.106  drochner 	    case CS8:
    934  1.106  drochner 		SET(lcr, LCR_8BITS);
    935  1.106  drochner 		break;
    936  1.106  drochner 	}
    937  1.106  drochner 	if (ISSET(cflag, PARENB)) {
    938  1.106  drochner 		SET(lcr, LCR_PENAB);
    939  1.106  drochner 		if (!ISSET(cflag, PARODD))
    940  1.106  drochner 			SET(lcr, LCR_PEVEN);
    941  1.106  drochner 	}
    942  1.106  drochner 	if (ISSET(cflag, CSTOPB))
    943  1.106  drochner 		SET(lcr, LCR_STOPB);
    944  1.106  drochner 
    945  1.110     enami 	return (lcr);
    946  1.106  drochner }
    947  1.106  drochner 
    948   1.21   mycroft int
    949    1.1       cgd comparam(tp, t)
    950   1.21   mycroft 	struct tty *tp;
    951   1.21   mycroft 	struct termios *t;
    952    1.1       cgd {
    953   1.76   thorpej 	struct com_softc *sc = com_cd.cd_devs[COMUNIT(tp->t_dev)];
    954  1.109        is 	int ospeed = comspeed(t->c_ospeed, sc->sc_frequency);
    955   1.62   mycroft 	u_char lcr;
    956   1.21   mycroft 	int s;
    957   1.21   mycroft 
    958    1.1       cgd 	/* check requested parameters */
    959   1.99   mycroft 	if (ospeed < 0)
    960   1.99   mycroft 		return (EINVAL);
    961   1.99   mycroft 	if (t->c_ispeed && t->c_ispeed != t->c_ospeed)
    962   1.99   mycroft 		return (EINVAL);
    963   1.21   mycroft 
    964  1.106  drochner 	lcr = ISSET(sc->sc_lcr, LCR_SBREAK) | cflag2lcr(t->c_cflag);
    965   1.62   mycroft 
    966   1.99   mycroft 	s = splserial();
    967   1.99   mycroft 
    968   1.62   mycroft 	sc->sc_lcr = lcr;
    969    1.1       cgd 
    970   1.99   mycroft 	/*
    971   1.99   mycroft 	 * For the console, always force CLOCAL and !HUPCL, so that the port
    972   1.99   mycroft 	 * is always active.
    973   1.99   mycroft 	 */
    974   1.99   mycroft 	if (ISSET(sc->sc_swflags, TIOCFLAG_SOFTCAR) ||
    975   1.99   mycroft 	    ISSET(sc->sc_hwflags, COM_HW_CONSOLE)) {
    976   1.99   mycroft 		SET(t->c_cflag, CLOCAL);
    977   1.99   mycroft 		CLR(t->c_cflag, HUPCL);
    978   1.62   mycroft 	}
    979   1.36   mycroft 
    980   1.36   mycroft 	/*
    981   1.99   mycroft 	 * If we're not in a mode that assumes a connection is present, then
    982   1.99   mycroft 	 * ignore carrier changes.
    983   1.36   mycroft 	 */
    984   1.99   mycroft 	if (ISSET(t->c_cflag, CLOCAL | MDMBUF))
    985   1.99   mycroft 		sc->sc_msr_dcd = 0;
    986   1.99   mycroft 	else
    987   1.99   mycroft 		sc->sc_msr_dcd = MSR_DCD;
    988   1.99   mycroft 	/*
    989   1.99   mycroft 	 * Set the flow control pins depending on the current flow control
    990   1.99   mycroft 	 * mode.
    991   1.99   mycroft 	 */
    992   1.99   mycroft 	if (ISSET(t->c_cflag, CRTSCTS)) {
    993   1.99   mycroft 		sc->sc_mcr_dtr = MCR_DTR;
    994   1.99   mycroft 		sc->sc_mcr_rts = MCR_RTS;
    995   1.99   mycroft 		sc->sc_msr_cts = MSR_CTS;
    996   1.99   mycroft 		sc->sc_r_hiwat = RXHIWAT;
    997  1.101   mycroft 		sc->sc_r_lowat = RXLOWAT;
    998  1.116      fvdl 		sc->sc_efr = EFR_AUTORTS | EFR_AUTOCTS;
    999   1.99   mycroft 	} else if (ISSET(t->c_cflag, MDMBUF)) {
   1000   1.99   mycroft 		/*
   1001   1.99   mycroft 		 * For DTR/DCD flow control, make sure we don't toggle DTR for
   1002   1.99   mycroft 		 * carrier detection.
   1003   1.99   mycroft 		 */
   1004   1.99   mycroft 		sc->sc_mcr_dtr = 0;
   1005   1.99   mycroft 		sc->sc_mcr_rts = MCR_DTR;
   1006   1.99   mycroft 		sc->sc_msr_cts = MSR_DCD;
   1007   1.99   mycroft 		sc->sc_r_hiwat = RXHIWAT;
   1008  1.101   mycroft 		sc->sc_r_lowat = RXLOWAT;
   1009  1.116      fvdl 		sc->sc_efr = 0;
   1010   1.99   mycroft 	} else {
   1011   1.99   mycroft 		/*
   1012   1.99   mycroft 		 * If no flow control, then always set RTS.  This will make
   1013   1.99   mycroft 		 * the other side happy if it mistakenly thinks we're doing
   1014   1.99   mycroft 		 * RTS/CTS flow control.
   1015   1.99   mycroft 		 */
   1016   1.99   mycroft 		sc->sc_mcr_dtr = MCR_DTR | MCR_RTS;
   1017   1.99   mycroft 		sc->sc_mcr_rts = 0;
   1018   1.99   mycroft 		sc->sc_msr_cts = 0;
   1019   1.99   mycroft 		sc->sc_r_hiwat = 0;
   1020  1.101   mycroft 		sc->sc_r_lowat = 0;
   1021  1.116      fvdl 		sc->sc_efr = 0;
   1022   1.99   mycroft 		if (ISSET(sc->sc_mcr, MCR_DTR))
   1023   1.99   mycroft 			SET(sc->sc_mcr, MCR_RTS);
   1024   1.99   mycroft 		else
   1025   1.99   mycroft 			CLR(sc->sc_mcr, MCR_RTS);
   1026   1.99   mycroft 	}
   1027   1.99   mycroft 	sc->sc_msr_mask = sc->sc_msr_cts | sc->sc_msr_dcd;
   1028   1.99   mycroft 
   1029   1.95   mycroft #if 0
   1030   1.99   mycroft 	if (ospeed == 0)
   1031   1.99   mycroft 		CLR(sc->sc_mcr, sc->sc_mcr_dtr);
   1032   1.99   mycroft 	else
   1033   1.99   mycroft 		SET(sc->sc_mcr, sc->sc_mcr_dtr);
   1034   1.66   mycroft #endif
   1035   1.66   mycroft 
   1036   1.99   mycroft 	sc->sc_dlbl = ospeed;
   1037   1.99   mycroft 	sc->sc_dlbh = ospeed >> 8;
   1038   1.66   mycroft 
   1039   1.99   mycroft 	/*
   1040   1.99   mycroft 	 * Set the FIFO threshold based on the receive speed.
   1041   1.99   mycroft 	 *
   1042   1.99   mycroft 	 *  * If it's a low speed, it's probably a mouse or some other
   1043   1.99   mycroft 	 *    interactive device, so set the threshold low.
   1044   1.99   mycroft 	 *  * If it's a high speed, trim the trigger level down to prevent
   1045   1.99   mycroft 	 *    overflows.
   1046   1.99   mycroft 	 *  * Otherwise set it a bit higher.
   1047   1.99   mycroft 	 */
   1048   1.99   mycroft 	if (ISSET(sc->sc_hwflags, COM_HW_HAYESP))
   1049   1.99   mycroft 		sc->sc_fifo = FIFO_DMA_MODE | FIFO_ENABLE | FIFO_TRIGGER_8;
   1050   1.99   mycroft 	else if (ISSET(sc->sc_hwflags, COM_HW_FIFO))
   1051   1.99   mycroft 		sc->sc_fifo = FIFO_ENABLE |
   1052   1.99   mycroft 		    (t->c_ospeed <= 1200 ? FIFO_TRIGGER_1 :
   1053   1.99   mycroft 		     t->c_ospeed <= 38400 ? FIFO_TRIGGER_8 : FIFO_TRIGGER_4);
   1054   1.99   mycroft 	else
   1055   1.99   mycroft 		sc->sc_fifo = 0;
   1056   1.21   mycroft 
   1057   1.57   mycroft 	/* and copy to tty */
   1058   1.99   mycroft 	tp->t_ispeed = 0;
   1059   1.57   mycroft 	tp->t_ospeed = t->c_ospeed;
   1060   1.57   mycroft 	tp->t_cflag = t->c_cflag;
   1061   1.25       cgd 
   1062   1.99   mycroft 	if (!sc->sc_heldchange) {
   1063   1.99   mycroft 		if (sc->sc_tx_busy) {
   1064   1.99   mycroft 			sc->sc_heldtbc = sc->sc_tbc;
   1065   1.99   mycroft 			sc->sc_tbc = 0;
   1066   1.99   mycroft 			sc->sc_heldchange = 1;
   1067   1.99   mycroft 		} else
   1068   1.99   mycroft 			com_loadchannelregs(sc);
   1069   1.99   mycroft 	}
   1070   1.99   mycroft 
   1071   1.99   mycroft 	splx(s);
   1072   1.99   mycroft 
   1073   1.25       cgd 	/*
   1074   1.99   mycroft 	 * Update the tty layer's idea of the carrier bit, in case we changed
   1075   1.99   mycroft 	 * CLOCAL or MDMBUF.  We don't hang up here; we only do that if we
   1076   1.99   mycroft 	 * lose carrier while carrier detection is on.
   1077   1.25       cgd 	 */
   1078   1.99   mycroft 	(void) (*linesw[tp->t_line].l_modem)(tp, ISSET(sc->sc_msr, MSR_DCD));
   1079   1.99   mycroft 
   1080   1.99   mycroft #ifdef COM_DEBUG
   1081  1.101   mycroft 	if (com_debug)
   1082  1.101   mycroft 		comstatus(sc, "comparam ");
   1083   1.99   mycroft #endif
   1084   1.99   mycroft 
   1085   1.99   mycroft 	/* Block or unblock as needed. */
   1086   1.99   mycroft 	if (!ISSET(t->c_cflag, CHWFLOW)) {
   1087  1.101   mycroft 		if (ISSET(sc->sc_rx_flags, RX_TTY_OVERFLOWED)) {
   1088  1.101   mycroft 			CLR(sc->sc_rx_flags, RX_TTY_OVERFLOWED);
   1089  1.101   mycroft 			com_schedrx(sc);
   1090  1.101   mycroft 		}
   1091  1.101   mycroft 		if (ISSET(sc->sc_rx_flags, RX_TTY_BLOCKED|RX_IBUF_BLOCKED)) {
   1092  1.101   mycroft 			CLR(sc->sc_rx_flags, RX_TTY_BLOCKED|RX_IBUF_BLOCKED);
   1093  1.101   mycroft 			com_hwiflow(sc);
   1094   1.99   mycroft 		}
   1095   1.99   mycroft 		if (sc->sc_tx_stopped) {
   1096   1.99   mycroft 			sc->sc_tx_stopped = 0;
   1097   1.99   mycroft 			comstart(tp);
   1098   1.99   mycroft 		}
   1099   1.99   mycroft 	} else {
   1100  1.101   mycroft 		/* XXXXX FIX ME */
   1101   1.99   mycroft #if 0
   1102   1.99   mycroft 		commsrint(sc, tp);
   1103   1.99   mycroft #endif
   1104   1.21   mycroft 	}
   1105    1.1       cgd 
   1106   1.99   mycroft 	return (0);
   1107   1.99   mycroft }
   1108   1.99   mycroft 
   1109   1.99   mycroft void
   1110   1.99   mycroft com_iflush(sc)
   1111   1.99   mycroft 	struct com_softc *sc;
   1112   1.99   mycroft {
   1113   1.99   mycroft 	bus_space_tag_t iot = sc->sc_iot;
   1114   1.99   mycroft 	bus_space_handle_t ioh = sc->sc_ioh;
   1115   1.99   mycroft 
   1116   1.99   mycroft 	/* flush any pending I/O */
   1117   1.99   mycroft 	while (ISSET(bus_space_read_1(iot, ioh, com_lsr), LSR_RXRDY))
   1118   1.99   mycroft 		(void) bus_space_read_1(iot, ioh, com_data);
   1119   1.99   mycroft }
   1120   1.99   mycroft 
   1121   1.99   mycroft void
   1122   1.99   mycroft com_loadchannelregs(sc)
   1123   1.99   mycroft 	struct com_softc *sc;
   1124   1.99   mycroft {
   1125   1.99   mycroft 	bus_space_tag_t iot = sc->sc_iot;
   1126   1.99   mycroft 	bus_space_handle_t ioh = sc->sc_ioh;
   1127   1.99   mycroft 
   1128   1.99   mycroft 	/* XXXXX necessary? */
   1129   1.99   mycroft 	com_iflush(sc);
   1130   1.99   mycroft 
   1131   1.99   mycroft 	bus_space_write_1(iot, ioh, com_ier, 0);
   1132   1.99   mycroft 
   1133  1.116      fvdl 	if (ISSET(sc->sc_hwflags, COM_HW_FLOW)) {
   1134  1.116      fvdl 		bus_space_write_1(iot, ioh, com_lcr, LCR_EERS);
   1135  1.116      fvdl 		bus_space_write_1(iot, ioh, com_efr, sc->sc_efr);
   1136  1.116      fvdl 	}
   1137   1.99   mycroft 	bus_space_write_1(iot, ioh, com_lcr, sc->sc_lcr | LCR_DLAB);
   1138   1.99   mycroft 	bus_space_write_1(iot, ioh, com_dlbl, sc->sc_dlbl);
   1139   1.99   mycroft 	bus_space_write_1(iot, ioh, com_dlbh, sc->sc_dlbh);
   1140   1.99   mycroft 	bus_space_write_1(iot, ioh, com_lcr, sc->sc_lcr);
   1141   1.99   mycroft 	bus_space_write_1(iot, ioh, com_mcr, sc->sc_mcr_active = sc->sc_mcr);
   1142   1.99   mycroft 	bus_space_write_1(iot, ioh, com_fifo, sc->sc_fifo);
   1143   1.99   mycroft 
   1144   1.99   mycroft 	bus_space_write_1(iot, ioh, com_ier, sc->sc_ier);
   1145   1.99   mycroft }
   1146   1.99   mycroft 
   1147   1.99   mycroft int
   1148   1.99   mycroft comhwiflow(tp, block)
   1149   1.99   mycroft 	struct tty *tp;
   1150   1.99   mycroft 	int block;
   1151   1.99   mycroft {
   1152   1.99   mycroft 	struct com_softc *sc = com_cd.cd_devs[COMUNIT(tp->t_dev)];
   1153   1.99   mycroft 	int s;
   1154   1.99   mycroft 
   1155   1.99   mycroft 	if (sc->sc_mcr_rts == 0)
   1156   1.99   mycroft 		return (0);
   1157   1.99   mycroft 
   1158   1.99   mycroft 	s = splserial();
   1159   1.99   mycroft 	if (block) {
   1160  1.101   mycroft 		if (!ISSET(sc->sc_rx_flags, RX_TTY_BLOCKED)) {
   1161  1.101   mycroft 			SET(sc->sc_rx_flags, RX_TTY_BLOCKED);
   1162  1.101   mycroft 			com_hwiflow(sc);
   1163  1.101   mycroft 		}
   1164   1.99   mycroft 	} else {
   1165  1.101   mycroft 		if (ISSET(sc->sc_rx_flags, RX_TTY_OVERFLOWED)) {
   1166  1.101   mycroft 			CLR(sc->sc_rx_flags, RX_TTY_OVERFLOWED);
   1167  1.101   mycroft 			com_schedrx(sc);
   1168  1.101   mycroft 		}
   1169  1.101   mycroft 		if (ISSET(sc->sc_rx_flags, RX_TTY_BLOCKED)) {
   1170  1.101   mycroft 			CLR(sc->sc_rx_flags, RX_TTY_BLOCKED);
   1171  1.101   mycroft 			com_hwiflow(sc);
   1172  1.101   mycroft 		}
   1173   1.99   mycroft 	}
   1174   1.21   mycroft 	splx(s);
   1175   1.99   mycroft 	return (1);
   1176   1.99   mycroft }
   1177   1.99   mycroft 
   1178   1.99   mycroft /*
   1179   1.99   mycroft  * (un)block input via hw flowcontrol
   1180   1.99   mycroft  */
   1181   1.99   mycroft void
   1182  1.101   mycroft com_hwiflow(sc)
   1183   1.99   mycroft 	struct com_softc *sc;
   1184   1.99   mycroft {
   1185   1.99   mycroft 	bus_space_tag_t iot = sc->sc_iot;
   1186   1.99   mycroft 	bus_space_handle_t ioh = sc->sc_ioh;
   1187   1.99   mycroft 
   1188   1.99   mycroft 	if (sc->sc_mcr_rts == 0)
   1189   1.99   mycroft 		return;
   1190   1.99   mycroft 
   1191  1.101   mycroft 	if (ISSET(sc->sc_rx_flags, RX_ANY_BLOCK)) {
   1192   1.99   mycroft 		CLR(sc->sc_mcr, sc->sc_mcr_rts);
   1193   1.99   mycroft 		CLR(sc->sc_mcr_active, sc->sc_mcr_rts);
   1194   1.99   mycroft 	} else {
   1195   1.99   mycroft 		SET(sc->sc_mcr, sc->sc_mcr_rts);
   1196   1.99   mycroft 		SET(sc->sc_mcr_active, sc->sc_mcr_rts);
   1197   1.99   mycroft 	}
   1198   1.99   mycroft 	bus_space_write_1(iot, ioh, com_mcr, sc->sc_mcr_active);
   1199    1.1       cgd }
   1200   1.21   mycroft 
   1201   1.99   mycroft 
   1202   1.12   deraadt void
   1203    1.1       cgd comstart(tp)
   1204   1.21   mycroft 	struct tty *tp;
   1205    1.1       cgd {
   1206   1.76   thorpej 	struct com_softc *sc = com_cd.cd_devs[COMUNIT(tp->t_dev)];
   1207   1.91   thorpej 	bus_space_tag_t iot = sc->sc_iot;
   1208   1.91   thorpej 	bus_space_handle_t ioh = sc->sc_ioh;
   1209   1.21   mycroft 	int s;
   1210   1.21   mycroft 
   1211    1.1       cgd 	s = spltty();
   1212   1.69   mycroft 	if (ISSET(tp->t_state, TS_BUSY))
   1213   1.70   mycroft 		goto out;
   1214   1.99   mycroft 	if (ISSET(tp->t_state, TS_TIMEOUT | TS_TTSTOP))
   1215   1.69   mycroft 		goto stopped;
   1216   1.99   mycroft 
   1217   1.99   mycroft 	if (sc->sc_tx_stopped)
   1218   1.69   mycroft 		goto stopped;
   1219   1.99   mycroft 
   1220   1.61   mycroft 	if (tp->t_outq.c_cc <= tp->t_lowat) {
   1221   1.62   mycroft 		if (ISSET(tp->t_state, TS_ASLEEP)) {
   1222   1.62   mycroft 			CLR(tp->t_state, TS_ASLEEP);
   1223   1.62   mycroft 			wakeup(&tp->t_outq);
   1224   1.61   mycroft 		}
   1225   1.99   mycroft 		selwakeup(&tp->t_wsel);
   1226   1.61   mycroft 		if (tp->t_outq.c_cc == 0)
   1227   1.69   mycroft 			goto stopped;
   1228   1.61   mycroft 	}
   1229   1.99   mycroft 
   1230   1.99   mycroft 	/* Grab the first contiguous region of buffer space. */
   1231   1.99   mycroft 	{
   1232   1.99   mycroft 		u_char *tba;
   1233   1.99   mycroft 		int tbc;
   1234   1.99   mycroft 
   1235   1.99   mycroft 		tba = tp->t_outq.c_cf;
   1236   1.99   mycroft 		tbc = ndqb(&tp->t_outq, 0);
   1237   1.99   mycroft 
   1238   1.99   mycroft 		(void)splserial();
   1239   1.99   mycroft 
   1240   1.99   mycroft 		sc->sc_tba = tba;
   1241   1.99   mycroft 		sc->sc_tbc = tbc;
   1242   1.99   mycroft 	}
   1243   1.99   mycroft 
   1244   1.62   mycroft 	SET(tp->t_state, TS_BUSY);
   1245   1.99   mycroft 	sc->sc_tx_busy = 1;
   1246   1.64  christos 
   1247   1.99   mycroft 	/* Enable transmit completion interrupts if necessary. */
   1248   1.70   mycroft 	if (!ISSET(sc->sc_ier, IER_ETXRDY)) {
   1249   1.70   mycroft 		SET(sc->sc_ier, IER_ETXRDY);
   1250   1.91   thorpej 		bus_space_write_1(iot, ioh, com_ier, sc->sc_ier);
   1251   1.70   mycroft 	}
   1252   1.99   mycroft 
   1253   1.99   mycroft 	/* Output the first chunk of the contiguous buffer. */
   1254   1.99   mycroft 	{
   1255   1.99   mycroft 		int n;
   1256   1.99   mycroft 
   1257   1.99   mycroft 		n = sc->sc_fifolen;
   1258   1.99   mycroft 		if (n > sc->sc_tbc)
   1259   1.99   mycroft 			n = sc->sc_tbc;
   1260   1.99   mycroft 		bus_space_write_multi_1(iot, ioh, com_data, sc->sc_tba, n);
   1261   1.99   mycroft 		sc->sc_tbc -= n;
   1262   1.99   mycroft 		sc->sc_tba += n;
   1263   1.64  christos 	}
   1264   1.69   mycroft 	splx(s);
   1265   1.69   mycroft 	return;
   1266   1.99   mycroft 
   1267   1.69   mycroft stopped:
   1268   1.99   mycroft 	/* Disable transmit completion interrupts if necessary. */
   1269   1.69   mycroft 	if (ISSET(sc->sc_ier, IER_ETXRDY)) {
   1270   1.69   mycroft 		CLR(sc->sc_ier, IER_ETXRDY);
   1271   1.91   thorpej 		bus_space_write_1(iot, ioh, com_ier, sc->sc_ier);
   1272   1.69   mycroft 	}
   1273   1.99   mycroft out:
   1274    1.1       cgd 	splx(s);
   1275   1.99   mycroft 	return;
   1276    1.1       cgd }
   1277   1.21   mycroft 
   1278    1.1       cgd /*
   1279    1.1       cgd  * Stop output on a line.
   1280    1.1       cgd  */
   1281   1.85   mycroft void
   1282    1.1       cgd comstop(tp, flag)
   1283   1.21   mycroft 	struct tty *tp;
   1284   1.80  christos 	int flag;
   1285    1.1       cgd {
   1286   1.99   mycroft 	struct com_softc *sc = com_cd.cd_devs[COMUNIT(tp->t_dev)];
   1287   1.21   mycroft 	int s;
   1288    1.1       cgd 
   1289   1.99   mycroft 	s = splserial();
   1290   1.99   mycroft 	if (ISSET(tp->t_state, TS_BUSY)) {
   1291   1.99   mycroft 		/* Stop transmitting at the next chunk. */
   1292   1.99   mycroft 		sc->sc_tbc = 0;
   1293   1.99   mycroft 		sc->sc_heldtbc = 0;
   1294   1.62   mycroft 		if (!ISSET(tp->t_state, TS_TTSTOP))
   1295   1.62   mycroft 			SET(tp->t_state, TS_FLUSH);
   1296   1.99   mycroft 	}
   1297    1.1       cgd 	splx(s);
   1298    1.1       cgd }
   1299    1.1       cgd 
   1300   1.33   mycroft void
   1301   1.33   mycroft comdiag(arg)
   1302   1.33   mycroft 	void *arg;
   1303   1.33   mycroft {
   1304   1.33   mycroft 	struct com_softc *sc = arg;
   1305   1.99   mycroft 	int overflows, floods;
   1306   1.33   mycroft 	int s;
   1307   1.33   mycroft 
   1308   1.99   mycroft 	s = splserial();
   1309   1.33   mycroft 	overflows = sc->sc_overflows;
   1310   1.33   mycroft 	sc->sc_overflows = 0;
   1311   1.57   mycroft 	floods = sc->sc_floods;
   1312   1.57   mycroft 	sc->sc_floods = 0;
   1313   1.99   mycroft 	sc->sc_errors = 0;
   1314   1.57   mycroft 	splx(s);
   1315   1.57   mycroft 
   1316   1.99   mycroft 	log(LOG_WARNING,
   1317   1.99   mycroft 	    "%s: %d silo overflow%s, %d ibuf flood%s\n",
   1318   1.57   mycroft 	    sc->sc_dev.dv_xname,
   1319   1.57   mycroft 	    overflows, overflows == 1 ? "" : "s",
   1320   1.99   mycroft 	    floods, floods == 1 ? "" : "s");
   1321   1.57   mycroft }
   1322   1.57   mycroft 
   1323   1.99   mycroft integrate void
   1324   1.99   mycroft comrxint(sc, tp)
   1325   1.99   mycroft 	struct com_softc	*sc;
   1326   1.99   mycroft 	struct tty	*tp;
   1327   1.99   mycroft {
   1328   1.99   mycroft 	u_int	get, cc, scc;
   1329   1.99   mycroft 	int	code;
   1330   1.99   mycroft 	u_char	lsr;
   1331   1.99   mycroft 	int	s;
   1332   1.57   mycroft 	static int lsrmap[8] = {
   1333   1.57   mycroft 		0,      TTY_PE,
   1334   1.57   mycroft 		TTY_FE, TTY_PE|TTY_FE,
   1335   1.57   mycroft 		TTY_FE, TTY_PE|TTY_FE,
   1336   1.57   mycroft 		TTY_FE, TTY_PE|TTY_FE
   1337   1.57   mycroft 	};
   1338   1.57   mycroft 
   1339   1.99   mycroft 	get = sc->sc_rbget;
   1340   1.99   mycroft 	scc = cc = RXBUFSIZE - sc->sc_rbavail;
   1341   1.99   mycroft 
   1342   1.99   mycroft 	if (cc == RXBUFSIZE) {
   1343   1.99   mycroft 		sc->sc_floods++;
   1344   1.99   mycroft 		if (sc->sc_errors++ == 0)
   1345   1.99   mycroft 			timeout(comdiag, sc, 60 * hz);
   1346   1.99   mycroft 	}
   1347   1.99   mycroft 
   1348  1.101   mycroft 	while (cc) {
   1349   1.99   mycroft 		lsr = sc->sc_lbuf[get];
   1350  1.103  drochner 		if (ISSET(lsr, LSR_OE)) {
   1351   1.99   mycroft 			sc->sc_overflows++;
   1352   1.99   mycroft 			if (sc->sc_errors++ == 0)
   1353   1.99   mycroft 				timeout(comdiag, sc, 60 * hz);
   1354   1.99   mycroft 		}
   1355   1.99   mycroft 		code = sc->sc_rbuf[get] |
   1356   1.99   mycroft 		    lsrmap[(lsr & (LSR_BI|LSR_FE|LSR_PE)) >> 2];
   1357  1.101   mycroft 		if ((*linesw[tp->t_line].l_rint)(code, tp) == -1) {
   1358  1.101   mycroft 			/*
   1359  1.101   mycroft 			 * The line discipline's buffer is out of space.
   1360  1.101   mycroft 			 */
   1361  1.101   mycroft 			if (!ISSET(sc->sc_rx_flags, RX_TTY_BLOCKED)) {
   1362  1.101   mycroft 				/*
   1363  1.101   mycroft 				 * We're either not using flow control, or the
   1364  1.101   mycroft 				 * line discipline didn't tell us to block for
   1365  1.101   mycroft 				 * some reason.  Either way, we have no way to
   1366  1.101   mycroft 				 * know when there's more space available, so
   1367  1.101   mycroft 				 * just drop the rest of the data.
   1368  1.101   mycroft 				 */
   1369  1.101   mycroft 				get = (get + cc) & RXBUFMASK;
   1370  1.101   mycroft 				cc = 0;
   1371  1.101   mycroft 			} else {
   1372  1.101   mycroft 				/*
   1373  1.101   mycroft 				 * Don't schedule any more receive processing
   1374  1.101   mycroft 				 * until the line discipline tells us there's
   1375  1.101   mycroft 				 * space available (through comhwiflow()).
   1376  1.101   mycroft 				 * Leave the rest of the data in the input
   1377  1.101   mycroft 				 * buffer.
   1378  1.101   mycroft 				 */
   1379  1.101   mycroft 				SET(sc->sc_rx_flags, RX_TTY_OVERFLOWED);
   1380  1.101   mycroft 			}
   1381  1.101   mycroft 			break;
   1382  1.101   mycroft 		}
   1383   1.99   mycroft 		get = (get + 1) & RXBUFMASK;
   1384  1.101   mycroft 		cc--;
   1385   1.99   mycroft 	}
   1386   1.99   mycroft 
   1387  1.101   mycroft 	if (cc != scc) {
   1388  1.101   mycroft 		sc->sc_rbget = get;
   1389  1.101   mycroft 		s = splserial();
   1390  1.101   mycroft 		cc = sc->sc_rbavail += scc - cc;
   1391  1.101   mycroft 		/* Buffers should be ok again, release possible block. */
   1392  1.101   mycroft 		if (cc >= sc->sc_r_lowat) {
   1393  1.101   mycroft 			if (ISSET(sc->sc_rx_flags, RX_IBUF_OVERFLOWED)) {
   1394  1.101   mycroft 				CLR(sc->sc_rx_flags, RX_IBUF_OVERFLOWED);
   1395  1.101   mycroft 				SET(sc->sc_ier, IER_ERXRDY);
   1396  1.101   mycroft 				bus_space_write_1(sc->sc_iot, sc->sc_ioh, com_ier, sc->sc_ier);
   1397  1.101   mycroft 			}
   1398  1.101   mycroft 			if (ISSET(sc->sc_rx_flags, RX_IBUF_BLOCKED)) {
   1399  1.101   mycroft 				CLR(sc->sc_rx_flags, RX_IBUF_BLOCKED);
   1400  1.101   mycroft 				com_hwiflow(sc);
   1401  1.101   mycroft 			}
   1402  1.101   mycroft 		}
   1403  1.101   mycroft 		splx(s);
   1404   1.57   mycroft 	}
   1405   1.99   mycroft }
   1406   1.99   mycroft 
   1407   1.99   mycroft integrate void
   1408   1.99   mycroft comtxint(sc, tp)
   1409   1.99   mycroft 	struct com_softc	*sc;
   1410   1.99   mycroft 	struct tty	*tp;
   1411   1.99   mycroft {
   1412   1.33   mycroft 
   1413   1.99   mycroft 	CLR(tp->t_state, TS_BUSY);
   1414   1.99   mycroft 	if (ISSET(tp->t_state, TS_FLUSH))
   1415   1.99   mycroft 		CLR(tp->t_state, TS_FLUSH);
   1416   1.99   mycroft 	else
   1417   1.99   mycroft 		ndflush(&tp->t_outq, (int)(sc->sc_tba - tp->t_outq.c_cf));
   1418   1.99   mycroft 	(*linesw[tp->t_line].l_start)(tp);
   1419   1.99   mycroft }
   1420   1.57   mycroft 
   1421   1.99   mycroft integrate void
   1422   1.99   mycroft commsrint(sc, tp)
   1423   1.99   mycroft 	struct com_softc	*sc;
   1424   1.99   mycroft 	struct tty	*tp;
   1425   1.99   mycroft {
   1426   1.99   mycroft 	u_char msr, delta;
   1427   1.99   mycroft 	int s;
   1428   1.57   mycroft 
   1429   1.99   mycroft 	s = splserial();
   1430   1.99   mycroft 	msr = sc->sc_msr;
   1431   1.99   mycroft 	delta = sc->sc_msr_delta;
   1432   1.99   mycroft 	sc->sc_msr_delta = 0;
   1433   1.99   mycroft 	splx(s);
   1434   1.57   mycroft 
   1435   1.99   mycroft 	if (ISSET(delta, sc->sc_msr_dcd)) {
   1436   1.99   mycroft 		/*
   1437   1.99   mycroft 		 * Inform the tty layer that carrier detect changed.
   1438   1.99   mycroft 		 */
   1439   1.99   mycroft 		(void) (*linesw[tp->t_line].l_modem)(tp, ISSET(msr, MSR_DCD));
   1440   1.99   mycroft 	}
   1441   1.61   mycroft 
   1442   1.99   mycroft 	if (ISSET(delta, sc->sc_msr_cts)) {
   1443   1.99   mycroft 		/* Block or unblock output according to flow control. */
   1444   1.99   mycroft 		if (ISSET(msr, sc->sc_msr_cts)) {
   1445   1.99   mycroft 			sc->sc_tx_stopped = 0;
   1446   1.99   mycroft 			(*linesw[tp->t_line].l_start)(tp);
   1447   1.99   mycroft 		} else {
   1448   1.99   mycroft 			sc->sc_tx_stopped = 1;
   1449   1.61   mycroft 		}
   1450   1.99   mycroft 	}
   1451   1.99   mycroft 
   1452   1.99   mycroft #ifdef COM_DEBUG
   1453  1.101   mycroft 	if (com_debug)
   1454  1.101   mycroft 		comstatus(sc, "commsrint");
   1455   1.99   mycroft #endif
   1456   1.99   mycroft }
   1457   1.99   mycroft 
   1458   1.99   mycroft #ifdef __GENERIC_SOFT_INTERRUPTS
   1459   1.99   mycroft void
   1460   1.99   mycroft comsoft(arg)
   1461   1.99   mycroft 	void *arg;
   1462   1.99   mycroft {
   1463   1.99   mycroft 	struct com_softc *sc = arg;
   1464   1.99   mycroft 	struct tty *tp;
   1465   1.99   mycroft 
   1466   1.99   mycroft 	{
   1467   1.99   mycroft #else
   1468   1.99   mycroft void
   1469   1.99   mycroft #ifndef alpha
   1470   1.99   mycroft comsoft()
   1471   1.99   mycroft #else
   1472   1.99   mycroft comsoft(arg)
   1473   1.99   mycroft 	void *arg;
   1474   1.99   mycroft #endif
   1475   1.99   mycroft {
   1476   1.99   mycroft 	struct com_softc	*sc;
   1477   1.99   mycroft 	struct tty	*tp;
   1478   1.99   mycroft 	int	unit;
   1479   1.99   mycroft #ifdef alpha
   1480   1.99   mycroft 	int s;
   1481   1.99   mycroft 
   1482   1.99   mycroft 	s = splsoftserial();
   1483   1.99   mycroft 	com_softintr_scheduled = 0;
   1484   1.99   mycroft #endif
   1485   1.57   mycroft 
   1486   1.99   mycroft 	for (unit = 0; unit < com_cd.cd_ndevs; unit++) {
   1487   1.99   mycroft 		sc = com_cd.cd_devs[unit];
   1488   1.99   mycroft 		if (sc == NULL)
   1489   1.99   mycroft 			continue;
   1490   1.57   mycroft 
   1491   1.99   mycroft 		tp = sc->sc_tty;
   1492   1.99   mycroft 		if (tp == NULL || !ISSET(tp->t_state, TS_ISOPEN | TS_WOPEN))
   1493   1.57   mycroft 			continue;
   1494  1.108        is #endif
   1495  1.108        is 		tp = sc->sc_tty;
   1496   1.99   mycroft 
   1497   1.99   mycroft 		if (sc->sc_rx_ready) {
   1498   1.99   mycroft 			sc->sc_rx_ready = 0;
   1499   1.99   mycroft 			comrxint(sc, tp);
   1500   1.57   mycroft 		}
   1501   1.57   mycroft 
   1502   1.99   mycroft 		if (sc->sc_st_check) {
   1503   1.99   mycroft 			sc->sc_st_check = 0;
   1504   1.99   mycroft 			commsrint(sc, tp);
   1505   1.62   mycroft 		}
   1506   1.57   mycroft 
   1507   1.99   mycroft 		if (sc->sc_tx_done) {
   1508   1.99   mycroft 			sc->sc_tx_done = 0;
   1509   1.99   mycroft 			comtxint(sc, tp);
   1510   1.57   mycroft 		}
   1511   1.57   mycroft 	}
   1512   1.57   mycroft 
   1513   1.99   mycroft #ifndef __GENERIC_SOFT_INTERRUPTS
   1514   1.99   mycroft #ifdef alpha
   1515   1.99   mycroft 	splx(s);
   1516   1.99   mycroft #endif
   1517   1.99   mycroft #endif
   1518   1.21   mycroft }
   1519    1.1       cgd 
   1520   1.21   mycroft int
   1521   1.49       cgd comintr(arg)
   1522   1.99   mycroft 	void	*arg;
   1523   1.21   mycroft {
   1524   1.49       cgd 	struct com_softc *sc = arg;
   1525   1.91   thorpej 	bus_space_tag_t iot = sc->sc_iot;
   1526   1.91   thorpej 	bus_space_handle_t ioh = sc->sc_ioh;
   1527   1.99   mycroft 	u_char	lsr, iir;
   1528   1.99   mycroft 	u_int	put, cc;
   1529   1.55   mycroft 
   1530   1.91   thorpej 	iir = bus_space_read_1(iot, ioh, com_iir);
   1531   1.88   mycroft 	if (ISSET(iir, IIR_NOPEND))
   1532   1.55   mycroft 		return (0);
   1533   1.21   mycroft 
   1534   1.99   mycroft 	put = sc->sc_rbput;
   1535   1.99   mycroft 	cc = sc->sc_rbavail;
   1536   1.99   mycroft 
   1537   1.99   mycroft 	do {
   1538   1.99   mycroft 		u_char	msr, delta;
   1539   1.21   mycroft 
   1540   1.91   thorpej 		lsr = bus_space_read_1(iot, ioh, com_lsr);
   1541  1.103  drochner #if defined(DDB) || defined(KGDB)
   1542  1.103  drochner 		if (ISSET(lsr, LSR_BI)) {
   1543  1.103  drochner #ifdef DDB
   1544  1.103  drochner 			if (ISSET(sc->sc_hwflags, COM_HW_CONSOLE)) {
   1545  1.103  drochner 				Debugger();
   1546  1.103  drochner 				continue;
   1547  1.103  drochner 			}
   1548  1.103  drochner #endif
   1549  1.103  drochner #ifdef KGDB
   1550  1.103  drochner 			if (ISSET(sc->sc_hwflags, COM_HW_KGDB)) {
   1551  1.103  drochner 				kgdb_connect(1);
   1552  1.103  drochner 				continue;
   1553  1.103  drochner 			}
   1554  1.103  drochner #endif
   1555  1.102   thorpej 		}
   1556  1.103  drochner #endif /* DDB || KGDB */
   1557  1.102   thorpej 
   1558  1.101   mycroft 		if (ISSET(lsr, LSR_RCV_MASK) &&
   1559  1.101   mycroft 		    !ISSET(sc->sc_rx_flags, RX_IBUF_OVERFLOWED)) {
   1560   1.99   mycroft 			for (; ISSET(lsr, LSR_RCV_MASK) && cc > 0; cc--) {
   1561   1.99   mycroft 				sc->sc_rbuf[put] =
   1562   1.99   mycroft 				    bus_space_read_1(iot, ioh, com_data);
   1563   1.99   mycroft 				sc->sc_lbuf[put] = lsr;
   1564   1.99   mycroft 				put = (put + 1) & RXBUFMASK;
   1565   1.99   mycroft 				lsr = bus_space_read_1(iot, ioh, com_lsr);
   1566   1.99   mycroft 			}
   1567   1.99   mycroft 			/*
   1568   1.99   mycroft 			 * Current string of incoming characters ended because
   1569   1.99   mycroft 			 * no more data was available. Schedule a receive event
   1570   1.99   mycroft 			 * if any data was received. Drop any characters that
   1571   1.99   mycroft 			 * we couldn't handle.
   1572   1.99   mycroft 			 */
   1573   1.99   mycroft 			sc->sc_rbput = put;
   1574   1.99   mycroft 			sc->sc_rbavail = cc;
   1575  1.101   mycroft 			if (!ISSET(sc->sc_rx_flags, RX_TTY_OVERFLOWED))
   1576  1.101   mycroft 				sc->sc_rx_ready = 1;
   1577   1.99   mycroft 			/*
   1578   1.99   mycroft 			 * See if we are in danger of overflowing a buffer. If
   1579   1.99   mycroft 			 * so, use hardware flow control to ease the pressure.
   1580   1.99   mycroft 			 */
   1581  1.101   mycroft 			if (!ISSET(sc->sc_rx_flags, RX_IBUF_BLOCKED) &&
   1582   1.99   mycroft 			    cc < sc->sc_r_hiwat) {
   1583  1.101   mycroft 				SET(sc->sc_rx_flags, RX_IBUF_BLOCKED);
   1584  1.101   mycroft 				com_hwiflow(sc);
   1585   1.99   mycroft 			}
   1586   1.99   mycroft 			/*
   1587  1.101   mycroft 			 * If we're out of space, disable receive interrupts
   1588  1.101   mycroft 			 * until the queue has drained a bit.
   1589   1.99   mycroft 			 */
   1590   1.99   mycroft 			if (!cc) {
   1591  1.101   mycroft 				SET(sc->sc_rx_flags, RX_IBUF_OVERFLOWED);
   1592  1.101   mycroft 				CLR(sc->sc_ier, IER_ERXRDY);
   1593  1.101   mycroft 				bus_space_write_1(iot, ioh, com_ier, sc->sc_ier);
   1594   1.99   mycroft 			}
   1595   1.88   mycroft 		} else {
   1596   1.88   mycroft 			if ((iir & IIR_IMASK) == IIR_RXRDY) {
   1597   1.91   thorpej 				bus_space_write_1(iot, ioh, com_ier, 0);
   1598   1.88   mycroft 				delay(10);
   1599   1.99   mycroft 				bus_space_write_1(iot, ioh, com_ier,sc->sc_ier);
   1600   1.88   mycroft 				iir = IIR_NOPEND;
   1601   1.88   mycroft 				continue;
   1602   1.88   mycroft 			}
   1603   1.88   mycroft 		}
   1604   1.55   mycroft 
   1605   1.99   mycroft 		msr = bus_space_read_1(iot, ioh, com_msr);
   1606   1.99   mycroft 		delta = msr ^ sc->sc_msr;
   1607   1.99   mycroft 		sc->sc_msr = msr;
   1608   1.99   mycroft 		if (ISSET(delta, sc->sc_msr_mask)) {
   1609   1.99   mycroft 			sc->sc_msr_delta |= delta;
   1610   1.99   mycroft 
   1611   1.99   mycroft 			/*
   1612   1.99   mycroft 			 * Stop output immediately if we lose the output
   1613   1.99   mycroft 			 * flow control signal or carrier detect.
   1614   1.99   mycroft 			 */
   1615   1.99   mycroft 			if (ISSET(~msr, sc->sc_msr_mask)) {
   1616   1.99   mycroft 				sc->sc_tbc = 0;
   1617   1.99   mycroft 				sc->sc_heldtbc = 0;
   1618   1.69   mycroft #ifdef COM_DEBUG
   1619  1.101   mycroft 				if (com_debug)
   1620  1.101   mycroft 					comstatus(sc, "comintr  ");
   1621   1.69   mycroft #endif
   1622   1.99   mycroft 			}
   1623   1.55   mycroft 
   1624   1.99   mycroft 			sc->sc_st_check = 1;
   1625   1.55   mycroft 		}
   1626   1.99   mycroft 	} while (!ISSET((iir = bus_space_read_1(iot, ioh, com_iir)), IIR_NOPEND));
   1627   1.55   mycroft 
   1628   1.99   mycroft 	/*
   1629   1.99   mycroft 	 * Done handling any receive interrupts. See if data can be
   1630   1.99   mycroft 	 * transmitted as well. Schedule tx done event if no data left
   1631   1.99   mycroft 	 * and tty was marked busy.
   1632   1.99   mycroft 	 */
   1633   1.99   mycroft 	if (ISSET(lsr, LSR_TXRDY)) {
   1634   1.99   mycroft 		/*
   1635   1.99   mycroft 		 * If we've delayed a parameter change, do it now, and restart
   1636   1.99   mycroft 		 * output.
   1637   1.99   mycroft 		 */
   1638   1.99   mycroft 		if (sc->sc_heldchange) {
   1639   1.99   mycroft 			com_loadchannelregs(sc);
   1640   1.99   mycroft 			sc->sc_heldchange = 0;
   1641   1.99   mycroft 			sc->sc_tbc = sc->sc_heldtbc;
   1642   1.99   mycroft 			sc->sc_heldtbc = 0;
   1643   1.99   mycroft 		}
   1644   1.99   mycroft 		/* Output the next chunk of the contiguous buffer, if any. */
   1645   1.99   mycroft 		if (sc->sc_tbc > 0) {
   1646   1.99   mycroft 			int n;
   1647   1.99   mycroft 
   1648   1.99   mycroft 			n = sc->sc_fifolen;
   1649   1.99   mycroft 			if (n > sc->sc_tbc)
   1650   1.99   mycroft 				n = sc->sc_tbc;
   1651   1.99   mycroft 			bus_space_write_multi_1(iot, ioh, com_data, sc->sc_tba, n);
   1652   1.99   mycroft 			sc->sc_tbc -= n;
   1653   1.99   mycroft 			sc->sc_tba += n;
   1654   1.99   mycroft 		} else if (sc->sc_tx_busy) {
   1655   1.99   mycroft 			sc->sc_tx_busy = 0;
   1656   1.99   mycroft 			sc->sc_tx_done = 1;
   1657   1.62   mycroft 		}
   1658   1.99   mycroft 	}
   1659   1.62   mycroft 
   1660   1.99   mycroft 	/* Wake up the poller. */
   1661   1.99   mycroft #ifdef __GENERIC_SOFT_INTERRUPTS
   1662   1.99   mycroft 	softintr_schedule(sc->sc_si);
   1663   1.99   mycroft #else
   1664   1.99   mycroft #ifndef alpha
   1665   1.99   mycroft 	setsoftserial();
   1666   1.99   mycroft #else
   1667   1.99   mycroft 	if (!com_softintr_scheduled) {
   1668   1.99   mycroft 		com_softintr_scheduled = 1;
   1669   1.99   mycroft 		timeout(comsoft, NULL, 1);
   1670    1.1       cgd 	}
   1671   1.99   mycroft #endif
   1672   1.99   mycroft #endif
   1673  1.115  explorer 
   1674  1.115  explorer #if NRND > 0 && defined(RND_COM)
   1675  1.115  explorer 	rnd_add_uint32(&sc->rnd_source, iir | lsr);
   1676  1.115  explorer #endif
   1677  1.115  explorer 
   1678   1.88   mycroft 	return (1);
   1679    1.1       cgd }
   1680    1.1       cgd 
   1681    1.1       cgd /*
   1682  1.102   thorpej  * The following functions are polled getc and putc routines, shared
   1683  1.102   thorpej  * by the console and kgdb glue.
   1684  1.102   thorpej  */
   1685  1.102   thorpej 
   1686  1.102   thorpej int
   1687  1.102   thorpej com_common_getc(iot, ioh)
   1688  1.102   thorpej 	bus_space_tag_t iot;
   1689  1.102   thorpej 	bus_space_handle_t ioh;
   1690  1.102   thorpej {
   1691  1.102   thorpej 	int s = splserial();
   1692  1.102   thorpej 	u_char stat, c;
   1693  1.102   thorpej 
   1694  1.102   thorpej 	while (!ISSET(stat = bus_space_read_1(iot, ioh, com_lsr), LSR_RXRDY))
   1695  1.102   thorpej 		;
   1696  1.102   thorpej 	c = bus_space_read_1(iot, ioh, com_data);
   1697  1.102   thorpej 	stat = bus_space_read_1(iot, ioh, com_iir);
   1698  1.102   thorpej 	splx(s);
   1699  1.102   thorpej 	return (c);
   1700  1.102   thorpej }
   1701  1.102   thorpej 
   1702  1.102   thorpej void
   1703  1.102   thorpej com_common_putc(iot, ioh, c)
   1704  1.102   thorpej 	bus_space_tag_t iot;
   1705  1.102   thorpej 	bus_space_handle_t ioh;
   1706  1.102   thorpej 	int c;
   1707  1.102   thorpej {
   1708  1.102   thorpej 	int s = splserial();
   1709  1.102   thorpej 	u_char stat;
   1710  1.102   thorpej 	register int timo;
   1711  1.102   thorpej 
   1712  1.102   thorpej 	/* wait for any pending transmission to finish */
   1713  1.102   thorpej 	timo = 50000;
   1714  1.102   thorpej 	while (!ISSET(stat = bus_space_read_1(iot, ioh, com_lsr), LSR_TXRDY)
   1715  1.102   thorpej 	    && --timo)
   1716  1.102   thorpej 		;
   1717  1.102   thorpej 	bus_space_write_1(iot, ioh, com_data, c);
   1718  1.102   thorpej 	/* wait for this transmission to complete */
   1719  1.102   thorpej 	timo = 1500000;
   1720  1.102   thorpej 	while (!ISSET(stat = bus_space_read_1(iot, ioh, com_lsr), LSR_TXRDY)
   1721  1.102   thorpej 	    && --timo)
   1722  1.102   thorpej 		;
   1723  1.102   thorpej 	/* clear any interrupts generated by this transmission */
   1724  1.102   thorpej 	stat = bus_space_read_1(iot, ioh, com_iir);
   1725  1.102   thorpej 	splx(s);
   1726  1.102   thorpej }
   1727  1.102   thorpej 
   1728  1.102   thorpej /*
   1729   1.99   mycroft  * Initialize UART to known state.
   1730   1.99   mycroft  */
   1731  1.106  drochner int
   1732  1.109        is cominit(iot, iobase, rate, frequency, cflag, iohp)
   1733   1.91   thorpej 	bus_space_tag_t iot;
   1734  1.106  drochner 	int iobase;
   1735  1.109        is 	int rate, frequency;
   1736  1.106  drochner 	tcflag_t cflag;
   1737  1.106  drochner 	bus_space_handle_t *iohp;
   1738    1.1       cgd {
   1739  1.106  drochner 	bus_space_handle_t ioh;
   1740  1.106  drochner 
   1741  1.106  drochner 	if (bus_space_map(iot, iobase, COM_NPORTS, 0, &ioh))
   1742  1.110     enami 		return (ENOMEM); /* ??? */
   1743    1.1       cgd 
   1744  1.116      fvdl 	bus_space_write_1(iot, ioh, com_lcr, LCR_EERS);
   1745  1.116      fvdl 	bus_space_write_1(iot, ioh, com_efr, 0);
   1746   1.91   thorpej 	bus_space_write_1(iot, ioh, com_lcr, LCR_DLAB);
   1747  1.109        is 	rate = comspeed(rate, frequency);
   1748   1.91   thorpej 	bus_space_write_1(iot, ioh, com_dlbl, rate);
   1749   1.91   thorpej 	bus_space_write_1(iot, ioh, com_dlbh, rate >> 8);
   1750  1.106  drochner 	bus_space_write_1(iot, ioh, com_lcr, cflag2lcr(cflag));
   1751   1.99   mycroft 	bus_space_write_1(iot, ioh, com_mcr, 0);
   1752   1.91   thorpej 	bus_space_write_1(iot, ioh, com_fifo,
   1753   1.87   mycroft 	    FIFO_ENABLE | FIFO_RCV_RST | FIFO_XMT_RST | FIFO_TRIGGER_1);
   1754   1.99   mycroft 	bus_space_write_1(iot, ioh, com_ier, 0);
   1755  1.106  drochner 
   1756  1.106  drochner 	*iohp = ioh;
   1757  1.110     enami 	return (0);
   1758   1.99   mycroft }
   1759   1.99   mycroft 
   1760   1.99   mycroft /*
   1761  1.106  drochner  * Following are all routines needed for COM to act as console
   1762   1.99   mycroft  */
   1763  1.106  drochner 
   1764  1.106  drochner int
   1765  1.109        is comcnattach(iot, iobase, rate, frequency, cflag)
   1766   1.99   mycroft 	bus_space_tag_t iot;
   1767  1.106  drochner 	int iobase;
   1768  1.109        is 	int rate, frequency;
   1769  1.106  drochner 	tcflag_t cflag;
   1770   1.99   mycroft {
   1771  1.106  drochner 	int res;
   1772  1.106  drochner 	static struct consdev comcons = { NULL, NULL,
   1773  1.106  drochner 	comcngetc, comcnputc, comcnpollc, NODEV, CN_NORMAL};
   1774  1.106  drochner 
   1775  1.109        is 	res = cominit(iot, iobase, rate, frequency, cflag, &comconsioh);
   1776  1.110     enami 	if (res)
   1777  1.110     enami 		return (res);
   1778  1.106  drochner 
   1779  1.106  drochner 	cn_tab = &comcons;
   1780  1.106  drochner 
   1781  1.106  drochner 	comconstag = iot;
   1782  1.106  drochner 	comconsaddr = iobase;
   1783  1.106  drochner 	comconsrate = rate;
   1784  1.106  drochner 	comconscflag = cflag;
   1785   1.99   mycroft 
   1786  1.110     enami 	return (0);
   1787    1.1       cgd }
   1788    1.1       cgd 
   1789   1.80  christos int
   1790    1.1       cgd comcngetc(dev)
   1791   1.21   mycroft 	dev_t dev;
   1792    1.1       cgd {
   1793    1.1       cgd 
   1794  1.102   thorpej 	return (com_common_getc(comconstag, comconsioh));
   1795    1.1       cgd }
   1796    1.1       cgd 
   1797    1.1       cgd /*
   1798    1.1       cgd  * Console kernel output character routine.
   1799    1.1       cgd  */
   1800   1.48   mycroft void
   1801    1.1       cgd comcnputc(dev, c)
   1802    1.1       cgd 	dev_t dev;
   1803   1.21   mycroft 	int c;
   1804    1.1       cgd {
   1805    1.1       cgd 
   1806  1.102   thorpej 	com_common_putc(comconstag, comconsioh, c);
   1807   1.37   mycroft }
   1808   1.37   mycroft 
   1809   1.37   mycroft void
   1810   1.37   mycroft comcnpollc(dev, on)
   1811   1.37   mycroft 	dev_t dev;
   1812   1.37   mycroft 	int on;
   1813   1.37   mycroft {
   1814   1.37   mycroft 
   1815  1.106  drochner }
   1816  1.106  drochner 
   1817  1.106  drochner #ifdef KGDB
   1818  1.106  drochner int
   1819  1.109        is com_kgdb_attach(iot, iobase, rate, frequency, cflag)
   1820  1.106  drochner 	bus_space_tag_t iot;
   1821  1.106  drochner 	int iobase;
   1822  1.112     mikel 	int rate, frequency;
   1823  1.106  drochner 	tcflag_t cflag;
   1824  1.106  drochner {
   1825  1.106  drochner 	int res;
   1826  1.107  drochner 
   1827  1.107  drochner 	if (iot == comconstag && iobase == comconsaddr)
   1828  1.110     enami 		return (EBUSY); /* cannot share with console */
   1829  1.106  drochner 
   1830  1.109        is 	res = cominit(iot, iobase, rate, frequency, cflag, &com_kgdb_ioh);
   1831  1.110     enami 	if (res)
   1832  1.110     enami 		return (res);
   1833  1.106  drochner 
   1834  1.106  drochner 	kgdb_attach(com_kgdb_getc, com_kgdb_putc, NULL);
   1835  1.106  drochner 	kgdb_dev = 123; /* unneeded, only to satisfy some tests */
   1836  1.106  drochner 
   1837  1.106  drochner 	com_kgdb_iot = iot;
   1838  1.106  drochner 	com_kgdb_addr = iobase;
   1839  1.106  drochner 
   1840  1.110     enami 	return (0);
   1841  1.106  drochner }
   1842  1.106  drochner 
   1843  1.106  drochner /* ARGSUSED */
   1844  1.106  drochner int
   1845  1.106  drochner com_kgdb_getc(arg)
   1846  1.106  drochner 	void *arg;
   1847  1.106  drochner {
   1848  1.106  drochner 
   1849  1.106  drochner 	return (com_common_getc(com_kgdb_iot, com_kgdb_ioh));
   1850  1.106  drochner }
   1851  1.106  drochner 
   1852  1.106  drochner /* ARGSUSED */
   1853  1.106  drochner void
   1854  1.106  drochner com_kgdb_putc(arg, c)
   1855  1.106  drochner 	void *arg;
   1856  1.106  drochner 	int c;
   1857  1.106  drochner {
   1858  1.106  drochner 
   1859  1.106  drochner 	return (com_common_putc(com_kgdb_iot, com_kgdb_ioh, c));
   1860  1.106  drochner }
   1861  1.106  drochner #endif /* KGDB */
   1862  1.106  drochner 
   1863  1.106  drochner /* helper function to identify the com ports used by
   1864  1.106  drochner  console or KGDB (and not yet autoconf attached) */
   1865  1.106  drochner int
   1866  1.106  drochner com_is_console(iot, iobase, ioh)
   1867  1.110     enami 	bus_space_tag_t iot;
   1868  1.110     enami 	int iobase;
   1869  1.110     enami 	bus_space_handle_t *ioh;
   1870  1.106  drochner {
   1871  1.106  drochner 	bus_space_handle_t help;
   1872  1.106  drochner 
   1873  1.110     enami 	if (!comconsattached &&
   1874  1.110     enami 	    iot == comconstag && iobase == comconsaddr)
   1875  1.106  drochner 		help = comconsioh;
   1876  1.106  drochner #ifdef KGDB
   1877  1.110     enami 	else if (!com_kgdb_attached &&
   1878  1.110     enami 	    iot == com_kgdb_iot && iobase == com_kgdb_addr)
   1879  1.106  drochner 		help = com_kgdb_ioh;
   1880  1.106  drochner #endif
   1881  1.106  drochner 	else
   1882  1.110     enami 		return (0);
   1883  1.106  drochner 
   1884  1.110     enami 	if (ioh)
   1885  1.110     enami 		*ioh = help;
   1886  1.110     enami 	return (1);
   1887    1.2       cgd }
   1888