sio.c revision 120457
151078Speter/*- 251078Speter * Copyright (c) 1991 The Regents of the University of California. 351078Speter * All rights reserved. 451078Speter * 551078Speter * Redistribution and use in source and binary forms, with or without 651078Speter * modification, are permitted provided that the following conditions 751078Speter * are met: 851078Speter * 1. Redistributions of source code must retain the above copyright 951078Speter * notice, this list of conditions and the following disclaimer. 1051078Speter * 2. Redistributions in binary form must reproduce the above copyright 1151078Speter * notice, this list of conditions and the following disclaimer in the 1251078Speter * documentation and/or other materials provided with the distribution. 1351078Speter * 3. All advertising materials mentioning features or use of this software 1451078Speter * must display the following acknowledgement: 1551078Speter * This product includes software developed by the University of 1651078Speter * California, Berkeley and its contributors. 1751078Speter * 4. Neither the name of the University nor the names of its contributors 1851078Speter * may be used to endorse or promote products derived from this software 1951078Speter * without specific prior written permission. 2051078Speter * 2151078Speter * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 2251078Speter * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 2351078Speter * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 2451078Speter * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 2551078Speter * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 2651078Speter * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 2751078Speter * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 2851078Speter * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 2951078Speter * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 3051078Speter * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 3151078Speter * SUCH DAMAGE. 3251078Speter * 3351078Speter * from: @(#)com.c 7.5 (Berkeley) 5/16/91 3451078Speter * from: i386/isa sio.c,v 1.234 3551078Speter */ 3651078Speter 37119419Sobrien#include <sys/cdefs.h> 38119419Sobrien__FBSDID("$FreeBSD: head/sys/dev/sio/sio.c 120457 2003-09-26 07:29:34Z phk $"); 39119419Sobrien 4051078Speter#include "opt_comconsole.h" 4151078Speter#include "opt_compat.h" 4251078Speter#include "opt_ddb.h" 4351078Speter#include "opt_sio.h" 4451078Speter 4551078Speter/* 4651078Speter * Serial driver, based on 386BSD-0.1 com driver. 4751078Speter * Mostly rewritten to use pseudo-DMA. 4851078Speter * Works for National Semiconductor NS8250-NS16550AF UARTs. 4951078Speter * COM driver, based on HP dca driver. 5051078Speter * 5151078Speter * Changes for PC-Card integration: 5251078Speter * - Added PC-Card driver table and handlers 5351078Speter */ 5451078Speter#include <sys/param.h> 5576166Smarkm#include <sys/systm.h> 5665822Sjhb#include <sys/bus.h> 5751078Speter#include <sys/conf.h> 5851078Speter#include <sys/fcntl.h> 5951078Speter#include <sys/interrupt.h> 6051078Speter#include <sys/kernel.h> 61114216Skan#include <sys/limits.h> 6276166Smarkm#include <sys/lock.h> 6376166Smarkm#include <sys/malloc.h> 6476166Smarkm#include <sys/module.h> 6576166Smarkm#include <sys/mutex.h> 6676166Smarkm#include <sys/proc.h> 6776166Smarkm#include <sys/reboot.h> 6876166Smarkm#include <sys/sysctl.h> 6951078Speter#include <sys/syslog.h> 7076166Smarkm#include <sys/tty.h> 7160471Snyan#include <machine/bus_pio.h> 7251078Speter#include <machine/bus.h> 7351078Speter#include <sys/rman.h> 7451078Speter#include <sys/timepps.h> 7593466Sbde#include <sys/uio.h> 76119485Snjl#include <sys/cons.h> 77119485Snjl#if DDB > 0 78119485Snjl#include <ddb/ddb.h> 79119485Snjl#endif 8051078Speter 8186909Simp#include <isa/isavar.h> 8286909Simp 8351078Speter#include <machine/resource.h> 8451078Speter 8585302Simp#include <dev/sio/sioreg.h> 8685365Simp#include <dev/sio/siovar.h> 8751078Speter 8851078Speter#ifdef COM_ESP 8977726Sjoerg#include <dev/ic/esp.h> 9051078Speter#endif 9177726Sjoerg#include <dev/ic/ns16550.h> 9251078Speter 9351078Speter#define LOTS_OF_EVENTS 64 /* helps separate urgent events from input */ 9451078Speter 9551078Speter#define CALLOUT_MASK 0x80 9651078Speter#define CONTROL_MASK 0x60 9751078Speter#define CONTROL_INIT_STATE 0x20 9851078Speter#define CONTROL_LOCK_STATE 0x40 9951078Speter#define DEV_TO_UNIT(dev) (MINOR_TO_UNIT(minor(dev))) 10093470Sbde#define MINOR_TO_UNIT(mynor) ((((mynor) & ~0xffffU) >> (8 + 3)) \ 10193470Sbde | ((mynor) & 0x1f)) 10293470Sbde#define UNIT_TO_MINOR(unit) ((((unit) & ~0x1fU) << (8 + 3)) \ 10393470Sbde | ((unit) & 0x1f)) 10451078Speter 10551078Speter#ifdef COM_MULTIPORT 10651078Speter/* checks in flags for multiport and which is multiport "master chip" 10751078Speter * for a given card 10851078Speter */ 10951078Speter#define COM_ISMULTIPORT(flags) ((flags) & 0x01) 11051078Speter#define COM_MPMASTER(flags) (((flags) >> 8) & 0x0ff) 11151078Speter#define COM_NOTAST4(flags) ((flags) & 0x04) 112104067Sphk#else 113104067Sphk#define COM_ISMULTIPORT(flags) (0) 11451078Speter#endif /* COM_MULTIPORT */ 11551078Speter 116120175Sbde#define COM_C_IIR_TXRDYBUG 0x80000 11751078Speter#define COM_CONSOLE(flags) ((flags) & 0x10) 118120175Sbde#define COM_DEBUGGER(flags) ((flags) & 0x80) 119120175Sbde#define COM_FIFOSIZE(flags) (((flags) & 0xff000000) >> 24) 12051078Speter#define COM_FORCECONSOLE(flags) ((flags) & 0x20) 121120175Sbde#define COM_IIR_TXRDYBUG(flags) ((flags) & COM_C_IIR_TXRDYBUG) 12251078Speter#define COM_LLCONSOLE(flags) ((flags) & 0x40) 12351078Speter#define COM_LOSESOUTINTS(flags) ((flags) & 0x08) 124120175Sbde#define COM_NOFIFO(flags) ((flags) & 0x02) 125120175Sbde#define COM_NOPROBE(flags) ((flags) & 0x40000) 126120175Sbde#define COM_NOSCR(flags) ((flags) & 0x100000) 127111613Sphk#define COM_PPSCTS(flags) ((flags) & 0x10000) 128120175Sbde#define COM_ST16650A(flags) ((flags) & 0x20000) 129112384Ssobomax#define COM_TI16754(flags) ((flags) & 0x200000) 13051078Speter 13160471Snyan#define sio_getreg(com, off) \ 13260471Snyan (bus_space_read_1((com)->bst, (com)->bsh, (off))) 13360471Snyan#define sio_setreg(com, off, value) \ 13460471Snyan (bus_space_write_1((com)->bst, (com)->bsh, (off), (value))) 13560471Snyan 13651078Speter/* 13751078Speter * com state bits. 13851078Speter * (CS_BUSY | CS_TTGO) and (CS_BUSY | CS_TTGO | CS_ODEVREADY) must be higher 13951078Speter * than the other bits so that they can be tested as a group without masking 14051078Speter * off the low bits. 14151078Speter * 14251078Speter * The following com and tty flags correspond closely: 14351078Speter * CS_BUSY = TS_BUSY (maintained by comstart(), siopoll() and 14453344Speter * comstop()) 14551078Speter * CS_TTGO = ~TS_TTSTOP (maintained by comparam() and comstart()) 14651078Speter * CS_CTS_OFLOW = CCTS_OFLOW (maintained by comparam()) 14751078Speter * CS_RTS_IFLOW = CRTS_IFLOW (maintained by comparam()) 14851078Speter * TS_FLUSH is not used. 14951078Speter * XXX I think TIOCSETA doesn't clear TS_TTSTOP when it clears IXON. 15051078Speter * XXX CS_*FLOW should be CF_*FLOW in com->flags (control flags not state). 15151078Speter */ 15251078Speter#define CS_BUSY 0x80 /* output in progress */ 15351078Speter#define CS_TTGO 0x40 /* output not stopped by XOFF */ 15451078Speter#define CS_ODEVREADY 0x20 /* external device h/w ready (CTS) */ 15551078Speter#define CS_CHECKMSR 1 /* check of MSR scheduled */ 15651078Speter#define CS_CTS_OFLOW 2 /* use CTS output flow control */ 15751078Speter#define CS_DTR_OFF 0x10 /* DTR held off */ 15851078Speter#define CS_ODONE 4 /* output completed */ 15951078Speter#define CS_RTS_IFLOW 8 /* use RTS input flow control */ 16051078Speter#define CSE_BUSYCHECK 1 /* siobusycheck() scheduled */ 16151078Speter 16251078Speterstatic char const * const error_desc[] = { 16351078Speter#define CE_OVERRUN 0 16451078Speter "silo overflow", 16551078Speter#define CE_INTERRUPT_BUF_OVERFLOW 1 16651078Speter "interrupt-level buffer overflow", 16751078Speter#define CE_TTY_BUF_OVERFLOW 2 16851078Speter "tty-level buffer overflow", 16951078Speter}; 17051078Speter 17186909Simp#define CE_NTYPES 3 17251078Speter#define CE_RECORD(com, errnum) (++(com)->delta_error_counts[errnum]) 17351078Speter 17486909Simp/* types. XXX - should be elsewhere */ 17586909Simptypedef u_int Port_t; /* hardware port */ 17686909Simptypedef u_char bool_t; /* boolean */ 17786909Simp 17886909Simp/* queue of linear buffers */ 17986909Simpstruct lbq { 18086909Simp u_char *l_head; /* next char to process */ 18186909Simp u_char *l_tail; /* one past the last char to process */ 18286909Simp struct lbq *l_next; /* next in queue */ 18386909Simp bool_t l_queued; /* nonzero if queued */ 18486909Simp}; 18586909Simp 18686909Simp/* com device structure */ 18786909Simpstruct com_s { 18886909Simp u_char state; /* miscellaneous flag bits */ 18986909Simp bool_t active_out; /* nonzero if the callout device is open */ 19086909Simp u_char cfcr_image; /* copy of value written to CFCR */ 19151078Speter#ifdef COM_ESP 19286909Simp bool_t esp; /* is this unit a hayes esp board? */ 19386909Simp#endif 19486909Simp u_char extra_state; /* more flag bits, separate for order trick */ 19586909Simp u_char fifo_image; /* copy of value written to FIFO */ 19686909Simp bool_t hasfifo; /* nonzero for 16550 UARTs */ 19786909Simp bool_t loses_outints; /* nonzero if device loses output interrupts */ 19886909Simp u_char mcr_image; /* copy of value written to MCR */ 19986909Simp#ifdef COM_MULTIPORT 20086909Simp bool_t multiport; /* is this unit part of a multiport device? */ 20186909Simp#endif /* COM_MULTIPORT */ 20286909Simp bool_t no_irq; /* nonzero if irq is not attached */ 20386909Simp bool_t gone; /* hardware disappeared */ 20486909Simp bool_t poll; /* nonzero if polling is required */ 20586909Simp bool_t poll_output; /* nonzero if polling for output is required */ 206120175Sbde bool_t st16650a; /* nonzero if Startech 16650A compatible */ 20786909Simp int unit; /* unit number */ 20886909Simp int dtr_wait; /* time to hold DTR down on close (* 1/hz) */ 209120189Sbde u_int flags; /* copy of device flags */ 21086909Simp u_int tx_fifo_size; 21186909Simp u_int wopeners; /* # processes waiting for DCD in open() */ 21286909Simp 21386909Simp /* 21486909Simp * The high level of the driver never reads status registers directly 21586909Simp * because there would be too many side effects to handle conveniently. 21686909Simp * Instead, it reads copies of the registers stored here by the 21786909Simp * interrupt handler. 21886909Simp */ 21986909Simp u_char last_modem_status; /* last MSR read by intr handler */ 22086909Simp u_char prev_modem_status; /* last MSR handled by high level */ 22186909Simp 22286909Simp u_char hotchar; /* ldisc-specific char to be handled ASAP */ 22386909Simp u_char *ibuf; /* start of input buffer */ 22486909Simp u_char *ibufend; /* end of input buffer */ 22586909Simp u_char *ibufold; /* old input buffer, to be freed */ 22686909Simp u_char *ihighwater; /* threshold in input buffer */ 22786909Simp u_char *iptr; /* next free spot in input buffer */ 22886909Simp int ibufsize; /* size of ibuf (not include error bytes) */ 22986909Simp int ierroff; /* offset of error bytes in ibuf */ 23086909Simp 23186909Simp struct lbq obufq; /* head of queue of output buffers */ 23286909Simp struct lbq obufs[2]; /* output buffers */ 23386909Simp 23486909Simp bus_space_tag_t bst; 23586909Simp bus_space_handle_t bsh; 23686909Simp 23786909Simp Port_t data_port; /* i/o ports */ 23886909Simp#ifdef COM_ESP 23986909Simp Port_t esp_port; 24086909Simp#endif 241120189Sbde Port_t int_ctl_port; 24286909Simp Port_t int_id_port; 24386909Simp Port_t modem_ctl_port; 24486909Simp Port_t line_status_port; 24586909Simp Port_t modem_status_port; 24686909Simp 24786909Simp struct tty *tp; /* cross reference */ 24886909Simp 24986909Simp /* Initial state. */ 25086909Simp struct termios it_in; /* should be in struct tty */ 25186909Simp struct termios it_out; 25286909Simp 25386909Simp /* Lock state. */ 25486909Simp struct termios lt_in; /* should be in struct tty */ 25586909Simp struct termios lt_out; 25686909Simp 25786909Simp bool_t do_timestamp; 25886909Simp bool_t do_dcd_timestamp; 25986909Simp struct timeval timestamp; 26086909Simp struct timeval dcd_timestamp; 26186909Simp struct pps_state pps; 262111613Sphk int pps_bit; 263119485Snjl#ifdef ALT_BREAK_TO_DEBUGGER 264119485Snjl int alt_brk_state; 265119485Snjl#endif 26686909Simp 26786909Simp u_long bytes_in; /* statistics */ 26886909Simp u_long bytes_out; 26986909Simp u_int delta_error_counts[CE_NTYPES]; 27086909Simp u_long error_counts[CE_NTYPES]; 27186909Simp 27289986Sjhay u_long rclk; 27389986Sjhay 27486909Simp struct resource *irqres; 27586909Simp struct resource *ioportres; 276116120Sscottl int ioportrid; 277116120Sscottl void *cookie; 278116120Sscottl dev_t devs[6]; 27986909Simp 28086909Simp /* 28186909Simp * Data area for output buffers. Someday we should build the output 28286909Simp * buffer queue without copying data. 28386909Simp */ 28486909Simp u_char obuf1[256]; 28586909Simp u_char obuf2[256]; 28686909Simp}; 28786909Simp 28886909Simp#ifdef COM_ESP 28993010Sbdestatic int espattach(struct com_s *com, Port_t esp_port); 29051078Speter#endif 29151078Speter 29251078Speterstatic timeout_t siobusycheck; 29393010Sbdestatic u_int siodivisor(u_long rclk, speed_t speed); 29451078Speterstatic timeout_t siodtrwakeup; 29593010Sbdestatic void comhardclose(struct com_s *com); 29693010Sbdestatic void sioinput(struct com_s *com); 29793010Sbdestatic void siointr1(struct com_s *com); 29893010Sbdestatic void siointr(void *arg); 29993010Sbdestatic int commctl(struct com_s *com, int bits, int how); 30093010Sbdestatic int comparam(struct tty *tp, struct termios *t); 30193010Sbdestatic void siopoll(void *); 30293010Sbdestatic void siosettimeout(void); 30393010Sbdestatic int siosetwater(struct com_s *com, speed_t speed); 30493010Sbdestatic void comstart(struct tty *tp); 30593010Sbdestatic void comstop(struct tty *tp, int rw); 30651078Speterstatic timeout_t comwakeup; 30793010Sbdestatic void disc_optim(struct tty *tp, struct termios *t, 30893010Sbde struct com_s *com); 30951078Speter 31085365Simpchar sio_driver_name[] = "sio"; 31170174Sjhbstatic struct mtx sio_lock; 31270174Sjhbstatic int sio_inited; 31351078Speter 31451078Speter/* table and macro for fast conversion from a unit number to its com struct */ 31585365Simpdevclass_t sio_devclass; 31651078Speter#define com_addr(unit) ((struct com_s *) \ 31786909Simp devclass_get_softc(sio_devclass, unit)) /* XXX */ 31851078Speter 31951078Speterstatic d_open_t sioopen; 32051078Speterstatic d_close_t sioclose; 32151078Speterstatic d_read_t sioread; 32251078Speterstatic d_write_t siowrite; 32351078Speterstatic d_ioctl_t sioioctl; 32451078Speter 32551078Speter#define CDEV_MAJOR 28 32651078Speterstatic struct cdevsw sio_cdevsw = { 327111815Sphk .d_open = sioopen, 328111815Sphk .d_close = sioclose, 329111815Sphk .d_read = sioread, 330111815Sphk .d_write = siowrite, 331111815Sphk .d_ioctl = sioioctl, 332111815Sphk .d_poll = ttypoll, 333111815Sphk .d_name = sio_driver_name, 334111815Sphk .d_maj = CDEV_MAJOR, 335111821Sphk .d_flags = D_TTY, 336111815Sphk .d_kqfilter = ttykqfilter, 33751078Speter}; 33851078Speter 339114722Sobrienint comconsole = -1; 34051078Speterstatic volatile speed_t comdefaultrate = CONSPEED; 34189986Sjhaystatic u_long comdefaultrclk = DEFAULT_RCLK; 34289986SjhaySYSCTL_ULONG(_machdep, OID_AUTO, conrclk, CTLFLAG_RW, &comdefaultrclk, 0, ""); 34398401Sn_hibmastatic speed_t gdbdefaultrate = GDBSPEED; 34498401Sn_hibmaSYSCTL_UINT(_machdep, OID_AUTO, gdbspeed, CTLFLAG_RW, 34598401Sn_hibma &gdbdefaultrate, GDBSPEED, ""); 34651078Speterstatic u_int com_events; /* input chars + weighted output completions */ 34751078Speterstatic Port_t siocniobase; 34898401Sn_hibmastatic int siocnunit = -1; 34951078Speterstatic Port_t siogdbiobase; 35051078Speterstatic int siogdbunit = -1; 35172238Sjhbstatic void *sio_slow_ih; 35272238Sjhbstatic void *sio_fast_ih; 35351078Speterstatic int sio_timeout; 35451078Speterstatic int sio_timeouts_until_log; 35551078Speterstatic struct callout_handle sio_timeout_handle 35651078Speter = CALLOUT_HANDLE_INITIALIZER(&sio_timeout_handle); 35753344Speterstatic int sio_numunits; 35851078Speter 35951078Speter#ifdef COM_ESP 36051078Speter/* XXX configure this properly. */ 36186909Simp/* XXX quite broken for new-bus. */ 36251078Speterstatic Port_t likely_com_ports[] = { 0x3f8, 0x2f8, 0x3e8, 0x2e8, }; 36351078Speterstatic Port_t likely_esp_ports[] = { 0x140, 0x180, 0x280, 0 }; 36451078Speter#endif 36551078Speter 36651078Speter/* 36751078Speter * handle sysctl read/write requests for console speed 36851078Speter * 36951078Speter * In addition to setting comdefaultrate for I/O through /dev/console, 37051078Speter * also set the initial and lock values for the /dev/ttyXX device 37151078Speter * if there is one associated with the console. Finally, if the /dev/tty 37251078Speter * device has already been open, change the speed on the open running port 37351078Speter * itself. 37451078Speter */ 37551078Speter 37651078Speterstatic int 37762573Sphksysctl_machdep_comdefaultrate(SYSCTL_HANDLER_ARGS) 37851078Speter{ 37951078Speter int error, s; 38051078Speter speed_t newspeed; 38151078Speter struct com_s *com; 38251078Speter struct tty *tp; 38351078Speter 38451078Speter newspeed = comdefaultrate; 38551078Speter 38651078Speter error = sysctl_handle_opaque(oidp, &newspeed, sizeof newspeed, req); 38751078Speter if (error || !req->newptr) 38851078Speter return (error); 38951078Speter 39051078Speter comdefaultrate = newspeed; 39151078Speter 39251078Speter if (comconsole < 0) /* serial console not selected? */ 39351078Speter return (0); 39451078Speter 39551078Speter com = com_addr(comconsole); 39657915Simp if (com == NULL) 39751078Speter return (ENXIO); 39851078Speter 39951078Speter /* 40051078Speter * set the initial and lock rates for /dev/ttydXX and /dev/cuaXX 40151078Speter * (note, the lock rates really are boolean -- if non-zero, disallow 40251078Speter * speed changes) 40351078Speter */ 40451078Speter com->it_in.c_ispeed = com->it_in.c_ospeed = 40551078Speter com->lt_in.c_ispeed = com->lt_in.c_ospeed = 40651078Speter com->it_out.c_ispeed = com->it_out.c_ospeed = 40751078Speter com->lt_out.c_ispeed = com->lt_out.c_ospeed = comdefaultrate; 40851078Speter 40951078Speter /* 41051078Speter * if we're open, change the running rate too 41151078Speter */ 41251078Speter tp = com->tp; 41351078Speter if (tp && (tp->t_state & TS_ISOPEN)) { 41451078Speter tp->t_termios.c_ispeed = 41551078Speter tp->t_termios.c_ospeed = comdefaultrate; 41651078Speter s = spltty(); 41751078Speter error = comparam(tp, &tp->t_termios); 41851078Speter splx(s); 41951078Speter } 42051078Speter return error; 42151078Speter} 42251078Speter 42351078SpeterSYSCTL_PROC(_machdep, OID_AUTO, conspeed, CTLTYPE_INT | CTLFLAG_RW, 42451078Speter 0, 0, sysctl_machdep_comdefaultrate, "I", ""); 42591280Simp/* TUNABLE_INT("machdep.conspeed", &comdefaultrate); */ 42651078Speter 42786909Simp#define SET_FLAG(dev, bit) device_set_flags(dev, device_get_flags(dev) | (bit)) 42886909Simp#define CLR_FLAG(dev, bit) device_set_flags(dev, device_get_flags(dev) & ~(bit)) 42986909Simp 43086909Simp/* 43186909Simp * Unload the driver and clear the table. 43286909Simp * XXX this is mostly wrong. 43386909Simp * XXX TODO: 43486909Simp * This is usually called when the card is ejected, but 435104933Simp * can be caused by a kldunload of a controller driver. 43686909Simp * The idea is to reset the driver's view of the device 43786909Simp * and ensure that any driver entry points such as 43886909Simp * read and write do not hang. 43986909Simp */ 44085365Simpint 44185365Simpsiodetach(dev) 44252471Simp device_t dev; 44351078Speter{ 44451078Speter struct com_s *com; 44565131Sphk int i; 44651078Speter 44752471Simp com = (struct com_s *) device_get_softc(dev); 44857915Simp if (com == NULL) { 44952471Simp device_printf(dev, "NULL com in siounload\n"); 45054386Simp return (0); 45151078Speter } 452120175Sbde com->gone = TRUE; 45365131Sphk for (i = 0 ; i < 6; i++) 45465131Sphk destroy_dev(com->devs[i]); 45554386Simp if (com->irqres) { 45654386Simp bus_teardown_intr(dev, com->irqres, com->cookie); 45754386Simp bus_release_resource(dev, SYS_RES_IRQ, 0, com->irqres); 45854386Simp } 45954386Simp if (com->ioportres) 460116120Sscottl bus_release_resource(dev, SYS_RES_IOPORT, com->ioportrid, 461116120Sscottl com->ioportres); 46251078Speter if (com->tp && (com->tp->t_state & TS_ISOPEN)) { 46357915Simp device_printf(dev, "still open, forcing close\n"); 46477750Simp (*linesw[com->tp->t_line].l_close)(com->tp, 0); 46551078Speter com->tp->t_gen++; 46651078Speter ttyclose(com->tp); 46751078Speter ttwakeup(com->tp); 46851078Speter ttwwakeup(com->tp); 46951078Speter } else { 47051078Speter if (com->ibuf != NULL) 47151078Speter free(com->ibuf, M_DEVBUF); 47286909Simp device_set_softc(dev, NULL); 47386909Simp free(com, M_DEVBUF); 47451078Speter } 47553978Simp return (0); 47651078Speter} 47751078Speter 47885365Simpint 47989986Sjhaysioprobe(dev, xrid, rclk, noprobe) 48058885Simp device_t dev; 48158885Simp int xrid; 48289986Sjhay u_long rclk; 48385365Simp int noprobe; 48451078Speter{ 48553344Speter#if 0 48651078Speter static bool_t already_init; 48753344Speter device_t xdev; 48853344Speter#endif 48960471Snyan struct com_s *com; 49089986Sjhay u_int divisor; 49151078Speter bool_t failures[10]; 49251078Speter int fn; 49351078Speter device_t idev; 49451078Speter Port_t iobase; 49551078Speter intrmask_t irqmap[4]; 49651078Speter intrmask_t irqs; 49751078Speter u_char mcr_image; 49851078Speter int result; 49954206Speter u_long xirq; 50051088Speter u_int flags = device_get_flags(dev); 50151078Speter int rid; 50251078Speter struct resource *port; 50351078Speter 50458885Simp rid = xrid; 50551078Speter port = bus_alloc_resource(dev, SYS_RES_IOPORT, &rid, 50651078Speter 0, ~0, IO_COMSIZE, RF_ACTIVE); 50751078Speter if (!port) 50857915Simp return (ENXIO); 50951078Speter 51086909Simp com = malloc(sizeof(*com), M_DEVBUF, M_NOWAIT | M_ZERO); 51186909Simp if (com == NULL) 51286909Simp return (ENOMEM); 51386909Simp device_set_softc(dev, com); 51460471Snyan com->bst = rman_get_bustag(port); 51560471Snyan com->bsh = rman_get_bushandle(port); 51689986Sjhay if (rclk == 0) 51789986Sjhay rclk = DEFAULT_RCLK; 51889986Sjhay com->rclk = rclk; 51960471Snyan 52085209Sjhb while (sio_inited != 2) 52185209Sjhb if (atomic_cmpset_int(&sio_inited, 0, 1)) { 52293818Sjhb mtx_init(&sio_lock, sio_driver_name, NULL, 52393818Sjhb (comconsole != -1) ? 52485209Sjhb MTX_SPIN | MTX_QUIET : MTX_SPIN); 52585209Sjhb atomic_store_rel_int(&sio_inited, 2); 52685209Sjhb } 52770174Sjhb 52853344Speter#if 0 52953344Speter /* 53053344Speter * XXX this is broken - when we are first called, there are no 53153344Speter * previously configured IO ports. We could hard code 53253344Speter * 0x3f8, 0x2f8, 0x3e8, 0x2e8 etc but that's probably worse. 53353344Speter * This code has been doing nothing since the conversion since 53453344Speter * "count" is zero the first time around. 53553344Speter */ 53651078Speter if (!already_init) { 53751078Speter /* 53851078Speter * Turn off MCR_IENABLE for all likely serial ports. An unused 53951078Speter * port with its MCR_IENABLE gate open will inhibit interrupts 54051078Speter * from any used port that shares the interrupt vector. 54151078Speter * XXX the gate enable is elsewhere for some multiports. 54251078Speter */ 54351078Speter device_t *devs; 54453344Speter int count, i, xioport; 54551078Speter 54651078Speter devclass_get_devices(sio_devclass, &devs, &count); 54751078Speter for (i = 0; i < count; i++) { 54851078Speter xdev = devs[i]; 54954194Speter if (device_is_enabled(xdev) && 55054194Speter bus_get_resource(xdev, SYS_RES_IOPORT, 0, &xioport, 55154194Speter NULL) == 0) 55253344Speter outb(xioport + com_mcr, 0); 55351078Speter } 55451078Speter free(devs, M_TEMP); 55551078Speter already_init = TRUE; 55651078Speter } 55753344Speter#endif 55851078Speter 55951078Speter if (COM_LLCONSOLE(flags)) { 56051078Speter printf("sio%d: reserved for low-level i/o\n", 56151078Speter device_get_unit(dev)); 56256788Sbde bus_release_resource(dev, SYS_RES_IOPORT, rid, port); 56386909Simp device_set_softc(dev, NULL); 56486909Simp free(com, M_DEVBUF); 56551078Speter return (ENXIO); 56651078Speter } 56751078Speter 56851078Speter /* 56951078Speter * If the device is on a multiport card and has an AST/4 57051078Speter * compatible interrupt control register, initialize this 57151078Speter * register and prepare to leave MCR_IENABLE clear in the mcr. 57251078Speter * Otherwise, prepare to set MCR_IENABLE in the mcr. 57351078Speter * Point idev to the device struct giving the correct id_irq. 57451078Speter * This is the struct for the master device if there is one. 57551078Speter */ 57651078Speter idev = dev; 57751078Speter mcr_image = MCR_IENABLE; 57851078Speter#ifdef COM_MULTIPORT 57957234Sbde if (COM_ISMULTIPORT(flags)) { 58054206Speter Port_t xiobase; 58154206Speter u_long io; 58254206Speter 58351078Speter idev = devclass_get_device(sio_devclass, COM_MPMASTER(flags)); 58451078Speter if (idev == NULL) { 58551078Speter printf("sio%d: master device %d not configured\n", 58651078Speter device_get_unit(dev), COM_MPMASTER(flags)); 58751078Speter idev = dev; 58851078Speter } 58957234Sbde if (!COM_NOTAST4(flags)) { 59057234Sbde if (bus_get_resource(idev, SYS_RES_IOPORT, 0, &io, 59157234Sbde NULL) == 0) { 59257234Sbde xiobase = io; 59357234Sbde if (bus_get_resource(idev, SYS_RES_IRQ, 0, 59457234Sbde NULL, NULL) == 0) 59557234Sbde outb(xiobase + com_scr, 0x80); 59657234Sbde else 59757234Sbde outb(xiobase + com_scr, 0); 59857234Sbde } 59957234Sbde mcr_image = 0; 60051078Speter } 60151078Speter } 60251078Speter#endif /* COM_MULTIPORT */ 60354194Speter if (bus_get_resource(idev, SYS_RES_IRQ, 0, NULL, NULL) != 0) 60451078Speter mcr_image = 0; 60551078Speter 60651078Speter bzero(failures, sizeof failures); 60751078Speter iobase = rman_get_start(port); 60851078Speter 60951078Speter /* 61051078Speter * We don't want to get actual interrupts, just masked ones. 61151078Speter * Interrupts from this line should already be masked in the ICU, 61251078Speter * but mask them in the processor as well in case there are some 61351078Speter * (misconfigured) shared interrupts. 61451078Speter */ 61572200Sbmilekic mtx_lock_spin(&sio_lock); 61651078Speter/* EXTRA DELAY? */ 61751078Speter 61851078Speter /* 619112384Ssobomax * For the TI16754 chips, set prescaler to 1 (4 is often the 620112384Ssobomax * default after-reset value) as otherwise it's impossible to 621112270Ssobomax * get highest baudrates. 622112270Ssobomax */ 623112270Ssobomax if (COM_TI16754(flags)) { 624112384Ssobomax u_char cfcr, efr; 625112270Ssobomax 626112384Ssobomax cfcr = sio_getreg(com, com_cfcr); 627112384Ssobomax sio_setreg(com, com_cfcr, CFCR_EFR_ENABLE); 628112384Ssobomax efr = sio_getreg(com, com_efr); 629112384Ssobomax /* Unlock extended features to turn off prescaler. */ 630112384Ssobomax sio_setreg(com, com_efr, efr | EFR_EFE); 631112384Ssobomax /* Disable EFR. */ 632112384Ssobomax sio_setreg(com, com_cfcr, (cfcr != CFCR_EFR_ENABLE) ? cfcr : 0); 633112384Ssobomax /* Turn off prescaler. */ 634112384Ssobomax sio_setreg(com, com_mcr, 635112384Ssobomax sio_getreg(com, com_mcr) & ~MCR_PRESCALE); 636112384Ssobomax sio_setreg(com, com_cfcr, CFCR_EFR_ENABLE); 637112384Ssobomax sio_setreg(com, com_efr, efr); 638112384Ssobomax sio_setreg(com, com_cfcr, cfcr); 639112270Ssobomax } 640112384Ssobomax 641112270Ssobomax /* 64251078Speter * Initialize the speed and the word size and wait long enough to 64351078Speter * drain the maximum of 16 bytes of junk in device output queues. 64451078Speter * The speed is undefined after a master reset and must be set 64551078Speter * before relying on anything related to output. There may be 64651078Speter * junk after a (very fast) soft reboot and (apparently) after 64751078Speter * master reset. 64851078Speter * XXX what about the UART bug avoided by waiting in comparam()? 64951078Speter * We don't want to to wait long enough to drain at 2 bps. 65051078Speter */ 65151078Speter if (iobase == siocniobase) 65251078Speter DELAY((16 + 1) * 1000000 / (comdefaultrate / 10)); 65351078Speter else { 65460471Snyan sio_setreg(com, com_cfcr, CFCR_DLAB | CFCR_8BITS); 65589986Sjhay divisor = siodivisor(rclk, SIO_TEST_SPEED); 65689986Sjhay sio_setreg(com, com_dlbl, divisor & 0xff); 65789986Sjhay sio_setreg(com, com_dlbh, divisor >> 8); 65860471Snyan sio_setreg(com, com_cfcr, CFCR_8BITS); 65951078Speter DELAY((16 + 1) * 1000000 / (SIO_TEST_SPEED / 10)); 66051078Speter } 66151078Speter 66251078Speter /* 66351078Speter * Enable the interrupt gate and disable device interupts. This 66451078Speter * should leave the device driving the interrupt line low and 66551078Speter * guarantee an edge trigger if an interrupt can be generated. 66651078Speter */ 66751078Speter/* EXTRA DELAY? */ 66860471Snyan sio_setreg(com, com_mcr, mcr_image); 66960471Snyan sio_setreg(com, com_ier, 0); 67051078Speter DELAY(1000); /* XXX */ 67151078Speter irqmap[0] = isa_irq_pending(); 67251078Speter 67351078Speter /* 67451078Speter * Attempt to set loopback mode so that we can send a null byte 67551078Speter * without annoying any external device. 67651078Speter */ 67751078Speter/* EXTRA DELAY? */ 67860471Snyan sio_setreg(com, com_mcr, mcr_image | MCR_LOOPBACK); 67951078Speter 68051078Speter /* 68151078Speter * Attempt to generate an output interrupt. On 8250's, setting 68251078Speter * IER_ETXRDY generates an interrupt independent of the current 68351078Speter * setting and independent of whether the THR is empty. On 16450's, 68451078Speter * setting IER_ETXRDY generates an interrupt independent of the 68551078Speter * current setting. On 16550A's, setting IER_ETXRDY only 68651078Speter * generates an interrupt when IER_ETXRDY is not already set. 68751078Speter */ 68860471Snyan sio_setreg(com, com_ier, IER_ETXRDY); 68951078Speter 69051078Speter /* 69151078Speter * On some 16x50 incompatibles, setting IER_ETXRDY doesn't generate 69251078Speter * an interrupt. They'd better generate one for actually doing 69351078Speter * output. Loopback may be broken on the same incompatibles but 69451078Speter * it's unlikely to do more than allow the null byte out. 69551078Speter */ 69660471Snyan sio_setreg(com, com_data, 0); 69751078Speter DELAY((1 + 2) * 1000000 / (SIO_TEST_SPEED / 10)); 69851078Speter 69951078Speter /* 70051078Speter * Turn off loopback mode so that the interrupt gate works again 70151078Speter * (MCR_IENABLE was hidden). This should leave the device driving 70251078Speter * an interrupt line high. It doesn't matter if the interrupt 70351078Speter * line oscillates while we are not looking at it, since interrupts 70451078Speter * are disabled. 70551078Speter */ 70651078Speter/* EXTRA DELAY? */ 70760471Snyan sio_setreg(com, com_mcr, mcr_image); 70892401Simp 70992401Simp /* 71092401Simp * It seems my Xircom CBEM56G Cardbus modem wants to be reset 71192401Simp * to 8 bits *again*, or else probe test 0 will fail. 71292401Simp * gwk@sgi.com, 4/19/2001 71392401Simp */ 71492401Simp sio_setreg(com, com_cfcr, CFCR_8BITS); 71551078Speter 71651078Speter /* 717120189Sbde * Some PCMCIA cards (Palido 321s, DC-1S, ...) have the "TXRDY bug", 718120189Sbde * so we probe for a buggy IIR_TXRDY implementation even in the 719120189Sbde * noprobe case. We don't probe for it in the !noprobe case because 720120189Sbde * noprobe is always set for PCMCIA cards and the problem is not 721120189Sbde * known to affect any other cards. 72251078Speter */ 72385365Simp if (noprobe) { 724120189Sbde /* Read IIR a few times. */ 72553370Speter for (fn = 0; fn < 2; fn ++) { 72653370Speter DELAY(10000); 72760471Snyan failures[6] = sio_getreg(com, com_iir); 72853370Speter } 729120189Sbde 730120189Sbde /* IIR_TXRDY should be clear. Is it? */ 73153370Speter result = 0; 73253370Speter if (failures[6] & IIR_TXRDY) { 733120189Sbde /* 734120189Sbde * No. We seem to have the bug. Does our fix for 735120189Sbde * it work? 736120189Sbde */ 73760471Snyan sio_setreg(com, com_ier, 0); 73860471Snyan if (sio_getreg(com, com_iir) & IIR_NOPEND) { 739120189Sbde /* Yes. We discovered the TXRDY bug! */ 74053370Speter SET_FLAG(dev, COM_C_IIR_TXRDYBUG); 74153370Speter } else { 742120189Sbde /* No. Just fail. XXX */ 74353370Speter result = ENXIO; 74481793Simp sio_setreg(com, com_mcr, 0); 74553370Speter } 74651078Speter } else { 747120189Sbde /* Yes. No bug. */ 74853370Speter CLR_FLAG(dev, COM_C_IIR_TXRDYBUG); 74951078Speter } 75081793Simp sio_setreg(com, com_ier, 0); 75160471Snyan sio_setreg(com, com_cfcr, CFCR_8BITS); 75272200Sbmilekic mtx_unlock_spin(&sio_lock); 75353344Speter bus_release_resource(dev, SYS_RES_IOPORT, rid, port); 75486909Simp if (iobase == siocniobase) 75586909Simp result = 0; 75686909Simp if (result != 0) { 75786909Simp device_set_softc(dev, NULL); 75886909Simp free(com, M_DEVBUF); 75986909Simp } 76086909Simp return (result); 76153344Speter } 76253344Speter 76351078Speter /* 76451078Speter * Check that 76551078Speter * o the CFCR, IER and MCR in UART hold the values written to them 76651078Speter * (the values happen to be all distinct - this is good for 76751078Speter * avoiding false positive tests from bus echoes). 76851078Speter * o an output interrupt is generated and its vector is correct. 76951078Speter * o the interrupt goes away when the IIR in the UART is read. 77051078Speter */ 77151078Speter/* EXTRA DELAY? */ 77260471Snyan failures[0] = sio_getreg(com, com_cfcr) - CFCR_8BITS; 77360471Snyan failures[1] = sio_getreg(com, com_ier) - IER_ETXRDY; 774112270Ssobomax failures[2] = sio_getreg(com, com_mcr) - mcr_image; 77551078Speter DELAY(10000); /* Some internal modems need this time */ 77651078Speter irqmap[1] = isa_irq_pending(); 77760471Snyan failures[4] = (sio_getreg(com, com_iir) & IIR_IMASK) - IIR_TXRDY; 77851078Speter DELAY(1000); /* XXX */ 77951078Speter irqmap[2] = isa_irq_pending(); 78060471Snyan failures[6] = (sio_getreg(com, com_iir) & IIR_IMASK) - IIR_NOPEND; 78151078Speter 78251078Speter /* 78351078Speter * Turn off all device interrupts and check that they go off properly. 78451078Speter * Leave MCR_IENABLE alone. For ports without a master port, it gates 78551078Speter * the OUT2 output of the UART to 78651078Speter * the ICU input. Closing the gate would give a floating ICU input 78751078Speter * (unless there is another device driving it) and spurious interrupts. 78851078Speter * (On the system that this was first tested on, the input floats high 78951078Speter * and gives a (masked) interrupt as soon as the gate is closed.) 79051078Speter */ 79160471Snyan sio_setreg(com, com_ier, 0); 79260471Snyan sio_setreg(com, com_cfcr, CFCR_8BITS); /* dummy to avoid bus echo */ 79360471Snyan failures[7] = sio_getreg(com, com_ier); 79451078Speter DELAY(1000); /* XXX */ 79551078Speter irqmap[3] = isa_irq_pending(); 79660471Snyan failures[9] = (sio_getreg(com, com_iir) & IIR_IMASK) - IIR_NOPEND; 79751078Speter 79872200Sbmilekic mtx_unlock_spin(&sio_lock); 79951078Speter 80051078Speter irqs = irqmap[1] & ~irqmap[0]; 80154194Speter if (bus_get_resource(idev, SYS_RES_IRQ, 0, &xirq, NULL) == 0 && 80289463Simp ((1 << xirq) & irqs) == 0) { 80351078Speter printf( 80454206Speter "sio%d: configured irq %ld not in bitmap of probed irqs %#x\n", 80553344Speter device_get_unit(dev), xirq, irqs); 80689447Sbmah printf( 80789470Sbmah "sio%d: port may not be enabled\n", 80889447Sbmah device_get_unit(dev)); 80989463Simp } 81051078Speter if (bootverbose) 81151078Speter printf("sio%d: irq maps: %#x %#x %#x %#x\n", 81251078Speter device_get_unit(dev), 81351078Speter irqmap[0], irqmap[1], irqmap[2], irqmap[3]); 81451078Speter 81551078Speter result = 0; 81651078Speter for (fn = 0; fn < sizeof failures; ++fn) 81751078Speter if (failures[fn]) { 81860471Snyan sio_setreg(com, com_mcr, 0); 81951078Speter result = ENXIO; 82051078Speter if (bootverbose) { 82151078Speter printf("sio%d: probe failed test(s):", 82251078Speter device_get_unit(dev)); 82351078Speter for (fn = 0; fn < sizeof failures; ++fn) 82451078Speter if (failures[fn]) 82551078Speter printf(" %d", fn); 82651078Speter printf("\n"); 82751078Speter } 82851078Speter break; 82951078Speter } 83051078Speter bus_release_resource(dev, SYS_RES_IOPORT, rid, port); 83186909Simp if (iobase == siocniobase) 83286909Simp result = 0; 83386909Simp if (result != 0) { 83486909Simp device_set_softc(dev, NULL); 83586909Simp free(com, M_DEVBUF); 83686909Simp } 83786909Simp return (result); 83851078Speter} 83951078Speter 84051078Speter#ifdef COM_ESP 84151078Speterstatic int 84251078Speterespattach(com, esp_port) 84351078Speter struct com_s *com; 84451078Speter Port_t esp_port; 84551078Speter{ 84651078Speter u_char dips; 84751078Speter u_char val; 84851078Speter 84951078Speter /* 85051078Speter * Check the ESP-specific I/O port to see if we're an ESP 85151078Speter * card. If not, return failure immediately. 85251078Speter */ 85351078Speter if ((inb(esp_port) & 0xf3) == 0) { 85451078Speter printf(" port 0x%x is not an ESP board?\n", esp_port); 85551078Speter return (0); 85651078Speter } 85751078Speter 85851078Speter /* 85951078Speter * We've got something that claims to be a Hayes ESP card. 86051078Speter * Let's hope so. 86151078Speter */ 86251078Speter 86351078Speter /* Get the dip-switch configuration */ 86451078Speter outb(esp_port + ESP_CMD1, ESP_GETDIPS); 86551078Speter dips = inb(esp_port + ESP_STATUS1); 86651078Speter 86751078Speter /* 86851078Speter * Bits 0,1 of dips say which COM port we are. 86951078Speter */ 87060471Snyan if (rman_get_start(com->ioportres) == likely_com_ports[dips & 0x03]) 87151078Speter printf(" : ESP"); 87251078Speter else { 87351078Speter printf(" esp_port has com %d\n", dips & 0x03); 87451078Speter return (0); 87551078Speter } 87651078Speter 87751078Speter /* 87851078Speter * Check for ESP version 2.0 or later: bits 4,5,6 = 010. 87951078Speter */ 88051078Speter outb(esp_port + ESP_CMD1, ESP_GETTEST); 88151078Speter val = inb(esp_port + ESP_STATUS1); /* clear reg 1 */ 88251078Speter val = inb(esp_port + ESP_STATUS2); 88351078Speter if ((val & 0x70) < 0x20) { 88451078Speter printf("-old (%o)", val & 0x70); 88551078Speter return (0); 88651078Speter } 88751078Speter 88851078Speter /* 88951078Speter * Check for ability to emulate 16550: bit 7 == 1 89051078Speter */ 89151078Speter if ((dips & 0x80) == 0) { 89251078Speter printf(" slave"); 89351078Speter return (0); 89451078Speter } 89551078Speter 89651078Speter /* 89751078Speter * Okay, we seem to be a Hayes ESP card. Whee. 89851078Speter */ 89951078Speter com->esp = TRUE; 90051078Speter com->esp_port = esp_port; 90151078Speter return (1); 90251078Speter} 90351078Speter#endif /* COM_ESP */ 90451078Speter 90585365Simpint 90689986Sjhaysioattach(dev, xrid, rclk) 90751078Speter device_t dev; 90858885Simp int xrid; 90989986Sjhay u_long rclk; 91051078Speter{ 91151078Speter struct com_s *com; 91251078Speter#ifdef COM_ESP 91351078Speter Port_t *espp; 91451078Speter#endif 91551078Speter Port_t iobase; 91693470Sbde int minorbase; 91751078Speter int unit; 91853344Speter u_int flags; 91951078Speter int rid; 92051078Speter struct resource *port; 92153344Speter int ret; 92251078Speter 92358885Simp rid = xrid; 92451078Speter port = bus_alloc_resource(dev, SYS_RES_IOPORT, &rid, 92551078Speter 0, ~0, IO_COMSIZE, RF_ACTIVE); 92651078Speter if (!port) 92757915Simp return (ENXIO); 92851078Speter 92951078Speter iobase = rman_get_start(port); 93051078Speter unit = device_get_unit(dev); 93151078Speter com = device_get_softc(dev); 93253344Speter flags = device_get_flags(dev); 93351078Speter 93453344Speter if (unit >= sio_numunits) 93553344Speter sio_numunits = unit + 1; 93651078Speter /* 93751078Speter * sioprobe() has initialized the device registers as follows: 93851078Speter * o cfcr = CFCR_8BITS. 93951078Speter * It is most important that CFCR_DLAB is off, so that the 94051078Speter * data port is not hidden when we enable interrupts. 94151078Speter * o ier = 0. 94251078Speter * Interrupts are only enabled when the line is open. 94351078Speter * o mcr = MCR_IENABLE, or 0 if the port has AST/4 compatible 94451078Speter * interrupt control register or the config specifies no irq. 94551078Speter * Keeping MCR_DTR and MCR_RTS off might stop the external 94651078Speter * device from sending before we are ready. 94751078Speter */ 94851078Speter bzero(com, sizeof *com); 94951078Speter com->unit = unit; 95051078Speter com->ioportres = port; 951116120Sscottl com->ioportrid = rid; 95260471Snyan com->bst = rman_get_bustag(port); 95360471Snyan com->bsh = rman_get_bushandle(port); 95451078Speter com->cfcr_image = CFCR_8BITS; 95551078Speter com->dtr_wait = 3 * hz; 95651078Speter com->loses_outints = COM_LOSESOUTINTS(flags) != 0; 95757234Sbde com->no_irq = bus_get_resource(dev, SYS_RES_IRQ, 0, NULL, NULL) != 0; 95851078Speter com->tx_fifo_size = 1; 95951078Speter com->obufs[0].l_head = com->obuf1; 96051078Speter com->obufs[1].l_head = com->obuf2; 96151078Speter 96251078Speter com->data_port = iobase + com_data; 963120189Sbde com->int_ctl_port = iobase + com_ier; 96451078Speter com->int_id_port = iobase + com_iir; 96551078Speter com->modem_ctl_port = iobase + com_mcr; 96651078Speter com->mcr_image = inb(com->modem_ctl_port); 96751078Speter com->line_status_port = iobase + com_lsr; 96851078Speter com->modem_status_port = iobase + com_msr; 96951078Speter 97089986Sjhay if (rclk == 0) 97189986Sjhay rclk = DEFAULT_RCLK; 97289986Sjhay com->rclk = rclk; 97389986Sjhay 97451078Speter /* 97551078Speter * We don't use all the flags from <sys/ttydefaults.h> since they 97651078Speter * are only relevant for logins. It's important to have echo off 97751078Speter * initially so that the line doesn't start blathering before the 97851078Speter * echo flag can be turned off. 97951078Speter */ 98051078Speter com->it_in.c_iflag = 0; 98151078Speter com->it_in.c_oflag = 0; 98251078Speter com->it_in.c_cflag = TTYDEF_CFLAG; 98351078Speter com->it_in.c_lflag = 0; 98451078Speter if (unit == comconsole) { 98551078Speter com->it_in.c_iflag = TTYDEF_IFLAG; 98651078Speter com->it_in.c_oflag = TTYDEF_OFLAG; 98751078Speter com->it_in.c_cflag = TTYDEF_CFLAG | CLOCAL; 98851078Speter com->it_in.c_lflag = TTYDEF_LFLAG; 98951078Speter com->lt_out.c_cflag = com->lt_in.c_cflag = CLOCAL; 99051078Speter com->lt_out.c_ispeed = com->lt_out.c_ospeed = 99151078Speter com->lt_in.c_ispeed = com->lt_in.c_ospeed = 99251078Speter com->it_in.c_ispeed = com->it_in.c_ospeed = comdefaultrate; 99351078Speter } else 99451078Speter com->it_in.c_ispeed = com->it_in.c_ospeed = TTYDEF_SPEED; 99565605Sjhb if (siosetwater(com, com->it_in.c_ispeed) != 0) { 99672200Sbmilekic mtx_unlock_spin(&sio_lock); 99756788Sbde /* 99856788Sbde * Leave i/o resources allocated if this is a `cn'-level 99956788Sbde * console, so that other devices can't snarf them. 100056788Sbde */ 100156788Sbde if (iobase != siocniobase) 100256788Sbde bus_release_resource(dev, SYS_RES_IOPORT, rid, port); 100356788Sbde return (ENOMEM); 100451078Speter } 100572200Sbmilekic mtx_unlock_spin(&sio_lock); 100651078Speter termioschars(&com->it_in); 100751078Speter com->it_out = com->it_in; 100851078Speter 100951078Speter /* attempt to determine UART type */ 101051078Speter printf("sio%d: type", unit); 101151078Speter 101251078Speter 1013104067Sphk if (!COM_ISMULTIPORT(flags) && 1014104067Sphk !COM_IIR_TXRDYBUG(flags) && !COM_NOSCR(flags)) { 101551078Speter u_char scr; 101651078Speter u_char scr1; 101751078Speter u_char scr2; 101851078Speter 101960471Snyan scr = sio_getreg(com, com_scr); 102060471Snyan sio_setreg(com, com_scr, 0xa5); 102160471Snyan scr1 = sio_getreg(com, com_scr); 102260471Snyan sio_setreg(com, com_scr, 0x5a); 102360471Snyan scr2 = sio_getreg(com, com_scr); 102460471Snyan sio_setreg(com, com_scr, scr); 102551078Speter if (scr1 != 0xa5 || scr2 != 0x5a) { 102689447Sbmah printf(" 8250 or not responding"); 102751078Speter goto determined_type; 102851078Speter } 102951078Speter } 103060471Snyan sio_setreg(com, com_fifo, FIFO_ENABLE | FIFO_RX_HIGH); 103151078Speter DELAY(100); 103251078Speter switch (inb(com->int_id_port) & IIR_FIFO_MASK) { 103351078Speter case FIFO_RX_LOW: 103451078Speter printf(" 16450"); 103551078Speter break; 103651078Speter case FIFO_RX_MEDL: 103751078Speter printf(" 16450?"); 103851078Speter break; 103951078Speter case FIFO_RX_MEDH: 104051078Speter printf(" 16550?"); 104151078Speter break; 104251078Speter case FIFO_RX_HIGH: 104351078Speter if (COM_NOFIFO(flags)) { 104451078Speter printf(" 16550A fifo disabled"); 1045120173Sbde break; 104651078Speter } 1047120173Sbde com->hasfifo = TRUE; 1048120173Sbde if (COM_ST16650A(flags)) { 1049120173Sbde printf(" ST16650A"); 1050120173Sbde com->st16650a = TRUE; 1051120173Sbde com->tx_fifo_size = 32; 1052120173Sbde break; 1053120173Sbde } 1054120173Sbde if (COM_TI16754(flags)) { 1055120173Sbde printf(" TI16754"); 1056120173Sbde com->tx_fifo_size = 64; 1057120173Sbde break; 1058120173Sbde } 1059120173Sbde printf(" 16550A"); 106051078Speter#ifdef COM_ESP 106151078Speter for (espp = likely_esp_ports; *espp != 0; espp++) 106251078Speter if (espattach(com, *espp)) { 106351078Speter com->tx_fifo_size = 1024; 106451078Speter break; 106551078Speter } 1066120173Sbde if (com->esp != NULL) 1067120173Sbde break; 106851078Speter#endif 1069120173Sbde com->tx_fifo_size = COM_FIFOSIZE(flags); 1070120173Sbde if (com->tx_fifo_size == 0) 1071120173Sbde com->tx_fifo_size = 16; 1072120173Sbde else 1073120173Sbde printf(" lookalike with %u bytes FIFO", 1074120173Sbde com->tx_fifo_size); 107551078Speter break; 107651078Speter } 107751078Speter#ifdef COM_ESP 1078120173Sbde if (com->esp != NULL) { 107951078Speter /* 108051078Speter * Set 16550 compatibility mode. 108151078Speter * We don't use the ESP_MODE_SCALE bit to increase the 108251078Speter * fifo trigger levels because we can't handle large 108351078Speter * bursts of input. 108451078Speter * XXX flow control should be set in comparam(), not here. 108551078Speter */ 108651078Speter outb(com->esp_port + ESP_CMD1, ESP_SETMODE); 108751078Speter outb(com->esp_port + ESP_CMD2, ESP_MODE_RTS | ESP_MODE_FIFO); 108851078Speter 108951078Speter /* Set RTS/CTS flow control. */ 109051078Speter outb(com->esp_port + ESP_CMD1, ESP_SETFLOWTYPE); 109151078Speter outb(com->esp_port + ESP_CMD2, ESP_FLOW_RTS); 109251078Speter outb(com->esp_port + ESP_CMD2, ESP_FLOW_CTS); 109351078Speter 109451078Speter /* Set flow-control levels. */ 109551078Speter outb(com->esp_port + ESP_CMD1, ESP_SETRXFLOW); 109651078Speter outb(com->esp_port + ESP_CMD2, HIBYTE(768)); 109751078Speter outb(com->esp_port + ESP_CMD2, LOBYTE(768)); 109851078Speter outb(com->esp_port + ESP_CMD2, HIBYTE(512)); 109951078Speter outb(com->esp_port + ESP_CMD2, LOBYTE(512)); 110051078Speter } 110151078Speter#endif /* COM_ESP */ 110260471Snyan sio_setreg(com, com_fifo, 0); 110351078Speterdetermined_type: ; 110451078Speter 110551078Speter#ifdef COM_MULTIPORT 110651078Speter if (COM_ISMULTIPORT(flags)) { 110753344Speter device_t masterdev; 110853344Speter 110951078Speter com->multiport = TRUE; 111051078Speter printf(" (multiport"); 111151078Speter if (unit == COM_MPMASTER(flags)) 111251078Speter printf(" master"); 111351078Speter printf(")"); 111453344Speter masterdev = devclass_get_device(sio_devclass, 111553344Speter COM_MPMASTER(flags)); 111657234Sbde com->no_irq = (masterdev == NULL || bus_get_resource(masterdev, 111757234Sbde SYS_RES_IRQ, 0, NULL, NULL) != 0); 111851078Speter } 111951078Speter#endif /* COM_MULTIPORT */ 112051078Speter if (unit == comconsole) 112151078Speter printf(", console"); 112253344Speter if (COM_IIR_TXRDYBUG(flags)) 1123120189Sbde printf(" with a buggy IIR_TXRDY implementation"); 112451078Speter printf("\n"); 112551078Speter 112667551Sjhb if (sio_fast_ih == NULL) { 112772238Sjhb swi_add(&tty_ithd, "tty:sio", siopoll, NULL, SWI_TTY, 0, 112872238Sjhb &sio_fast_ih); 112972238Sjhb swi_add(&clk_ithd, "tty:sio", siopoll, NULL, SWI_TTY, 0, 113072238Sjhb &sio_slow_ih); 113151078Speter } 113293470Sbde minorbase = UNIT_TO_MINOR(unit); 113393470Sbde com->devs[0] = make_dev(&sio_cdevsw, minorbase, 113451078Speter UID_ROOT, GID_WHEEL, 0600, "ttyd%r", unit); 113593470Sbde com->devs[1] = make_dev(&sio_cdevsw, minorbase | CONTROL_INIT_STATE, 113651078Speter UID_ROOT, GID_WHEEL, 0600, "ttyid%r", unit); 113793470Sbde com->devs[2] = make_dev(&sio_cdevsw, minorbase | CONTROL_LOCK_STATE, 113851078Speter UID_ROOT, GID_WHEEL, 0600, "ttyld%r", unit); 113993470Sbde com->devs[3] = make_dev(&sio_cdevsw, minorbase | CALLOUT_MASK, 114051078Speter UID_UUCP, GID_DIALER, 0660, "cuaa%r", unit); 114165131Sphk com->devs[4] = make_dev(&sio_cdevsw, 114293470Sbde minorbase | CALLOUT_MASK | CONTROL_INIT_STATE, 114351078Speter UID_UUCP, GID_DIALER, 0660, "cuaia%r", unit); 114465131Sphk com->devs[5] = make_dev(&sio_cdevsw, 114593470Sbde minorbase | CALLOUT_MASK | CONTROL_LOCK_STATE, 114651078Speter UID_UUCP, GID_DIALER, 0660, "cuala%r", unit); 1147110249Sphk for (rid = 0; rid < 6; rid++) 1148110249Sphk com->devs[rid]->si_drv1 = com; 114951078Speter com->flags = flags; 115051078Speter com->pps.ppscap = PPS_CAPTUREASSERT | PPS_CAPTURECLEAR; 1151111613Sphk 1152111613Sphk if (COM_PPSCTS(flags)) 1153111613Sphk com->pps_bit = MSR_CTS; 1154111613Sphk else 1155111613Sphk com->pps_bit = MSR_DCD; 115651078Speter pps_init(&com->pps); 115751078Speter 115851078Speter rid = 0; 115951078Speter com->irqres = bus_alloc_resource(dev, SYS_RES_IRQ, &rid, 0ul, ~0ul, 1, 116053344Speter RF_ACTIVE); 116153344Speter if (com->irqres) { 116253344Speter ret = BUS_SETUP_INTR(device_get_parent(dev), dev, com->irqres, 116365557Sjasone INTR_TYPE_TTY | INTR_FAST, 116454386Simp siointr, com, &com->cookie); 116554194Speter if (ret) { 116654194Speter ret = BUS_SETUP_INTR(device_get_parent(dev), dev, 116754194Speter com->irqres, INTR_TYPE_TTY, 116854386Simp siointr, com, &com->cookie); 116954194Speter if (ret == 0) 117083246Sdd device_printf(dev, "unable to activate interrupt in fast mode - using normal mode\n"); 117154194Speter } 117253344Speter if (ret) 117353344Speter device_printf(dev, "could not activate interrupt\n"); 117478504Siedowse#if defined(DDB) && (defined(BREAK_TO_DEBUGGER) || \ 117578504Siedowse defined(ALT_BREAK_TO_DEBUGGER)) 117678504Siedowse /* 117778504Siedowse * Enable interrupts for early break-to-debugger support 117878504Siedowse * on the console. 117978504Siedowse */ 118078504Siedowse if (ret == 0 && unit == comconsole) 118178504Siedowse outb(siocniobase + com_ier, IER_ERXRDY | IER_ERLS | 118278504Siedowse IER_EMSC); 118378504Siedowse#endif 118453344Speter } 118551078Speter 118651078Speter return (0); 118751078Speter} 118851078Speter 118951078Speterstatic int 119083366Sjuliansioopen(dev, flag, mode, td) 119151078Speter dev_t dev; 119251078Speter int flag; 119351078Speter int mode; 119483366Sjulian struct thread *td; 119551078Speter{ 119651078Speter struct com_s *com; 119751078Speter int error; 119851078Speter int mynor; 119951078Speter int s; 120051078Speter struct tty *tp; 120151078Speter int unit; 120251078Speter 120351078Speter mynor = minor(dev); 120451078Speter unit = MINOR_TO_UNIT(mynor); 120553344Speter com = com_addr(unit); 120653344Speter if (com == NULL) 120751078Speter return (ENXIO); 120851078Speter if (com->gone) 120951078Speter return (ENXIO); 121051078Speter if (mynor & CONTROL_MASK) 121151078Speter return (0); 121251078Speter tp = dev->si_tty = com->tp = ttymalloc(com->tp); 121351078Speter s = spltty(); 121451078Speter /* 121551078Speter * We jump to this label after all non-interrupted sleeps to pick 121651078Speter * up any changes of the device state. 121751078Speter */ 121851078Speteropen_top: 121951078Speter while (com->state & CS_DTR_OFF) { 122051078Speter error = tsleep(&com->dtr_wait, TTIPRI | PCATCH, "siodtr", 0); 122151078Speter if (com_addr(unit) == NULL) 122251078Speter return (ENXIO); 122351078Speter if (error != 0 || com->gone) 122451078Speter goto out; 122551078Speter } 122651078Speter if (tp->t_state & TS_ISOPEN) { 122751078Speter /* 122851078Speter * The device is open, so everything has been initialized. 122951078Speter * Handle conflicts. 123051078Speter */ 123151078Speter if (mynor & CALLOUT_MASK) { 123251078Speter if (!com->active_out) { 123351078Speter error = EBUSY; 123451078Speter goto out; 123551078Speter } 123651078Speter } else { 123751078Speter if (com->active_out) { 123851078Speter if (flag & O_NONBLOCK) { 123951078Speter error = EBUSY; 124051078Speter goto out; 124151078Speter } 124251078Speter error = tsleep(&com->active_out, 124351078Speter TTIPRI | PCATCH, "siobi", 0); 124451078Speter if (com_addr(unit) == NULL) 124551078Speter return (ENXIO); 124651078Speter if (error != 0 || com->gone) 124751078Speter goto out; 124851078Speter goto open_top; 124951078Speter } 125051078Speter } 125151078Speter if (tp->t_state & TS_XCLUDE && 125293593Sjhb suser(td)) { 125351078Speter error = EBUSY; 125451078Speter goto out; 125551078Speter } 125651078Speter } else { 125751078Speter /* 125851078Speter * The device isn't open, so there are no conflicts. 125951078Speter * Initialize it. Initialization is done twice in many 126051078Speter * cases: to preempt sleeping callin opens if we are 126151078Speter * callout, and to complete a callin open after DCD rises. 126251078Speter */ 126351078Speter tp->t_oproc = comstart; 126451078Speter tp->t_param = comparam; 126551654Sphk tp->t_stop = comstop; 126651078Speter tp->t_dev = dev; 126751078Speter tp->t_termios = mynor & CALLOUT_MASK 126851078Speter ? com->it_out : com->it_in; 126951078Speter (void)commctl(com, TIOCM_DTR | TIOCM_RTS, DMSET); 127051078Speter com->poll = com->no_irq; 127151078Speter com->poll_output = com->loses_outints; 127251078Speter ++com->wopeners; 127351078Speter error = comparam(tp, &tp->t_termios); 127451078Speter --com->wopeners; 127551078Speter if (error != 0) 127651078Speter goto out; 127751078Speter /* 127851078Speter * XXX we should goto open_top if comparam() slept. 127951078Speter */ 128051078Speter if (com->hasfifo) { 1281102542Sphk int i; 128251078Speter /* 128351078Speter * (Re)enable and drain fifos. 128451078Speter * 128551078Speter * Certain SMC chips cause problems if the fifos 128651078Speter * are enabled while input is ready. Turn off the 128751078Speter * fifo if necessary to clear the input. We test 128851078Speter * the input ready bit after enabling the fifos 128951078Speter * since we've already enabled them in comparam() 129051078Speter * and to handle races between enabling and fresh 129151078Speter * input. 129251078Speter */ 1293102542Sphk for (i = 0; i < 500; i++) { 129460471Snyan sio_setreg(com, com_fifo, 129560471Snyan FIFO_RCV_RST | FIFO_XMT_RST 129660471Snyan | com->fifo_image); 129751078Speter /* 129851078Speter * XXX the delays are for superstitious 129951078Speter * historical reasons. It must be less than 130051078Speter * the character time at the maximum 130151078Speter * supported speed (87 usec at 115200 bps 130251078Speter * 8N1). Otherwise we might loop endlessly 130351078Speter * if data is streaming in. We used to use 130451078Speter * delays of 100. That usually worked 130551078Speter * because DELAY(100) used to usually delay 130651078Speter * for about 85 usec instead of 100. 130751078Speter */ 130851078Speter DELAY(50); 130951078Speter if (!(inb(com->line_status_port) & LSR_RXRDY)) 131051078Speter break; 131160471Snyan sio_setreg(com, com_fifo, 0); 131251078Speter DELAY(50); 131351078Speter (void) inb(com->data_port); 131451078Speter } 1315102542Sphk if (i == 500) { 1316102542Sphk error = EIO; 1317102542Sphk goto out; 1318102542Sphk } 131951078Speter } 132051078Speter 132172200Sbmilekic mtx_lock_spin(&sio_lock); 132251078Speter (void) inb(com->line_status_port); 132351078Speter (void) inb(com->data_port); 132451078Speter com->prev_modem_status = com->last_modem_status 132551078Speter = inb(com->modem_status_port); 1326120189Sbde outb(com->int_ctl_port, 1327120189Sbde IER_ERXRDY | IER_ERLS | IER_EMSC 1328120189Sbde | (COM_IIR_TXRDYBUG(com->flags) ? 0 : IER_ETXRDY)); 132972200Sbmilekic mtx_unlock_spin(&sio_lock); 133051078Speter /* 133151078Speter * Handle initial DCD. Callout devices get a fake initial 133251078Speter * DCD (trapdoor DCD). If we are callout, then any sleeping 133351078Speter * callin opens get woken up and resume sleeping on "siobi" 133451078Speter * instead of "siodcd". 133551078Speter */ 133651078Speter /* 133751078Speter * XXX `mynor & CALLOUT_MASK' should be 133851078Speter * `tp->t_cflag & (SOFT_CARRIER | TRAPDOOR_CARRIER) where 133951078Speter * TRAPDOOR_CARRIER is the default initial state for callout 134051078Speter * devices and SOFT_CARRIER is like CLOCAL except it hides 134151078Speter * the true carrier. 134251078Speter */ 134351078Speter if (com->prev_modem_status & MSR_DCD || mynor & CALLOUT_MASK) 134451078Speter (*linesw[tp->t_line].l_modem)(tp, 1); 134551078Speter } 134651078Speter /* 134751078Speter * Wait for DCD if necessary. 134851078Speter */ 134951078Speter if (!(tp->t_state & TS_CARR_ON) && !(mynor & CALLOUT_MASK) 135051078Speter && !(tp->t_cflag & CLOCAL) && !(flag & O_NONBLOCK)) { 135151078Speter ++com->wopeners; 135251078Speter error = tsleep(TSA_CARR_ON(tp), TTIPRI | PCATCH, "siodcd", 0); 135351078Speter if (com_addr(unit) == NULL) 135451078Speter return (ENXIO); 135551078Speter --com->wopeners; 135651078Speter if (error != 0 || com->gone) 135751078Speter goto out; 135851078Speter goto open_top; 135951078Speter } 136051078Speter error = (*linesw[tp->t_line].l_open)(dev, tp); 136151078Speter disc_optim(tp, &tp->t_termios, com); 136251078Speter if (tp->t_state & TS_ISOPEN && mynor & CALLOUT_MASK) 136351078Speter com->active_out = TRUE; 136451078Speter siosettimeout(); 136551078Speterout: 136651078Speter splx(s); 136751078Speter if (!(tp->t_state & TS_ISOPEN) && com->wopeners == 0) 136851078Speter comhardclose(com); 136951078Speter return (error); 137051078Speter} 137151078Speter 137251078Speterstatic int 137383366Sjuliansioclose(dev, flag, mode, td) 137451078Speter dev_t dev; 137551078Speter int flag; 137651078Speter int mode; 137783366Sjulian struct thread *td; 137851078Speter{ 137951078Speter struct com_s *com; 138051078Speter int mynor; 138151078Speter int s; 138251078Speter struct tty *tp; 138351078Speter 138451078Speter mynor = minor(dev); 138551078Speter if (mynor & CONTROL_MASK) 138651078Speter return (0); 138751078Speter com = com_addr(MINOR_TO_UNIT(mynor)); 138857915Simp if (com == NULL) 138957915Simp return (ENODEV); 139051078Speter tp = com->tp; 139151078Speter s = spltty(); 139251078Speter (*linesw[tp->t_line].l_close)(tp, flag); 139351078Speter disc_optim(tp, &tp->t_termios, com); 139451654Sphk comstop(tp, FREAD | FWRITE); 139551078Speter comhardclose(com); 139651078Speter ttyclose(tp); 139751078Speter siosettimeout(); 139851078Speter splx(s); 139951078Speter if (com->gone) { 140051078Speter printf("sio%d: gone\n", com->unit); 140151078Speter s = spltty(); 140251078Speter if (com->ibuf != NULL) 140351078Speter free(com->ibuf, M_DEVBUF); 140451078Speter bzero(tp, sizeof *tp); 140551078Speter splx(s); 140651078Speter } 140751078Speter return (0); 140851078Speter} 140951078Speter 141051078Speterstatic void 141151078Spetercomhardclose(com) 141251078Speter struct com_s *com; 141351078Speter{ 141451078Speter int s; 141551078Speter struct tty *tp; 141651078Speter 141751078Speter s = spltty(); 141851078Speter com->poll = FALSE; 141951078Speter com->poll_output = FALSE; 142051078Speter com->do_timestamp = FALSE; 142151078Speter com->do_dcd_timestamp = FALSE; 142251078Speter com->pps.ppsparam.mode = 0; 142360471Snyan sio_setreg(com, com_cfcr, com->cfcr_image &= ~CFCR_SBREAK); 142478504Siedowse tp = com->tp; 142578504Siedowse 142678504Siedowse#if defined(DDB) && (defined(BREAK_TO_DEBUGGER) || \ 142778504Siedowse defined(ALT_BREAK_TO_DEBUGGER)) 142878504Siedowse /* 142978504Siedowse * Leave interrupts enabled and don't clear DTR if this is the 143078504Siedowse * console. This allows us to detect break-to-debugger events 143178504Siedowse * while the console device is closed. 143278504Siedowse */ 143378504Siedowse if (com->unit != comconsole) 143478504Siedowse#endif 143551078Speter { 143660471Snyan sio_setreg(com, com_ier, 0); 143751078Speter if (tp->t_cflag & HUPCL 143851078Speter /* 143951078Speter * XXX we will miss any carrier drop between here and the 144051078Speter * next open. Perhaps we should watch DCD even when the 144151078Speter * port is closed; it is not sufficient to check it at 144251078Speter * the next open because it might go up and down while 144351078Speter * we're not watching. 144451078Speter */ 144551078Speter || (!com->active_out 144651078Speter && !(com->prev_modem_status & MSR_DCD) 144751078Speter && !(com->it_in.c_cflag & CLOCAL)) 144851078Speter || !(tp->t_state & TS_ISOPEN)) { 144951078Speter (void)commctl(com, TIOCM_DTR, DMBIC); 145051078Speter if (com->dtr_wait != 0 && !(com->state & CS_DTR_OFF)) { 145151078Speter timeout(siodtrwakeup, com, com->dtr_wait); 145251078Speter com->state |= CS_DTR_OFF; 145351078Speter } 145451078Speter } 145551078Speter } 145651078Speter if (com->hasfifo) { 145751078Speter /* 145851078Speter * Disable fifos so that they are off after controlled 145951078Speter * reboots. Some BIOSes fail to detect 16550s when the 146051078Speter * fifos are enabled. 146151078Speter */ 146260471Snyan sio_setreg(com, com_fifo, 0); 146351078Speter } 146451078Speter com->active_out = FALSE; 146551078Speter wakeup(&com->active_out); 146651078Speter wakeup(TSA_CARR_ON(tp)); /* restart any wopeners */ 146751078Speter splx(s); 146851078Speter} 146951078Speter 147051078Speterstatic int 147151078Spetersioread(dev, uio, flag) 147251078Speter dev_t dev; 147351078Speter struct uio *uio; 147451078Speter int flag; 147551078Speter{ 147651078Speter int mynor; 147751078Speter struct com_s *com; 147851078Speter 147951078Speter mynor = minor(dev); 148051078Speter if (mynor & CONTROL_MASK) 148151078Speter return (ENODEV); 148251078Speter com = com_addr(MINOR_TO_UNIT(mynor)); 148357915Simp if (com == NULL || com->gone) 148451078Speter return (ENODEV); 148551078Speter return ((*linesw[com->tp->t_line].l_read)(com->tp, uio, flag)); 148651078Speter} 148751078Speter 148851078Speterstatic int 148951078Spetersiowrite(dev, uio, flag) 149051078Speter dev_t dev; 149151078Speter struct uio *uio; 149251078Speter int flag; 149351078Speter{ 149451078Speter int mynor; 149551078Speter struct com_s *com; 149651078Speter int unit; 149751078Speter 149851078Speter mynor = minor(dev); 149951078Speter if (mynor & CONTROL_MASK) 150051078Speter return (ENODEV); 150151078Speter 150251078Speter unit = MINOR_TO_UNIT(mynor); 150351078Speter com = com_addr(unit); 150457915Simp if (com == NULL || com->gone) 150551078Speter return (ENODEV); 150651078Speter /* 150751078Speter * (XXX) We disallow virtual consoles if the physical console is 150851078Speter * a serial port. This is in case there is a display attached that 150951078Speter * is not the console. In that situation we don't need/want the X 151051078Speter * server taking over the console. 151151078Speter */ 151251078Speter if (constty != NULL && unit == comconsole) 151351078Speter constty = NULL; 151451078Speter return ((*linesw[com->tp->t_line].l_write)(com->tp, uio, flag)); 151551078Speter} 151651078Speter 151751078Speterstatic void 151851078Spetersiobusycheck(chan) 151951078Speter void *chan; 152051078Speter{ 152151078Speter struct com_s *com; 152251078Speter int s; 152351078Speter 152451078Speter com = (struct com_s *)chan; 152551078Speter 152651078Speter /* 152751078Speter * Clear TS_BUSY if low-level output is complete. 152851078Speter * spl locking is sufficient because siointr1() does not set CS_BUSY. 152951078Speter * If siointr1() clears CS_BUSY after we look at it, then we'll get 153051078Speter * called again. Reading the line status port outside of siointr1() 153151078Speter * is safe because CS_BUSY is clear so there are no output interrupts 153251078Speter * to lose. 153351078Speter */ 153451078Speter s = spltty(); 153551078Speter if (com->state & CS_BUSY) 153651078Speter com->extra_state &= ~CSE_BUSYCHECK; /* False alarm. */ 153751078Speter else if ((inb(com->line_status_port) & (LSR_TSRE | LSR_TXRDY)) 153851078Speter == (LSR_TSRE | LSR_TXRDY)) { 153951078Speter com->tp->t_state &= ~TS_BUSY; 154051078Speter ttwwakeup(com->tp); 154151078Speter com->extra_state &= ~CSE_BUSYCHECK; 154251078Speter } else 154351078Speter timeout(siobusycheck, com, hz / 100); 154451078Speter splx(s); 154551078Speter} 154651078Speter 154789986Sjhaystatic u_int 154889986Sjhaysiodivisor(rclk, speed) 154989986Sjhay u_long rclk; 155089986Sjhay speed_t speed; 155189986Sjhay{ 155289986Sjhay long actual_speed; 155389986Sjhay u_int divisor; 155489986Sjhay int error; 155589986Sjhay 1556114334Speter if (speed == 0) 155789986Sjhay return (0); 1558114334Speter#if UINT_MAX > (ULONG_MAX - 1) / 8 1559114334Speter if (speed > (ULONG_MAX - 1) / 8) 1560114334Speter return (0); 1561114334Speter#endif 156289986Sjhay divisor = (rclk / (8UL * speed) + 1) / 2; 156389986Sjhay if (divisor == 0 || divisor >= 65536) 156489986Sjhay return (0); 156589986Sjhay actual_speed = rclk / (16UL * divisor); 156689986Sjhay 156789986Sjhay /* 10 times error in percent: */ 156889986Sjhay error = ((actual_speed - (long)speed) * 2000 / (long)speed + 1) / 2; 156989986Sjhay 157089986Sjhay /* 3.0% maximum error tolerance: */ 157189986Sjhay if (error < -30 || error > 30) 157289986Sjhay return (0); 157389986Sjhay 157489986Sjhay return (divisor); 157589986Sjhay} 157689986Sjhay 157751078Speterstatic void 157851078Spetersiodtrwakeup(chan) 157951078Speter void *chan; 158051078Speter{ 158151078Speter struct com_s *com; 158251078Speter 158351078Speter com = (struct com_s *)chan; 158451078Speter com->state &= ~CS_DTR_OFF; 158551078Speter wakeup(&com->dtr_wait); 158651078Speter} 158751078Speter 158865557Sjasone/* 158970174Sjhb * Call this function with the sio_lock mutex held. It will return with the 159070174Sjhb * lock still held. 159165557Sjasone */ 159251078Speterstatic void 159351078Spetersioinput(com) 159451078Speter struct com_s *com; 159551078Speter{ 159651078Speter u_char *buf; 159751078Speter int incc; 159851078Speter u_char line_status; 159951078Speter int recv_data; 160051078Speter struct tty *tp; 160151078Speter 160251078Speter buf = com->ibuf; 160351078Speter tp = com->tp; 160451078Speter if (!(tp->t_state & TS_ISOPEN) || !(tp->t_cflag & CREAD)) { 160551078Speter com_events -= (com->iptr - com->ibuf); 160651078Speter com->iptr = com->ibuf; 160751078Speter return; 160851078Speter } 160951078Speter if (tp->t_state & TS_CAN_BYPASS_L_RINT) { 161051078Speter /* 161151078Speter * Avoid the grotesquely inefficient lineswitch routine 161251078Speter * (ttyinput) in "raw" mode. It usually takes about 450 161351078Speter * instructions (that's without canonical processing or echo!). 161451078Speter * slinput is reasonably fast (usually 40 instructions plus 161551078Speter * call overhead). 161651078Speter */ 161751078Speter do { 161865557Sjasone /* 161965557Sjasone * This may look odd, but it is using save-and-enable 162065557Sjasone * semantics instead of the save-and-disable semantics 162165557Sjasone * that are used everywhere else. 162265557Sjasone */ 162372200Sbmilekic mtx_unlock_spin(&sio_lock); 162451078Speter incc = com->iptr - buf; 162551078Speter if (tp->t_rawq.c_cc + incc > tp->t_ihiwat 162651078Speter && (com->state & CS_RTS_IFLOW 162751078Speter || tp->t_iflag & IXOFF) 162851078Speter && !(tp->t_state & TS_TBLOCK)) 162951078Speter ttyblock(tp); 163051078Speter com->delta_error_counts[CE_TTY_BUF_OVERFLOW] 163151078Speter += b_to_q((char *)buf, incc, &tp->t_rawq); 163251078Speter buf += incc; 163351078Speter tk_nin += incc; 163451078Speter tk_rawcc += incc; 163551078Speter tp->t_rawcc += incc; 163651078Speter ttwakeup(tp); 163751078Speter if (tp->t_state & TS_TTSTOP 163851078Speter && (tp->t_iflag & IXANY 163951078Speter || tp->t_cc[VSTART] == tp->t_cc[VSTOP])) { 164051078Speter tp->t_state &= ~TS_TTSTOP; 164151078Speter tp->t_lflag &= ~FLUSHO; 164251078Speter comstart(tp); 164351078Speter } 164472200Sbmilekic mtx_lock_spin(&sio_lock); 164551078Speter } while (buf < com->iptr); 164651078Speter } else { 164751078Speter do { 164865557Sjasone /* 164965557Sjasone * This may look odd, but it is using save-and-enable 165065557Sjasone * semantics instead of the save-and-disable semantics 165165557Sjasone * that are used everywhere else. 165265557Sjasone */ 165372200Sbmilekic mtx_unlock_spin(&sio_lock); 165451078Speter line_status = buf[com->ierroff]; 165551078Speter recv_data = *buf++; 165651078Speter if (line_status 165751078Speter & (LSR_BI | LSR_FE | LSR_OE | LSR_PE)) { 165851078Speter if (line_status & LSR_BI) 165951078Speter recv_data |= TTY_BI; 166051078Speter if (line_status & LSR_FE) 166151078Speter recv_data |= TTY_FE; 166251078Speter if (line_status & LSR_OE) 166351078Speter recv_data |= TTY_OE; 166451078Speter if (line_status & LSR_PE) 166551078Speter recv_data |= TTY_PE; 166651078Speter } 166751078Speter (*linesw[tp->t_line].l_rint)(recv_data, tp); 166872200Sbmilekic mtx_lock_spin(&sio_lock); 166951078Speter } while (buf < com->iptr); 167051078Speter } 167151078Speter com_events -= (com->iptr - com->ibuf); 167251078Speter com->iptr = com->ibuf; 167351078Speter 167451078Speter /* 167551078Speter * There is now room for another low-level buffer full of input, 167651078Speter * so enable RTS if it is now disabled and there is room in the 167751078Speter * high-level buffer. 167851078Speter */ 167951078Speter if ((com->state & CS_RTS_IFLOW) && !(com->mcr_image & MCR_RTS) && 168051078Speter !(tp->t_state & TS_TBLOCK)) 168151078Speter outb(com->modem_ctl_port, com->mcr_image |= MCR_RTS); 168251078Speter} 168351078Speter 1684104094Sphkstatic void 168551078Spetersiointr(arg) 168651078Speter void *arg; 168751078Speter{ 168870174Sjhb struct com_s *com; 168970174Sjhb 169051078Speter#ifndef COM_MULTIPORT 169170174Sjhb com = (struct com_s *)arg; 169270174Sjhb 169372200Sbmilekic mtx_lock_spin(&sio_lock); 169470174Sjhb siointr1(com); 169572200Sbmilekic mtx_unlock_spin(&sio_lock); 169651078Speter#else /* COM_MULTIPORT */ 169751078Speter bool_t possibly_more_intrs; 169851078Speter int unit; 169951078Speter 170051078Speter /* 170151078Speter * Loop until there is no activity on any port. This is necessary 170251078Speter * to get an interrupt edge more than to avoid another interrupt. 170351078Speter * If the IRQ signal is just an OR of the IRQ signals from several 170451078Speter * devices, then the edge from one may be lost because another is 170551078Speter * on. 170651078Speter */ 170772200Sbmilekic mtx_lock_spin(&sio_lock); 170851078Speter do { 170951078Speter possibly_more_intrs = FALSE; 171053344Speter for (unit = 0; unit < sio_numunits; ++unit) { 171151078Speter com = com_addr(unit); 171251078Speter /* 171351078Speter * XXX COM_LOCK(); 171451078Speter * would it work here, or be counter-productive? 171551078Speter */ 171651078Speter if (com != NULL 171751078Speter && !com->gone 171851078Speter && (inb(com->int_id_port) & IIR_IMASK) 171951078Speter != IIR_NOPEND) { 172051078Speter siointr1(com); 172151078Speter possibly_more_intrs = TRUE; 172251078Speter } 172351078Speter /* XXX COM_UNLOCK(); */ 172451078Speter } 172551078Speter } while (possibly_more_intrs); 172672200Sbmilekic mtx_unlock_spin(&sio_lock); 172751078Speter#endif /* COM_MULTIPORT */ 172851078Speter} 172951078Speter 173093466Sbdestatic struct timespec siots[8192]; 173193466Sbdestatic int siotso; 173293466Sbdestatic int volatile siotsunit = -1; 173393466Sbde 173493466Sbdestatic int 173593466Sbdesysctl_siots(SYSCTL_HANDLER_ARGS) 173693466Sbde{ 173793466Sbde char buf[128]; 173893466Sbde long long delta; 173993466Sbde size_t len; 174093466Sbde int error, i; 174193466Sbde 174293466Sbde for (i = 1; i < siotso; i++) { 174393466Sbde delta = (long long)(siots[i].tv_sec - siots[i - 1].tv_sec) * 174493466Sbde 1000000000 + 174593466Sbde (siots[i].tv_nsec - siots[i - 1].tv_nsec); 174693466Sbde len = sprintf(buf, "%lld\n", delta); 174793466Sbde if (delta >= 110000) 174893466Sbde len += sprintf(buf + len - 1, ": *** %ld.%09ld\n", 174993466Sbde (long)siots[i].tv_sec, siots[i].tv_nsec); 175093466Sbde if (i == siotso - 1) 175193466Sbde buf[len - 1] = '\0'; 175293466Sbde error = SYSCTL_OUT(req, buf, len); 175393466Sbde if (error != 0) 175493466Sbde return (error); 175593466Sbde uio_yield(); 175693466Sbde } 175793466Sbde return (0); 175893466Sbde} 175993466Sbde 176093466SbdeSYSCTL_PROC(_machdep, OID_AUTO, siots, CTLTYPE_STRING | CTLFLAG_RD, 176193466Sbde 0, 0, sysctl_siots, "A", "sio timestamps"); 176293466Sbde 176351078Speterstatic void 176451078Spetersiointr1(com) 176551078Speter struct com_s *com; 176651078Speter{ 1767120189Sbde u_char int_ctl; 1768120189Sbde u_char int_ctl_new; 176951078Speter u_char line_status; 177051078Speter u_char modem_status; 177151078Speter u_char *ioptr; 177251078Speter u_char recv_data; 177351078Speter 1774120091Sbde if (COM_IIR_TXRDYBUG(com->flags)) { 1775120189Sbde int_ctl = inb(com->int_ctl_port); 1776120091Sbde int_ctl_new = int_ctl; 1777120091Sbde } else { 1778120091Sbde int_ctl = 0; 1779120091Sbde int_ctl_new = 0; 1780120091Sbde } 178151078Speter 178251078Speter while (!com->gone) { 178351078Speter if (com->pps.ppsparam.mode & PPS_CAPTUREBOTH) { 178451078Speter modem_status = inb(com->modem_status_port); 1785111613Sphk if ((modem_status ^ com->last_modem_status) & 1786111613Sphk com->pps_bit) { 178795523Sphk pps_capture(&com->pps); 1788111613Sphk pps_event(&com->pps, 1789111616Sphk (modem_status & com->pps_bit) ? 179051078Speter PPS_CAPTUREASSERT : PPS_CAPTURECLEAR); 179151078Speter } 179251078Speter } 179351078Speter line_status = inb(com->line_status_port); 179451078Speter 179551078Speter /* input event? (check first to help avoid overruns) */ 179651078Speter while (line_status & LSR_RCV_MASK) { 179751078Speter /* break/unnattached error bits or real input? */ 179851078Speter if (!(line_status & LSR_RXRDY)) 179951078Speter recv_data = 0; 180051078Speter else 180151078Speter recv_data = inb(com->data_port); 1802119485Snjl#ifdef DDB 1803119485Snjl#ifdef ALT_BREAK_TO_DEBUGGER 1804119485Snjl if (com->unit == comconsole && 1805119485Snjl db_alt_break(recv_data, &com->alt_brk_state) != 0) 1806119485Snjl breakpoint(); 1807119485Snjl#endif /* ALT_BREAK_TO_DEBUGGER */ 1808119485Snjl#endif /* DDB */ 180951078Speter if (line_status & (LSR_BI | LSR_FE | LSR_PE)) { 181051078Speter /* 181151078Speter * Don't store BI if IGNBRK or FE/PE if IGNPAR. 181251078Speter * Otherwise, push the work to a higher level 181351078Speter * (to handle PARMRK) if we're bypassing. 181451078Speter * Otherwise, convert BI/FE and PE+INPCK to 0. 181551078Speter * 181651078Speter * This makes bypassing work right in the 181751078Speter * usual "raw" case (IGNBRK set, and IGNPAR 181851078Speter * and INPCK clear). 181951078Speter * 182051078Speter * Note: BI together with FE/PE means just BI. 182151078Speter */ 182251078Speter if (line_status & LSR_BI) { 182351078Speter#if defined(DDB) && defined(BREAK_TO_DEBUGGER) 182451078Speter if (com->unit == comconsole) { 182551078Speter breakpoint(); 182651078Speter goto cont; 182751078Speter } 182851078Speter#endif 182951078Speter if (com->tp == NULL 183051078Speter || com->tp->t_iflag & IGNBRK) 183151078Speter goto cont; 183251078Speter } else { 183351078Speter if (com->tp == NULL 183451078Speter || com->tp->t_iflag & IGNPAR) 183551078Speter goto cont; 183651078Speter } 183751078Speter if (com->tp->t_state & TS_CAN_BYPASS_L_RINT 183851078Speter && (line_status & (LSR_BI | LSR_FE) 183951078Speter || com->tp->t_iflag & INPCK)) 184051078Speter recv_data = 0; 184151078Speter } 184251078Speter ++com->bytes_in; 184351078Speter if (com->hotchar != 0 && recv_data == com->hotchar) 184488900Sjhb swi_sched(sio_fast_ih, 0); 184551078Speter ioptr = com->iptr; 184651078Speter if (ioptr >= com->ibufend) 184751078Speter CE_RECORD(com, CE_INTERRUPT_BUF_OVERFLOW); 184851078Speter else { 184951078Speter if (com->do_timestamp) 185051078Speter microtime(&com->timestamp); 185151078Speter ++com_events; 185272238Sjhb swi_sched(sio_slow_ih, SWI_DELAY); 185351078Speter#if 0 /* for testing input latency vs efficiency */ 185451078Speterif (com->iptr - com->ibuf == 8) 185588900Sjhb swi_sched(sio_fast_ih, 0); 185651078Speter#endif 185751078Speter ioptr[0] = recv_data; 185851078Speter ioptr[com->ierroff] = line_status; 185951078Speter com->iptr = ++ioptr; 186051078Speter if (ioptr == com->ihighwater 186151078Speter && com->state & CS_RTS_IFLOW) 186251078Speter outb(com->modem_ctl_port, 186351078Speter com->mcr_image &= ~MCR_RTS); 186451078Speter if (line_status & LSR_OE) 186551078Speter CE_RECORD(com, CE_OVERRUN); 186651078Speter } 186751078Spetercont: 186851078Speter /* 186951078Speter * "& 0x7F" is to avoid the gcc-1.40 generating a slow 187051078Speter * jump from the top of the loop to here 187151078Speter */ 187251078Speter line_status = inb(com->line_status_port) & 0x7F; 187351078Speter } 187451078Speter 187551078Speter /* modem status change? (always check before doing output) */ 187651078Speter modem_status = inb(com->modem_status_port); 187751078Speter if (modem_status != com->last_modem_status) { 187851078Speter if (com->do_dcd_timestamp 187951078Speter && !(com->last_modem_status & MSR_DCD) 188051078Speter && modem_status & MSR_DCD) 188151078Speter microtime(&com->dcd_timestamp); 188251078Speter 188351078Speter /* 188451078Speter * Schedule high level to handle DCD changes. Note 188551078Speter * that we don't use the delta bits anywhere. Some 188651078Speter * UARTs mess them up, and it's easy to remember the 188751078Speter * previous bits and calculate the delta. 188851078Speter */ 188951078Speter com->last_modem_status = modem_status; 189051078Speter if (!(com->state & CS_CHECKMSR)) { 189151078Speter com_events += LOTS_OF_EVENTS; 189251078Speter com->state |= CS_CHECKMSR; 189388900Sjhb swi_sched(sio_fast_ih, 0); 189451078Speter } 189551078Speter 189651078Speter /* handle CTS change immediately for crisp flow ctl */ 189751078Speter if (com->state & CS_CTS_OFLOW) { 189851078Speter if (modem_status & MSR_CTS) 189951078Speter com->state |= CS_ODEVREADY; 190051078Speter else 190151078Speter com->state &= ~CS_ODEVREADY; 190251078Speter } 190351078Speter } 190451078Speter 190551078Speter /* output queued and everything ready? */ 190651078Speter if (line_status & LSR_TXRDY 190751078Speter && com->state >= (CS_BUSY | CS_TTGO | CS_ODEVREADY)) { 190851078Speter ioptr = com->obufq.l_head; 190993466Sbde if (com->tx_fifo_size > 1 && com->unit != siotsunit) { 191051078Speter u_int ocount; 191151078Speter 191251078Speter ocount = com->obufq.l_tail - ioptr; 191351078Speter if (ocount > com->tx_fifo_size) 191451078Speter ocount = com->tx_fifo_size; 191551078Speter com->bytes_out += ocount; 191651078Speter do 191751078Speter outb(com->data_port, *ioptr++); 191851078Speter while (--ocount != 0); 191951078Speter } else { 192051078Speter outb(com->data_port, *ioptr++); 192151078Speter ++com->bytes_out; 192293466Sbde if (com->unit == siotsunit) { 192393466Sbde nanouptime(&siots[siotso]); 192493466Sbde siotso = (siotso + 1) % 192593466Sbde (sizeof siots / sizeof siots[0]); 192693466Sbde } 192751078Speter } 192851078Speter com->obufq.l_head = ioptr; 1929120189Sbde if (COM_IIR_TXRDYBUG(com->flags)) 193051078Speter int_ctl_new = int_ctl | IER_ETXRDY; 193151078Speter if (ioptr >= com->obufq.l_tail) { 193251078Speter struct lbq *qp; 193351078Speter 193451078Speter qp = com->obufq.l_next; 193551078Speter qp->l_queued = FALSE; 193651078Speter qp = qp->l_next; 193751078Speter if (qp != NULL) { 193851078Speter com->obufq.l_head = qp->l_head; 193951078Speter com->obufq.l_tail = qp->l_tail; 194051078Speter com->obufq.l_next = qp; 194151078Speter } else { 194251078Speter /* output just completed */ 1943120189Sbde if (COM_IIR_TXRDYBUG(com->flags)) 1944120189Sbde int_ctl_new = int_ctl 1945120189Sbde & ~IER_ETXRDY; 194651078Speter com->state &= ~CS_BUSY; 194751078Speter } 194851078Speter if (!(com->state & CS_ODONE)) { 194951078Speter com_events += LOTS_OF_EVENTS; 195051078Speter com->state |= CS_ODONE; 195167551Sjhb /* handle at high level ASAP */ 195288900Sjhb swi_sched(sio_fast_ih, 0); 195351078Speter } 195451078Speter } 1955120189Sbde if (COM_IIR_TXRDYBUG(com->flags) 1956120189Sbde && int_ctl != int_ctl_new) 1957120189Sbde outb(com->int_ctl_port, int_ctl_new); 195851078Speter } 195951078Speter 196051078Speter /* finished? */ 196151078Speter#ifndef COM_MULTIPORT 196251078Speter if ((inb(com->int_id_port) & IIR_IMASK) == IIR_NOPEND) 196351078Speter#endif /* COM_MULTIPORT */ 196451078Speter return; 196551078Speter } 196651078Speter} 196751078Speter 196851078Speterstatic int 196983366Sjuliansioioctl(dev, cmd, data, flag, td) 197051078Speter dev_t dev; 197151078Speter u_long cmd; 197251078Speter caddr_t data; 197351078Speter int flag; 197483366Sjulian struct thread *td; 197551078Speter{ 197651078Speter struct com_s *com; 197751078Speter int error; 197851078Speter int mynor; 197951078Speter int s; 198051078Speter struct tty *tp; 198151078Speter#if defined(COMPAT_43) || defined(COMPAT_SUNOS) 198251078Speter u_long oldcmd; 198351078Speter struct termios term; 198451078Speter#endif 198551078Speter 198651078Speter mynor = minor(dev); 198751078Speter com = com_addr(MINOR_TO_UNIT(mynor)); 198857915Simp if (com == NULL || com->gone) 198951078Speter return (ENODEV); 199051078Speter if (mynor & CONTROL_MASK) { 199151078Speter struct termios *ct; 199251078Speter 199351078Speter switch (mynor & CONTROL_MASK) { 199451078Speter case CONTROL_INIT_STATE: 199551078Speter ct = mynor & CALLOUT_MASK ? &com->it_out : &com->it_in; 199651078Speter break; 199751078Speter case CONTROL_LOCK_STATE: 199851078Speter ct = mynor & CALLOUT_MASK ? &com->lt_out : &com->lt_in; 199951078Speter break; 200051078Speter default: 200151078Speter return (ENODEV); /* /dev/nodev */ 200251078Speter } 200351078Speter switch (cmd) { 200451078Speter case TIOCSETA: 200593593Sjhb error = suser(td); 200651078Speter if (error != 0) 200751078Speter return (error); 200851078Speter *ct = *(struct termios *)data; 200951078Speter return (0); 201051078Speter case TIOCGETA: 201151078Speter *(struct termios *)data = *ct; 201251078Speter return (0); 201351078Speter case TIOCGETD: 201451078Speter *(int *)data = TTYDISC; 201551078Speter return (0); 201651078Speter case TIOCGWINSZ: 201751078Speter bzero(data, sizeof(struct winsize)); 201851078Speter return (0); 201951078Speter default: 202051078Speter return (ENOTTY); 202151078Speter } 202251078Speter } 202351078Speter tp = com->tp; 202451078Speter#if defined(COMPAT_43) || defined(COMPAT_SUNOS) 202551078Speter term = tp->t_termios; 202651078Speter oldcmd = cmd; 202751078Speter error = ttsetcompat(tp, &cmd, data, &term); 202851078Speter if (error != 0) 202951078Speter return (error); 203051078Speter if (cmd != oldcmd) 203151078Speter data = (caddr_t)&term; 203251078Speter#endif 203351078Speter if (cmd == TIOCSETA || cmd == TIOCSETAW || cmd == TIOCSETAF) { 203451078Speter int cc; 203551078Speter struct termios *dt = (struct termios *)data; 203651078Speter struct termios *lt = mynor & CALLOUT_MASK 203751078Speter ? &com->lt_out : &com->lt_in; 203851078Speter 203951078Speter dt->c_iflag = (tp->t_iflag & lt->c_iflag) 204051078Speter | (dt->c_iflag & ~lt->c_iflag); 204151078Speter dt->c_oflag = (tp->t_oflag & lt->c_oflag) 204251078Speter | (dt->c_oflag & ~lt->c_oflag); 204351078Speter dt->c_cflag = (tp->t_cflag & lt->c_cflag) 204451078Speter | (dt->c_cflag & ~lt->c_cflag); 204551078Speter dt->c_lflag = (tp->t_lflag & lt->c_lflag) 204651078Speter | (dt->c_lflag & ~lt->c_lflag); 204751078Speter for (cc = 0; cc < NCCS; ++cc) 204851078Speter if (lt->c_cc[cc] != 0) 204951078Speter dt->c_cc[cc] = tp->t_cc[cc]; 205051078Speter if (lt->c_ispeed != 0) 205151078Speter dt->c_ispeed = tp->t_ispeed; 205251078Speter if (lt->c_ospeed != 0) 205351078Speter dt->c_ospeed = tp->t_ospeed; 205451078Speter } 205583366Sjulian error = (*linesw[tp->t_line].l_ioctl)(tp, cmd, data, flag, td); 205651078Speter if (error != ENOIOCTL) 205751078Speter return (error); 205851078Speter s = spltty(); 205951078Speter error = ttioctl(tp, cmd, data, flag); 206051078Speter disc_optim(tp, &tp->t_termios, com); 206151078Speter if (error != ENOIOCTL) { 206251078Speter splx(s); 206351078Speter return (error); 206451078Speter } 206551078Speter switch (cmd) { 206651078Speter case TIOCSBRK: 206760471Snyan sio_setreg(com, com_cfcr, com->cfcr_image |= CFCR_SBREAK); 206851078Speter break; 206951078Speter case TIOCCBRK: 207060471Snyan sio_setreg(com, com_cfcr, com->cfcr_image &= ~CFCR_SBREAK); 207151078Speter break; 207251078Speter case TIOCSDTR: 207351078Speter (void)commctl(com, TIOCM_DTR, DMBIS); 207451078Speter break; 207551078Speter case TIOCCDTR: 207651078Speter (void)commctl(com, TIOCM_DTR, DMBIC); 207751078Speter break; 207851078Speter /* 207951078Speter * XXX should disallow changing MCR_RTS if CS_RTS_IFLOW is set. The 208051078Speter * changes get undone on the next call to comparam(). 208151078Speter */ 208251078Speter case TIOCMSET: 208351078Speter (void)commctl(com, *(int *)data, DMSET); 208451078Speter break; 208551078Speter case TIOCMBIS: 208651078Speter (void)commctl(com, *(int *)data, DMBIS); 208751078Speter break; 208851078Speter case TIOCMBIC: 208951078Speter (void)commctl(com, *(int *)data, DMBIC); 209051078Speter break; 209151078Speter case TIOCMGET: 209251078Speter *(int *)data = commctl(com, 0, DMGET); 209351078Speter break; 209451078Speter case TIOCMSDTRWAIT: 209551078Speter /* must be root since the wait applies to following logins */ 209693593Sjhb error = suser(td); 209751078Speter if (error != 0) { 209851078Speter splx(s); 209951078Speter return (error); 210051078Speter } 210151078Speter com->dtr_wait = *(int *)data * hz / 100; 210251078Speter break; 210351078Speter case TIOCMGDTRWAIT: 210451078Speter *(int *)data = com->dtr_wait * 100 / hz; 210551078Speter break; 210651078Speter case TIOCTIMESTAMP: 210751078Speter com->do_timestamp = TRUE; 210851078Speter *(struct timeval *)data = com->timestamp; 210951078Speter break; 211051078Speter case TIOCDCDTIMESTAMP: 211151078Speter com->do_dcd_timestamp = TRUE; 211251078Speter *(struct timeval *)data = com->dcd_timestamp; 211351078Speter break; 211451078Speter default: 211551078Speter splx(s); 211651078Speter error = pps_ioctl(cmd, data, &com->pps); 211751078Speter if (error == ENODEV) 211851078Speter error = ENOTTY; 211951078Speter return (error); 212051078Speter } 212151078Speter splx(s); 212251078Speter return (0); 212351078Speter} 212451078Speter 212565557Sjasone/* software interrupt handler for SWI_TTY */ 212651078Speterstatic void 212767551Sjhbsiopoll(void *dummy) 212851078Speter{ 212951078Speter int unit; 213051078Speter 213151078Speter if (com_events == 0) 213251078Speter return; 213351078Speterrepeat: 213453344Speter for (unit = 0; unit < sio_numunits; ++unit) { 213551078Speter struct com_s *com; 213651078Speter int incc; 213751078Speter struct tty *tp; 213851078Speter 213951078Speter com = com_addr(unit); 214051078Speter if (com == NULL) 214151078Speter continue; 214251078Speter tp = com->tp; 214351078Speter if (tp == NULL || com->gone) { 214451078Speter /* 214551078Speter * Discard any events related to never-opened or 214651078Speter * going-away devices. 214751078Speter */ 214872200Sbmilekic mtx_lock_spin(&sio_lock); 214951078Speter incc = com->iptr - com->ibuf; 215051078Speter com->iptr = com->ibuf; 215151078Speter if (com->state & CS_CHECKMSR) { 215251078Speter incc += LOTS_OF_EVENTS; 215351078Speter com->state &= ~CS_CHECKMSR; 215451078Speter } 215551078Speter com_events -= incc; 215672200Sbmilekic mtx_unlock_spin(&sio_lock); 215751078Speter continue; 215851078Speter } 215951078Speter if (com->iptr != com->ibuf) { 216072200Sbmilekic mtx_lock_spin(&sio_lock); 216151078Speter sioinput(com); 216272200Sbmilekic mtx_unlock_spin(&sio_lock); 216351078Speter } 216451078Speter if (com->state & CS_CHECKMSR) { 216551078Speter u_char delta_modem_status; 216651078Speter 216772200Sbmilekic mtx_lock_spin(&sio_lock); 216851078Speter delta_modem_status = com->last_modem_status 216951078Speter ^ com->prev_modem_status; 217051078Speter com->prev_modem_status = com->last_modem_status; 217151078Speter com_events -= LOTS_OF_EVENTS; 217251078Speter com->state &= ~CS_CHECKMSR; 217372200Sbmilekic mtx_unlock_spin(&sio_lock); 217451078Speter if (delta_modem_status & MSR_DCD) 217551078Speter (*linesw[tp->t_line].l_modem) 217651078Speter (tp, com->prev_modem_status & MSR_DCD); 217751078Speter } 217851078Speter if (com->state & CS_ODONE) { 217972200Sbmilekic mtx_lock_spin(&sio_lock); 218051078Speter com_events -= LOTS_OF_EVENTS; 218151078Speter com->state &= ~CS_ODONE; 218272200Sbmilekic mtx_unlock_spin(&sio_lock); 218351078Speter if (!(com->state & CS_BUSY) 218451078Speter && !(com->extra_state & CSE_BUSYCHECK)) { 218551078Speter timeout(siobusycheck, com, hz / 100); 218651078Speter com->extra_state |= CSE_BUSYCHECK; 218751078Speter } 218851078Speter (*linesw[tp->t_line].l_start)(tp); 218951078Speter } 219051078Speter if (com_events == 0) 219151078Speter break; 219251078Speter } 219351078Speter if (com_events >= LOTS_OF_EVENTS) 219451078Speter goto repeat; 219551078Speter} 219651078Speter 219751078Speterstatic int 219851078Spetercomparam(tp, t) 219951078Speter struct tty *tp; 220051078Speter struct termios *t; 220151078Speter{ 220251078Speter u_int cfcr; 220351078Speter int cflag; 220451078Speter struct com_s *com; 220589986Sjhay u_int divisor; 220651078Speter u_char dlbh; 220751078Speter u_char dlbl; 2208120159Sbde u_char efr_flowbits; 220951078Speter int s; 221051078Speter int unit; 221151078Speter 221289986Sjhay unit = DEV_TO_UNIT(tp->t_dev); 221389986Sjhay com = com_addr(unit); 221489986Sjhay if (com == NULL) 221589986Sjhay return (ENODEV); 221689986Sjhay 221751078Speter /* do historical conversions */ 221851078Speter if (t->c_ispeed == 0) 221951078Speter t->c_ispeed = t->c_ospeed; 222051078Speter 222151078Speter /* check requested parameters */ 222289986Sjhay if (t->c_ospeed == 0) 222389986Sjhay divisor = 0; 222489986Sjhay else { 222589986Sjhay if (t->c_ispeed != t->c_ospeed) 222689986Sjhay return (EINVAL); 222789986Sjhay divisor = siodivisor(com->rclk, t->c_ispeed); 222889986Sjhay if (divisor == 0) 222989986Sjhay return (EINVAL); 223089986Sjhay } 223151078Speter 223251078Speter /* parameters are OK, convert them to the com struct and the device */ 223351078Speter s = spltty(); 223451078Speter if (divisor == 0) 223551078Speter (void)commctl(com, TIOCM_DTR, DMBIC); /* hang up line */ 223651078Speter else 223751078Speter (void)commctl(com, TIOCM_DTR, DMBIS); 223851078Speter cflag = t->c_cflag; 223951078Speter switch (cflag & CSIZE) { 224051078Speter case CS5: 224151078Speter cfcr = CFCR_5BITS; 224251078Speter break; 224351078Speter case CS6: 224451078Speter cfcr = CFCR_6BITS; 224551078Speter break; 224651078Speter case CS7: 224751078Speter cfcr = CFCR_7BITS; 224851078Speter break; 224951078Speter default: 225051078Speter cfcr = CFCR_8BITS; 225151078Speter break; 225251078Speter } 225351078Speter if (cflag & PARENB) { 225451078Speter cfcr |= CFCR_PENAB; 225551078Speter if (!(cflag & PARODD)) 225651078Speter cfcr |= CFCR_PEVEN; 225751078Speter } 225851078Speter if (cflag & CSTOPB) 225951078Speter cfcr |= CFCR_STOPB; 226051078Speter 226151078Speter if (com->hasfifo && divisor != 0) { 226251078Speter /* 226351078Speter * Use a fifo trigger level low enough so that the input 226451078Speter * latency from the fifo is less than about 16 msec and 226551078Speter * the total latency is less than about 30 msec. These 226651078Speter * latencies are reasonable for humans. Serial comms 226751078Speter * protocols shouldn't expect anything better since modem 226851078Speter * latencies are larger. 226988433Sdillon * 227088433Sdillon * The fifo trigger level cannot be set at RX_HIGH for high 227188433Sdillon * speed connections without further work on reducing 227288433Sdillon * interrupt disablement times in other parts of the system, 227388433Sdillon * without producing silo overflow errors. 227451078Speter */ 227593466Sbde com->fifo_image = com->unit == siotsunit ? 0 227693466Sbde : t->c_ospeed <= 4800 227788451Stanimura ? FIFO_ENABLE : FIFO_ENABLE | FIFO_RX_MEDH; 227851078Speter#ifdef COM_ESP 227951078Speter /* 228051078Speter * The Hayes ESP card needs the fifo DMA mode bit set 228151078Speter * in compatibility mode. If not, it will interrupt 228251078Speter * for each character received. 228351078Speter */ 228451078Speter if (com->esp) 228551078Speter com->fifo_image |= FIFO_DMA_MODE; 228651078Speter#endif 228760471Snyan sio_setreg(com, com_fifo, com->fifo_image); 228851078Speter } 228951078Speter 229065605Sjhb /* 229165605Sjhb * This returns with interrupts disabled so that we can complete 229265605Sjhb * the speed change atomically. Keeping interrupts disabled is 229365605Sjhb * especially important while com_data is hidden. 229465605Sjhb */ 229565605Sjhb (void) siosetwater(com, t->c_ispeed); 229665557Sjasone 229751078Speter if (divisor != 0) { 229860471Snyan sio_setreg(com, com_cfcr, cfcr | CFCR_DLAB); 229951078Speter /* 230051078Speter * Only set the divisor registers if they would change, 230151078Speter * since on some 16550 incompatibles (UMC8669F), setting 230251078Speter * them while input is arriving them loses sync until 230351078Speter * data stops arriving. 230451078Speter */ 230551078Speter dlbl = divisor & 0xFF; 230660471Snyan if (sio_getreg(com, com_dlbl) != dlbl) 230760471Snyan sio_setreg(com, com_dlbl, dlbl); 230889986Sjhay dlbh = divisor >> 8; 230960471Snyan if (sio_getreg(com, com_dlbh) != dlbh) 231060471Snyan sio_setreg(com, com_dlbh, dlbh); 231151078Speter } 231251078Speter 231351078Speter if (!(tp->t_state & TS_TTSTOP)) 231451078Speter com->state |= CS_TTGO; 2315120159Sbde efr_flowbits = 0; 231651078Speter 231751078Speter if (cflag & CRTS_IFLOW) { 231851078Speter com->state |= CS_RTS_IFLOW; 2319120159Sbde efr_flowbits |= EFR_AUTORTS; 232051078Speter /* 232151078Speter * If CS_RTS_IFLOW just changed from off to on, the change 232251078Speter * needs to be propagated to MCR_RTS. This isn't urgent, 232351078Speter * so do it later by calling comstart() instead of repeating 232451078Speter * a lot of code from comstart() here. 232551078Speter */ 232651078Speter } else if (com->state & CS_RTS_IFLOW) { 232751078Speter com->state &= ~CS_RTS_IFLOW; 232851078Speter /* 232951078Speter * CS_RTS_IFLOW just changed from on to off. Force MCR_RTS 233051078Speter * on here, since comstart() won't do it later. 233151078Speter */ 233251078Speter outb(com->modem_ctl_port, com->mcr_image |= MCR_RTS); 233351078Speter } 233451078Speter 233551078Speter /* 233651078Speter * Set up state to handle output flow control. 233751078Speter * XXX - worth handling MDMBUF (DCD) flow control at the lowest level? 233851078Speter * Now has 10+ msec latency, while CTS flow has 50- usec latency. 233951078Speter */ 234051078Speter com->state |= CS_ODEVREADY; 234151078Speter com->state &= ~CS_CTS_OFLOW; 234251078Speter if (cflag & CCTS_OFLOW) { 234351078Speter com->state |= CS_CTS_OFLOW; 2344120159Sbde efr_flowbits |= EFR_AUTOCTS; 234551078Speter if (!(com->last_modem_status & MSR_CTS)) 234651078Speter com->state &= ~CS_ODEVREADY; 234751078Speter } 234851078Speter 2349120159Sbde if (com->st16650a) { 2350120159Sbde sio_setreg(com, com_lcr, LCR_EFR_ENABLE); 2351120159Sbde sio_setreg(com, com_efr, 2352120159Sbde (sio_getreg(com, com_efr) 2353120159Sbde & ~(EFR_AUTOCTS | EFR_AUTORTS)) | efr_flowbits); 2354120159Sbde } 2355120159Sbde sio_setreg(com, com_cfcr, com->cfcr_image = cfcr); 235651078Speter 235751078Speter /* XXX shouldn't call functions while intrs are disabled. */ 235851078Speter disc_optim(tp, t, com); 235951078Speter /* 236051078Speter * Recover from fiddling with CS_TTGO. We used to call siointr1() 236151078Speter * unconditionally, but that defeated the careful discarding of 236251078Speter * stale input in sioopen(). 236351078Speter */ 236451078Speter if (com->state >= (CS_BUSY | CS_TTGO)) 236551078Speter siointr1(com); 236651078Speter 236772200Sbmilekic mtx_unlock_spin(&sio_lock); 236851078Speter splx(s); 236951078Speter comstart(tp); 237051078Speter if (com->ibufold != NULL) { 237151078Speter free(com->ibufold, M_DEVBUF); 237251078Speter com->ibufold = NULL; 237351078Speter } 237451078Speter return (0); 237551078Speter} 237651078Speter 237765605Sjhb/* 237870174Sjhb * This function must be called with the sio_lock mutex released and will 237970174Sjhb * return with it obtained. 238065605Sjhb */ 238151078Speterstatic int 238265605Sjhbsiosetwater(com, speed) 238351078Speter struct com_s *com; 238451078Speter speed_t speed; 238551078Speter{ 238651078Speter int cp4ticks; 238751078Speter u_char *ibuf; 238851078Speter int ibufsize; 238951078Speter struct tty *tp; 239051078Speter 239151078Speter /* 239251078Speter * Make the buffer size large enough to handle a softtty interrupt 239351078Speter * latency of about 2 ticks without loss of throughput or data 239451078Speter * (about 3 ticks if input flow control is not used or not honoured, 239551078Speter * but a bit less for CS5-CS7 modes). 239651078Speter */ 239751078Speter cp4ticks = speed / 10 / hz * 4; 239851078Speter for (ibufsize = 128; ibufsize < cp4ticks;) 239951078Speter ibufsize <<= 1; 240065605Sjhb if (ibufsize == com->ibufsize) { 240172200Sbmilekic mtx_lock_spin(&sio_lock); 240251078Speter return (0); 240365605Sjhb } 240451078Speter 240551078Speter /* 240651078Speter * Allocate input buffer. The extra factor of 2 in the size is 240751078Speter * to allow for an error byte for each input byte. 240851078Speter */ 240951078Speter ibuf = malloc(2 * ibufsize, M_DEVBUF, M_NOWAIT); 241065605Sjhb if (ibuf == NULL) { 241172200Sbmilekic mtx_lock_spin(&sio_lock); 241251078Speter return (ENOMEM); 241365605Sjhb } 241451078Speter 241551078Speter /* Initialize non-critical variables. */ 241651078Speter com->ibufold = com->ibuf; 241751078Speter com->ibufsize = ibufsize; 241851078Speter tp = com->tp; 241951078Speter if (tp != NULL) { 242051078Speter tp->t_ififosize = 2 * ibufsize; 242151078Speter tp->t_ispeedwat = (speed_t)-1; 242251078Speter tp->t_ospeedwat = (speed_t)-1; 242351078Speter } 242451078Speter 242551078Speter /* 242651078Speter * Read current input buffer, if any. Continue with interrupts 242751078Speter * disabled. 242851078Speter */ 242972200Sbmilekic mtx_lock_spin(&sio_lock); 243051078Speter if (com->iptr != com->ibuf) 243151078Speter sioinput(com); 243251078Speter 243351078Speter /*- 243451078Speter * Initialize critical variables, including input buffer watermarks. 243551078Speter * The external device is asked to stop sending when the buffer 243651078Speter * exactly reaches high water, or when the high level requests it. 243751078Speter * The high level is notified immediately (rather than at a later 243851078Speter * clock tick) when this watermark is reached. 243951078Speter * The buffer size is chosen so the watermark should almost never 244051078Speter * be reached. 244151078Speter * The low watermark is invisibly 0 since the buffer is always 244251078Speter * emptied all at once. 244351078Speter */ 244451078Speter com->iptr = com->ibuf = ibuf; 244551078Speter com->ibufend = ibuf + ibufsize; 244651078Speter com->ierroff = ibufsize; 244751078Speter com->ihighwater = ibuf + 3 * ibufsize / 4; 244851078Speter return (0); 244951078Speter} 245051078Speter 245151078Speterstatic void 245251078Spetercomstart(tp) 245351078Speter struct tty *tp; 245451078Speter{ 245551078Speter struct com_s *com; 245651078Speter int s; 245751078Speter int unit; 245851078Speter 245951078Speter unit = DEV_TO_UNIT(tp->t_dev); 246051078Speter com = com_addr(unit); 246157915Simp if (com == NULL) 246257915Simp return; 246351078Speter s = spltty(); 246472200Sbmilekic mtx_lock_spin(&sio_lock); 246551078Speter if (tp->t_state & TS_TTSTOP) 246651078Speter com->state &= ~CS_TTGO; 246751078Speter else 246851078Speter com->state |= CS_TTGO; 246951078Speter if (tp->t_state & TS_TBLOCK) { 247051078Speter if (com->mcr_image & MCR_RTS && com->state & CS_RTS_IFLOW) 247151078Speter outb(com->modem_ctl_port, com->mcr_image &= ~MCR_RTS); 247251078Speter } else { 247351078Speter if (!(com->mcr_image & MCR_RTS) && com->iptr < com->ihighwater 247451078Speter && com->state & CS_RTS_IFLOW) 247551078Speter outb(com->modem_ctl_port, com->mcr_image |= MCR_RTS); 247651078Speter } 247772200Sbmilekic mtx_unlock_spin(&sio_lock); 247851078Speter if (tp->t_state & (TS_TIMEOUT | TS_TTSTOP)) { 247951078Speter ttwwakeup(tp); 248051078Speter splx(s); 248151078Speter return; 248251078Speter } 248351078Speter if (tp->t_outq.c_cc != 0) { 248451078Speter struct lbq *qp; 248551078Speter struct lbq *next; 248651078Speter 248751078Speter if (!com->obufs[0].l_queued) { 248851078Speter com->obufs[0].l_tail 248951078Speter = com->obuf1 + q_to_b(&tp->t_outq, com->obuf1, 249051078Speter sizeof com->obuf1); 249151078Speter com->obufs[0].l_next = NULL; 249251078Speter com->obufs[0].l_queued = TRUE; 249372200Sbmilekic mtx_lock_spin(&sio_lock); 249451078Speter if (com->state & CS_BUSY) { 249551078Speter qp = com->obufq.l_next; 249651078Speter while ((next = qp->l_next) != NULL) 249751078Speter qp = next; 249851078Speter qp->l_next = &com->obufs[0]; 249951078Speter } else { 250051078Speter com->obufq.l_head = com->obufs[0].l_head; 250151078Speter com->obufq.l_tail = com->obufs[0].l_tail; 250251078Speter com->obufq.l_next = &com->obufs[0]; 250351078Speter com->state |= CS_BUSY; 250451078Speter } 250572200Sbmilekic mtx_unlock_spin(&sio_lock); 250651078Speter } 250751078Speter if (tp->t_outq.c_cc != 0 && !com->obufs[1].l_queued) { 250851078Speter com->obufs[1].l_tail 250951078Speter = com->obuf2 + q_to_b(&tp->t_outq, com->obuf2, 251051078Speter sizeof com->obuf2); 251151078Speter com->obufs[1].l_next = NULL; 251251078Speter com->obufs[1].l_queued = TRUE; 251372200Sbmilekic mtx_lock_spin(&sio_lock); 251451078Speter if (com->state & CS_BUSY) { 251551078Speter qp = com->obufq.l_next; 251651078Speter while ((next = qp->l_next) != NULL) 251751078Speter qp = next; 251851078Speter qp->l_next = &com->obufs[1]; 251951078Speter } else { 252051078Speter com->obufq.l_head = com->obufs[1].l_head; 252151078Speter com->obufq.l_tail = com->obufs[1].l_tail; 252251078Speter com->obufq.l_next = &com->obufs[1]; 252351078Speter com->state |= CS_BUSY; 252451078Speter } 252572200Sbmilekic mtx_unlock_spin(&sio_lock); 252651078Speter } 252751078Speter tp->t_state |= TS_BUSY; 252851078Speter } 252972200Sbmilekic mtx_lock_spin(&sio_lock); 253051078Speter if (com->state >= (CS_BUSY | CS_TTGO)) 253151078Speter siointr1(com); /* fake interrupt to start output */ 253272200Sbmilekic mtx_unlock_spin(&sio_lock); 253351078Speter ttwwakeup(tp); 253451078Speter splx(s); 253551078Speter} 253651078Speter 253751078Speterstatic void 253851654Sphkcomstop(tp, rw) 253951078Speter struct tty *tp; 254051078Speter int rw; 254151078Speter{ 254251078Speter struct com_s *com; 254351078Speter 254451078Speter com = com_addr(DEV_TO_UNIT(tp->t_dev)); 254557915Simp if (com == NULL || com->gone) 254651078Speter return; 254772200Sbmilekic mtx_lock_spin(&sio_lock); 254851078Speter if (rw & FWRITE) { 254951078Speter if (com->hasfifo) 255051078Speter#ifdef COM_ESP 255151078Speter /* XXX avoid h/w bug. */ 255251078Speter if (!com->esp) 255351078Speter#endif 255460471Snyan sio_setreg(com, com_fifo, 255560471Snyan FIFO_XMT_RST | com->fifo_image); 255651078Speter com->obufs[0].l_queued = FALSE; 255751078Speter com->obufs[1].l_queued = FALSE; 255851078Speter if (com->state & CS_ODONE) 255951078Speter com_events -= LOTS_OF_EVENTS; 256051078Speter com->state &= ~(CS_ODONE | CS_BUSY); 256151078Speter com->tp->t_state &= ~TS_BUSY; 256251078Speter } 256351078Speter if (rw & FREAD) { 256451078Speter if (com->hasfifo) 256551078Speter#ifdef COM_ESP 256651078Speter /* XXX avoid h/w bug. */ 256751078Speter if (!com->esp) 256851078Speter#endif 256960471Snyan sio_setreg(com, com_fifo, 257060471Snyan FIFO_RCV_RST | com->fifo_image); 257151078Speter com_events -= (com->iptr - com->ibuf); 257251078Speter com->iptr = com->ibuf; 257351078Speter } 257472200Sbmilekic mtx_unlock_spin(&sio_lock); 257551078Speter comstart(tp); 257651078Speter} 257751078Speter 257851078Speterstatic int 257951078Spetercommctl(com, bits, how) 258051078Speter struct com_s *com; 258151078Speter int bits; 258251078Speter int how; 258351078Speter{ 258451078Speter int mcr; 258551078Speter int msr; 258651078Speter 258751078Speter if (how == DMGET) { 258851078Speter bits = TIOCM_LE; /* XXX - always enabled while open */ 258951078Speter mcr = com->mcr_image; 259051078Speter if (mcr & MCR_DTR) 259151078Speter bits |= TIOCM_DTR; 259251078Speter if (mcr & MCR_RTS) 259351078Speter bits |= TIOCM_RTS; 259451078Speter msr = com->prev_modem_status; 259551078Speter if (msr & MSR_CTS) 259651078Speter bits |= TIOCM_CTS; 259751078Speter if (msr & MSR_DCD) 259851078Speter bits |= TIOCM_CD; 259951078Speter if (msr & MSR_DSR) 260051078Speter bits |= TIOCM_DSR; 260151078Speter /* 260251078Speter * XXX - MSR_RI is naturally volatile, and we make MSR_TERI 260351078Speter * more volatile by reading the modem status a lot. Perhaps 260451078Speter * we should latch both bits until the status is read here. 260551078Speter */ 260651078Speter if (msr & (MSR_RI | MSR_TERI)) 260751078Speter bits |= TIOCM_RI; 260851078Speter return (bits); 260951078Speter } 261051078Speter mcr = 0; 261151078Speter if (bits & TIOCM_DTR) 261251078Speter mcr |= MCR_DTR; 261351078Speter if (bits & TIOCM_RTS) 261451078Speter mcr |= MCR_RTS; 261551078Speter if (com->gone) 261651078Speter return(0); 261772200Sbmilekic mtx_lock_spin(&sio_lock); 261851078Speter switch (how) { 261951078Speter case DMSET: 262051078Speter outb(com->modem_ctl_port, 262151078Speter com->mcr_image = mcr | (com->mcr_image & MCR_IENABLE)); 262251078Speter break; 262351078Speter case DMBIS: 262451078Speter outb(com->modem_ctl_port, com->mcr_image |= mcr); 262551078Speter break; 262651078Speter case DMBIC: 262751078Speter outb(com->modem_ctl_port, com->mcr_image &= ~mcr); 262851078Speter break; 262951078Speter } 263072200Sbmilekic mtx_unlock_spin(&sio_lock); 263151078Speter return (0); 263251078Speter} 263351078Speter 263451078Speterstatic void 263551078Spetersiosettimeout() 263651078Speter{ 263751078Speter struct com_s *com; 263851078Speter bool_t someopen; 263951078Speter int unit; 264051078Speter 264151078Speter /* 264251078Speter * Set our timeout period to 1 second if no polled devices are open. 264351078Speter * Otherwise set it to max(1/200, 1/hz). 264451078Speter * Enable timeouts iff some device is open. 264551078Speter */ 264651078Speter untimeout(comwakeup, (void *)NULL, sio_timeout_handle); 264751078Speter sio_timeout = hz; 264851078Speter someopen = FALSE; 264953344Speter for (unit = 0; unit < sio_numunits; ++unit) { 265051078Speter com = com_addr(unit); 265151078Speter if (com != NULL && com->tp != NULL 265251078Speter && com->tp->t_state & TS_ISOPEN && !com->gone) { 265351078Speter someopen = TRUE; 265451078Speter if (com->poll || com->poll_output) { 265551078Speter sio_timeout = hz > 200 ? hz / 200 : 1; 265651078Speter break; 265751078Speter } 265851078Speter } 265951078Speter } 266051078Speter if (someopen) { 266151078Speter sio_timeouts_until_log = hz / sio_timeout; 266251078Speter sio_timeout_handle = timeout(comwakeup, (void *)NULL, 266351078Speter sio_timeout); 266451078Speter } else { 266551078Speter /* Flush error messages, if any. */ 266651078Speter sio_timeouts_until_log = 1; 266751078Speter comwakeup((void *)NULL); 266851078Speter untimeout(comwakeup, (void *)NULL, sio_timeout_handle); 266951078Speter } 267051078Speter} 267151078Speter 267251078Speterstatic void 267351078Spetercomwakeup(chan) 267451078Speter void *chan; 267551078Speter{ 267651078Speter struct com_s *com; 267751078Speter int unit; 267851078Speter 267951078Speter sio_timeout_handle = timeout(comwakeup, (void *)NULL, sio_timeout); 268051078Speter 268151078Speter /* 268251078Speter * Recover from lost output interrupts. 268351078Speter * Poll any lines that don't use interrupts. 268451078Speter */ 268553344Speter for (unit = 0; unit < sio_numunits; ++unit) { 268651078Speter com = com_addr(unit); 268751078Speter if (com != NULL && !com->gone 268851078Speter && (com->state >= (CS_BUSY | CS_TTGO) || com->poll)) { 268972200Sbmilekic mtx_lock_spin(&sio_lock); 269051078Speter siointr1(com); 269172200Sbmilekic mtx_unlock_spin(&sio_lock); 269251078Speter } 269351078Speter } 269451078Speter 269551078Speter /* 269651078Speter * Check for and log errors, but not too often. 269751078Speter */ 269851078Speter if (--sio_timeouts_until_log > 0) 269951078Speter return; 270051078Speter sio_timeouts_until_log = hz / sio_timeout; 270153344Speter for (unit = 0; unit < sio_numunits; ++unit) { 270251078Speter int errnum; 270351078Speter 270451078Speter com = com_addr(unit); 270551078Speter if (com == NULL) 270651078Speter continue; 270751078Speter if (com->gone) 270851078Speter continue; 270951078Speter for (errnum = 0; errnum < CE_NTYPES; ++errnum) { 271051078Speter u_int delta; 271151078Speter u_long total; 271251078Speter 271372200Sbmilekic mtx_lock_spin(&sio_lock); 271451078Speter delta = com->delta_error_counts[errnum]; 271551078Speter com->delta_error_counts[errnum] = 0; 271672200Sbmilekic mtx_unlock_spin(&sio_lock); 271751078Speter if (delta == 0) 271851078Speter continue; 271951078Speter total = com->error_counts[errnum] += delta; 272051078Speter log(LOG_ERR, "sio%d: %u more %s%s (total %lu)\n", 272151078Speter unit, delta, error_desc[errnum], 272251078Speter delta == 1 ? "" : "s", total); 272351078Speter } 272451078Speter } 272551078Speter} 272651078Speter 272751078Speterstatic void 272851078Speterdisc_optim(tp, t, com) 272951078Speter struct tty *tp; 273051078Speter struct termios *t; 273151078Speter struct com_s *com; 273251078Speter{ 273351078Speter if (!(t->c_iflag & (ICRNL | IGNCR | IMAXBEL | INLCR | ISTRIP | IXON)) 273451078Speter && (!(t->c_iflag & BRKINT) || (t->c_iflag & IGNBRK)) 273551078Speter && (!(t->c_iflag & PARMRK) 273651078Speter || (t->c_iflag & (IGNPAR | IGNBRK)) == (IGNPAR | IGNBRK)) 273751078Speter && !(t->c_lflag & (ECHO | ICANON | IEXTEN | ISIG | PENDIN)) 273851078Speter && linesw[tp->t_line].l_rint == ttyinput) 273951078Speter tp->t_state |= TS_CAN_BYPASS_L_RINT; 274051078Speter else 274151078Speter tp->t_state &= ~TS_CAN_BYPASS_L_RINT; 274251078Speter com->hotchar = linesw[tp->t_line].l_hotchar; 274351078Speter} 274451078Speter 274551078Speter/* 274651078Speter * Following are all routines needed for SIO to act as console 274751078Speter */ 274851078Speterstruct siocnstate { 274951078Speter u_char dlbl; 275051078Speter u_char dlbh; 275151078Speter u_char ier; 275251078Speter u_char cfcr; 275351078Speter u_char mcr; 275451078Speter}; 275551078Speter 2756120457Sphk/* 2757120457Sphk * This is a function in order to not replicate "ttyd%d" more 2758120457Sphk * places than absolutely necessary. 2759120457Sphk */ 2760120457Sphkstatic void 2761120457Sphksiocnset(struct consdev *cd, int unit) 2762120457Sphk{ 2763120457Sphk 2764120457Sphk cd->cn_unit = unit; 2765120457Sphk sprintf(cd->cn_name, "ttyd%d", unit); 2766120457Sphk} 2767120457Sphk 276866230Sjhb#ifndef __alpha__ 276992739Salfredstatic speed_t siocngetspeed(Port_t, u_long rclk); 277066230Sjhb#endif 277193010Sbdestatic void siocnclose(struct siocnstate *sp, Port_t iobase); 277293010Sbdestatic void siocnopen(struct siocnstate *sp, Port_t iobase, int speed); 277393010Sbdestatic void siocntxwait(Port_t iobase); 277451078Speter 277566230Sjhb#ifdef __alpha__ 277692739Salfredint siocnattach(int port, int speed); 277792739Salfredint siogdbattach(int port, int speed); 277892739Salfredint siogdbgetc(void); 277992739Salfredvoid siogdbputc(int c); 278066230Sjhb#else 278151078Speterstatic cn_probe_t siocnprobe; 278251078Speterstatic cn_init_t siocninit; 278385371Sjlemonstatic cn_term_t siocnterm; 278466230Sjhb#endif 278551078Speterstatic cn_checkc_t siocncheckc; 278651078Speterstatic cn_getc_t siocngetc; 278751078Speterstatic cn_putc_t siocnputc; 278851078Speter 278983832Sdfr#ifndef __alpha__ 279085371SjlemonCONS_DRIVER(sio, siocnprobe, siocninit, siocnterm, siocngetc, siocncheckc, 279155823Syokota siocnputc, NULL); 279251078Speter#endif 279351078Speter 279451078Speter#if DDB > 0 2795111194Sphkstatic struct consdev gdbconsdev; 279651078Speter#endif 279751078Speter 279851078Speterstatic void 279951078Spetersiocntxwait(iobase) 280051078Speter Port_t iobase; 280151078Speter{ 280251078Speter int timo; 280351078Speter 280451078Speter /* 280551078Speter * Wait for any pending transmission to finish. Required to avoid 280651078Speter * the UART lockup bug when the speed is changed, and for normal 280751078Speter * transmits. 280851078Speter */ 280951078Speter timo = 100000; 281051078Speter while ((inb(iobase + com_lsr) & (LSR_TSRE | LSR_TXRDY)) 281151078Speter != (LSR_TSRE | LSR_TXRDY) && --timo != 0) 281251078Speter ; 281351078Speter} 281451078Speter 281566230Sjhb#ifndef __alpha__ 281666230Sjhb 281751078Speter/* 281851078Speter * Read the serial port specified and try to figure out what speed 281951078Speter * it's currently running at. We're assuming the serial port has 282051078Speter * been initialized and is basicly idle. This routine is only intended 282151078Speter * to be run at system startup. 282251078Speter * 282351078Speter * If the value read from the serial port doesn't make sense, return 0. 282451078Speter */ 282551078Speter 282651078Speterstatic speed_t 282789986Sjhaysiocngetspeed(iobase, rclk) 282889986Sjhay Port_t iobase; 282989986Sjhay u_long rclk; 283051078Speter{ 283189986Sjhay u_int divisor; 283251078Speter u_char dlbh; 283351078Speter u_char dlbl; 283451078Speter u_char cfcr; 283551078Speter 283651078Speter cfcr = inb(iobase + com_cfcr); 283751078Speter outb(iobase + com_cfcr, CFCR_DLAB | cfcr); 283851078Speter 283951078Speter dlbl = inb(iobase + com_dlbl); 284051078Speter dlbh = inb(iobase + com_dlbh); 284151078Speter 284251078Speter outb(iobase + com_cfcr, cfcr); 284351078Speter 284489986Sjhay divisor = dlbh << 8 | dlbl; 284551078Speter 284689986Sjhay /* XXX there should be more sanity checking. */ 284789986Sjhay if (divisor == 0) 284889986Sjhay return (CONSPEED); 284989986Sjhay return (rclk / (16UL * divisor)); 285051078Speter} 285151078Speter 285266230Sjhb#endif 285366230Sjhb 285451078Speterstatic void 285551078Spetersiocnopen(sp, iobase, speed) 285651078Speter struct siocnstate *sp; 285751078Speter Port_t iobase; 285851078Speter int speed; 285951078Speter{ 286089986Sjhay u_int divisor; 286151078Speter u_char dlbh; 286251078Speter u_char dlbl; 286351078Speter 286451078Speter /* 286551078Speter * Save all the device control registers except the fifo register 286651078Speter * and set our default ones (cs8 -parenb speed=comdefaultrate). 286751078Speter * We can't save the fifo register since it is read-only. 286851078Speter */ 286951078Speter sp->ier = inb(iobase + com_ier); 287051078Speter outb(iobase + com_ier, 0); /* spltty() doesn't stop siointr() */ 287151078Speter siocntxwait(iobase); 287251078Speter sp->cfcr = inb(iobase + com_cfcr); 287351078Speter outb(iobase + com_cfcr, CFCR_DLAB | CFCR_8BITS); 287451078Speter sp->dlbl = inb(iobase + com_dlbl); 287551078Speter sp->dlbh = inb(iobase + com_dlbh); 287651078Speter /* 287751078Speter * Only set the divisor registers if they would change, since on 287851078Speter * some 16550 incompatibles (Startech), setting them clears the 287951078Speter * data input register. This also reduces the effects of the 288051078Speter * UMC8669F bug. 288151078Speter */ 288289986Sjhay divisor = siodivisor(comdefaultrclk, speed); 288351078Speter dlbl = divisor & 0xFF; 288451078Speter if (sp->dlbl != dlbl) 288551078Speter outb(iobase + com_dlbl, dlbl); 288689986Sjhay dlbh = divisor >> 8; 288751078Speter if (sp->dlbh != dlbh) 288851078Speter outb(iobase + com_dlbh, dlbh); 288951078Speter outb(iobase + com_cfcr, CFCR_8BITS); 289051078Speter sp->mcr = inb(iobase + com_mcr); 289151078Speter /* 289251078Speter * We don't want interrupts, but must be careful not to "disable" 289351078Speter * them by clearing the MCR_IENABLE bit, since that might cause 289451078Speter * an interrupt by floating the IRQ line. 289551078Speter */ 289651078Speter outb(iobase + com_mcr, (sp->mcr & MCR_IENABLE) | MCR_DTR | MCR_RTS); 289751078Speter} 289851078Speter 289951078Speterstatic void 290051078Spetersiocnclose(sp, iobase) 290151078Speter struct siocnstate *sp; 290251078Speter Port_t iobase; 290351078Speter{ 290451078Speter /* 290551078Speter * Restore the device control registers. 290651078Speter */ 290751078Speter siocntxwait(iobase); 290851078Speter outb(iobase + com_cfcr, CFCR_DLAB | CFCR_8BITS); 290951078Speter if (sp->dlbl != inb(iobase + com_dlbl)) 291051078Speter outb(iobase + com_dlbl, sp->dlbl); 291151078Speter if (sp->dlbh != inb(iobase + com_dlbh)) 291251078Speter outb(iobase + com_dlbh, sp->dlbh); 291351078Speter outb(iobase + com_cfcr, sp->cfcr); 291451078Speter /* 291551078Speter * XXX damp oscillations of MCR_DTR and MCR_RTS by not restoring them. 291651078Speter */ 291751078Speter outb(iobase + com_mcr, sp->mcr | MCR_DTR | MCR_RTS); 291851078Speter outb(iobase + com_ier, sp->ier); 291951078Speter} 292051078Speter 292166230Sjhb#ifndef __alpha__ 292266230Sjhb 292351078Speterstatic void 292451078Spetersiocnprobe(cp) 292551078Speter struct consdev *cp; 292651078Speter{ 292751078Speter speed_t boot_speed; 292851078Speter u_char cfcr; 292989986Sjhay u_int divisor; 293051078Speter int s, unit; 293151078Speter struct siocnstate sp; 293251078Speter 293351078Speter /* 293451078Speter * Find our first enabled console, if any. If it is a high-level 293551078Speter * console device, then initialize it and return successfully. 293651078Speter * If it is a low-level console device, then initialize it and 293751078Speter * return unsuccessfully. It must be initialized in both cases 293851078Speter * for early use by console drivers and debuggers. Initializing 293951078Speter * the hardware is not necessary in all cases, since the i/o 294051078Speter * routines initialize it on the fly, but it is necessary if 294151078Speter * input might arrive while the hardware is switched back to an 294251078Speter * uninitialized state. We can't handle multiple console devices 294351078Speter * yet because our low-level routines don't take a device arg. 294451078Speter * We trust the user to set the console flags properly so that we 294551078Speter * don't need to probe. 294651078Speter */ 294751078Speter cp->cn_pri = CN_DEAD; 294851078Speter 294951078Speter for (unit = 0; unit < 16; unit++) { /* XXX need to know how many */ 295051078Speter int flags; 2951117167Sjhb 2952117167Sjhb if (resource_disabled("sio", unit)) 2953117167Sjhb continue; 295451078Speter if (resource_int_value("sio", unit, "flags", &flags)) 295551078Speter continue; 295651078Speter if (COM_CONSOLE(flags) || COM_DEBUGGER(flags)) { 295751078Speter int port; 295851078Speter Port_t iobase; 295951078Speter 296051078Speter if (resource_int_value("sio", unit, "port", &port)) 296151078Speter continue; 296251078Speter iobase = port; 296351078Speter s = spltty(); 296451078Speter if (boothowto & RB_SERIAL) { 296589986Sjhay boot_speed = 296689986Sjhay siocngetspeed(iobase, comdefaultrclk); 296751078Speter if (boot_speed) 296851078Speter comdefaultrate = boot_speed; 296951078Speter } 297051078Speter 297151078Speter /* 297251078Speter * Initialize the divisor latch. We can't rely on 297351078Speter * siocnopen() to do this the first time, since it 297451078Speter * avoids writing to the latch if the latch appears 297551078Speter * to have the correct value. Also, if we didn't 297651078Speter * just read the speed from the hardware, then we 297751078Speter * need to set the speed in hardware so that 297851078Speter * switching it later is null. 297951078Speter */ 298051078Speter cfcr = inb(iobase + com_cfcr); 298151078Speter outb(iobase + com_cfcr, CFCR_DLAB | cfcr); 298289986Sjhay divisor = siodivisor(comdefaultrclk, comdefaultrate); 298389986Sjhay outb(iobase + com_dlbl, divisor & 0xff); 298489986Sjhay outb(iobase + com_dlbh, divisor >> 8); 298551078Speter outb(iobase + com_cfcr, cfcr); 298651078Speter 298751078Speter siocnopen(&sp, iobase, comdefaultrate); 298851078Speter 298951078Speter splx(s); 299051078Speter if (COM_CONSOLE(flags) && !COM_LLCONSOLE(flags)) { 2991120457Sphk siocnset(cp, unit); 299251078Speter cp->cn_pri = COM_FORCECONSOLE(flags) 299351078Speter || boothowto & RB_SERIAL 299451078Speter ? CN_REMOTE : CN_NORMAL; 299551078Speter siocniobase = iobase; 299651078Speter siocnunit = unit; 299751078Speter } 299851078Speter if (COM_DEBUGGER(flags)) { 299951078Speter printf("sio%d: gdb debugging port\n", unit); 300051078Speter siogdbiobase = iobase; 300151078Speter siogdbunit = unit; 300251078Speter#if DDB > 0 3003120457Sphk siocnset(&gdbconsdev, unit); 3004111194Sphk gdb_arg = &gdbconsdev; 300551078Speter gdb_getc = siocngetc; 300651078Speter gdb_putc = siocnputc; 300751078Speter#endif 300851078Speter } 300951078Speter } 301051078Speter } 301151078Speter#ifdef __i386__ 301251078Speter#if DDB > 0 301351078Speter /* 301451078Speter * XXX Ugly Compatability. 301551078Speter * If no gdb port has been specified, set it to be the console 301651078Speter * as some configuration files don't specify the gdb port. 301751078Speter */ 3018111017Sphk if (gdb_arg == NULL && (boothowto & RB_GDB)) { 301951078Speter printf("Warning: no GDB port specified. Defaulting to sio%d.\n", 302051078Speter siocnunit); 302151078Speter printf("Set flag 0x80 on desired GDB port in your\n"); 302251078Speter printf("configuration file (currently sio only).\n"); 302351078Speter siogdbiobase = siocniobase; 302451078Speter siogdbunit = siocnunit; 3025120457Sphk siocnset(&gdbconsdev, siocnunit); 3026111194Sphk gdb_arg = &gdbconsdev; 302751078Speter gdb_getc = siocngetc; 302851078Speter gdb_putc = siocnputc; 302951078Speter } 303051078Speter#endif 303151078Speter#endif 303251078Speter} 303351078Speter 303466230Sjhbstatic void 303566230Sjhbsiocninit(cp) 303666230Sjhb struct consdev *cp; 303766230Sjhb{ 3038120457Sphk comconsole = cp->cn_unit; 303966230Sjhb} 304066230Sjhb 304185371Sjlemonstatic void 304285371Sjlemonsiocnterm(cp) 304385371Sjlemon struct consdev *cp; 304485371Sjlemon{ 304585371Sjlemon comconsole = -1; 304685371Sjlemon} 304785371Sjlemon 304866230Sjhb#endif 304966230Sjhb 305051078Speter#ifdef __alpha__ 305151078Speter 305255868SgallatinCONS_DRIVER(sio, NULL, NULL, NULL, siocngetc, siocncheckc, siocnputc, NULL); 305351078Speter 305451078Speterint 305551078Spetersiocnattach(port, speed) 305651078Speter int port; 305751078Speter int speed; 305851078Speter{ 305951078Speter int s; 306051078Speter u_char cfcr; 306189986Sjhay u_int divisor; 306251078Speter struct siocnstate sp; 306398691Sn_hibma int unit = 0; /* XXX random value! */ 306451078Speter 306551078Speter siocniobase = port; 306698691Sn_hibma siocnunit = unit; 306751078Speter comdefaultrate = speed; 306851078Speter sio_consdev.cn_pri = CN_NORMAL; 3069120457Sphk siocnset(&sio_consdev, unit); 307051078Speter 307151078Speter s = spltty(); 307251078Speter 307351078Speter /* 307451078Speter * Initialize the divisor latch. We can't rely on 307551078Speter * siocnopen() to do this the first time, since it 307651078Speter * avoids writing to the latch if the latch appears 307751078Speter * to have the correct value. Also, if we didn't 307851078Speter * just read the speed from the hardware, then we 307951078Speter * need to set the speed in hardware so that 308051078Speter * switching it later is null. 308151078Speter */ 308251078Speter cfcr = inb(siocniobase + com_cfcr); 308351078Speter outb(siocniobase + com_cfcr, CFCR_DLAB | cfcr); 308489986Sjhay divisor = siodivisor(comdefaultrclk, comdefaultrate); 308589986Sjhay outb(siocniobase + com_dlbl, divisor & 0xff); 308689986Sjhay outb(siocniobase + com_dlbh, divisor >> 8); 308751078Speter outb(siocniobase + com_cfcr, cfcr); 308851078Speter 308951078Speter siocnopen(&sp, siocniobase, comdefaultrate); 309051078Speter splx(s); 309151078Speter 309285426Sjlemon cnadd(&sio_consdev); 309358885Simp return (0); 309451078Speter} 309551078Speter 309651078Speterint 309751078Spetersiogdbattach(port, speed) 309851078Speter int port; 309951078Speter int speed; 310051078Speter{ 310151078Speter int s; 310251078Speter u_char cfcr; 310389986Sjhay u_int divisor; 310451078Speter struct siocnstate sp; 310598691Sn_hibma int unit = 1; /* XXX random value! */ 310651078Speter 310751078Speter siogdbiobase = port; 310851078Speter gdbdefaultrate = speed; 310951078Speter 311065714Sjhb printf("sio%d: gdb debugging port\n", unit); 311165714Sjhb siogdbunit = unit; 311265714Sjhb#if DDB > 0 3113120457Sphk sprintf(gdbconsdev, "ttyd%d", unit); 3114111194Sphk gdb_arg = &gdbconsdev; 311565714Sjhb gdb_getc = siocngetc; 311665714Sjhb gdb_putc = siocnputc; 311765714Sjhb#endif 311865714Sjhb 311951078Speter s = spltty(); 312051078Speter 312151078Speter /* 312251078Speter * Initialize the divisor latch. We can't rely on 312351078Speter * siocnopen() to do this the first time, since it 312451078Speter * avoids writing to the latch if the latch appears 312551078Speter * to have the correct value. Also, if we didn't 312651078Speter * just read the speed from the hardware, then we 312751078Speter * need to set the speed in hardware so that 312851078Speter * switching it later is null. 312951078Speter */ 313051078Speter cfcr = inb(siogdbiobase + com_cfcr); 313151078Speter outb(siogdbiobase + com_cfcr, CFCR_DLAB | cfcr); 313289986Sjhay divisor = siodivisor(comdefaultrclk, gdbdefaultrate); 313389986Sjhay outb(siogdbiobase + com_dlbl, divisor & 0xff); 313489986Sjhay outb(siogdbiobase + com_dlbh, divisor >> 8); 313551078Speter outb(siogdbiobase + com_cfcr, cfcr); 313651078Speter 313751078Speter siocnopen(&sp, siogdbiobase, gdbdefaultrate); 313851078Speter splx(s); 313951078Speter 314058885Simp return (0); 314151078Speter} 314251078Speter 314351078Speter#endif 314451078Speter 314551078Speterstatic int 3146111194Sphksiocncheckc(struct consdev *cd) 314751078Speter{ 314851078Speter int c; 314951078Speter Port_t iobase; 315051078Speter int s; 315151078Speter struct siocnstate sp; 315298401Sn_hibma speed_t speed; 3153111194Sphk 3154120457Sphk if (cd->cn_unit == siocnunit) { 315598401Sn_hibma iobase = siocniobase; 315698401Sn_hibma speed = comdefaultrate; 315798401Sn_hibma } else { 315851078Speter iobase = siogdbiobase; 315998401Sn_hibma speed = gdbdefaultrate; 316098401Sn_hibma } 316151078Speter s = spltty(); 316298401Sn_hibma siocnopen(&sp, iobase, speed); 316351078Speter if (inb(iobase + com_lsr) & LSR_RXRDY) 316451078Speter c = inb(iobase + com_data); 316551078Speter else 316651078Speter c = -1; 316751078Speter siocnclose(&sp, iobase); 316851078Speter splx(s); 316951078Speter return (c); 317051078Speter} 317151078Speter 3172104094Sphkstatic int 3173111194Sphksiocngetc(struct consdev *cd) 317451078Speter{ 317551078Speter int c; 317651078Speter Port_t iobase; 317751078Speter int s; 317851078Speter struct siocnstate sp; 317998401Sn_hibma speed_t speed; 318051078Speter 3181120457Sphk if (cd->cn_unit == siocnunit) { 318298401Sn_hibma iobase = siocniobase; 318398401Sn_hibma speed = comdefaultrate; 318498401Sn_hibma } else { 318551078Speter iobase = siogdbiobase; 318698401Sn_hibma speed = gdbdefaultrate; 318798401Sn_hibma } 318851078Speter s = spltty(); 318998401Sn_hibma siocnopen(&sp, iobase, speed); 319051078Speter while (!(inb(iobase + com_lsr) & LSR_RXRDY)) 319151078Speter ; 319251078Speter c = inb(iobase + com_data); 319351078Speter siocnclose(&sp, iobase); 319451078Speter splx(s); 319551078Speter return (c); 319651078Speter} 319751078Speter 3198104094Sphkstatic void 3199111194Sphksiocnputc(struct consdev *cd, int c) 320051078Speter{ 320188582Sbde int need_unlock; 320251078Speter int s; 320351078Speter struct siocnstate sp; 320451078Speter Port_t iobase; 320598401Sn_hibma speed_t speed; 320651078Speter 3207120457Sphk if (cd->cn_unit == siocnunit) { 320898401Sn_hibma iobase = siocniobase; 320998401Sn_hibma speed = comdefaultrate; 321098401Sn_hibma } else { 321151078Speter iobase = siogdbiobase; 321298401Sn_hibma speed = gdbdefaultrate; 321398401Sn_hibma } 321451078Speter s = spltty(); 321588582Sbde need_unlock = 0; 321688582Sbde if (sio_inited == 2 && !mtx_owned(&sio_lock)) { 321784029Sjlemon mtx_lock_spin(&sio_lock); 321888582Sbde need_unlock = 1; 321988582Sbde } 322098401Sn_hibma siocnopen(&sp, iobase, speed); 322151078Speter siocntxwait(iobase); 322251078Speter outb(iobase + com_data, c); 322351078Speter siocnclose(&sp, iobase); 322488582Sbde if (need_unlock) 322584029Sjlemon mtx_unlock_spin(&sio_lock); 322651078Speter splx(s); 322751078Speter} 322851078Speter 322951078Speter#ifdef __alpha__ 323051078Speterint 323151078Spetersiogdbgetc() 323251078Speter{ 323351078Speter int c; 323451078Speter Port_t iobase; 323598401Sn_hibma speed_t speed; 323651078Speter int s; 323751078Speter struct siocnstate sp; 323851078Speter 323998619Sn_hibma if (siogdbunit == siocnunit) { 324098401Sn_hibma iobase = siocniobase; 324198401Sn_hibma speed = comdefaultrate; 324298401Sn_hibma } else { 324398401Sn_hibma iobase = siogdbiobase; 324498401Sn_hibma speed = gdbdefaultrate; 324598401Sn_hibma } 324698401Sn_hibma 324751078Speter s = spltty(); 324898401Sn_hibma siocnopen(&sp, iobase, speed); 324951078Speter while (!(inb(iobase + com_lsr) & LSR_RXRDY)) 325051078Speter ; 325151078Speter c = inb(iobase + com_data); 325251078Speter siocnclose(&sp, iobase); 325351078Speter splx(s); 325451078Speter return (c); 325551078Speter} 325651078Speter 325751078Spetervoid 325851078Spetersiogdbputc(c) 325951078Speter int c; 326051078Speter{ 326198401Sn_hibma Port_t iobase; 326298401Sn_hibma speed_t speed; 326351078Speter int s; 326451078Speter struct siocnstate sp; 326551078Speter 326698619Sn_hibma if (siogdbunit == siocnunit) { 326798401Sn_hibma iobase = siocniobase; 326898401Sn_hibma speed = comdefaultrate; 326998401Sn_hibma } else { 327098401Sn_hibma iobase = siogdbiobase; 327198401Sn_hibma speed = gdbdefaultrate; 327298401Sn_hibma } 327398401Sn_hibma 327451078Speter s = spltty(); 327598401Sn_hibma siocnopen(&sp, iobase, speed); 327651078Speter siocntxwait(siogdbiobase); 327751078Speter outb(siogdbiobase + com_data, c); 327851078Speter siocnclose(&sp, siogdbiobase); 327951078Speter splx(s); 328051078Speter} 328151078Speter#endif 3282