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