Home | History | Annotate | Line # | Download | only in ic
com.c revision 1.35
      1   1.1      cgd /*-
      2  1.21  mycroft  * Copyright (c) 1993, 1994 Charles Hannum.
      3   1.1      cgd  * Copyright (c) 1991 The Regents of the University of California.
      4   1.1      cgd  * All rights reserved.
      5   1.1      cgd  *
      6   1.1      cgd  * Redistribution and use in source and binary forms, with or without
      7   1.1      cgd  * modification, are permitted provided that the following conditions
      8   1.1      cgd  * are met:
      9   1.1      cgd  * 1. Redistributions of source code must retain the above copyright
     10   1.1      cgd  *    notice, this list of conditions and the following disclaimer.
     11   1.1      cgd  * 2. Redistributions in binary form must reproduce the above copyright
     12   1.1      cgd  *    notice, this list of conditions and the following disclaimer in the
     13   1.1      cgd  *    documentation and/or other materials provided with the distribution.
     14   1.1      cgd  * 3. All advertising materials mentioning features or use of this software
     15   1.1      cgd  *    must display the following acknowledgement:
     16   1.1      cgd  *	This product includes software developed by the University of
     17   1.1      cgd  *	California, Berkeley and its contributors.
     18   1.1      cgd  * 4. Neither the name of the University nor the names of its contributors
     19   1.1      cgd  *    may be used to endorse or promote products derived from this software
     20   1.1      cgd  *    without specific prior written permission.
     21   1.1      cgd  *
     22   1.1      cgd  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     23   1.1      cgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     24   1.1      cgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     25   1.1      cgd  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     26   1.1      cgd  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     27   1.1      cgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     28   1.1      cgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     29   1.1      cgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     30   1.1      cgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     31   1.1      cgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     32   1.1      cgd  * SUCH DAMAGE.
     33   1.1      cgd  *
     34   1.7      cgd  *	from: @(#)com.c	7.5 (Berkeley) 5/16/91
     35  1.34  mycroft  *	$Id: com.c,v 1.35 1994/08/24 07:25:18 mycroft Exp $
     36   1.1      cgd  */
     37   1.1      cgd 
     38   1.1      cgd /*
     39   1.1      cgd  * COM driver, based on HP dca driver
     40   1.1      cgd  * uses National Semiconductor NS16450/NS16550AF UART
     41   1.1      cgd  */
     42  1.21  mycroft #include "com.h"
     43  1.21  mycroft 
     44  1.14  mycroft #include <sys/param.h>
     45  1.14  mycroft #include <sys/systm.h>
     46  1.14  mycroft #include <sys/ioctl.h>
     47  1.14  mycroft #include <sys/select.h>
     48  1.14  mycroft #include <sys/tty.h>
     49  1.14  mycroft #include <sys/proc.h>
     50  1.14  mycroft #include <sys/user.h>
     51  1.14  mycroft #include <sys/conf.h>
     52  1.14  mycroft #include <sys/file.h>
     53  1.14  mycroft #include <sys/uio.h>
     54  1.14  mycroft #include <sys/kernel.h>
     55  1.14  mycroft #include <sys/syslog.h>
     56  1.14  mycroft #include <sys/types.h>
     57  1.21  mycroft #include <sys/device.h>
     58  1.14  mycroft 
     59  1.21  mycroft #include <machine/cpu.h>
     60  1.14  mycroft #include <machine/pio.h>
     61  1.14  mycroft 
     62  1.29  mycroft #include <i386/isa/isavar.h>
     63  1.14  mycroft #include <i386/isa/comreg.h>
     64  1.14  mycroft #include <i386/isa/ic/ns16550.h>
     65  1.14  mycroft 
     66  1.21  mycroft struct com_softc {
     67  1.21  mycroft 	struct device sc_dev;
     68  1.30  mycroft 	struct intrhand sc_ih;
     69   1.1      cgd 
     70  1.33  mycroft 	int sc_overflows;
     71  1.21  mycroft 	u_short sc_iobase;
     72  1.22      cgd 	u_char sc_hwflags;
     73  1.29  mycroft #define	COM_HW_NOIEN	0x01
     74  1.22      cgd #define	COM_HW_FIFO	0x02
     75  1.22      cgd #define	COM_HW_CONSOLE	0x40
     76  1.22      cgd 	u_char sc_swflags;
     77  1.22      cgd #define	COM_SW_SOFTCAR	0x01
     78  1.22      cgd #define	COM_SW_CLOCAL	0x02
     79  1.22      cgd #define	COM_SW_CRTSCTS	0x04
     80  1.25      cgd #define	COM_SW_MDMBUF	0x08
     81  1.21  mycroft 	u_char sc_msr, sc_mcr;
     82  1.29  mycroft };
     83  1.21  mycroft /* XXXX should be in com_softc, but not ready for that yet */
     84  1.21  mycroft struct	tty *com_tty[NCOM];
     85  1.21  mycroft 
     86  1.29  mycroft int comprobe();
     87  1.29  mycroft void comattach();
     88  1.21  mycroft int comopen __P((dev_t, int, int, struct proc *));
     89  1.21  mycroft int comclose __P((dev_t, int, int, struct proc *));
     90  1.33  mycroft void comdiag __P((void *));
     91  1.30  mycroft int comintr __P((struct com_softc *));
     92  1.21  mycroft int comparam __P((struct tty *, struct termios *));
     93  1.21  mycroft void comstart __P((struct tty *));
     94   1.1      cgd 
     95  1.29  mycroft struct cfdriver comcd = {
     96  1.29  mycroft 	NULL, "com", comprobe, comattach, DV_TTY, sizeof(struct com_softc)
     97   1.1      cgd };
     98   1.1      cgd 
     99  1.21  mycroft int	comdefaultrate = TTYDEF_SPEED;
    100   1.1      cgd #ifdef COMCONSOLE
    101   1.1      cgd int	comconsole = COMCONSOLE;
    102   1.1      cgd #else
    103   1.1      cgd int	comconsole = -1;
    104   1.1      cgd #endif
    105   1.1      cgd int	comconsinit;
    106   1.1      cgd int	commajor;
    107   1.1      cgd 
    108   1.1      cgd #ifdef KGDB
    109  1.14  mycroft #include <machine/remote-sl.h>
    110   1.1      cgd extern int kgdb_dev;
    111   1.1      cgd extern int kgdb_rate;
    112   1.1      cgd extern int kgdb_debug_init;
    113   1.1      cgd #endif
    114   1.1      cgd 
    115  1.21  mycroft #define	COMUNIT(x)	(minor(x))
    116   1.1      cgd 
    117  1.21  mycroft #define	bis(c, b)	do { const register u_short com_ad = (c); \
    118  1.21  mycroft 			     outb(com_ad, inb(com_ad) | (b)); } while(0)
    119  1.21  mycroft #define	bic(c, b)	do { const register u_short com_ad = (c); \
    120  1.21  mycroft 			     outb(com_ad, inb(com_ad) & ~(b)); } while(0)
    121  1.21  mycroft 
    122  1.21  mycroft int
    123  1.21  mycroft comspeed(speed)
    124  1.21  mycroft 	long speed;
    125   1.1      cgd {
    126  1.21  mycroft #define	divrnd(n, q)	(((n)*2/(q)+1)/2)	/* divide and round off */
    127  1.21  mycroft 
    128  1.21  mycroft 	int x, err;
    129  1.21  mycroft 
    130  1.21  mycroft 	if (speed == 0)
    131  1.21  mycroft 		return 0;
    132  1.21  mycroft 	if (speed < 0)
    133  1.21  mycroft 		return -1;
    134  1.21  mycroft 	x = divrnd((COM_FREQ / 16), speed);
    135  1.21  mycroft 	if (x <= 0)
    136  1.21  mycroft 		return -1;
    137  1.21  mycroft 	err = divrnd((COM_FREQ / 16) * 1000, speed * x) - 1000;
    138  1.21  mycroft 	if (err < 0)
    139  1.21  mycroft 		err = -err;
    140  1.21  mycroft 	if (err > COM_TOLERANCE)
    141  1.21  mycroft 		return -1;
    142  1.21  mycroft 	return x;
    143  1.21  mycroft 
    144  1.21  mycroft #undef	divrnd(n, q)
    145  1.21  mycroft }
    146  1.21  mycroft 
    147  1.21  mycroft int
    148  1.21  mycroft comprobe1(iobase)
    149  1.21  mycroft 	u_short iobase;
    150  1.21  mycroft {
    151  1.21  mycroft 
    152   1.1      cgd 	/* force access to id reg */
    153  1.21  mycroft 	outb(iobase + com_cfcr, 0);
    154  1.21  mycroft 	outb(iobase + com_iir, 0);
    155  1.21  mycroft 	if (inb(iobase + com_iir) & 0x38)
    156  1.21  mycroft 		return 0;
    157  1.21  mycroft 
    158  1.21  mycroft 	return 1;
    159   1.1      cgd }
    160   1.1      cgd 
    161  1.21  mycroft int
    162  1.29  mycroft comprobe(parent, self, aux)
    163  1.29  mycroft 	struct device *parent, *self;
    164  1.29  mycroft 	void *aux;
    165  1.29  mycroft {
    166  1.29  mycroft 	struct com_softc *sc = (void *)self;
    167  1.29  mycroft 	struct isa_attach_args *ia = aux;
    168  1.29  mycroft 	u_short iobase = ia->ia_iobase;
    169  1.21  mycroft 
    170  1.21  mycroft 	if (!comprobe1(iobase))
    171  1.21  mycroft 		return 0;
    172  1.21  mycroft 
    173  1.29  mycroft 	ia->ia_iosize = COM_NPORTS;
    174  1.29  mycroft 	ia->ia_msize = 0;
    175  1.29  mycroft 	return 1;
    176  1.21  mycroft }
    177   1.1      cgd 
    178  1.29  mycroft void
    179  1.29  mycroft comattach(parent, self, aux)
    180  1.29  mycroft 	struct device *parent, *self;
    181  1.29  mycroft 	void *aux;
    182  1.29  mycroft {
    183  1.29  mycroft 	struct com_softc *sc = (void *)self;
    184  1.29  mycroft 	struct isa_attach_args *ia = aux;
    185  1.29  mycroft 	struct cfdata *cf = sc->sc_dev.dv_cfdata;
    186  1.29  mycroft 	u_short iobase = ia->ia_iobase;
    187  1.21  mycroft 	struct tty *tp;
    188   1.1      cgd 
    189  1.21  mycroft 	sc->sc_iobase = iobase;
    190  1.29  mycroft 	sc->sc_hwflags = cf->cf_flags & COM_HW_NOIEN;
    191  1.22      cgd 	sc->sc_swflags = 0;
    192  1.21  mycroft 
    193  1.29  mycroft 	if (sc->sc_dev.dv_unit == comconsole)
    194  1.29  mycroft 		delay(1000);
    195  1.26      cgd 
    196   1.1      cgd 	/* look for a NS 16550AF UART with FIFOs */
    197  1.21  mycroft 	outb(iobase + com_fifo,
    198  1.21  mycroft 	    FIFO_ENABLE | FIFO_RCV_RST | FIFO_XMT_RST | FIFO_TRIGGER_14);
    199  1.20  mycroft 	delay(100);
    200  1.21  mycroft 	if ((inb(iobase + com_iir) & IIR_FIFO_MASK) == IIR_FIFO_MASK)
    201  1.21  mycroft 		if ((inb(iobase + com_fifo) & FIFO_TRIGGER_14) == FIFO_TRIGGER_14) {
    202  1.22      cgd 			sc->sc_hwflags |= COM_HW_FIFO;
    203  1.29  mycroft 			printf(": ns16550a, working fifo\n");
    204  1.21  mycroft 		} else
    205  1.29  mycroft 			printf(": ns82550 or ns16550, broken fifo\n");
    206  1.21  mycroft 	else
    207  1.29  mycroft 		printf(": ns82450 or ns16450, no fifo\n");
    208  1.21  mycroft 	outb(iobase + com_fifo, 0);
    209  1.21  mycroft 
    210  1.21  mycroft 	/* disable interrupts */
    211  1.21  mycroft 	outb(iobase + com_ier, 0);
    212  1.21  mycroft 	outb(iobase + com_mcr, 0);
    213   1.1      cgd 
    214  1.30  mycroft 	if (!parent) {	/* XXX no master */
    215  1.30  mycroft 		sc->sc_ih.ih_fun = comintr;
    216  1.30  mycroft 		sc->sc_ih.ih_arg = sc;
    217  1.30  mycroft 		sc->sc_ih.ih_level = IPL_TTY;
    218  1.30  mycroft 		intr_establish(ia->ia_irq, &sc->sc_ih);
    219  1.30  mycroft 	}
    220  1.30  mycroft 
    221   1.1      cgd #ifdef KGDB
    222   1.2      cgd 	if (kgdb_dev == makedev(commajor, unit)) {
    223   1.1      cgd 		if (comconsole == unit)
    224   1.1      cgd 			kgdb_dev = -1;	/* can't debug over console port */
    225   1.1      cgd 		else {
    226   1.1      cgd 			(void) cominit(unit, kgdb_rate);
    227   1.1      cgd 			if (kgdb_debug_init) {
    228   1.1      cgd 				/*
    229   1.1      cgd 				 * Print prefix of device name,
    230   1.1      cgd 				 * let kgdb_connect print the rest.
    231   1.1      cgd 				 */
    232  1.21  mycroft 				printf("%s: ", sc->sc_dev.dv_xname);
    233   1.1      cgd 				kgdb_connect(1);
    234   1.1      cgd 			} else
    235  1.21  mycroft 				printf("%s: kgdb enabled\n",
    236  1.21  mycroft 				    sc->sc_dev.dv_xname);
    237   1.1      cgd 		}
    238   1.1      cgd 	}
    239   1.1      cgd #endif
    240  1.21  mycroft 
    241  1.29  mycroft 	if (sc->sc_dev.dv_unit == comconsole) {
    242  1.29  mycroft 		/*
    243  1.29  mycroft 		 * Need to reset baud rate, etc. of next print so reset
    244  1.29  mycroft 		 * comconsinit.  Also make sure console is always "hardwired".
    245  1.29  mycroft 		 */
    246   1.1      cgd 		comconsinit = 0;
    247  1.22      cgd 		sc->sc_hwflags |= COM_HW_CONSOLE;
    248  1.22      cgd 		sc->sc_swflags |= COM_SW_SOFTCAR;
    249   1.1      cgd 	}
    250   1.1      cgd }
    251   1.1      cgd 
    252  1.21  mycroft int
    253  1.21  mycroft comopen(dev, flag, mode, p)
    254  1.21  mycroft 	dev_t dev;
    255  1.21  mycroft 	int flag, mode;
    256  1.21  mycroft 	struct proc *p;
    257   1.1      cgd {
    258  1.21  mycroft 	int unit = COMUNIT(dev);
    259  1.21  mycroft 	struct com_softc *sc;
    260  1.21  mycroft 	u_short iobase;
    261  1.21  mycroft 	struct tty *tp;
    262  1.21  mycroft 	int s;
    263   1.1      cgd 	int error = 0;
    264   1.1      cgd 
    265  1.29  mycroft 	if (unit >= comcd.cd_ndevs)
    266  1.21  mycroft 		return ENXIO;
    267  1.29  mycroft 	sc = comcd.cd_devs[unit];
    268  1.29  mycroft 	if (!sc)
    269  1.21  mycroft 		return ENXIO;
    270  1.21  mycroft 
    271  1.21  mycroft 	s = spltty();
    272  1.21  mycroft 
    273  1.21  mycroft 	if (!com_tty[unit])
    274  1.11  mycroft 		tp = com_tty[unit] = ttymalloc();
    275  1.21  mycroft 	else
    276   1.8  deraadt 		tp = com_tty[unit];
    277  1.21  mycroft 
    278   1.1      cgd 	tp->t_oproc = comstart;
    279   1.1      cgd 	tp->t_param = comparam;
    280   1.1      cgd 	tp->t_dev = dev;
    281   1.1      cgd 	if ((tp->t_state & TS_ISOPEN) == 0) {
    282   1.1      cgd 		tp->t_state |= TS_WOPEN;
    283   1.1      cgd 		ttychars(tp);
    284  1.16       ws 		tp->t_iflag = TTYDEF_IFLAG;
    285  1.16       ws 		tp->t_oflag = TTYDEF_OFLAG;
    286  1.16       ws 		tp->t_cflag = TTYDEF_CFLAG;
    287  1.22      cgd 		if (sc->sc_swflags & COM_SW_CLOCAL)
    288  1.22      cgd 			tp->t_cflag |= CLOCAL;
    289  1.22      cgd 		if (sc->sc_swflags & COM_SW_CRTSCTS)
    290  1.22      cgd 			tp->t_cflag |= CRTSCTS;
    291  1.25      cgd 		if (sc->sc_swflags & COM_SW_MDMBUF)
    292  1.25      cgd 			tp->t_cflag |= MDMBUF;
    293  1.16       ws 		tp->t_lflag = TTYDEF_LFLAG;
    294  1.16       ws 		tp->t_ispeed = tp->t_ospeed = comdefaultrate;
    295   1.1      cgd 		comparam(tp, &tp->t_termios);
    296   1.1      cgd 		ttsetwater(tp);
    297  1.21  mycroft 
    298  1.21  mycroft 		iobase = sc->sc_iobase;
    299  1.21  mycroft 		/* flush any pending I/O */
    300  1.21  mycroft 		(void) inb(iobase + com_lsr);
    301  1.21  mycroft 		(void) inb(iobase + com_data);
    302  1.21  mycroft 		/* you turn me on, baby */
    303  1.26      cgd 		sc->sc_mcr = MCR_DTR | MCR_RTS;
    304  1.29  mycroft 		if (!(sc->sc_hwflags & COM_HW_NOIEN))
    305  1.26      cgd 			sc->sc_mcr |= MCR_IENABLE;
    306  1.26      cgd 		outb(iobase + com_mcr, sc->sc_mcr);
    307  1.21  mycroft 		outb(iobase + com_ier,
    308  1.21  mycroft 		    IER_ERXRDY | IER_ETXRDY | IER_ERLS | IER_EMSC);
    309  1.21  mycroft 
    310  1.21  mycroft 		sc->sc_msr = inb(iobase + com_msr);
    311  1.25      cgd 		if (sc->sc_swflags & COM_SW_SOFTCAR || sc->sc_msr & MSR_DCD ||
    312  1.34  mycroft 		    tp->t_cflag & MDMBUF)
    313  1.21  mycroft 			tp->t_state |= TS_CARR_ON;
    314  1.21  mycroft 		else
    315  1.21  mycroft 			tp->t_state &= ~TS_CARR_ON;
    316  1.21  mycroft 	} else if (tp->t_state&TS_XCLUDE && p->p_ucred->cr_uid != 0) {
    317  1.21  mycroft 		splx(s);
    318  1.21  mycroft 		return EBUSY;
    319  1.21  mycroft 	}
    320  1.21  mycroft 
    321  1.21  mycroft 	/* wait for carrier if necessary */
    322  1.21  mycroft 	if ((flag & O_NONBLOCK) == 0)
    323  1.21  mycroft 		while ((tp->t_cflag & CLOCAL) == 0 &&
    324  1.21  mycroft 		    (tp->t_state & TS_CARR_ON) == 0) {
    325  1.21  mycroft 			tp->t_state |= TS_WOPEN;
    326  1.21  mycroft 			error = ttysleep(tp, (caddr_t)&tp->t_rawq,
    327  1.21  mycroft 			    TTIPRI | PCATCH, ttopen, 0);
    328  1.21  mycroft 			if (error) {
    329  1.21  mycroft 				/* XXX should turn off chip if we're the
    330  1.21  mycroft 				   only waiter */
    331  1.21  mycroft 				splx(s);
    332  1.21  mycroft 				return error;
    333  1.21  mycroft 			}
    334  1.21  mycroft 		}
    335  1.21  mycroft 	splx(s);
    336  1.21  mycroft 
    337  1.21  mycroft 	return (*linesw[tp->t_line].l_open)(dev, tp);
    338   1.1      cgd }
    339   1.1      cgd 
    340  1.21  mycroft int
    341   1.1      cgd comclose(dev, flag, mode, p)
    342   1.1      cgd 	dev_t dev;
    343   1.1      cgd 	int flag, mode;
    344   1.1      cgd 	struct proc *p;
    345   1.1      cgd {
    346  1.21  mycroft 	int unit = COMUNIT(dev);
    347  1.29  mycroft 	struct com_softc *sc = comcd.cd_devs[unit];
    348  1.21  mycroft 	u_short iobase = sc->sc_iobase;
    349  1.21  mycroft 	struct tty *tp = com_tty[unit];
    350  1.21  mycroft 
    351   1.1      cgd 	(*linesw[tp->t_line].l_close)(tp, flag);
    352   1.1      cgd #ifdef KGDB
    353   1.1      cgd 	/* do not disable interrupts if debugging */
    354   1.2      cgd 	if (kgdb_dev != makedev(commajor, unit))
    355   1.1      cgd #endif
    356  1.21  mycroft 	{
    357  1.21  mycroft 		bic(iobase + com_cfcr, CFCR_SBREAK);
    358  1.21  mycroft 		outb(iobase + com_ier, 0);
    359  1.22      cgd 		if (tp->t_cflag & HUPCL &&
    360  1.22      cgd 		    (sc->sc_swflags & COM_SW_SOFTCAR) == 0)
    361  1.21  mycroft 			/* XXX perhaps only clear DTR */
    362  1.21  mycroft 			outb(iobase + com_mcr, 0);
    363  1.21  mycroft 	}
    364   1.1      cgd 	ttyclose(tp);
    365  1.21  mycroft #ifdef notyet /* XXXX */
    366  1.21  mycroft 	if (unit != comconsole) {
    367  1.21  mycroft 		ttyfree(tp);
    368  1.21  mycroft 		com_tty[unit] = (struct tty *)NULL;
    369  1.21  mycroft 	}
    370  1.13      cgd #endif
    371  1.21  mycroft 	return 0;
    372   1.1      cgd }
    373   1.1      cgd 
    374  1.21  mycroft int
    375   1.1      cgd comread(dev, uio, flag)
    376   1.1      cgd 	dev_t dev;
    377   1.1      cgd 	struct uio *uio;
    378  1.21  mycroft 	int flag;
    379   1.1      cgd {
    380  1.21  mycroft 	struct tty *tp = com_tty[COMUNIT(dev)];
    381   1.1      cgd 
    382   1.1      cgd 	return ((*linesw[tp->t_line].l_read)(tp, uio, flag));
    383   1.1      cgd }
    384   1.1      cgd 
    385  1.21  mycroft int
    386   1.1      cgd comwrite(dev, uio, flag)
    387   1.1      cgd 	dev_t dev;
    388   1.1      cgd 	struct uio *uio;
    389  1.21  mycroft 	int flag;
    390   1.1      cgd {
    391  1.21  mycroft 	struct tty *tp = com_tty[COMUNIT(dev)];
    392   1.1      cgd 
    393   1.1      cgd 	return ((*linesw[tp->t_line].l_write)(tp, uio, flag));
    394   1.1      cgd }
    395   1.1      cgd 
    396  1.21  mycroft static u_char
    397  1.21  mycroft tiocm_xxx2mcr(data)
    398  1.21  mycroft 	int data;
    399  1.21  mycroft {
    400  1.21  mycroft 	u_char m = 0;
    401  1.21  mycroft 
    402  1.21  mycroft 	if (data & TIOCM_DTR)
    403  1.21  mycroft 		m |= MCR_DTR;
    404  1.21  mycroft 	if (data & TIOCM_RTS)
    405  1.21  mycroft 		m |= MCR_RTS;
    406  1.21  mycroft 	return m;
    407   1.1      cgd }
    408   1.1      cgd 
    409  1.21  mycroft int
    410  1.19  mycroft comioctl(dev, cmd, data, flag, p)
    411   1.1      cgd 	dev_t dev;
    412  1.19  mycroft 	int cmd;
    413   1.1      cgd 	caddr_t data;
    414  1.19  mycroft 	int flag;
    415  1.19  mycroft 	struct proc *p;
    416   1.1      cgd {
    417  1.21  mycroft 	int unit = COMUNIT(dev);
    418  1.29  mycroft 	struct com_softc *sc = comcd.cd_devs[unit];
    419  1.21  mycroft 	u_short iobase = sc->sc_iobase;
    420  1.21  mycroft 	struct tty *tp = com_tty[unit];
    421  1.21  mycroft 	int error;
    422  1.21  mycroft 
    423  1.19  mycroft 	error = (*linesw[tp->t_line].l_ioctl)(tp, cmd, data, flag, p);
    424   1.1      cgd 	if (error >= 0)
    425  1.21  mycroft 		return error;
    426  1.19  mycroft 	error = ttioctl(tp, cmd, data, flag, p);
    427   1.1      cgd 	if (error >= 0)
    428  1.21  mycroft 		return error;
    429   1.1      cgd 
    430   1.1      cgd 	switch (cmd) {
    431   1.1      cgd 	case TIOCSBRK:
    432  1.21  mycroft 		bis(iobase + com_cfcr, CFCR_SBREAK);
    433   1.1      cgd 		break;
    434   1.1      cgd 	case TIOCCBRK:
    435  1.21  mycroft 		bic(iobase + com_cfcr, CFCR_SBREAK);
    436   1.1      cgd 		break;
    437   1.1      cgd 	case TIOCSDTR:
    438  1.21  mycroft 		outb(iobase + com_mcr, sc->sc_mcr |= (MCR_DTR | MCR_RTS));
    439   1.1      cgd 		break;
    440   1.1      cgd 	case TIOCCDTR:
    441  1.21  mycroft 		outb(iobase + com_mcr, sc->sc_mcr &= ~(MCR_DTR | MCR_RTS));
    442   1.1      cgd 		break;
    443   1.1      cgd 	case TIOCMSET:
    444  1.21  mycroft 		sc->sc_mcr &= ~(MCR_DTR | MCR_RTS);
    445   1.1      cgd 	case TIOCMBIS:
    446  1.21  mycroft 		outb(iobase + com_mcr,
    447  1.21  mycroft 		    sc->sc_mcr |= tiocm_xxx2mcr(*(int *)data));
    448   1.1      cgd 		break;
    449   1.1      cgd 	case TIOCMBIC:
    450  1.21  mycroft 		outb(iobase + com_mcr,
    451  1.21  mycroft 		    sc->sc_mcr &= ~tiocm_xxx2mcr(*(int *)data));
    452   1.1      cgd 		break;
    453  1.21  mycroft 	case TIOCMGET: {
    454  1.21  mycroft 		u_char m;
    455  1.21  mycroft 		int bits = 0;
    456  1.21  mycroft 
    457  1.21  mycroft 		m = sc->sc_mcr;
    458  1.21  mycroft 		if (m & MCR_DTR)
    459  1.21  mycroft 			bits |= TIOCM_DTR;
    460  1.21  mycroft 		if (m & MCR_RTS)
    461  1.21  mycroft 			bits |= TIOCM_RTS;
    462  1.21  mycroft 		m = sc->sc_msr;
    463  1.21  mycroft 		if (m & MSR_DCD)
    464  1.21  mycroft 			bits |= TIOCM_CD;
    465  1.21  mycroft 		if (m & MSR_CTS)
    466  1.21  mycroft 			bits |= TIOCM_CTS;
    467  1.21  mycroft 		if (m & MSR_DSR)
    468  1.21  mycroft 			bits |= TIOCM_DSR;
    469  1.21  mycroft 		if (m & (MSR_RI | MSR_TERI))
    470  1.21  mycroft 			bits |= TIOCM_RI;
    471  1.21  mycroft 		if (inb(iobase + com_ier))
    472  1.21  mycroft 			bits |= TIOCM_LE;
    473  1.21  mycroft 		*(int *)data = bits;
    474   1.1      cgd 		break;
    475  1.21  mycroft 	}
    476  1.22      cgd 	case TIOCGFLAGS: {
    477  1.22      cgd 		int bits = 0;
    478  1.22      cgd 
    479  1.22      cgd 		if (sc->sc_swflags & COM_SW_SOFTCAR)
    480  1.22      cgd 			bits |= TIOCFLAG_SOFTCAR;
    481  1.22      cgd 		if (sc->sc_swflags & COM_SW_CLOCAL)
    482  1.22      cgd 			bits |= TIOCFLAG_CLOCAL;
    483  1.22      cgd 		if (sc->sc_swflags & COM_SW_CRTSCTS)
    484  1.22      cgd 			bits |= TIOCFLAG_CRTSCTS;
    485  1.25      cgd 		if (sc->sc_swflags & COM_SW_MDMBUF)
    486  1.25      cgd 			bits |= TIOCFLAG_MDMBUF;
    487  1.22      cgd 
    488  1.22      cgd 		*(int *)data = bits;
    489  1.22      cgd 		break;
    490  1.22      cgd 	}
    491  1.22      cgd 	case TIOCSFLAGS: {
    492  1.22      cgd 		int userbits, driverbits = 0;
    493  1.22      cgd 
    494  1.23      cgd 		error = suser(p->p_ucred, &p->p_acflag);
    495  1.23      cgd 		if (error != 0)
    496  1.23      cgd 			return(EPERM);
    497  1.22      cgd 
    498  1.22      cgd 		userbits = *(int *)data;
    499  1.23      cgd 		if ((userbits & TIOCFLAG_SOFTCAR) ||
    500  1.22      cgd 		    (sc->sc_hwflags & COM_HW_CONSOLE))
    501  1.23      cgd 			driverbits |= COM_SW_SOFTCAR;
    502  1.22      cgd 		if (userbits & TIOCFLAG_CLOCAL)
    503  1.22      cgd 			driverbits |= COM_SW_CLOCAL;
    504  1.22      cgd 		if (userbits & TIOCFLAG_CRTSCTS)
    505  1.22      cgd 			driverbits |= COM_SW_CRTSCTS;
    506  1.31      cgd 		if (userbits & TIOCFLAG_MDMBUF)
    507  1.31      cgd 			driverbits |= COM_SW_MDMBUF;
    508  1.22      cgd 
    509  1.23      cgd 		sc->sc_swflags = driverbits;
    510  1.22      cgd 		break;
    511  1.22      cgd 	}
    512   1.1      cgd 	default:
    513  1.21  mycroft 		return ENOTTY;
    514   1.1      cgd 	}
    515  1.21  mycroft 
    516  1.21  mycroft 	return 0;
    517   1.1      cgd }
    518   1.1      cgd 
    519  1.21  mycroft int
    520   1.1      cgd comparam(tp, t)
    521  1.21  mycroft 	struct tty *tp;
    522  1.21  mycroft 	struct termios *t;
    523   1.1      cgd {
    524  1.29  mycroft 	struct com_softc *sc = comcd.cd_devs[COMUNIT(tp->t_dev)];
    525  1.21  mycroft 	u_short iobase = sc->sc_iobase;
    526  1.21  mycroft 	int ospeed = comspeed(t->c_ospeed);
    527  1.21  mycroft 	u_char cfcr;
    528  1.21  mycroft 	int s;
    529  1.21  mycroft 
    530   1.1      cgd 	/* check requested parameters */
    531  1.21  mycroft 	if (ospeed < 0 || (t->c_ispeed && t->c_ispeed != t->c_ospeed))
    532  1.21  mycroft 		return EINVAL;
    533  1.21  mycroft 
    534  1.21  mycroft 	switch (t->c_cflag & CSIZE) {
    535   1.1      cgd 	case CS5:
    536  1.21  mycroft 		cfcr = CFCR_5BITS;
    537  1.21  mycroft 		break;
    538   1.1      cgd 	case CS6:
    539  1.21  mycroft 		cfcr = CFCR_6BITS;
    540  1.21  mycroft 		break;
    541   1.1      cgd 	case CS7:
    542  1.21  mycroft 		cfcr = CFCR_7BITS;
    543  1.21  mycroft 		break;
    544   1.1      cgd 	case CS8:
    545  1.21  mycroft 		cfcr = CFCR_8BITS;
    546  1.21  mycroft 		break;
    547   1.1      cgd 	}
    548  1.21  mycroft 	if (t->c_cflag & PARENB) {
    549   1.1      cgd 		cfcr |= CFCR_PENAB;
    550  1.21  mycroft 		if ((t->c_cflag & PARODD) == 0)
    551   1.1      cgd 			cfcr |= CFCR_PEVEN;
    552   1.1      cgd 	}
    553  1.21  mycroft 	if (t->c_cflag & CSTOPB)
    554   1.1      cgd 		cfcr |= CFCR_STOPB;
    555   1.1      cgd 
    556  1.21  mycroft 	s = spltty();
    557  1.35  mycroft 
    558  1.35  mycroft 	/* Set the FIFO threshold based on the receive speed. */
    559  1.35  mycroft 	if (sc->sc_hwflags & COM_HW_FIFO)
    560  1.35  mycroft 		outb(iobase + com_fifo,
    561  1.35  mycroft 		    FIFO_ENABLE | FIFO_RCV_RST | FIFO_XMT_RST |
    562  1.35  mycroft 		    (t->c_ispeed <= 1200 ? FIFO_TRIGGER_1 : FIFO_TRIGGER_8));
    563  1.21  mycroft 
    564  1.21  mycroft 	if (ospeed == 0)
    565  1.21  mycroft 		outb(iobase + com_mcr, sc->sc_mcr &= ~MCR_DTR);
    566  1.21  mycroft 	else
    567  1.21  mycroft 		outb(iobase + com_mcr, sc->sc_mcr |= MCR_DTR);
    568  1.21  mycroft 
    569  1.21  mycroft 	outb(iobase + com_cfcr, cfcr | CFCR_DLAB);
    570  1.21  mycroft 	outb(iobase + com_dlbl, ospeed);
    571  1.21  mycroft 	outb(iobase + com_dlbh, ospeed>>8);
    572  1.21  mycroft 	outb(iobase + com_cfcr, cfcr);
    573  1.21  mycroft 
    574  1.22      cgd 	/* When not using CRTSCTS, RTS follows DTR. */
    575  1.22      cgd 	if ((t->c_cflag & CRTSCTS) == 0) {
    576  1.21  mycroft 		if (sc->sc_mcr & MCR_DTR) {
    577  1.21  mycroft 			if ((sc->sc_mcr & MCR_RTS) == 0)
    578  1.21  mycroft 				outb(iobase + com_mcr, sc->sc_mcr |= MCR_RTS);
    579  1.21  mycroft 		} else {
    580  1.21  mycroft 			if (sc->sc_mcr & MCR_RTS)
    581  1.21  mycroft 				outb(iobase + com_mcr, sc->sc_mcr &= ~MCR_RTS);
    582  1.21  mycroft 		}
    583  1.21  mycroft 	}
    584  1.21  mycroft 
    585  1.25      cgd 	/*
    586  1.25      cgd 	 * If CTS is off and CRTSCTS is changed, we must toggle TS_TTSTOP.
    587  1.25      cgd 	 * XXX should be done at tty layer.
    588  1.25      cgd 	 */
    589  1.21  mycroft 	if ((sc->sc_msr & MSR_CTS) == 0 &&
    590  1.22      cgd 	    (tp->t_cflag & CRTSCTS) != (t->c_cflag & CRTSCTS)) {
    591  1.22      cgd 		if ((t->c_cflag & CRTSCTS) == 0) {
    592  1.25      cgd 			tp->t_state &= ~TS_TTSTOP;
    593  1.32  mycroft 			(*linesw[tp->t_line].l_start)(tp);
    594  1.25      cgd 		} else
    595  1.25      cgd 			tp->t_state |= TS_TTSTOP;
    596  1.25      cgd 	}
    597  1.25      cgd 
    598  1.25      cgd 	/*
    599  1.25      cgd 	 * If DCD is off and MDMBUF is changed, we must toggle TS_TTSTOP.
    600  1.25      cgd 	 * XXX should be done at tty layer.
    601  1.25      cgd 	 */
    602  1.25      cgd 	if ((sc->sc_swflags & COM_SW_SOFTCAR) == 0 &&
    603  1.25      cgd 	    (sc->sc_msr & MSR_DCD) == 0 &&
    604  1.25      cgd 	    (tp->t_cflag & MDMBUF) != (t->c_cflag & MDMBUF)) {
    605  1.25      cgd 		if ((t->c_cflag & MDMBUF) == 0) {
    606  1.21  mycroft 			tp->t_state &= ~TS_TTSTOP;
    607  1.32  mycroft 			(*linesw[tp->t_line].l_start)(tp);
    608  1.21  mycroft 		} else
    609  1.21  mycroft 			tp->t_state |= TS_TTSTOP;
    610  1.21  mycroft 	}
    611   1.1      cgd 
    612  1.32  mycroft 	/* and copy to tty */
    613  1.32  mycroft 	tp->t_ispeed = t->c_ispeed;
    614  1.32  mycroft 	tp->t_ospeed = t->c_ospeed;
    615  1.32  mycroft 	tp->t_cflag = t->c_cflag;
    616  1.32  mycroft 
    617  1.21  mycroft 	splx(s);
    618  1.21  mycroft 	return 0;
    619   1.1      cgd }
    620  1.21  mycroft 
    621  1.12  deraadt void
    622   1.1      cgd comstart(tp)
    623  1.21  mycroft 	struct tty *tp;
    624   1.1      cgd {
    625  1.29  mycroft 	struct com_softc *sc = comcd.cd_devs[COMUNIT(tp->t_dev)];
    626  1.21  mycroft 	u_short iobase = sc->sc_iobase;
    627  1.21  mycroft 	int s;
    628  1.21  mycroft 
    629   1.1      cgd 	s = spltty();
    630  1.21  mycroft 	if (tp->t_state & (TS_TTSTOP | TS_BUSY))
    631  1.21  mycroft 		goto out;
    632  1.21  mycroft #if 0 /* XXXX I think this is handled adequately by commint() and comparam(). */
    633  1.22      cgd 	if (tp->t_cflag & CRTSCTS && (sc->sc_mcr & MSR_CTS) == 0)
    634   1.1      cgd 		goto out;
    635  1.21  mycroft #endif
    636  1.11  mycroft 	if (tp->t_outq.c_cc <= tp->t_lowat) {
    637  1.21  mycroft 		if (tp->t_state & TS_ASLEEP) {
    638   1.1      cgd 			tp->t_state &= ~TS_ASLEEP;
    639  1.11  mycroft 			wakeup((caddr_t)&tp->t_outq);
    640   1.1      cgd 		}
    641   1.7      cgd 		selwakeup(&tp->t_wsel);
    642   1.1      cgd 	}
    643  1.11  mycroft 	if (tp->t_outq.c_cc == 0)
    644   1.1      cgd 		goto out;
    645  1.21  mycroft 	tp->t_state |= TS_BUSY;
    646  1.21  mycroft 	if ((inb(iobase + com_lsr) & LSR_TXRDY) == 0)
    647  1.21  mycroft 		goto out;
    648  1.22      cgd 	if (sc->sc_hwflags & COM_HW_FIFO) {
    649  1.21  mycroft 		u_char buffer[16], *cp = buffer;
    650  1.21  mycroft 		int n = q_to_b(&tp->t_outq, cp, sizeof buffer);
    651  1.21  mycroft 		do {
    652  1.21  mycroft 			outb(iobase + com_data, *cp++);
    653  1.21  mycroft 		} while (--n);
    654  1.21  mycroft 	} else
    655  1.21  mycroft 		outb(iobase + com_data, getc(&tp->t_outq));
    656   1.1      cgd out:
    657   1.1      cgd 	splx(s);
    658   1.1      cgd }
    659  1.21  mycroft 
    660   1.1      cgd /*
    661   1.1      cgd  * Stop output on a line.
    662   1.1      cgd  */
    663  1.21  mycroft void
    664   1.1      cgd comstop(tp, flag)
    665  1.21  mycroft 	struct tty *tp;
    666   1.1      cgd {
    667  1.21  mycroft 	int s;
    668   1.1      cgd 
    669   1.1      cgd 	s = spltty();
    670  1.21  mycroft 	if (tp->t_state & TS_BUSY)
    671  1.21  mycroft 		if ((tp->t_state & TS_TTSTOP) == 0)
    672   1.1      cgd 			tp->t_state |= TS_FLUSH;
    673   1.1      cgd 	splx(s);
    674   1.1      cgd }
    675   1.1      cgd 
    676  1.21  mycroft static inline void
    677  1.21  mycroft comeint(sc, stat)
    678  1.21  mycroft 	struct com_softc *sc;
    679  1.21  mycroft 	int stat;
    680  1.21  mycroft {
    681  1.21  mycroft 	u_short iobase = sc->sc_iobase;
    682  1.21  mycroft 	int unit = sc->sc_dev.dv_unit;
    683  1.21  mycroft 	struct tty *tp = com_tty[unit];
    684  1.21  mycroft 	int c;
    685   1.1      cgd 
    686  1.21  mycroft 	c = inb(iobase + com_data);
    687  1.21  mycroft 	if ((tp->t_state & TS_ISOPEN) == 0) {
    688  1.21  mycroft #ifdef KGDB
    689  1.21  mycroft 		/* we don't care about parity errors */
    690  1.21  mycroft 		if (((stat & (LSR_BI | LSR_FE | LSR_PE)) == LSR_PE) &&
    691  1.21  mycroft 		    kgdb_dev == makedev(commajor, unit) && c == FRAME_END)
    692  1.21  mycroft 			kgdb_connect(0); /* trap into kgdb */
    693  1.21  mycroft #endif
    694  1.21  mycroft 		return;
    695  1.21  mycroft 	}
    696  1.21  mycroft 	if (stat & (LSR_BI | LSR_FE))
    697  1.21  mycroft 		c |= TTY_FE;
    698  1.21  mycroft 	else if (stat & LSR_PE)
    699  1.21  mycroft 		c |= TTY_PE;
    700  1.33  mycroft 	if (stat & LSR_OE) {
    701  1.33  mycroft 		if (sc->sc_overflows++ == 0)
    702  1.33  mycroft 			timeout(comdiag, sc, 60 * hz);
    703  1.33  mycroft 	}
    704  1.21  mycroft 	/* XXXX put in FIFO and process later */
    705  1.21  mycroft 	(*linesw[tp->t_line].l_rint)(c, tp);
    706  1.21  mycroft }
    707  1.21  mycroft 
    708  1.21  mycroft static inline void
    709  1.21  mycroft commint(sc)
    710  1.21  mycroft 	struct com_softc *sc;
    711  1.21  mycroft {
    712  1.21  mycroft 	u_short iobase = sc->sc_iobase;
    713  1.21  mycroft 	struct tty *tp = com_tty[sc->sc_dev.dv_unit];
    714  1.21  mycroft 	u_char msr, delta;
    715  1.21  mycroft 
    716  1.21  mycroft 	msr = inb(iobase + com_msr);
    717  1.21  mycroft 	delta = msr ^ sc->sc_msr;
    718  1.21  mycroft 	sc->sc_msr = msr;
    719   1.1      cgd 
    720  1.22      cgd 	if (delta & MSR_DCD && (sc->sc_swflags & COM_SW_SOFTCAR) == 0) {
    721  1.21  mycroft 		if (msr & MSR_DCD)
    722  1.21  mycroft 			(void)(*linesw[tp->t_line].l_modem)(tp, 1);
    723  1.21  mycroft 		else if ((*linesw[tp->t_line].l_modem)(tp, 0) == 0)
    724  1.21  mycroft 			outb(iobase + com_mcr,
    725  1.21  mycroft 			    sc->sc_mcr &= ~(MCR_DTR | MCR_RTS));
    726  1.21  mycroft 	}
    727  1.22      cgd 	if (delta & MSR_CTS && tp->t_cflag & CRTSCTS) {
    728  1.21  mycroft 		/* the line is up and we want to do rts/cts flow control */
    729  1.21  mycroft 		if (msr & MSR_CTS) {
    730  1.21  mycroft 			tp->t_state &= ~TS_TTSTOP;
    731  1.32  mycroft 			(*linesw[tp->t_line].l_start)(tp);
    732  1.21  mycroft 		} else
    733  1.21  mycroft 			tp->t_state |= TS_TTSTOP;
    734  1.21  mycroft 	}
    735  1.33  mycroft }
    736  1.33  mycroft 
    737  1.33  mycroft void
    738  1.33  mycroft comdiag(arg)
    739  1.33  mycroft 	void *arg;
    740  1.33  mycroft {
    741  1.33  mycroft 	struct com_softc *sc = arg;
    742  1.33  mycroft 	int overflows;
    743  1.33  mycroft 	int s;
    744  1.33  mycroft 
    745  1.33  mycroft 	s = spltty();
    746  1.33  mycroft 	overflows = sc->sc_overflows;
    747  1.33  mycroft 	sc->sc_overflows = 0;
    748  1.33  mycroft 	splx(s);
    749  1.33  mycroft 
    750  1.33  mycroft 	if (overflows)
    751  1.33  mycroft 		log(LOG_WARNING, "%s: %d silo overflow%s\n",
    752  1.33  mycroft 		    sc->sc_dev.dv_xname, overflows, overflows == 1 ? "" : "s");
    753  1.21  mycroft }
    754   1.1      cgd 
    755  1.21  mycroft int
    756  1.30  mycroft comintr(sc)
    757  1.30  mycroft 	struct com_softc *sc;
    758  1.21  mycroft {
    759  1.21  mycroft 	u_short iobase = sc->sc_iobase;
    760  1.21  mycroft 	struct tty *tp;
    761  1.21  mycroft 	u_char code;
    762  1.21  mycroft 
    763  1.21  mycroft 	code = inb(iobase + com_iir) & IIR_IMASK;
    764  1.21  mycroft 	if (code & IIR_NOPEND)
    765  1.21  mycroft 		return 0;
    766  1.21  mycroft 
    767  1.21  mycroft 	for (;;) {
    768  1.21  mycroft 		if (code & IIR_RXRDY) {
    769  1.21  mycroft 			tp = com_tty[sc->sc_dev.dv_unit];
    770  1.21  mycroft 			/* XXXX put in FIFO and process later */
    771  1.21  mycroft 			while (code = (inb(iobase + com_lsr) & LSR_RCV_MASK)) {
    772  1.21  mycroft 				if (code == LSR_RXRDY) {
    773  1.21  mycroft 					code = inb(iobase + com_data);
    774  1.21  mycroft 					if (tp->t_state & TS_ISOPEN)
    775  1.21  mycroft 						(*linesw[tp->t_line].l_rint)(code, tp);
    776  1.21  mycroft #ifdef KGDB
    777  1.21  mycroft 					else {
    778  1.21  mycroft 						if (kgdb_dev == makedev(commajor, unit) &&
    779  1.21  mycroft 						    code == FRAME_END)
    780  1.21  mycroft 							kgdb_connect(0);
    781  1.21  mycroft 					}
    782  1.21  mycroft #endif
    783  1.21  mycroft 				} else
    784  1.21  mycroft 					comeint(sc, code);
    785  1.21  mycroft 			}
    786  1.21  mycroft 		} else if (code == IIR_TXRDY) {
    787  1.21  mycroft 			tp = com_tty[sc->sc_dev.dv_unit];
    788  1.21  mycroft 			tp->t_state &= ~TS_BUSY;
    789  1.21  mycroft 			if (tp->t_state & TS_FLUSH)
    790  1.21  mycroft 				tp->t_state &= ~TS_FLUSH;
    791  1.21  mycroft 			else
    792  1.21  mycroft 				if (tp->t_line)
    793  1.21  mycroft 					(*linesw[tp->t_line].l_start)(tp);
    794  1.21  mycroft 				else
    795  1.21  mycroft 					comstart(tp);
    796  1.21  mycroft 		} else if (code == IIR_MLSC) {
    797  1.21  mycroft 			commint(sc);
    798  1.21  mycroft 		} else {
    799  1.21  mycroft 			log(LOG_WARNING, "%s: weird interrupt: iir=0x%02x\n",
    800  1.21  mycroft 			    sc->sc_dev.dv_xname, code);
    801  1.21  mycroft 		}
    802  1.21  mycroft 		code = inb(iobase + com_iir) & IIR_IMASK;
    803  1.21  mycroft 		if (code & IIR_NOPEND)
    804  1.21  mycroft 			return 1;
    805   1.1      cgd 	}
    806   1.1      cgd }
    807   1.1      cgd 
    808   1.1      cgd /*
    809   1.1      cgd  * Following are all routines needed for COM to act as console
    810   1.1      cgd  */
    811  1.17      cgd #include <dev/cons.h>
    812   1.1      cgd 
    813   1.1      cgd comcnprobe(cp)
    814   1.1      cgd 	struct consdev *cp;
    815   1.1      cgd {
    816  1.21  mycroft 
    817  1.21  mycroft 	if (!comprobe1(CONADDR)) {
    818  1.21  mycroft 		cp->cn_pri = CN_DEAD;
    819  1.21  mycroft 		return;
    820  1.21  mycroft 	}
    821   1.1      cgd 
    822   1.1      cgd 	/* locate the major number */
    823   1.1      cgd 	for (commajor = 0; commajor < nchrdev; commajor++)
    824   1.1      cgd 		if (cdevsw[commajor].d_open == comopen)
    825   1.1      cgd 			break;
    826   1.1      cgd 
    827   1.1      cgd 	/* initialize required fields */
    828  1.29  mycroft 	cp->cn_dev = makedev(commajor, CONUNIT);
    829   1.1      cgd #ifdef	COMCONSOLE
    830   1.1      cgd 	cp->cn_pri = CN_REMOTE;		/* Force a serial port console */
    831   1.1      cgd #else
    832   1.1      cgd 	cp->cn_pri = CN_NORMAL;
    833   1.1      cgd #endif
    834   1.1      cgd }
    835   1.1      cgd 
    836   1.1      cgd comcninit(cp)
    837   1.1      cgd 	struct consdev *cp;
    838   1.1      cgd {
    839   1.1      cgd 
    840  1.29  mycroft 	cominit(CONUNIT, comdefaultrate);
    841  1.29  mycroft 	comconsole = CONUNIT;
    842  1.21  mycroft 	comconsinit = 0;
    843   1.1      cgd }
    844   1.1      cgd 
    845   1.1      cgd cominit(unit, rate)
    846   1.1      cgd 	int unit, rate;
    847   1.1      cgd {
    848  1.21  mycroft 	int s = splhigh();
    849  1.29  mycroft 	u_short iobase = CONADDR;
    850  1.21  mycroft 	u_char stat;
    851   1.1      cgd 
    852  1.21  mycroft 	outb(iobase + com_cfcr, CFCR_DLAB);
    853  1.21  mycroft 	rate = comspeed(comdefaultrate);
    854  1.21  mycroft 	outb(iobase + com_dlbl, rate);
    855  1.21  mycroft 	outb(iobase + com_dlbh, rate >> 8);
    856  1.21  mycroft 	outb(iobase + com_cfcr, CFCR_8BITS);
    857  1.21  mycroft 	outb(iobase + com_ier, IER_ERXRDY | IER_ETXRDY);
    858  1.21  mycroft 	outb(iobase + com_fifo, FIFO_ENABLE | FIFO_RCV_RST | FIFO_XMT_RST | FIFO_TRIGGER_4);
    859  1.21  mycroft 	stat = inb(iobase + com_iir);
    860   1.1      cgd 	splx(s);
    861   1.1      cgd }
    862   1.1      cgd 
    863   1.1      cgd comcngetc(dev)
    864  1.21  mycroft 	dev_t dev;
    865   1.1      cgd {
    866  1.21  mycroft 	int s = splhigh();
    867  1.29  mycroft 	u_short iobase = CONADDR;
    868  1.21  mycroft 	u_char stat, c;
    869   1.1      cgd 
    870  1.21  mycroft 	while (((stat = inb(iobase + com_lsr)) & LSR_RXRDY) == 0)
    871   1.1      cgd 		;
    872  1.21  mycroft 	c = inb(iobase + com_data);
    873  1.21  mycroft 	stat = inb(iobase + com_iir);
    874   1.1      cgd 	splx(s);
    875  1.21  mycroft 	return c;
    876   1.1      cgd }
    877   1.1      cgd 
    878   1.1      cgd /*
    879   1.1      cgd  * Console kernel output character routine.
    880   1.1      cgd  */
    881   1.1      cgd comcnputc(dev, c)
    882   1.1      cgd 	dev_t dev;
    883  1.21  mycroft 	int c;
    884   1.1      cgd {
    885  1.21  mycroft 	int s = splhigh();
    886  1.29  mycroft 	u_short iobase = CONADDR;
    887  1.21  mycroft 	u_char stat;
    888   1.1      cgd 	register int timo;
    889   1.1      cgd 
    890   1.1      cgd #ifdef KGDB
    891   1.1      cgd 	if (dev != kgdb_dev)
    892   1.1      cgd #endif
    893   1.1      cgd 	if (comconsinit == 0) {
    894  1.21  mycroft 		(void) cominit(COMUNIT(dev), comdefaultrate);
    895   1.1      cgd 		comconsinit = 1;
    896   1.1      cgd 	}
    897   1.1      cgd 	/* wait for any pending transmission to finish */
    898   1.1      cgd 	timo = 50000;
    899  1.21  mycroft 	while (((stat = inb(iobase + com_lsr)) & LSR_TXRDY) == 0 && --timo)
    900   1.1      cgd 		;
    901  1.21  mycroft 	outb(iobase + com_data, c);
    902   1.1      cgd 	/* wait for this transmission to complete */
    903   1.1      cgd 	timo = 1500000;
    904  1.21  mycroft 	while (((stat = inb(iobase + com_lsr)) & LSR_TXRDY) == 0 && --timo)
    905   1.1      cgd 		;
    906   1.1      cgd 	/* clear any interrupts generated by this transmission */
    907  1.21  mycroft 	stat = inb(iobase + com_iir);
    908   1.1      cgd 	splx(s);
    909   1.2      cgd }
    910