Home | History | Annotate | Line # | Download | only in ic
      1  1.388      imil /* $NetBSD: com.c,v 1.388 2025/02/12 05:15:39 imil Exp $ */
      2   1.38       cgd 
      3    1.1       cgd /*-
      4  1.269        ad  * Copyright (c) 1998, 1999, 2004, 2008 The NetBSD Foundation, Inc.
      5  1.146   mycroft  * All rights reserved.
      6   1.99   mycroft  *
      7  1.146   mycroft  * This code is derived from software contributed to The NetBSD Foundation
      8  1.146   mycroft  * by Charles M. Hannum.
      9   1.99   mycroft  *
     10   1.99   mycroft  * Redistribution and use in source and binary forms, with or without
     11   1.99   mycroft  * modification, are permitted provided that the following conditions
     12   1.99   mycroft  * are met:
     13   1.99   mycroft  * 1. Redistributions of source code must retain the above copyright
     14   1.99   mycroft  *    notice, this list of conditions and the following disclaimer.
     15   1.99   mycroft  * 2. Redistributions in binary form must reproduce the above copyright
     16   1.99   mycroft  *    notice, this list of conditions and the following disclaimer in the
     17   1.99   mycroft  *    documentation and/or other materials provided with the distribution.
     18   1.99   mycroft  *
     19  1.146   mycroft  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20  1.146   mycroft  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21  1.146   mycroft  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22  1.146   mycroft  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23  1.146   mycroft  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24  1.146   mycroft  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25  1.146   mycroft  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26  1.146   mycroft  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27  1.146   mycroft  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28  1.146   mycroft  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29  1.146   mycroft  * POSSIBILITY OF SUCH DAMAGE.
     30   1.99   mycroft  */
     31   1.99   mycroft 
     32   1.99   mycroft /*
     33    1.1       cgd  * Copyright (c) 1991 The Regents of the University of California.
     34    1.1       cgd  * All rights reserved.
     35    1.1       cgd  *
     36    1.1       cgd  * Redistribution and use in source and binary forms, with or without
     37    1.1       cgd  * modification, are permitted provided that the following conditions
     38    1.1       cgd  * are met:
     39    1.1       cgd  * 1. Redistributions of source code must retain the above copyright
     40    1.1       cgd  *    notice, this list of conditions and the following disclaimer.
     41    1.1       cgd  * 2. Redistributions in binary form must reproduce the above copyright
     42    1.1       cgd  *    notice, this list of conditions and the following disclaimer in the
     43    1.1       cgd  *    documentation and/or other materials provided with the distribution.
     44  1.217       agc  * 3. Neither the name of the University nor the names of its contributors
     45    1.1       cgd  *    may be used to endorse or promote products derived from this software
     46    1.1       cgd  *    without specific prior written permission.
     47    1.1       cgd  *
     48    1.1       cgd  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     49    1.1       cgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     50    1.1       cgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     51    1.1       cgd  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     52    1.1       cgd  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     53    1.1       cgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     54    1.1       cgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     55    1.1       cgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     56    1.1       cgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     57    1.1       cgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     58    1.1       cgd  * SUCH DAMAGE.
     59    1.1       cgd  *
     60   1.38       cgd  *	@(#)com.c	7.5 (Berkeley) 5/16/91
     61    1.1       cgd  */
     62    1.1       cgd 
     63    1.1       cgd /*
     64   1.99   mycroft  * COM driver, uses National Semiconductor NS16450/NS16550AF UART
     65  1.116      fvdl  * Supports automatic hardware flow control on StarTech ST16C650A UART
     66  1.375  riastrad  *
     67  1.375  riastrad  * Lock order:
     68  1.384  riastrad  *	ttylock (IPL_VM)
     69  1.375  riastrad  *	-> sc->sc_lock (IPL_HIGH)
     70  1.383  riastrad  *	-> timecounter_lock (IPL_HIGH)
     71    1.1       cgd  */
     72  1.191     lukem 
     73  1.191     lukem #include <sys/cdefs.h>
     74  1.388      imil __KERNEL_RCSID(0, "$NetBSD: com.c,v 1.388 2025/02/12 05:15:39 imil Exp $");
     75  1.145  jonathan 
     76  1.185     lukem #include "opt_com.h"
     77  1.145  jonathan #include "opt_ddb.h"
     78  1.185     lukem #include "opt_kgdb.h"
     79  1.213    martin #include "opt_lockdebug.h"
     80  1.213    martin #include "opt_multiprocessor.h"
     81  1.224    simonb #include "opt_ntp.h"
     82  1.115  explorer 
     83  1.227   thorpej /* The COM16650 option was renamed to COM_16650. */
     84  1.227   thorpej #ifdef COM16650
     85  1.227   thorpej #error Obsolete COM16650 option; use COM_16650 instead.
     86  1.227   thorpej #endif
     87  1.227   thorpej 
     88  1.186       uwe /*
     89  1.186       uwe  * Override cnmagic(9) macro before including <sys/systm.h>.
     90  1.186       uwe  * We need to know if cn_check_magic triggered debugger, so set a flag.
     91  1.186       uwe  * Callers of cn_check_magic must declare int cn_trapped = 0;
     92  1.186       uwe  * XXX: this is *ugly*!
     93  1.186       uwe  */
     94  1.186       uwe #define cn_trap()				\
     95  1.186       uwe 	do {					\
     96  1.186       uwe 		console_debugger();		\
     97  1.186       uwe 		cn_trapped = 1;			\
     98  1.316    martin 		(void)cn_trapped;		\
     99  1.186       uwe 	} while (/* CONSTCOND */ 0)
    100  1.186       uwe 
    101   1.14   mycroft #include <sys/param.h>
    102   1.14   mycroft #include <sys/systm.h>
    103   1.14   mycroft #include <sys/ioctl.h>
    104   1.14   mycroft #include <sys/select.h>
    105  1.234        ws #include <sys/poll.h>
    106   1.14   mycroft #include <sys/tty.h>
    107   1.14   mycroft #include <sys/proc.h>
    108   1.14   mycroft #include <sys/conf.h>
    109   1.14   mycroft #include <sys/file.h>
    110   1.14   mycroft #include <sys/uio.h>
    111   1.14   mycroft #include <sys/kernel.h>
    112   1.14   mycroft #include <sys/syslog.h>
    113   1.21   mycroft #include <sys/device.h>
    114  1.127   mycroft #include <sys/malloc.h>
    115  1.144  jonathan #include <sys/timepps.h>
    116  1.149   thorpej #include <sys/vnode.h>
    117  1.243      elad #include <sys/kauth.h>
    118  1.263        ad #include <sys/intr.h>
    119  1.305  christos #ifdef RND_COM
    120  1.333  riastrad #include <sys/rndsource.h>
    121  1.305  christos #endif
    122  1.305  christos 
    123  1.379  riastrad #include <sys/bus.h>
    124   1.14   mycroft 
    125  1.379  riastrad #include <ddb/db_active.h>
    126   1.14   mycroft 
    127  1.113   thorpej #include <dev/ic/comreg.h>
    128  1.113   thorpej #include <dev/ic/comvar.h>
    129   1.60       cgd #include <dev/ic/ns16550reg.h>
    130  1.116      fvdl #include <dev/ic/st16650reg.h>
    131   1.65  christos #include <dev/ic/hayespreg.h>
    132   1.62   mycroft #define	com_lcr	com_cfcr
    133  1.106  drochner #include <dev/cons.h>
    134   1.14   mycroft 
    135  1.343  riastrad #include "ioconf.h"
    136  1.343  riastrad 
    137  1.373  jmcneill #define	CSR_READ_1(r, o)	\
    138  1.373  jmcneill 	(r)->cr_read((r), (r)->cr_map[o])
    139  1.247   gdamore #define	CSR_WRITE_1(r, o, v)	\
    140  1.373  jmcneill 	(r)->cr_write((r), (r)->cr_map[o], (v))
    141  1.373  jmcneill #define	CSR_WRITE_MULTI(r, o, p, n)	\
    142  1.373  jmcneill 	(r)->cr_write_multi((r), (r)->cr_map[o], (p), (n))
    143  1.373  jmcneill 
    144  1.373  jmcneill /*
    145  1.373  jmcneill  * XXX COM_TYPE_AU1x00 specific
    146  1.373  jmcneill  */
    147  1.247   gdamore #define	CSR_WRITE_2(r, o, v)	\
    148  1.247   gdamore 	bus_space_write_2((r)->cr_iot, (r)->cr_ioh, (r)->cr_map[o], v)
    149  1.247   gdamore #define	CSR_READ_2(r, o)	\
    150  1.247   gdamore 	bus_space_read_2((r)->cr_iot, (r)->cr_ioh, (r)->cr_map[o])
    151  1.247   gdamore 
    152  1.197    simonb static void com_enable_debugport(struct com_softc *);
    153  1.186       uwe 
    154  1.197    simonb void	com_config(struct com_softc *);
    155  1.197    simonb void	com_shutdown(struct com_softc *);
    156  1.210   thorpej int	comspeed(long, long, int);
    157  1.197    simonb static	u_char	cflag2lcr(tcflag_t);
    158  1.197    simonb int	comparam(struct tty *, struct termios *);
    159  1.197    simonb void	comstart(struct tty *);
    160  1.197    simonb int	comhwiflow(struct tty *, int);
    161  1.197    simonb 
    162  1.197    simonb void	com_loadchannelregs(struct com_softc *);
    163  1.197    simonb void	com_hwiflow(struct com_softc *);
    164  1.197    simonb void	com_break(struct com_softc *, int);
    165  1.197    simonb void	com_modem(struct com_softc *, int);
    166  1.197    simonb void	tiocm_to_com(struct com_softc *, u_long, int);
    167  1.197    simonb int	com_to_tiocm(struct com_softc *);
    168  1.197    simonb void	com_iflush(struct com_softc *);
    169   1.80  christos 
    170  1.247   gdamore int	com_common_getc(dev_t, struct com_regs *);
    171  1.359    martin static void	com_common_putc(dev_t, struct com_regs *, int, int);
    172  1.102   thorpej 
    173  1.247   gdamore int	cominit(struct com_regs *, int, int, int, tcflag_t);
    174  1.187    simonb 
    175  1.289    dyoung static int comcnreattach(void);
    176  1.289    dyoung 
    177  1.197    simonb int	comcngetc(dev_t);
    178  1.197    simonb void	comcnputc(dev_t, int);
    179  1.197    simonb void	comcnpollc(dev_t, int);
    180   1.80  christos 
    181  1.302  jakllsch void	comsoft(void *);
    182  1.378  riastrad static inline void com_rxsoft(struct com_softc *, struct tty *);
    183  1.378  riastrad static inline void com_txsoft(struct com_softc *, struct tty *);
    184  1.378  riastrad static inline void com_stsoft(struct com_softc *, struct tty *);
    185  1.378  riastrad static inline void com_schedrx(struct com_softc *);
    186  1.197    simonb void	comdiag(void *);
    187  1.127   mycroft 
    188  1.199   gehenna dev_type_open(comopen);
    189  1.199   gehenna dev_type_close(comclose);
    190  1.199   gehenna dev_type_read(comread);
    191  1.199   gehenna dev_type_write(comwrite);
    192  1.199   gehenna dev_type_ioctl(comioctl);
    193  1.199   gehenna dev_type_stop(comstop);
    194  1.199   gehenna dev_type_tty(comtty);
    195  1.199   gehenna dev_type_poll(compoll);
    196  1.199   gehenna 
    197  1.289    dyoung static struct comcons_info comcons_info;
    198  1.289    dyoung 
    199  1.289    dyoung /*
    200  1.289    dyoung  * Following are all routines needed for COM to act as console
    201  1.289    dyoung  */
    202  1.289    dyoung static struct consdev comcons = {
    203  1.357     skrll 	.cn_getc = comcngetc,
    204  1.357     skrll 	.cn_putc = comcnputc,
    205  1.357     skrll 	.cn_pollc = comcnpollc,
    206  1.357     skrll 	.cn_dev = NODEV,
    207  1.357     skrll 	.cn_pri = CN_NORMAL
    208  1.289    dyoung };
    209  1.289    dyoung 
    210  1.289    dyoung 
    211  1.199   gehenna const struct cdevsw com_cdevsw = {
    212  1.323  dholland 	.d_open = comopen,
    213  1.323  dholland 	.d_close = comclose,
    214  1.323  dholland 	.d_read = comread,
    215  1.323  dholland 	.d_write = comwrite,
    216  1.323  dholland 	.d_ioctl = comioctl,
    217  1.323  dholland 	.d_stop = comstop,
    218  1.323  dholland 	.d_tty = comtty,
    219  1.323  dholland 	.d_poll = compoll,
    220  1.323  dholland 	.d_mmap = nommap,
    221  1.323  dholland 	.d_kqfilter = ttykqfilter,
    222  1.326  dholland 	.d_discard = nodiscard,
    223  1.323  dholland 	.d_flag = D_TTY
    224  1.199   gehenna };
    225  1.199   gehenna 
    226  1.127   mycroft /*
    227  1.127   mycroft  * Make this an option variable one can patch.
    228  1.127   mycroft  * But be warned:  this must be a power of 2!
    229  1.127   mycroft  */
    230  1.127   mycroft u_int com_rbuf_size = COM_RING_SIZE;
    231  1.127   mycroft 
    232  1.127   mycroft /* Stop input when 3/4 of the ring is full; restart when only 1/4 is full. */
    233  1.127   mycroft u_int com_rbuf_hiwat = (COM_RING_SIZE * 1) / 4;
    234  1.127   mycroft u_int com_rbuf_lowat = (COM_RING_SIZE * 3) / 4;
    235  1.127   mycroft 
    236  1.247   gdamore static int comconsattached;
    237  1.186       uwe static struct cnm_state com_cnm_state;
    238   1.99   mycroft 
    239    1.1       cgd #ifdef KGDB
    240  1.102   thorpej #include <sys/kgdb.h>
    241  1.106  drochner 
    242  1.247   gdamore static struct com_regs comkgdbregs;
    243  1.106  drochner static int com_kgdb_attached;
    244  1.102   thorpej 
    245  1.197    simonb int	com_kgdb_getc(void *);
    246  1.197    simonb void	com_kgdb_putc(void *, int);
    247  1.102   thorpej #endif /* KGDB */
    248    1.1       cgd 
    249  1.247   gdamore /* initializer for typical 16550-ish hardware */
    250  1.355   thorpej static const bus_size_t com_std_map[COM_REGMAP_NENTRIES] = {
    251  1.355   thorpej 	[COM_REG_RXDATA]	=	com_data,
    252  1.355   thorpej 	[COM_REG_TXDATA]	=	com_data,
    253  1.355   thorpej 	[COM_REG_DLBL]		=	com_dlbl,
    254  1.355   thorpej 	[COM_REG_DLBH]		=	com_dlbh,
    255  1.355   thorpej 	[COM_REG_IER]		=	com_ier,
    256  1.355   thorpej 	[COM_REG_IIR]		=	com_iir,
    257  1.355   thorpej 	[COM_REG_FIFO]		=	com_fifo,
    258  1.355   thorpej 	[COM_REG_TCR]		=	com_fifo,
    259  1.355   thorpej 	[COM_REG_EFR]		=	com_efr,
    260  1.355   thorpej 	[COM_REG_TLR]		=	com_efr,
    261  1.355   thorpej 	[COM_REG_LCR]		=	com_lcr,
    262  1.355   thorpej 	[COM_REG_MCR]		=	com_mcr,
    263  1.355   thorpej 	[COM_REG_LSR]		=	com_lsr,
    264  1.355   thorpej 	[COM_REG_MSR]		=	com_msr,
    265  1.355   thorpej 	[COM_REG_USR]		=	com_usr,
    266  1.355   thorpej 	[COM_REG_TFL]		=	com_tfl,
    267  1.355   thorpej 	[COM_REG_RFL]		=	com_rfl,
    268  1.355   thorpej 	[COM_REG_HALT]		=	com_halt,
    269  1.355   thorpej 	[COM_REG_MDR1]		=	com_mdr1,
    270  1.355   thorpej };
    271  1.247   gdamore 
    272  1.328  christos #define	COMDIALOUT_MASK	TTDIALOUT_MASK
    273  1.149   thorpej 
    274  1.328  christos #define	COMUNIT(x)	TTUNIT(x)
    275  1.328  christos #define	COMDIALOUT(x)	TTDIALOUT(x)
    276  1.149   thorpej 
    277  1.149   thorpej #define	COM_ISALIVE(sc)	((sc)->enabled != 0 && \
    278  1.276      cube 			 device_is_active((sc)->sc_dev))
    279    1.1       cgd 
    280  1.160   thorpej #define	BR	BUS_SPACE_BARRIER_READ
    281  1.160   thorpej #define	BW	BUS_SPACE_BARRIER_WRITE
    282  1.247   gdamore #define COM_BARRIER(r, f) \
    283  1.247   gdamore 	bus_space_barrier((r)->cr_iot, (r)->cr_ioh, 0, (r)->cr_nports, (f))
    284  1.160   thorpej 
    285  1.351   thorpej /*
    286  1.373  jmcneill  * com_read_1 --
    287  1.373  jmcneill  *	Default register read callback using single byte accesses.
    288  1.373  jmcneill  */
    289  1.373  jmcneill static uint8_t
    290  1.373  jmcneill com_read_1(struct com_regs *regs, u_int reg)
    291  1.373  jmcneill {
    292  1.373  jmcneill 	return bus_space_read_1(regs->cr_iot, regs->cr_ioh, reg);
    293  1.373  jmcneill }
    294  1.373  jmcneill 
    295  1.373  jmcneill /*
    296  1.373  jmcneill  * com_write_1 --
    297  1.373  jmcneill  *	Default register write callback using single byte accesses.
    298  1.373  jmcneill  */
    299  1.373  jmcneill static void
    300  1.373  jmcneill com_write_1(struct com_regs *regs, u_int reg, uint8_t val)
    301  1.373  jmcneill {
    302  1.373  jmcneill 	bus_space_write_1(regs->cr_iot, regs->cr_ioh, reg, val);
    303  1.373  jmcneill }
    304  1.373  jmcneill 
    305  1.373  jmcneill /*
    306  1.373  jmcneill  * com_write_multi_1 --
    307  1.373  jmcneill  *	Default register multi write callback using single byte accesses.
    308  1.373  jmcneill  */
    309  1.373  jmcneill static void
    310  1.373  jmcneill com_write_multi_1(struct com_regs *regs, u_int reg, const uint8_t *datap,
    311  1.373  jmcneill     bus_size_t count)
    312  1.373  jmcneill {
    313  1.373  jmcneill 	bus_space_write_multi_1(regs->cr_iot, regs->cr_ioh, reg, datap, count);
    314  1.373  jmcneill }
    315  1.373  jmcneill 
    316  1.373  jmcneill /*
    317  1.373  jmcneill  * com_read_4 --
    318  1.373  jmcneill  *	Default register read callback using dword accesses.
    319  1.373  jmcneill  */
    320  1.373  jmcneill static uint8_t
    321  1.373  jmcneill com_read_4(struct com_regs *regs, u_int reg)
    322  1.373  jmcneill {
    323  1.373  jmcneill 	return bus_space_read_4(regs->cr_iot, regs->cr_ioh, reg) & 0xff;
    324  1.373  jmcneill }
    325  1.373  jmcneill 
    326  1.373  jmcneill /*
    327  1.373  jmcneill  * com_write_4 --
    328  1.373  jmcneill  *	Default register write callback using dword accesses.
    329  1.373  jmcneill  */
    330  1.373  jmcneill static void
    331  1.373  jmcneill com_write_4(struct com_regs *regs, u_int reg, uint8_t val)
    332  1.373  jmcneill {
    333  1.373  jmcneill 	bus_space_write_4(regs->cr_iot, regs->cr_ioh, reg, val);
    334  1.373  jmcneill }
    335  1.373  jmcneill 
    336  1.373  jmcneill /*
    337  1.373  jmcneill  * com_write_multi_4 --
    338  1.373  jmcneill  *	Default register multi write callback using dword accesses.
    339  1.373  jmcneill  */
    340  1.373  jmcneill static void
    341  1.373  jmcneill com_write_multi_4(struct com_regs *regs, u_int reg, const uint8_t *datap,
    342  1.373  jmcneill     bus_size_t count)
    343  1.373  jmcneill {
    344  1.373  jmcneill 	while (count-- > 0) {
    345  1.373  jmcneill 		bus_space_write_4(regs->cr_iot, regs->cr_ioh, reg, *datap++);
    346  1.373  jmcneill 	}
    347  1.373  jmcneill }
    348  1.373  jmcneill 
    349  1.373  jmcneill /*
    350  1.351   thorpej  * com_init_regs --
    351  1.351   thorpej  *	Driver front-ends use this to initialize our register map
    352  1.351   thorpej  *	in the standard fashion.  They may then tailor the map to
    353  1.351   thorpej  *	their own particular requirements.
    354  1.351   thorpej  */
    355  1.351   thorpej void
    356  1.351   thorpej com_init_regs(struct com_regs *regs, bus_space_tag_t st, bus_space_handle_t sh,
    357  1.351   thorpej 	      bus_addr_t addr)
    358  1.351   thorpej {
    359  1.351   thorpej 
    360  1.351   thorpej 	memset(regs, 0, sizeof(*regs));
    361  1.351   thorpej 	regs->cr_iot = st;
    362  1.351   thorpej 	regs->cr_ioh = sh;
    363  1.351   thorpej 	regs->cr_iobase = addr;
    364  1.351   thorpej 	regs->cr_nports = COM_NPORTS;
    365  1.373  jmcneill 	regs->cr_read = com_read_1;
    366  1.373  jmcneill 	regs->cr_write = com_write_1;
    367  1.373  jmcneill 	regs->cr_write_multi = com_write_multi_1;
    368  1.351   thorpej 	memcpy(regs->cr_map, com_std_map, sizeof(regs->cr_map));
    369  1.351   thorpej }
    370  1.351   thorpej 
    371  1.354   thorpej /*
    372  1.354   thorpej  * com_init_regs_stride --
    373  1.354   thorpej  *	Convenience function for front-ends that have a stride between
    374  1.354   thorpej  *	registers.
    375  1.354   thorpej  */
    376  1.354   thorpej void
    377  1.354   thorpej com_init_regs_stride(struct com_regs *regs, bus_space_tag_t st,
    378  1.354   thorpej 		     bus_space_handle_t sh, bus_addr_t addr, u_int regshift)
    379  1.354   thorpej {
    380  1.354   thorpej 
    381  1.354   thorpej 	com_init_regs(regs, st, sh, addr);
    382  1.354   thorpej 	for (size_t i = 0; i < __arraycount(regs->cr_map); i++) {
    383  1.354   thorpej 		regs->cr_map[i] <<= regshift;
    384  1.354   thorpej 	}
    385  1.354   thorpej 	regs->cr_nports <<= regshift;
    386  1.354   thorpej }
    387  1.354   thorpej 
    388  1.373  jmcneill /*
    389  1.373  jmcneill  * com_init_regs_stride_width --
    390  1.373  jmcneill  *	Convenience function for front-ends that have a stride between
    391  1.373  jmcneill  *	registers and specific I/O width requirements.
    392  1.373  jmcneill  */
    393  1.373  jmcneill void
    394  1.373  jmcneill com_init_regs_stride_width(struct com_regs *regs, bus_space_tag_t st,
    395  1.373  jmcneill 			   bus_space_handle_t sh, bus_addr_t addr,
    396  1.373  jmcneill 			   u_int regshift, u_int width)
    397  1.373  jmcneill {
    398  1.373  jmcneill 
    399  1.373  jmcneill 	com_init_regs(regs, st, sh, addr);
    400  1.373  jmcneill 	for (size_t i = 0; i < __arraycount(regs->cr_map); i++) {
    401  1.373  jmcneill 		regs->cr_map[i] <<= regshift;
    402  1.373  jmcneill 	}
    403  1.373  jmcneill 	regs->cr_nports <<= regshift;
    404  1.373  jmcneill 
    405  1.373  jmcneill 	switch (width) {
    406  1.373  jmcneill 	case 1:
    407  1.373  jmcneill 		/* Already set by com_init_regs */
    408  1.373  jmcneill 		break;
    409  1.373  jmcneill 	case 4:
    410  1.373  jmcneill 		regs->cr_read = com_read_4;
    411  1.373  jmcneill 		regs->cr_write = com_write_4;
    412  1.373  jmcneill 		regs->cr_write_multi = com_write_multi_4;
    413  1.373  jmcneill 		break;
    414  1.373  jmcneill 	default:
    415  1.373  jmcneill 		panic("com: unsupported I/O width %d", width);
    416  1.373  jmcneill 	}
    417  1.373  jmcneill }
    418  1.373  jmcneill 
    419  1.210   thorpej /*ARGSUSED*/
    420   1.21   mycroft int
    421  1.256  christos comspeed(long speed, long frequency, int type)
    422    1.1       cgd {
    423   1.21   mycroft #define	divrnd(n, q)	(((n)*2/(q)+1)/2)	/* divide and round off */
    424   1.21   mycroft 
    425   1.21   mycroft 	int x, err;
    426  1.281      matt 	int divisor = 16;
    427  1.281      matt 
    428  1.281      matt 	if ((type == COM_TYPE_OMAP) && (speed > 230400)) {
    429  1.281      matt 	    divisor = 13;
    430  1.281      matt 	}
    431   1.21   mycroft 
    432   1.21   mycroft 	if (speed == 0)
    433   1.99   mycroft 		return (0);
    434  1.324  christos 	if (speed < 0)
    435   1.99   mycroft 		return (-1);
    436  1.281      matt 	x = divrnd(frequency / divisor, speed);
    437   1.21   mycroft 	if (x <= 0)
    438   1.99   mycroft 		return (-1);
    439  1.281      matt 	err = divrnd(((quad_t)frequency) * 1000 / divisor, speed * x) - 1000;
    440   1.21   mycroft 	if (err < 0)
    441   1.21   mycroft 		err = -err;
    442   1.21   mycroft 	if (err > COM_TOLERANCE)
    443   1.99   mycroft 		return (-1);
    444   1.99   mycroft 	return (x);
    445   1.21   mycroft 
    446  1.172   thorpej #undef	divrnd
    447   1.21   mycroft }
    448   1.21   mycroft 
    449   1.99   mycroft #ifdef COM_DEBUG
    450  1.101   mycroft int	com_debug = 0;
    451  1.101   mycroft 
    452  1.235    kleink void comstatus(struct com_softc *, const char *);
    453   1.99   mycroft void
    454  1.235    kleink comstatus(struct com_softc *sc, const char *str)
    455   1.99   mycroft {
    456   1.99   mycroft 	struct tty *tp = sc->sc_tty;
    457   1.99   mycroft 
    458  1.277      cube 	aprint_normal_dev(sc->sc_dev,
    459  1.277      cube 	    "%s %cclocal  %cdcd %cts_carr_on %cdtr %ctx_stopped\n",
    460  1.277      cube 	    str,
    461  1.218  christos 	    ISSET(tp->t_cflag, CLOCAL) ? '+' : '-',
    462  1.218  christos 	    ISSET(sc->sc_msr, MSR_DCD) ? '+' : '-',
    463  1.218  christos 	    ISSET(tp->t_state, TS_CARR_ON) ? '+' : '-',
    464  1.218  christos 	    ISSET(sc->sc_mcr, MCR_DTR) ? '+' : '-',
    465  1.218  christos 	    sc->sc_tx_stopped ? '+' : '-');
    466   1.99   mycroft 
    467  1.277      cube 	aprint_normal_dev(sc->sc_dev,
    468  1.277      cube 	    "%s %ccrtscts %ccts %cts_ttstop  %crts rx_flags=0x%x\n",
    469  1.277      cube 	    str,
    470  1.218  christos 	    ISSET(tp->t_cflag, CRTSCTS) ? '+' : '-',
    471  1.218  christos 	    ISSET(sc->sc_msr, MSR_CTS) ? '+' : '-',
    472  1.218  christos 	    ISSET(tp->t_state, TS_TTSTOP) ? '+' : '-',
    473  1.218  christos 	    ISSET(sc->sc_mcr, MCR_RTS) ? '+' : '-',
    474  1.101   mycroft 	    sc->sc_rx_flags);
    475   1.99   mycroft }
    476   1.99   mycroft #endif
    477   1.99   mycroft 
    478   1.21   mycroft int
    479  1.247   gdamore com_probe_subr(struct com_regs *regs)
    480   1.21   mycroft {
    481   1.21   mycroft 
    482    1.1       cgd 	/* force access to id reg */
    483  1.247   gdamore 	CSR_WRITE_1(regs, COM_REG_LCR, LCR_8BITS);
    484  1.247   gdamore 	CSR_WRITE_1(regs, COM_REG_IIR, 0);
    485  1.247   gdamore 	if ((CSR_READ_1(regs, COM_REG_LCR) != LCR_8BITS) ||
    486  1.247   gdamore 	    (CSR_READ_1(regs, COM_REG_IIR) & 0x38))
    487   1.99   mycroft 		return (0);
    488   1.21   mycroft 
    489   1.99   mycroft 	return (1);
    490    1.1       cgd }
    491    1.1       cgd 
    492   1.65  christos int
    493  1.247   gdamore comprobe1(bus_space_tag_t iot, bus_space_handle_t ioh)
    494   1.64  christos {
    495  1.247   gdamore 	struct com_regs	regs;
    496   1.64  christos 
    497  1.351   thorpej 	com_init_regs(&regs, iot, ioh, 0/*XXX*/);
    498   1.64  christos 
    499  1.247   gdamore 	return com_probe_subr(&regs);
    500   1.64  christos }
    501   1.64  christos 
    502  1.264        ad /*
    503  1.264        ad  * No locking in this routine; it is only called during attach,
    504  1.264        ad  * or with the port already locked.
    505  1.264        ad  */
    506  1.104  drochner static void
    507  1.197    simonb com_enable_debugport(struct com_softc *sc)
    508  1.104  drochner {
    509  1.263        ad 
    510  1.104  drochner 	/* Turn on line break interrupt, set carrier. */
    511  1.337  christos 	sc->sc_ier = IER_ERLS;
    512  1.209   thorpej 	if (sc->sc_type == COM_TYPE_PXA2x0)
    513  1.208       scw 		sc->sc_ier |= IER_EUART | IER_ERXTOUT;
    514  1.336  jmcneill 	if (sc->sc_type == COM_TYPE_INGENIC ||
    515  1.336  jmcneill 	    sc->sc_type == COM_TYPE_TEGRA)
    516  1.330  macallan 		sc->sc_ier |= IER_ERXTOUT;
    517  1.247   gdamore 	CSR_WRITE_1(&sc->sc_regs, COM_REG_IER, sc->sc_ier);
    518  1.104  drochner 	SET(sc->sc_mcr, MCR_DTR | MCR_RTS);
    519  1.247   gdamore 	CSR_WRITE_1(&sc->sc_regs, COM_REG_MCR, sc->sc_mcr);
    520  1.104  drochner }
    521    1.1       cgd 
    522  1.350  jmcneill static void
    523  1.350  jmcneill com_intr_poll(void *arg)
    524  1.350  jmcneill {
    525  1.350  jmcneill 	struct com_softc * const sc = arg;
    526  1.350  jmcneill 
    527  1.350  jmcneill 	comintr(sc);
    528  1.350  jmcneill 
    529  1.362       rin 	callout_schedule(&sc->sc_poll_callout, sc->sc_poll_ticks);
    530  1.350  jmcneill }
    531  1.350  jmcneill 
    532   1.29   mycroft void
    533  1.197    simonb com_attach_subr(struct com_softc *sc)
    534   1.29   mycroft {
    535  1.247   gdamore 	struct com_regs *regsp = &sc->sc_regs;
    536  1.127   mycroft 	struct tty *tp;
    537  1.360  jmcneill 	uint32_t cpr;
    538  1.360  jmcneill 	uint8_t lcr;
    539  1.208       scw 	const char *fifo_msg = NULL;
    540  1.360  jmcneill 	prop_dictionary_t dict;
    541  1.307  macallan 	bool is_console = true;
    542  1.349  jmcneill 	bool force_console = false;
    543  1.388      imil 	bool skip_attach_delay = false;
    544  1.117   mycroft 
    545  1.257       uwe 	aprint_naive("\n");
    546  1.257       uwe 
    547  1.307  macallan 	dict = device_properties(sc->sc_dev);
    548  1.307  macallan 	prop_dictionary_get_bool(dict, "is_console", &is_console);
    549  1.349  jmcneill 	prop_dictionary_get_bool(dict, "force_console", &force_console);
    550  1.388      imil 	prop_dictionary_get_bool(dict, "skip_attach_delay", &skip_attach_delay);
    551  1.260        ad 	callout_init(&sc->sc_diag_callout, 0);
    552  1.350  jmcneill 	callout_init(&sc->sc_poll_callout, 0);
    553  1.350  jmcneill 	callout_setfunc(&sc->sc_poll_callout, com_intr_poll, sc);
    554  1.267        ad 	mutex_init(&sc->sc_lock, MUTEX_DEFAULT, IPL_HIGH);
    555  1.170   thorpej 
    556  1.344  jmcneill #if defined(COM_16650)
    557  1.344  jmcneill 	sc->sc_type = COM_TYPE_16650;
    558  1.344  jmcneill #elif defined(COM_16750)
    559  1.344  jmcneill 	sc->sc_type = COM_TYPE_16750;
    560  1.344  jmcneill #elif defined(COM_HAYESP)
    561  1.344  jmcneill 	sc->sc_type = COM_TYPE_HAYESP;
    562  1.344  jmcneill #elif defined(COM_PXA2X0)
    563  1.344  jmcneill 	sc->sc_type = COM_TYPE_PXA2x0;
    564  1.344  jmcneill #endif
    565  1.344  jmcneill 
    566  1.117   mycroft 	/* Disable interrupts before configuring the device. */
    567  1.209   thorpej 	if (sc->sc_type == COM_TYPE_PXA2x0)
    568  1.208       scw 		sc->sc_ier = IER_EUART;
    569  1.208       scw 	else
    570  1.208       scw 		sc->sc_ier = 0;
    571    1.1       cgd 
    572  1.247   gdamore 	CSR_WRITE_1(regsp, COM_REG_IER, sc->sc_ier);
    573  1.247   gdamore 
    574  1.349  jmcneill 	if ((bus_space_is_equal(regsp->cr_iot, comcons_info.regs.cr_iot) &&
    575  1.349  jmcneill 	    regsp->cr_iobase == comcons_info.regs.cr_iobase) || force_console) {
    576  1.105  drochner 		comconsattached = 1;
    577  1.105  drochner 
    578  1.349  jmcneill 		if (force_console)
    579  1.349  jmcneill 			memcpy(regsp, &comcons_info.regs, sizeof(*regsp));
    580  1.349  jmcneill 
    581  1.289    dyoung 		if (cn_tab == NULL && comcnreattach() != 0) {
    582  1.294   tsutsui 			printf("can't re-init serial console @%lx\n",
    583  1.294   tsutsui 			    (u_long)comcons_info.regs.cr_iobase);
    584  1.289    dyoung 		}
    585  1.289    dyoung 
    586  1.344  jmcneill 		switch (sc->sc_type) {
    587  1.344  jmcneill 		case COM_TYPE_16750:
    588  1.348  jmcneill 		case COM_TYPE_DW_APB:
    589  1.344  jmcneill 			/* Use in comintr(). */
    590  1.344  jmcneill  			sc->sc_lcr = cflag2lcr(comcons_info.cflag);
    591  1.344  jmcneill 			break;
    592  1.344  jmcneill 		}
    593  1.312  kiyohara 
    594  1.388      imil 		/* No need for a delay on virtual machines. */
    595  1.388      imil 		if (!skip_attach_delay)
    596  1.388      imil 			delay(10000); /* wait for output to finish */
    597  1.388      imil 
    598  1.386    martin 		/* Make sure the console is always "hardwired". */
    599  1.307  macallan 		if (is_console) {
    600  1.307  macallan 			SET(sc->sc_hwflags, COM_HW_CONSOLE);
    601  1.307  macallan 		}
    602  1.307  macallan 
    603   1.99   mycroft 		SET(sc->sc_swflags, TIOCFLAG_SOFTCAR);
    604   1.75       cgd 	}
    605   1.26       cgd 
    606  1.247   gdamore 	/* Probe for FIFO */
    607  1.247   gdamore 	switch (sc->sc_type) {
    608  1.247   gdamore 	case COM_TYPE_HAYESP:
    609  1.247   gdamore 		goto fifodone;
    610  1.247   gdamore 
    611  1.247   gdamore 	case COM_TYPE_AU1x00:
    612  1.247   gdamore 		sc->sc_fifolen = 16;
    613  1.360  jmcneill 		fifo_msg = "Au1X00 UART";
    614  1.247   gdamore 		SET(sc->sc_hwflags, COM_HW_FIFO);
    615  1.247   gdamore 		goto fifodelay;
    616  1.311  kiyohara 
    617  1.286      matt 	case COM_TYPE_16550_NOERS:
    618  1.286      matt 		sc->sc_fifolen = 16;
    619  1.360  jmcneill 		fifo_msg = "ns16650, no ERS";
    620  1.286      matt 		SET(sc->sc_hwflags, COM_HW_FIFO);
    621  1.286      matt 		goto fifodelay;
    622  1.286      matt 
    623  1.302  jakllsch 	case COM_TYPE_OMAP:
    624  1.302  jakllsch 		sc->sc_fifolen = 64;
    625  1.360  jmcneill 		fifo_msg = "OMAP UART";
    626  1.302  jakllsch 		SET(sc->sc_hwflags, COM_HW_FIFO);
    627  1.302  jakllsch 		goto fifodelay;
    628  1.329  macallan 
    629  1.329  macallan 	case COM_TYPE_INGENIC:
    630  1.330  macallan 		sc->sc_fifolen = 16;
    631  1.360  jmcneill 		fifo_msg = "Ingenic UART";
    632  1.329  macallan 		SET(sc->sc_hwflags, COM_HW_FIFO);
    633  1.330  macallan 		SET(sc->sc_hwflags, COM_HW_NOIEN);
    634  1.329  macallan 		goto fifodelay;
    635  1.338  jmcneill 
    636  1.338  jmcneill 	case COM_TYPE_TEGRA:
    637  1.338  jmcneill 		sc->sc_fifolen = 8;
    638  1.360  jmcneill 		fifo_msg = "Tegra UART";
    639  1.338  jmcneill 		SET(sc->sc_hwflags, COM_HW_FIFO);
    640  1.338  jmcneill 		CSR_WRITE_1(regsp, COM_REG_FIFO,
    641  1.338  jmcneill 		    FIFO_ENABLE | FIFO_RCV_RST | FIFO_XMT_RST | FIFO_TRIGGER_1);
    642  1.338  jmcneill 		goto fifodelay;
    643  1.340  jmcneill 
    644  1.340  jmcneill 	case COM_TYPE_BCMAUXUART:
    645  1.342       nat 		sc->sc_fifolen = 1;
    646  1.360  jmcneill 		fifo_msg = "BCM AUX UART";
    647  1.340  jmcneill 		SET(sc->sc_hwflags, COM_HW_FIFO);
    648  1.340  jmcneill 		CSR_WRITE_1(regsp, COM_REG_FIFO,
    649  1.340  jmcneill 		    FIFO_ENABLE | FIFO_RCV_RST | FIFO_XMT_RST | FIFO_TRIGGER_1);
    650  1.340  jmcneill 		goto fifodelay;
    651  1.360  jmcneill 
    652  1.360  jmcneill 	case COM_TYPE_DW_APB:
    653  1.365       tnn 		if (!prop_dictionary_get_uint(dict, "fifolen", &sc->sc_fifolen)) {
    654  1.365       tnn 			cpr = bus_space_read_4(sc->sc_regs.cr_iot,
    655  1.365       tnn 			    sc->sc_regs.cr_ioh, DW_APB_UART_CPR);
    656  1.364       tnn 			sc->sc_fifolen = __SHIFTOUT(cpr, UART_CPR_FIFO_MODE) * 16;
    657  1.365       tnn 		}
    658  1.360  jmcneill 		if (sc->sc_fifolen == 0) {
    659  1.361  jmcneill 			sc->sc_fifolen = 1;
    660  1.360  jmcneill 			fifo_msg = "DesignWare APB UART, no fifo";
    661  1.360  jmcneill 			CSR_WRITE_1(regsp, COM_REG_FIFO, 0);
    662  1.360  jmcneill 		} else {
    663  1.360  jmcneill 			fifo_msg = "DesignWare APB UART";
    664  1.360  jmcneill 			SET(sc->sc_hwflags, COM_HW_FIFO);
    665  1.360  jmcneill 			CSR_WRITE_1(regsp, COM_REG_FIFO,
    666  1.360  jmcneill 			    FIFO_ENABLE | FIFO_RCV_RST | FIFO_XMT_RST | FIFO_TRIGGER_1);
    667  1.360  jmcneill 		}
    668  1.360  jmcneill 		goto fifodelay;
    669  1.302  jakllsch 	}
    670   1.99   mycroft 
    671   1.99   mycroft 	sc->sc_fifolen = 1;
    672    1.1       cgd 	/* look for a NS 16550AF UART with FIFOs */
    673  1.332     skrll 	if (sc->sc_type == COM_TYPE_INGENIC) {
    674  1.330  macallan 		CSR_WRITE_1(regsp, COM_REG_FIFO,
    675  1.387     skrll 		    FIFO_ENABLE | FIFO_RCV_RST | FIFO_XMT_RST |
    676  1.330  macallan 		    FIFO_TRIGGER_14 | FIFO_UART_ON);
    677  1.330  macallan 	} else
    678  1.330  macallan 		CSR_WRITE_1(regsp, COM_REG_FIFO,
    679  1.330  macallan 		    FIFO_ENABLE | FIFO_RCV_RST | FIFO_XMT_RST | FIFO_TRIGGER_14);
    680   1.20   mycroft 	delay(100);
    681  1.247   gdamore 	if (ISSET(CSR_READ_1(regsp, COM_REG_IIR), IIR_FIFO_MASK)
    682   1.99   mycroft 	    == IIR_FIFO_MASK)
    683  1.247   gdamore 		if (ISSET(CSR_READ_1(regsp, COM_REG_FIFO), FIFO_TRIGGER_14)
    684   1.99   mycroft 		    == FIFO_TRIGGER_14) {
    685   1.62   mycroft 			SET(sc->sc_hwflags, COM_HW_FIFO);
    686  1.116      fvdl 
    687  1.360  jmcneill 			fifo_msg = "ns16550a";
    688  1.371  jmcneill 			sc->sc_fifolen = 16;
    689  1.344  jmcneill 
    690  1.116      fvdl 			/*
    691  1.116      fvdl 			 * IIR changes into the EFR if LCR is set to LCR_EERS
    692  1.116      fvdl 			 * on 16650s. We also know IIR != 0 at this point.
    693  1.116      fvdl 			 * Write 0 into the EFR, and read it. If the result
    694  1.116      fvdl 			 * is 0, we have a 16650.
    695  1.116      fvdl 			 *
    696  1.116      fvdl 			 * Older 16650s were broken; the test to detect them
    697  1.116      fvdl 			 * is taken from the Linux driver. Apparently
    698  1.116      fvdl 			 * setting DLAB enable gives access to the EFR on
    699  1.116      fvdl 			 * these chips.
    700  1.116      fvdl 			 */
    701  1.344  jmcneill 			if (sc->sc_type == COM_TYPE_16650) {
    702  1.344  jmcneill 				lcr = CSR_READ_1(regsp, COM_REG_LCR);
    703  1.344  jmcneill 				CSR_WRITE_1(regsp, COM_REG_LCR, LCR_EERS);
    704  1.344  jmcneill 				CSR_WRITE_1(regsp, COM_REG_EFR, 0);
    705  1.247   gdamore 				if (CSR_READ_1(regsp, COM_REG_EFR) == 0) {
    706  1.344  jmcneill 					CSR_WRITE_1(regsp, COM_REG_LCR,
    707  1.344  jmcneill 					    lcr | LCR_DLAB);
    708  1.344  jmcneill 					if (CSR_READ_1(regsp, COM_REG_EFR) == 0) {
    709  1.344  jmcneill 						CLR(sc->sc_hwflags, COM_HW_FIFO);
    710  1.344  jmcneill 						sc->sc_fifolen = 0;
    711  1.344  jmcneill 					} else {
    712  1.344  jmcneill 						SET(sc->sc_hwflags, COM_HW_FLOW);
    713  1.344  jmcneill 						sc->sc_fifolen = 32;
    714  1.344  jmcneill 					}
    715  1.344  jmcneill 				} else
    716  1.344  jmcneill 					sc->sc_fifolen = 16;
    717  1.344  jmcneill 
    718  1.344  jmcneill 				CSR_WRITE_1(regsp, COM_REG_LCR, lcr);
    719  1.344  jmcneill 				if (sc->sc_fifolen == 0)
    720  1.344  jmcneill 					fifo_msg = "st16650, broken fifo";
    721  1.344  jmcneill 				else if (sc->sc_fifolen == 32)
    722  1.360  jmcneill 					fifo_msg = "st16650a";
    723  1.344  jmcneill 				else
    724  1.360  jmcneill 					fifo_msg = "ns16550a";
    725  1.344  jmcneill 			}
    726  1.116      fvdl 
    727  1.314  kiyohara 			/*
    728  1.314  kiyohara 			 * TL16C750 can enable 64byte FIFO, only when DLAB
    729  1.314  kiyohara 			 * is 1.  However, some 16750 may always enable.  For
    730  1.314  kiyohara 			 * example, restrictions according to DLAB in a data
    731  1.314  kiyohara 			 * sheet for SC16C750 were not described.
    732  1.314  kiyohara 			 * Please enable 'options COM_16650', supposing you
    733  1.314  kiyohara 			 * use SC16C750.  Probably 32 bytes of FIFO and HW FLOW
    734  1.314  kiyohara 			 * should become effective.
    735  1.314  kiyohara 			 */
    736  1.344  jmcneill 			if (sc->sc_type == COM_TYPE_16750) {
    737  1.344  jmcneill 				uint8_t iir1, iir2;
    738  1.344  jmcneill 				uint8_t fcr = FIFO_ENABLE | FIFO_TRIGGER_14;
    739  1.344  jmcneill 
    740  1.344  jmcneill 				lcr = CSR_READ_1(regsp, COM_REG_LCR);
    741  1.344  jmcneill 				CSR_WRITE_1(regsp, COM_REG_LCR,
    742  1.344  jmcneill 				    lcr & ~LCR_DLAB);
    743  1.344  jmcneill 				CSR_WRITE_1(regsp, COM_REG_FIFO,
    744  1.344  jmcneill 				    fcr | FIFO_64B_ENABLE);
    745  1.344  jmcneill 				iir1 = CSR_READ_1(regsp, COM_REG_IIR);
    746  1.314  kiyohara 				CSR_WRITE_1(regsp, COM_REG_FIFO, fcr);
    747  1.344  jmcneill 				CSR_WRITE_1(regsp, COM_REG_LCR, lcr | LCR_DLAB);
    748  1.344  jmcneill 				CSR_WRITE_1(regsp, COM_REG_FIFO,
    749  1.344  jmcneill 				    fcr | FIFO_64B_ENABLE);
    750  1.344  jmcneill 				iir2 = CSR_READ_1(regsp, COM_REG_IIR);
    751  1.344  jmcneill 
    752  1.344  jmcneill 				CSR_WRITE_1(regsp, COM_REG_LCR, lcr);
    753  1.344  jmcneill 
    754  1.344  jmcneill 				if (!ISSET(iir1, IIR_64B_FIFO) &&
    755  1.344  jmcneill 				    ISSET(iir2, IIR_64B_FIFO)) {
    756  1.344  jmcneill 					/* It is TL16C750. */
    757  1.344  jmcneill 					sc->sc_fifolen = 64;
    758  1.344  jmcneill 					SET(sc->sc_hwflags, COM_HW_AFE);
    759  1.344  jmcneill 				} else
    760  1.344  jmcneill 					CSR_WRITE_1(regsp, COM_REG_FIFO, fcr);
    761  1.314  kiyohara 
    762  1.344  jmcneill 				if (sc->sc_fifolen == 64)
    763  1.360  jmcneill 					fifo_msg = "tl16c750";
    764  1.344  jmcneill 				else
    765  1.360  jmcneill 					fifo_msg = "ns16750";
    766  1.344  jmcneill 			}
    767   1.21   mycroft 		} else
    768  1.208       scw 			fifo_msg = "ns16550, broken fifo";
    769   1.21   mycroft 	else
    770  1.208       scw 		fifo_msg = "ns8250 or ns16450, no fifo";
    771  1.344  jmcneill 	CSR_WRITE_1(regsp, COM_REG_FIFO, 0);
    772  1.344  jmcneill 
    773  1.247   gdamore fifodelay:
    774  1.208       scw 	/*
    775  1.208       scw 	 * Some chips will clear down both Tx and Rx FIFOs when zero is
    776  1.208       scw 	 * written to com_fifo. If this chip is the console, writing zero
    777  1.208       scw 	 * results in some of the chip/FIFO description being lost, so delay
    778  1.208       scw 	 * printing it until now.
    779  1.208       scw 	 */
    780  1.208       scw 	delay(10);
    781  1.360  jmcneill 	if (ISSET(sc->sc_hwflags, COM_HW_FIFO)) {
    782  1.360  jmcneill 		aprint_normal(": %s, %d-byte FIFO\n", fifo_msg, sc->sc_fifolen);
    783  1.360  jmcneill 	} else {
    784  1.360  jmcneill 		aprint_normal(": %s\n", fifo_msg);
    785  1.360  jmcneill 	}
    786  1.166      soda 	if (ISSET(sc->sc_hwflags, COM_HW_TXFIFO_DISABLE)) {
    787  1.166      soda 		sc->sc_fifolen = 1;
    788  1.276      cube 		aprint_normal_dev(sc->sc_dev, "txfifo disabled\n");
    789  1.166      soda 	}
    790  1.247   gdamore 
    791  1.247   gdamore fifodone:
    792   1.21   mycroft 
    793  1.300     rmind 	tp = tty_alloc();
    794  1.127   mycroft 	tp->t_oproc = comstart;
    795  1.127   mycroft 	tp->t_param = comparam;
    796  1.127   mycroft 	tp->t_hwiflow = comhwiflow;
    797  1.308      matt 	tp->t_softc = sc;
    798  1.127   mycroft 
    799  1.127   mycroft 	sc->sc_tty = tp;
    800  1.356       chs 	sc->sc_rbuf = malloc(com_rbuf_size << 1, M_DEVBUF, M_WAITOK);
    801  1.182  sommerfe 	sc->sc_rbput = sc->sc_rbget = sc->sc_rbuf;
    802  1.182  sommerfe 	sc->sc_rbavail = com_rbuf_size;
    803  1.127   mycroft 	sc->sc_ebuf = sc->sc_rbuf + (com_rbuf_size << 1);
    804  1.147   thorpej 
    805  1.147   thorpej 	tty_attach(tp);
    806  1.147   thorpej 
    807   1.99   mycroft 	if (!ISSET(sc->sc_hwflags, COM_HW_NOIEN))
    808   1.99   mycroft 		SET(sc->sc_mcr, MCR_IENABLE);
    809   1.30   mycroft 
    810   1.96   mycroft 	if (ISSET(sc->sc_hwflags, COM_HW_CONSOLE)) {
    811  1.106  drochner 		int maj;
    812  1.106  drochner 
    813  1.106  drochner 		/* locate the major number */
    814  1.199   gehenna 		maj = cdevsw_lookup_major(&com_cdevsw);
    815  1.106  drochner 
    816  1.242   thorpej 		tp->t_dev = cn_tab->cn_dev = makedev(maj,
    817  1.276      cube 						     device_unit(sc->sc_dev));
    818  1.131      marc 
    819  1.276      cube 		aprint_normal_dev(sc->sc_dev, "console\n");
    820   1.96   mycroft 	}
    821   1.96   mycroft 
    822    1.1       cgd #ifdef KGDB
    823  1.102   thorpej 	/*
    824  1.102   thorpej 	 * Allow kgdb to "take over" this port.  If this is
    825  1.206    briggs 	 * not the console and is the kgdb device, it has
    826  1.206    briggs 	 * exclusive use.  If it's the console _and_ the
    827  1.206    briggs 	 * kgdb device, it doesn't.
    828  1.102   thorpej 	 */
    829  1.297    dyoung 	if (bus_space_is_equal(regsp->cr_iot, comkgdbregs.cr_iot) &&
    830  1.247   gdamore 	    regsp->cr_iobase == comkgdbregs.cr_iobase) {
    831  1.206    briggs 		if (!ISSET(sc->sc_hwflags, COM_HW_CONSOLE)) {
    832  1.206    briggs 			com_kgdb_attached = 1;
    833  1.106  drochner 
    834  1.206    briggs 			SET(sc->sc_hwflags, COM_HW_KGDB);
    835  1.206    briggs 		}
    836  1.276      cube 		aprint_normal_dev(sc->sc_dev, "kgdb\n");
    837  1.103  drochner 	}
    838   1.99   mycroft #endif
    839   1.99   mycroft 
    840  1.263        ad 	sc->sc_si = softint_establish(SOFTINT_SERIAL, comsoft, sc);
    841  1.115  explorer 
    842  1.304       tls #ifdef RND_COM
    843  1.277      cube 	rnd_attach_source(&sc->rnd_source, device_xname(sc->sc_dev),
    844  1.327       tls 			  RND_TYPE_TTY, RND_FLAG_DEFAULT);
    845  1.115  explorer #endif
    846  1.131      marc 
    847  1.131      marc 	/* if there are no enable/disable functions, assume the device
    848  1.131      marc 	   is always enabled */
    849  1.131      marc 	if (!sc->enable)
    850  1.131      marc 		sc->enabled = 1;
    851  1.131      marc 
    852  1.131      marc 	com_config(sc);
    853  1.132       cgd 
    854  1.132       cgd 	SET(sc->sc_hwflags, COM_HW_DEV_OK);
    855  1.350  jmcneill 
    856  1.362       rin 	if (sc->sc_poll_ticks != 0)
    857  1.362       rin 		callout_schedule(&sc->sc_poll_callout, sc->sc_poll_ticks);
    858  1.131      marc }
    859  1.131      marc 
    860  1.131      marc void
    861  1.197    simonb com_config(struct com_softc *sc)
    862  1.131      marc {
    863  1.247   gdamore 	struct com_regs *regsp = &sc->sc_regs;
    864  1.131      marc 
    865  1.131      marc 	/* Disable interrupts before configuring the device. */
    866  1.209   thorpej 	if (sc->sc_type == COM_TYPE_PXA2x0)
    867  1.208       scw 		sc->sc_ier = IER_EUART;
    868  1.208       scw 	else
    869  1.208       scw 		sc->sc_ier = 0;
    870  1.247   gdamore 	CSR_WRITE_1(regsp, COM_REG_IER, sc->sc_ier);
    871  1.247   gdamore 	(void) CSR_READ_1(regsp, COM_REG_IIR);
    872  1.131      marc 
    873  1.131      marc 	/* Look for a Hayes ESP board. */
    874  1.209   thorpej 	if (sc->sc_type == COM_TYPE_HAYESP) {
    875  1.131      marc 
    876  1.131      marc 		/* Set 16550 compatibility mode */
    877  1.258      cube 		bus_space_write_1(regsp->cr_iot, sc->sc_hayespioh, HAYESP_CMD1,
    878  1.131      marc 				  HAYESP_SETMODE);
    879  1.258      cube 		bus_space_write_1(regsp->cr_iot, sc->sc_hayespioh, HAYESP_CMD2,
    880  1.131      marc 				  HAYESP_MODE_FIFO|HAYESP_MODE_RTS|
    881  1.131      marc 				  HAYESP_MODE_SCALE);
    882  1.131      marc 
    883  1.131      marc 		/* Set RTS/CTS flow control */
    884  1.258      cube 		bus_space_write_1(regsp->cr_iot, sc->sc_hayespioh, HAYESP_CMD1,
    885  1.131      marc 				  HAYESP_SETFLOWTYPE);
    886  1.258      cube 		bus_space_write_1(regsp->cr_iot, sc->sc_hayespioh, HAYESP_CMD2,
    887  1.131      marc 				  HAYESP_FLOW_RTS);
    888  1.258      cube 		bus_space_write_1(regsp->cr_iot, sc->sc_hayespioh, HAYESP_CMD2,
    889  1.131      marc 				  HAYESP_FLOW_CTS);
    890  1.131      marc 
    891  1.131      marc 		/* Set flow control levels */
    892  1.258      cube 		bus_space_write_1(regsp->cr_iot, sc->sc_hayespioh, HAYESP_CMD1,
    893  1.131      marc 				  HAYESP_SETRXFLOW);
    894  1.258      cube 		bus_space_write_1(regsp->cr_iot, sc->sc_hayespioh, HAYESP_CMD2,
    895  1.131      marc 				  HAYESP_HIBYTE(HAYESP_RXHIWMARK));
    896  1.258      cube 		bus_space_write_1(regsp->cr_iot, sc->sc_hayespioh, HAYESP_CMD2,
    897  1.131      marc 				  HAYESP_LOBYTE(HAYESP_RXHIWMARK));
    898  1.258      cube 		bus_space_write_1(regsp->cr_iot, sc->sc_hayespioh, HAYESP_CMD2,
    899  1.131      marc 				  HAYESP_HIBYTE(HAYESP_RXLOWMARK));
    900  1.258      cube 		bus_space_write_1(regsp->cr_iot, sc->sc_hayespioh, HAYESP_CMD2,
    901  1.131      marc 				  HAYESP_LOBYTE(HAYESP_RXLOWMARK));
    902  1.131      marc 	}
    903  1.131      marc 
    904  1.186       uwe 	if (ISSET(sc->sc_hwflags, COM_HW_CONSOLE|COM_HW_KGDB))
    905  1.131      marc 		com_enable_debugport(sc);
    906    1.1       cgd }
    907    1.1       cgd 
    908  1.149   thorpej int
    909  1.274    dyoung com_detach(device_t self, int flags)
    910  1.149   thorpej {
    911  1.274    dyoung 	struct com_softc *sc = device_private(self);
    912  1.149   thorpej 	int maj, mn;
    913  1.149   thorpej 
    914  1.289    dyoung 	if (ISSET(sc->sc_hwflags, COM_HW_KGDB))
    915  1.289    dyoung 		return EBUSY;
    916  1.289    dyoung 
    917  1.303  jakllsch 	if (ISSET(sc->sc_hwflags, COM_HW_CONSOLE) &&
    918  1.289    dyoung 	    (flags & DETACH_SHUTDOWN) != 0)
    919  1.272    dyoung 		return EBUSY;
    920  1.272    dyoung 
    921  1.289    dyoung 	if (sc->disable != NULL && sc->enabled != 0) {
    922  1.289    dyoung 		(*sc->disable)(sc);
    923  1.289    dyoung 		sc->enabled = 0;
    924  1.289    dyoung 	}
    925  1.289    dyoung 
    926  1.303  jakllsch 	if (ISSET(sc->sc_hwflags, COM_HW_CONSOLE)) {
    927  1.289    dyoung 		comconsattached = 0;
    928  1.289    dyoung 		cn_tab = NULL;
    929  1.289    dyoung 	}
    930  1.289    dyoung 
    931  1.149   thorpej 	/* locate the major number */
    932  1.199   gehenna 	maj = cdevsw_lookup_major(&com_cdevsw);
    933  1.149   thorpej 
    934  1.149   thorpej 	/* Nuke the vnodes for any open instances. */
    935  1.242   thorpej 	mn = device_unit(self);
    936  1.149   thorpej 	vdevgone(maj, mn, mn, VCHR);
    937  1.149   thorpej 
    938  1.149   thorpej 	mn |= COMDIALOUT_MASK;
    939  1.149   thorpej 	vdevgone(maj, mn, mn, VCHR);
    940  1.149   thorpej 
    941  1.196  christos 	if (sc->sc_rbuf == NULL) {
    942  1.196  christos 		/*
    943  1.196  christos 		 * Ring buffer allocation failed in the com_attach_subr,
    944  1.196  christos 		 * only the tty is allocated, and nothing else.
    945  1.196  christos 		 */
    946  1.300     rmind 		tty_free(sc->sc_tty);
    947  1.196  christos 		return 0;
    948  1.196  christos 	}
    949  1.232     perry 
    950  1.149   thorpej 	/* Free the receive buffer. */
    951  1.149   thorpej 	free(sc->sc_rbuf, M_DEVBUF);
    952  1.149   thorpej 
    953  1.149   thorpej 	/* Detach and free the tty. */
    954  1.149   thorpej 	tty_detach(sc->sc_tty);
    955  1.300     rmind 	tty_free(sc->sc_tty);
    956  1.149   thorpej 
    957  1.149   thorpej 	/* Unhook the soft interrupt handler. */
    958  1.263        ad 	softint_disestablish(sc->sc_si);
    959  1.149   thorpej 
    960  1.304       tls #ifdef RND_COM
    961  1.149   thorpej 	/* Unhook the entropy source. */
    962  1.149   thorpej 	rnd_detach_source(&sc->rnd_source);
    963  1.149   thorpej #endif
    964  1.273    dyoung 	callout_destroy(&sc->sc_diag_callout);
    965  1.149   thorpej 
    966  1.271        ad 	/* Destroy the lock. */
    967  1.271        ad 	mutex_destroy(&sc->sc_lock);
    968  1.271        ad 
    969  1.149   thorpej 	return (0);
    970  1.149   thorpej }
    971  1.149   thorpej 
    972  1.141   mycroft void
    973  1.197    simonb com_shutdown(struct com_softc *sc)
    974  1.141   mycroft {
    975  1.141   mycroft 	struct tty *tp = sc->sc_tty;
    976  1.141   mycroft 
    977  1.263        ad 	mutex_spin_enter(&sc->sc_lock);
    978  1.141   mycroft 
    979  1.141   mycroft 	/* If we were asserting flow control, then deassert it. */
    980  1.141   mycroft 	SET(sc->sc_rx_flags, RX_IBUF_BLOCKED);
    981  1.141   mycroft 	com_hwiflow(sc);
    982  1.141   mycroft 
    983  1.141   mycroft 	/* Clear any break condition set with TIOCSBRK. */
    984  1.141   mycroft 	com_break(sc, 0);
    985  1.141   mycroft 
    986  1.141   mycroft 	/*
    987  1.374  riastrad 	 * Hang up if necessary.  Record when we hung up, so if we
    988  1.374  riastrad 	 * immediately open the port again, we will wait a bit until
    989  1.374  riastrad 	 * the other side has had time to notice that we hung up.
    990  1.141   mycroft 	 */
    991  1.141   mycroft 	if (ISSET(tp->t_cflag, HUPCL)) {
    992  1.141   mycroft 		com_modem(sc, 0);
    993  1.370  jmcneill 		microuptime(&sc->sc_hup_pending);
    994  1.366  jmcneill 		sc->sc_hup_pending.tv_sec++;
    995  1.141   mycroft 	}
    996  1.141   mycroft 
    997  1.141   mycroft 	/* Turn off interrupts. */
    998  1.208       scw 	if (ISSET(sc->sc_hwflags, COM_HW_CONSOLE)) {
    999  1.337  christos 		sc->sc_ier = IER_ERLS; /* interrupt on line break */
   1000  1.330  macallan 		if ((sc->sc_type == COM_TYPE_PXA2x0) ||
   1001  1.336  jmcneill 		    (sc->sc_type == COM_TYPE_INGENIC) ||
   1002  1.336  jmcneill 		    (sc->sc_type == COM_TYPE_TEGRA))
   1003  1.208       scw 			sc->sc_ier |= IER_ERXTOUT;
   1004  1.208       scw 	} else
   1005  1.141   mycroft 		sc->sc_ier = 0;
   1006  1.208       scw 
   1007  1.209   thorpej 	if (sc->sc_type == COM_TYPE_PXA2x0)
   1008  1.208       scw 		sc->sc_ier |= IER_EUART;
   1009  1.208       scw 
   1010  1.247   gdamore 	CSR_WRITE_1(&sc->sc_regs, COM_REG_IER, sc->sc_ier);
   1011  1.141   mycroft 
   1012  1.269        ad 	mutex_spin_exit(&sc->sc_lock);
   1013  1.269        ad 
   1014  1.141   mycroft 	if (sc->disable) {
   1015  1.141   mycroft #ifdef DIAGNOSTIC
   1016  1.141   mycroft 		if (!sc->enabled)
   1017  1.141   mycroft 			panic("com_shutdown: not enabled?");
   1018  1.141   mycroft #endif
   1019  1.141   mycroft 		(*sc->disable)(sc);
   1020  1.141   mycroft 		sc->enabled = 0;
   1021  1.141   mycroft 	}
   1022  1.141   mycroft }
   1023  1.141   mycroft 
   1024   1.21   mycroft int
   1025  1.256  christos comopen(dev_t dev, int flag, int mode, struct lwp *l)
   1026    1.1       cgd {
   1027   1.21   mycroft 	struct com_softc *sc;
   1028   1.21   mycroft 	struct tty *tp;
   1029  1.263        ad 	int s;
   1030  1.142   mycroft 	int error;
   1031  1.173   thorpej 
   1032  1.276      cube 	sc = device_lookup_private(&com_cd, COMUNIT(dev));
   1033  1.173   thorpej 	if (sc == NULL || !ISSET(sc->sc_hwflags, COM_HW_DEV_OK) ||
   1034  1.177       eeh 		sc->sc_rbuf == NULL)
   1035   1.99   mycroft 		return (ENXIO);
   1036   1.21   mycroft 
   1037  1.276      cube 	if (!device_is_active(sc->sc_dev))
   1038  1.149   thorpej 		return (ENXIO);
   1039  1.149   thorpej 
   1040  1.102   thorpej #ifdef KGDB
   1041  1.102   thorpej 	/*
   1042  1.102   thorpej 	 * If this is the kgdb port, no other use is permitted.
   1043  1.102   thorpej 	 */
   1044  1.102   thorpej 	if (ISSET(sc->sc_hwflags, COM_HW_KGDB))
   1045  1.102   thorpej 		return (EBUSY);
   1046  1.102   thorpej #endif
   1047  1.102   thorpej 
   1048  1.120   mycroft 	tp = sc->sc_tty;
   1049   1.21   mycroft 
   1050  1.345    martin 	/*
   1051  1.345    martin 	 * If the device is exclusively for kernel use, deny userland
   1052  1.345    martin 	 * open.
   1053  1.345    martin 	 */
   1054  1.345    martin 	if (ISSET(tp->t_state, TS_KERN_ONLY))
   1055  1.345    martin 		return (EBUSY);
   1056  1.345    martin 
   1057  1.253      elad 	if (kauth_authorize_device_tty(l->l_cred, KAUTH_DEVICE_TTY_OPEN, tp))
   1058   1.99   mycroft 		return (EBUSY);
   1059   1.99   mycroft 
   1060   1.99   mycroft 	s = spltty();
   1061   1.99   mycroft 
   1062   1.99   mycroft 	/*
   1063   1.99   mycroft 	 * Do the following iff this is a first open.
   1064   1.99   mycroft 	 */
   1065  1.141   mycroft 	if (!ISSET(tp->t_state, TS_ISOPEN) && tp->t_wopen == 0) {
   1066   1.99   mycroft 		struct termios t;
   1067  1.366  jmcneill 		struct timeval now, diff;
   1068   1.99   mycroft 
   1069  1.127   mycroft 		tp->t_dev = dev;
   1070  1.127   mycroft 
   1071  1.131      marc 		if (sc->enable) {
   1072  1.131      marc 			if ((*sc->enable)(sc)) {
   1073  1.134     enami 				splx(s);
   1074  1.276      cube 				aprint_error_dev(sc->sc_dev,
   1075  1.276      cube 				    "device enable failed\n");
   1076  1.131      marc 				return (EIO);
   1077  1.131      marc 			}
   1078  1.269        ad 			mutex_spin_enter(&sc->sc_lock);
   1079  1.131      marc 			sc->enabled = 1;
   1080  1.131      marc 			com_config(sc);
   1081  1.269        ad 		} else {
   1082  1.269        ad 			mutex_spin_enter(&sc->sc_lock);
   1083  1.131      marc 		}
   1084  1.131      marc 
   1085  1.366  jmcneill 		if (timerisset(&sc->sc_hup_pending)) {
   1086  1.370  jmcneill 			microuptime(&now);
   1087  1.366  jmcneill 			while (timercmp(&now, &sc->sc_hup_pending, <)) {
   1088  1.366  jmcneill 				timersub(&sc->sc_hup_pending, &now, &diff);
   1089  1.369  jmcneill 				const int ms = diff.tv_sec * 1000 +
   1090  1.370  jmcneill 				    diff.tv_usec / 1000;
   1091  1.370  jmcneill 				kpause(ttclos, false, uimax(mstohz(ms), 1),
   1092  1.366  jmcneill 				    &sc->sc_lock);
   1093  1.370  jmcneill 				microuptime(&now);
   1094  1.366  jmcneill 			}
   1095  1.366  jmcneill 			timerclear(&sc->sc_hup_pending);
   1096  1.366  jmcneill 		}
   1097  1.366  jmcneill 
   1098   1.99   mycroft 		/* Turn on interrupts. */
   1099  1.301      matt 		sc->sc_ier = IER_ERXRDY | IER_ERLS;
   1100  1.301      matt 		if (!ISSET(tp->t_cflag, CLOCAL))
   1101  1.301      matt 			sc->sc_ier |= IER_EMSC;
   1102  1.301      matt 
   1103  1.209   thorpej 		if (sc->sc_type == COM_TYPE_PXA2x0)
   1104  1.208       scw 			sc->sc_ier |= IER_EUART | IER_ERXTOUT;
   1105  1.336  jmcneill 		else if (sc->sc_type == COM_TYPE_INGENIC ||
   1106  1.336  jmcneill 			 sc->sc_type == COM_TYPE_TEGRA)
   1107  1.330  macallan 			sc->sc_ier |= IER_ERXTOUT;
   1108  1.247   gdamore 		CSR_WRITE_1(&sc->sc_regs, COM_REG_IER, sc->sc_ier);
   1109   1.99   mycroft 
   1110   1.99   mycroft 		/* Fetch the current modem control status, needed later. */
   1111  1.247   gdamore 		sc->sc_msr = CSR_READ_1(&sc->sc_regs, COM_REG_MSR);
   1112   1.99   mycroft 
   1113  1.144  jonathan 		/* Clear PPS capture state on first open. */
   1114  1.279        ad 		mutex_spin_enter(&timecounter_lock);
   1115  1.244    kardel 		memset(&sc->sc_pps_state, 0, sizeof(sc->sc_pps_state));
   1116  1.244    kardel 		sc->sc_pps_state.ppscap = PPS_CAPTUREASSERT | PPS_CAPTURECLEAR;
   1117  1.244    kardel 		pps_init(&sc->sc_pps_state);
   1118  1.279        ad 		mutex_spin_exit(&timecounter_lock);
   1119  1.144  jonathan 
   1120  1.263        ad 		mutex_spin_exit(&sc->sc_lock);
   1121   1.99   mycroft 
   1122   1.99   mycroft 		/*
   1123   1.99   mycroft 		 * Initialize the termios status to the defaults.  Add in the
   1124   1.99   mycroft 		 * sticky bits from TIOCSFLAGS.
   1125   1.99   mycroft 		 */
   1126   1.98   mycroft 		if (ISSET(sc->sc_hwflags, COM_HW_CONSOLE)) {
   1127  1.289    dyoung 			t.c_ospeed = comcons_info.rate;
   1128  1.289    dyoung 			t.c_cflag = comcons_info.cflag;
   1129   1.98   mycroft 		} else {
   1130   1.99   mycroft 			t.c_ospeed = TTYDEF_SPEED;
   1131   1.99   mycroft 			t.c_cflag = TTYDEF_CFLAG;
   1132   1.98   mycroft 		}
   1133  1.237       dsl 		t.c_ispeed = t.c_ospeed;
   1134   1.99   mycroft 		if (ISSET(sc->sc_swflags, TIOCFLAG_CLOCAL))
   1135   1.99   mycroft 			SET(t.c_cflag, CLOCAL);
   1136   1.99   mycroft 		if (ISSET(sc->sc_swflags, TIOCFLAG_CRTSCTS))
   1137   1.99   mycroft 			SET(t.c_cflag, CRTSCTS);
   1138   1.99   mycroft 		if (ISSET(sc->sc_swflags, TIOCFLAG_MDMBUF))
   1139   1.99   mycroft 			SET(t.c_cflag, MDMBUF);
   1140  1.129   mycroft 		/* Make sure comparam() will do something. */
   1141  1.129   mycroft 		tp->t_ospeed = 0;
   1142  1.120   mycroft 		(void) comparam(tp, &t);
   1143   1.99   mycroft 		tp->t_iflag = TTYDEF_IFLAG;
   1144   1.99   mycroft 		tp->t_oflag = TTYDEF_OFLAG;
   1145   1.16        ws 		tp->t_lflag = TTYDEF_LFLAG;
   1146   1.99   mycroft 		ttychars(tp);
   1147    1.1       cgd 		ttsetwater(tp);
   1148   1.21   mycroft 
   1149  1.263        ad 		mutex_spin_enter(&sc->sc_lock);
   1150  1.136   mycroft 
   1151   1.99   mycroft 		/*
   1152   1.99   mycroft 		 * Turn on DTR.  We must always do this, even if carrier is not
   1153   1.99   mycroft 		 * present, because otherwise we'd have to use TIOCSDTR
   1154  1.121   mycroft 		 * immediately after setting CLOCAL, which applications do not
   1155  1.121   mycroft 		 * expect.  We always assert DTR while the device is open
   1156  1.121   mycroft 		 * unless explicitly requested to deassert it.
   1157   1.99   mycroft 		 */
   1158   1.99   mycroft 		com_modem(sc, 1);
   1159   1.65  christos 
   1160   1.99   mycroft 		/* Clear the input ring, and unblock. */
   1161  1.127   mycroft 		sc->sc_rbput = sc->sc_rbget = sc->sc_rbuf;
   1162  1.127   mycroft 		sc->sc_rbavail = com_rbuf_size;
   1163   1.99   mycroft 		com_iflush(sc);
   1164  1.101   mycroft 		CLR(sc->sc_rx_flags, RX_ANY_BLOCK);
   1165  1.101   mycroft 		com_hwiflow(sc);
   1166   1.65  christos 
   1167   1.99   mycroft #ifdef COM_DEBUG
   1168  1.101   mycroft 		if (com_debug)
   1169  1.101   mycroft 			comstatus(sc, "comopen  ");
   1170   1.65  christos #endif
   1171   1.21   mycroft 
   1172  1.263        ad 		mutex_spin_exit(&sc->sc_lock);
   1173   1.99   mycroft 	}
   1174  1.232     perry 
   1175  1.143   mycroft 	splx(s);
   1176   1.21   mycroft 
   1177  1.143   mycroft 	error = ttyopen(tp, COMDIALOUT(dev), ISSET(flag, O_NONBLOCK));
   1178  1.143   mycroft 	if (error)
   1179  1.143   mycroft 		goto bad;
   1180  1.141   mycroft 
   1181  1.181       eeh 	error = (*tp->t_linesw->l_open)(dev, tp);
   1182  1.139     enami 	if (error)
   1183  1.141   mycroft 		goto bad;
   1184  1.139     enami 
   1185  1.141   mycroft 	return (0);
   1186  1.139     enami 
   1187  1.141   mycroft bad:
   1188  1.141   mycroft 	if (!ISSET(tp->t_state, TS_ISOPEN) && tp->t_wopen == 0) {
   1189  1.141   mycroft 		/*
   1190  1.141   mycroft 		 * We failed to open the device, and nobody else had it opened.
   1191  1.141   mycroft 		 * Clean up the state as appropriate.
   1192  1.141   mycroft 		 */
   1193  1.141   mycroft 		com_shutdown(sc);
   1194  1.141   mycroft 	}
   1195  1.139     enami 
   1196   1.99   mycroft 	return (error);
   1197    1.1       cgd }
   1198  1.232     perry 
   1199   1.21   mycroft int
   1200  1.256  christos comclose(dev_t dev, int flag, int mode, struct lwp *l)
   1201    1.1       cgd {
   1202  1.276      cube 	struct com_softc *sc =
   1203  1.276      cube 	    device_lookup_private(&com_cd, COMUNIT(dev));
   1204   1.50   mycroft 	struct tty *tp = sc->sc_tty;
   1205   1.57   mycroft 
   1206   1.57   mycroft 	/* XXX This is for cons.c. */
   1207   1.62   mycroft 	if (!ISSET(tp->t_state, TS_ISOPEN))
   1208   1.99   mycroft 		return (0);
   1209  1.345    martin 	/*
   1210  1.345    martin 	 * If the device is exclusively for kernel use, deny userland
   1211  1.345    martin 	 * close.
   1212  1.345    martin 	 */
   1213  1.345    martin 	if (ISSET(tp->t_state, TS_KERN_ONLY))
   1214  1.345    martin 		return (0);
   1215   1.21   mycroft 
   1216  1.181       eeh 	(*tp->t_linesw->l_close)(tp, flag);
   1217    1.1       cgd 	ttyclose(tp);
   1218   1.99   mycroft 
   1219  1.149   thorpej 	if (COM_ISALIVE(sc) == 0)
   1220  1.149   thorpej 		return (0);
   1221  1.149   thorpej 
   1222  1.143   mycroft 	if (!ISSET(tp->t_state, TS_ISOPEN) && tp->t_wopen == 0) {
   1223  1.143   mycroft 		/*
   1224  1.143   mycroft 		 * Although we got a last close, the device may still be in
   1225  1.143   mycroft 		 * use; e.g. if this was the dialout node, and there are still
   1226  1.143   mycroft 		 * processes waiting for carrier on the non-dialout node.
   1227  1.143   mycroft 		 */
   1228  1.143   mycroft 		com_shutdown(sc);
   1229  1.143   mycroft 	}
   1230  1.120   mycroft 
   1231   1.99   mycroft 	return (0);
   1232    1.1       cgd }
   1233  1.232     perry 
   1234   1.21   mycroft int
   1235  1.197    simonb comread(dev_t dev, struct uio *uio, int flag)
   1236    1.1       cgd {
   1237  1.276      cube 	struct com_softc *sc =
   1238  1.276      cube 	    device_lookup_private(&com_cd, COMUNIT(dev));
   1239   1.52   mycroft 	struct tty *tp = sc->sc_tty;
   1240  1.149   thorpej 
   1241  1.149   thorpej 	if (COM_ISALIVE(sc) == 0)
   1242  1.149   thorpej 		return (EIO);
   1243  1.232     perry 
   1244  1.181       eeh 	return ((*tp->t_linesw->l_read)(tp, uio, flag));
   1245    1.1       cgd }
   1246  1.232     perry 
   1247   1.21   mycroft int
   1248  1.197    simonb comwrite(dev_t dev, struct uio *uio, int flag)
   1249    1.1       cgd {
   1250  1.276      cube 	struct com_softc *sc =
   1251  1.276      cube 	    device_lookup_private(&com_cd, COMUNIT(dev));
   1252   1.52   mycroft 	struct tty *tp = sc->sc_tty;
   1253  1.149   thorpej 
   1254  1.149   thorpej 	if (COM_ISALIVE(sc) == 0)
   1255  1.149   thorpej 		return (EIO);
   1256  1.232     perry 
   1257  1.181       eeh 	return ((*tp->t_linesw->l_write)(tp, uio, flag));
   1258  1.184       scw }
   1259  1.184       scw 
   1260  1.184       scw int
   1261  1.238  christos compoll(dev_t dev, int events, struct lwp *l)
   1262  1.184       scw {
   1263  1.276      cube 	struct com_softc *sc =
   1264  1.276      cube 	    device_lookup_private(&com_cd, COMUNIT(dev));
   1265  1.184       scw 	struct tty *tp = sc->sc_tty;
   1266  1.184       scw 
   1267  1.184       scw 	if (COM_ISALIVE(sc) == 0)
   1268  1.234        ws 		return (POLLHUP);
   1269  1.232     perry 
   1270  1.238  christos 	return ((*tp->t_linesw->l_poll)(tp, events, l));
   1271    1.1       cgd }
   1272   1.50   mycroft 
   1273   1.50   mycroft struct tty *
   1274  1.197    simonb comtty(dev_t dev)
   1275   1.50   mycroft {
   1276  1.276      cube 	struct com_softc *sc =
   1277  1.276      cube 	    device_lookup_private(&com_cd, COMUNIT(dev));
   1278   1.52   mycroft 	struct tty *tp = sc->sc_tty;
   1279   1.50   mycroft 
   1280   1.52   mycroft 	return (tp);
   1281   1.50   mycroft }
   1282  1.111  christos 
   1283   1.21   mycroft int
   1284  1.259  christos comioctl(dev_t dev, u_long cmd, void *data, int flag, struct lwp *l)
   1285    1.1       cgd {
   1286  1.273    dyoung 	struct com_softc *sc;
   1287  1.273    dyoung 	struct tty *tp;
   1288   1.21   mycroft 	int error;
   1289   1.21   mycroft 
   1290  1.276      cube 	sc = device_lookup_private(&com_cd, COMUNIT(dev));
   1291  1.273    dyoung 	if (sc == NULL)
   1292  1.273    dyoung 		return ENXIO;
   1293  1.149   thorpej 	if (COM_ISALIVE(sc) == 0)
   1294  1.149   thorpej 		return (EIO);
   1295  1.149   thorpej 
   1296  1.273    dyoung 	tp = sc->sc_tty;
   1297  1.273    dyoung 
   1298  1.238  christos 	error = (*tp->t_linesw->l_ioctl)(tp, cmd, data, flag, l);
   1299  1.194    atatat 	if (error != EPASSTHROUGH)
   1300   1.99   mycroft 		return (error);
   1301   1.99   mycroft 
   1302  1.238  christos 	error = ttioctl(tp, cmd, data, flag, l);
   1303  1.194    atatat 	if (error != EPASSTHROUGH)
   1304   1.99   mycroft 		return (error);
   1305  1.138   mycroft 
   1306  1.138   mycroft 	error = 0;
   1307  1.249      elad 	switch (cmd) {
   1308  1.249      elad 	case TIOCSFLAGS:
   1309  1.254      elad 		error = kauth_authorize_device_tty(l->l_cred,
   1310  1.254      elad 		    KAUTH_DEVICE_TTY_PRIVSET, tp);
   1311  1.249      elad 		break;
   1312  1.249      elad 	default:
   1313  1.249      elad 		/* nothing */
   1314  1.249      elad 		break;
   1315  1.249      elad 	}
   1316  1.249      elad 	if (error) {
   1317  1.249      elad 		return error;
   1318  1.249      elad 	}
   1319    1.1       cgd 
   1320  1.263        ad 	mutex_spin_enter(&sc->sc_lock);
   1321  1.136   mycroft 
   1322    1.1       cgd 	switch (cmd) {
   1323    1.1       cgd 	case TIOCSBRK:
   1324   1.99   mycroft 		com_break(sc, 1);
   1325    1.1       cgd 		break;
   1326   1.99   mycroft 
   1327    1.1       cgd 	case TIOCCBRK:
   1328   1.99   mycroft 		com_break(sc, 0);
   1329    1.1       cgd 		break;
   1330   1.99   mycroft 
   1331    1.1       cgd 	case TIOCSDTR:
   1332   1.99   mycroft 		com_modem(sc, 1);
   1333    1.1       cgd 		break;
   1334   1.99   mycroft 
   1335    1.1       cgd 	case TIOCCDTR:
   1336   1.99   mycroft 		com_modem(sc, 0);
   1337    1.1       cgd 		break;
   1338   1.99   mycroft 
   1339   1.99   mycroft 	case TIOCGFLAGS:
   1340   1.99   mycroft 		*(int *)data = sc->sc_swflags;
   1341   1.99   mycroft 		break;
   1342   1.99   mycroft 
   1343   1.99   mycroft 	case TIOCSFLAGS:
   1344   1.99   mycroft 		sc->sc_swflags = *(int *)data;
   1345   1.99   mycroft 		break;
   1346   1.99   mycroft 
   1347    1.1       cgd 	case TIOCMSET:
   1348    1.1       cgd 	case TIOCMBIS:
   1349    1.1       cgd 	case TIOCMBIC:
   1350  1.153   mycroft 		tiocm_to_com(sc, cmd, *(int *)data);
   1351  1.111  christos 		break;
   1352  1.111  christos 
   1353  1.153   mycroft 	case TIOCMGET:
   1354  1.153   mycroft 		*(int *)data = com_to_tiocm(sc);
   1355  1.111  christos 		break;
   1356  1.144  jonathan 
   1357  1.244    kardel 	case PPS_IOC_CREATE:
   1358  1.244    kardel 	case PPS_IOC_DESTROY:
   1359  1.244    kardel 	case PPS_IOC_GETPARAMS:
   1360  1.244    kardel 	case PPS_IOC_SETPARAMS:
   1361  1.244    kardel 	case PPS_IOC_GETCAP:
   1362  1.244    kardel 	case PPS_IOC_FETCH:
   1363  1.244    kardel #ifdef PPS_SYNC
   1364  1.244    kardel 	case PPS_IOC_KCBIND:
   1365  1.244    kardel #endif
   1366  1.279        ad 		mutex_spin_enter(&timecounter_lock);
   1367  1.244    kardel 		error = pps_ioctl(cmd, data, &sc->sc_pps_state);
   1368  1.279        ad 		mutex_spin_exit(&timecounter_lock);
   1369  1.244    kardel 		break;
   1370  1.224    simonb 
   1371  1.144  jonathan 	case TIOCDCDTIMESTAMP:	/* XXX old, overloaded  API used by xntpd v3 */
   1372  1.279        ad 		mutex_spin_enter(&timecounter_lock);
   1373  1.244    kardel #ifndef PPS_TRAILING_EDGE
   1374  1.244    kardel 		TIMESPEC_TO_TIMEVAL((struct timeval *)data,
   1375  1.244    kardel 		    &sc->sc_pps_state.ppsinfo.assert_timestamp);
   1376  1.244    kardel #else
   1377  1.244    kardel 		TIMESPEC_TO_TIMEVAL((struct timeval *)data,
   1378  1.244    kardel 		    &sc->sc_pps_state.ppsinfo.clear_timestamp);
   1379  1.244    kardel #endif
   1380  1.279        ad 		mutex_spin_exit(&timecounter_lock);
   1381  1.144  jonathan 		break;
   1382  1.144  jonathan 
   1383   1.99   mycroft 	default:
   1384  1.194    atatat 		error = EPASSTHROUGH;
   1385  1.136   mycroft 		break;
   1386   1.21   mycroft 	}
   1387   1.22       cgd 
   1388  1.263        ad 	mutex_spin_exit(&sc->sc_lock);
   1389  1.136   mycroft 
   1390   1.99   mycroft #ifdef COM_DEBUG
   1391  1.101   mycroft 	if (com_debug)
   1392   1.99   mycroft 		comstatus(sc, "comioctl ");
   1393   1.99   mycroft #endif
   1394   1.99   mycroft 
   1395  1.136   mycroft 	return (error);
   1396   1.99   mycroft }
   1397   1.99   mycroft 
   1398  1.378  riastrad static inline void
   1399  1.197    simonb com_schedrx(struct com_softc *sc)
   1400  1.101   mycroft {
   1401  1.101   mycroft 
   1402  1.101   mycroft 	sc->sc_rx_ready = 1;
   1403  1.101   mycroft 
   1404  1.101   mycroft 	/* Wake up the poller. */
   1405  1.263        ad 	softint_schedule(sc->sc_si);
   1406  1.101   mycroft }
   1407  1.101   mycroft 
   1408   1.99   mycroft void
   1409  1.197    simonb com_break(struct com_softc *sc, int onoff)
   1410   1.99   mycroft {
   1411   1.99   mycroft 
   1412   1.99   mycroft 	if (onoff)
   1413   1.99   mycroft 		SET(sc->sc_lcr, LCR_SBREAK);
   1414   1.99   mycroft 	else
   1415   1.99   mycroft 		CLR(sc->sc_lcr, LCR_SBREAK);
   1416   1.22       cgd 
   1417   1.99   mycroft 	if (!sc->sc_heldchange) {
   1418   1.99   mycroft 		if (sc->sc_tx_busy) {
   1419   1.99   mycroft 			sc->sc_heldtbc = sc->sc_tbc;
   1420   1.99   mycroft 			sc->sc_tbc = 0;
   1421   1.99   mycroft 			sc->sc_heldchange = 1;
   1422   1.99   mycroft 		} else
   1423   1.99   mycroft 			com_loadchannelregs(sc);
   1424   1.22       cgd 	}
   1425   1.99   mycroft }
   1426   1.22       cgd 
   1427   1.99   mycroft void
   1428  1.197    simonb com_modem(struct com_softc *sc, int onoff)
   1429   1.99   mycroft {
   1430   1.22       cgd 
   1431  1.153   mycroft 	if (sc->sc_mcr_dtr == 0)
   1432  1.153   mycroft 		return;
   1433  1.153   mycroft 
   1434   1.99   mycroft 	if (onoff)
   1435   1.99   mycroft 		SET(sc->sc_mcr, sc->sc_mcr_dtr);
   1436   1.99   mycroft 	else
   1437   1.99   mycroft 		CLR(sc->sc_mcr, sc->sc_mcr_dtr);
   1438   1.22       cgd 
   1439   1.99   mycroft 	if (!sc->sc_heldchange) {
   1440   1.99   mycroft 		if (sc->sc_tx_busy) {
   1441   1.99   mycroft 			sc->sc_heldtbc = sc->sc_tbc;
   1442   1.99   mycroft 			sc->sc_tbc = 0;
   1443   1.99   mycroft 			sc->sc_heldchange = 1;
   1444   1.99   mycroft 		} else
   1445   1.99   mycroft 			com_loadchannelregs(sc);
   1446   1.22       cgd 	}
   1447  1.153   mycroft }
   1448  1.153   mycroft 
   1449  1.153   mycroft void
   1450  1.197    simonb tiocm_to_com(struct com_softc *sc, u_long how, int ttybits)
   1451  1.153   mycroft {
   1452  1.153   mycroft 	u_char combits;
   1453  1.153   mycroft 
   1454  1.153   mycroft 	combits = 0;
   1455  1.153   mycroft 	if (ISSET(ttybits, TIOCM_DTR))
   1456  1.153   mycroft 		SET(combits, MCR_DTR);
   1457  1.153   mycroft 	if (ISSET(ttybits, TIOCM_RTS))
   1458  1.153   mycroft 		SET(combits, MCR_RTS);
   1459  1.232     perry 
   1460  1.153   mycroft 	switch (how) {
   1461  1.153   mycroft 	case TIOCMBIC:
   1462  1.153   mycroft 		CLR(sc->sc_mcr, combits);
   1463  1.153   mycroft 		break;
   1464  1.153   mycroft 
   1465  1.153   mycroft 	case TIOCMBIS:
   1466  1.153   mycroft 		SET(sc->sc_mcr, combits);
   1467  1.153   mycroft 		break;
   1468  1.153   mycroft 
   1469  1.153   mycroft 	case TIOCMSET:
   1470  1.153   mycroft 		CLR(sc->sc_mcr, MCR_DTR | MCR_RTS);
   1471  1.153   mycroft 		SET(sc->sc_mcr, combits);
   1472  1.153   mycroft 		break;
   1473  1.153   mycroft 	}
   1474  1.153   mycroft 
   1475  1.153   mycroft 	if (!sc->sc_heldchange) {
   1476  1.153   mycroft 		if (sc->sc_tx_busy) {
   1477  1.153   mycroft 			sc->sc_heldtbc = sc->sc_tbc;
   1478  1.153   mycroft 			sc->sc_tbc = 0;
   1479  1.153   mycroft 			sc->sc_heldchange = 1;
   1480  1.153   mycroft 		} else
   1481  1.153   mycroft 			com_loadchannelregs(sc);
   1482  1.153   mycroft 	}
   1483  1.153   mycroft }
   1484  1.153   mycroft 
   1485  1.153   mycroft int
   1486  1.197    simonb com_to_tiocm(struct com_softc *sc)
   1487  1.153   mycroft {
   1488  1.153   mycroft 	u_char combits;
   1489  1.153   mycroft 	int ttybits = 0;
   1490  1.153   mycroft 
   1491  1.153   mycroft 	combits = sc->sc_mcr;
   1492  1.153   mycroft 	if (ISSET(combits, MCR_DTR))
   1493  1.153   mycroft 		SET(ttybits, TIOCM_DTR);
   1494  1.153   mycroft 	if (ISSET(combits, MCR_RTS))
   1495  1.153   mycroft 		SET(ttybits, TIOCM_RTS);
   1496  1.153   mycroft 
   1497  1.153   mycroft 	combits = sc->sc_msr;
   1498  1.330  macallan 	if (sc->sc_type == COM_TYPE_INGENIC) {
   1499  1.153   mycroft 		SET(ttybits, TIOCM_CD);
   1500  1.330  macallan 	} else {
   1501  1.330  macallan 		if (ISSET(combits, MSR_DCD))
   1502  1.330  macallan 			SET(ttybits, TIOCM_CD);
   1503  1.330  macallan 	}
   1504  1.153   mycroft 	if (ISSET(combits, MSR_CTS))
   1505  1.153   mycroft 		SET(ttybits, TIOCM_CTS);
   1506  1.153   mycroft 	if (ISSET(combits, MSR_DSR))
   1507  1.153   mycroft 		SET(ttybits, TIOCM_DSR);
   1508  1.153   mycroft 	if (ISSET(combits, MSR_RI | MSR_TERI))
   1509  1.153   mycroft 		SET(ttybits, TIOCM_RI);
   1510  1.153   mycroft 
   1511  1.228   mycroft 	if (ISSET(sc->sc_ier, IER_ERXRDY | IER_ETXRDY | IER_ERLS | IER_EMSC))
   1512  1.153   mycroft 		SET(ttybits, TIOCM_LE);
   1513  1.153   mycroft 
   1514  1.153   mycroft 	return (ttybits);
   1515    1.1       cgd }
   1516    1.1       cgd 
   1517  1.106  drochner static u_char
   1518  1.197    simonb cflag2lcr(tcflag_t cflag)
   1519  1.106  drochner {
   1520  1.106  drochner 	u_char lcr = 0;
   1521  1.106  drochner 
   1522  1.106  drochner 	switch (ISSET(cflag, CSIZE)) {
   1523  1.127   mycroft 	case CS5:
   1524  1.106  drochner 		SET(lcr, LCR_5BITS);
   1525  1.106  drochner 		break;
   1526  1.127   mycroft 	case CS6:
   1527  1.106  drochner 		SET(lcr, LCR_6BITS);
   1528  1.106  drochner 		break;
   1529  1.127   mycroft 	case CS7:
   1530  1.106  drochner 		SET(lcr, LCR_7BITS);
   1531  1.106  drochner 		break;
   1532  1.127   mycroft 	case CS8:
   1533  1.106  drochner 		SET(lcr, LCR_8BITS);
   1534  1.106  drochner 		break;
   1535  1.106  drochner 	}
   1536  1.106  drochner 	if (ISSET(cflag, PARENB)) {
   1537  1.106  drochner 		SET(lcr, LCR_PENAB);
   1538  1.106  drochner 		if (!ISSET(cflag, PARODD))
   1539  1.106  drochner 			SET(lcr, LCR_PEVEN);
   1540  1.106  drochner 	}
   1541  1.106  drochner 	if (ISSET(cflag, CSTOPB))
   1542  1.106  drochner 		SET(lcr, LCR_STOPB);
   1543  1.106  drochner 
   1544  1.110     enami 	return (lcr);
   1545  1.106  drochner }
   1546  1.106  drochner 
   1547   1.21   mycroft int
   1548  1.197    simonb comparam(struct tty *tp, struct termios *t)
   1549    1.1       cgd {
   1550  1.276      cube 	struct com_softc *sc =
   1551  1.276      cube 	    device_lookup_private(&com_cd, COMUNIT(tp->t_dev));
   1552  1.188     enami 	int ospeed;
   1553   1.62   mycroft 	u_char lcr;
   1554   1.21   mycroft 
   1555  1.149   thorpej 	if (COM_ISALIVE(sc) == 0)
   1556  1.149   thorpej 		return (EIO);
   1557  1.149   thorpej 
   1558  1.209   thorpej 	if (sc->sc_type == COM_TYPE_HAYESP) {
   1559  1.188     enami 		int prescaler, speed;
   1560  1.188     enami 
   1561  1.188     enami 		/*
   1562  1.188     enami 		 * Calculate UART clock prescaler.  It should be in
   1563  1.188     enami 		 * range of 0 .. 3.
   1564  1.188     enami 		 */
   1565  1.188     enami 		for (prescaler = 0, speed = t->c_ospeed; prescaler < 4;
   1566  1.188     enami 		    prescaler++, speed /= 2)
   1567  1.210   thorpej 			if ((ospeed = comspeed(speed, sc->sc_frequency,
   1568  1.210   thorpej 					       sc->sc_type)) > 0)
   1569  1.188     enami 				break;
   1570  1.188     enami 
   1571  1.188     enami 		if (prescaler == 4)
   1572  1.188     enami 			return (EINVAL);
   1573  1.188     enami 		sc->sc_prescaler = prescaler;
   1574  1.188     enami 	} else
   1575  1.344  jmcneill 		ospeed = comspeed(t->c_ospeed, sc->sc_frequency, sc->sc_type);
   1576  1.188     enami 
   1577  1.127   mycroft 	/* Check requested parameters. */
   1578   1.99   mycroft 	if (ospeed < 0)
   1579   1.99   mycroft 		return (EINVAL);
   1580   1.99   mycroft 	if (t->c_ispeed && t->c_ispeed != t->c_ospeed)
   1581   1.99   mycroft 		return (EINVAL);
   1582   1.21   mycroft 
   1583   1.99   mycroft 	/*
   1584   1.99   mycroft 	 * For the console, always force CLOCAL and !HUPCL, so that the port
   1585   1.99   mycroft 	 * is always active.
   1586   1.99   mycroft 	 */
   1587   1.99   mycroft 	if (ISSET(sc->sc_swflags, TIOCFLAG_SOFTCAR) ||
   1588   1.99   mycroft 	    ISSET(sc->sc_hwflags, COM_HW_CONSOLE)) {
   1589   1.99   mycroft 		SET(t->c_cflag, CLOCAL);
   1590   1.99   mycroft 		CLR(t->c_cflag, HUPCL);
   1591   1.62   mycroft 	}
   1592  1.129   mycroft 
   1593  1.129   mycroft 	/*
   1594  1.129   mycroft 	 * If there were no changes, don't do anything.  This avoids dropping
   1595  1.129   mycroft 	 * input and improves performance when all we did was frob things like
   1596  1.129   mycroft 	 * VMIN and VTIME.
   1597  1.129   mycroft 	 */
   1598  1.129   mycroft 	if (tp->t_ospeed == t->c_ospeed &&
   1599  1.129   mycroft 	    tp->t_cflag == t->c_cflag)
   1600  1.129   mycroft 		return (0);
   1601  1.126   mycroft 
   1602  1.126   mycroft 	lcr = ISSET(sc->sc_lcr, LCR_SBREAK) | cflag2lcr(t->c_cflag);
   1603  1.126   mycroft 
   1604  1.263        ad 	mutex_spin_enter(&sc->sc_lock);
   1605  1.126   mycroft 
   1606  1.126   mycroft 	sc->sc_lcr = lcr;
   1607   1.36   mycroft 
   1608   1.36   mycroft 	/*
   1609   1.99   mycroft 	 * If we're not in a mode that assumes a connection is present, then
   1610   1.99   mycroft 	 * ignore carrier changes.
   1611   1.36   mycroft 	 */
   1612   1.99   mycroft 	if (ISSET(t->c_cflag, CLOCAL | MDMBUF))
   1613   1.99   mycroft 		sc->sc_msr_dcd = 0;
   1614   1.99   mycroft 	else
   1615   1.99   mycroft 		sc->sc_msr_dcd = MSR_DCD;
   1616   1.99   mycroft 	/*
   1617   1.99   mycroft 	 * Set the flow control pins depending on the current flow control
   1618   1.99   mycroft 	 * mode.
   1619   1.99   mycroft 	 */
   1620   1.99   mycroft 	if (ISSET(t->c_cflag, CRTSCTS)) {
   1621   1.99   mycroft 		sc->sc_mcr_dtr = MCR_DTR;
   1622   1.99   mycroft 		sc->sc_mcr_rts = MCR_RTS;
   1623   1.99   mycroft 		sc->sc_msr_cts = MSR_CTS;
   1624  1.315  jmcneill 		if (ISSET(sc->sc_hwflags, COM_HW_AFE)) {
   1625  1.315  jmcneill 			SET(sc->sc_mcr, MCR_AFE);
   1626  1.315  jmcneill 		} else {
   1627  1.315  jmcneill 			sc->sc_efr = EFR_AUTORTS | EFR_AUTOCTS;
   1628  1.315  jmcneill 		}
   1629   1.99   mycroft 	} else if (ISSET(t->c_cflag, MDMBUF)) {
   1630   1.99   mycroft 		/*
   1631   1.99   mycroft 		 * For DTR/DCD flow control, make sure we don't toggle DTR for
   1632   1.99   mycroft 		 * carrier detection.
   1633   1.99   mycroft 		 */
   1634   1.99   mycroft 		sc->sc_mcr_dtr = 0;
   1635   1.99   mycroft 		sc->sc_mcr_rts = MCR_DTR;
   1636   1.99   mycroft 		sc->sc_msr_cts = MSR_DCD;
   1637  1.315  jmcneill 		if (ISSET(sc->sc_hwflags, COM_HW_AFE)) {
   1638  1.315  jmcneill 			CLR(sc->sc_mcr, MCR_AFE);
   1639  1.315  jmcneill 		} else {
   1640  1.315  jmcneill 			sc->sc_efr = 0;
   1641  1.315  jmcneill 		}
   1642   1.99   mycroft 	} else {
   1643   1.99   mycroft 		/*
   1644   1.99   mycroft 		 * If no flow control, then always set RTS.  This will make
   1645   1.99   mycroft 		 * the other side happy if it mistakenly thinks we're doing
   1646   1.99   mycroft 		 * RTS/CTS flow control.
   1647   1.99   mycroft 		 */
   1648   1.99   mycroft 		sc->sc_mcr_dtr = MCR_DTR | MCR_RTS;
   1649   1.99   mycroft 		sc->sc_mcr_rts = 0;
   1650   1.99   mycroft 		sc->sc_msr_cts = 0;
   1651  1.315  jmcneill 		if (ISSET(sc->sc_hwflags, COM_HW_AFE)) {
   1652  1.315  jmcneill 			CLR(sc->sc_mcr, MCR_AFE);
   1653  1.315  jmcneill 		} else {
   1654  1.315  jmcneill 			sc->sc_efr = 0;
   1655  1.315  jmcneill 		}
   1656   1.99   mycroft 		if (ISSET(sc->sc_mcr, MCR_DTR))
   1657   1.99   mycroft 			SET(sc->sc_mcr, MCR_RTS);
   1658   1.99   mycroft 		else
   1659   1.99   mycroft 			CLR(sc->sc_mcr, MCR_RTS);
   1660   1.99   mycroft 	}
   1661   1.99   mycroft 	sc->sc_msr_mask = sc->sc_msr_cts | sc->sc_msr_dcd;
   1662   1.99   mycroft 
   1663  1.325  christos 	if (t->c_ospeed == 0 && tp->t_ospeed != 0)
   1664   1.99   mycroft 		CLR(sc->sc_mcr, sc->sc_mcr_dtr);
   1665  1.325  christos 	else if (t->c_ospeed != 0 && tp->t_ospeed == 0)
   1666   1.99   mycroft 		SET(sc->sc_mcr, sc->sc_mcr_dtr);
   1667   1.66   mycroft 
   1668   1.99   mycroft 	sc->sc_dlbl = ospeed;
   1669   1.99   mycroft 	sc->sc_dlbh = ospeed >> 8;
   1670   1.66   mycroft 
   1671   1.99   mycroft 	/*
   1672   1.99   mycroft 	 * Set the FIFO threshold based on the receive speed.
   1673   1.99   mycroft 	 *
   1674   1.99   mycroft 	 *  * If it's a low speed, it's probably a mouse or some other
   1675   1.99   mycroft 	 *    interactive device, so set the threshold low.
   1676   1.99   mycroft 	 *  * If it's a high speed, trim the trigger level down to prevent
   1677   1.99   mycroft 	 *    overflows.
   1678   1.99   mycroft 	 *  * Otherwise set it a bit higher.
   1679   1.99   mycroft 	 */
   1680  1.338  jmcneill 	if (sc->sc_type == COM_TYPE_HAYESP) {
   1681   1.99   mycroft 		sc->sc_fifo = FIFO_DMA_MODE | FIFO_ENABLE | FIFO_TRIGGER_8;
   1682  1.338  jmcneill 	} else if (sc->sc_type == COM_TYPE_TEGRA) {
   1683  1.338  jmcneill 		sc->sc_fifo = FIFO_ENABLE | FIFO_TRIGGER_1;
   1684  1.338  jmcneill 	} else if (ISSET(sc->sc_hwflags, COM_HW_FIFO)) {
   1685  1.278   tsutsui 		if (t->c_ospeed <= 1200)
   1686  1.278   tsutsui 			sc->sc_fifo = FIFO_ENABLE | FIFO_TRIGGER_1;
   1687  1.278   tsutsui 		else if (t->c_ospeed <= 38400)
   1688  1.278   tsutsui 			sc->sc_fifo = FIFO_ENABLE | FIFO_TRIGGER_8;
   1689  1.278   tsutsui 		else
   1690  1.278   tsutsui 			sc->sc_fifo = FIFO_ENABLE | FIFO_TRIGGER_4;
   1691  1.338  jmcneill 	} else {
   1692   1.99   mycroft 		sc->sc_fifo = 0;
   1693  1.338  jmcneill 	}
   1694   1.21   mycroft 
   1695  1.332     skrll 	if (sc->sc_type == COM_TYPE_INGENIC)
   1696  1.330  macallan 		sc->sc_fifo |= FIFO_UART_ON;
   1697  1.330  macallan 
   1698  1.127   mycroft 	/* And copy to tty. */
   1699  1.240       dsl 	tp->t_ispeed = t->c_ospeed;
   1700   1.57   mycroft 	tp->t_ospeed = t->c_ospeed;
   1701   1.57   mycroft 	tp->t_cflag = t->c_cflag;
   1702   1.25       cgd 
   1703   1.99   mycroft 	if (!sc->sc_heldchange) {
   1704   1.99   mycroft 		if (sc->sc_tx_busy) {
   1705   1.99   mycroft 			sc->sc_heldtbc = sc->sc_tbc;
   1706   1.99   mycroft 			sc->sc_tbc = 0;
   1707   1.99   mycroft 			sc->sc_heldchange = 1;
   1708   1.99   mycroft 		} else
   1709   1.99   mycroft 			com_loadchannelregs(sc);
   1710   1.99   mycroft 	}
   1711   1.99   mycroft 
   1712  1.124   mycroft 	if (!ISSET(t->c_cflag, CHWFLOW)) {
   1713  1.125   mycroft 		/* Disable the high water mark. */
   1714  1.125   mycroft 		sc->sc_r_hiwat = 0;
   1715  1.125   mycroft 		sc->sc_r_lowat = 0;
   1716  1.124   mycroft 		if (ISSET(sc->sc_rx_flags, RX_TTY_OVERFLOWED)) {
   1717  1.124   mycroft 			CLR(sc->sc_rx_flags, RX_TTY_OVERFLOWED);
   1718  1.124   mycroft 			com_schedrx(sc);
   1719  1.124   mycroft 		}
   1720  1.124   mycroft 		if (ISSET(sc->sc_rx_flags, RX_TTY_BLOCKED|RX_IBUF_BLOCKED)) {
   1721  1.124   mycroft 			CLR(sc->sc_rx_flags, RX_TTY_BLOCKED|RX_IBUF_BLOCKED);
   1722  1.124   mycroft 			com_hwiflow(sc);
   1723  1.124   mycroft 		}
   1724  1.125   mycroft 	} else {
   1725  1.127   mycroft 		sc->sc_r_hiwat = com_rbuf_hiwat;
   1726  1.127   mycroft 		sc->sc_r_lowat = com_rbuf_lowat;
   1727  1.124   mycroft 	}
   1728  1.124   mycroft 
   1729  1.263        ad 	mutex_spin_exit(&sc->sc_lock);
   1730   1.99   mycroft 
   1731   1.25       cgd 	/*
   1732   1.99   mycroft 	 * Update the tty layer's idea of the carrier bit, in case we changed
   1733  1.124   mycroft 	 * CLOCAL or MDMBUF.  We don't hang up here; we only do that by
   1734  1.124   mycroft 	 * explicit request.
   1735   1.25       cgd 	 */
   1736  1.330  macallan 	if (sc->sc_type == COM_TYPE_INGENIC) {
   1737  1.330  macallan 		/* no DCD here */
   1738  1.330  macallan 		(void) (*tp->t_linesw->l_modem)(tp, 1);
   1739  1.330  macallan 	} else
   1740  1.330  macallan 		(void) (*tp->t_linesw->l_modem)(tp, ISSET(sc->sc_msr, MSR_DCD));
   1741   1.99   mycroft 
   1742   1.99   mycroft #ifdef COM_DEBUG
   1743  1.101   mycroft 	if (com_debug)
   1744  1.101   mycroft 		comstatus(sc, "comparam ");
   1745   1.99   mycroft #endif
   1746   1.99   mycroft 
   1747   1.99   mycroft 	if (!ISSET(t->c_cflag, CHWFLOW)) {
   1748   1.99   mycroft 		if (sc->sc_tx_stopped) {
   1749   1.99   mycroft 			sc->sc_tx_stopped = 0;
   1750   1.99   mycroft 			comstart(tp);
   1751   1.99   mycroft 		}
   1752   1.21   mycroft 	}
   1753    1.1       cgd 
   1754   1.99   mycroft 	return (0);
   1755   1.99   mycroft }
   1756   1.99   mycroft 
   1757   1.99   mycroft void
   1758  1.197    simonb com_iflush(struct com_softc *sc)
   1759   1.99   mycroft {
   1760  1.247   gdamore 	struct com_regs	*regsp = &sc->sc_regs;
   1761  1.344  jmcneill 	uint8_t fifo;
   1762  1.131      marc #ifdef DIAGNOSTIC
   1763  1.131      marc 	int reg;
   1764  1.131      marc #endif
   1765  1.131      marc 	int timo;
   1766   1.99   mycroft 
   1767  1.131      marc #ifdef DIAGNOSTIC
   1768  1.131      marc 	reg = 0xffff;
   1769  1.131      marc #endif
   1770  1.131      marc 	timo = 50000;
   1771   1.99   mycroft 	/* flush any pending I/O */
   1772  1.247   gdamore 	while (ISSET(CSR_READ_1(regsp, COM_REG_LSR), LSR_RXRDY)
   1773  1.131      marc 	    && --timo)
   1774  1.131      marc #ifdef DIAGNOSTIC
   1775  1.131      marc 		reg =
   1776  1.131      marc #else
   1777  1.131      marc 		    (void)
   1778  1.131      marc #endif
   1779  1.247   gdamore 		    CSR_READ_1(regsp, COM_REG_RXDATA);
   1780  1.131      marc #ifdef DIAGNOSTIC
   1781  1.131      marc 	if (!timo)
   1782  1.276      cube 		aprint_error_dev(sc->sc_dev, "com_iflush timeout %02x\n", reg);
   1783  1.131      marc #endif
   1784  1.309   rkujawa 
   1785  1.344  jmcneill 	switch (sc->sc_type) {
   1786  1.344  jmcneill 	case COM_TYPE_16750:
   1787  1.348  jmcneill 	case COM_TYPE_DW_APB:
   1788  1.344  jmcneill 		/*
   1789  1.344  jmcneill 		 * Reset all Rx/Tx FIFO, preserve current FIFO length.
   1790  1.344  jmcneill 		 * This should prevent triggering busy interrupt while
   1791  1.344  jmcneill 		 * manipulating divisors.
   1792  1.344  jmcneill 		 */
   1793  1.344  jmcneill 		fifo = CSR_READ_1(regsp, COM_REG_FIFO) & (FIFO_TRIGGER_1 |
   1794  1.344  jmcneill 		    FIFO_TRIGGER_4 | FIFO_TRIGGER_8 | FIFO_TRIGGER_14);
   1795  1.344  jmcneill 		CSR_WRITE_1(regsp, COM_REG_FIFO,
   1796  1.344  jmcneill 		    fifo | FIFO_ENABLE | FIFO_RCV_RST | FIFO_XMT_RST);
   1797  1.344  jmcneill 		delay(100);
   1798  1.344  jmcneill 		break;
   1799  1.344  jmcneill 	}
   1800   1.99   mycroft }
   1801   1.99   mycroft 
   1802   1.99   mycroft void
   1803  1.197    simonb com_loadchannelregs(struct com_softc *sc)
   1804   1.99   mycroft {
   1805  1.247   gdamore 	struct com_regs *regsp = &sc->sc_regs;
   1806   1.99   mycroft 
   1807   1.99   mycroft 	/* XXXXX necessary? */
   1808   1.99   mycroft 	com_iflush(sc);
   1809   1.99   mycroft 
   1810  1.209   thorpej 	if (sc->sc_type == COM_TYPE_PXA2x0)
   1811  1.247   gdamore 		CSR_WRITE_1(regsp, COM_REG_IER, IER_EUART);
   1812  1.208       scw 	else
   1813  1.247   gdamore 		CSR_WRITE_1(regsp, COM_REG_IER, 0);
   1814   1.99   mycroft 
   1815  1.281      matt 	if (sc->sc_type == COM_TYPE_OMAP) {
   1816  1.281      matt 		/* disable before changing settings */
   1817  1.281      matt 		CSR_WRITE_1(regsp, COM_REG_MDR1, MDR1_MODE_DISABLE);
   1818  1.281      matt 	}
   1819  1.281      matt 
   1820  1.116      fvdl 	if (ISSET(sc->sc_hwflags, COM_HW_FLOW)) {
   1821  1.286      matt 		KASSERT(sc->sc_type != COM_TYPE_AU1x00);
   1822  1.286      matt 		KASSERT(sc->sc_type != COM_TYPE_16550_NOERS);
   1823  1.286      matt 		/* no EFR on alchemy */
   1824  1.298     jklos 		CSR_WRITE_1(regsp, COM_REG_LCR, LCR_EERS);
   1825  1.286      matt 		CSR_WRITE_1(regsp, COM_REG_EFR, sc->sc_efr);
   1826  1.116      fvdl 	}
   1827  1.247   gdamore 	if (sc->sc_type == COM_TYPE_AU1x00) {
   1828  1.247   gdamore 		/* alchemy has single separate 16-bit clock divisor register */
   1829  1.247   gdamore 		CSR_WRITE_2(regsp, COM_REG_DLBL, sc->sc_dlbl +
   1830  1.247   gdamore 		    (sc->sc_dlbh << 8));
   1831  1.247   gdamore 	} else {
   1832  1.247   gdamore 		CSR_WRITE_1(regsp, COM_REG_LCR, sc->sc_lcr | LCR_DLAB);
   1833  1.247   gdamore 		CSR_WRITE_1(regsp, COM_REG_DLBL, sc->sc_dlbl);
   1834  1.247   gdamore 		CSR_WRITE_1(regsp, COM_REG_DLBH, sc->sc_dlbh);
   1835  1.247   gdamore 	}
   1836  1.247   gdamore 	CSR_WRITE_1(regsp, COM_REG_LCR, sc->sc_lcr);
   1837  1.247   gdamore 	CSR_WRITE_1(regsp, COM_REG_MCR, sc->sc_mcr_active = sc->sc_mcr);
   1838  1.247   gdamore 	CSR_WRITE_1(regsp, COM_REG_FIFO, sc->sc_fifo);
   1839  1.209   thorpej 	if (sc->sc_type == COM_TYPE_HAYESP) {
   1840  1.258      cube 		bus_space_write_1(regsp->cr_iot, sc->sc_hayespioh, HAYESP_CMD1,
   1841  1.188     enami 		    HAYESP_SETPRESCALER);
   1842  1.258      cube 		bus_space_write_1(regsp->cr_iot, sc->sc_hayespioh, HAYESP_CMD2,
   1843  1.188     enami 		    sc->sc_prescaler);
   1844  1.188     enami 	}
   1845  1.281      matt 	if (sc->sc_type == COM_TYPE_OMAP) {
   1846  1.281      matt 		/* setup the fifos.  the FCR value is not used as long
   1847  1.281      matt 		   as SCR[6] and SCR[7] are 0, which they are at reset
   1848  1.281      matt 		   and we never touch the SCR register */
   1849  1.281      matt 		uint8_t rx_fifo_trig = 40;
   1850  1.281      matt 		uint8_t tx_fifo_trig = 60;
   1851  1.281      matt 		uint8_t rx_start = 8;
   1852  1.281      matt 		uint8_t rx_halt = 60;
   1853  1.281      matt 		uint8_t tlr_value = ((rx_fifo_trig>>2) << 4) | (tx_fifo_trig>>2);
   1854  1.281      matt 		uint8_t tcr_value = ((rx_start>>2) << 4) | (rx_halt>>2);
   1855  1.281      matt 
   1856  1.281      matt 		/* enable access to TCR & TLR */
   1857  1.281      matt 		CSR_WRITE_1(regsp, COM_REG_MCR, sc->sc_mcr | MCR_TCR_TLR);
   1858  1.281      matt 
   1859  1.281      matt 		/* write tcr and tlr values */
   1860  1.281      matt 		CSR_WRITE_1(regsp, COM_REG_TLR, tlr_value);
   1861  1.281      matt 		CSR_WRITE_1(regsp, COM_REG_TCR, tcr_value);
   1862  1.281      matt 
   1863  1.281      matt 		/* disable access to TCR & TLR */
   1864  1.281      matt 		CSR_WRITE_1(regsp, COM_REG_MCR, sc->sc_mcr);
   1865  1.281      matt 
   1866  1.281      matt 		/* enable again, but mode is based on speed */
   1867  1.281      matt 		if (sc->sc_tty->t_termios.c_ospeed > 230400) {
   1868  1.281      matt 			CSR_WRITE_1(regsp, COM_REG_MDR1, MDR1_MODE_UART_13X);
   1869  1.281      matt 		} else {
   1870  1.281      matt 			CSR_WRITE_1(regsp, COM_REG_MDR1, MDR1_MODE_UART_16X);
   1871  1.281      matt 		}
   1872  1.281      matt 	}
   1873   1.99   mycroft 
   1874  1.247   gdamore 	CSR_WRITE_1(regsp, COM_REG_IER, sc->sc_ier);
   1875   1.99   mycroft }
   1876   1.99   mycroft 
   1877   1.99   mycroft int
   1878  1.197    simonb comhwiflow(struct tty *tp, int block)
   1879   1.99   mycroft {
   1880  1.276      cube 	struct com_softc *sc =
   1881  1.276      cube 	    device_lookup_private(&com_cd, COMUNIT(tp->t_dev));
   1882   1.99   mycroft 
   1883  1.149   thorpej 	if (COM_ISALIVE(sc) == 0)
   1884  1.149   thorpej 		return (0);
   1885  1.149   thorpej 
   1886   1.99   mycroft 	if (sc->sc_mcr_rts == 0)
   1887   1.99   mycroft 		return (0);
   1888   1.99   mycroft 
   1889  1.263        ad 	mutex_spin_enter(&sc->sc_lock);
   1890  1.232     perry 
   1891   1.99   mycroft 	if (block) {
   1892  1.101   mycroft 		if (!ISSET(sc->sc_rx_flags, RX_TTY_BLOCKED)) {
   1893  1.101   mycroft 			SET(sc->sc_rx_flags, RX_TTY_BLOCKED);
   1894  1.101   mycroft 			com_hwiflow(sc);
   1895  1.101   mycroft 		}
   1896   1.99   mycroft 	} else {
   1897  1.101   mycroft 		if (ISSET(sc->sc_rx_flags, RX_TTY_OVERFLOWED)) {
   1898  1.101   mycroft 			CLR(sc->sc_rx_flags, RX_TTY_OVERFLOWED);
   1899  1.101   mycroft 			com_schedrx(sc);
   1900  1.101   mycroft 		}
   1901  1.101   mycroft 		if (ISSET(sc->sc_rx_flags, RX_TTY_BLOCKED)) {
   1902  1.101   mycroft 			CLR(sc->sc_rx_flags, RX_TTY_BLOCKED);
   1903  1.101   mycroft 			com_hwiflow(sc);
   1904  1.101   mycroft 		}
   1905   1.99   mycroft 	}
   1906  1.179  sommerfe 
   1907  1.263        ad 	mutex_spin_exit(&sc->sc_lock);
   1908   1.99   mycroft 	return (1);
   1909   1.99   mycroft }
   1910  1.232     perry 
   1911   1.99   mycroft /*
   1912   1.99   mycroft  * (un)block input via hw flowcontrol
   1913   1.99   mycroft  */
   1914   1.99   mycroft void
   1915  1.197    simonb com_hwiflow(struct com_softc *sc)
   1916   1.99   mycroft {
   1917  1.247   gdamore 	struct com_regs *regsp= &sc->sc_regs;
   1918   1.99   mycroft 
   1919   1.99   mycroft 	if (sc->sc_mcr_rts == 0)
   1920   1.99   mycroft 		return;
   1921   1.99   mycroft 
   1922  1.101   mycroft 	if (ISSET(sc->sc_rx_flags, RX_ANY_BLOCK)) {
   1923   1.99   mycroft 		CLR(sc->sc_mcr, sc->sc_mcr_rts);
   1924   1.99   mycroft 		CLR(sc->sc_mcr_active, sc->sc_mcr_rts);
   1925   1.99   mycroft 	} else {
   1926   1.99   mycroft 		SET(sc->sc_mcr, sc->sc_mcr_rts);
   1927   1.99   mycroft 		SET(sc->sc_mcr_active, sc->sc_mcr_rts);
   1928   1.99   mycroft 	}
   1929  1.247   gdamore 	CSR_WRITE_1(regsp, COM_REG_MCR, sc->sc_mcr_active);
   1930    1.1       cgd }
   1931   1.21   mycroft 
   1932   1.99   mycroft 
   1933   1.12   deraadt void
   1934  1.197    simonb comstart(struct tty *tp)
   1935    1.1       cgd {
   1936  1.276      cube 	struct com_softc *sc =
   1937  1.276      cube 	    device_lookup_private(&com_cd, COMUNIT(tp->t_dev));
   1938  1.247   gdamore 	struct com_regs *regsp = &sc->sc_regs;
   1939   1.21   mycroft 
   1940  1.149   thorpej 	if (COM_ISALIVE(sc) == 0)
   1941  1.149   thorpej 		return;
   1942  1.149   thorpej 
   1943  1.178       eeh 	if (ISSET(tp->t_state, TS_BUSY | TS_TIMEOUT | TS_TTSTOP))
   1944  1.377  riastrad 		return;
   1945  1.178       eeh 	if (sc->sc_tx_stopped)
   1946  1.377  riastrad 		return;
   1947  1.266        ad 	if (!ttypull(tp))
   1948  1.377  riastrad 		return;
   1949   1.99   mycroft 
   1950   1.99   mycroft 	/* Grab the first contiguous region of buffer space. */
   1951   1.99   mycroft 	{
   1952   1.99   mycroft 		u_char *tba;
   1953   1.99   mycroft 		int tbc;
   1954   1.99   mycroft 
   1955   1.99   mycroft 		tba = tp->t_outq.c_cf;
   1956   1.99   mycroft 		tbc = ndqb(&tp->t_outq, 0);
   1957   1.99   mycroft 
   1958  1.263        ad 		mutex_spin_enter(&sc->sc_lock);
   1959   1.99   mycroft 
   1960   1.99   mycroft 		sc->sc_tba = tba;
   1961   1.99   mycroft 		sc->sc_tbc = tbc;
   1962   1.99   mycroft 	}
   1963   1.99   mycroft 
   1964   1.62   mycroft 	SET(tp->t_state, TS_BUSY);
   1965   1.99   mycroft 	sc->sc_tx_busy = 1;
   1966   1.64  christos 
   1967   1.99   mycroft 	/* Enable transmit completion interrupts if necessary. */
   1968   1.70   mycroft 	if (!ISSET(sc->sc_ier, IER_ETXRDY)) {
   1969   1.70   mycroft 		SET(sc->sc_ier, IER_ETXRDY);
   1970  1.382  knakahar 		CSR_WRITE_1(regsp, COM_REG_IER, sc->sc_ier);
   1971   1.70   mycroft 	}
   1972   1.99   mycroft 
   1973   1.99   mycroft 	/* Output the first chunk of the contiguous buffer. */
   1974  1.195   thorpej 	if (!ISSET(sc->sc_hwflags, COM_HW_NO_TXPRELOAD)) {
   1975  1.201   thorpej 		u_int n;
   1976   1.99   mycroft 
   1977  1.127   mycroft 		n = sc->sc_tbc;
   1978  1.127   mycroft 		if (n > sc->sc_fifolen)
   1979  1.127   mycroft 			n = sc->sc_fifolen;
   1980  1.382  knakahar 		CSR_WRITE_MULTI(regsp, COM_REG_TXDATA, sc->sc_tba, n);
   1981   1.99   mycroft 		sc->sc_tbc -= n;
   1982   1.99   mycroft 		sc->sc_tba += n;
   1983   1.64  christos 	}
   1984  1.233       tls 
   1985  1.263        ad 	mutex_spin_exit(&sc->sc_lock);
   1986    1.1       cgd }
   1987   1.21   mycroft 
   1988    1.1       cgd /*
   1989    1.1       cgd  * Stop output on a line.
   1990    1.1       cgd  */
   1991   1.85   mycroft void
   1992  1.256  christos comstop(struct tty *tp, int flag)
   1993    1.1       cgd {
   1994  1.276      cube 	struct com_softc *sc =
   1995  1.276      cube 	    device_lookup_private(&com_cd, COMUNIT(tp->t_dev));
   1996    1.1       cgd 
   1997  1.263        ad 	mutex_spin_enter(&sc->sc_lock);
   1998   1.99   mycroft 	if (ISSET(tp->t_state, TS_BUSY)) {
   1999   1.99   mycroft 		/* Stop transmitting at the next chunk. */
   2000   1.99   mycroft 		sc->sc_tbc = 0;
   2001   1.99   mycroft 		sc->sc_heldtbc = 0;
   2002   1.62   mycroft 		if (!ISSET(tp->t_state, TS_TTSTOP))
   2003   1.62   mycroft 			SET(tp->t_state, TS_FLUSH);
   2004   1.99   mycroft 	}
   2005  1.263        ad 	mutex_spin_exit(&sc->sc_lock);
   2006    1.1       cgd }
   2007    1.1       cgd 
   2008   1.33   mycroft void
   2009  1.197    simonb comdiag(void *arg)
   2010   1.33   mycroft {
   2011   1.33   mycroft 	struct com_softc *sc = arg;
   2012   1.99   mycroft 	int overflows, floods;
   2013   1.33   mycroft 
   2014  1.263        ad 	mutex_spin_enter(&sc->sc_lock);
   2015   1.33   mycroft 	overflows = sc->sc_overflows;
   2016   1.33   mycroft 	sc->sc_overflows = 0;
   2017   1.57   mycroft 	floods = sc->sc_floods;
   2018   1.57   mycroft 	sc->sc_floods = 0;
   2019   1.99   mycroft 	sc->sc_errors = 0;
   2020  1.263        ad 	mutex_spin_exit(&sc->sc_lock);
   2021   1.57   mycroft 
   2022  1.127   mycroft 	log(LOG_WARNING, "%s: %d silo overflow%s, %d ibuf flood%s\n",
   2023  1.276      cube 	    device_xname(sc->sc_dev),
   2024   1.57   mycroft 	    overflows, overflows == 1 ? "" : "s",
   2025   1.99   mycroft 	    floods, floods == 1 ? "" : "s");
   2026   1.57   mycroft }
   2027   1.57   mycroft 
   2028  1.378  riastrad static inline void
   2029  1.197    simonb com_rxsoft(struct com_softc *sc, struct tty *tp)
   2030   1.99   mycroft {
   2031  1.198    simonb 	int (*rint)(int, struct tty *) = tp->t_linesw->l_rint;
   2032  1.127   mycroft 	u_char *get, *end;
   2033  1.127   mycroft 	u_int cc, scc;
   2034  1.127   mycroft 	u_char lsr;
   2035  1.127   mycroft 	int code;
   2036   1.57   mycroft 
   2037  1.127   mycroft 	end = sc->sc_ebuf;
   2038   1.99   mycroft 	get = sc->sc_rbget;
   2039  1.127   mycroft 	scc = cc = com_rbuf_size - sc->sc_rbavail;
   2040   1.99   mycroft 
   2041  1.127   mycroft 	if (cc == com_rbuf_size) {
   2042   1.99   mycroft 		sc->sc_floods++;
   2043   1.99   mycroft 		if (sc->sc_errors++ == 0)
   2044  1.170   thorpej 			callout_reset(&sc->sc_diag_callout, 60 * hz,
   2045  1.170   thorpej 			    comdiag, sc);
   2046   1.99   mycroft 	}
   2047   1.99   mycroft 
   2048  1.205      gson 	/* If not yet open, drop the entire buffer content here */
   2049  1.205      gson 	if (!ISSET(tp->t_state, TS_ISOPEN)) {
   2050  1.205      gson 		get += cc << 1;
   2051  1.205      gson 		if (get >= end)
   2052  1.205      gson 			get -= com_rbuf_size << 1;
   2053  1.205      gson 		cc = 0;
   2054  1.205      gson 	}
   2055  1.101   mycroft 	while (cc) {
   2056  1.128   mycroft 		code = get[0];
   2057  1.127   mycroft 		lsr = get[1];
   2058  1.128   mycroft 		if (ISSET(lsr, LSR_OE | LSR_BI | LSR_FE | LSR_PE)) {
   2059  1.128   mycroft 			if (ISSET(lsr, LSR_OE)) {
   2060  1.128   mycroft 				sc->sc_overflows++;
   2061  1.128   mycroft 				if (sc->sc_errors++ == 0)
   2062  1.170   thorpej 					callout_reset(&sc->sc_diag_callout,
   2063  1.170   thorpej 					    60 * hz, comdiag, sc);
   2064  1.128   mycroft 			}
   2065  1.127   mycroft 			if (ISSET(lsr, LSR_BI | LSR_FE))
   2066  1.127   mycroft 				SET(code, TTY_FE);
   2067  1.127   mycroft 			if (ISSET(lsr, LSR_PE))
   2068  1.127   mycroft 				SET(code, TTY_PE);
   2069  1.127   mycroft 		}
   2070  1.127   mycroft 		if ((*rint)(code, tp) == -1) {
   2071  1.101   mycroft 			/*
   2072  1.101   mycroft 			 * The line discipline's buffer is out of space.
   2073  1.101   mycroft 			 */
   2074  1.101   mycroft 			if (!ISSET(sc->sc_rx_flags, RX_TTY_BLOCKED)) {
   2075  1.101   mycroft 				/*
   2076  1.101   mycroft 				 * We're either not using flow control, or the
   2077  1.101   mycroft 				 * line discipline didn't tell us to block for
   2078  1.101   mycroft 				 * some reason.  Either way, we have no way to
   2079  1.101   mycroft 				 * know when there's more space available, so
   2080  1.101   mycroft 				 * just drop the rest of the data.
   2081  1.101   mycroft 				 */
   2082  1.127   mycroft 				get += cc << 1;
   2083  1.127   mycroft 				if (get >= end)
   2084  1.127   mycroft 					get -= com_rbuf_size << 1;
   2085  1.101   mycroft 				cc = 0;
   2086  1.101   mycroft 			} else {
   2087  1.101   mycroft 				/*
   2088  1.101   mycroft 				 * Don't schedule any more receive processing
   2089  1.101   mycroft 				 * until the line discipline tells us there's
   2090  1.101   mycroft 				 * space available (through comhwiflow()).
   2091  1.101   mycroft 				 * Leave the rest of the data in the input
   2092  1.101   mycroft 				 * buffer.
   2093  1.101   mycroft 				 */
   2094  1.101   mycroft 				SET(sc->sc_rx_flags, RX_TTY_OVERFLOWED);
   2095  1.101   mycroft 			}
   2096  1.101   mycroft 			break;
   2097  1.101   mycroft 		}
   2098  1.127   mycroft 		get += 2;
   2099  1.127   mycroft 		if (get >= end)
   2100  1.127   mycroft 			get = sc->sc_rbuf;
   2101  1.101   mycroft 		cc--;
   2102   1.99   mycroft 	}
   2103   1.99   mycroft 
   2104  1.101   mycroft 	if (cc != scc) {
   2105  1.101   mycroft 		sc->sc_rbget = get;
   2106  1.263        ad 		mutex_spin_enter(&sc->sc_lock);
   2107  1.232     perry 
   2108  1.101   mycroft 		cc = sc->sc_rbavail += scc - cc;
   2109  1.101   mycroft 		/* Buffers should be ok again, release possible block. */
   2110  1.101   mycroft 		if (cc >= sc->sc_r_lowat) {
   2111  1.101   mycroft 			if (ISSET(sc->sc_rx_flags, RX_IBUF_OVERFLOWED)) {
   2112  1.101   mycroft 				CLR(sc->sc_rx_flags, RX_IBUF_OVERFLOWED);
   2113  1.101   mycroft 				SET(sc->sc_ier, IER_ERXRDY);
   2114  1.209   thorpej 				if (sc->sc_type == COM_TYPE_PXA2x0)
   2115  1.208       scw 					SET(sc->sc_ier, IER_ERXTOUT);
   2116  1.336  jmcneill 				if (sc->sc_type == COM_TYPE_INGENIC ||
   2117  1.336  jmcneill 				    sc->sc_type == COM_TYPE_TEGRA)
   2118  1.335  macallan 					SET(sc->sc_ier, IER_ERXTOUT);
   2119  1.335  macallan 
   2120  1.330  macallan 				CSR_WRITE_1(&sc->sc_regs, COM_REG_IER,
   2121  1.330  macallan 				    sc->sc_ier);
   2122  1.101   mycroft 			}
   2123  1.101   mycroft 			if (ISSET(sc->sc_rx_flags, RX_IBUF_BLOCKED)) {
   2124  1.101   mycroft 				CLR(sc->sc_rx_flags, RX_IBUF_BLOCKED);
   2125  1.101   mycroft 				com_hwiflow(sc);
   2126  1.101   mycroft 			}
   2127  1.101   mycroft 		}
   2128  1.263        ad 		mutex_spin_exit(&sc->sc_lock);
   2129   1.57   mycroft 	}
   2130   1.99   mycroft }
   2131   1.99   mycroft 
   2132  1.378  riastrad static inline void
   2133  1.197    simonb com_txsoft(struct com_softc *sc, struct tty *tp)
   2134   1.99   mycroft {
   2135   1.33   mycroft 
   2136   1.99   mycroft 	CLR(tp->t_state, TS_BUSY);
   2137   1.99   mycroft 	if (ISSET(tp->t_state, TS_FLUSH))
   2138   1.99   mycroft 		CLR(tp->t_state, TS_FLUSH);
   2139   1.99   mycroft 	else
   2140   1.99   mycroft 		ndflush(&tp->t_outq, (int)(sc->sc_tba - tp->t_outq.c_cf));
   2141  1.181       eeh 	(*tp->t_linesw->l_start)(tp);
   2142   1.99   mycroft }
   2143   1.57   mycroft 
   2144  1.378  riastrad static inline void
   2145  1.197    simonb com_stsoft(struct com_softc *sc, struct tty *tp)
   2146   1.99   mycroft {
   2147   1.99   mycroft 	u_char msr, delta;
   2148   1.57   mycroft 
   2149  1.263        ad 	mutex_spin_enter(&sc->sc_lock);
   2150   1.99   mycroft 	msr = sc->sc_msr;
   2151   1.99   mycroft 	delta = sc->sc_msr_delta;
   2152   1.99   mycroft 	sc->sc_msr_delta = 0;
   2153  1.263        ad 	mutex_spin_exit(&sc->sc_lock);
   2154   1.57   mycroft 
   2155   1.99   mycroft 	if (ISSET(delta, sc->sc_msr_dcd)) {
   2156   1.99   mycroft 		/*
   2157   1.99   mycroft 		 * Inform the tty layer that carrier detect changed.
   2158   1.99   mycroft 		 */
   2159  1.181       eeh 		(void) (*tp->t_linesw->l_modem)(tp, ISSET(msr, MSR_DCD));
   2160   1.99   mycroft 	}
   2161   1.61   mycroft 
   2162   1.99   mycroft 	if (ISSET(delta, sc->sc_msr_cts)) {
   2163   1.99   mycroft 		/* Block or unblock output according to flow control. */
   2164   1.99   mycroft 		if (ISSET(msr, sc->sc_msr_cts)) {
   2165   1.99   mycroft 			sc->sc_tx_stopped = 0;
   2166  1.181       eeh 			(*tp->t_linesw->l_start)(tp);
   2167   1.99   mycroft 		} else {
   2168   1.99   mycroft 			sc->sc_tx_stopped = 1;
   2169   1.61   mycroft 		}
   2170   1.99   mycroft 	}
   2171   1.99   mycroft 
   2172   1.99   mycroft #ifdef COM_DEBUG
   2173  1.101   mycroft 	if (com_debug)
   2174  1.127   mycroft 		comstatus(sc, "com_stsoft");
   2175   1.99   mycroft #endif
   2176   1.99   mycroft }
   2177   1.99   mycroft 
   2178   1.99   mycroft void
   2179  1.197    simonb comsoft(void *arg)
   2180   1.99   mycroft {
   2181   1.99   mycroft 	struct com_softc *sc = arg;
   2182   1.99   mycroft 	struct tty *tp;
   2183   1.99   mycroft 
   2184  1.149   thorpej 	if (COM_ISALIVE(sc) == 0)
   2185  1.131      marc 		return;
   2186  1.131      marc 
   2187  1.261        ad 	tp = sc->sc_tty;
   2188   1.99   mycroft 
   2189  1.261        ad 	if (sc->sc_rx_ready) {
   2190  1.261        ad 		sc->sc_rx_ready = 0;
   2191  1.261        ad 		com_rxsoft(sc, tp);
   2192  1.261        ad 	}
   2193   1.57   mycroft 
   2194  1.261        ad 	if (sc->sc_st_check) {
   2195  1.261        ad 		sc->sc_st_check = 0;
   2196  1.261        ad 		com_stsoft(sc, tp);
   2197  1.261        ad 	}
   2198   1.57   mycroft 
   2199  1.261        ad 	if (sc->sc_tx_done) {
   2200  1.261        ad 		sc->sc_tx_done = 0;
   2201  1.261        ad 		com_txsoft(sc, tp);
   2202   1.57   mycroft 	}
   2203   1.21   mycroft }
   2204  1.140      ross 
   2205   1.21   mycroft int
   2206  1.197    simonb comintr(void *arg)
   2207   1.21   mycroft {
   2208   1.49       cgd 	struct com_softc *sc = arg;
   2209  1.247   gdamore 	struct com_regs *regsp = &sc->sc_regs;
   2210  1.247   gdamore 
   2211  1.127   mycroft 	u_char *put, *end;
   2212  1.127   mycroft 	u_int cc;
   2213  1.127   mycroft 	u_char lsr, iir;
   2214   1.55   mycroft 
   2215  1.149   thorpej 	if (COM_ISALIVE(sc) == 0)
   2216  1.131      marc 		return (0);
   2217  1.131      marc 
   2218  1.288    cegger 	KASSERT(regsp != NULL);
   2219  1.288    cegger 
   2220  1.263        ad 	mutex_spin_enter(&sc->sc_lock);
   2221  1.247   gdamore 	iir = CSR_READ_1(regsp, COM_REG_IIR);
   2222  1.309   rkujawa 
   2223  1.317  kiyohara 	/* Handle ns16750-specific busy interrupt. */
   2224  1.344  jmcneill 	if (sc->sc_type == COM_TYPE_16750 &&
   2225  1.344  jmcneill 	    (iir & IIR_BUSY) == IIR_BUSY) {
   2226  1.344  jmcneill 		for (int timeout = 10000;
   2227  1.317  kiyohara 		    (CSR_READ_1(regsp, COM_REG_USR) & 0x1) != 0; timeout--)
   2228  1.317  kiyohara 			if (timeout <= 0) {
   2229  1.317  kiyohara 				aprint_error_dev(sc->sc_dev,
   2230  1.317  kiyohara 				    "timeout while waiting for BUSY interrupt "
   2231  1.317  kiyohara 				    "acknowledge\n");
   2232  1.317  kiyohara 				mutex_spin_exit(&sc->sc_lock);
   2233  1.317  kiyohara 				return (0);
   2234  1.317  kiyohara 			}
   2235  1.317  kiyohara 
   2236  1.317  kiyohara 		CSR_WRITE_1(regsp, COM_REG_LCR, sc->sc_lcr);
   2237  1.317  kiyohara 		iir = CSR_READ_1(regsp, COM_REG_IIR);
   2238  1.317  kiyohara 	}
   2239  1.344  jmcneill 
   2240  1.348  jmcneill 	/* DesignWare APB UART BUSY interrupt */
   2241  1.348  jmcneill 	if (sc->sc_type == COM_TYPE_DW_APB &&
   2242  1.344  jmcneill 	    (iir & IIR_BUSY) == IIR_BUSY) {
   2243  1.372  jmcneill 		if (ISSET(sc->sc_hwflags, COM_HW_CONSOLE)) {
   2244  1.372  jmcneill 			(void)CSR_READ_1(regsp, COM_REG_USR);
   2245  1.372  jmcneill 		} else if ((CSR_READ_1(regsp, COM_REG_USR) & 0x1) != 0) {
   2246  1.339    bouyer 			CSR_WRITE_1(regsp, COM_REG_HALT, HALT_CHCFG_EN);
   2247  1.339    bouyer 			CSR_WRITE_1(regsp, COM_REG_LCR, sc->sc_lcr | LCR_DLAB);
   2248  1.339    bouyer 			CSR_WRITE_1(regsp, COM_REG_DLBL, sc->sc_dlbl);
   2249  1.339    bouyer 			CSR_WRITE_1(regsp, COM_REG_DLBH, sc->sc_dlbh);
   2250  1.339    bouyer 			CSR_WRITE_1(regsp, COM_REG_LCR, sc->sc_lcr);
   2251  1.339    bouyer 			CSR_WRITE_1(regsp, COM_REG_HALT,
   2252  1.339    bouyer 			    HALT_CHCFG_EN | HALT_CHCFG_UD);
   2253  1.339    bouyer 			for (int timeout = 10000000;
   2254  1.339    bouyer 			    (CSR_READ_1(regsp, COM_REG_HALT) & HALT_CHCFG_UD) != 0;
   2255  1.339    bouyer 			    timeout--) {
   2256  1.339    bouyer 				if (timeout <= 0) {
   2257  1.339    bouyer 					aprint_error_dev(sc->sc_dev,
   2258  1.339    bouyer 					    "timeout while waiting for HALT "
   2259  1.339    bouyer 					    "update acknowledge 0x%x 0x%x\n",
   2260  1.339    bouyer 					    CSR_READ_1(regsp, COM_REG_HALT),
   2261  1.339    bouyer 					    CSR_READ_1(regsp, COM_REG_USR));
   2262  1.339    bouyer 					break;
   2263  1.339    bouyer 				}
   2264  1.339    bouyer 			}
   2265  1.339    bouyer 			CSR_WRITE_1(regsp, COM_REG_HALT, 0);
   2266  1.339    bouyer 			(void)CSR_READ_1(regsp, COM_REG_USR);
   2267  1.339    bouyer 		} else {
   2268  1.339    bouyer 			CSR_WRITE_1(regsp, COM_REG_LCR, sc->sc_lcr | LCR_DLAB);
   2269  1.339    bouyer 			CSR_WRITE_1(regsp, COM_REG_DLBL, sc->sc_dlbl);
   2270  1.339    bouyer 			CSR_WRITE_1(regsp, COM_REG_DLBH, sc->sc_dlbh);
   2271  1.339    bouyer 			CSR_WRITE_1(regsp, COM_REG_LCR, sc->sc_lcr);
   2272  1.339    bouyer 		}
   2273  1.339    bouyer 	}
   2274  1.317  kiyohara 
   2275  1.363       rin 	end = sc->sc_ebuf;
   2276  1.363       rin 	put = sc->sc_rbput;
   2277  1.363       rin 	cc = sc->sc_rbavail;
   2278  1.363       rin 
   2279  1.179  sommerfe 	if (ISSET(iir, IIR_NOPEND)) {
   2280  1.363       rin 		if (ISSET(sc->sc_hwflags, COM_HW_BROKEN_ETXRDY))
   2281  1.363       rin 			goto do_tx;
   2282  1.263        ad 		mutex_spin_exit(&sc->sc_lock);
   2283   1.55   mycroft 		return (0);
   2284  1.179  sommerfe 	}
   2285   1.21   mycroft 
   2286  1.189    briggs again:	do {
   2287  1.168  jonathan 		u_char	msr, delta;
   2288   1.21   mycroft 
   2289  1.247   gdamore 		lsr = CSR_READ_1(regsp, COM_REG_LSR);
   2290  1.103  drochner 		if (ISSET(lsr, LSR_BI)) {
   2291  1.316    martin 			int cn_trapped = 0; /* see above: cn_trap() */
   2292  1.207      fvdl 
   2293  1.186       uwe 			cn_check_magic(sc->sc_tty->t_dev,
   2294  1.186       uwe 				       CNC_BREAK, com_cnm_state);
   2295  1.186       uwe 			if (cn_trapped)
   2296  1.103  drochner 				continue;
   2297  1.206    briggs #if defined(KGDB) && !defined(DDB)
   2298  1.103  drochner 			if (ISSET(sc->sc_hwflags, COM_HW_KGDB)) {
   2299  1.103  drochner 				kgdb_connect(1);
   2300  1.103  drochner 				continue;
   2301  1.103  drochner 			}
   2302  1.103  drochner #endif
   2303  1.102   thorpej 		}
   2304  1.102   thorpej 
   2305  1.341  jmcneill 		if (sc->sc_type == COM_TYPE_BCMAUXUART && ISSET(iir, IIR_RXRDY))
   2306  1.341  jmcneill 			lsr |= LSR_RXRDY;
   2307  1.341  jmcneill 
   2308  1.101   mycroft 		if (ISSET(lsr, LSR_RCV_MASK) &&
   2309  1.101   mycroft 		    !ISSET(sc->sc_rx_flags, RX_IBUF_OVERFLOWED)) {
   2310  1.127   mycroft 			while (cc > 0) {
   2311  1.186       uwe 				int cn_trapped = 0;
   2312  1.247   gdamore 				put[0] = CSR_READ_1(regsp, COM_REG_RXDATA);
   2313  1.127   mycroft 				put[1] = lsr;
   2314  1.186       uwe 				cn_check_magic(sc->sc_tty->t_dev,
   2315  1.186       uwe 					       put[0], com_cnm_state);
   2316  1.229   mycroft 				if (cn_trapped)
   2317  1.229   mycroft 					goto next;
   2318  1.127   mycroft 				put += 2;
   2319  1.127   mycroft 				if (put >= end)
   2320  1.127   mycroft 					put = sc->sc_rbuf;
   2321  1.127   mycroft 				cc--;
   2322  1.229   mycroft 			next:
   2323  1.247   gdamore 				lsr = CSR_READ_1(regsp, COM_REG_LSR);
   2324  1.127   mycroft 				if (!ISSET(lsr, LSR_RCV_MASK))
   2325  1.127   mycroft 					break;
   2326   1.99   mycroft 			}
   2327  1.127   mycroft 
   2328   1.99   mycroft 			/*
   2329   1.99   mycroft 			 * Current string of incoming characters ended because
   2330  1.127   mycroft 			 * no more data was available or we ran out of space.
   2331  1.127   mycroft 			 * Schedule a receive event if any data was received.
   2332  1.127   mycroft 			 * If we're out of space, turn off receive interrupts.
   2333   1.99   mycroft 			 */
   2334   1.99   mycroft 			sc->sc_rbput = put;
   2335   1.99   mycroft 			sc->sc_rbavail = cc;
   2336  1.101   mycroft 			if (!ISSET(sc->sc_rx_flags, RX_TTY_OVERFLOWED))
   2337  1.101   mycroft 				sc->sc_rx_ready = 1;
   2338  1.127   mycroft 
   2339   1.99   mycroft 			/*
   2340   1.99   mycroft 			 * See if we are in danger of overflowing a buffer. If
   2341   1.99   mycroft 			 * so, use hardware flow control to ease the pressure.
   2342   1.99   mycroft 			 */
   2343  1.101   mycroft 			if (!ISSET(sc->sc_rx_flags, RX_IBUF_BLOCKED) &&
   2344   1.99   mycroft 			    cc < sc->sc_r_hiwat) {
   2345  1.101   mycroft 				SET(sc->sc_rx_flags, RX_IBUF_BLOCKED);
   2346  1.101   mycroft 				com_hwiflow(sc);
   2347   1.99   mycroft 			}
   2348  1.127   mycroft 
   2349   1.99   mycroft 			/*
   2350  1.101   mycroft 			 * If we're out of space, disable receive interrupts
   2351  1.101   mycroft 			 * until the queue has drained a bit.
   2352   1.99   mycroft 			 */
   2353   1.99   mycroft 			if (!cc) {
   2354  1.101   mycroft 				SET(sc->sc_rx_flags, RX_IBUF_OVERFLOWED);
   2355  1.344  jmcneill 				switch (sc->sc_type) {
   2356  1.344  jmcneill 				case COM_TYPE_PXA2x0:
   2357  1.229   mycroft 					CLR(sc->sc_ier, IER_ERXRDY|IER_ERXTOUT);
   2358  1.344  jmcneill 					break;
   2359  1.344  jmcneill 				case COM_TYPE_INGENIC:
   2360  1.344  jmcneill 				case COM_TYPE_TEGRA:
   2361  1.335  macallan 					CLR(sc->sc_ier,
   2362  1.335  macallan 					    IER_ERXRDY | IER_ERXTOUT);
   2363  1.344  jmcneill 					break;
   2364  1.344  jmcneill 				default:
   2365  1.229   mycroft 					CLR(sc->sc_ier, IER_ERXRDY);
   2366  1.344  jmcneill 					break;
   2367  1.344  jmcneill 				}
   2368  1.382  knakahar 				CSR_WRITE_1(regsp, COM_REG_IER, sc->sc_ier);
   2369   1.99   mycroft 			}
   2370   1.88   mycroft 		} else {
   2371  1.228   mycroft 			if ((iir & (IIR_RXRDY|IIR_TXRDY)) == IIR_RXRDY) {
   2372  1.247   gdamore 				(void) CSR_READ_1(regsp, COM_REG_RXDATA);
   2373   1.88   mycroft 				continue;
   2374   1.88   mycroft 			}
   2375   1.88   mycroft 		}
   2376   1.55   mycroft 
   2377  1.247   gdamore 		msr = CSR_READ_1(regsp, COM_REG_MSR);
   2378   1.99   mycroft 		delta = msr ^ sc->sc_msr;
   2379   1.99   mycroft 		sc->sc_msr = msr;
   2380  1.244    kardel 		if ((sc->sc_pps_state.ppsparam.mode & PPS_CAPTUREBOTH) &&
   2381  1.244    kardel 		    (delta & MSR_DCD)) {
   2382  1.279        ad 			mutex_spin_enter(&timecounter_lock);
   2383  1.244    kardel 			pps_capture(&sc->sc_pps_state);
   2384  1.244    kardel 			pps_event(&sc->sc_pps_state,
   2385  1.244    kardel 			    (msr & MSR_DCD) ?
   2386  1.244    kardel 			    PPS_CAPTUREASSERT :
   2387  1.244    kardel 			    PPS_CAPTURECLEAR);
   2388  1.279        ad 			mutex_spin_exit(&timecounter_lock);
   2389  1.244    kardel 		}
   2390  1.168  jonathan 
   2391  1.167  jonathan 		/*
   2392  1.167  jonathan 		 * Process normal status changes
   2393  1.167  jonathan 		 */
   2394  1.167  jonathan 		if (ISSET(delta, sc->sc_msr_mask)) {
   2395  1.167  jonathan 			SET(sc->sc_msr_delta, delta);
   2396   1.99   mycroft 
   2397   1.99   mycroft 			/*
   2398   1.99   mycroft 			 * Stop output immediately if we lose the output
   2399   1.99   mycroft 			 * flow control signal or carrier detect.
   2400   1.99   mycroft 			 */
   2401   1.99   mycroft 			if (ISSET(~msr, sc->sc_msr_mask)) {
   2402   1.99   mycroft 				sc->sc_tbc = 0;
   2403   1.99   mycroft 				sc->sc_heldtbc = 0;
   2404   1.69   mycroft #ifdef COM_DEBUG
   2405  1.101   mycroft 				if (com_debug)
   2406  1.101   mycroft 					comstatus(sc, "comintr  ");
   2407   1.69   mycroft #endif
   2408   1.99   mycroft 			}
   2409   1.55   mycroft 
   2410   1.99   mycroft 			sc->sc_st_check = 1;
   2411   1.55   mycroft 		}
   2412  1.225     enami 	} while (!ISSET((iir =
   2413  1.247   gdamore 	    CSR_READ_1(regsp, COM_REG_IIR)), IIR_NOPEND) &&
   2414  1.225     enami 	    /*
   2415  1.225     enami 	     * Since some device (e.g., ST16C1550) doesn't clear IIR_TXRDY
   2416  1.225     enami 	     * by IIR read, so we can't do this way: `process all interrupts,
   2417  1.303  jakllsch 	     * then do TX if possible'.
   2418  1.225     enami 	     */
   2419  1.225     enami 	    (iir & IIR_IMASK) != IIR_TXRDY);
   2420   1.55   mycroft 
   2421  1.363       rin do_tx:
   2422   1.99   mycroft 	/*
   2423  1.225     enami 	 * Read LSR again, since there may be an interrupt between
   2424  1.225     enami 	 * the last LSR read and IIR read above.
   2425  1.225     enami 	 */
   2426  1.247   gdamore 	lsr = CSR_READ_1(regsp, COM_REG_LSR);
   2427  1.225     enami 
   2428  1.225     enami 	/*
   2429  1.225     enami 	 * See if data can be transmitted as well.
   2430  1.225     enami 	 * Schedule tx done event if no data left
   2431   1.99   mycroft 	 * and tty was marked busy.
   2432   1.99   mycroft 	 */
   2433   1.99   mycroft 	if (ISSET(lsr, LSR_TXRDY)) {
   2434   1.99   mycroft 		/*
   2435   1.99   mycroft 		 * If we've delayed a parameter change, do it now, and restart
   2436   1.99   mycroft 		 * output.
   2437   1.99   mycroft 		 */
   2438   1.99   mycroft 		if (sc->sc_heldchange) {
   2439   1.99   mycroft 			com_loadchannelregs(sc);
   2440   1.99   mycroft 			sc->sc_heldchange = 0;
   2441   1.99   mycroft 			sc->sc_tbc = sc->sc_heldtbc;
   2442   1.99   mycroft 			sc->sc_heldtbc = 0;
   2443   1.99   mycroft 		}
   2444  1.127   mycroft 
   2445   1.99   mycroft 		/* Output the next chunk of the contiguous buffer, if any. */
   2446   1.99   mycroft 		if (sc->sc_tbc > 0) {
   2447  1.201   thorpej 			u_int n;
   2448   1.99   mycroft 
   2449  1.127   mycroft 			n = sc->sc_tbc;
   2450  1.127   mycroft 			if (n > sc->sc_fifolen)
   2451  1.127   mycroft 				n = sc->sc_fifolen;
   2452  1.382  knakahar 			CSR_WRITE_MULTI(regsp, COM_REG_TXDATA, sc->sc_tba, n);
   2453   1.99   mycroft 			sc->sc_tbc -= n;
   2454   1.99   mycroft 			sc->sc_tba += n;
   2455  1.127   mycroft 		} else {
   2456  1.127   mycroft 			/* Disable transmit completion interrupts if necessary. */
   2457  1.127   mycroft 			if (ISSET(sc->sc_ier, IER_ETXRDY)) {
   2458  1.127   mycroft 				CLR(sc->sc_ier, IER_ETXRDY);
   2459  1.382  knakahar 				CSR_WRITE_1(regsp, COM_REG_IER, sc->sc_ier);
   2460  1.127   mycroft 			}
   2461  1.127   mycroft 			if (sc->sc_tx_busy) {
   2462  1.127   mycroft 				sc->sc_tx_busy = 0;
   2463  1.127   mycroft 				sc->sc_tx_done = 1;
   2464  1.127   mycroft 			}
   2465   1.62   mycroft 		}
   2466   1.99   mycroft 	}
   2467  1.189    briggs 
   2468  1.247   gdamore 	if (!ISSET((iir = CSR_READ_1(regsp, COM_REG_IIR)), IIR_NOPEND))
   2469  1.189    briggs 		goto again;
   2470  1.189    briggs 
   2471  1.263        ad 	mutex_spin_exit(&sc->sc_lock);
   2472   1.62   mycroft 
   2473   1.99   mycroft 	/* Wake up the poller. */
   2474  1.363       rin 	if ((sc->sc_rx_ready | sc->sc_st_check | sc->sc_tx_done) != 0)
   2475  1.363       rin 		softint_schedule(sc->sc_si);
   2476  1.115  explorer 
   2477  1.304       tls #ifdef RND_COM
   2478  1.115  explorer 	rnd_add_uint32(&sc->rnd_source, iir | lsr);
   2479  1.115  explorer #endif
   2480  1.115  explorer 
   2481   1.88   mycroft 	return (1);
   2482    1.1       cgd }
   2483    1.1       cgd 
   2484    1.1       cgd /*
   2485  1.102   thorpej  * The following functions are polled getc and putc routines, shared
   2486  1.102   thorpej  * by the console and kgdb glue.
   2487  1.232     perry  *
   2488  1.186       uwe  * The read-ahead code is so that you can detect pending in-band
   2489  1.186       uwe  * cn_magic in polled mode while doing output rather than having to
   2490  1.186       uwe  * wait until the kernel decides it needs input.
   2491  1.102   thorpej  */
   2492  1.102   thorpej 
   2493  1.186       uwe #define MAX_READAHEAD	20
   2494  1.186       uwe static int com_readahead[MAX_READAHEAD];
   2495  1.186       uwe static int com_readaheadcount = 0;
   2496  1.174     jeffs 
   2497  1.102   thorpej int
   2498  1.247   gdamore com_common_getc(dev_t dev, struct com_regs *regsp)
   2499  1.102   thorpej {
   2500  1.102   thorpej 	int s = splserial();
   2501  1.102   thorpej 	u_char stat, c;
   2502  1.102   thorpej 
   2503  1.174     jeffs 	/* got a character from reading things earlier */
   2504  1.186       uwe 	if (com_readaheadcount > 0) {
   2505  1.174     jeffs 		int i;
   2506  1.174     jeffs 
   2507  1.186       uwe 		c = com_readahead[0];
   2508  1.186       uwe 		for (i = 1; i < com_readaheadcount; i++) {
   2509  1.186       uwe 			com_readahead[i-1] = com_readahead[i];
   2510  1.174     jeffs 		}
   2511  1.186       uwe 		com_readaheadcount--;
   2512  1.174     jeffs 		splx(s);
   2513  1.174     jeffs 		return (c);
   2514  1.174     jeffs 	}
   2515  1.174     jeffs 
   2516  1.322      matt 	/* don't block until a character becomes available */
   2517  1.322      matt 	if (!ISSET(stat = CSR_READ_1(regsp, COM_REG_LSR), LSR_RXRDY)) {
   2518  1.322      matt 		splx(s);
   2519  1.322      matt 		return -1;
   2520  1.322      matt 	}
   2521  1.135   thorpej 
   2522  1.247   gdamore 	c = CSR_READ_1(regsp, COM_REG_RXDATA);
   2523  1.247   gdamore 	stat = CSR_READ_1(regsp, COM_REG_IIR);
   2524  1.186       uwe 	{
   2525  1.316    martin 		int cn_trapped = 0;	/* required by cn_trap, see above */
   2526  1.186       uwe 		if (!db_active)
   2527  1.186       uwe 			cn_check_magic(dev, c, com_cnm_state);
   2528  1.174     jeffs 	}
   2529  1.102   thorpej 	splx(s);
   2530  1.102   thorpej 	return (c);
   2531  1.102   thorpej }
   2532  1.102   thorpej 
   2533  1.289    dyoung static void
   2534  1.359    martin com_common_putc(dev_t dev, struct com_regs *regsp, int c, int with_readahead)
   2535  1.102   thorpej {
   2536  1.102   thorpej 	int s = splserial();
   2537  1.386    martin 	int cin, stat, timo;
   2538  1.174     jeffs 
   2539  1.359    martin 	if (with_readahead && com_readaheadcount < MAX_READAHEAD
   2540  1.247   gdamore 	     && ISSET(stat = CSR_READ_1(regsp, COM_REG_LSR), LSR_RXRDY)) {
   2541  1.186       uwe 		int cn_trapped = 0;
   2542  1.247   gdamore 		cin = CSR_READ_1(regsp, COM_REG_RXDATA);
   2543  1.247   gdamore 		stat = CSR_READ_1(regsp, COM_REG_IIR);
   2544  1.186       uwe 		cn_check_magic(dev, cin, com_cnm_state);
   2545  1.186       uwe 		com_readahead[com_readaheadcount++] = cin;
   2546  1.174     jeffs 	}
   2547  1.102   thorpej 
   2548  1.102   thorpej 	/* wait for any pending transmission to finish */
   2549  1.386    martin 	timo = 150000;
   2550  1.386    martin 	while (!ISSET(CSR_READ_1(regsp, COM_REG_LSR), LSR_TXRDY) && --timo)
   2551  1.386    martin 		continue;
   2552  1.135   thorpej 
   2553  1.247   gdamore 	CSR_WRITE_1(regsp, COM_REG_TXDATA, c);
   2554  1.247   gdamore 	COM_BARRIER(regsp, BR | BW);
   2555  1.160   thorpej 
   2556  1.157   mycroft 	splx(s);
   2557  1.102   thorpej }
   2558  1.102   thorpej 
   2559  1.102   thorpej /*
   2560  1.165  drochner  * Initialize UART for use as console or KGDB line.
   2561   1.99   mycroft  */
   2562  1.106  drochner int
   2563  1.247   gdamore cominit(struct com_regs *regsp, int rate, int frequency, int type,
   2564  1.247   gdamore     tcflag_t cflag)
   2565    1.1       cgd {
   2566  1.106  drochner 
   2567  1.247   gdamore 	if (bus_space_map(regsp->cr_iot, regsp->cr_iobase, regsp->cr_nports, 0,
   2568  1.247   gdamore 		&regsp->cr_ioh))
   2569  1.110     enami 		return (ENOMEM); /* ??? */
   2570    1.1       cgd 
   2571  1.281      matt 	if (type == COM_TYPE_OMAP) {
   2572  1.281      matt 		/* disable before changing settings */
   2573  1.281      matt 		CSR_WRITE_1(regsp, COM_REG_MDR1, MDR1_MODE_DISABLE);
   2574  1.281      matt 	}
   2575  1.281      matt 
   2576  1.210   thorpej 	rate = comspeed(rate, frequency, type);
   2577  1.358    simonb 	if (rate != -1) {
   2578  1.301      matt 		if (type == COM_TYPE_AU1x00) {
   2579  1.358    simonb 			/* no EFR on alchemy */
   2580  1.301      matt 			CSR_WRITE_2(regsp, COM_REG_DLBL, rate);
   2581  1.301      matt 		} else {
   2582  1.387     skrll 			if ((type != COM_TYPE_16550_NOERS) &&
   2583  1.330  macallan 			    (type != COM_TYPE_INGENIC)) {
   2584  1.301      matt 				CSR_WRITE_1(regsp, COM_REG_LCR, LCR_EERS);
   2585  1.301      matt 				CSR_WRITE_1(regsp, COM_REG_EFR, 0);
   2586  1.301      matt 			}
   2587  1.301      matt 			CSR_WRITE_1(regsp, COM_REG_LCR, LCR_DLAB);
   2588  1.301      matt 			CSR_WRITE_1(regsp, COM_REG_DLBL, rate & 0xff);
   2589  1.301      matt 			CSR_WRITE_1(regsp, COM_REG_DLBH, rate >> 8);
   2590  1.283      matt 		}
   2591  1.247   gdamore 	}
   2592  1.247   gdamore 	CSR_WRITE_1(regsp, COM_REG_LCR, cflag2lcr(cflag));
   2593  1.247   gdamore 	CSR_WRITE_1(regsp, COM_REG_MCR, MCR_DTR | MCR_RTS);
   2594  1.329  macallan 
   2595  1.329  macallan 	if (type == COM_TYPE_INGENIC) {
   2596  1.329  macallan 		CSR_WRITE_1(regsp, COM_REG_FIFO,
   2597  1.329  macallan 		    FIFO_ENABLE | FIFO_RCV_RST | FIFO_XMT_RST |
   2598  1.329  macallan 		    FIFO_TRIGGER_1 | FIFO_UART_ON);
   2599  1.329  macallan 	} else {
   2600  1.329  macallan 		CSR_WRITE_1(regsp, COM_REG_FIFO,
   2601  1.329  macallan 		    FIFO_ENABLE | FIFO_RCV_RST | FIFO_XMT_RST |
   2602  1.329  macallan 		    FIFO_TRIGGER_1);
   2603  1.329  macallan 	}
   2604  1.281      matt 
   2605  1.281      matt 	if (type == COM_TYPE_OMAP) {
   2606  1.281      matt 		/* setup the fifos.  the FCR value is not used as long
   2607  1.281      matt 		   as SCR[6] and SCR[7] are 0, which they are at reset
   2608  1.281      matt 		   and we never touch the SCR register */
   2609  1.281      matt 		uint8_t rx_fifo_trig = 40;
   2610  1.281      matt 		uint8_t tx_fifo_trig = 60;
   2611  1.281      matt 		uint8_t rx_start = 8;
   2612  1.281      matt 		uint8_t rx_halt = 60;
   2613  1.281      matt 		uint8_t tlr_value = ((rx_fifo_trig>>2) << 4) | (tx_fifo_trig>>2);
   2614  1.281      matt 		uint8_t tcr_value = ((rx_start>>2) << 4) | (rx_halt>>2);
   2615  1.281      matt 
   2616  1.281      matt 		/* enable access to TCR & TLR */
   2617  1.281      matt 		CSR_WRITE_1(regsp, COM_REG_MCR, MCR_DTR | MCR_RTS | MCR_TCR_TLR);
   2618  1.281      matt 
   2619  1.281      matt 		/* write tcr and tlr values */
   2620  1.281      matt 		CSR_WRITE_1(regsp, COM_REG_TLR, tlr_value);
   2621  1.281      matt 		CSR_WRITE_1(regsp, COM_REG_TCR, tcr_value);
   2622  1.281      matt 
   2623  1.281      matt 		/* disable access to TCR & TLR */
   2624  1.281      matt 		CSR_WRITE_1(regsp, COM_REG_MCR, MCR_DTR | MCR_RTS);
   2625  1.281      matt 
   2626  1.281      matt 		/* enable again, but mode is based on speed */
   2627  1.281      matt 		if (rate > 230400) {
   2628  1.281      matt 			CSR_WRITE_1(regsp, COM_REG_MDR1, MDR1_MODE_UART_13X);
   2629  1.281      matt 		} else {
   2630  1.281      matt 			CSR_WRITE_1(regsp, COM_REG_MDR1, MDR1_MODE_UART_16X);
   2631  1.281      matt 		}
   2632  1.281      matt 	}
   2633  1.281      matt 
   2634  1.223    simonb 	if (type == COM_TYPE_PXA2x0)
   2635  1.247   gdamore 		CSR_WRITE_1(regsp, COM_REG_IER, IER_EUART);
   2636  1.221    simonb 	else
   2637  1.247   gdamore 		CSR_WRITE_1(regsp, COM_REG_IER, 0);
   2638  1.106  drochner 
   2639  1.110     enami 	return (0);
   2640   1.99   mycroft }
   2641   1.99   mycroft 
   2642  1.106  drochner int
   2643  1.247   gdamore comcnattach1(struct com_regs *regsp, int rate, int frequency, int type,
   2644  1.247   gdamore     tcflag_t cflag)
   2645   1.99   mycroft {
   2646  1.106  drochner 	int res;
   2647  1.106  drochner 
   2648  1.289    dyoung 	comcons_info.regs = *regsp;
   2649  1.247   gdamore 
   2650  1.289    dyoung 	res = cominit(&comcons_info.regs, rate, frequency, type, cflag);
   2651  1.110     enami 	if (res)
   2652  1.110     enami 		return (res);
   2653  1.106  drochner 
   2654  1.106  drochner 	cn_tab = &comcons;
   2655  1.186       uwe 	cn_init_magic(&com_cnm_state);
   2656  1.186       uwe 	cn_set_magic("\047\001"); /* default magic is BREAK */
   2657  1.106  drochner 
   2658  1.289    dyoung 	comcons_info.frequency = frequency;
   2659  1.289    dyoung 	comcons_info.type = type;
   2660  1.289    dyoung 	comcons_info.rate = rate;
   2661  1.289    dyoung 	comcons_info.cflag = cflag;
   2662   1.99   mycroft 
   2663  1.110     enami 	return (0);
   2664    1.1       cgd }
   2665    1.1       cgd 
   2666   1.80  christos int
   2667  1.247   gdamore comcnattach(bus_space_tag_t iot, bus_addr_t iobase, int rate, int frequency,
   2668  1.247   gdamore     int type, tcflag_t cflag)
   2669  1.247   gdamore {
   2670  1.247   gdamore 	struct com_regs	regs;
   2671  1.247   gdamore 
   2672  1.353   thorpej 	/*XXX*/
   2673  1.353   thorpej 	bus_space_handle_t dummy_bsh;
   2674  1.353   thorpej 	memset(&dummy_bsh, 0, sizeof(dummy_bsh));
   2675  1.353   thorpej 
   2676  1.353   thorpej 	/*
   2677  1.353   thorpej 	 * dummy_bsh required because com_init_regs() wants it.  A
   2678  1.353   thorpej 	 * real bus_space_handle will be filled in by cominit() later.
   2679  1.353   thorpej 	 * XXXJRT Detangle this mess eventually, plz.
   2680  1.353   thorpej 	 */
   2681  1.353   thorpej 	com_init_regs(&regs, iot, dummy_bsh/*XXX*/, iobase);
   2682  1.247   gdamore 
   2683  1.247   gdamore 	return comcnattach1(&regs, rate, frequency, type, cflag);
   2684  1.247   gdamore }
   2685  1.247   gdamore 
   2686  1.289    dyoung static int
   2687  1.289    dyoung comcnreattach(void)
   2688  1.289    dyoung {
   2689  1.289    dyoung 	return comcnattach1(&comcons_info.regs, comcons_info.rate,
   2690  1.289    dyoung 	    comcons_info.frequency, comcons_info.type, comcons_info.cflag);
   2691  1.289    dyoung }
   2692  1.289    dyoung 
   2693  1.247   gdamore int
   2694  1.197    simonb comcngetc(dev_t dev)
   2695    1.1       cgd {
   2696  1.197    simonb 
   2697  1.289    dyoung 	return (com_common_getc(dev, &comcons_info.regs));
   2698    1.1       cgd }
   2699    1.1       cgd 
   2700    1.1       cgd /*
   2701    1.1       cgd  * Console kernel output character routine.
   2702    1.1       cgd  */
   2703   1.48   mycroft void
   2704  1.197    simonb comcnputc(dev_t dev, int c)
   2705    1.1       cgd {
   2706  1.197    simonb 
   2707  1.359    martin 	com_common_putc(dev, &comcons_info.regs, c, cold);
   2708   1.37   mycroft }
   2709   1.37   mycroft 
   2710   1.37   mycroft void
   2711  1.256  christos comcnpollc(dev_t dev, int on)
   2712   1.37   mycroft {
   2713   1.37   mycroft 
   2714  1.310   mlelstv 	com_readaheadcount = 0;
   2715  1.106  drochner }
   2716  1.106  drochner 
   2717  1.106  drochner #ifdef KGDB
   2718  1.106  drochner int
   2719  1.247   gdamore com_kgdb_attach1(struct com_regs *regsp, int rate, int frequency, int type,
   2720  1.247   gdamore     tcflag_t cflag)
   2721  1.106  drochner {
   2722  1.106  drochner 	int res;
   2723  1.107  drochner 
   2724  1.297    dyoung 	if (bus_space_is_equal(regsp->cr_iot, comcons_info.regs.cr_iot) &&
   2725  1.289    dyoung 	    regsp->cr_iobase == comcons_info.regs.cr_iobase) {
   2726  1.206    briggs #if !defined(DDB)
   2727  1.110     enami 		return (EBUSY); /* cannot share with console */
   2728  1.206    briggs #else
   2729  1.247   gdamore 		comkgdbregs = *regsp;
   2730  1.289    dyoung 		comkgdbregs.cr_ioh = comcons_info.regs.cr_ioh;
   2731  1.206    briggs #endif
   2732  1.206    briggs 	} else {
   2733  1.247   gdamore 		comkgdbregs = *regsp;
   2734  1.247   gdamore 		res = cominit(&comkgdbregs, rate, frequency, type, cflag);
   2735  1.206    briggs 		if (res)
   2736  1.206    briggs 			return (res);
   2737  1.190      fvdl 
   2738  1.206    briggs 		/*
   2739  1.206    briggs 		 * XXXfvdl this shouldn't be needed, but the cn_magic goo
   2740  1.206    briggs 		 * expects this to be initialized
   2741  1.206    briggs 		 */
   2742  1.206    briggs 		cn_init_magic(&com_cnm_state);
   2743  1.206    briggs 		cn_set_magic("\047\001");
   2744  1.206    briggs 	}
   2745  1.106  drochner 
   2746  1.106  drochner 	kgdb_attach(com_kgdb_getc, com_kgdb_putc, NULL);
   2747  1.106  drochner 	kgdb_dev = 123; /* unneeded, only to satisfy some tests */
   2748  1.106  drochner 
   2749  1.247   gdamore 	return (0);
   2750  1.247   gdamore }
   2751  1.247   gdamore 
   2752  1.247   gdamore int
   2753  1.247   gdamore com_kgdb_attach(bus_space_tag_t iot, bus_addr_t iobase, int rate,
   2754  1.247   gdamore     int frequency, int type, tcflag_t cflag)
   2755  1.247   gdamore {
   2756  1.247   gdamore 	struct com_regs regs;
   2757  1.247   gdamore 
   2758  1.351   thorpej 	com_init_regs(&regs, iot, (bus_space_handle_t)0/*XXX*/, iobase);
   2759  1.106  drochner 
   2760  1.247   gdamore 	return com_kgdb_attach1(&regs, rate, frequency, type, cflag);
   2761  1.106  drochner }
   2762  1.106  drochner 
   2763  1.106  drochner /* ARGSUSED */
   2764  1.106  drochner int
   2765  1.256  christos com_kgdb_getc(void *arg)
   2766  1.106  drochner {
   2767  1.197    simonb 
   2768  1.247   gdamore 	return (com_common_getc(NODEV, &comkgdbregs));
   2769  1.106  drochner }
   2770  1.106  drochner 
   2771  1.106  drochner /* ARGSUSED */
   2772  1.106  drochner void
   2773  1.256  christos com_kgdb_putc(void *arg, int c)
   2774  1.106  drochner {
   2775  1.197    simonb 
   2776  1.359    martin 	com_common_putc(NODEV, &comkgdbregs, c, 0);
   2777  1.106  drochner }
   2778  1.106  drochner #endif /* KGDB */
   2779  1.106  drochner 
   2780  1.380     skrll /*
   2781  1.380     skrll  * helper function to identify the com ports used by
   2782  1.380     skrll  * console or KGDB (and not yet autoconf attached)
   2783  1.380     skrll  */
   2784  1.106  drochner int
   2785  1.197    simonb com_is_console(bus_space_tag_t iot, bus_addr_t iobase, bus_space_handle_t *ioh)
   2786  1.106  drochner {
   2787  1.106  drochner 	bus_space_handle_t help;
   2788  1.106  drochner 
   2789  1.110     enami 	if (!comconsattached &&
   2790  1.297    dyoung 	    bus_space_is_equal(iot, comcons_info.regs.cr_iot) &&
   2791  1.289    dyoung 	    iobase == comcons_info.regs.cr_iobase)
   2792  1.289    dyoung 		help = comcons_info.regs.cr_ioh;
   2793  1.106  drochner #ifdef KGDB
   2794  1.110     enami 	else if (!com_kgdb_attached &&
   2795  1.297    dyoung 	    bus_space_is_equal(iot, comkgdbregs.cr_iot) &&
   2796  1.297    dyoung 	    iobase == comkgdbregs.cr_iobase)
   2797  1.247   gdamore 		help = comkgdbregs.cr_ioh;
   2798  1.106  drochner #endif
   2799  1.106  drochner 	else
   2800  1.110     enami 		return (0);
   2801  1.106  drochner 
   2802  1.110     enami 	if (ioh)
   2803  1.110     enami 		*ioh = help;
   2804  1.110     enami 	return (1);
   2805    1.2       cgd }
   2806  1.245     perry 
   2807  1.247   gdamore /*
   2808  1.247   gdamore  * this routine exists to serve as a shutdown hook for systems that
   2809  1.247   gdamore  * have firmware which doesn't interact properly with a com device in
   2810  1.247   gdamore  * FIFO mode.
   2811  1.247   gdamore  */
   2812  1.273    dyoung bool
   2813  1.273    dyoung com_cleanup(device_t self, int how)
   2814  1.247   gdamore {
   2815  1.273    dyoung 	struct com_softc *sc = device_private(self);
   2816  1.247   gdamore 
   2817  1.247   gdamore 	if (ISSET(sc->sc_hwflags, COM_HW_FIFO))
   2818  1.247   gdamore 		CSR_WRITE_1(&sc->sc_regs, COM_REG_FIFO, 0);
   2819  1.273    dyoung 
   2820  1.273    dyoung 	return true;
   2821  1.273    dyoung }
   2822  1.273    dyoung 
   2823  1.273    dyoung bool
   2824  1.295    dyoung com_suspend(device_t self, const pmf_qual_t *qual)
   2825  1.273    dyoung {
   2826  1.273    dyoung 	struct com_softc *sc = device_private(self);
   2827  1.273    dyoung 
   2828  1.273    dyoung 	CSR_WRITE_1(&sc->sc_regs, COM_REG_IER, 0);
   2829  1.273    dyoung 	(void)CSR_READ_1(&sc->sc_regs, COM_REG_IIR);
   2830  1.273    dyoung 
   2831  1.273    dyoung 	return true;
   2832  1.247   gdamore }
   2833  1.247   gdamore 
   2834  1.268    dyoung bool
   2835  1.295    dyoung com_resume(device_t self, const pmf_qual_t *qual)
   2836  1.245     perry {
   2837  1.273    dyoung 	struct com_softc *sc = device_private(self);
   2838  1.245     perry 
   2839  1.263        ad 	mutex_spin_enter(&sc->sc_lock);
   2840  1.268    dyoung 	com_loadchannelregs(sc);
   2841  1.263        ad 	mutex_spin_exit(&sc->sc_lock);
   2842  1.268    dyoung 
   2843  1.268    dyoung 	return true;
   2844  1.245     perry }
   2845