Home | History | Annotate | Line # | Download | only in dev
plcom.c revision 1.1
      1  1.1  rearnsha /*	$NetBSD: plcom.c,v 1.1 2001/10/27 16:22:06 rearnsha Exp $	*/
      2  1.1  rearnsha 
      3  1.1  rearnsha /*-
      4  1.1  rearnsha  * Copyright (c) 2001 ARM Ltd
      5  1.1  rearnsha  * All rights reserved.
      6  1.1  rearnsha  *
      7  1.1  rearnsha  * Redistribution and use in source and binary forms, with or without
      8  1.1  rearnsha  * modification, are permitted provided that the following conditions
      9  1.1  rearnsha  * are met:
     10  1.1  rearnsha  * 1. Redistributions of source code must retain the above copyright
     11  1.1  rearnsha  *    notice, this list of conditions and the following disclaimer.
     12  1.1  rearnsha  * 2. Redistributions in binary form must reproduce the above copyright
     13  1.1  rearnsha  *    notice, this list of conditions and the following disclaimer in the
     14  1.1  rearnsha  *    documentation and/or other materials provided with the distribution.
     15  1.1  rearnsha  * 3. The name of the company may not be used to endorse or promote
     16  1.1  rearnsha  *    products derived from this software without specific prior written
     17  1.1  rearnsha  *    permission.
     18  1.1  rearnsha  *
     19  1.1  rearnsha  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
     20  1.1  rearnsha  * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
     21  1.1  rearnsha  * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     22  1.1  rearnsha  * IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT,
     23  1.1  rearnsha  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
     24  1.1  rearnsha  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
     25  1.1  rearnsha  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     26  1.1  rearnsha  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     27  1.1  rearnsha  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     28  1.1  rearnsha  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     29  1.1  rearnsha  * SUCH DAMAGE.
     30  1.1  rearnsha  *
     31  1.1  rearnsha  * Copyright (c) 1998, 1999 The NetBSD Foundation, Inc.
     32  1.1  rearnsha  * All rights reserved.
     33  1.1  rearnsha  *
     34  1.1  rearnsha  * This code is derived from software contributed to The NetBSD Foundation
     35  1.1  rearnsha  * by Charles M. Hannum.
     36  1.1  rearnsha  *
     37  1.1  rearnsha  * Redistribution and use in source and binary forms, with or without
     38  1.1  rearnsha  * modification, are permitted provided that the following conditions
     39  1.1  rearnsha  * are met:
     40  1.1  rearnsha  * 1. Redistributions of source code must retain the above copyright
     41  1.1  rearnsha  *    notice, this list of conditions and the following disclaimer.
     42  1.1  rearnsha  * 2. Redistributions in binary form must reproduce the above copyright
     43  1.1  rearnsha  *    notice, this list of conditions and the following disclaimer in the
     44  1.1  rearnsha  *    documentation and/or other materials provided with the distribution.
     45  1.1  rearnsha  * 3. All advertising materials mentioning features or use of this software
     46  1.1  rearnsha  *    must display the following acknowledgement:
     47  1.1  rearnsha  *        This product includes software developed by the NetBSD
     48  1.1  rearnsha  *        Foundation, Inc. and its contributors.
     49  1.1  rearnsha  * 4. Neither the name of The NetBSD Foundation nor the names of its
     50  1.1  rearnsha  *    contributors may be used to endorse or promote products derived
     51  1.1  rearnsha  *    from this software without specific prior written permission.
     52  1.1  rearnsha  *
     53  1.1  rearnsha  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     54  1.1  rearnsha  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     55  1.1  rearnsha  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     56  1.1  rearnsha  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     57  1.1  rearnsha  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     58  1.1  rearnsha  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     59  1.1  rearnsha  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     60  1.1  rearnsha  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     61  1.1  rearnsha  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     62  1.1  rearnsha  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     63  1.1  rearnsha  * POSSIBILITY OF SUCH DAMAGE.
     64  1.1  rearnsha  */
     65  1.1  rearnsha 
     66  1.1  rearnsha /*
     67  1.1  rearnsha  * Copyright (c) 1991 The Regents of the University of California.
     68  1.1  rearnsha  * All rights reserved.
     69  1.1  rearnsha  *
     70  1.1  rearnsha  * Redistribution and use in source and binary forms, with or without
     71  1.1  rearnsha  * modification, are permitted provided that the following conditions
     72  1.1  rearnsha  * are met:
     73  1.1  rearnsha  * 1. Redistributions of source code must retain the above copyright
     74  1.1  rearnsha  *    notice, this list of conditions and the following disclaimer.
     75  1.1  rearnsha  * 2. Redistributions in binary form must reproduce the above copyright
     76  1.1  rearnsha  *    notice, this list of conditions and the following disclaimer in the
     77  1.1  rearnsha  *    documentation and/or other materials provided with the distribution.
     78  1.1  rearnsha  * 3. All advertising materials mentioning features or use of this software
     79  1.1  rearnsha  *    must display the following acknowledgement:
     80  1.1  rearnsha  *	This product includes software developed by the University of
     81  1.1  rearnsha  *	California, Berkeley and its contributors.
     82  1.1  rearnsha  * 4. Neither the name of the University nor the names of its contributors
     83  1.1  rearnsha  *    may be used to endorse or promote products derived from this software
     84  1.1  rearnsha  *    without specific prior written permission.
     85  1.1  rearnsha  *
     86  1.1  rearnsha  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     87  1.1  rearnsha  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     88  1.1  rearnsha  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     89  1.1  rearnsha  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     90  1.1  rearnsha  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     91  1.1  rearnsha  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     92  1.1  rearnsha  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     93  1.1  rearnsha  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     94  1.1  rearnsha  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     95  1.1  rearnsha  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     96  1.1  rearnsha  * SUCH DAMAGE.
     97  1.1  rearnsha  *
     98  1.1  rearnsha  *	@(#)com.c	7.5 (Berkeley) 5/16/91
     99  1.1  rearnsha  */
    100  1.1  rearnsha 
    101  1.1  rearnsha /*
    102  1.1  rearnsha  * COM driver for the Prime Cell PL010 UART, which is similar to the 16C550,
    103  1.1  rearnsha  * but has a completely different programmer's model.
    104  1.1  rearnsha  * Derived from the NS16550AF com driver.
    105  1.1  rearnsha  */
    106  1.1  rearnsha 
    107  1.1  rearnsha #include "opt_plcom.h"
    108  1.1  rearnsha #include "opt_ddb.h"
    109  1.1  rearnsha #include "opt_ddbparam.h"
    110  1.1  rearnsha #include "opt_kgdb.h"
    111  1.1  rearnsha 
    112  1.1  rearnsha #include "rnd.h"
    113  1.1  rearnsha #if NRND > 0 && defined(RND_COM)
    114  1.1  rearnsha #include <sys/rnd.h>
    115  1.1  rearnsha #endif
    116  1.1  rearnsha 
    117  1.1  rearnsha /*
    118  1.1  rearnsha  * Override cnmagic(9) macro before including <sys/systm.h>.
    119  1.1  rearnsha  * We need to know if cn_check_magic triggered debugger, so set a flag.
    120  1.1  rearnsha  * Callers of cn_check_magic must declare int cn_trapped = 0;
    121  1.1  rearnsha  * XXX: this is *ugly*!
    122  1.1  rearnsha  */
    123  1.1  rearnsha #define cn_trap()				\
    124  1.1  rearnsha 	do {					\
    125  1.1  rearnsha 		console_debugger();		\
    126  1.1  rearnsha 		cn_trapped = 1;			\
    127  1.1  rearnsha 	} while (/* CONSTCOND */ 0)
    128  1.1  rearnsha 
    129  1.1  rearnsha #include <sys/param.h>
    130  1.1  rearnsha #include <sys/systm.h>
    131  1.1  rearnsha #include <sys/ioctl.h>
    132  1.1  rearnsha #include <sys/select.h>
    133  1.1  rearnsha #include <sys/tty.h>
    134  1.1  rearnsha #include <sys/proc.h>
    135  1.1  rearnsha #include <sys/user.h>
    136  1.1  rearnsha #include <sys/conf.h>
    137  1.1  rearnsha #include <sys/file.h>
    138  1.1  rearnsha #include <sys/uio.h>
    139  1.1  rearnsha #include <sys/kernel.h>
    140  1.1  rearnsha #include <sys/syslog.h>
    141  1.1  rearnsha #include <sys/types.h>
    142  1.1  rearnsha #include <sys/device.h>
    143  1.1  rearnsha #include <sys/malloc.h>
    144  1.1  rearnsha #include <sys/timepps.h>
    145  1.1  rearnsha #include <sys/vnode.h>
    146  1.1  rearnsha 
    147  1.1  rearnsha #include <machine/intr.h>
    148  1.1  rearnsha #include <machine/bus.h>
    149  1.1  rearnsha 
    150  1.1  rearnsha #include <evbarm/dev/plcomreg.h>
    151  1.1  rearnsha #include <evbarm/dev/plcomvar.h>
    152  1.1  rearnsha 
    153  1.1  rearnsha #include <dev/cons.h>
    154  1.1  rearnsha 
    155  1.1  rearnsha static void plcom_enable_debugport (struct plcom_softc *);
    156  1.1  rearnsha 
    157  1.1  rearnsha void	plcom_config	(struct plcom_softc *);
    158  1.1  rearnsha void	plcom_shutdown	(struct plcom_softc *);
    159  1.1  rearnsha int	plcomspeed	(long, long);
    160  1.1  rearnsha static	u_char	cflag2lcr (tcflag_t);
    161  1.1  rearnsha int	plcomparam	(struct tty *, struct termios *);
    162  1.1  rearnsha void	plcomstart	(struct tty *);
    163  1.1  rearnsha int	plcomhwiflow	(struct tty *, int);
    164  1.1  rearnsha 
    165  1.1  rearnsha void	plcom_loadchannelregs (struct plcom_softc *);
    166  1.1  rearnsha void	plcom_hwiflow	(struct plcom_softc *);
    167  1.1  rearnsha void	plcom_break	(struct plcom_softc *, int);
    168  1.1  rearnsha void	plcom_modem	(struct plcom_softc *, int);
    169  1.1  rearnsha void	tiocm_to_plcom	(struct plcom_softc *, u_long, int);
    170  1.1  rearnsha int	plcom_to_tiocm	(struct plcom_softc *);
    171  1.1  rearnsha void	plcom_iflush	(struct plcom_softc *);
    172  1.1  rearnsha 
    173  1.1  rearnsha int	plcom_common_getc (dev_t, bus_space_tag_t, bus_space_handle_t);
    174  1.1  rearnsha void	plcom_common_putc (dev_t, bus_space_tag_t, bus_space_handle_t, int);
    175  1.1  rearnsha 
    176  1.1  rearnsha int	plcominit	(bus_space_tag_t, bus_addr_t, int, int, tcflag_t,
    177  1.1  rearnsha 			    bus_space_handle_t *);
    178  1.1  rearnsha 
    179  1.1  rearnsha /* XXX: This belongs elsewhere */
    180  1.1  rearnsha cdev_decl(plcom);
    181  1.1  rearnsha 
    182  1.1  rearnsha int	plcomcngetc	(dev_t);
    183  1.1  rearnsha void	plcomcnputc	(dev_t, int);
    184  1.1  rearnsha void	plcomcnpollc	(dev_t, int);
    185  1.1  rearnsha 
    186  1.1  rearnsha #define	integrate	static inline
    187  1.1  rearnsha #ifdef __HAVE_GENERIC_SOFT_INTERRUPTS
    188  1.1  rearnsha void 	plcomsoft	(void *);
    189  1.1  rearnsha #else
    190  1.1  rearnsha #ifndef __NO_SOFT_SERIAL_INTERRUPT
    191  1.1  rearnsha void 	plcomsoft	(void);
    192  1.1  rearnsha #else
    193  1.1  rearnsha void 	plcomsoft	(void *);
    194  1.1  rearnsha struct callout plcomsoft_callout = CALLOUT_INITIALIZER;
    195  1.1  rearnsha #endif
    196  1.1  rearnsha #endif
    197  1.1  rearnsha integrate void plcom_rxsoft	(struct plcom_softc *, struct tty *);
    198  1.1  rearnsha integrate void plcom_txsoft	(struct plcom_softc *, struct tty *);
    199  1.1  rearnsha integrate void plcom_stsoft	(struct plcom_softc *, struct tty *);
    200  1.1  rearnsha integrate void plcom_schedrx	(struct plcom_softc *);
    201  1.1  rearnsha void	plcomdiag		(void *);
    202  1.1  rearnsha 
    203  1.1  rearnsha extern struct cfdriver plcom_cd;
    204  1.1  rearnsha 
    205  1.1  rearnsha /*
    206  1.1  rearnsha  * Make this an option variable one can patch.
    207  1.1  rearnsha  * But be warned:  this must be a power of 2!
    208  1.1  rearnsha  */
    209  1.1  rearnsha u_int plcom_rbuf_size = PLCOM_RING_SIZE;
    210  1.1  rearnsha 
    211  1.1  rearnsha /* Stop input when 3/4 of the ring is full; restart when only 1/4 is full. */
    212  1.1  rearnsha u_int plcom_rbuf_hiwat = (PLCOM_RING_SIZE * 1) / 4;
    213  1.1  rearnsha u_int plcom_rbuf_lowat = (PLCOM_RING_SIZE * 3) / 4;
    214  1.1  rearnsha 
    215  1.1  rearnsha static int	plcomconsunit = -1;
    216  1.1  rearnsha static bus_space_tag_t plcomconstag;
    217  1.1  rearnsha static bus_space_handle_t plcomconsioh;
    218  1.1  rearnsha static int	plcomconsattached;
    219  1.1  rearnsha static int plcomconsrate;
    220  1.1  rearnsha static tcflag_t plcomconscflag;
    221  1.1  rearnsha static struct cnm_state plcom_cnm_state;
    222  1.1  rearnsha 
    223  1.1  rearnsha static int ppscap =
    224  1.1  rearnsha 	PPS_TSFMT_TSPEC |
    225  1.1  rearnsha 	PPS_CAPTUREASSERT |
    226  1.1  rearnsha 	PPS_CAPTURECLEAR |
    227  1.1  rearnsha #ifdef  PPS_SYNC
    228  1.1  rearnsha 	PPS_HARDPPSONASSERT | PPS_HARDPPSONCLEAR |
    229  1.1  rearnsha #endif	/* PPS_SYNC */
    230  1.1  rearnsha 	PPS_OFFSETASSERT | PPS_OFFSETCLEAR;
    231  1.1  rearnsha 
    232  1.1  rearnsha #ifndef __HAVE_GENERIC_SOFT_INTERRUPTS
    233  1.1  rearnsha #ifdef __NO_SOFT_SERIAL_INTERRUPT
    234  1.1  rearnsha volatile int	plcom_softintr_scheduled;
    235  1.1  rearnsha #endif
    236  1.1  rearnsha #endif
    237  1.1  rearnsha 
    238  1.1  rearnsha #ifdef KGDB
    239  1.1  rearnsha #include <sys/kgdb.h>
    240  1.1  rearnsha 
    241  1.1  rearnsha static int plcom_kgdb_unit;
    242  1.1  rearnsha static bus_space_tag_t plcom_kgdb_iot;
    243  1.1  rearnsha static bus_space_handle_t plcom_kgdb_ioh;
    244  1.1  rearnsha static int plcom_kgdb_attached;
    245  1.1  rearnsha 
    246  1.1  rearnsha int	plcom_kgdb_getc (void *);
    247  1.1  rearnsha void	plcom_kgdb_putc (void *, int);
    248  1.1  rearnsha #endif /* KGDB */
    249  1.1  rearnsha 
    250  1.1  rearnsha #define	PLCOMUNIT_MASK	0x7ffff
    251  1.1  rearnsha #define	PLCOMDIALOUT_MASK	0x80000
    252  1.1  rearnsha 
    253  1.1  rearnsha #define	PLCOMUNIT(x)	(minor(x) & PLCOMUNIT_MASK)
    254  1.1  rearnsha #define	PLCOMDIALOUT(x)	(minor(x) & PLCOMDIALOUT_MASK)
    255  1.1  rearnsha 
    256  1.1  rearnsha #define	PLCOM_ISALIVE(sc)	((sc)->enabled != 0 && \
    257  1.1  rearnsha 			 ISSET((sc)->sc_dev.dv_flags, DVF_ACTIVE))
    258  1.1  rearnsha 
    259  1.1  rearnsha #define	BR	BUS_SPACE_BARRIER_READ
    260  1.1  rearnsha #define	BW	BUS_SPACE_BARRIER_WRITE
    261  1.1  rearnsha #define PLCOM_BARRIER(t, h, f) bus_space_barrier((t), (h), 0, PLCOM_UART_SIZE, (f))
    262  1.1  rearnsha 
    263  1.1  rearnsha #if (defined(MULTIPROCESSOR) || defined(LOCKDEBUG)) && defined(PLCOM_MPLOCK)
    264  1.1  rearnsha 
    265  1.1  rearnsha #define PLCOM_LOCK(sc) simple_lock(&(sc)->sc_lock)
    266  1.1  rearnsha #define PLCOM_UNLOCK(sc) simple_unlock(&(sc)->sc_lock)
    267  1.1  rearnsha 
    268  1.1  rearnsha #else
    269  1.1  rearnsha 
    270  1.1  rearnsha #define PLCOM_LOCK(sc)
    271  1.1  rearnsha #define PLCOM_UNLOCK(sc)
    272  1.1  rearnsha 
    273  1.1  rearnsha #endif
    274  1.1  rearnsha 
    275  1.1  rearnsha int
    276  1.1  rearnsha plcomspeed(long speed, long frequency)
    277  1.1  rearnsha {
    278  1.1  rearnsha #define	divrnd(n, q)	(((n)*2/(q)+1)/2)	/* divide and round off */
    279  1.1  rearnsha 
    280  1.1  rearnsha 	int x, err;
    281  1.1  rearnsha 
    282  1.1  rearnsha #if 0
    283  1.1  rearnsha 	if (speed == 0)
    284  1.1  rearnsha 		return 0;
    285  1.1  rearnsha #endif
    286  1.1  rearnsha 	if (speed <= 0)
    287  1.1  rearnsha 		return -1;
    288  1.1  rearnsha 	x = divrnd(frequency / 16, speed);
    289  1.1  rearnsha 	if (x <= 0)
    290  1.1  rearnsha 		return -1;
    291  1.1  rearnsha 	err = divrnd(((quad_t)frequency) * 1000 / 16, speed * x) - 1000;
    292  1.1  rearnsha 	if (err < 0)
    293  1.1  rearnsha 		err = -err;
    294  1.1  rearnsha 	if (err > PLCOM_TOLERANCE)
    295  1.1  rearnsha 		return -1;
    296  1.1  rearnsha 	return x;
    297  1.1  rearnsha 
    298  1.1  rearnsha #undef	divrnd
    299  1.1  rearnsha }
    300  1.1  rearnsha 
    301  1.1  rearnsha #ifdef PLCOM_DEBUG
    302  1.1  rearnsha int	plcom_debug = 0;
    303  1.1  rearnsha 
    304  1.1  rearnsha void plcomstatus (struct plcom_softc *, char *);
    305  1.1  rearnsha void
    306  1.1  rearnsha plcomstatus(struct plcom_softc *sc, char *str)
    307  1.1  rearnsha {
    308  1.1  rearnsha 	struct tty *tp = sc->sc_tty;
    309  1.1  rearnsha 
    310  1.1  rearnsha 	printf("%s: %s %sclocal  %sdcd %sts_carr_on %sdtr %stx_stopped\n",
    311  1.1  rearnsha 	    sc->sc_dev.dv_xname, str,
    312  1.1  rearnsha 	    ISSET(tp->t_cflag, CLOCAL) ? "+" : "-",
    313  1.1  rearnsha 	    ISSET(sc->sc_msr, MSR_DCD) ? "+" : "-",
    314  1.1  rearnsha 	    ISSET(tp->t_state, TS_CARR_ON) ? "+" : "-",
    315  1.1  rearnsha 	    ISSET(sc->sc_mcr, MCR_DTR) ? "+" : "-",
    316  1.1  rearnsha 	    sc->sc_tx_stopped ? "+" : "-");
    317  1.1  rearnsha 
    318  1.1  rearnsha 	printf("%s: %s %scrtscts %scts %sts_ttstop  %srts %xrx_flags\n",
    319  1.1  rearnsha 	    sc->sc_dev.dv_xname, str,
    320  1.1  rearnsha 	    ISSET(tp->t_cflag, CRTSCTS) ? "+" : "-",
    321  1.1  rearnsha 	    ISSET(sc->sc_msr, MSR_CTS) ? "+" : "-",
    322  1.1  rearnsha 	    ISSET(tp->t_state, TS_TTSTOP) ? "+" : "-",
    323  1.1  rearnsha 	    ISSET(sc->sc_mcr, MCR_RTS) ? "+" : "-",
    324  1.1  rearnsha 	    sc->sc_rx_flags);
    325  1.1  rearnsha }
    326  1.1  rearnsha #endif
    327  1.1  rearnsha 
    328  1.1  rearnsha int
    329  1.1  rearnsha plcomprobe1(bus_space_tag_t iot, bus_space_handle_t ioh)
    330  1.1  rearnsha {
    331  1.1  rearnsha 	int data;
    332  1.1  rearnsha 
    333  1.1  rearnsha 	/* Disable the UART.  */
    334  1.1  rearnsha 	bus_space_write_1(iot, ioh, plcom_cr, 0);
    335  1.1  rearnsha 	/* Make sure the FIFO is off.  */
    336  1.1  rearnsha 	bus_space_write_1(iot, ioh, plcom_lcr, LCR_8BITS);
    337  1.1  rearnsha 	/* Disable interrupts.  */
    338  1.1  rearnsha 	bus_space_write_1(iot, ioh, plcom_iir, 0);
    339  1.1  rearnsha 
    340  1.1  rearnsha 	/* Make sure we swallow anything in the receiving register.  */
    341  1.1  rearnsha 	data = bus_space_read_1(iot, ioh, plcom_dr);
    342  1.1  rearnsha 
    343  1.1  rearnsha 	if (bus_space_read_1(iot, ioh, plcom_lcr) != LCR_8BITS)
    344  1.1  rearnsha 		return 0;
    345  1.1  rearnsha 
    346  1.1  rearnsha 	data = bus_space_read_1(iot, ioh, plcom_fr) & (FR_RXFF | FR_RXFE);
    347  1.1  rearnsha 
    348  1.1  rearnsha 	if (data != FR_RXFE)
    349  1.1  rearnsha 		return 0;
    350  1.1  rearnsha 
    351  1.1  rearnsha 	return 1;
    352  1.1  rearnsha }
    353  1.1  rearnsha 
    354  1.1  rearnsha static void
    355  1.1  rearnsha plcom_enable_debugport(struct plcom_softc *sc)
    356  1.1  rearnsha {
    357  1.1  rearnsha 	int s;
    358  1.1  rearnsha 
    359  1.1  rearnsha 	/* Turn on line break interrupt, set carrier. */
    360  1.1  rearnsha 	s = splserial();
    361  1.1  rearnsha 	PLCOM_LOCK(sc);
    362  1.1  rearnsha 	sc->sc_cr = CR_RIE | CR_RTIE | CR_UARTEN;
    363  1.1  rearnsha 	bus_space_write_1(sc->sc_iot, sc->sc_ioh, plcom_cr, sc->sc_cr);
    364  1.1  rearnsha 	SET(sc->sc_mcr, MCR_DTR | MCR_RTS);
    365  1.1  rearnsha 	sc->sc_set_mcr(sc->sc_set_mcr_arg, sc->sc_dev.dv_unit, sc->sc_mcr);
    366  1.1  rearnsha 	PLCOM_UNLOCK(sc);
    367  1.1  rearnsha 	splx(s);
    368  1.1  rearnsha }
    369  1.1  rearnsha 
    370  1.1  rearnsha void
    371  1.1  rearnsha plcom_attach_subr(struct plcom_softc *sc)
    372  1.1  rearnsha {
    373  1.1  rearnsha 	int unit = sc->sc_iounit;
    374  1.1  rearnsha 	bus_space_tag_t iot = sc->sc_iot;
    375  1.1  rearnsha 	bus_space_handle_t ioh = sc->sc_ioh;
    376  1.1  rearnsha 	struct tty *tp;
    377  1.1  rearnsha 
    378  1.1  rearnsha 	callout_init(&sc->sc_diag_callout);
    379  1.1  rearnsha #if (defined(MULTIPROCESSOR) || defined(LOCKDEBUG)) && defined(PLCOM_MPLOCK)
    380  1.1  rearnsha 	simple_lock_init(&sc->sc_lock);
    381  1.1  rearnsha #endif
    382  1.1  rearnsha 
    383  1.1  rearnsha 	/* Disable interrupts before configuring the device. */
    384  1.1  rearnsha 	sc->sc_cr = 0;
    385  1.1  rearnsha 
    386  1.1  rearnsha 	if (plcomconstag && unit == plcomconsunit) {
    387  1.1  rearnsha 		plcomconsattached = 1;
    388  1.1  rearnsha 
    389  1.1  rearnsha 		plcomconstag = iot;
    390  1.1  rearnsha 		plcomconsioh = ioh;
    391  1.1  rearnsha 
    392  1.1  rearnsha 		/* Make sure the console is always "hardwired". */
    393  1.1  rearnsha 		delay(1000);			/* wait for output to finish */
    394  1.1  rearnsha 		SET(sc->sc_hwflags, PLCOM_HW_CONSOLE);
    395  1.1  rearnsha 		SET(sc->sc_swflags, TIOCFLAG_SOFTCAR);
    396  1.1  rearnsha 		/* Must re-enable the console immediately, or we will
    397  1.1  rearnsha 		   hang when trying to print.  */
    398  1.1  rearnsha 		sc->sc_cr = CR_UARTEN;
    399  1.1  rearnsha 	}
    400  1.1  rearnsha 
    401  1.1  rearnsha 	bus_space_write_1(iot, ioh, plcom_cr, sc->sc_cr);
    402  1.1  rearnsha 
    403  1.1  rearnsha 	/* The PL010 has a 16-byte fifo, but the tx interrupt triggers when
    404  1.1  rearnsha 	   there is space for 8 more bytes.  */
    405  1.1  rearnsha 	sc->sc_fifolen = 8;
    406  1.1  rearnsha 	printf("\n");
    407  1.1  rearnsha 
    408  1.1  rearnsha 	if (ISSET(sc->sc_hwflags, PLCOM_HW_TXFIFO_DISABLE)) {
    409  1.1  rearnsha 		sc->sc_fifolen = 1;
    410  1.1  rearnsha 		printf("%s: txfifo disabled\n", sc->sc_dev.dv_xname);
    411  1.1  rearnsha 	}
    412  1.1  rearnsha 
    413  1.1  rearnsha 	if (sc->sc_fifolen > 1)
    414  1.1  rearnsha 		SET(sc->sc_hwflags, PLCOM_HW_FIFO);
    415  1.1  rearnsha 
    416  1.1  rearnsha 	tp = ttymalloc();
    417  1.1  rearnsha 	tp->t_oproc = plcomstart;
    418  1.1  rearnsha 	tp->t_param = plcomparam;
    419  1.1  rearnsha 	tp->t_hwiflow = plcomhwiflow;
    420  1.1  rearnsha 
    421  1.1  rearnsha 	sc->sc_tty = tp;
    422  1.1  rearnsha 	sc->sc_rbuf = malloc(plcom_rbuf_size << 1, M_DEVBUF, M_NOWAIT);
    423  1.1  rearnsha 	sc->sc_rbput = sc->sc_rbget = sc->sc_rbuf;
    424  1.1  rearnsha 	sc->sc_rbavail = plcom_rbuf_size;
    425  1.1  rearnsha 	if (sc->sc_rbuf == NULL) {
    426  1.1  rearnsha 		printf("%s: unable to allocate ring buffer\n",
    427  1.1  rearnsha 		    sc->sc_dev.dv_xname);
    428  1.1  rearnsha 		return;
    429  1.1  rearnsha 	}
    430  1.1  rearnsha 	sc->sc_ebuf = sc->sc_rbuf + (plcom_rbuf_size << 1);
    431  1.1  rearnsha 
    432  1.1  rearnsha 	tty_attach(tp);
    433  1.1  rearnsha 
    434  1.1  rearnsha 	if (ISSET(sc->sc_hwflags, PLCOM_HW_CONSOLE)) {
    435  1.1  rearnsha 		int maj;
    436  1.1  rearnsha 
    437  1.1  rearnsha 		/* locate the major number */
    438  1.1  rearnsha 		for (maj = 0; maj < nchrdev; maj++)
    439  1.1  rearnsha 			if (cdevsw[maj].d_open == plcomopen)
    440  1.1  rearnsha 				break;
    441  1.1  rearnsha 
    442  1.1  rearnsha 		cn_tab->cn_dev = makedev(maj, sc->sc_dev.dv_unit);
    443  1.1  rearnsha 
    444  1.1  rearnsha 		printf("%s: console\n", sc->sc_dev.dv_xname);
    445  1.1  rearnsha 	}
    446  1.1  rearnsha 
    447  1.1  rearnsha #ifdef KGDB
    448  1.1  rearnsha 	/*
    449  1.1  rearnsha 	 * Allow kgdb to "take over" this port.  If this is
    450  1.1  rearnsha 	 * the kgdb device, it has exclusive use.
    451  1.1  rearnsha 	 */
    452  1.1  rearnsha 	if (iot == plcom_kgdb_iot && unit == plcom_kgdb_unit) {
    453  1.1  rearnsha 		plcom_kgdb_attached = 1;
    454  1.1  rearnsha 
    455  1.1  rearnsha 		SET(sc->sc_hwflags, PLCOM_HW_KGDB);
    456  1.1  rearnsha 		printf("%s: kgdb\n", sc->sc_dev.dv_xname);
    457  1.1  rearnsha 	}
    458  1.1  rearnsha #endif
    459  1.1  rearnsha 
    460  1.1  rearnsha #ifdef __HAVE_GENERIC_SOFT_INTERRUPTS
    461  1.1  rearnsha 	sc->sc_si = softintr_establish(IPL_SOFTSERIAL, plcomsoft, sc);
    462  1.1  rearnsha #endif
    463  1.1  rearnsha 
    464  1.1  rearnsha #if NRND > 0 && defined(RND_COM)
    465  1.1  rearnsha 	rnd_attach_source(&sc->rnd_source, sc->sc_dev.dv_xname,
    466  1.1  rearnsha 			  RND_TYPE_TTY, 0);
    467  1.1  rearnsha #endif
    468  1.1  rearnsha 
    469  1.1  rearnsha 	/* if there are no enable/disable functions, assume the device
    470  1.1  rearnsha 	   is always enabled */
    471  1.1  rearnsha 	if (!sc->enable)
    472  1.1  rearnsha 		sc->enabled = 1;
    473  1.1  rearnsha 
    474  1.1  rearnsha 	plcom_config(sc);
    475  1.1  rearnsha 
    476  1.1  rearnsha 	SET(sc->sc_hwflags, PLCOM_HW_DEV_OK);
    477  1.1  rearnsha }
    478  1.1  rearnsha 
    479  1.1  rearnsha void
    480  1.1  rearnsha plcom_config(struct plcom_softc *sc)
    481  1.1  rearnsha {
    482  1.1  rearnsha 	bus_space_tag_t iot = sc->sc_iot;
    483  1.1  rearnsha 	bus_space_handle_t ioh = sc->sc_ioh;
    484  1.1  rearnsha 
    485  1.1  rearnsha 	/* Disable interrupts before configuring the device. */
    486  1.1  rearnsha 	sc->sc_cr = 0;
    487  1.1  rearnsha 	bus_space_write_1(iot, ioh, plcom_cr, sc->sc_cr);
    488  1.1  rearnsha 
    489  1.1  rearnsha 	if (ISSET(sc->sc_hwflags, PLCOM_HW_CONSOLE|PLCOM_HW_KGDB))
    490  1.1  rearnsha 		plcom_enable_debugport(sc);
    491  1.1  rearnsha }
    492  1.1  rearnsha 
    493  1.1  rearnsha int
    494  1.1  rearnsha plcom_detach(self, flags)
    495  1.1  rearnsha 	struct device *self;
    496  1.1  rearnsha 	int flags;
    497  1.1  rearnsha {
    498  1.1  rearnsha 	struct plcom_softc *sc = (struct plcom_softc *)self;
    499  1.1  rearnsha 	int maj, mn;
    500  1.1  rearnsha 
    501  1.1  rearnsha 	/* locate the major number */
    502  1.1  rearnsha 	for (maj = 0; maj < nchrdev; maj++)
    503  1.1  rearnsha 		if (cdevsw[maj].d_open == plcomopen)
    504  1.1  rearnsha 			break;
    505  1.1  rearnsha 
    506  1.1  rearnsha 	/* Nuke the vnodes for any open instances. */
    507  1.1  rearnsha 	mn = self->dv_unit;
    508  1.1  rearnsha 	vdevgone(maj, mn, mn, VCHR);
    509  1.1  rearnsha 
    510  1.1  rearnsha 	mn |= PLCOMDIALOUT_MASK;
    511  1.1  rearnsha 	vdevgone(maj, mn, mn, VCHR);
    512  1.1  rearnsha 
    513  1.1  rearnsha 	/* Free the receive buffer. */
    514  1.1  rearnsha 	free(sc->sc_rbuf, M_DEVBUF);
    515  1.1  rearnsha 
    516  1.1  rearnsha 	/* Detach and free the tty. */
    517  1.1  rearnsha 	tty_detach(sc->sc_tty);
    518  1.1  rearnsha 	ttyfree(sc->sc_tty);
    519  1.1  rearnsha 
    520  1.1  rearnsha #ifdef __HAVE_GENERIC_SOFT_INTERRUPTS
    521  1.1  rearnsha 	/* Unhook the soft interrupt handler. */
    522  1.1  rearnsha 	softintr_disestablish(sc->sc_si);
    523  1.1  rearnsha #endif
    524  1.1  rearnsha 
    525  1.1  rearnsha #if NRND > 0 && defined(RND_COM)
    526  1.1  rearnsha 	/* Unhook the entropy source. */
    527  1.1  rearnsha 	rnd_detach_source(&sc->rnd_source);
    528  1.1  rearnsha #endif
    529  1.1  rearnsha 
    530  1.1  rearnsha 	return 0;
    531  1.1  rearnsha }
    532  1.1  rearnsha 
    533  1.1  rearnsha int
    534  1.1  rearnsha plcom_activate(struct device *self, enum devact act)
    535  1.1  rearnsha {
    536  1.1  rearnsha 	struct plcom_softc *sc = (struct plcom_softc *)self;
    537  1.1  rearnsha 	int s, rv = 0;
    538  1.1  rearnsha 
    539  1.1  rearnsha 	s = splserial();
    540  1.1  rearnsha 	PLCOM_LOCK(sc);
    541  1.1  rearnsha 	switch (act) {
    542  1.1  rearnsha 	case DVACT_ACTIVATE:
    543  1.1  rearnsha 		rv = EOPNOTSUPP;
    544  1.1  rearnsha 		break;
    545  1.1  rearnsha 
    546  1.1  rearnsha 	case DVACT_DEACTIVATE:
    547  1.1  rearnsha 		if (sc->sc_hwflags & (PLCOM_HW_CONSOLE|PLCOM_HW_KGDB)) {
    548  1.1  rearnsha 			rv = EBUSY;
    549  1.1  rearnsha 			break;
    550  1.1  rearnsha 		}
    551  1.1  rearnsha 
    552  1.1  rearnsha 		if (sc->disable != NULL && sc->enabled != 0) {
    553  1.1  rearnsha 			(*sc->disable)(sc);
    554  1.1  rearnsha 			sc->enabled = 0;
    555  1.1  rearnsha 		}
    556  1.1  rearnsha 		break;
    557  1.1  rearnsha 	}
    558  1.1  rearnsha 
    559  1.1  rearnsha 	PLCOM_UNLOCK(sc);
    560  1.1  rearnsha 	splx(s);
    561  1.1  rearnsha 	return rv;
    562  1.1  rearnsha }
    563  1.1  rearnsha 
    564  1.1  rearnsha void
    565  1.1  rearnsha plcom_shutdown(struct plcom_softc *sc)
    566  1.1  rearnsha {
    567  1.1  rearnsha 	struct tty *tp = sc->sc_tty;
    568  1.1  rearnsha 	int s;
    569  1.1  rearnsha 
    570  1.1  rearnsha 	s = splserial();
    571  1.1  rearnsha 	PLCOM_LOCK(sc);
    572  1.1  rearnsha 
    573  1.1  rearnsha 	/* If we were asserting flow control, then deassert it. */
    574  1.1  rearnsha 	SET(sc->sc_rx_flags, RX_IBUF_BLOCKED);
    575  1.1  rearnsha 	plcom_hwiflow(sc);
    576  1.1  rearnsha 
    577  1.1  rearnsha 	/* Clear any break condition set with TIOCSBRK. */
    578  1.1  rearnsha 	plcom_break(sc, 0);
    579  1.1  rearnsha 
    580  1.1  rearnsha 	/* Turn off PPS capture on last close. */
    581  1.1  rearnsha 	sc->sc_ppsmask = 0;
    582  1.1  rearnsha 	sc->ppsparam.mode = 0;
    583  1.1  rearnsha 
    584  1.1  rearnsha 	/*
    585  1.1  rearnsha 	 * Hang up if necessary.  Wait a bit, so the other side has time to
    586  1.1  rearnsha 	 * notice even if we immediately open the port again.
    587  1.1  rearnsha 	 * Avoid tsleeping above splhigh().
    588  1.1  rearnsha 	 */
    589  1.1  rearnsha 	if (ISSET(tp->t_cflag, HUPCL)) {
    590  1.1  rearnsha 		plcom_modem(sc, 0);
    591  1.1  rearnsha 		PLCOM_UNLOCK(sc);
    592  1.1  rearnsha 		splx(s);
    593  1.1  rearnsha 		/* XXX tsleep will only timeout */
    594  1.1  rearnsha 		(void) tsleep(sc, TTIPRI, ttclos, hz);
    595  1.1  rearnsha 		s = splserial();
    596  1.1  rearnsha 		PLCOM_LOCK(sc);
    597  1.1  rearnsha 	}
    598  1.1  rearnsha 
    599  1.1  rearnsha 	/* Turn off interrupts. */
    600  1.1  rearnsha 	if (ISSET(sc->sc_hwflags, PLCOM_HW_CONSOLE))
    601  1.1  rearnsha 		/* interrupt on break */
    602  1.1  rearnsha 		sc->sc_cr = CR_RIE | CR_RTIE | CR_UARTEN;
    603  1.1  rearnsha 	else
    604  1.1  rearnsha 		sc->sc_cr = 0;
    605  1.1  rearnsha 	bus_space_write_1(sc->sc_iot, sc->sc_ioh, plcom_cr, sc->sc_cr);
    606  1.1  rearnsha 
    607  1.1  rearnsha 	if (sc->disable) {
    608  1.1  rearnsha #ifdef DIAGNOSTIC
    609  1.1  rearnsha 		if (!sc->enabled)
    610  1.1  rearnsha 			panic("plcom_shutdown: not enabled?");
    611  1.1  rearnsha #endif
    612  1.1  rearnsha 		(*sc->disable)(sc);
    613  1.1  rearnsha 		sc->enabled = 0;
    614  1.1  rearnsha 	}
    615  1.1  rearnsha 	PLCOM_UNLOCK(sc);
    616  1.1  rearnsha 	splx(s);
    617  1.1  rearnsha }
    618  1.1  rearnsha 
    619  1.1  rearnsha int
    620  1.1  rearnsha plcomopen(dev_t dev, int flag, int mode, struct proc *p)
    621  1.1  rearnsha {
    622  1.1  rearnsha 	struct plcom_softc *sc;
    623  1.1  rearnsha 	struct tty *tp;
    624  1.1  rearnsha 	int s, s2;
    625  1.1  rearnsha 	int error;
    626  1.1  rearnsha 
    627  1.1  rearnsha 	sc = device_lookup(&plcom_cd, PLCOMUNIT(dev));
    628  1.1  rearnsha 	if (sc == NULL || !ISSET(sc->sc_hwflags, PLCOM_HW_DEV_OK) ||
    629  1.1  rearnsha 		sc->sc_rbuf == NULL)
    630  1.1  rearnsha 		return ENXIO;
    631  1.1  rearnsha 
    632  1.1  rearnsha 	if (ISSET(sc->sc_dev.dv_flags, DVF_ACTIVE) == 0)
    633  1.1  rearnsha 		return ENXIO;
    634  1.1  rearnsha 
    635  1.1  rearnsha #ifdef KGDB
    636  1.1  rearnsha 	/*
    637  1.1  rearnsha 	 * If this is the kgdb port, no other use is permitted.
    638  1.1  rearnsha 	 */
    639  1.1  rearnsha 	if (ISSET(sc->sc_hwflags, PLCOM_HW_KGDB))
    640  1.1  rearnsha 		return EBUSY;
    641  1.1  rearnsha #endif
    642  1.1  rearnsha 
    643  1.1  rearnsha 	tp = sc->sc_tty;
    644  1.1  rearnsha 
    645  1.1  rearnsha 	if (ISSET(tp->t_state, TS_ISOPEN) &&
    646  1.1  rearnsha 	    ISSET(tp->t_state, TS_XCLUDE) &&
    647  1.1  rearnsha 		p->p_ucred->cr_uid != 0)
    648  1.1  rearnsha 		return EBUSY;
    649  1.1  rearnsha 
    650  1.1  rearnsha 	s = spltty();
    651  1.1  rearnsha 
    652  1.1  rearnsha 	/*
    653  1.1  rearnsha 	 * Do the following iff this is a first open.
    654  1.1  rearnsha 	 */
    655  1.1  rearnsha 	if (!ISSET(tp->t_state, TS_ISOPEN) && tp->t_wopen == 0) {
    656  1.1  rearnsha 		struct termios t;
    657  1.1  rearnsha 
    658  1.1  rearnsha 		tp->t_dev = dev;
    659  1.1  rearnsha 
    660  1.1  rearnsha 		s2 = splserial();
    661  1.1  rearnsha 		PLCOM_LOCK(sc);
    662  1.1  rearnsha 
    663  1.1  rearnsha 		if (sc->enable) {
    664  1.1  rearnsha 			if ((*sc->enable)(sc)) {
    665  1.1  rearnsha 				PLCOM_UNLOCK(sc);
    666  1.1  rearnsha 				splx(s2);
    667  1.1  rearnsha 				splx(s);
    668  1.1  rearnsha 				printf("%s: device enable failed\n",
    669  1.1  rearnsha 				       sc->sc_dev.dv_xname);
    670  1.1  rearnsha 				return EIO;
    671  1.1  rearnsha 			}
    672  1.1  rearnsha 			sc->enabled = 1;
    673  1.1  rearnsha 			plcom_config(sc);
    674  1.1  rearnsha 		}
    675  1.1  rearnsha 
    676  1.1  rearnsha 		/* Turn on interrupts. */
    677  1.1  rearnsha 		/* IER_ERXRDY | IER_ERLS | IER_EMSC;  */
    678  1.1  rearnsha 		sc->sc_cr = CR_RIE | CR_RTIE | CR_MSIE | CR_UARTEN;
    679  1.1  rearnsha 		bus_space_write_1(sc->sc_iot, sc->sc_ioh, plcom_cr, sc->sc_cr);
    680  1.1  rearnsha 
    681  1.1  rearnsha 		/* Fetch the current modem control status, needed later. */
    682  1.1  rearnsha 		sc->sc_msr = bus_space_read_1(sc->sc_iot, sc->sc_ioh, plcom_fr);
    683  1.1  rearnsha 
    684  1.1  rearnsha 		/* Clear PPS capture state on first open. */
    685  1.1  rearnsha 		sc->sc_ppsmask = 0;
    686  1.1  rearnsha 		sc->ppsparam.mode = 0;
    687  1.1  rearnsha 
    688  1.1  rearnsha 		PLCOM_UNLOCK(sc);
    689  1.1  rearnsha 		splx(s2);
    690  1.1  rearnsha 
    691  1.1  rearnsha 		/*
    692  1.1  rearnsha 		 * Initialize the termios status to the defaults.  Add in the
    693  1.1  rearnsha 		 * sticky bits from TIOCSFLAGS.
    694  1.1  rearnsha 		 */
    695  1.1  rearnsha 		t.c_ispeed = 0;
    696  1.1  rearnsha 		if (ISSET(sc->sc_hwflags, PLCOM_HW_CONSOLE)) {
    697  1.1  rearnsha 			t.c_ospeed = plcomconsrate;
    698  1.1  rearnsha 			t.c_cflag = plcomconscflag;
    699  1.1  rearnsha 		} else {
    700  1.1  rearnsha 			t.c_ospeed = TTYDEF_SPEED;
    701  1.1  rearnsha 			t.c_cflag = TTYDEF_CFLAG;
    702  1.1  rearnsha 		}
    703  1.1  rearnsha 		if (ISSET(sc->sc_swflags, TIOCFLAG_CLOCAL))
    704  1.1  rearnsha 			SET(t.c_cflag, CLOCAL);
    705  1.1  rearnsha 		if (ISSET(sc->sc_swflags, TIOCFLAG_CRTSCTS))
    706  1.1  rearnsha 			SET(t.c_cflag, CRTSCTS);
    707  1.1  rearnsha 		if (ISSET(sc->sc_swflags, TIOCFLAG_MDMBUF))
    708  1.1  rearnsha 			SET(t.c_cflag, MDMBUF);
    709  1.1  rearnsha 		/* Make sure plcomparam() will do something. */
    710  1.1  rearnsha 		tp->t_ospeed = 0;
    711  1.1  rearnsha 		(void) plcomparam(tp, &t);
    712  1.1  rearnsha 		tp->t_iflag = TTYDEF_IFLAG;
    713  1.1  rearnsha 		tp->t_oflag = TTYDEF_OFLAG;
    714  1.1  rearnsha 		tp->t_lflag = TTYDEF_LFLAG;
    715  1.1  rearnsha 		ttychars(tp);
    716  1.1  rearnsha 		ttsetwater(tp);
    717  1.1  rearnsha 
    718  1.1  rearnsha 		s2 = splserial();
    719  1.1  rearnsha 		PLCOM_LOCK(sc);
    720  1.1  rearnsha 
    721  1.1  rearnsha 		/*
    722  1.1  rearnsha 		 * Turn on DTR.  We must always do this, even if carrier is not
    723  1.1  rearnsha 		 * present, because otherwise we'd have to use TIOCSDTR
    724  1.1  rearnsha 		 * immediately after setting CLOCAL, which applications do not
    725  1.1  rearnsha 		 * expect.  We always assert DTR while the device is open
    726  1.1  rearnsha 		 * unless explicitly requested to deassert it.
    727  1.1  rearnsha 		 */
    728  1.1  rearnsha 		plcom_modem(sc, 1);
    729  1.1  rearnsha 
    730  1.1  rearnsha 		/* Clear the input ring, and unblock. */
    731  1.1  rearnsha 		sc->sc_rbput = sc->sc_rbget = sc->sc_rbuf;
    732  1.1  rearnsha 		sc->sc_rbavail = plcom_rbuf_size;
    733  1.1  rearnsha 		plcom_iflush(sc);
    734  1.1  rearnsha 		CLR(sc->sc_rx_flags, RX_ANY_BLOCK);
    735  1.1  rearnsha 		plcom_hwiflow(sc);
    736  1.1  rearnsha 
    737  1.1  rearnsha #ifdef PLCOM_DEBUG
    738  1.1  rearnsha 		if (plcom_debug)
    739  1.1  rearnsha 			plcomstatus(sc, "plcomopen  ");
    740  1.1  rearnsha #endif
    741  1.1  rearnsha 
    742  1.1  rearnsha 		PLCOM_UNLOCK(sc);
    743  1.1  rearnsha 		splx(s2);
    744  1.1  rearnsha 	}
    745  1.1  rearnsha 
    746  1.1  rearnsha 	splx(s);
    747  1.1  rearnsha 
    748  1.1  rearnsha 	error = ttyopen(tp, PLCOMDIALOUT(dev), ISSET(flag, O_NONBLOCK));
    749  1.1  rearnsha 	if (error)
    750  1.1  rearnsha 		goto bad;
    751  1.1  rearnsha 
    752  1.1  rearnsha 	error = (*tp->t_linesw->l_open)(dev, tp);
    753  1.1  rearnsha 	if (error)
    754  1.1  rearnsha 		goto bad;
    755  1.1  rearnsha 
    756  1.1  rearnsha 	return 0;
    757  1.1  rearnsha 
    758  1.1  rearnsha bad:
    759  1.1  rearnsha 	if (!ISSET(tp->t_state, TS_ISOPEN) && tp->t_wopen == 0) {
    760  1.1  rearnsha 		/*
    761  1.1  rearnsha 		 * We failed to open the device, and nobody else had it opened.
    762  1.1  rearnsha 		 * Clean up the state as appropriate.
    763  1.1  rearnsha 		 */
    764  1.1  rearnsha 		plcom_shutdown(sc);
    765  1.1  rearnsha 	}
    766  1.1  rearnsha 
    767  1.1  rearnsha 	return error;
    768  1.1  rearnsha }
    769  1.1  rearnsha 
    770  1.1  rearnsha int
    771  1.1  rearnsha plcomclose(dev_t dev, int flag, int mode, struct proc *p)
    772  1.1  rearnsha {
    773  1.1  rearnsha 	struct plcom_softc *sc = device_lookup(&plcom_cd, PLCOMUNIT(dev));
    774  1.1  rearnsha 	struct tty *tp = sc->sc_tty;
    775  1.1  rearnsha 
    776  1.1  rearnsha 	/* XXX This is for cons.c. */
    777  1.1  rearnsha 	if (!ISSET(tp->t_state, TS_ISOPEN))
    778  1.1  rearnsha 		return 0;
    779  1.1  rearnsha 
    780  1.1  rearnsha 	(*tp->t_linesw->l_close)(tp, flag);
    781  1.1  rearnsha 	ttyclose(tp);
    782  1.1  rearnsha 
    783  1.1  rearnsha 	if (PLCOM_ISALIVE(sc) == 0)
    784  1.1  rearnsha 		return 0;
    785  1.1  rearnsha 
    786  1.1  rearnsha 	if (!ISSET(tp->t_state, TS_ISOPEN) && tp->t_wopen == 0) {
    787  1.1  rearnsha 		/*
    788  1.1  rearnsha 		 * Although we got a last close, the device may still be in
    789  1.1  rearnsha 		 * use; e.g. if this was the dialout node, and there are still
    790  1.1  rearnsha 		 * processes waiting for carrier on the non-dialout node.
    791  1.1  rearnsha 		 */
    792  1.1  rearnsha 		plcom_shutdown(sc);
    793  1.1  rearnsha 	}
    794  1.1  rearnsha 
    795  1.1  rearnsha 	return 0;
    796  1.1  rearnsha }
    797  1.1  rearnsha 
    798  1.1  rearnsha int
    799  1.1  rearnsha plcomread(dev_t dev, struct uio *uio, int flag)
    800  1.1  rearnsha {
    801  1.1  rearnsha 	struct plcom_softc *sc = device_lookup(&plcom_cd, PLCOMUNIT(dev));
    802  1.1  rearnsha 	struct tty *tp = sc->sc_tty;
    803  1.1  rearnsha 
    804  1.1  rearnsha 	if (PLCOM_ISALIVE(sc) == 0)
    805  1.1  rearnsha 		return EIO;
    806  1.1  rearnsha 
    807  1.1  rearnsha 	return (*tp->t_linesw->l_read)(tp, uio, flag);
    808  1.1  rearnsha }
    809  1.1  rearnsha 
    810  1.1  rearnsha int
    811  1.1  rearnsha plcomwrite(dev_t dev, struct uio *uio, int flag)
    812  1.1  rearnsha {
    813  1.1  rearnsha 	struct plcom_softc *sc = device_lookup(&plcom_cd, PLCOMUNIT(dev));
    814  1.1  rearnsha 	struct tty *tp = sc->sc_tty;
    815  1.1  rearnsha 
    816  1.1  rearnsha 	if (PLCOM_ISALIVE(sc) == 0)
    817  1.1  rearnsha 		return EIO;
    818  1.1  rearnsha 
    819  1.1  rearnsha 	return (*tp->t_linesw->l_write)(tp, uio, flag);
    820  1.1  rearnsha }
    821  1.1  rearnsha 
    822  1.1  rearnsha int
    823  1.1  rearnsha plcompoll(dev_t dev, int events, struct proc *p)
    824  1.1  rearnsha {
    825  1.1  rearnsha 	struct plcom_softc *sc = device_lookup(&plcom_cd, PLCOMUNIT(dev));
    826  1.1  rearnsha 	struct tty *tp = sc->sc_tty;
    827  1.1  rearnsha 
    828  1.1  rearnsha 	if (PLCOM_ISALIVE(sc) == 0)
    829  1.1  rearnsha 		return EIO;
    830  1.1  rearnsha 
    831  1.1  rearnsha 	return (*tp->t_linesw->l_poll)(tp, events, p);
    832  1.1  rearnsha }
    833  1.1  rearnsha 
    834  1.1  rearnsha struct tty *
    835  1.1  rearnsha plcomtty(dev_t dev)
    836  1.1  rearnsha {
    837  1.1  rearnsha 	struct plcom_softc *sc = device_lookup(&plcom_cd, PLCOMUNIT(dev));
    838  1.1  rearnsha 	struct tty *tp = sc->sc_tty;
    839  1.1  rearnsha 
    840  1.1  rearnsha 	return tp;
    841  1.1  rearnsha }
    842  1.1  rearnsha 
    843  1.1  rearnsha int
    844  1.1  rearnsha plcomioctl(dev_t dev, u_long cmd, caddr_t data, int flag, struct proc *p)
    845  1.1  rearnsha {
    846  1.1  rearnsha 	struct plcom_softc *sc = device_lookup(&plcom_cd, PLCOMUNIT(dev));
    847  1.1  rearnsha 	struct tty *tp = sc->sc_tty;
    848  1.1  rearnsha 	int error;
    849  1.1  rearnsha 	int s;
    850  1.1  rearnsha 
    851  1.1  rearnsha 	if (PLCOM_ISALIVE(sc) == 0)
    852  1.1  rearnsha 		return EIO;
    853  1.1  rearnsha 
    854  1.1  rearnsha 	error = (*tp->t_linesw->l_ioctl)(tp, cmd, data, flag, p);
    855  1.1  rearnsha 	if (error >= 0)
    856  1.1  rearnsha 		return error;
    857  1.1  rearnsha 
    858  1.1  rearnsha 	error = ttioctl(tp, cmd, data, flag, p);
    859  1.1  rearnsha 	if (error >= 0)
    860  1.1  rearnsha 		return error;
    861  1.1  rearnsha 
    862  1.1  rearnsha 	error = 0;
    863  1.1  rearnsha 
    864  1.1  rearnsha 	s = splserial();
    865  1.1  rearnsha 	PLCOM_LOCK(sc);
    866  1.1  rearnsha 
    867  1.1  rearnsha 	switch (cmd) {
    868  1.1  rearnsha 	case TIOCSBRK:
    869  1.1  rearnsha 		plcom_break(sc, 1);
    870  1.1  rearnsha 		break;
    871  1.1  rearnsha 
    872  1.1  rearnsha 	case TIOCCBRK:
    873  1.1  rearnsha 		plcom_break(sc, 0);
    874  1.1  rearnsha 		break;
    875  1.1  rearnsha 
    876  1.1  rearnsha 	case TIOCSDTR:
    877  1.1  rearnsha 		plcom_modem(sc, 1);
    878  1.1  rearnsha 		break;
    879  1.1  rearnsha 
    880  1.1  rearnsha 	case TIOCCDTR:
    881  1.1  rearnsha 		plcom_modem(sc, 0);
    882  1.1  rearnsha 		break;
    883  1.1  rearnsha 
    884  1.1  rearnsha 	case TIOCGFLAGS:
    885  1.1  rearnsha 		*(int *)data = sc->sc_swflags;
    886  1.1  rearnsha 		break;
    887  1.1  rearnsha 
    888  1.1  rearnsha 	case TIOCSFLAGS:
    889  1.1  rearnsha 		error = suser(p->p_ucred, &p->p_acflag);
    890  1.1  rearnsha 		if (error)
    891  1.1  rearnsha 			break;
    892  1.1  rearnsha 		sc->sc_swflags = *(int *)data;
    893  1.1  rearnsha 		break;
    894  1.1  rearnsha 
    895  1.1  rearnsha 	case TIOCMSET:
    896  1.1  rearnsha 	case TIOCMBIS:
    897  1.1  rearnsha 	case TIOCMBIC:
    898  1.1  rearnsha 		tiocm_to_plcom(sc, cmd, *(int *)data);
    899  1.1  rearnsha 		break;
    900  1.1  rearnsha 
    901  1.1  rearnsha 	case TIOCMGET:
    902  1.1  rearnsha 		*(int *)data = plcom_to_tiocm(sc);
    903  1.1  rearnsha 		break;
    904  1.1  rearnsha 
    905  1.1  rearnsha 	case PPS_IOC_CREATE:
    906  1.1  rearnsha 		break;
    907  1.1  rearnsha 
    908  1.1  rearnsha 	case PPS_IOC_DESTROY:
    909  1.1  rearnsha 		break;
    910  1.1  rearnsha 
    911  1.1  rearnsha 	case PPS_IOC_GETPARAMS: {
    912  1.1  rearnsha 		pps_params_t *pp;
    913  1.1  rearnsha 		pp = (pps_params_t *)data;
    914  1.1  rearnsha 		*pp = sc->ppsparam;
    915  1.1  rearnsha 		break;
    916  1.1  rearnsha 	}
    917  1.1  rearnsha 
    918  1.1  rearnsha 	case PPS_IOC_SETPARAMS: {
    919  1.1  rearnsha 	  	pps_params_t *pp;
    920  1.1  rearnsha 		int mode;
    921  1.1  rearnsha 		pp = (pps_params_t *)data;
    922  1.1  rearnsha 		if (pp->mode & ~ppscap) {
    923  1.1  rearnsha 			error = EINVAL;
    924  1.1  rearnsha 			break;
    925  1.1  rearnsha 		}
    926  1.1  rearnsha 		sc->ppsparam = *pp;
    927  1.1  rearnsha 	 	/*
    928  1.1  rearnsha 		 * Compute msr masks from user-specified timestamp state.
    929  1.1  rearnsha 		 */
    930  1.1  rearnsha 		mode = sc->ppsparam.mode;
    931  1.1  rearnsha #ifdef	PPS_SYNC
    932  1.1  rearnsha 		if (mode & PPS_HARDPPSONASSERT) {
    933  1.1  rearnsha 			mode |= PPS_CAPTUREASSERT;
    934  1.1  rearnsha 			/* XXX revoke any previous HARDPPS source */
    935  1.1  rearnsha 		}
    936  1.1  rearnsha 		if (mode & PPS_HARDPPSONCLEAR) {
    937  1.1  rearnsha 			mode |= PPS_CAPTURECLEAR;
    938  1.1  rearnsha 			/* XXX revoke any previous HARDPPS source */
    939  1.1  rearnsha 		}
    940  1.1  rearnsha #endif	/* PPS_SYNC */
    941  1.1  rearnsha 		switch (mode & PPS_CAPTUREBOTH) {
    942  1.1  rearnsha 		case 0:
    943  1.1  rearnsha 			sc->sc_ppsmask = 0;
    944  1.1  rearnsha 			break;
    945  1.1  rearnsha 
    946  1.1  rearnsha 		case PPS_CAPTUREASSERT:
    947  1.1  rearnsha 			sc->sc_ppsmask = MSR_DCD;
    948  1.1  rearnsha 			sc->sc_ppsassert = MSR_DCD;
    949  1.1  rearnsha 			sc->sc_ppsclear = -1;
    950  1.1  rearnsha 			break;
    951  1.1  rearnsha 
    952  1.1  rearnsha 		case PPS_CAPTURECLEAR:
    953  1.1  rearnsha 			sc->sc_ppsmask = MSR_DCD;
    954  1.1  rearnsha 			sc->sc_ppsassert = -1;
    955  1.1  rearnsha 			sc->sc_ppsclear = 0;
    956  1.1  rearnsha 			break;
    957  1.1  rearnsha 
    958  1.1  rearnsha 		case PPS_CAPTUREBOTH:
    959  1.1  rearnsha 			sc->sc_ppsmask = MSR_DCD;
    960  1.1  rearnsha 			sc->sc_ppsassert = MSR_DCD;
    961  1.1  rearnsha 			sc->sc_ppsclear = 0;
    962  1.1  rearnsha 			break;
    963  1.1  rearnsha 
    964  1.1  rearnsha 		default:
    965  1.1  rearnsha 			error = EINVAL;
    966  1.1  rearnsha 			break;
    967  1.1  rearnsha 		}
    968  1.1  rearnsha 		break;
    969  1.1  rearnsha 	}
    970  1.1  rearnsha 
    971  1.1  rearnsha 	case PPS_IOC_GETCAP:
    972  1.1  rearnsha 		*(int*)data = ppscap;
    973  1.1  rearnsha 		break;
    974  1.1  rearnsha 
    975  1.1  rearnsha 	case PPS_IOC_FETCH: {
    976  1.1  rearnsha 		pps_info_t *pi;
    977  1.1  rearnsha 		pi = (pps_info_t *)data;
    978  1.1  rearnsha 		*pi = sc->ppsinfo;
    979  1.1  rearnsha 		break;
    980  1.1  rearnsha 	}
    981  1.1  rearnsha 
    982  1.1  rearnsha 	case TIOCDCDTIMESTAMP:	/* XXX old, overloaded  API used by xntpd v3 */
    983  1.1  rearnsha 		/*
    984  1.1  rearnsha 		 * Some GPS clocks models use the falling rather than
    985  1.1  rearnsha 		 * rising edge as the on-the-second signal.
    986  1.1  rearnsha 		 * The old API has no way to specify PPS polarity.
    987  1.1  rearnsha 		 */
    988  1.1  rearnsha 		sc->sc_ppsmask = MSR_DCD;
    989  1.1  rearnsha #ifndef PPS_TRAILING_EDGE
    990  1.1  rearnsha 		sc->sc_ppsassert = MSR_DCD;
    991  1.1  rearnsha 		sc->sc_ppsclear = -1;
    992  1.1  rearnsha 		TIMESPEC_TO_TIMEVAL((struct timeval *)data,
    993  1.1  rearnsha 		    &sc->ppsinfo.assert_timestamp);
    994  1.1  rearnsha #else
    995  1.1  rearnsha 		sc->sc_ppsassert = -1
    996  1.1  rearnsha 		sc->sc_ppsclear = 0;
    997  1.1  rearnsha 		TIMESPEC_TO_TIMEVAL((struct timeval *)data,
    998  1.1  rearnsha 		    &sc->ppsinfo.clear_timestamp);
    999  1.1  rearnsha #endif
   1000  1.1  rearnsha 		break;
   1001  1.1  rearnsha 
   1002  1.1  rearnsha 	default:
   1003  1.1  rearnsha 		error = ENOTTY;
   1004  1.1  rearnsha 		break;
   1005  1.1  rearnsha 	}
   1006  1.1  rearnsha 
   1007  1.1  rearnsha 	PLCOM_UNLOCK(sc);
   1008  1.1  rearnsha 	splx(s);
   1009  1.1  rearnsha 
   1010  1.1  rearnsha #ifdef PLCOM_DEBUG
   1011  1.1  rearnsha 	if (plcom_debug)
   1012  1.1  rearnsha 		plcomstatus(sc, "plcomioctl ");
   1013  1.1  rearnsha #endif
   1014  1.1  rearnsha 
   1015  1.1  rearnsha 	return error;
   1016  1.1  rearnsha }
   1017  1.1  rearnsha 
   1018  1.1  rearnsha integrate void
   1019  1.1  rearnsha plcom_schedrx(struct plcom_softc *sc)
   1020  1.1  rearnsha {
   1021  1.1  rearnsha 
   1022  1.1  rearnsha 	sc->sc_rx_ready = 1;
   1023  1.1  rearnsha 
   1024  1.1  rearnsha 	/* Wake up the poller. */
   1025  1.1  rearnsha #ifdef __HAVE_GENERIC_SOFT_INTERRUPTS
   1026  1.1  rearnsha 	softintr_schedule(sc->sc_si);
   1027  1.1  rearnsha #else
   1028  1.1  rearnsha #ifndef __NO_SOFT_SERIAL_INTERRUPT
   1029  1.1  rearnsha 	setsoftserial();
   1030  1.1  rearnsha #else
   1031  1.1  rearnsha 	if (!plcom_softintr_scheduled) {
   1032  1.1  rearnsha 		plcom_softintr_scheduled = 1;
   1033  1.1  rearnsha 		callout_reset(&plcomsoft_callout, 1, plcomsoft, NULL);
   1034  1.1  rearnsha 	}
   1035  1.1  rearnsha #endif
   1036  1.1  rearnsha #endif
   1037  1.1  rearnsha }
   1038  1.1  rearnsha 
   1039  1.1  rearnsha void
   1040  1.1  rearnsha plcom_break(struct plcom_softc *sc, int onoff)
   1041  1.1  rearnsha {
   1042  1.1  rearnsha 
   1043  1.1  rearnsha 	if (onoff)
   1044  1.1  rearnsha 		SET(sc->sc_lcr, LCR_BRK);
   1045  1.1  rearnsha 	else
   1046  1.1  rearnsha 		CLR(sc->sc_lcr, LCR_BRK);
   1047  1.1  rearnsha 
   1048  1.1  rearnsha 	if (!sc->sc_heldchange) {
   1049  1.1  rearnsha 		if (sc->sc_tx_busy) {
   1050  1.1  rearnsha 			sc->sc_heldtbc = sc->sc_tbc;
   1051  1.1  rearnsha 			sc->sc_tbc = 0;
   1052  1.1  rearnsha 			sc->sc_heldchange = 1;
   1053  1.1  rearnsha 		} else
   1054  1.1  rearnsha 			plcom_loadchannelregs(sc);
   1055  1.1  rearnsha 	}
   1056  1.1  rearnsha }
   1057  1.1  rearnsha 
   1058  1.1  rearnsha void
   1059  1.1  rearnsha plcom_modem(struct plcom_softc *sc, int onoff)
   1060  1.1  rearnsha {
   1061  1.1  rearnsha 
   1062  1.1  rearnsha 	if (sc->sc_mcr_dtr == 0)
   1063  1.1  rearnsha 		return;
   1064  1.1  rearnsha 
   1065  1.1  rearnsha 	if (onoff)
   1066  1.1  rearnsha 		SET(sc->sc_mcr, sc->sc_mcr_dtr);
   1067  1.1  rearnsha 	else
   1068  1.1  rearnsha 		CLR(sc->sc_mcr, sc->sc_mcr_dtr);
   1069  1.1  rearnsha 
   1070  1.1  rearnsha 	if (!sc->sc_heldchange) {
   1071  1.1  rearnsha 		if (sc->sc_tx_busy) {
   1072  1.1  rearnsha 			sc->sc_heldtbc = sc->sc_tbc;
   1073  1.1  rearnsha 			sc->sc_tbc = 0;
   1074  1.1  rearnsha 			sc->sc_heldchange = 1;
   1075  1.1  rearnsha 		} else
   1076  1.1  rearnsha 			plcom_loadchannelregs(sc);
   1077  1.1  rearnsha 	}
   1078  1.1  rearnsha }
   1079  1.1  rearnsha 
   1080  1.1  rearnsha void
   1081  1.1  rearnsha tiocm_to_plcom(struct plcom_softc *sc, u_long how, int ttybits)
   1082  1.1  rearnsha {
   1083  1.1  rearnsha 	u_char plcombits;
   1084  1.1  rearnsha 
   1085  1.1  rearnsha 	plcombits = 0;
   1086  1.1  rearnsha 	if (ISSET(ttybits, TIOCM_DTR))
   1087  1.1  rearnsha 		SET(plcombits, MCR_DTR);
   1088  1.1  rearnsha 	if (ISSET(ttybits, TIOCM_RTS))
   1089  1.1  rearnsha 		SET(plcombits, MCR_RTS);
   1090  1.1  rearnsha 
   1091  1.1  rearnsha 	switch (how) {
   1092  1.1  rearnsha 	case TIOCMBIC:
   1093  1.1  rearnsha 		CLR(sc->sc_mcr, plcombits);
   1094  1.1  rearnsha 		break;
   1095  1.1  rearnsha 
   1096  1.1  rearnsha 	case TIOCMBIS:
   1097  1.1  rearnsha 		SET(sc->sc_mcr, plcombits);
   1098  1.1  rearnsha 		break;
   1099  1.1  rearnsha 
   1100  1.1  rearnsha 	case TIOCMSET:
   1101  1.1  rearnsha 		CLR(sc->sc_mcr, MCR_DTR | MCR_RTS);
   1102  1.1  rearnsha 		SET(sc->sc_mcr, plcombits);
   1103  1.1  rearnsha 		break;
   1104  1.1  rearnsha 	}
   1105  1.1  rearnsha 
   1106  1.1  rearnsha 	if (!sc->sc_heldchange) {
   1107  1.1  rearnsha 		if (sc->sc_tx_busy) {
   1108  1.1  rearnsha 			sc->sc_heldtbc = sc->sc_tbc;
   1109  1.1  rearnsha 			sc->sc_tbc = 0;
   1110  1.1  rearnsha 			sc->sc_heldchange = 1;
   1111  1.1  rearnsha 		} else
   1112  1.1  rearnsha 			plcom_loadchannelregs(sc);
   1113  1.1  rearnsha 	}
   1114  1.1  rearnsha }
   1115  1.1  rearnsha 
   1116  1.1  rearnsha int
   1117  1.1  rearnsha plcom_to_tiocm(struct plcom_softc *sc)
   1118  1.1  rearnsha {
   1119  1.1  rearnsha 	u_char plcombits;
   1120  1.1  rearnsha 	int ttybits = 0;
   1121  1.1  rearnsha 
   1122  1.1  rearnsha 	plcombits = sc->sc_mcr;
   1123  1.1  rearnsha 	if (ISSET(plcombits, MCR_DTR))
   1124  1.1  rearnsha 		SET(ttybits, TIOCM_DTR);
   1125  1.1  rearnsha 	if (ISSET(plcombits, MCR_RTS))
   1126  1.1  rearnsha 		SET(ttybits, TIOCM_RTS);
   1127  1.1  rearnsha 
   1128  1.1  rearnsha 	plcombits = sc->sc_msr;
   1129  1.1  rearnsha 	if (ISSET(plcombits, MSR_DCD))
   1130  1.1  rearnsha 		SET(ttybits, TIOCM_CD);
   1131  1.1  rearnsha 	if (ISSET(plcombits, MSR_CTS))
   1132  1.1  rearnsha 		SET(ttybits, TIOCM_CTS);
   1133  1.1  rearnsha 	if (ISSET(plcombits, MSR_DSR))
   1134  1.1  rearnsha 		SET(ttybits, TIOCM_DSR);
   1135  1.1  rearnsha 
   1136  1.1  rearnsha 	if (sc->sc_cr != 0)
   1137  1.1  rearnsha 		SET(ttybits, TIOCM_LE);
   1138  1.1  rearnsha 
   1139  1.1  rearnsha 	return ttybits;
   1140  1.1  rearnsha }
   1141  1.1  rearnsha 
   1142  1.1  rearnsha static u_char
   1143  1.1  rearnsha cflag2lcr(tcflag_t cflag)
   1144  1.1  rearnsha {
   1145  1.1  rearnsha 	u_char lcr = 0;
   1146  1.1  rearnsha 
   1147  1.1  rearnsha 	switch (ISSET(cflag, CSIZE)) {
   1148  1.1  rearnsha 	case CS5:
   1149  1.1  rearnsha 		SET(lcr, LCR_5BITS);
   1150  1.1  rearnsha 		break;
   1151  1.1  rearnsha 	case CS6:
   1152  1.1  rearnsha 		SET(lcr, LCR_6BITS);
   1153  1.1  rearnsha 		break;
   1154  1.1  rearnsha 	case CS7:
   1155  1.1  rearnsha 		SET(lcr, LCR_7BITS);
   1156  1.1  rearnsha 		break;
   1157  1.1  rearnsha 	case CS8:
   1158  1.1  rearnsha 		SET(lcr, LCR_8BITS);
   1159  1.1  rearnsha 		break;
   1160  1.1  rearnsha 	}
   1161  1.1  rearnsha 	if (ISSET(cflag, PARENB)) {
   1162  1.1  rearnsha 		SET(lcr, LCR_PEN);
   1163  1.1  rearnsha 		if (!ISSET(cflag, PARODD))
   1164  1.1  rearnsha 			SET(lcr, LCR_EPS);
   1165  1.1  rearnsha 	}
   1166  1.1  rearnsha 	if (ISSET(cflag, CSTOPB))
   1167  1.1  rearnsha 		SET(lcr, LCR_STP2);
   1168  1.1  rearnsha 
   1169  1.1  rearnsha 	return lcr;
   1170  1.1  rearnsha }
   1171  1.1  rearnsha 
   1172  1.1  rearnsha int
   1173  1.1  rearnsha plcomparam(struct tty *tp, struct termios *t)
   1174  1.1  rearnsha {
   1175  1.1  rearnsha 	struct plcom_softc *sc = device_lookup(&plcom_cd, PLCOMUNIT(tp->t_dev));
   1176  1.1  rearnsha 	int ospeed;
   1177  1.1  rearnsha 	u_char lcr;
   1178  1.1  rearnsha 	int s;
   1179  1.1  rearnsha 
   1180  1.1  rearnsha 	if (PLCOM_ISALIVE(sc) == 0)
   1181  1.1  rearnsha 		return EIO;
   1182  1.1  rearnsha 
   1183  1.1  rearnsha 	ospeed = plcomspeed(t->c_ospeed, sc->sc_frequency);
   1184  1.1  rearnsha 
   1185  1.1  rearnsha 	/* Check requested parameters. */
   1186  1.1  rearnsha 	if (ospeed < 0)
   1187  1.1  rearnsha 		return EINVAL;
   1188  1.1  rearnsha 	if (t->c_ispeed && t->c_ispeed != t->c_ospeed)
   1189  1.1  rearnsha 		return EINVAL;
   1190  1.1  rearnsha 
   1191  1.1  rearnsha 	/*
   1192  1.1  rearnsha 	 * For the console, always force CLOCAL and !HUPCL, so that the port
   1193  1.1  rearnsha 	 * is always active.
   1194  1.1  rearnsha 	 */
   1195  1.1  rearnsha 	if (ISSET(sc->sc_swflags, TIOCFLAG_SOFTCAR) ||
   1196  1.1  rearnsha 	    ISSET(sc->sc_hwflags, PLCOM_HW_CONSOLE)) {
   1197  1.1  rearnsha 		SET(t->c_cflag, CLOCAL);
   1198  1.1  rearnsha 		CLR(t->c_cflag, HUPCL);
   1199  1.1  rearnsha 	}
   1200  1.1  rearnsha 
   1201  1.1  rearnsha 	/*
   1202  1.1  rearnsha 	 * If there were no changes, don't do anything.  This avoids dropping
   1203  1.1  rearnsha 	 * input and improves performance when all we did was frob things like
   1204  1.1  rearnsha 	 * VMIN and VTIME.
   1205  1.1  rearnsha 	 */
   1206  1.1  rearnsha 	if (tp->t_ospeed == t->c_ospeed &&
   1207  1.1  rearnsha 	    tp->t_cflag == t->c_cflag)
   1208  1.1  rearnsha 		return 0;
   1209  1.1  rearnsha 
   1210  1.1  rearnsha 	lcr = ISSET(sc->sc_lcr, LCR_BRK) | cflag2lcr(t->c_cflag);
   1211  1.1  rearnsha 
   1212  1.1  rearnsha 	s = splserial();
   1213  1.1  rearnsha 	PLCOM_LOCK(sc);
   1214  1.1  rearnsha 
   1215  1.1  rearnsha 	sc->sc_lcr = lcr;
   1216  1.1  rearnsha 
   1217  1.1  rearnsha 	/*
   1218  1.1  rearnsha 	 * PL010 has a fixed-length FIFO trigger point.
   1219  1.1  rearnsha 	 */
   1220  1.1  rearnsha 	if (ISSET(sc->sc_hwflags, PLCOM_HW_FIFO))
   1221  1.1  rearnsha 		sc->sc_fifo = 1;
   1222  1.1  rearnsha 	else
   1223  1.1  rearnsha 		sc->sc_fifo = 0;
   1224  1.1  rearnsha 
   1225  1.1  rearnsha 	if (sc->sc_fifo)
   1226  1.1  rearnsha 		SET(sc->sc_lcr, LCR_FEN);
   1227  1.1  rearnsha 
   1228  1.1  rearnsha 	/*
   1229  1.1  rearnsha 	 * If we're not in a mode that assumes a connection is present, then
   1230  1.1  rearnsha 	 * ignore carrier changes.
   1231  1.1  rearnsha 	 */
   1232  1.1  rearnsha 	if (ISSET(t->c_cflag, CLOCAL | MDMBUF))
   1233  1.1  rearnsha 		sc->sc_msr_dcd = 0;
   1234  1.1  rearnsha 	else
   1235  1.1  rearnsha 		sc->sc_msr_dcd = MSR_DCD;
   1236  1.1  rearnsha 	/*
   1237  1.1  rearnsha 	 * Set the flow control pins depending on the current flow control
   1238  1.1  rearnsha 	 * mode.
   1239  1.1  rearnsha 	 */
   1240  1.1  rearnsha 	if (ISSET(t->c_cflag, CRTSCTS)) {
   1241  1.1  rearnsha 		sc->sc_mcr_dtr = MCR_DTR;
   1242  1.1  rearnsha 		sc->sc_mcr_rts = MCR_RTS;
   1243  1.1  rearnsha 		sc->sc_msr_cts = MSR_CTS;
   1244  1.1  rearnsha 	} else if (ISSET(t->c_cflag, MDMBUF)) {
   1245  1.1  rearnsha 		/*
   1246  1.1  rearnsha 		 * For DTR/DCD flow control, make sure we don't toggle DTR for
   1247  1.1  rearnsha 		 * carrier detection.
   1248  1.1  rearnsha 		 */
   1249  1.1  rearnsha 		sc->sc_mcr_dtr = 0;
   1250  1.1  rearnsha 		sc->sc_mcr_rts = MCR_DTR;
   1251  1.1  rearnsha 		sc->sc_msr_cts = MSR_DCD;
   1252  1.1  rearnsha 	} else {
   1253  1.1  rearnsha 		/*
   1254  1.1  rearnsha 		 * If no flow control, then always set RTS.  This will make
   1255  1.1  rearnsha 		 * the other side happy if it mistakenly thinks we're doing
   1256  1.1  rearnsha 		 * RTS/CTS flow control.
   1257  1.1  rearnsha 		 */
   1258  1.1  rearnsha 		sc->sc_mcr_dtr = MCR_DTR | MCR_RTS;
   1259  1.1  rearnsha 		sc->sc_mcr_rts = 0;
   1260  1.1  rearnsha 		sc->sc_msr_cts = 0;
   1261  1.1  rearnsha 		if (ISSET(sc->sc_mcr, MCR_DTR))
   1262  1.1  rearnsha 			SET(sc->sc_mcr, MCR_RTS);
   1263  1.1  rearnsha 		else
   1264  1.1  rearnsha 			CLR(sc->sc_mcr, MCR_RTS);
   1265  1.1  rearnsha 	}
   1266  1.1  rearnsha 	sc->sc_msr_mask = sc->sc_msr_cts | sc->sc_msr_dcd;
   1267  1.1  rearnsha 
   1268  1.1  rearnsha #if 0
   1269  1.1  rearnsha 	if (ospeed == 0)
   1270  1.1  rearnsha 		CLR(sc->sc_mcr, sc->sc_mcr_dtr);
   1271  1.1  rearnsha 	else
   1272  1.1  rearnsha 		SET(sc->sc_mcr, sc->sc_mcr_dtr);
   1273  1.1  rearnsha #endif
   1274  1.1  rearnsha 
   1275  1.1  rearnsha 	sc->sc_dlbl = ospeed;
   1276  1.1  rearnsha 	sc->sc_dlbh = ospeed >> 8;
   1277  1.1  rearnsha 
   1278  1.1  rearnsha 	/* And copy to tty. */
   1279  1.1  rearnsha 	tp->t_ispeed = 0;
   1280  1.1  rearnsha 	tp->t_ospeed = t->c_ospeed;
   1281  1.1  rearnsha 	tp->t_cflag = t->c_cflag;
   1282  1.1  rearnsha 
   1283  1.1  rearnsha 	if (!sc->sc_heldchange) {
   1284  1.1  rearnsha 		if (sc->sc_tx_busy) {
   1285  1.1  rearnsha 			sc->sc_heldtbc = sc->sc_tbc;
   1286  1.1  rearnsha 			sc->sc_tbc = 0;
   1287  1.1  rearnsha 			sc->sc_heldchange = 1;
   1288  1.1  rearnsha 		} else
   1289  1.1  rearnsha 			plcom_loadchannelregs(sc);
   1290  1.1  rearnsha 	}
   1291  1.1  rearnsha 
   1292  1.1  rearnsha 	if (!ISSET(t->c_cflag, CHWFLOW)) {
   1293  1.1  rearnsha 		/* Disable the high water mark. */
   1294  1.1  rearnsha 		sc->sc_r_hiwat = 0;
   1295  1.1  rearnsha 		sc->sc_r_lowat = 0;
   1296  1.1  rearnsha 		if (ISSET(sc->sc_rx_flags, RX_TTY_OVERFLOWED)) {
   1297  1.1  rearnsha 			CLR(sc->sc_rx_flags, RX_TTY_OVERFLOWED);
   1298  1.1  rearnsha 			plcom_schedrx(sc);
   1299  1.1  rearnsha 		}
   1300  1.1  rearnsha 		if (ISSET(sc->sc_rx_flags, RX_TTY_BLOCKED|RX_IBUF_BLOCKED)) {
   1301  1.1  rearnsha 			CLR(sc->sc_rx_flags, RX_TTY_BLOCKED|RX_IBUF_BLOCKED);
   1302  1.1  rearnsha 			plcom_hwiflow(sc);
   1303  1.1  rearnsha 		}
   1304  1.1  rearnsha 	} else {
   1305  1.1  rearnsha 		sc->sc_r_hiwat = plcom_rbuf_hiwat;
   1306  1.1  rearnsha 		sc->sc_r_lowat = plcom_rbuf_lowat;
   1307  1.1  rearnsha 	}
   1308  1.1  rearnsha 
   1309  1.1  rearnsha 	PLCOM_UNLOCK(sc);
   1310  1.1  rearnsha 	splx(s);
   1311  1.1  rearnsha 
   1312  1.1  rearnsha 	/*
   1313  1.1  rearnsha 	 * Update the tty layer's idea of the carrier bit, in case we changed
   1314  1.1  rearnsha 	 * CLOCAL or MDMBUF.  We don't hang up here; we only do that by
   1315  1.1  rearnsha 	 * explicit request.
   1316  1.1  rearnsha 	 */
   1317  1.1  rearnsha 	(void) (*tp->t_linesw->l_modem)(tp, ISSET(sc->sc_msr, MSR_DCD));
   1318  1.1  rearnsha 
   1319  1.1  rearnsha #ifdef PLCOM_DEBUG
   1320  1.1  rearnsha 	if (plcom_debug)
   1321  1.1  rearnsha 		plcomstatus(sc, "plcomparam ");
   1322  1.1  rearnsha #endif
   1323  1.1  rearnsha 
   1324  1.1  rearnsha 	if (!ISSET(t->c_cflag, CHWFLOW)) {
   1325  1.1  rearnsha 		if (sc->sc_tx_stopped) {
   1326  1.1  rearnsha 			sc->sc_tx_stopped = 0;
   1327  1.1  rearnsha 			plcomstart(tp);
   1328  1.1  rearnsha 		}
   1329  1.1  rearnsha 	}
   1330  1.1  rearnsha 
   1331  1.1  rearnsha 	return 0;
   1332  1.1  rearnsha }
   1333  1.1  rearnsha 
   1334  1.1  rearnsha void
   1335  1.1  rearnsha plcom_iflush(struct plcom_softc *sc)
   1336  1.1  rearnsha {
   1337  1.1  rearnsha 	bus_space_tag_t iot = sc->sc_iot;
   1338  1.1  rearnsha 	bus_space_handle_t ioh = sc->sc_ioh;
   1339  1.1  rearnsha #ifdef DIAGNOSTIC
   1340  1.1  rearnsha 	int reg;
   1341  1.1  rearnsha #endif
   1342  1.1  rearnsha 	int timo;
   1343  1.1  rearnsha 
   1344  1.1  rearnsha #ifdef DIAGNOSTIC
   1345  1.1  rearnsha 	reg = 0xffff;
   1346  1.1  rearnsha #endif
   1347  1.1  rearnsha 	timo = 50000;
   1348  1.1  rearnsha 	/* flush any pending I/O */
   1349  1.1  rearnsha 	while (! ISSET(bus_space_read_1(iot, ioh, plcom_fr), FR_RXFE)
   1350  1.1  rearnsha 	    && --timo)
   1351  1.1  rearnsha #ifdef DIAGNOSTIC
   1352  1.1  rearnsha 		reg =
   1353  1.1  rearnsha #else
   1354  1.1  rearnsha 		    (void)
   1355  1.1  rearnsha #endif
   1356  1.1  rearnsha 		    bus_space_read_1(iot, ioh, plcom_dr);
   1357  1.1  rearnsha #ifdef DIAGNOSTIC
   1358  1.1  rearnsha 	if (!timo)
   1359  1.1  rearnsha 		printf("%s: plcom_iflush timeout %02x\n", sc->sc_dev.dv_xname,
   1360  1.1  rearnsha 		       reg);
   1361  1.1  rearnsha #endif
   1362  1.1  rearnsha }
   1363  1.1  rearnsha 
   1364  1.1  rearnsha void
   1365  1.1  rearnsha plcom_loadchannelregs(struct plcom_softc *sc)
   1366  1.1  rearnsha {
   1367  1.1  rearnsha 	bus_space_tag_t iot = sc->sc_iot;
   1368  1.1  rearnsha 	bus_space_handle_t ioh = sc->sc_ioh;
   1369  1.1  rearnsha 
   1370  1.1  rearnsha 	/* XXXXX necessary? */
   1371  1.1  rearnsha 	plcom_iflush(sc);
   1372  1.1  rearnsha 
   1373  1.1  rearnsha 	bus_space_write_1(iot, ioh, plcom_cr, 0);
   1374  1.1  rearnsha 
   1375  1.1  rearnsha 	bus_space_write_1(iot, ioh, plcom_dlbl, sc->sc_dlbl);
   1376  1.1  rearnsha 	bus_space_write_1(iot, ioh, plcom_dlbh, sc->sc_dlbh);
   1377  1.1  rearnsha 	bus_space_write_1(iot, ioh, plcom_lcr, sc->sc_lcr);
   1378  1.1  rearnsha 	sc->sc_set_mcr(sc->sc_set_mcr_arg, sc->sc_dev.dv_unit,
   1379  1.1  rearnsha 	    sc->sc_mcr_active = sc->sc_mcr);
   1380  1.1  rearnsha 
   1381  1.1  rearnsha 	bus_space_write_1(iot, ioh, plcom_cr, sc->sc_cr);
   1382  1.1  rearnsha }
   1383  1.1  rearnsha 
   1384  1.1  rearnsha int
   1385  1.1  rearnsha plcomhwiflow(struct tty *tp, int block)
   1386  1.1  rearnsha {
   1387  1.1  rearnsha 	struct plcom_softc *sc = device_lookup(&plcom_cd, PLCOMUNIT(tp->t_dev));
   1388  1.1  rearnsha 	int s;
   1389  1.1  rearnsha 
   1390  1.1  rearnsha 	if (PLCOM_ISALIVE(sc) == 0)
   1391  1.1  rearnsha 		return 0;
   1392  1.1  rearnsha 
   1393  1.1  rearnsha 	if (sc->sc_mcr_rts == 0)
   1394  1.1  rearnsha 		return 0;
   1395  1.1  rearnsha 
   1396  1.1  rearnsha 	s = splserial();
   1397  1.1  rearnsha 	PLCOM_LOCK(sc);
   1398  1.1  rearnsha 
   1399  1.1  rearnsha 	if (block) {
   1400  1.1  rearnsha 		if (!ISSET(sc->sc_rx_flags, RX_TTY_BLOCKED)) {
   1401  1.1  rearnsha 			SET(sc->sc_rx_flags, RX_TTY_BLOCKED);
   1402  1.1  rearnsha 			plcom_hwiflow(sc);
   1403  1.1  rearnsha 		}
   1404  1.1  rearnsha 	} else {
   1405  1.1  rearnsha 		if (ISSET(sc->sc_rx_flags, RX_TTY_OVERFLOWED)) {
   1406  1.1  rearnsha 			CLR(sc->sc_rx_flags, RX_TTY_OVERFLOWED);
   1407  1.1  rearnsha 			plcom_schedrx(sc);
   1408  1.1  rearnsha 		}
   1409  1.1  rearnsha 		if (ISSET(sc->sc_rx_flags, RX_TTY_BLOCKED)) {
   1410  1.1  rearnsha 			CLR(sc->sc_rx_flags, RX_TTY_BLOCKED);
   1411  1.1  rearnsha 			plcom_hwiflow(sc);
   1412  1.1  rearnsha 		}
   1413  1.1  rearnsha 	}
   1414  1.1  rearnsha 
   1415  1.1  rearnsha 	PLCOM_UNLOCK(sc);
   1416  1.1  rearnsha 	splx(s);
   1417  1.1  rearnsha 	return 1;
   1418  1.1  rearnsha }
   1419  1.1  rearnsha 
   1420  1.1  rearnsha /*
   1421  1.1  rearnsha  * (un)block input via hw flowcontrol
   1422  1.1  rearnsha  */
   1423  1.1  rearnsha void
   1424  1.1  rearnsha plcom_hwiflow(struct plcom_softc *sc)
   1425  1.1  rearnsha {
   1426  1.1  rearnsha 	if (sc->sc_mcr_rts == 0)
   1427  1.1  rearnsha 		return;
   1428  1.1  rearnsha 
   1429  1.1  rearnsha 	if (ISSET(sc->sc_rx_flags, RX_ANY_BLOCK)) {
   1430  1.1  rearnsha 		CLR(sc->sc_mcr, sc->sc_mcr_rts);
   1431  1.1  rearnsha 		CLR(sc->sc_mcr_active, sc->sc_mcr_rts);
   1432  1.1  rearnsha 	} else {
   1433  1.1  rearnsha 		SET(sc->sc_mcr, sc->sc_mcr_rts);
   1434  1.1  rearnsha 		SET(sc->sc_mcr_active, sc->sc_mcr_rts);
   1435  1.1  rearnsha 	}
   1436  1.1  rearnsha 	sc->sc_set_mcr(sc->sc_set_mcr_arg, sc->sc_dev.dv_unit,
   1437  1.1  rearnsha 	    sc->sc_mcr_active);
   1438  1.1  rearnsha }
   1439  1.1  rearnsha 
   1440  1.1  rearnsha 
   1441  1.1  rearnsha void
   1442  1.1  rearnsha plcomstart(struct tty *tp)
   1443  1.1  rearnsha {
   1444  1.1  rearnsha 	struct plcom_softc *sc = device_lookup(&plcom_cd, PLCOMUNIT(tp->t_dev));
   1445  1.1  rearnsha 	bus_space_tag_t iot = sc->sc_iot;
   1446  1.1  rearnsha 	bus_space_handle_t ioh = sc->sc_ioh;
   1447  1.1  rearnsha 	int s;
   1448  1.1  rearnsha 
   1449  1.1  rearnsha 	if (PLCOM_ISALIVE(sc) == 0)
   1450  1.1  rearnsha 		return;
   1451  1.1  rearnsha 
   1452  1.1  rearnsha 	s = spltty();
   1453  1.1  rearnsha 	if (ISSET(tp->t_state, TS_BUSY | TS_TIMEOUT | TS_TTSTOP))
   1454  1.1  rearnsha 		goto out;
   1455  1.1  rearnsha 	if (sc->sc_tx_stopped)
   1456  1.1  rearnsha 		goto out;
   1457  1.1  rearnsha 
   1458  1.1  rearnsha 	if (tp->t_outq.c_cc <= tp->t_lowat) {
   1459  1.1  rearnsha 		if (ISSET(tp->t_state, TS_ASLEEP)) {
   1460  1.1  rearnsha 			CLR(tp->t_state, TS_ASLEEP);
   1461  1.1  rearnsha 			wakeup(&tp->t_outq);
   1462  1.1  rearnsha 		}
   1463  1.1  rearnsha 		selwakeup(&tp->t_wsel);
   1464  1.1  rearnsha 		if (tp->t_outq.c_cc == 0)
   1465  1.1  rearnsha 			goto out;
   1466  1.1  rearnsha 	}
   1467  1.1  rearnsha 
   1468  1.1  rearnsha 	/* Grab the first contiguous region of buffer space. */
   1469  1.1  rearnsha 	{
   1470  1.1  rearnsha 		u_char *tba;
   1471  1.1  rearnsha 		int tbc;
   1472  1.1  rearnsha 
   1473  1.1  rearnsha 		tba = tp->t_outq.c_cf;
   1474  1.1  rearnsha 		tbc = ndqb(&tp->t_outq, 0);
   1475  1.1  rearnsha 
   1476  1.1  rearnsha 		(void)splserial();
   1477  1.1  rearnsha 		PLCOM_LOCK(sc);
   1478  1.1  rearnsha 
   1479  1.1  rearnsha 		sc->sc_tba = tba;
   1480  1.1  rearnsha 		sc->sc_tbc = tbc;
   1481  1.1  rearnsha 	}
   1482  1.1  rearnsha 
   1483  1.1  rearnsha 	SET(tp->t_state, TS_BUSY);
   1484  1.1  rearnsha 	sc->sc_tx_busy = 1;
   1485  1.1  rearnsha 
   1486  1.1  rearnsha 	/* Enable transmit completion interrupts if necessary. */
   1487  1.1  rearnsha 	if (!ISSET(sc->sc_cr, CR_TIE)) {
   1488  1.1  rearnsha 		SET(sc->sc_cr, CR_TIE);
   1489  1.1  rearnsha 		bus_space_write_1(iot, ioh, plcom_cr, sc->sc_cr);
   1490  1.1  rearnsha 	}
   1491  1.1  rearnsha 
   1492  1.1  rearnsha 	/* Output the first chunk of the contiguous buffer. */
   1493  1.1  rearnsha 	{
   1494  1.1  rearnsha 		int n;
   1495  1.1  rearnsha 
   1496  1.1  rearnsha 		n = sc->sc_tbc;
   1497  1.1  rearnsha 		if (n > sc->sc_fifolen)
   1498  1.1  rearnsha 			n = sc->sc_fifolen;
   1499  1.1  rearnsha 		bus_space_write_multi_1(iot, ioh, plcom_dr, sc->sc_tba, n);
   1500  1.1  rearnsha 		sc->sc_tbc -= n;
   1501  1.1  rearnsha 		sc->sc_tba += n;
   1502  1.1  rearnsha 	}
   1503  1.1  rearnsha 	PLCOM_UNLOCK(sc);
   1504  1.1  rearnsha out:
   1505  1.1  rearnsha 	splx(s);
   1506  1.1  rearnsha 	return;
   1507  1.1  rearnsha }
   1508  1.1  rearnsha 
   1509  1.1  rearnsha /*
   1510  1.1  rearnsha  * Stop output on a line.
   1511  1.1  rearnsha  */
   1512  1.1  rearnsha void
   1513  1.1  rearnsha plcomstop(struct tty *tp, int flag)
   1514  1.1  rearnsha {
   1515  1.1  rearnsha 	struct plcom_softc *sc = device_lookup(&plcom_cd, PLCOMUNIT(tp->t_dev));
   1516  1.1  rearnsha 	int s;
   1517  1.1  rearnsha 
   1518  1.1  rearnsha 	s = splserial();
   1519  1.1  rearnsha 	PLCOM_LOCK(sc);
   1520  1.1  rearnsha 	if (ISSET(tp->t_state, TS_BUSY)) {
   1521  1.1  rearnsha 		/* Stop transmitting at the next chunk. */
   1522  1.1  rearnsha 		sc->sc_tbc = 0;
   1523  1.1  rearnsha 		sc->sc_heldtbc = 0;
   1524  1.1  rearnsha 		if (!ISSET(tp->t_state, TS_TTSTOP))
   1525  1.1  rearnsha 			SET(tp->t_state, TS_FLUSH);
   1526  1.1  rearnsha 	}
   1527  1.1  rearnsha 	PLCOM_UNLOCK(sc);
   1528  1.1  rearnsha 	splx(s);
   1529  1.1  rearnsha }
   1530  1.1  rearnsha 
   1531  1.1  rearnsha void
   1532  1.1  rearnsha plcomdiag(void *arg)
   1533  1.1  rearnsha {
   1534  1.1  rearnsha 	struct plcom_softc *sc = arg;
   1535  1.1  rearnsha 	int overflows, floods;
   1536  1.1  rearnsha 	int s;
   1537  1.1  rearnsha 
   1538  1.1  rearnsha 	s = splserial();
   1539  1.1  rearnsha 	PLCOM_LOCK(sc);
   1540  1.1  rearnsha 	overflows = sc->sc_overflows;
   1541  1.1  rearnsha 	sc->sc_overflows = 0;
   1542  1.1  rearnsha 	floods = sc->sc_floods;
   1543  1.1  rearnsha 	sc->sc_floods = 0;
   1544  1.1  rearnsha 	sc->sc_errors = 0;
   1545  1.1  rearnsha 	PLCOM_UNLOCK(sc);
   1546  1.1  rearnsha 	splx(s);
   1547  1.1  rearnsha 
   1548  1.1  rearnsha 	log(LOG_WARNING, "%s: %d silo overflow%s, %d ibuf flood%s\n",
   1549  1.1  rearnsha 	    sc->sc_dev.dv_xname,
   1550  1.1  rearnsha 	    overflows, overflows == 1 ? "" : "s",
   1551  1.1  rearnsha 	    floods, floods == 1 ? "" : "s");
   1552  1.1  rearnsha }
   1553  1.1  rearnsha 
   1554  1.1  rearnsha integrate void
   1555  1.1  rearnsha plcom_rxsoft(struct plcom_softc *sc, struct tty *tp)
   1556  1.1  rearnsha {
   1557  1.1  rearnsha 	int (*rint) (int, struct tty *) = tp->t_linesw->l_rint;
   1558  1.1  rearnsha 	u_char *get, *end;
   1559  1.1  rearnsha 	u_int cc, scc;
   1560  1.1  rearnsha 	u_char rsr;
   1561  1.1  rearnsha 	int code;
   1562  1.1  rearnsha 	int s;
   1563  1.1  rearnsha 
   1564  1.1  rearnsha 	end = sc->sc_ebuf;
   1565  1.1  rearnsha 	get = sc->sc_rbget;
   1566  1.1  rearnsha 	scc = cc = plcom_rbuf_size - sc->sc_rbavail;
   1567  1.1  rearnsha 
   1568  1.1  rearnsha 	if (cc == plcom_rbuf_size) {
   1569  1.1  rearnsha 		sc->sc_floods++;
   1570  1.1  rearnsha 		if (sc->sc_errors++ == 0)
   1571  1.1  rearnsha 			callout_reset(&sc->sc_diag_callout, 60 * hz,
   1572  1.1  rearnsha 			    plcomdiag, sc);
   1573  1.1  rearnsha 	}
   1574  1.1  rearnsha 
   1575  1.1  rearnsha 	while (cc) {
   1576  1.1  rearnsha 		code = get[0];
   1577  1.1  rearnsha 		rsr = get[1];
   1578  1.1  rearnsha 		if (ISSET(rsr, RSR_OE | RSR_BE | RSR_FE | RSR_PE)) {
   1579  1.1  rearnsha 			if (ISSET(rsr, RSR_OE)) {
   1580  1.1  rearnsha 				sc->sc_overflows++;
   1581  1.1  rearnsha 				if (sc->sc_errors++ == 0)
   1582  1.1  rearnsha 					callout_reset(&sc->sc_diag_callout,
   1583  1.1  rearnsha 					    60 * hz, plcomdiag, sc);
   1584  1.1  rearnsha 			}
   1585  1.1  rearnsha 			if (ISSET(rsr, RSR_BE | RSR_FE))
   1586  1.1  rearnsha 				SET(code, TTY_FE);
   1587  1.1  rearnsha 			if (ISSET(rsr, RSR_PE))
   1588  1.1  rearnsha 				SET(code, TTY_PE);
   1589  1.1  rearnsha 		}
   1590  1.1  rearnsha 		if ((*rint)(code, tp) == -1) {
   1591  1.1  rearnsha 			/*
   1592  1.1  rearnsha 			 * The line discipline's buffer is out of space.
   1593  1.1  rearnsha 			 */
   1594  1.1  rearnsha 			if (!ISSET(sc->sc_rx_flags, RX_TTY_BLOCKED)) {
   1595  1.1  rearnsha 				/*
   1596  1.1  rearnsha 				 * We're either not using flow control, or the
   1597  1.1  rearnsha 				 * line discipline didn't tell us to block for
   1598  1.1  rearnsha 				 * some reason.  Either way, we have no way to
   1599  1.1  rearnsha 				 * know when there's more space available, so
   1600  1.1  rearnsha 				 * just drop the rest of the data.
   1601  1.1  rearnsha 				 */
   1602  1.1  rearnsha 				get += cc << 1;
   1603  1.1  rearnsha 				if (get >= end)
   1604  1.1  rearnsha 					get -= plcom_rbuf_size << 1;
   1605  1.1  rearnsha 				cc = 0;
   1606  1.1  rearnsha 			} else {
   1607  1.1  rearnsha 				/*
   1608  1.1  rearnsha 				 * Don't schedule any more receive processing
   1609  1.1  rearnsha 				 * until the line discipline tells us there's
   1610  1.1  rearnsha 				 * space available (through plcomhwiflow()).
   1611  1.1  rearnsha 				 * Leave the rest of the data in the input
   1612  1.1  rearnsha 				 * buffer.
   1613  1.1  rearnsha 				 */
   1614  1.1  rearnsha 				SET(sc->sc_rx_flags, RX_TTY_OVERFLOWED);
   1615  1.1  rearnsha 			}
   1616  1.1  rearnsha 			break;
   1617  1.1  rearnsha 		}
   1618  1.1  rearnsha 		get += 2;
   1619  1.1  rearnsha 		if (get >= end)
   1620  1.1  rearnsha 			get = sc->sc_rbuf;
   1621  1.1  rearnsha 		cc--;
   1622  1.1  rearnsha 	}
   1623  1.1  rearnsha 
   1624  1.1  rearnsha 	if (cc != scc) {
   1625  1.1  rearnsha 		sc->sc_rbget = get;
   1626  1.1  rearnsha 		s = splserial();
   1627  1.1  rearnsha 		PLCOM_LOCK(sc);
   1628  1.1  rearnsha 
   1629  1.1  rearnsha 		cc = sc->sc_rbavail += scc - cc;
   1630  1.1  rearnsha 		/* Buffers should be ok again, release possible block. */
   1631  1.1  rearnsha 		if (cc >= sc->sc_r_lowat) {
   1632  1.1  rearnsha 			if (ISSET(sc->sc_rx_flags, RX_IBUF_OVERFLOWED)) {
   1633  1.1  rearnsha 				CLR(sc->sc_rx_flags, RX_IBUF_OVERFLOWED);
   1634  1.1  rearnsha 				SET(sc->sc_cr, CR_RIE | CR_RTIE);
   1635  1.1  rearnsha 				bus_space_write_1(sc->sc_iot, sc->sc_ioh, plcom_cr, sc->sc_cr);
   1636  1.1  rearnsha 			}
   1637  1.1  rearnsha 			if (ISSET(sc->sc_rx_flags, RX_IBUF_BLOCKED)) {
   1638  1.1  rearnsha 				CLR(sc->sc_rx_flags, RX_IBUF_BLOCKED);
   1639  1.1  rearnsha 				plcom_hwiflow(sc);
   1640  1.1  rearnsha 			}
   1641  1.1  rearnsha 		}
   1642  1.1  rearnsha 		PLCOM_UNLOCK(sc);
   1643  1.1  rearnsha 		splx(s);
   1644  1.1  rearnsha 	}
   1645  1.1  rearnsha }
   1646  1.1  rearnsha 
   1647  1.1  rearnsha integrate void
   1648  1.1  rearnsha plcom_txsoft(struct plcom_softc *sc, struct tty *tp)
   1649  1.1  rearnsha {
   1650  1.1  rearnsha 
   1651  1.1  rearnsha 	CLR(tp->t_state, TS_BUSY);
   1652  1.1  rearnsha 	if (ISSET(tp->t_state, TS_FLUSH))
   1653  1.1  rearnsha 		CLR(tp->t_state, TS_FLUSH);
   1654  1.1  rearnsha 	else
   1655  1.1  rearnsha 		ndflush(&tp->t_outq, (int)(sc->sc_tba - tp->t_outq.c_cf));
   1656  1.1  rearnsha 	(*tp->t_linesw->l_start)(tp);
   1657  1.1  rearnsha }
   1658  1.1  rearnsha 
   1659  1.1  rearnsha integrate void
   1660  1.1  rearnsha plcom_stsoft(struct plcom_softc *sc, struct tty *tp)
   1661  1.1  rearnsha {
   1662  1.1  rearnsha 	u_char msr, delta;
   1663  1.1  rearnsha 	int s;
   1664  1.1  rearnsha 
   1665  1.1  rearnsha 	s = splserial();
   1666  1.1  rearnsha 	PLCOM_LOCK(sc);
   1667  1.1  rearnsha 	msr = sc->sc_msr;
   1668  1.1  rearnsha 	delta = sc->sc_msr_delta;
   1669  1.1  rearnsha 	sc->sc_msr_delta = 0;
   1670  1.1  rearnsha 	PLCOM_UNLOCK(sc);
   1671  1.1  rearnsha 	splx(s);
   1672  1.1  rearnsha 
   1673  1.1  rearnsha 	if (ISSET(delta, sc->sc_msr_dcd)) {
   1674  1.1  rearnsha 		/*
   1675  1.1  rearnsha 		 * Inform the tty layer that carrier detect changed.
   1676  1.1  rearnsha 		 */
   1677  1.1  rearnsha 		(void) (*tp->t_linesw->l_modem)(tp, ISSET(msr, MSR_DCD));
   1678  1.1  rearnsha 	}
   1679  1.1  rearnsha 
   1680  1.1  rearnsha 	if (ISSET(delta, sc->sc_msr_cts)) {
   1681  1.1  rearnsha 		/* Block or unblock output according to flow control. */
   1682  1.1  rearnsha 		if (ISSET(msr, sc->sc_msr_cts)) {
   1683  1.1  rearnsha 			sc->sc_tx_stopped = 0;
   1684  1.1  rearnsha 			(*tp->t_linesw->l_start)(tp);
   1685  1.1  rearnsha 		} else {
   1686  1.1  rearnsha 			sc->sc_tx_stopped = 1;
   1687  1.1  rearnsha 		}
   1688  1.1  rearnsha 	}
   1689  1.1  rearnsha 
   1690  1.1  rearnsha #ifdef PLCOM_DEBUG
   1691  1.1  rearnsha 	if (plcom_debug)
   1692  1.1  rearnsha 		plcomstatus(sc, "plcom_stsoft");
   1693  1.1  rearnsha #endif
   1694  1.1  rearnsha }
   1695  1.1  rearnsha 
   1696  1.1  rearnsha #ifdef __HAVE_GENERIC_SOFT_INTERRUPTS
   1697  1.1  rearnsha void
   1698  1.1  rearnsha plcomsoft(void *arg)
   1699  1.1  rearnsha {
   1700  1.1  rearnsha 	struct plcom_softc *sc = arg;
   1701  1.1  rearnsha 	struct tty *tp;
   1702  1.1  rearnsha 
   1703  1.1  rearnsha 	if (PLCOM_ISALIVE(sc) == 0)
   1704  1.1  rearnsha 		return;
   1705  1.1  rearnsha 
   1706  1.1  rearnsha 	{
   1707  1.1  rearnsha #else
   1708  1.1  rearnsha void
   1709  1.1  rearnsha #ifndef __NO_SOFT_SERIAL_INTERRUPT
   1710  1.1  rearnsha plcomsoft(void)
   1711  1.1  rearnsha #else
   1712  1.1  rearnsha plcomsoft(void *arg)
   1713  1.1  rearnsha #endif
   1714  1.1  rearnsha {
   1715  1.1  rearnsha 	struct plcom_softc	*sc;
   1716  1.1  rearnsha 	struct tty	*tp;
   1717  1.1  rearnsha 	int	unit;
   1718  1.1  rearnsha #ifdef __NO_SOFT_SERIAL_INTERRUPT
   1719  1.1  rearnsha 	int s;
   1720  1.1  rearnsha 
   1721  1.1  rearnsha 	s = splsoftserial();
   1722  1.1  rearnsha 	plcom_softintr_scheduled = 0;
   1723  1.1  rearnsha #endif
   1724  1.1  rearnsha 
   1725  1.1  rearnsha 	for (unit = 0; unit < plcom_cd.cd_ndevs; unit++) {
   1726  1.1  rearnsha 		sc = device_lookup(&plcom_cd, unit);
   1727  1.1  rearnsha 		if (sc == NULL || !ISSET(sc->sc_hwflags, PLCOM_HW_DEV_OK))
   1728  1.1  rearnsha 			continue;
   1729  1.1  rearnsha 
   1730  1.1  rearnsha 		if (PLCOM_ISALIVE(sc) == 0)
   1731  1.1  rearnsha 			continue;
   1732  1.1  rearnsha 
   1733  1.1  rearnsha 		tp = sc->sc_tty;
   1734  1.1  rearnsha 		if (tp == NULL)
   1735  1.1  rearnsha 			continue;
   1736  1.1  rearnsha 		if (!ISSET(tp->t_state, TS_ISOPEN) && tp->t_wopen == 0)
   1737  1.1  rearnsha 			continue;
   1738  1.1  rearnsha #endif
   1739  1.1  rearnsha 		tp = sc->sc_tty;
   1740  1.1  rearnsha 
   1741  1.1  rearnsha 		if (sc->sc_rx_ready) {
   1742  1.1  rearnsha 			sc->sc_rx_ready = 0;
   1743  1.1  rearnsha 			plcom_rxsoft(sc, tp);
   1744  1.1  rearnsha 		}
   1745  1.1  rearnsha 
   1746  1.1  rearnsha 		if (sc->sc_st_check) {
   1747  1.1  rearnsha 			sc->sc_st_check = 0;
   1748  1.1  rearnsha 			plcom_stsoft(sc, tp);
   1749  1.1  rearnsha 		}
   1750  1.1  rearnsha 
   1751  1.1  rearnsha 		if (sc->sc_tx_done) {
   1752  1.1  rearnsha 			sc->sc_tx_done = 0;
   1753  1.1  rearnsha 			plcom_txsoft(sc, tp);
   1754  1.1  rearnsha 		}
   1755  1.1  rearnsha 	}
   1756  1.1  rearnsha 
   1757  1.1  rearnsha #ifndef __HAVE_GENERIC_SOFT_INTERRUPTS
   1758  1.1  rearnsha #ifdef __NO_SOFT_SERIAL_INTERRUPT
   1759  1.1  rearnsha 	splx(s);
   1760  1.1  rearnsha #endif
   1761  1.1  rearnsha #endif
   1762  1.1  rearnsha }
   1763  1.1  rearnsha 
   1764  1.1  rearnsha #ifdef __ALIGN_BRACKET_LEVEL_FOR_CTAGS
   1765  1.1  rearnsha 	/* there has got to be a better way to do plcomsoft() */
   1766  1.1  rearnsha }}
   1767  1.1  rearnsha #endif
   1768  1.1  rearnsha 
   1769  1.1  rearnsha int
   1770  1.1  rearnsha plcomintr(void *arg)
   1771  1.1  rearnsha {
   1772  1.1  rearnsha 	struct plcom_softc *sc = arg;
   1773  1.1  rearnsha 	bus_space_tag_t iot = sc->sc_iot;
   1774  1.1  rearnsha 	bus_space_handle_t ioh = sc->sc_ioh;
   1775  1.1  rearnsha 	u_char *put, *end;
   1776  1.1  rearnsha 	u_int cc;
   1777  1.1  rearnsha 	u_char rsr, iir;
   1778  1.1  rearnsha 
   1779  1.1  rearnsha 	if (PLCOM_ISALIVE(sc) == 0)
   1780  1.1  rearnsha 		return 0;
   1781  1.1  rearnsha 
   1782  1.1  rearnsha 	PLCOM_LOCK(sc);
   1783  1.1  rearnsha 	iir = bus_space_read_1(iot, ioh, plcom_iir);
   1784  1.1  rearnsha 	if (! ISSET(iir, IIR_IMASK)) {
   1785  1.1  rearnsha 		PLCOM_UNLOCK(sc);
   1786  1.1  rearnsha 		return 0;
   1787  1.1  rearnsha 	}
   1788  1.1  rearnsha 
   1789  1.1  rearnsha 	end = sc->sc_ebuf;
   1790  1.1  rearnsha 	put = sc->sc_rbput;
   1791  1.1  rearnsha 	cc = sc->sc_rbavail;
   1792  1.1  rearnsha 
   1793  1.1  rearnsha 	do {
   1794  1.1  rearnsha 		u_char	msr, delta, fr;
   1795  1.1  rearnsha 
   1796  1.1  rearnsha 		fr = bus_space_read_1(iot, ioh, plcom_fr);
   1797  1.1  rearnsha 
   1798  1.1  rearnsha 		if (!ISSET(fr, FR_RXFE) &&
   1799  1.1  rearnsha 		    !ISSET(sc->sc_rx_flags, RX_IBUF_OVERFLOWED)) {
   1800  1.1  rearnsha 			while (cc > 0) {
   1801  1.1  rearnsha 				int cn_trapped = 0;
   1802  1.1  rearnsha 				put[0] = bus_space_read_1(iot, ioh,
   1803  1.1  rearnsha 				    plcom_dr);
   1804  1.1  rearnsha 				rsr = bus_space_read_1(iot, ioh, plcom_rsr);
   1805  1.1  rearnsha 				/* Clear any error status.  */
   1806  1.1  rearnsha 				if (ISSET(rsr,
   1807  1.1  rearnsha 				    (RSR_BE | RSR_OE | RSR_PE | RSR_FE)))
   1808  1.1  rearnsha 					bus_space_write_1(iot, ioh, plcom_ecr,
   1809  1.1  rearnsha 					    0);
   1810  1.1  rearnsha 				if (ISSET(rsr, RSR_BE)) {
   1811  1.1  rearnsha 					int cn_trapped = 0;
   1812  1.1  rearnsha 					cn_check_magic(sc->sc_tty->t_dev,
   1813  1.1  rearnsha 					    CNC_BREAK, plcom_cnm_state);
   1814  1.1  rearnsha 					if (cn_trapped)
   1815  1.1  rearnsha 						continue;
   1816  1.1  rearnsha #if defined(KGDB)
   1817  1.1  rearnsha 					if (ISSET(sc->sc_hwflags,
   1818  1.1  rearnsha 					    PLCOM_HW_KGDB)) {
   1819  1.1  rearnsha 						kgdb_connect(1);
   1820  1.1  rearnsha 						continue;
   1821  1.1  rearnsha 					}
   1822  1.1  rearnsha #endif
   1823  1.1  rearnsha 				}
   1824  1.1  rearnsha 
   1825  1.1  rearnsha 				put[1] = rsr;
   1826  1.1  rearnsha 				cn_check_magic(sc->sc_tty->t_dev,
   1827  1.1  rearnsha 					       put[0], plcom_cnm_state);
   1828  1.1  rearnsha 				if (cn_trapped) {
   1829  1.1  rearnsha 					fr = bus_space_read_1(iot, ioh,
   1830  1.1  rearnsha 					    plcom_fr);
   1831  1.1  rearnsha 					if (ISSET(fr, FR_RXFE))
   1832  1.1  rearnsha 						break;
   1833  1.1  rearnsha 
   1834  1.1  rearnsha 					continue;
   1835  1.1  rearnsha 				}
   1836  1.1  rearnsha 				put += 2;
   1837  1.1  rearnsha 				if (put >= end)
   1838  1.1  rearnsha 					put = sc->sc_rbuf;
   1839  1.1  rearnsha 				cc--;
   1840  1.1  rearnsha 
   1841  1.1  rearnsha 				fr = bus_space_read_1(iot, ioh, plcom_fr);
   1842  1.1  rearnsha 				if (ISSET(fr, FR_RXFE))
   1843  1.1  rearnsha 					break;
   1844  1.1  rearnsha 			}
   1845  1.1  rearnsha 
   1846  1.1  rearnsha 			/*
   1847  1.1  rearnsha 			 * Current string of incoming characters ended because
   1848  1.1  rearnsha 			 * no more data was available or we ran out of space.
   1849  1.1  rearnsha 			 * Schedule a receive event if any data was received.
   1850  1.1  rearnsha 			 * If we're out of space, turn off receive interrupts.
   1851  1.1  rearnsha 			 */
   1852  1.1  rearnsha 			sc->sc_rbput = put;
   1853  1.1  rearnsha 			sc->sc_rbavail = cc;
   1854  1.1  rearnsha 			if (!ISSET(sc->sc_rx_flags, RX_TTY_OVERFLOWED))
   1855  1.1  rearnsha 				sc->sc_rx_ready = 1;
   1856  1.1  rearnsha 
   1857  1.1  rearnsha 			/*
   1858  1.1  rearnsha 			 * See if we are in danger of overflowing a buffer. If
   1859  1.1  rearnsha 			 * so, use hardware flow control to ease the pressure.
   1860  1.1  rearnsha 			 */
   1861  1.1  rearnsha 			if (!ISSET(sc->sc_rx_flags, RX_IBUF_BLOCKED) &&
   1862  1.1  rearnsha 			    cc < sc->sc_r_hiwat) {
   1863  1.1  rearnsha 				SET(sc->sc_rx_flags, RX_IBUF_BLOCKED);
   1864  1.1  rearnsha 				plcom_hwiflow(sc);
   1865  1.1  rearnsha 			}
   1866  1.1  rearnsha 
   1867  1.1  rearnsha 			/*
   1868  1.1  rearnsha 			 * If we're out of space, disable receive interrupts
   1869  1.1  rearnsha 			 * until the queue has drained a bit.
   1870  1.1  rearnsha 			 */
   1871  1.1  rearnsha 			if (!cc) {
   1872  1.1  rearnsha 				SET(sc->sc_rx_flags, RX_IBUF_OVERFLOWED);
   1873  1.1  rearnsha 				CLR(sc->sc_cr, CR_RIE | CR_RTIE);
   1874  1.1  rearnsha 				bus_space_write_1(iot, ioh, plcom_cr,
   1875  1.1  rearnsha 				    sc->sc_cr);
   1876  1.1  rearnsha 			}
   1877  1.1  rearnsha 		} else {
   1878  1.1  rearnsha 			if (ISSET(iir, IIR_RIS)) {
   1879  1.1  rearnsha 				bus_space_write_1(iot, ioh, plcom_cr, 0);
   1880  1.1  rearnsha 				delay(10);
   1881  1.1  rearnsha 				bus_space_write_1(iot, ioh, plcom_cr,
   1882  1.1  rearnsha 				    sc->sc_cr);
   1883  1.1  rearnsha 				continue;
   1884  1.1  rearnsha 			}
   1885  1.1  rearnsha 		}
   1886  1.1  rearnsha 
   1887  1.1  rearnsha 		msr = bus_space_read_1(iot, ioh, plcom_fr);
   1888  1.1  rearnsha 		delta = msr ^ sc->sc_msr;
   1889  1.1  rearnsha 		sc->sc_msr = msr;
   1890  1.1  rearnsha 		/* Clear any pending modem status interrupt.  */
   1891  1.1  rearnsha 		if (iir & IIR_MIS)
   1892  1.1  rearnsha 			bus_space_write_1(iot, ioh, plcom_icr, 0);
   1893  1.1  rearnsha 		/*
   1894  1.1  rearnsha 		 * Pulse-per-second (PSS) signals on edge of DCD?
   1895  1.1  rearnsha 		 * Process these even if line discipline is ignoring DCD.
   1896  1.1  rearnsha 		 */
   1897  1.1  rearnsha 		if (delta & sc->sc_ppsmask) {
   1898  1.1  rearnsha 			struct timeval tv;
   1899  1.1  rearnsha 		    	if ((msr & sc->sc_ppsmask) == sc->sc_ppsassert) {
   1900  1.1  rearnsha 				/* XXX nanotime() */
   1901  1.1  rearnsha 				microtime(&tv);
   1902  1.1  rearnsha 				TIMEVAL_TO_TIMESPEC(&tv,
   1903  1.1  rearnsha 				    &sc->ppsinfo.assert_timestamp);
   1904  1.1  rearnsha 				if (sc->ppsparam.mode & PPS_OFFSETASSERT) {
   1905  1.1  rearnsha 					timespecadd(&sc->ppsinfo.assert_timestamp,
   1906  1.1  rearnsha 					    &sc->ppsparam.assert_offset,
   1907  1.1  rearnsha 						    &sc->ppsinfo.assert_timestamp);
   1908  1.1  rearnsha 				}
   1909  1.1  rearnsha 
   1910  1.1  rearnsha #ifdef PPS_SYNC
   1911  1.1  rearnsha 				if (sc->ppsparam.mode & PPS_HARDPPSONASSERT)
   1912  1.1  rearnsha 					hardpps(&tv, tv.tv_usec);
   1913  1.1  rearnsha #endif
   1914  1.1  rearnsha 				sc->ppsinfo.assert_sequence++;
   1915  1.1  rearnsha 				sc->ppsinfo.current_mode = sc->ppsparam.mode;
   1916  1.1  rearnsha 
   1917  1.1  rearnsha 			} else if ((msr & sc->sc_ppsmask) == sc->sc_ppsclear) {
   1918  1.1  rearnsha 				/* XXX nanotime() */
   1919  1.1  rearnsha 				microtime(&tv);
   1920  1.1  rearnsha 				TIMEVAL_TO_TIMESPEC(&tv,
   1921  1.1  rearnsha 				    &sc->ppsinfo.clear_timestamp);
   1922  1.1  rearnsha 				if (sc->ppsparam.mode & PPS_OFFSETCLEAR) {
   1923  1.1  rearnsha 					timespecadd(&sc->ppsinfo.clear_timestamp,
   1924  1.1  rearnsha 					    &sc->ppsparam.clear_offset,
   1925  1.1  rearnsha 					    &sc->ppsinfo.clear_timestamp);
   1926  1.1  rearnsha 				}
   1927  1.1  rearnsha 
   1928  1.1  rearnsha #ifdef PPS_SYNC
   1929  1.1  rearnsha 				if (sc->ppsparam.mode & PPS_HARDPPSONCLEAR)
   1930  1.1  rearnsha 					hardpps(&tv, tv.tv_usec);
   1931  1.1  rearnsha #endif
   1932  1.1  rearnsha 				sc->ppsinfo.clear_sequence++;
   1933  1.1  rearnsha 				sc->ppsinfo.current_mode = sc->ppsparam.mode;
   1934  1.1  rearnsha 			}
   1935  1.1  rearnsha 		}
   1936  1.1  rearnsha 
   1937  1.1  rearnsha 		/*
   1938  1.1  rearnsha 		 * Process normal status changes
   1939  1.1  rearnsha 		 */
   1940  1.1  rearnsha 		if (ISSET(delta, sc->sc_msr_mask)) {
   1941  1.1  rearnsha 			SET(sc->sc_msr_delta, delta);
   1942  1.1  rearnsha 
   1943  1.1  rearnsha 			/*
   1944  1.1  rearnsha 			 * Stop output immediately if we lose the output
   1945  1.1  rearnsha 			 * flow control signal or carrier detect.
   1946  1.1  rearnsha 			 */
   1947  1.1  rearnsha 			if (ISSET(~msr, sc->sc_msr_mask)) {
   1948  1.1  rearnsha 				sc->sc_tbc = 0;
   1949  1.1  rearnsha 				sc->sc_heldtbc = 0;
   1950  1.1  rearnsha #ifdef PLCOM_DEBUG
   1951  1.1  rearnsha 				if (plcom_debug)
   1952  1.1  rearnsha 					plcomstatus(sc, "plcomintr  ");
   1953  1.1  rearnsha #endif
   1954  1.1  rearnsha 			}
   1955  1.1  rearnsha 
   1956  1.1  rearnsha 			sc->sc_st_check = 1;
   1957  1.1  rearnsha 		}
   1958  1.1  rearnsha 
   1959  1.1  rearnsha 		/*
   1960  1.1  rearnsha 		 * Done handling any receive interrupts. See if data
   1961  1.1  rearnsha 		 * can be * transmitted as well. Schedule tx done
   1962  1.1  rearnsha 		 * event if no data left * and tty was marked busy.
   1963  1.1  rearnsha 		 */
   1964  1.1  rearnsha 		if (ISSET(iir, IIR_TIS)) {
   1965  1.1  rearnsha 			/*
   1966  1.1  rearnsha 			 * If we've delayed a parameter change, do it
   1967  1.1  rearnsha 			 * now, and restart * output.
   1968  1.1  rearnsha 			 */
   1969  1.1  rearnsha 			if (sc->sc_heldchange) {
   1970  1.1  rearnsha 				plcom_loadchannelregs(sc);
   1971  1.1  rearnsha 				sc->sc_heldchange = 0;
   1972  1.1  rearnsha 				sc->sc_tbc = sc->sc_heldtbc;
   1973  1.1  rearnsha 				sc->sc_heldtbc = 0;
   1974  1.1  rearnsha 			}
   1975  1.1  rearnsha 
   1976  1.1  rearnsha 			/*
   1977  1.1  rearnsha 			 * Output the next chunk of the contiguous
   1978  1.1  rearnsha 			 * buffer, if any.
   1979  1.1  rearnsha 			 */
   1980  1.1  rearnsha 			if (sc->sc_tbc > 0) {
   1981  1.1  rearnsha 				int n;
   1982  1.1  rearnsha 
   1983  1.1  rearnsha 				n = sc->sc_tbc;
   1984  1.1  rearnsha 				if (n > sc->sc_fifolen)
   1985  1.1  rearnsha 					n = sc->sc_fifolen;
   1986  1.1  rearnsha 				bus_space_write_multi_1(iot, ioh, plcom_dr,
   1987  1.1  rearnsha 				    sc->sc_tba, n);
   1988  1.1  rearnsha 				sc->sc_tbc -= n;
   1989  1.1  rearnsha 				sc->sc_tba += n;
   1990  1.1  rearnsha 			} else {
   1991  1.1  rearnsha 				/*
   1992  1.1  rearnsha 				 * Disable transmit plcompletion
   1993  1.1  rearnsha 				 * interrupts if necessary.
   1994  1.1  rearnsha 				 */
   1995  1.1  rearnsha 				if (ISSET(sc->sc_cr, CR_TIE)) {
   1996  1.1  rearnsha 					CLR(sc->sc_cr, CR_TIE);
   1997  1.1  rearnsha 					bus_space_write_1(iot, ioh, plcom_cr,
   1998  1.1  rearnsha 					    sc->sc_cr);
   1999  1.1  rearnsha 				}
   2000  1.1  rearnsha 				if (sc->sc_tx_busy) {
   2001  1.1  rearnsha 					sc->sc_tx_busy = 0;
   2002  1.1  rearnsha 					sc->sc_tx_done = 1;
   2003  1.1  rearnsha 				}
   2004  1.1  rearnsha 			}
   2005  1.1  rearnsha 		}
   2006  1.1  rearnsha 	} while (ISSET((iir = bus_space_read_1(iot, ioh, plcom_iir)),
   2007  1.1  rearnsha 	    IIR_IMASK));
   2008  1.1  rearnsha 
   2009  1.1  rearnsha 	PLCOM_UNLOCK(sc);
   2010  1.1  rearnsha 
   2011  1.1  rearnsha 	/* Wake up the poller. */
   2012  1.1  rearnsha #ifdef __HAVE_GENERIC_SOFT_INTERRUPTS
   2013  1.1  rearnsha 	softintr_schedule(sc->sc_si);
   2014  1.1  rearnsha #else
   2015  1.1  rearnsha #ifndef __NO_SOFT_SERIAL_INTERRUPT
   2016  1.1  rearnsha 	setsoftserial();
   2017  1.1  rearnsha #else
   2018  1.1  rearnsha 	if (!plcom_softintr_scheduled) {
   2019  1.1  rearnsha 		plcom_softintr_scheduled = 1;
   2020  1.1  rearnsha 		callout_reset(&plcomsoft_callout, 1, plcomsoft, NULL);
   2021  1.1  rearnsha 	}
   2022  1.1  rearnsha #endif
   2023  1.1  rearnsha #endif
   2024  1.1  rearnsha 
   2025  1.1  rearnsha #if NRND > 0 && defined(RND_COM)
   2026  1.1  rearnsha 	rnd_add_uint32(&sc->rnd_source, iir | rsr);
   2027  1.1  rearnsha #endif
   2028  1.1  rearnsha 
   2029  1.1  rearnsha 	return 1;
   2030  1.1  rearnsha }
   2031  1.1  rearnsha 
   2032  1.1  rearnsha /*
   2033  1.1  rearnsha  * The following functions are polled getc and putc routines, shared
   2034  1.1  rearnsha  * by the console and kgdb glue.
   2035  1.1  rearnsha  *
   2036  1.1  rearnsha  * The read-ahead code is so that you can detect pending in-band
   2037  1.1  rearnsha  * cn_magic in polled mode while doing output rather than having to
   2038  1.1  rearnsha  * wait until the kernel decides it needs input.
   2039  1.1  rearnsha  */
   2040  1.1  rearnsha 
   2041  1.1  rearnsha #define MAX_READAHEAD	20
   2042  1.1  rearnsha static int plcom_readahead[MAX_READAHEAD];
   2043  1.1  rearnsha static int plcom_readaheadcount = 0;
   2044  1.1  rearnsha 
   2045  1.1  rearnsha int
   2046  1.1  rearnsha plcom_common_getc(dev_t dev, bus_space_tag_t iot, bus_space_handle_t ioh)
   2047  1.1  rearnsha {
   2048  1.1  rearnsha 	int s = splserial();
   2049  1.1  rearnsha 	u_char stat, c;
   2050  1.1  rearnsha 
   2051  1.1  rearnsha 	/* got a character from reading things earlier */
   2052  1.1  rearnsha 	if (plcom_readaheadcount > 0) {
   2053  1.1  rearnsha 		int i;
   2054  1.1  rearnsha 
   2055  1.1  rearnsha 		c = plcom_readahead[0];
   2056  1.1  rearnsha 		for (i = 1; i < plcom_readaheadcount; i++) {
   2057  1.1  rearnsha 			plcom_readahead[i-1] = plcom_readahead[i];
   2058  1.1  rearnsha 		}
   2059  1.1  rearnsha 		plcom_readaheadcount--;
   2060  1.1  rearnsha 		splx(s);
   2061  1.1  rearnsha 		return c;
   2062  1.1  rearnsha 	}
   2063  1.1  rearnsha 
   2064  1.1  rearnsha 	/* block until a character becomes available */
   2065  1.1  rearnsha 	while (ISSET(stat = bus_space_read_1(iot, ioh, plcom_fr), FR_RXFE))
   2066  1.1  rearnsha 		;
   2067  1.1  rearnsha 
   2068  1.1  rearnsha 	c = bus_space_read_1(iot, ioh, plcom_dr);
   2069  1.1  rearnsha 	stat = bus_space_read_1(iot, ioh, plcom_iir);
   2070  1.1  rearnsha 	{
   2071  1.1  rearnsha 		int cn_trapped = 0; /* unused */
   2072  1.1  rearnsha #ifdef DDB
   2073  1.1  rearnsha 		extern int db_active;
   2074  1.1  rearnsha 		if (!db_active)
   2075  1.1  rearnsha #endif
   2076  1.1  rearnsha 			cn_check_magic(dev, c, plcom_cnm_state);
   2077  1.1  rearnsha 	}
   2078  1.1  rearnsha 	splx(s);
   2079  1.1  rearnsha 	return c;
   2080  1.1  rearnsha }
   2081  1.1  rearnsha 
   2082  1.1  rearnsha void
   2083  1.1  rearnsha plcom_common_putc(dev_t dev, bus_space_tag_t iot, bus_space_handle_t ioh,
   2084  1.1  rearnsha     int c)
   2085  1.1  rearnsha {
   2086  1.1  rearnsha 	int s = splserial();
   2087  1.1  rearnsha 	int timo;
   2088  1.1  rearnsha 
   2089  1.1  rearnsha 	int cin, stat;
   2090  1.1  rearnsha 	if (plcom_readaheadcount < MAX_READAHEAD
   2091  1.1  rearnsha 	     && !ISSET(stat = bus_space_read_1(iot, ioh, plcom_fr), FR_RXFE)) {
   2092  1.1  rearnsha 		int cn_trapped = 0;
   2093  1.1  rearnsha 		cin = bus_space_read_1(iot, ioh, plcom_dr);
   2094  1.1  rearnsha 		stat = bus_space_read_1(iot, ioh, plcom_iir);
   2095  1.1  rearnsha 		cn_check_magic(dev, cin, plcom_cnm_state);
   2096  1.1  rearnsha 		plcom_readahead[plcom_readaheadcount++] = cin;
   2097  1.1  rearnsha 	}
   2098  1.1  rearnsha 
   2099  1.1  rearnsha 	/* wait for any pending transmission to finish */
   2100  1.1  rearnsha 	timo = 150000;
   2101  1.1  rearnsha 	while (!ISSET(bus_space_read_1(iot, ioh, plcom_fr), FR_TXFE) && --timo)
   2102  1.1  rearnsha 		continue;
   2103  1.1  rearnsha 
   2104  1.1  rearnsha 	bus_space_write_1(iot, ioh, plcom_dr, c);
   2105  1.1  rearnsha 	PLCOM_BARRIER(iot, ioh, BR | BW);
   2106  1.1  rearnsha 
   2107  1.1  rearnsha 	/* wait for this transmission to complete */
   2108  1.1  rearnsha 	timo = 1500000;
   2109  1.1  rearnsha 	while (!ISSET(bus_space_read_1(iot, ioh, plcom_fr), FR_TXFE) && --timo)
   2110  1.1  rearnsha 		continue;
   2111  1.1  rearnsha 
   2112  1.1  rearnsha 	splx(s);
   2113  1.1  rearnsha }
   2114  1.1  rearnsha 
   2115  1.1  rearnsha /*
   2116  1.1  rearnsha  * Initialize UART for use as console or KGDB line.
   2117  1.1  rearnsha  */
   2118  1.1  rearnsha int
   2119  1.1  rearnsha plcominit(bus_space_tag_t iot, bus_addr_t iobase, int rate, int frequency,
   2120  1.1  rearnsha     tcflag_t cflag, bus_space_handle_t *iohp)
   2121  1.1  rearnsha {
   2122  1.1  rearnsha 	bus_space_handle_t ioh;
   2123  1.1  rearnsha 
   2124  1.1  rearnsha 	if (bus_space_map(iot, iobase, PLCOM_UART_SIZE, 0, &ioh))
   2125  1.1  rearnsha 		return ENOMEM; /* ??? */
   2126  1.1  rearnsha 
   2127  1.1  rearnsha 	rate = plcomspeed(rate, frequency);
   2128  1.1  rearnsha 	bus_space_write_1(iot, ioh, plcom_cr, 0);
   2129  1.1  rearnsha 	bus_space_write_1(iot, ioh, plcom_dlbl, rate);
   2130  1.1  rearnsha 	bus_space_write_1(iot, ioh, plcom_dlbh, rate >> 8);
   2131  1.1  rearnsha 	bus_space_write_1(iot, ioh, plcom_lcr, cflag2lcr(cflag) | LCR_FEN);
   2132  1.1  rearnsha 	bus_space_write_1(iot, ioh, plcom_cr, CR_UARTEN);
   2133  1.1  rearnsha 
   2134  1.1  rearnsha #if 0
   2135  1.1  rearnsha 	/* Ought to do something like this, but we have no sc to
   2136  1.1  rearnsha 	   dereference. */
   2137  1.1  rearnsha 	sc->sc_set_mcr(sc->sc_set_mcr_arg, sc->sc_dev.dv_unit,
   2138  1.1  rearnsha 	    MCR_DTR | MCR_RTS);
   2139  1.1  rearnsha #endif
   2140  1.1  rearnsha 
   2141  1.1  rearnsha 	*iohp = ioh;
   2142  1.1  rearnsha 	return 0;
   2143  1.1  rearnsha }
   2144  1.1  rearnsha 
   2145  1.1  rearnsha /*
   2146  1.1  rearnsha  * Following are all routines needed for PLCOM to act as console
   2147  1.1  rearnsha  */
   2148  1.1  rearnsha struct consdev plcomcons = {
   2149  1.1  rearnsha 	NULL, NULL, plcomcngetc, plcomcnputc, plcomcnpollc, NULL,
   2150  1.1  rearnsha 	NODEV, CN_NORMAL
   2151  1.1  rearnsha };
   2152  1.1  rearnsha 
   2153  1.1  rearnsha 
   2154  1.1  rearnsha int
   2155  1.1  rearnsha plcomcnattach(bus_space_tag_t iot, bus_addr_t iobase, int rate, int frequency,
   2156  1.1  rearnsha     tcflag_t cflag, int unit)
   2157  1.1  rearnsha {
   2158  1.1  rearnsha 	int res;
   2159  1.1  rearnsha 
   2160  1.1  rearnsha 	res = plcominit(iot, iobase, rate, frequency, cflag, &plcomconsioh);
   2161  1.1  rearnsha 	if (res)
   2162  1.1  rearnsha 		return res;
   2163  1.1  rearnsha 
   2164  1.1  rearnsha 	cn_tab = &plcomcons;
   2165  1.1  rearnsha 	cn_init_magic(&plcom_cnm_state);
   2166  1.1  rearnsha 	cn_set_magic("\047\001"); /* default magic is BREAK */
   2167  1.1  rearnsha 
   2168  1.1  rearnsha 	plcomconstag = iot;
   2169  1.1  rearnsha 	plcomconsunit = unit;
   2170  1.1  rearnsha 	plcomconsrate = rate;
   2171  1.1  rearnsha 	plcomconscflag = cflag;
   2172  1.1  rearnsha 
   2173  1.1  rearnsha 	return 0;
   2174  1.1  rearnsha }
   2175  1.1  rearnsha 
   2176  1.1  rearnsha void
   2177  1.1  rearnsha plcomcndetach(void)
   2178  1.1  rearnsha {
   2179  1.1  rearnsha 	bus_space_unmap(plcomconstag, plcomconsioh, PLCOM_UART_SIZE);
   2180  1.1  rearnsha 	plcomconstag = NULL;
   2181  1.1  rearnsha 
   2182  1.1  rearnsha 	cn_tab = NULL;
   2183  1.1  rearnsha }
   2184  1.1  rearnsha 
   2185  1.1  rearnsha int
   2186  1.1  rearnsha plcomcngetc(dev_t dev)
   2187  1.1  rearnsha {
   2188  1.1  rearnsha 	return plcom_common_getc(dev, plcomconstag, plcomconsioh);
   2189  1.1  rearnsha }
   2190  1.1  rearnsha 
   2191  1.1  rearnsha /*
   2192  1.1  rearnsha  * Console kernel output character routine.
   2193  1.1  rearnsha  */
   2194  1.1  rearnsha void
   2195  1.1  rearnsha plcomcnputc(dev_t dev, int c)
   2196  1.1  rearnsha {
   2197  1.1  rearnsha 	plcom_common_putc(dev, plcomconstag, plcomconsioh, c);
   2198  1.1  rearnsha }
   2199  1.1  rearnsha 
   2200  1.1  rearnsha void
   2201  1.1  rearnsha plcomcnpollc(dev_t dev, int on)
   2202  1.1  rearnsha {
   2203  1.1  rearnsha 
   2204  1.1  rearnsha }
   2205  1.1  rearnsha 
   2206  1.1  rearnsha #ifdef KGDB
   2207  1.1  rearnsha int
   2208  1.1  rearnsha plcom_kgdb_attach(bus_space_tag_t iot, bus_addr_t iobase, int rate,
   2209  1.1  rearnsha    int frequency, tcflag_t cflag, int unit)
   2210  1.1  rearnsha {
   2211  1.1  rearnsha 	int res;
   2212  1.1  rearnsha 
   2213  1.1  rearnsha 	if (iot == plcomconstag && iobase == plcomconsunit)
   2214  1.1  rearnsha 		return EBUSY; /* cannot share with console */
   2215  1.1  rearnsha 
   2216  1.1  rearnsha 	res = plcominit(iot, iobase, rate, frequency, cflag, &plcom_kgdb_ioh);
   2217  1.1  rearnsha 	if (res)
   2218  1.1  rearnsha 		return res;
   2219  1.1  rearnsha 
   2220  1.1  rearnsha 	kgdb_attach(plcom_kgdb_getc, plcom_kgdb_putc, NULL);
   2221  1.1  rearnsha 	kgdb_dev = 123; /* unneeded, only to satisfy some tests */
   2222  1.1  rearnsha 
   2223  1.1  rearnsha 	plcom_kgdb_iot = iot;
   2224  1.1  rearnsha 	plcom_kgdb_unit = unit;
   2225  1.1  rearnsha 
   2226  1.1  rearnsha 	return 0;
   2227  1.1  rearnsha }
   2228  1.1  rearnsha 
   2229  1.1  rearnsha /* ARGSUSED */
   2230  1.1  rearnsha int
   2231  1.1  rearnsha plcom_kgdb_getc(void *arg)
   2232  1.1  rearnsha {
   2233  1.1  rearnsha 	return plcom_common_getc(NODEV, plcom_kgdb_iot, plcom_kgdb_ioh);
   2234  1.1  rearnsha }
   2235  1.1  rearnsha 
   2236  1.1  rearnsha /* ARGSUSED */
   2237  1.1  rearnsha void
   2238  1.1  rearnsha plcom_kgdb_putc(void *arg, int c)
   2239  1.1  rearnsha {
   2240  1.1  rearnsha 	plcom_common_putc(NODEV, plcom_kgdb_iot, plcom_kgdb_ioh, c);
   2241  1.1  rearnsha }
   2242  1.1  rearnsha #endif /* KGDB */
   2243  1.1  rearnsha 
   2244  1.1  rearnsha /* helper function to identify the plcom ports used by
   2245  1.1  rearnsha  console or KGDB (and not yet autoconf attached) */
   2246  1.1  rearnsha int
   2247  1.1  rearnsha plcom_is_console(bus_space_tag_t iot, int unit,
   2248  1.1  rearnsha     bus_space_handle_t *ioh)
   2249  1.1  rearnsha {
   2250  1.1  rearnsha 	bus_space_handle_t help;
   2251  1.1  rearnsha 
   2252  1.1  rearnsha 	if (!plcomconsattached &&
   2253  1.1  rearnsha 	    iot == plcomconstag && unit == plcomconsunit)
   2254  1.1  rearnsha 		help = plcomconsioh;
   2255  1.1  rearnsha #ifdef KGDB
   2256  1.1  rearnsha 	else if (!plcom_kgdb_attached &&
   2257  1.1  rearnsha 	    iot == plcom_kgdb_iot && unit == plcom_kgdb_unit)
   2258  1.1  rearnsha 		help = plcom_kgdb_ioh;
   2259  1.1  rearnsha #endif
   2260  1.1  rearnsha 	else
   2261  1.1  rearnsha 		return 0;
   2262  1.1  rearnsha 
   2263  1.1  rearnsha 	if (ioh)
   2264  1.1  rearnsha 		*ioh = help;
   2265  1.1  rearnsha 	return 1;
   2266  1.1  rearnsha }
   2267