Home | History | Annotate | Line # | Download | only in ic
com.c revision 1.117
      1  1.117   mycroft /*	$NetBSD: com.c,v 1.117 1997/10/19 20:01:08 mycroft 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.116      fvdl 	u_int8_t lcr;
    354   1.65  christos #ifdef COM_HAYESP
    355   1.65  christos 	int	hayesp_ports[] = { 0x140, 0x180, 0x280, 0x300, 0 };
    356   1.65  christos 	int	*hayespp;
    357   1.65  christos #endif
    358  1.117   mycroft 
    359  1.117   mycroft 	/* Disable interrupts before configuring the device. */
    360  1.117   mycroft 	sc->sc_ier = 0;
    361  1.117   mycroft 	bus_space_write_1(sc->sc_iot, sc->sc_ioh, com_ier, sc->sc_ier);
    362    1.1       cgd 
    363  1.106  drochner 	if (iot == comconstag && iobase == comconsaddr) {
    364  1.105  drochner 		comconsattached = 1;
    365  1.105  drochner 
    366   1.96   mycroft 		/* Make sure the console is always "hardwired". */
    367   1.75       cgd 		delay(1000);			/* wait for output to finish */
    368   1.75       cgd 		SET(sc->sc_hwflags, COM_HW_CONSOLE);
    369   1.99   mycroft 		SET(sc->sc_swflags, TIOCFLAG_SOFTCAR);
    370   1.75       cgd 	}
    371   1.26       cgd 
    372   1.65  christos #ifdef COM_HAYESP
    373   1.65  christos 	/* Look for a Hayes ESP board. */
    374   1.75       cgd 	for (hayespp = hayesp_ports; *hayespp != 0; hayespp++) {
    375   1.91   thorpej 		bus_space_handle_t hayespioh;
    376   1.75       cgd 
    377   1.75       cgd #define	HAYESP_NPORTS	8			/* XXX XXX XXX ??? ??? ??? */
    378   1.92       cgd 		if (bus_space_map(iot, *hayespp, HAYESP_NPORTS, 0, &hayespioh))
    379   1.75       cgd 			continue;
    380   1.75       cgd 		if (comprobeHAYESP(hayespioh, sc)) {
    381   1.75       cgd 			sc->sc_hayespioh = hayespioh;
    382   1.99   mycroft 			sc->sc_fifolen = 1024;
    383   1.99   mycroft 
    384   1.99   mycroft 			/* Set 16550 compatibility mode */
    385   1.99   mycroft 			bus_space_write_1(iot, hayespioh, HAYESP_CMD1, HAYESP_SETMODE);
    386   1.99   mycroft 			bus_space_write_1(iot, hayespioh, HAYESP_CMD2,
    387   1.99   mycroft 			     HAYESP_MODE_FIFO|HAYESP_MODE_RTS|
    388   1.99   mycroft 			     HAYESP_MODE_SCALE);
    389   1.99   mycroft 
    390   1.99   mycroft 			/* Set RTS/CTS flow control */
    391   1.99   mycroft 			bus_space_write_1(iot, hayespioh, HAYESP_CMD1, HAYESP_SETFLOWTYPE);
    392   1.99   mycroft 			bus_space_write_1(iot, hayespioh, HAYESP_CMD2, HAYESP_FLOW_RTS);
    393   1.99   mycroft 			bus_space_write_1(iot, hayespioh, HAYESP_CMD2, HAYESP_FLOW_CTS);
    394   1.99   mycroft 
    395   1.99   mycroft 			/* Set flow control levels */
    396   1.99   mycroft 			bus_space_write_1(iot, hayespioh, HAYESP_CMD1, HAYESP_SETRXFLOW);
    397   1.99   mycroft 			bus_space_write_1(iot, hayespioh, HAYESP_CMD2,
    398   1.99   mycroft 			     HAYESP_HIBYTE(HAYESP_RXHIWMARK));
    399   1.99   mycroft 			bus_space_write_1(iot, hayespioh, HAYESP_CMD2,
    400   1.99   mycroft 			     HAYESP_LOBYTE(HAYESP_RXHIWMARK));
    401   1.99   mycroft 			bus_space_write_1(iot, hayespioh, HAYESP_CMD2,
    402   1.99   mycroft 			     HAYESP_HIBYTE(HAYESP_RXLOWMARK));
    403   1.99   mycroft 			bus_space_write_1(iot, hayespioh, HAYESP_CMD2,
    404   1.99   mycroft 			     HAYESP_LOBYTE(HAYESP_RXLOWMARK));
    405   1.99   mycroft 
    406   1.65  christos 			break;
    407   1.65  christos 		}
    408   1.91   thorpej 		bus_space_unmap(iot, hayespioh, HAYESP_NPORTS);
    409   1.75       cgd 	}
    410   1.65  christos 	/* No ESP; look for other things. */
    411   1.65  christos 	if (*hayespp == 0) {
    412   1.65  christos #endif
    413   1.99   mycroft 	sc->sc_fifolen = 1;
    414    1.1       cgd 	/* look for a NS 16550AF UART with FIFOs */
    415   1.91   thorpej 	bus_space_write_1(iot, ioh, com_fifo,
    416   1.21   mycroft 	    FIFO_ENABLE | FIFO_RCV_RST | FIFO_XMT_RST | FIFO_TRIGGER_14);
    417   1.20   mycroft 	delay(100);
    418   1.99   mycroft 	if (ISSET(bus_space_read_1(iot, ioh, com_iir), IIR_FIFO_MASK)
    419   1.99   mycroft 	    == IIR_FIFO_MASK)
    420   1.99   mycroft 		if (ISSET(bus_space_read_1(iot, ioh, com_fifo), FIFO_TRIGGER_14)
    421   1.99   mycroft 		    == FIFO_TRIGGER_14) {
    422   1.62   mycroft 			SET(sc->sc_hwflags, COM_HW_FIFO);
    423  1.116      fvdl 
    424  1.116      fvdl 			/*
    425  1.116      fvdl 			 * IIR changes into the EFR if LCR is set to LCR_EERS
    426  1.116      fvdl 			 * on 16650s. We also know IIR != 0 at this point.
    427  1.116      fvdl 			 * Write 0 into the EFR, and read it. If the result
    428  1.116      fvdl 			 * is 0, we have a 16650.
    429  1.116      fvdl 			 *
    430  1.116      fvdl 			 * Older 16650s were broken; the test to detect them
    431  1.116      fvdl 			 * is taken from the Linux driver. Apparently
    432  1.116      fvdl 			 * setting DLAB enable gives access to the EFR on
    433  1.116      fvdl 			 * these chips.
    434  1.116      fvdl 			 */
    435  1.116      fvdl 			lcr = bus_space_read_1(iot, ioh, com_lcr);
    436  1.116      fvdl 			bus_space_write_1(iot, ioh, com_lcr, LCR_EERS);
    437  1.116      fvdl 			bus_space_write_1(iot, ioh, com_efr, 0);
    438  1.116      fvdl 			if (bus_space_read_1(iot, ioh, com_efr) == 0) {
    439  1.116      fvdl 				bus_space_write_1(iot, ioh, com_lcr,
    440  1.116      fvdl 				    lcr | LCR_DLAB);
    441  1.116      fvdl 				if (bus_space_read_1(iot, ioh, com_efr) == 0) {
    442  1.116      fvdl 					CLR(sc->sc_hwflags, COM_HW_FIFO);
    443  1.116      fvdl 					sc->sc_fifolen = 0;
    444  1.116      fvdl 					printf(": st16650, broken fifo\n");
    445  1.116      fvdl 				} else {
    446  1.116      fvdl 					SET(sc->sc_hwflags, COM_HW_FLOW);
    447  1.116      fvdl 					printf(": st16650a, working fifo\n");
    448  1.116      fvdl 					sc->sc_fifolen = 32;
    449  1.116      fvdl 				}
    450  1.116      fvdl 			} else {
    451  1.116      fvdl 				printf(": ns16550a, working fifo\n");
    452  1.116      fvdl 				sc->sc_fifolen = 16;
    453  1.116      fvdl 			}
    454  1.116      fvdl 
    455  1.116      fvdl 			bus_space_write_1(iot, ioh, com_lcr, LCR_8BITS);
    456   1.21   mycroft 		} else
    457   1.90  christos 			printf(": ns16550, broken fifo\n");
    458   1.21   mycroft 	else
    459   1.90  christos 		printf(": ns8250 or ns16450, no fifo\n");
    460   1.91   thorpej 	bus_space_write_1(iot, ioh, com_fifo, 0);
    461   1.65  christos #ifdef COM_HAYESP
    462   1.65  christos 	}
    463   1.65  christos #endif
    464   1.21   mycroft 
    465   1.99   mycroft 	if (!ISSET(sc->sc_hwflags, COM_HW_NOIEN))
    466   1.99   mycroft 		SET(sc->sc_mcr, MCR_IENABLE);
    467   1.30   mycroft 
    468   1.96   mycroft 	if (ISSET(sc->sc_hwflags, COM_HW_CONSOLE)) {
    469  1.106  drochner 		int maj;
    470  1.106  drochner 
    471  1.106  drochner 		/* locate the major number */
    472  1.106  drochner 		for (maj = 0; maj < nchrdev; maj++)
    473  1.106  drochner 			if (cdevsw[maj].d_open == comopen)
    474  1.106  drochner 				break;
    475  1.106  drochner 
    476  1.106  drochner 		cn_tab->cn_dev = makedev(maj, sc->sc_dev.dv_unit);
    477  1.104  drochner #ifdef DDB
    478  1.104  drochner 		com_enable_debugport(sc);
    479  1.104  drochner #endif
    480   1.96   mycroft 		printf("%s: console\n", sc->sc_dev.dv_xname);
    481   1.96   mycroft 	}
    482   1.96   mycroft 
    483    1.1       cgd #ifdef KGDB
    484  1.102   thorpej 	/*
    485  1.102   thorpej 	 * Allow kgdb to "take over" this port.  If this is
    486  1.102   thorpej 	 * the kgdb device, it has exclusive use.
    487  1.102   thorpej 	 */
    488  1.106  drochner 	if (iot == com_kgdb_iot && iobase == com_kgdb_addr) {
    489  1.106  drochner 		com_kgdb_attached = 1;
    490  1.106  drochner 
    491  1.104  drochner 		SET(sc->sc_hwflags, COM_HW_KGDB);
    492  1.104  drochner 		com_enable_debugport(sc);
    493  1.103  drochner 		printf("%s: kgdb\n", sc->sc_dev.dv_xname);
    494  1.103  drochner 	}
    495   1.99   mycroft #endif
    496   1.99   mycroft 
    497   1.99   mycroft #ifdef __GENERIC_SOFT_INTERRUPTS
    498   1.99   mycroft 	sc->sc_si = softintr_establish(IPL_SOFTSERIAL, comsoft, sc);
    499    1.1       cgd #endif
    500  1.115  explorer 
    501  1.115  explorer #if NRND > 0 && defined(RND_COM)
    502  1.115  explorer 	rnd_attach_source(&sc->rnd_source, sc->sc_dev.dv_xname,
    503  1.115  explorer 			  RND_TYPE_TTY);
    504  1.115  explorer #endif
    505    1.1       cgd }
    506    1.1       cgd 
    507   1.21   mycroft int
    508   1.21   mycroft comopen(dev, flag, mode, p)
    509   1.21   mycroft 	dev_t dev;
    510   1.21   mycroft 	int flag, mode;
    511   1.21   mycroft 	struct proc *p;
    512    1.1       cgd {
    513   1.21   mycroft 	int unit = COMUNIT(dev);
    514   1.21   mycroft 	struct com_softc *sc;
    515   1.21   mycroft 	struct tty *tp;
    516   1.99   mycroft 	int s, s2;
    517    1.1       cgd 	int error = 0;
    518    1.1       cgd 
    519   1.76   thorpej 	if (unit >= com_cd.cd_ndevs)
    520   1.99   mycroft 		return (ENXIO);
    521   1.76   thorpej 	sc = com_cd.cd_devs[unit];
    522   1.29   mycroft 	if (!sc)
    523   1.99   mycroft 		return (ENXIO);
    524   1.21   mycroft 
    525  1.102   thorpej #ifdef KGDB
    526  1.102   thorpej 	/*
    527  1.102   thorpej 	 * If this is the kgdb port, no other use is permitted.
    528  1.102   thorpej 	 */
    529  1.102   thorpej 	if (ISSET(sc->sc_hwflags, COM_HW_KGDB))
    530  1.102   thorpej 		return (EBUSY);
    531  1.102   thorpej #endif
    532  1.102   thorpej 
    533   1.83       cgd 	if (!sc->sc_tty) {
    534   1.50   mycroft 		tp = sc->sc_tty = ttymalloc();
    535   1.83       cgd 		tty_attach(tp);
    536   1.83       cgd 	} else
    537   1.50   mycroft 		tp = sc->sc_tty;
    538   1.21   mycroft 
    539   1.99   mycroft 	if (ISSET(tp->t_state, TS_ISOPEN) &&
    540   1.99   mycroft 	    ISSET(tp->t_state, TS_XCLUDE) &&
    541   1.99   mycroft 	    p->p_ucred->cr_uid != 0)
    542   1.99   mycroft 		return (EBUSY);
    543   1.99   mycroft 
    544   1.99   mycroft 	s = spltty();
    545   1.99   mycroft 
    546   1.99   mycroft 	/* We need to set this early for the benefit of comsoft(). */
    547   1.99   mycroft 	SET(tp->t_state, TS_WOPEN);
    548   1.99   mycroft 
    549   1.99   mycroft 	/*
    550   1.99   mycroft 	 * Do the following iff this is a first open.
    551   1.99   mycroft 	 */
    552   1.62   mycroft 	if (!ISSET(tp->t_state, TS_ISOPEN)) {
    553   1.99   mycroft 		struct termios t;
    554   1.99   mycroft 
    555   1.99   mycroft 		/* Turn on interrupts. */
    556   1.99   mycroft 		sc->sc_ier = IER_ERXRDY | IER_ERLS | IER_EMSC;
    557   1.99   mycroft 		bus_space_write_1(sc->sc_iot, sc->sc_ioh, com_ier, sc->sc_ier);
    558   1.99   mycroft 
    559   1.99   mycroft 		/* Fetch the current modem control status, needed later. */
    560   1.99   mycroft 		sc->sc_msr = bus_space_read_1(sc->sc_iot, sc->sc_ioh, com_msr);
    561   1.99   mycroft 
    562   1.99   mycroft 		/* Add some entry points needed by the tty layer. */
    563   1.99   mycroft 		tp->t_oproc = comstart;
    564   1.99   mycroft 		tp->t_param = comparam;
    565   1.99   mycroft 		tp->t_hwiflow = comhwiflow;
    566   1.99   mycroft 		tp->t_dev = dev;
    567   1.99   mycroft 
    568   1.99   mycroft 		/*
    569   1.99   mycroft 		 * Initialize the termios status to the defaults.  Add in the
    570   1.99   mycroft 		 * sticky bits from TIOCSFLAGS.
    571   1.99   mycroft 		 */
    572   1.99   mycroft 		t.c_ispeed = 0;
    573   1.98   mycroft 		if (ISSET(sc->sc_hwflags, COM_HW_CONSOLE)) {
    574   1.99   mycroft 			t.c_ospeed = comconsrate;
    575   1.99   mycroft 			t.c_cflag = comconscflag;
    576   1.98   mycroft 		} else {
    577   1.99   mycroft 			t.c_ospeed = TTYDEF_SPEED;
    578   1.99   mycroft 			t.c_cflag = TTYDEF_CFLAG;
    579   1.98   mycroft 		}
    580   1.99   mycroft 		if (ISSET(sc->sc_swflags, TIOCFLAG_CLOCAL))
    581   1.99   mycroft 			SET(t.c_cflag, CLOCAL);
    582   1.99   mycroft 		if (ISSET(sc->sc_swflags, TIOCFLAG_CRTSCTS))
    583   1.99   mycroft 			SET(t.c_cflag, CRTSCTS);
    584   1.99   mycroft 		if (ISSET(sc->sc_swflags, TIOCFLAG_MDMBUF))
    585   1.99   mycroft 			SET(t.c_cflag, MDMBUF);
    586   1.99   mycroft 		tp->t_iflag = TTYDEF_IFLAG;
    587   1.99   mycroft 		tp->t_oflag = TTYDEF_OFLAG;
    588   1.16        ws 		tp->t_lflag = TTYDEF_LFLAG;
    589   1.99   mycroft 		ttychars(tp);
    590   1.99   mycroft 		(void) comparam(tp, &t);
    591    1.1       cgd 		ttsetwater(tp);
    592   1.21   mycroft 
    593   1.99   mycroft 		s2 = splserial();
    594   1.57   mycroft 
    595   1.99   mycroft 		/*
    596   1.99   mycroft 		 * Turn on DTR.  We must always do this, even if carrier is not
    597   1.99   mycroft 		 * present, because otherwise we'd have to use TIOCSDTR
    598   1.99   mycroft 		 * immediately after setting CLOCAL.  We will drop DTR only on
    599   1.99   mycroft 		 * the next high-low transition of DCD, or by explicit request.
    600   1.99   mycroft 		 */
    601   1.99   mycroft 		com_modem(sc, 1);
    602   1.65  christos 
    603   1.99   mycroft 		/* Clear the input ring, and unblock. */
    604   1.99   mycroft 		sc->sc_rbput = sc->sc_rbget = 0;
    605   1.99   mycroft 		sc->sc_rbavail = RXBUFSIZE;
    606   1.99   mycroft 		com_iflush(sc);
    607  1.101   mycroft 		CLR(sc->sc_rx_flags, RX_ANY_BLOCK);
    608  1.101   mycroft 		com_hwiflow(sc);
    609   1.65  christos 
    610   1.99   mycroft #ifdef COM_DEBUG
    611  1.101   mycroft 		if (com_debug)
    612  1.101   mycroft 			comstatus(sc, "comopen  ");
    613   1.65  christos #endif
    614   1.21   mycroft 
    615   1.99   mycroft 		splx(s2);
    616   1.99   mycroft 	}
    617   1.99   mycroft 	error = 0;
    618   1.21   mycroft 
    619   1.99   mycroft 	/* If we're doing a blocking open... */
    620   1.62   mycroft 	if (!ISSET(flag, O_NONBLOCK))
    621   1.99   mycroft 		/* ...then wait for carrier. */
    622   1.99   mycroft 		while (!ISSET(tp->t_state, TS_CARR_ON) &&
    623   1.99   mycroft 		    !ISSET(tp->t_cflag, CLOCAL | MDMBUF)) {
    624   1.62   mycroft 			error = ttysleep(tp, &tp->t_rawq, TTIPRI | PCATCH,
    625   1.62   mycroft 			    ttopen, 0);
    626   1.21   mycroft 			if (error) {
    627   1.99   mycroft 				/*
    628   1.99   mycroft 				 * If the open was interrupted and nobody
    629   1.99   mycroft 				 * else has the device open, then hang up.
    630   1.99   mycroft 				 */
    631   1.99   mycroft 				if (!ISSET(tp->t_state, TS_ISOPEN)) {
    632   1.99   mycroft 					com_modem(sc, 0);
    633   1.99   mycroft 					CLR(tp->t_state, TS_WOPEN);
    634   1.99   mycroft 					ttwakeup(tp);
    635   1.99   mycroft 				}
    636   1.99   mycroft 				break;
    637   1.21   mycroft 			}
    638   1.99   mycroft 			SET(tp->t_state, TS_WOPEN);
    639   1.21   mycroft 		}
    640   1.99   mycroft 
    641   1.21   mycroft 	splx(s);
    642   1.99   mycroft 	if (error == 0)
    643   1.99   mycroft 		error = (*linesw[tp->t_line].l_open)(dev, tp);
    644   1.99   mycroft 	return (error);
    645    1.1       cgd }
    646    1.1       cgd 
    647   1.21   mycroft int
    648    1.1       cgd comclose(dev, flag, mode, p)
    649    1.1       cgd 	dev_t dev;
    650    1.1       cgd 	int flag, mode;
    651    1.1       cgd 	struct proc *p;
    652    1.1       cgd {
    653   1.21   mycroft 	int unit = COMUNIT(dev);
    654   1.76   thorpej 	struct com_softc *sc = com_cd.cd_devs[unit];
    655   1.50   mycroft 	struct tty *tp = sc->sc_tty;
    656   1.57   mycroft 	int s;
    657   1.57   mycroft 
    658   1.57   mycroft 	/* XXX This is for cons.c. */
    659   1.62   mycroft 	if (!ISSET(tp->t_state, TS_ISOPEN))
    660   1.99   mycroft 		return (0);
    661   1.21   mycroft 
    662    1.1       cgd 	(*linesw[tp->t_line].l_close)(tp, flag);
    663    1.1       cgd 	ttyclose(tp);
    664   1.99   mycroft 
    665   1.99   mycroft 	/* If we were asserting flow control, then deassert it. */
    666  1.101   mycroft 	SET(sc->sc_rx_flags, RX_IBUF_BLOCKED);
    667  1.101   mycroft 	com_hwiflow(sc);
    668   1.99   mycroft 	/* Clear any break condition set with TIOCSBRK. */
    669   1.99   mycroft 	com_break(sc, 0);
    670   1.99   mycroft 	/*
    671   1.99   mycroft 	 * Hang up if necessary.  Wait a bit, so the other side has time to
    672   1.99   mycroft 	 * notice even if we immediately open the port again.
    673   1.99   mycroft 	 */
    674   1.99   mycroft 	if (ISSET(tp->t_cflag, HUPCL)) {
    675   1.99   mycroft 		com_modem(sc, 0);
    676   1.99   mycroft 		(void) tsleep(sc, TTIPRI, ttclos, hz);
    677   1.21   mycroft 	}
    678   1.99   mycroft 
    679   1.99   mycroft 	s = splserial();
    680   1.99   mycroft 	/* Turn off interrupts. */
    681  1.104  drochner #ifdef DDB
    682  1.104  drochner 	if(ISSET(sc->sc_hwflags, COM_HW_CONSOLE))
    683  1.104  drochner 		sc->sc_ier = IER_ERXRDY; /* interrupt on break */
    684  1.104  drochner 	else
    685  1.104  drochner #else
    686  1.104  drochner 		sc->sc_ier = 0;
    687  1.104  drochner #endif
    688   1.99   mycroft 	bus_space_write_1(sc->sc_iot, sc->sc_ioh, com_ier, sc->sc_ier);
    689   1.99   mycroft 	splx(s);
    690   1.99   mycroft 
    691   1.99   mycroft 	return (0);
    692    1.1       cgd }
    693    1.1       cgd 
    694   1.21   mycroft int
    695    1.1       cgd comread(dev, uio, flag)
    696    1.1       cgd 	dev_t dev;
    697    1.1       cgd 	struct uio *uio;
    698   1.21   mycroft 	int flag;
    699    1.1       cgd {
    700   1.76   thorpej 	struct com_softc *sc = com_cd.cd_devs[COMUNIT(dev)];
    701   1.52   mycroft 	struct tty *tp = sc->sc_tty;
    702    1.1       cgd 
    703    1.1       cgd 	return ((*linesw[tp->t_line].l_read)(tp, uio, flag));
    704    1.1       cgd }
    705    1.1       cgd 
    706   1.21   mycroft int
    707    1.1       cgd comwrite(dev, uio, flag)
    708    1.1       cgd 	dev_t dev;
    709    1.1       cgd 	struct uio *uio;
    710   1.21   mycroft 	int flag;
    711    1.1       cgd {
    712   1.76   thorpej 	struct com_softc *sc = com_cd.cd_devs[COMUNIT(dev)];
    713   1.52   mycroft 	struct tty *tp = sc->sc_tty;
    714    1.1       cgd 
    715    1.1       cgd 	return ((*linesw[tp->t_line].l_write)(tp, uio, flag));
    716    1.1       cgd }
    717   1.50   mycroft 
    718   1.50   mycroft struct tty *
    719   1.50   mycroft comtty(dev)
    720   1.50   mycroft 	dev_t dev;
    721   1.50   mycroft {
    722   1.76   thorpej 	struct com_softc *sc = com_cd.cd_devs[COMUNIT(dev)];
    723   1.52   mycroft 	struct tty *tp = sc->sc_tty;
    724   1.50   mycroft 
    725   1.52   mycroft 	return (tp);
    726   1.50   mycroft }
    727  1.111  christos 
    728  1.111  christos static u_char
    729  1.111  christos tiocm_xxx2mcr(data)
    730  1.111  christos 	int data;
    731  1.111  christos {
    732  1.111  christos 	u_char m = 0;
    733  1.111  christos 
    734  1.111  christos 	if (ISSET(data, TIOCM_DTR))
    735  1.111  christos 		SET(m, MCR_DTR);
    736  1.111  christos 	if (ISSET(data, TIOCM_RTS))
    737  1.111  christos 		SET(m, MCR_RTS);
    738  1.111  christos 	return m;
    739  1.111  christos }
    740    1.1       cgd 
    741   1.21   mycroft int
    742   1.19   mycroft comioctl(dev, cmd, data, flag, p)
    743    1.1       cgd 	dev_t dev;
    744   1.39       cgd 	u_long cmd;
    745    1.1       cgd 	caddr_t data;
    746   1.19   mycroft 	int flag;
    747   1.19   mycroft 	struct proc *p;
    748    1.1       cgd {
    749   1.21   mycroft 	int unit = COMUNIT(dev);
    750   1.76   thorpej 	struct com_softc *sc = com_cd.cd_devs[unit];
    751   1.50   mycroft 	struct tty *tp = sc->sc_tty;
    752   1.21   mycroft 	int error;
    753   1.21   mycroft 
    754   1.19   mycroft 	error = (*linesw[tp->t_line].l_ioctl)(tp, cmd, data, flag, p);
    755    1.1       cgd 	if (error >= 0)
    756   1.99   mycroft 		return (error);
    757   1.99   mycroft 
    758   1.19   mycroft 	error = ttioctl(tp, cmd, data, flag, p);
    759    1.1       cgd 	if (error >= 0)
    760   1.99   mycroft 		return (error);
    761    1.1       cgd 
    762    1.1       cgd 	switch (cmd) {
    763    1.1       cgd 	case TIOCSBRK:
    764   1.99   mycroft 		com_break(sc, 1);
    765    1.1       cgd 		break;
    766   1.99   mycroft 
    767    1.1       cgd 	case TIOCCBRK:
    768   1.99   mycroft 		com_break(sc, 0);
    769    1.1       cgd 		break;
    770   1.99   mycroft 
    771    1.1       cgd 	case TIOCSDTR:
    772   1.99   mycroft 		com_modem(sc, 1);
    773    1.1       cgd 		break;
    774   1.99   mycroft 
    775    1.1       cgd 	case TIOCCDTR:
    776   1.99   mycroft 		com_modem(sc, 0);
    777    1.1       cgd 		break;
    778   1.99   mycroft 
    779   1.99   mycroft 	case TIOCGFLAGS:
    780   1.99   mycroft 		*(int *)data = sc->sc_swflags;
    781   1.99   mycroft 		break;
    782   1.99   mycroft 
    783   1.99   mycroft 	case TIOCSFLAGS:
    784   1.99   mycroft 		error = suser(p->p_ucred, &p->p_acflag);
    785   1.99   mycroft 		if (error)
    786   1.99   mycroft 			return (error);
    787   1.99   mycroft 		sc->sc_swflags = *(int *)data;
    788   1.99   mycroft 		break;
    789   1.99   mycroft 
    790    1.1       cgd 	case TIOCMSET:
    791  1.111  christos 		CLR(sc->sc_mcr, MCR_DTR | MCR_RTS);
    792  1.111  christos 		/*FALLTHROUGH*/
    793  1.111  christos 
    794    1.1       cgd 	case TIOCMBIS:
    795  1.111  christos 		SET(sc->sc_mcr, tiocm_xxx2mcr(*(int *)data));
    796  1.111  christos 		bus_space_write_1(sc->sc_iot, sc->sc_ioh, com_mcr, sc->sc_mcr);
    797  1.111  christos 		break;
    798  1.111  christos 
    799    1.1       cgd 	case TIOCMBIC:
    800  1.111  christos 		CLR(sc->sc_mcr, tiocm_xxx2mcr(*(int *)data));
    801  1.111  christos 		bus_space_write_1(sc->sc_iot, sc->sc_ioh, com_mcr, sc->sc_mcr);
    802  1.111  christos 		break;
    803  1.111  christos 
    804  1.111  christos 	case TIOCMGET: {
    805  1.111  christos 		u_char m;
    806  1.111  christos 		int bits = 0;
    807  1.111  christos 
    808  1.111  christos 		m = sc->sc_mcr;
    809  1.111  christos 		if (ISSET(m, MCR_DTR))
    810  1.111  christos 			SET(bits, TIOCM_DTR);
    811  1.111  christos 		if (ISSET(m, MCR_RTS))
    812  1.111  christos 			SET(bits, TIOCM_RTS);
    813  1.111  christos 		m = sc->sc_msr;
    814  1.111  christos 		if (ISSET(m, MSR_DCD))
    815  1.111  christos 			SET(bits, TIOCM_CD);
    816  1.111  christos 		if (ISSET(m, MSR_CTS))
    817  1.111  christos 			SET(bits, TIOCM_CTS);
    818  1.111  christos 		if (ISSET(m, MSR_DSR))
    819  1.111  christos 			SET(bits, TIOCM_DSR);
    820  1.111  christos 		if (ISSET(m, MSR_RI | MSR_TERI))
    821  1.111  christos 			SET(bits, TIOCM_RI);
    822  1.111  christos 		if (bus_space_read_1(sc->sc_iot, sc->sc_ioh, com_ier))
    823  1.111  christos 			SET(bits, TIOCM_LE);
    824  1.111  christos 		*(int *)data = bits;
    825  1.111  christos 		break;
    826  1.111  christos 	}
    827   1.99   mycroft 	default:
    828   1.99   mycroft 		return (ENOTTY);
    829   1.21   mycroft 	}
    830   1.22       cgd 
    831   1.99   mycroft #ifdef COM_DEBUG
    832  1.101   mycroft 	if (com_debug)
    833   1.99   mycroft 		comstatus(sc, "comioctl ");
    834   1.99   mycroft #endif
    835   1.99   mycroft 
    836   1.99   mycroft 	return (0);
    837   1.99   mycroft }
    838   1.99   mycroft 
    839  1.101   mycroft integrate void
    840  1.101   mycroft com_schedrx(sc)
    841  1.101   mycroft 	struct com_softc *sc;
    842  1.101   mycroft {
    843  1.101   mycroft 
    844  1.101   mycroft 	sc->sc_rx_ready = 1;
    845  1.101   mycroft 
    846  1.101   mycroft 	/* Wake up the poller. */
    847  1.101   mycroft #ifdef __GENERIC_SOFT_INTERRUPTS
    848  1.101   mycroft 	softintr_schedule(sc->sc_si);
    849  1.101   mycroft #else
    850  1.101   mycroft #ifndef alpha
    851  1.101   mycroft 	setsoftserial();
    852  1.101   mycroft #else
    853  1.101   mycroft 	if (!com_softintr_scheduled) {
    854  1.101   mycroft 		com_softintr_scheduled = 1;
    855  1.101   mycroft 		timeout(comsoft, NULL, 1);
    856  1.101   mycroft 	}
    857  1.101   mycroft #endif
    858  1.101   mycroft #endif
    859  1.101   mycroft }
    860  1.101   mycroft 
    861   1.99   mycroft void
    862   1.99   mycroft com_break(sc, onoff)
    863   1.99   mycroft 	struct com_softc *sc;
    864   1.99   mycroft 	int onoff;
    865   1.99   mycroft {
    866   1.99   mycroft 	int s;
    867   1.99   mycroft 
    868   1.99   mycroft 	s = splserial();
    869   1.99   mycroft 	if (onoff)
    870   1.99   mycroft 		SET(sc->sc_lcr, LCR_SBREAK);
    871   1.99   mycroft 	else
    872   1.99   mycroft 		CLR(sc->sc_lcr, LCR_SBREAK);
    873   1.22       cgd 
    874   1.99   mycroft 	if (!sc->sc_heldchange) {
    875   1.99   mycroft 		if (sc->sc_tx_busy) {
    876   1.99   mycroft 			sc->sc_heldtbc = sc->sc_tbc;
    877   1.99   mycroft 			sc->sc_tbc = 0;
    878   1.99   mycroft 			sc->sc_heldchange = 1;
    879   1.99   mycroft 		} else
    880   1.99   mycroft 			com_loadchannelregs(sc);
    881   1.22       cgd 	}
    882   1.99   mycroft 	splx(s);
    883   1.99   mycroft }
    884   1.22       cgd 
    885   1.99   mycroft void
    886   1.99   mycroft com_modem(sc, onoff)
    887   1.99   mycroft 	struct com_softc *sc;
    888   1.99   mycroft 	int onoff;
    889   1.99   mycroft {
    890   1.99   mycroft 	int s;
    891   1.22       cgd 
    892   1.99   mycroft 	s = splserial();
    893   1.99   mycroft 	if (onoff)
    894   1.99   mycroft 		SET(sc->sc_mcr, sc->sc_mcr_dtr);
    895   1.99   mycroft 	else
    896   1.99   mycroft 		CLR(sc->sc_mcr, sc->sc_mcr_dtr);
    897   1.22       cgd 
    898   1.99   mycroft 	if (!sc->sc_heldchange) {
    899   1.99   mycroft 		if (sc->sc_tx_busy) {
    900   1.99   mycroft 			sc->sc_heldtbc = sc->sc_tbc;
    901   1.99   mycroft 			sc->sc_tbc = 0;
    902   1.99   mycroft 			sc->sc_heldchange = 1;
    903   1.99   mycroft 		} else
    904   1.99   mycroft 			com_loadchannelregs(sc);
    905   1.22       cgd 	}
    906   1.99   mycroft 	splx(s);
    907    1.1       cgd }
    908    1.1       cgd 
    909  1.106  drochner static u_char
    910  1.106  drochner cflag2lcr(cflag)
    911  1.110     enami 	tcflag_t cflag;
    912  1.106  drochner {
    913  1.106  drochner 	u_char lcr = 0;
    914  1.106  drochner 
    915  1.106  drochner 	switch (ISSET(cflag, CSIZE)) {
    916  1.106  drochner 	    case CS5:
    917  1.106  drochner 		SET(lcr, LCR_5BITS);
    918  1.106  drochner 		break;
    919  1.106  drochner 	    case CS6:
    920  1.106  drochner 		SET(lcr, LCR_6BITS);
    921  1.106  drochner 		break;
    922  1.106  drochner 	    case CS7:
    923  1.106  drochner 		SET(lcr, LCR_7BITS);
    924  1.106  drochner 		break;
    925  1.106  drochner 	    case CS8:
    926  1.106  drochner 		SET(lcr, LCR_8BITS);
    927  1.106  drochner 		break;
    928  1.106  drochner 	}
    929  1.106  drochner 	if (ISSET(cflag, PARENB)) {
    930  1.106  drochner 		SET(lcr, LCR_PENAB);
    931  1.106  drochner 		if (!ISSET(cflag, PARODD))
    932  1.106  drochner 			SET(lcr, LCR_PEVEN);
    933  1.106  drochner 	}
    934  1.106  drochner 	if (ISSET(cflag, CSTOPB))
    935  1.106  drochner 		SET(lcr, LCR_STOPB);
    936  1.106  drochner 
    937  1.110     enami 	return (lcr);
    938  1.106  drochner }
    939  1.106  drochner 
    940   1.21   mycroft int
    941    1.1       cgd comparam(tp, t)
    942   1.21   mycroft 	struct tty *tp;
    943   1.21   mycroft 	struct termios *t;
    944    1.1       cgd {
    945   1.76   thorpej 	struct com_softc *sc = com_cd.cd_devs[COMUNIT(tp->t_dev)];
    946  1.109        is 	int ospeed = comspeed(t->c_ospeed, sc->sc_frequency);
    947   1.62   mycroft 	u_char lcr;
    948   1.21   mycroft 	int s;
    949   1.21   mycroft 
    950    1.1       cgd 	/* check requested parameters */
    951   1.99   mycroft 	if (ospeed < 0)
    952   1.99   mycroft 		return (EINVAL);
    953   1.99   mycroft 	if (t->c_ispeed && t->c_ispeed != t->c_ospeed)
    954   1.99   mycroft 		return (EINVAL);
    955   1.21   mycroft 
    956  1.106  drochner 	lcr = ISSET(sc->sc_lcr, LCR_SBREAK) | cflag2lcr(t->c_cflag);
    957   1.62   mycroft 
    958   1.99   mycroft 	s = splserial();
    959   1.99   mycroft 
    960   1.62   mycroft 	sc->sc_lcr = lcr;
    961    1.1       cgd 
    962   1.99   mycroft 	/*
    963   1.99   mycroft 	 * For the console, always force CLOCAL and !HUPCL, so that the port
    964   1.99   mycroft 	 * is always active.
    965   1.99   mycroft 	 */
    966   1.99   mycroft 	if (ISSET(sc->sc_swflags, TIOCFLAG_SOFTCAR) ||
    967   1.99   mycroft 	    ISSET(sc->sc_hwflags, COM_HW_CONSOLE)) {
    968   1.99   mycroft 		SET(t->c_cflag, CLOCAL);
    969   1.99   mycroft 		CLR(t->c_cflag, HUPCL);
    970   1.62   mycroft 	}
    971   1.36   mycroft 
    972   1.36   mycroft 	/*
    973   1.99   mycroft 	 * If we're not in a mode that assumes a connection is present, then
    974   1.99   mycroft 	 * ignore carrier changes.
    975   1.36   mycroft 	 */
    976   1.99   mycroft 	if (ISSET(t->c_cflag, CLOCAL | MDMBUF))
    977   1.99   mycroft 		sc->sc_msr_dcd = 0;
    978   1.99   mycroft 	else
    979   1.99   mycroft 		sc->sc_msr_dcd = MSR_DCD;
    980   1.99   mycroft 	/*
    981   1.99   mycroft 	 * Set the flow control pins depending on the current flow control
    982   1.99   mycroft 	 * mode.
    983   1.99   mycroft 	 */
    984   1.99   mycroft 	if (ISSET(t->c_cflag, CRTSCTS)) {
    985   1.99   mycroft 		sc->sc_mcr_dtr = MCR_DTR;
    986   1.99   mycroft 		sc->sc_mcr_rts = MCR_RTS;
    987   1.99   mycroft 		sc->sc_msr_cts = MSR_CTS;
    988   1.99   mycroft 		sc->sc_r_hiwat = RXHIWAT;
    989  1.101   mycroft 		sc->sc_r_lowat = RXLOWAT;
    990  1.116      fvdl 		sc->sc_efr = EFR_AUTORTS | EFR_AUTOCTS;
    991   1.99   mycroft 	} else if (ISSET(t->c_cflag, MDMBUF)) {
    992   1.99   mycroft 		/*
    993   1.99   mycroft 		 * For DTR/DCD flow control, make sure we don't toggle DTR for
    994   1.99   mycroft 		 * carrier detection.
    995   1.99   mycroft 		 */
    996   1.99   mycroft 		sc->sc_mcr_dtr = 0;
    997   1.99   mycroft 		sc->sc_mcr_rts = MCR_DTR;
    998   1.99   mycroft 		sc->sc_msr_cts = MSR_DCD;
    999   1.99   mycroft 		sc->sc_r_hiwat = RXHIWAT;
   1000  1.101   mycroft 		sc->sc_r_lowat = RXLOWAT;
   1001  1.116      fvdl 		sc->sc_efr = 0;
   1002   1.99   mycroft 	} else {
   1003   1.99   mycroft 		/*
   1004   1.99   mycroft 		 * If no flow control, then always set RTS.  This will make
   1005   1.99   mycroft 		 * the other side happy if it mistakenly thinks we're doing
   1006   1.99   mycroft 		 * RTS/CTS flow control.
   1007   1.99   mycroft 		 */
   1008   1.99   mycroft 		sc->sc_mcr_dtr = MCR_DTR | MCR_RTS;
   1009   1.99   mycroft 		sc->sc_mcr_rts = 0;
   1010   1.99   mycroft 		sc->sc_msr_cts = 0;
   1011   1.99   mycroft 		sc->sc_r_hiwat = 0;
   1012  1.101   mycroft 		sc->sc_r_lowat = 0;
   1013  1.116      fvdl 		sc->sc_efr = 0;
   1014   1.99   mycroft 		if (ISSET(sc->sc_mcr, MCR_DTR))
   1015   1.99   mycroft 			SET(sc->sc_mcr, MCR_RTS);
   1016   1.99   mycroft 		else
   1017   1.99   mycroft 			CLR(sc->sc_mcr, MCR_RTS);
   1018   1.99   mycroft 	}
   1019   1.99   mycroft 	sc->sc_msr_mask = sc->sc_msr_cts | sc->sc_msr_dcd;
   1020   1.99   mycroft 
   1021   1.95   mycroft #if 0
   1022   1.99   mycroft 	if (ospeed == 0)
   1023   1.99   mycroft 		CLR(sc->sc_mcr, sc->sc_mcr_dtr);
   1024   1.99   mycroft 	else
   1025   1.99   mycroft 		SET(sc->sc_mcr, sc->sc_mcr_dtr);
   1026   1.66   mycroft #endif
   1027   1.66   mycroft 
   1028   1.99   mycroft 	sc->sc_dlbl = ospeed;
   1029   1.99   mycroft 	sc->sc_dlbh = ospeed >> 8;
   1030   1.66   mycroft 
   1031   1.99   mycroft 	/*
   1032   1.99   mycroft 	 * Set the FIFO threshold based on the receive speed.
   1033   1.99   mycroft 	 *
   1034   1.99   mycroft 	 *  * If it's a low speed, it's probably a mouse or some other
   1035   1.99   mycroft 	 *    interactive device, so set the threshold low.
   1036   1.99   mycroft 	 *  * If it's a high speed, trim the trigger level down to prevent
   1037   1.99   mycroft 	 *    overflows.
   1038   1.99   mycroft 	 *  * Otherwise set it a bit higher.
   1039   1.99   mycroft 	 */
   1040   1.99   mycroft 	if (ISSET(sc->sc_hwflags, COM_HW_HAYESP))
   1041   1.99   mycroft 		sc->sc_fifo = FIFO_DMA_MODE | FIFO_ENABLE | FIFO_TRIGGER_8;
   1042   1.99   mycroft 	else if (ISSET(sc->sc_hwflags, COM_HW_FIFO))
   1043   1.99   mycroft 		sc->sc_fifo = FIFO_ENABLE |
   1044   1.99   mycroft 		    (t->c_ospeed <= 1200 ? FIFO_TRIGGER_1 :
   1045   1.99   mycroft 		     t->c_ospeed <= 38400 ? FIFO_TRIGGER_8 : FIFO_TRIGGER_4);
   1046   1.99   mycroft 	else
   1047   1.99   mycroft 		sc->sc_fifo = 0;
   1048   1.21   mycroft 
   1049   1.57   mycroft 	/* and copy to tty */
   1050   1.99   mycroft 	tp->t_ispeed = 0;
   1051   1.57   mycroft 	tp->t_ospeed = t->c_ospeed;
   1052   1.57   mycroft 	tp->t_cflag = t->c_cflag;
   1053   1.25       cgd 
   1054   1.99   mycroft 	if (!sc->sc_heldchange) {
   1055   1.99   mycroft 		if (sc->sc_tx_busy) {
   1056   1.99   mycroft 			sc->sc_heldtbc = sc->sc_tbc;
   1057   1.99   mycroft 			sc->sc_tbc = 0;
   1058   1.99   mycroft 			sc->sc_heldchange = 1;
   1059   1.99   mycroft 		} else
   1060   1.99   mycroft 			com_loadchannelregs(sc);
   1061   1.99   mycroft 	}
   1062   1.99   mycroft 
   1063   1.99   mycroft 	splx(s);
   1064   1.99   mycroft 
   1065   1.25       cgd 	/*
   1066   1.99   mycroft 	 * Update the tty layer's idea of the carrier bit, in case we changed
   1067   1.99   mycroft 	 * CLOCAL or MDMBUF.  We don't hang up here; we only do that if we
   1068   1.99   mycroft 	 * lose carrier while carrier detection is on.
   1069   1.25       cgd 	 */
   1070   1.99   mycroft 	(void) (*linesw[tp->t_line].l_modem)(tp, ISSET(sc->sc_msr, MSR_DCD));
   1071   1.99   mycroft 
   1072   1.99   mycroft #ifdef COM_DEBUG
   1073  1.101   mycroft 	if (com_debug)
   1074  1.101   mycroft 		comstatus(sc, "comparam ");
   1075   1.99   mycroft #endif
   1076   1.99   mycroft 
   1077   1.99   mycroft 	/* Block or unblock as needed. */
   1078   1.99   mycroft 	if (!ISSET(t->c_cflag, CHWFLOW)) {
   1079  1.101   mycroft 		if (ISSET(sc->sc_rx_flags, RX_TTY_OVERFLOWED)) {
   1080  1.101   mycroft 			CLR(sc->sc_rx_flags, RX_TTY_OVERFLOWED);
   1081  1.101   mycroft 			com_schedrx(sc);
   1082  1.101   mycroft 		}
   1083  1.101   mycroft 		if (ISSET(sc->sc_rx_flags, RX_TTY_BLOCKED|RX_IBUF_BLOCKED)) {
   1084  1.101   mycroft 			CLR(sc->sc_rx_flags, RX_TTY_BLOCKED|RX_IBUF_BLOCKED);
   1085  1.101   mycroft 			com_hwiflow(sc);
   1086   1.99   mycroft 		}
   1087   1.99   mycroft 		if (sc->sc_tx_stopped) {
   1088   1.99   mycroft 			sc->sc_tx_stopped = 0;
   1089   1.99   mycroft 			comstart(tp);
   1090   1.99   mycroft 		}
   1091   1.99   mycroft 	} else {
   1092  1.101   mycroft 		/* XXXXX FIX ME */
   1093   1.99   mycroft #if 0
   1094   1.99   mycroft 		commsrint(sc, tp);
   1095   1.99   mycroft #endif
   1096   1.21   mycroft 	}
   1097    1.1       cgd 
   1098   1.99   mycroft 	return (0);
   1099   1.99   mycroft }
   1100   1.99   mycroft 
   1101   1.99   mycroft void
   1102   1.99   mycroft com_iflush(sc)
   1103   1.99   mycroft 	struct com_softc *sc;
   1104   1.99   mycroft {
   1105   1.99   mycroft 	bus_space_tag_t iot = sc->sc_iot;
   1106   1.99   mycroft 	bus_space_handle_t ioh = sc->sc_ioh;
   1107   1.99   mycroft 
   1108   1.99   mycroft 	/* flush any pending I/O */
   1109   1.99   mycroft 	while (ISSET(bus_space_read_1(iot, ioh, com_lsr), LSR_RXRDY))
   1110   1.99   mycroft 		(void) bus_space_read_1(iot, ioh, com_data);
   1111   1.99   mycroft }
   1112   1.99   mycroft 
   1113   1.99   mycroft void
   1114   1.99   mycroft com_loadchannelregs(sc)
   1115   1.99   mycroft 	struct com_softc *sc;
   1116   1.99   mycroft {
   1117   1.99   mycroft 	bus_space_tag_t iot = sc->sc_iot;
   1118   1.99   mycroft 	bus_space_handle_t ioh = sc->sc_ioh;
   1119   1.99   mycroft 
   1120   1.99   mycroft 	/* XXXXX necessary? */
   1121   1.99   mycroft 	com_iflush(sc);
   1122   1.99   mycroft 
   1123   1.99   mycroft 	bus_space_write_1(iot, ioh, com_ier, 0);
   1124   1.99   mycroft 
   1125  1.116      fvdl 	if (ISSET(sc->sc_hwflags, COM_HW_FLOW)) {
   1126  1.116      fvdl 		bus_space_write_1(iot, ioh, com_lcr, LCR_EERS);
   1127  1.116      fvdl 		bus_space_write_1(iot, ioh, com_efr, sc->sc_efr);
   1128  1.116      fvdl 	}
   1129   1.99   mycroft 	bus_space_write_1(iot, ioh, com_lcr, sc->sc_lcr | LCR_DLAB);
   1130   1.99   mycroft 	bus_space_write_1(iot, ioh, com_dlbl, sc->sc_dlbl);
   1131   1.99   mycroft 	bus_space_write_1(iot, ioh, com_dlbh, sc->sc_dlbh);
   1132   1.99   mycroft 	bus_space_write_1(iot, ioh, com_lcr, sc->sc_lcr);
   1133   1.99   mycroft 	bus_space_write_1(iot, ioh, com_mcr, sc->sc_mcr_active = sc->sc_mcr);
   1134   1.99   mycroft 	bus_space_write_1(iot, ioh, com_fifo, sc->sc_fifo);
   1135   1.99   mycroft 
   1136   1.99   mycroft 	bus_space_write_1(iot, ioh, com_ier, sc->sc_ier);
   1137   1.99   mycroft }
   1138   1.99   mycroft 
   1139   1.99   mycroft int
   1140   1.99   mycroft comhwiflow(tp, block)
   1141   1.99   mycroft 	struct tty *tp;
   1142   1.99   mycroft 	int block;
   1143   1.99   mycroft {
   1144   1.99   mycroft 	struct com_softc *sc = com_cd.cd_devs[COMUNIT(tp->t_dev)];
   1145   1.99   mycroft 	int s;
   1146   1.99   mycroft 
   1147   1.99   mycroft 	if (sc->sc_mcr_rts == 0)
   1148   1.99   mycroft 		return (0);
   1149   1.99   mycroft 
   1150   1.99   mycroft 	s = splserial();
   1151   1.99   mycroft 	if (block) {
   1152  1.101   mycroft 		if (!ISSET(sc->sc_rx_flags, RX_TTY_BLOCKED)) {
   1153  1.101   mycroft 			SET(sc->sc_rx_flags, RX_TTY_BLOCKED);
   1154  1.101   mycroft 			com_hwiflow(sc);
   1155  1.101   mycroft 		}
   1156   1.99   mycroft 	} else {
   1157  1.101   mycroft 		if (ISSET(sc->sc_rx_flags, RX_TTY_OVERFLOWED)) {
   1158  1.101   mycroft 			CLR(sc->sc_rx_flags, RX_TTY_OVERFLOWED);
   1159  1.101   mycroft 			com_schedrx(sc);
   1160  1.101   mycroft 		}
   1161  1.101   mycroft 		if (ISSET(sc->sc_rx_flags, RX_TTY_BLOCKED)) {
   1162  1.101   mycroft 			CLR(sc->sc_rx_flags, RX_TTY_BLOCKED);
   1163  1.101   mycroft 			com_hwiflow(sc);
   1164  1.101   mycroft 		}
   1165   1.99   mycroft 	}
   1166   1.21   mycroft 	splx(s);
   1167   1.99   mycroft 	return (1);
   1168   1.99   mycroft }
   1169   1.99   mycroft 
   1170   1.99   mycroft /*
   1171   1.99   mycroft  * (un)block input via hw flowcontrol
   1172   1.99   mycroft  */
   1173   1.99   mycroft void
   1174  1.101   mycroft com_hwiflow(sc)
   1175   1.99   mycroft 	struct com_softc *sc;
   1176   1.99   mycroft {
   1177   1.99   mycroft 	bus_space_tag_t iot = sc->sc_iot;
   1178   1.99   mycroft 	bus_space_handle_t ioh = sc->sc_ioh;
   1179   1.99   mycroft 
   1180   1.99   mycroft 	if (sc->sc_mcr_rts == 0)
   1181   1.99   mycroft 		return;
   1182   1.99   mycroft 
   1183  1.101   mycroft 	if (ISSET(sc->sc_rx_flags, RX_ANY_BLOCK)) {
   1184   1.99   mycroft 		CLR(sc->sc_mcr, sc->sc_mcr_rts);
   1185   1.99   mycroft 		CLR(sc->sc_mcr_active, sc->sc_mcr_rts);
   1186   1.99   mycroft 	} else {
   1187   1.99   mycroft 		SET(sc->sc_mcr, sc->sc_mcr_rts);
   1188   1.99   mycroft 		SET(sc->sc_mcr_active, sc->sc_mcr_rts);
   1189   1.99   mycroft 	}
   1190   1.99   mycroft 	bus_space_write_1(iot, ioh, com_mcr, sc->sc_mcr_active);
   1191    1.1       cgd }
   1192   1.21   mycroft 
   1193   1.99   mycroft 
   1194   1.12   deraadt void
   1195    1.1       cgd comstart(tp)
   1196   1.21   mycroft 	struct tty *tp;
   1197    1.1       cgd {
   1198   1.76   thorpej 	struct com_softc *sc = com_cd.cd_devs[COMUNIT(tp->t_dev)];
   1199   1.91   thorpej 	bus_space_tag_t iot = sc->sc_iot;
   1200   1.91   thorpej 	bus_space_handle_t ioh = sc->sc_ioh;
   1201   1.21   mycroft 	int s;
   1202   1.21   mycroft 
   1203    1.1       cgd 	s = spltty();
   1204   1.69   mycroft 	if (ISSET(tp->t_state, TS_BUSY))
   1205   1.70   mycroft 		goto out;
   1206   1.99   mycroft 	if (ISSET(tp->t_state, TS_TIMEOUT | TS_TTSTOP))
   1207   1.69   mycroft 		goto stopped;
   1208   1.99   mycroft 
   1209   1.99   mycroft 	if (sc->sc_tx_stopped)
   1210   1.69   mycroft 		goto stopped;
   1211   1.99   mycroft 
   1212   1.61   mycroft 	if (tp->t_outq.c_cc <= tp->t_lowat) {
   1213   1.62   mycroft 		if (ISSET(tp->t_state, TS_ASLEEP)) {
   1214   1.62   mycroft 			CLR(tp->t_state, TS_ASLEEP);
   1215   1.62   mycroft 			wakeup(&tp->t_outq);
   1216   1.61   mycroft 		}
   1217   1.99   mycroft 		selwakeup(&tp->t_wsel);
   1218   1.61   mycroft 		if (tp->t_outq.c_cc == 0)
   1219   1.69   mycroft 			goto stopped;
   1220   1.61   mycroft 	}
   1221   1.99   mycroft 
   1222   1.99   mycroft 	/* Grab the first contiguous region of buffer space. */
   1223   1.99   mycroft 	{
   1224   1.99   mycroft 		u_char *tba;
   1225   1.99   mycroft 		int tbc;
   1226   1.99   mycroft 
   1227   1.99   mycroft 		tba = tp->t_outq.c_cf;
   1228   1.99   mycroft 		tbc = ndqb(&tp->t_outq, 0);
   1229   1.99   mycroft 
   1230   1.99   mycroft 		(void)splserial();
   1231   1.99   mycroft 
   1232   1.99   mycroft 		sc->sc_tba = tba;
   1233   1.99   mycroft 		sc->sc_tbc = tbc;
   1234   1.99   mycroft 	}
   1235   1.99   mycroft 
   1236   1.62   mycroft 	SET(tp->t_state, TS_BUSY);
   1237   1.99   mycroft 	sc->sc_tx_busy = 1;
   1238   1.64  christos 
   1239   1.99   mycroft 	/* Enable transmit completion interrupts if necessary. */
   1240   1.70   mycroft 	if (!ISSET(sc->sc_ier, IER_ETXRDY)) {
   1241   1.70   mycroft 		SET(sc->sc_ier, IER_ETXRDY);
   1242   1.91   thorpej 		bus_space_write_1(iot, ioh, com_ier, sc->sc_ier);
   1243   1.70   mycroft 	}
   1244   1.99   mycroft 
   1245   1.99   mycroft 	/* Output the first chunk of the contiguous buffer. */
   1246   1.99   mycroft 	{
   1247   1.99   mycroft 		int n;
   1248   1.99   mycroft 
   1249   1.99   mycroft 		n = sc->sc_fifolen;
   1250   1.99   mycroft 		if (n > sc->sc_tbc)
   1251   1.99   mycroft 			n = sc->sc_tbc;
   1252   1.99   mycroft 		bus_space_write_multi_1(iot, ioh, com_data, sc->sc_tba, n);
   1253   1.99   mycroft 		sc->sc_tbc -= n;
   1254   1.99   mycroft 		sc->sc_tba += n;
   1255   1.64  christos 	}
   1256   1.69   mycroft 	splx(s);
   1257   1.69   mycroft 	return;
   1258   1.99   mycroft 
   1259   1.69   mycroft stopped:
   1260   1.99   mycroft 	/* Disable transmit completion interrupts if necessary. */
   1261   1.69   mycroft 	if (ISSET(sc->sc_ier, IER_ETXRDY)) {
   1262   1.69   mycroft 		CLR(sc->sc_ier, IER_ETXRDY);
   1263   1.91   thorpej 		bus_space_write_1(iot, ioh, com_ier, sc->sc_ier);
   1264   1.69   mycroft 	}
   1265   1.99   mycroft out:
   1266    1.1       cgd 	splx(s);
   1267   1.99   mycroft 	return;
   1268    1.1       cgd }
   1269   1.21   mycroft 
   1270    1.1       cgd /*
   1271    1.1       cgd  * Stop output on a line.
   1272    1.1       cgd  */
   1273   1.85   mycroft void
   1274    1.1       cgd comstop(tp, flag)
   1275   1.21   mycroft 	struct tty *tp;
   1276   1.80  christos 	int flag;
   1277    1.1       cgd {
   1278   1.99   mycroft 	struct com_softc *sc = com_cd.cd_devs[COMUNIT(tp->t_dev)];
   1279   1.21   mycroft 	int s;
   1280    1.1       cgd 
   1281   1.99   mycroft 	s = splserial();
   1282   1.99   mycroft 	if (ISSET(tp->t_state, TS_BUSY)) {
   1283   1.99   mycroft 		/* Stop transmitting at the next chunk. */
   1284   1.99   mycroft 		sc->sc_tbc = 0;
   1285   1.99   mycroft 		sc->sc_heldtbc = 0;
   1286   1.62   mycroft 		if (!ISSET(tp->t_state, TS_TTSTOP))
   1287   1.62   mycroft 			SET(tp->t_state, TS_FLUSH);
   1288   1.99   mycroft 	}
   1289    1.1       cgd 	splx(s);
   1290    1.1       cgd }
   1291    1.1       cgd 
   1292   1.33   mycroft void
   1293   1.33   mycroft comdiag(arg)
   1294   1.33   mycroft 	void *arg;
   1295   1.33   mycroft {
   1296   1.33   mycroft 	struct com_softc *sc = arg;
   1297   1.99   mycroft 	int overflows, floods;
   1298   1.33   mycroft 	int s;
   1299   1.33   mycroft 
   1300   1.99   mycroft 	s = splserial();
   1301   1.33   mycroft 	overflows = sc->sc_overflows;
   1302   1.33   mycroft 	sc->sc_overflows = 0;
   1303   1.57   mycroft 	floods = sc->sc_floods;
   1304   1.57   mycroft 	sc->sc_floods = 0;
   1305   1.99   mycroft 	sc->sc_errors = 0;
   1306   1.57   mycroft 	splx(s);
   1307   1.57   mycroft 
   1308   1.99   mycroft 	log(LOG_WARNING,
   1309   1.99   mycroft 	    "%s: %d silo overflow%s, %d ibuf flood%s\n",
   1310   1.57   mycroft 	    sc->sc_dev.dv_xname,
   1311   1.57   mycroft 	    overflows, overflows == 1 ? "" : "s",
   1312   1.99   mycroft 	    floods, floods == 1 ? "" : "s");
   1313   1.57   mycroft }
   1314   1.57   mycroft 
   1315   1.99   mycroft integrate void
   1316   1.99   mycroft comrxint(sc, tp)
   1317   1.99   mycroft 	struct com_softc	*sc;
   1318   1.99   mycroft 	struct tty	*tp;
   1319   1.99   mycroft {
   1320   1.99   mycroft 	u_int	get, cc, scc;
   1321   1.99   mycroft 	int	code;
   1322   1.99   mycroft 	u_char	lsr;
   1323   1.99   mycroft 	int	s;
   1324   1.57   mycroft 	static int lsrmap[8] = {
   1325   1.57   mycroft 		0,      TTY_PE,
   1326   1.57   mycroft 		TTY_FE, TTY_PE|TTY_FE,
   1327   1.57   mycroft 		TTY_FE, TTY_PE|TTY_FE,
   1328   1.57   mycroft 		TTY_FE, TTY_PE|TTY_FE
   1329   1.57   mycroft 	};
   1330   1.57   mycroft 
   1331   1.99   mycroft 	get = sc->sc_rbget;
   1332   1.99   mycroft 	scc = cc = RXBUFSIZE - sc->sc_rbavail;
   1333   1.99   mycroft 
   1334   1.99   mycroft 	if (cc == RXBUFSIZE) {
   1335   1.99   mycroft 		sc->sc_floods++;
   1336   1.99   mycroft 		if (sc->sc_errors++ == 0)
   1337   1.99   mycroft 			timeout(comdiag, sc, 60 * hz);
   1338   1.99   mycroft 	}
   1339   1.99   mycroft 
   1340  1.101   mycroft 	while (cc) {
   1341   1.99   mycroft 		lsr = sc->sc_lbuf[get];
   1342  1.103  drochner 		if (ISSET(lsr, LSR_OE)) {
   1343   1.99   mycroft 			sc->sc_overflows++;
   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 		code = sc->sc_rbuf[get] |
   1348   1.99   mycroft 		    lsrmap[(lsr & (LSR_BI|LSR_FE|LSR_PE)) >> 2];
   1349  1.101   mycroft 		if ((*linesw[tp->t_line].l_rint)(code, tp) == -1) {
   1350  1.101   mycroft 			/*
   1351  1.101   mycroft 			 * The line discipline's buffer is out of space.
   1352  1.101   mycroft 			 */
   1353  1.101   mycroft 			if (!ISSET(sc->sc_rx_flags, RX_TTY_BLOCKED)) {
   1354  1.101   mycroft 				/*
   1355  1.101   mycroft 				 * We're either not using flow control, or the
   1356  1.101   mycroft 				 * line discipline didn't tell us to block for
   1357  1.101   mycroft 				 * some reason.  Either way, we have no way to
   1358  1.101   mycroft 				 * know when there's more space available, so
   1359  1.101   mycroft 				 * just drop the rest of the data.
   1360  1.101   mycroft 				 */
   1361  1.101   mycroft 				get = (get + cc) & RXBUFMASK;
   1362  1.101   mycroft 				cc = 0;
   1363  1.101   mycroft 			} else {
   1364  1.101   mycroft 				/*
   1365  1.101   mycroft 				 * Don't schedule any more receive processing
   1366  1.101   mycroft 				 * until the line discipline tells us there's
   1367  1.101   mycroft 				 * space available (through comhwiflow()).
   1368  1.101   mycroft 				 * Leave the rest of the data in the input
   1369  1.101   mycroft 				 * buffer.
   1370  1.101   mycroft 				 */
   1371  1.101   mycroft 				SET(sc->sc_rx_flags, RX_TTY_OVERFLOWED);
   1372  1.101   mycroft 			}
   1373  1.101   mycroft 			break;
   1374  1.101   mycroft 		}
   1375   1.99   mycroft 		get = (get + 1) & RXBUFMASK;
   1376  1.101   mycroft 		cc--;
   1377   1.99   mycroft 	}
   1378   1.99   mycroft 
   1379  1.101   mycroft 	if (cc != scc) {
   1380  1.101   mycroft 		sc->sc_rbget = get;
   1381  1.101   mycroft 		s = splserial();
   1382  1.101   mycroft 		cc = sc->sc_rbavail += scc - cc;
   1383  1.101   mycroft 		/* Buffers should be ok again, release possible block. */
   1384  1.101   mycroft 		if (cc >= sc->sc_r_lowat) {
   1385  1.101   mycroft 			if (ISSET(sc->sc_rx_flags, RX_IBUF_OVERFLOWED)) {
   1386  1.101   mycroft 				CLR(sc->sc_rx_flags, RX_IBUF_OVERFLOWED);
   1387  1.101   mycroft 				SET(sc->sc_ier, IER_ERXRDY);
   1388  1.101   mycroft 				bus_space_write_1(sc->sc_iot, sc->sc_ioh, com_ier, sc->sc_ier);
   1389  1.101   mycroft 			}
   1390  1.101   mycroft 			if (ISSET(sc->sc_rx_flags, RX_IBUF_BLOCKED)) {
   1391  1.101   mycroft 				CLR(sc->sc_rx_flags, RX_IBUF_BLOCKED);
   1392  1.101   mycroft 				com_hwiflow(sc);
   1393  1.101   mycroft 			}
   1394  1.101   mycroft 		}
   1395  1.101   mycroft 		splx(s);
   1396   1.57   mycroft 	}
   1397   1.99   mycroft }
   1398   1.99   mycroft 
   1399   1.99   mycroft integrate void
   1400   1.99   mycroft comtxint(sc, tp)
   1401   1.99   mycroft 	struct com_softc	*sc;
   1402   1.99   mycroft 	struct tty	*tp;
   1403   1.99   mycroft {
   1404   1.33   mycroft 
   1405   1.99   mycroft 	CLR(tp->t_state, TS_BUSY);
   1406   1.99   mycroft 	if (ISSET(tp->t_state, TS_FLUSH))
   1407   1.99   mycroft 		CLR(tp->t_state, TS_FLUSH);
   1408   1.99   mycroft 	else
   1409   1.99   mycroft 		ndflush(&tp->t_outq, (int)(sc->sc_tba - tp->t_outq.c_cf));
   1410   1.99   mycroft 	(*linesw[tp->t_line].l_start)(tp);
   1411   1.99   mycroft }
   1412   1.57   mycroft 
   1413   1.99   mycroft integrate void
   1414   1.99   mycroft commsrint(sc, tp)
   1415   1.99   mycroft 	struct com_softc	*sc;
   1416   1.99   mycroft 	struct tty	*tp;
   1417   1.99   mycroft {
   1418   1.99   mycroft 	u_char msr, delta;
   1419   1.99   mycroft 	int s;
   1420   1.57   mycroft 
   1421   1.99   mycroft 	s = splserial();
   1422   1.99   mycroft 	msr = sc->sc_msr;
   1423   1.99   mycroft 	delta = sc->sc_msr_delta;
   1424   1.99   mycroft 	sc->sc_msr_delta = 0;
   1425   1.99   mycroft 	splx(s);
   1426   1.57   mycroft 
   1427   1.99   mycroft 	if (ISSET(delta, sc->sc_msr_dcd)) {
   1428   1.99   mycroft 		/*
   1429   1.99   mycroft 		 * Inform the tty layer that carrier detect changed.
   1430   1.99   mycroft 		 */
   1431   1.99   mycroft 		(void) (*linesw[tp->t_line].l_modem)(tp, ISSET(msr, MSR_DCD));
   1432   1.99   mycroft 	}
   1433   1.61   mycroft 
   1434   1.99   mycroft 	if (ISSET(delta, sc->sc_msr_cts)) {
   1435   1.99   mycroft 		/* Block or unblock output according to flow control. */
   1436   1.99   mycroft 		if (ISSET(msr, sc->sc_msr_cts)) {
   1437   1.99   mycroft 			sc->sc_tx_stopped = 0;
   1438   1.99   mycroft 			(*linesw[tp->t_line].l_start)(tp);
   1439   1.99   mycroft 		} else {
   1440   1.99   mycroft 			sc->sc_tx_stopped = 1;
   1441   1.61   mycroft 		}
   1442   1.99   mycroft 	}
   1443   1.99   mycroft 
   1444   1.99   mycroft #ifdef COM_DEBUG
   1445  1.101   mycroft 	if (com_debug)
   1446  1.101   mycroft 		comstatus(sc, "commsrint");
   1447   1.99   mycroft #endif
   1448   1.99   mycroft }
   1449   1.99   mycroft 
   1450   1.99   mycroft #ifdef __GENERIC_SOFT_INTERRUPTS
   1451   1.99   mycroft void
   1452   1.99   mycroft comsoft(arg)
   1453   1.99   mycroft 	void *arg;
   1454   1.99   mycroft {
   1455   1.99   mycroft 	struct com_softc *sc = arg;
   1456   1.99   mycroft 	struct tty *tp;
   1457   1.99   mycroft 
   1458   1.99   mycroft 	{
   1459   1.99   mycroft #else
   1460   1.99   mycroft void
   1461   1.99   mycroft #ifndef alpha
   1462   1.99   mycroft comsoft()
   1463   1.99   mycroft #else
   1464   1.99   mycroft comsoft(arg)
   1465   1.99   mycroft 	void *arg;
   1466   1.99   mycroft #endif
   1467   1.99   mycroft {
   1468   1.99   mycroft 	struct com_softc	*sc;
   1469   1.99   mycroft 	struct tty	*tp;
   1470   1.99   mycroft 	int	unit;
   1471   1.99   mycroft #ifdef alpha
   1472   1.99   mycroft 	int s;
   1473   1.99   mycroft 
   1474   1.99   mycroft 	s = splsoftserial();
   1475   1.99   mycroft 	com_softintr_scheduled = 0;
   1476   1.99   mycroft #endif
   1477   1.57   mycroft 
   1478   1.99   mycroft 	for (unit = 0; unit < com_cd.cd_ndevs; unit++) {
   1479   1.99   mycroft 		sc = com_cd.cd_devs[unit];
   1480   1.99   mycroft 		if (sc == NULL)
   1481   1.99   mycroft 			continue;
   1482   1.57   mycroft 
   1483   1.99   mycroft 		tp = sc->sc_tty;
   1484   1.99   mycroft 		if (tp == NULL || !ISSET(tp->t_state, TS_ISOPEN | TS_WOPEN))
   1485   1.57   mycroft 			continue;
   1486  1.108        is #endif
   1487  1.108        is 		tp = sc->sc_tty;
   1488   1.99   mycroft 
   1489   1.99   mycroft 		if (sc->sc_rx_ready) {
   1490   1.99   mycroft 			sc->sc_rx_ready = 0;
   1491   1.99   mycroft 			comrxint(sc, tp);
   1492   1.57   mycroft 		}
   1493   1.57   mycroft 
   1494   1.99   mycroft 		if (sc->sc_st_check) {
   1495   1.99   mycroft 			sc->sc_st_check = 0;
   1496   1.99   mycroft 			commsrint(sc, tp);
   1497   1.62   mycroft 		}
   1498   1.57   mycroft 
   1499   1.99   mycroft 		if (sc->sc_tx_done) {
   1500   1.99   mycroft 			sc->sc_tx_done = 0;
   1501   1.99   mycroft 			comtxint(sc, tp);
   1502   1.57   mycroft 		}
   1503   1.57   mycroft 	}
   1504   1.57   mycroft 
   1505   1.99   mycroft #ifndef __GENERIC_SOFT_INTERRUPTS
   1506   1.99   mycroft #ifdef alpha
   1507   1.99   mycroft 	splx(s);
   1508   1.99   mycroft #endif
   1509   1.99   mycroft #endif
   1510   1.21   mycroft }
   1511    1.1       cgd 
   1512   1.21   mycroft int
   1513   1.49       cgd comintr(arg)
   1514   1.99   mycroft 	void	*arg;
   1515   1.21   mycroft {
   1516   1.49       cgd 	struct com_softc *sc = arg;
   1517   1.91   thorpej 	bus_space_tag_t iot = sc->sc_iot;
   1518   1.91   thorpej 	bus_space_handle_t ioh = sc->sc_ioh;
   1519   1.99   mycroft 	u_char	lsr, iir;
   1520   1.99   mycroft 	u_int	put, cc;
   1521   1.55   mycroft 
   1522   1.91   thorpej 	iir = bus_space_read_1(iot, ioh, com_iir);
   1523   1.88   mycroft 	if (ISSET(iir, IIR_NOPEND))
   1524   1.55   mycroft 		return (0);
   1525   1.21   mycroft 
   1526   1.99   mycroft 	put = sc->sc_rbput;
   1527   1.99   mycroft 	cc = sc->sc_rbavail;
   1528   1.99   mycroft 
   1529   1.99   mycroft 	do {
   1530   1.99   mycroft 		u_char	msr, delta;
   1531   1.21   mycroft 
   1532   1.91   thorpej 		lsr = bus_space_read_1(iot, ioh, com_lsr);
   1533  1.103  drochner #if defined(DDB) || defined(KGDB)
   1534  1.103  drochner 		if (ISSET(lsr, LSR_BI)) {
   1535  1.103  drochner #ifdef DDB
   1536  1.103  drochner 			if (ISSET(sc->sc_hwflags, COM_HW_CONSOLE)) {
   1537  1.103  drochner 				Debugger();
   1538  1.103  drochner 				continue;
   1539  1.103  drochner 			}
   1540  1.103  drochner #endif
   1541  1.103  drochner #ifdef KGDB
   1542  1.103  drochner 			if (ISSET(sc->sc_hwflags, COM_HW_KGDB)) {
   1543  1.103  drochner 				kgdb_connect(1);
   1544  1.103  drochner 				continue;
   1545  1.103  drochner 			}
   1546  1.103  drochner #endif
   1547  1.102   thorpej 		}
   1548  1.103  drochner #endif /* DDB || KGDB */
   1549  1.102   thorpej 
   1550  1.101   mycroft 		if (ISSET(lsr, LSR_RCV_MASK) &&
   1551  1.101   mycroft 		    !ISSET(sc->sc_rx_flags, RX_IBUF_OVERFLOWED)) {
   1552   1.99   mycroft 			for (; ISSET(lsr, LSR_RCV_MASK) && cc > 0; cc--) {
   1553   1.99   mycroft 				sc->sc_rbuf[put] =
   1554   1.99   mycroft 				    bus_space_read_1(iot, ioh, com_data);
   1555   1.99   mycroft 				sc->sc_lbuf[put] = lsr;
   1556   1.99   mycroft 				put = (put + 1) & RXBUFMASK;
   1557   1.99   mycroft 				lsr = bus_space_read_1(iot, ioh, com_lsr);
   1558   1.99   mycroft 			}
   1559   1.99   mycroft 			/*
   1560   1.99   mycroft 			 * Current string of incoming characters ended because
   1561   1.99   mycroft 			 * no more data was available. Schedule a receive event
   1562   1.99   mycroft 			 * if any data was received. Drop any characters that
   1563   1.99   mycroft 			 * we couldn't handle.
   1564   1.99   mycroft 			 */
   1565   1.99   mycroft 			sc->sc_rbput = put;
   1566   1.99   mycroft 			sc->sc_rbavail = cc;
   1567  1.101   mycroft 			if (!ISSET(sc->sc_rx_flags, RX_TTY_OVERFLOWED))
   1568  1.101   mycroft 				sc->sc_rx_ready = 1;
   1569   1.99   mycroft 			/*
   1570   1.99   mycroft 			 * See if we are in danger of overflowing a buffer. If
   1571   1.99   mycroft 			 * so, use hardware flow control to ease the pressure.
   1572   1.99   mycroft 			 */
   1573  1.101   mycroft 			if (!ISSET(sc->sc_rx_flags, RX_IBUF_BLOCKED) &&
   1574   1.99   mycroft 			    cc < sc->sc_r_hiwat) {
   1575  1.101   mycroft 				SET(sc->sc_rx_flags, RX_IBUF_BLOCKED);
   1576  1.101   mycroft 				com_hwiflow(sc);
   1577   1.99   mycroft 			}
   1578   1.99   mycroft 			/*
   1579  1.101   mycroft 			 * If we're out of space, disable receive interrupts
   1580  1.101   mycroft 			 * until the queue has drained a bit.
   1581   1.99   mycroft 			 */
   1582   1.99   mycroft 			if (!cc) {
   1583  1.101   mycroft 				SET(sc->sc_rx_flags, RX_IBUF_OVERFLOWED);
   1584  1.101   mycroft 				CLR(sc->sc_ier, IER_ERXRDY);
   1585  1.101   mycroft 				bus_space_write_1(iot, ioh, com_ier, sc->sc_ier);
   1586   1.99   mycroft 			}
   1587   1.88   mycroft 		} else {
   1588   1.88   mycroft 			if ((iir & IIR_IMASK) == IIR_RXRDY) {
   1589   1.91   thorpej 				bus_space_write_1(iot, ioh, com_ier, 0);
   1590   1.88   mycroft 				delay(10);
   1591   1.99   mycroft 				bus_space_write_1(iot, ioh, com_ier,sc->sc_ier);
   1592   1.88   mycroft 				iir = IIR_NOPEND;
   1593   1.88   mycroft 				continue;
   1594   1.88   mycroft 			}
   1595   1.88   mycroft 		}
   1596   1.55   mycroft 
   1597   1.99   mycroft 		msr = bus_space_read_1(iot, ioh, com_msr);
   1598   1.99   mycroft 		delta = msr ^ sc->sc_msr;
   1599   1.99   mycroft 		sc->sc_msr = msr;
   1600   1.99   mycroft 		if (ISSET(delta, sc->sc_msr_mask)) {
   1601   1.99   mycroft 			sc->sc_msr_delta |= delta;
   1602   1.99   mycroft 
   1603   1.99   mycroft 			/*
   1604   1.99   mycroft 			 * Stop output immediately if we lose the output
   1605   1.99   mycroft 			 * flow control signal or carrier detect.
   1606   1.99   mycroft 			 */
   1607   1.99   mycroft 			if (ISSET(~msr, sc->sc_msr_mask)) {
   1608   1.99   mycroft 				sc->sc_tbc = 0;
   1609   1.99   mycroft 				sc->sc_heldtbc = 0;
   1610   1.69   mycroft #ifdef COM_DEBUG
   1611  1.101   mycroft 				if (com_debug)
   1612  1.101   mycroft 					comstatus(sc, "comintr  ");
   1613   1.69   mycroft #endif
   1614   1.99   mycroft 			}
   1615   1.55   mycroft 
   1616   1.99   mycroft 			sc->sc_st_check = 1;
   1617   1.55   mycroft 		}
   1618   1.99   mycroft 	} while (!ISSET((iir = bus_space_read_1(iot, ioh, com_iir)), IIR_NOPEND));
   1619   1.55   mycroft 
   1620   1.99   mycroft 	/*
   1621   1.99   mycroft 	 * Done handling any receive interrupts. See if data can be
   1622   1.99   mycroft 	 * transmitted as well. Schedule tx done event if no data left
   1623   1.99   mycroft 	 * and tty was marked busy.
   1624   1.99   mycroft 	 */
   1625   1.99   mycroft 	if (ISSET(lsr, LSR_TXRDY)) {
   1626   1.99   mycroft 		/*
   1627   1.99   mycroft 		 * If we've delayed a parameter change, do it now, and restart
   1628   1.99   mycroft 		 * output.
   1629   1.99   mycroft 		 */
   1630   1.99   mycroft 		if (sc->sc_heldchange) {
   1631   1.99   mycroft 			com_loadchannelregs(sc);
   1632   1.99   mycroft 			sc->sc_heldchange = 0;
   1633   1.99   mycroft 			sc->sc_tbc = sc->sc_heldtbc;
   1634   1.99   mycroft 			sc->sc_heldtbc = 0;
   1635   1.99   mycroft 		}
   1636   1.99   mycroft 		/* Output the next chunk of the contiguous buffer, if any. */
   1637   1.99   mycroft 		if (sc->sc_tbc > 0) {
   1638   1.99   mycroft 			int n;
   1639   1.99   mycroft 
   1640   1.99   mycroft 			n = sc->sc_fifolen;
   1641   1.99   mycroft 			if (n > sc->sc_tbc)
   1642   1.99   mycroft 				n = sc->sc_tbc;
   1643   1.99   mycroft 			bus_space_write_multi_1(iot, ioh, com_data, sc->sc_tba, n);
   1644   1.99   mycroft 			sc->sc_tbc -= n;
   1645   1.99   mycroft 			sc->sc_tba += n;
   1646   1.99   mycroft 		} else if (sc->sc_tx_busy) {
   1647   1.99   mycroft 			sc->sc_tx_busy = 0;
   1648   1.99   mycroft 			sc->sc_tx_done = 1;
   1649   1.62   mycroft 		}
   1650   1.99   mycroft 	}
   1651   1.62   mycroft 
   1652   1.99   mycroft 	/* Wake up the poller. */
   1653   1.99   mycroft #ifdef __GENERIC_SOFT_INTERRUPTS
   1654   1.99   mycroft 	softintr_schedule(sc->sc_si);
   1655   1.99   mycroft #else
   1656   1.99   mycroft #ifndef alpha
   1657   1.99   mycroft 	setsoftserial();
   1658   1.99   mycroft #else
   1659   1.99   mycroft 	if (!com_softintr_scheduled) {
   1660   1.99   mycroft 		com_softintr_scheduled = 1;
   1661   1.99   mycroft 		timeout(comsoft, NULL, 1);
   1662    1.1       cgd 	}
   1663   1.99   mycroft #endif
   1664   1.99   mycroft #endif
   1665  1.115  explorer 
   1666  1.115  explorer #if NRND > 0 && defined(RND_COM)
   1667  1.115  explorer 	rnd_add_uint32(&sc->rnd_source, iir | lsr);
   1668  1.115  explorer #endif
   1669  1.115  explorer 
   1670   1.88   mycroft 	return (1);
   1671    1.1       cgd }
   1672    1.1       cgd 
   1673    1.1       cgd /*
   1674  1.102   thorpej  * The following functions are polled getc and putc routines, shared
   1675  1.102   thorpej  * by the console and kgdb glue.
   1676  1.102   thorpej  */
   1677  1.102   thorpej 
   1678  1.102   thorpej int
   1679  1.102   thorpej com_common_getc(iot, ioh)
   1680  1.102   thorpej 	bus_space_tag_t iot;
   1681  1.102   thorpej 	bus_space_handle_t ioh;
   1682  1.102   thorpej {
   1683  1.102   thorpej 	int s = splserial();
   1684  1.102   thorpej 	u_char stat, c;
   1685  1.102   thorpej 
   1686  1.102   thorpej 	while (!ISSET(stat = bus_space_read_1(iot, ioh, com_lsr), LSR_RXRDY))
   1687  1.102   thorpej 		;
   1688  1.102   thorpej 	c = bus_space_read_1(iot, ioh, com_data);
   1689  1.102   thorpej 	stat = bus_space_read_1(iot, ioh, com_iir);
   1690  1.102   thorpej 	splx(s);
   1691  1.102   thorpej 	return (c);
   1692  1.102   thorpej }
   1693  1.102   thorpej 
   1694  1.102   thorpej void
   1695  1.102   thorpej com_common_putc(iot, ioh, c)
   1696  1.102   thorpej 	bus_space_tag_t iot;
   1697  1.102   thorpej 	bus_space_handle_t ioh;
   1698  1.102   thorpej 	int c;
   1699  1.102   thorpej {
   1700  1.102   thorpej 	int s = splserial();
   1701  1.102   thorpej 	u_char stat;
   1702  1.102   thorpej 	register int timo;
   1703  1.102   thorpej 
   1704  1.102   thorpej 	/* wait for any pending transmission to finish */
   1705  1.102   thorpej 	timo = 50000;
   1706  1.102   thorpej 	while (!ISSET(stat = bus_space_read_1(iot, ioh, com_lsr), LSR_TXRDY)
   1707  1.102   thorpej 	    && --timo)
   1708  1.102   thorpej 		;
   1709  1.102   thorpej 	bus_space_write_1(iot, ioh, com_data, c);
   1710  1.102   thorpej 	/* wait for this transmission to complete */
   1711  1.102   thorpej 	timo = 1500000;
   1712  1.102   thorpej 	while (!ISSET(stat = bus_space_read_1(iot, ioh, com_lsr), LSR_TXRDY)
   1713  1.102   thorpej 	    && --timo)
   1714  1.102   thorpej 		;
   1715  1.102   thorpej 	/* clear any interrupts generated by this transmission */
   1716  1.102   thorpej 	stat = bus_space_read_1(iot, ioh, com_iir);
   1717  1.102   thorpej 	splx(s);
   1718  1.102   thorpej }
   1719  1.102   thorpej 
   1720  1.102   thorpej /*
   1721   1.99   mycroft  * Initialize UART to known state.
   1722   1.99   mycroft  */
   1723  1.106  drochner int
   1724  1.109        is cominit(iot, iobase, rate, frequency, cflag, iohp)
   1725   1.91   thorpej 	bus_space_tag_t iot;
   1726  1.106  drochner 	int iobase;
   1727  1.109        is 	int rate, frequency;
   1728  1.106  drochner 	tcflag_t cflag;
   1729  1.106  drochner 	bus_space_handle_t *iohp;
   1730    1.1       cgd {
   1731  1.106  drochner 	bus_space_handle_t ioh;
   1732  1.106  drochner 
   1733  1.106  drochner 	if (bus_space_map(iot, iobase, COM_NPORTS, 0, &ioh))
   1734  1.110     enami 		return (ENOMEM); /* ??? */
   1735    1.1       cgd 
   1736  1.116      fvdl 	bus_space_write_1(iot, ioh, com_lcr, LCR_EERS);
   1737  1.116      fvdl 	bus_space_write_1(iot, ioh, com_efr, 0);
   1738   1.91   thorpej 	bus_space_write_1(iot, ioh, com_lcr, LCR_DLAB);
   1739  1.109        is 	rate = comspeed(rate, frequency);
   1740   1.91   thorpej 	bus_space_write_1(iot, ioh, com_dlbl, rate);
   1741   1.91   thorpej 	bus_space_write_1(iot, ioh, com_dlbh, rate >> 8);
   1742  1.106  drochner 	bus_space_write_1(iot, ioh, com_lcr, cflag2lcr(cflag));
   1743   1.99   mycroft 	bus_space_write_1(iot, ioh, com_mcr, 0);
   1744   1.91   thorpej 	bus_space_write_1(iot, ioh, com_fifo,
   1745   1.87   mycroft 	    FIFO_ENABLE | FIFO_RCV_RST | FIFO_XMT_RST | FIFO_TRIGGER_1);
   1746   1.99   mycroft 	bus_space_write_1(iot, ioh, com_ier, 0);
   1747  1.106  drochner 
   1748  1.106  drochner 	*iohp = ioh;
   1749  1.110     enami 	return (0);
   1750   1.99   mycroft }
   1751   1.99   mycroft 
   1752   1.99   mycroft /*
   1753  1.106  drochner  * Following are all routines needed for COM to act as console
   1754   1.99   mycroft  */
   1755  1.106  drochner 
   1756  1.106  drochner int
   1757  1.109        is comcnattach(iot, iobase, rate, frequency, cflag)
   1758   1.99   mycroft 	bus_space_tag_t iot;
   1759  1.106  drochner 	int iobase;
   1760  1.109        is 	int rate, frequency;
   1761  1.106  drochner 	tcflag_t cflag;
   1762   1.99   mycroft {
   1763  1.106  drochner 	int res;
   1764  1.106  drochner 	static struct consdev comcons = { NULL, NULL,
   1765  1.106  drochner 	comcngetc, comcnputc, comcnpollc, NODEV, CN_NORMAL};
   1766  1.106  drochner 
   1767  1.109        is 	res = cominit(iot, iobase, rate, frequency, cflag, &comconsioh);
   1768  1.110     enami 	if (res)
   1769  1.110     enami 		return (res);
   1770  1.106  drochner 
   1771  1.106  drochner 	cn_tab = &comcons;
   1772  1.106  drochner 
   1773  1.106  drochner 	comconstag = iot;
   1774  1.106  drochner 	comconsaddr = iobase;
   1775  1.106  drochner 	comconsrate = rate;
   1776  1.106  drochner 	comconscflag = cflag;
   1777   1.99   mycroft 
   1778  1.110     enami 	return (0);
   1779    1.1       cgd }
   1780    1.1       cgd 
   1781   1.80  christos int
   1782    1.1       cgd comcngetc(dev)
   1783   1.21   mycroft 	dev_t dev;
   1784    1.1       cgd {
   1785    1.1       cgd 
   1786  1.102   thorpej 	return (com_common_getc(comconstag, comconsioh));
   1787    1.1       cgd }
   1788    1.1       cgd 
   1789    1.1       cgd /*
   1790    1.1       cgd  * Console kernel output character routine.
   1791    1.1       cgd  */
   1792   1.48   mycroft void
   1793    1.1       cgd comcnputc(dev, c)
   1794    1.1       cgd 	dev_t dev;
   1795   1.21   mycroft 	int c;
   1796    1.1       cgd {
   1797    1.1       cgd 
   1798  1.102   thorpej 	com_common_putc(comconstag, comconsioh, c);
   1799   1.37   mycroft }
   1800   1.37   mycroft 
   1801   1.37   mycroft void
   1802   1.37   mycroft comcnpollc(dev, on)
   1803   1.37   mycroft 	dev_t dev;
   1804   1.37   mycroft 	int on;
   1805   1.37   mycroft {
   1806   1.37   mycroft 
   1807  1.106  drochner }
   1808  1.106  drochner 
   1809  1.106  drochner #ifdef KGDB
   1810  1.106  drochner int
   1811  1.109        is com_kgdb_attach(iot, iobase, rate, frequency, cflag)
   1812  1.106  drochner 	bus_space_tag_t iot;
   1813  1.106  drochner 	int iobase;
   1814  1.112     mikel 	int rate, frequency;
   1815  1.106  drochner 	tcflag_t cflag;
   1816  1.106  drochner {
   1817  1.106  drochner 	int res;
   1818  1.107  drochner 
   1819  1.107  drochner 	if (iot == comconstag && iobase == comconsaddr)
   1820  1.110     enami 		return (EBUSY); /* cannot share with console */
   1821  1.106  drochner 
   1822  1.109        is 	res = cominit(iot, iobase, rate, frequency, cflag, &com_kgdb_ioh);
   1823  1.110     enami 	if (res)
   1824  1.110     enami 		return (res);
   1825  1.106  drochner 
   1826  1.106  drochner 	kgdb_attach(com_kgdb_getc, com_kgdb_putc, NULL);
   1827  1.106  drochner 	kgdb_dev = 123; /* unneeded, only to satisfy some tests */
   1828  1.106  drochner 
   1829  1.106  drochner 	com_kgdb_iot = iot;
   1830  1.106  drochner 	com_kgdb_addr = iobase;
   1831  1.106  drochner 
   1832  1.110     enami 	return (0);
   1833  1.106  drochner }
   1834  1.106  drochner 
   1835  1.106  drochner /* ARGSUSED */
   1836  1.106  drochner int
   1837  1.106  drochner com_kgdb_getc(arg)
   1838  1.106  drochner 	void *arg;
   1839  1.106  drochner {
   1840  1.106  drochner 
   1841  1.106  drochner 	return (com_common_getc(com_kgdb_iot, com_kgdb_ioh));
   1842  1.106  drochner }
   1843  1.106  drochner 
   1844  1.106  drochner /* ARGSUSED */
   1845  1.106  drochner void
   1846  1.106  drochner com_kgdb_putc(arg, c)
   1847  1.106  drochner 	void *arg;
   1848  1.106  drochner 	int c;
   1849  1.106  drochner {
   1850  1.106  drochner 
   1851  1.106  drochner 	return (com_common_putc(com_kgdb_iot, com_kgdb_ioh, c));
   1852  1.106  drochner }
   1853  1.106  drochner #endif /* KGDB */
   1854  1.106  drochner 
   1855  1.106  drochner /* helper function to identify the com ports used by
   1856  1.106  drochner  console or KGDB (and not yet autoconf attached) */
   1857  1.106  drochner int
   1858  1.106  drochner com_is_console(iot, iobase, ioh)
   1859  1.110     enami 	bus_space_tag_t iot;
   1860  1.110     enami 	int iobase;
   1861  1.110     enami 	bus_space_handle_t *ioh;
   1862  1.106  drochner {
   1863  1.106  drochner 	bus_space_handle_t help;
   1864  1.106  drochner 
   1865  1.110     enami 	if (!comconsattached &&
   1866  1.110     enami 	    iot == comconstag && iobase == comconsaddr)
   1867  1.106  drochner 		help = comconsioh;
   1868  1.106  drochner #ifdef KGDB
   1869  1.110     enami 	else if (!com_kgdb_attached &&
   1870  1.110     enami 	    iot == com_kgdb_iot && iobase == com_kgdb_addr)
   1871  1.106  drochner 		help = com_kgdb_ioh;
   1872  1.106  drochner #endif
   1873  1.106  drochner 	else
   1874  1.110     enami 		return (0);
   1875  1.106  drochner 
   1876  1.110     enami 	if (ioh)
   1877  1.110     enami 		*ioh = help;
   1878  1.110     enami 	return (1);
   1879    1.2       cgd }
   1880