Annotation of sys/arch/i386/isa/pccom.c, Revision 1.1
1.1 ! nbrk 1: /* $OpenBSD: pccom.c,v 1.61 2007/05/09 14:32:17 deraadt Exp $ */
! 2: /* $NetBSD: com.c,v 1.82.4.1 1996/06/02 09:08:00 mrg Exp $ */
! 3:
! 4: /*
! 5: * Copyright (c) 1997 - 1999, Jason Downs. All rights reserved.
! 6: *
! 7: * Redistribution and use in source and binary forms, with or without
! 8: * modification, are permitted provided that the following conditions
! 9: * are met:
! 10: * 1. Redistributions of source code must retain the above copyright
! 11: * notice, this list of conditions and the following disclaimer.
! 12: * 2. Redistributions in binary form must reproduce the above copyright
! 13: * notice, this list of conditions and the following disclaimer in the
! 14: * documentation and/or other materials provided with the distribution.
! 15: * 3. Neither the name(s) of the author(s) nor the name OpenBSD
! 16: * may be used to endorse or promote products derived from this software
! 17: * without specific prior written permission.
! 18: *
! 19: * THIS SOFTWARE IS PROVIDED BY THE AUTHOR(S) ``AS IS'' AND ANY EXPRESS
! 20: * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
! 21: * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
! 22: * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR(S) BE LIABLE FOR ANY DIRECT,
! 23: * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
! 24: * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
! 25: * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
! 26: * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
! 27: * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
! 28: * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
! 29: * SUCH DAMAGE.
! 30: */
! 31: /*-
! 32: * Copyright (c) 1993, 1994, 1995, 1996
! 33: * Charles M. Hannum. All rights reserved.
! 34: * Copyright (c) 1991 The Regents of the University of California.
! 35: * All rights reserved.
! 36: *
! 37: * Redistribution and use in source and binary forms, with or without
! 38: * modification, are permitted provided that the following conditions
! 39: * are met:
! 40: * 1. Redistributions of source code must retain the above copyright
! 41: * notice, this list of conditions and the following disclaimer.
! 42: * 2. Redistributions in binary form must reproduce the above copyright
! 43: * notice, this list of conditions and the following disclaimer in the
! 44: * documentation and/or other materials provided with the distribution.
! 45: * 3. Neither the name of the University nor the names of its contributors
! 46: * may be used to endorse or promote products derived from this software
! 47: * without specific prior written permission.
! 48: *
! 49: * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
! 50: * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
! 51: * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
! 52: * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
! 53: * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
! 54: * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
! 55: * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
! 56: * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
! 57: * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
! 58: * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
! 59: * SUCH DAMAGE.
! 60: *
! 61: * @(#)com.c 7.5 (Berkeley) 5/16/91
! 62: */
! 63:
! 64: /*
! 65: * PCCOM driver, uses National Semiconductor NS16450/NS16550AF UART
! 66: */
! 67: #include <sys/param.h>
! 68: #include <sys/systm.h>
! 69: #include <sys/ioctl.h>
! 70: #include <sys/selinfo.h>
! 71: #include <sys/tty.h>
! 72: #include <sys/proc.h>
! 73: #include <sys/user.h>
! 74: #include <sys/conf.h>
! 75: #include <sys/file.h>
! 76: #include <sys/uio.h>
! 77: #include <sys/kernel.h>
! 78: #include <sys/syslog.h>
! 79: #include <sys/types.h>
! 80: #include <sys/device.h>
! 81: #include <sys/vnode.h>
! 82: #include <sys/timeout.h>
! 83:
! 84: #include <machine/bus.h>
! 85: #include <machine/intr.h>
! 86:
! 87: #include <dev/cons.h>
! 88: #include <dev/isa/isavar.h>
! 89: #include <dev/ic/comreg.h>
! 90: #include <dev/ic/ns16550reg.h>
! 91: #define com_lcr com_cfcr
! 92: #ifdef DDB
! 93: #include <ddb/db_var.h>
! 94: #endif
! 95:
! 96: #include "pccomvar.h"
! 97: #include "pccom.h"
! 98:
! 99: /* XXX: These belong elsewhere */
! 100: cdev_decl(com);
! 101:
! 102: static u_char tiocm_xxx2mcr(int);
! 103:
! 104: void pccom_xr16850_fifo_init(bus_space_tag_t, bus_space_handle_t);
! 105:
! 106: /*
! 107: * XXX the following two cfattach structs should be different, and possibly
! 108: * XXX elsewhere.
! 109: */
! 110: int comprobe(struct device *, void *, void *);
! 111: void comattach(struct device *, struct device *, void *);
! 112: void compwroff(struct com_softc *);
! 113:
! 114: #if NPCCOM_ISA
! 115: struct cfattach pccom_isa_ca = {
! 116: sizeof(struct com_softc), comprobe, comattach
! 117: };
! 118: #endif
! 119:
! 120: #if NPCCOM_ISAPNP
! 121: struct cfattach pccom_isapnp_ca = {
! 122: sizeof(struct com_softc), comprobe, comattach
! 123: };
! 124: #endif
! 125:
! 126: #if NPCCOM_COMMULTI
! 127: struct cfattach pccom_commulti_ca = {
! 128: sizeof(struct com_softc), comprobe, comattach
! 129: };
! 130: #endif
! 131:
! 132: struct cfdriver pccom_cd = {
! 133: NULL, "pccom", DV_TTY
! 134: };
! 135:
! 136: void cominit(bus_space_tag_t, bus_space_handle_t, int);
! 137:
! 138: #ifndef CONSPEED
! 139: #define CONSPEED B9600
! 140: #endif
! 141:
! 142: #if defined(COMCONSOLE) || defined(PCCOMCONSOLE)
! 143: int comdefaultrate = CONSPEED; /* XXX why set default? */
! 144: #else
! 145: int comdefaultrate = TTYDEF_SPEED;
! 146: #endif
! 147: bus_addr_t comconsaddr;
! 148: int comconsinit;
! 149: int comconsattached;
! 150: bus_space_tag_t comconsiot;
! 151: bus_space_handle_t comconsioh;
! 152: tcflag_t comconscflag = TTYDEF_CFLAG;
! 153:
! 154: int commajor;
! 155: int comsopen = 0;
! 156:
! 157: #ifdef KGDB
! 158: #include <sys/kgdb.h>
! 159:
! 160: bus_addr_t com_kgdb_addr;
! 161: bus_space_tag_t com_kgdb_iot;
! 162: bus_space_handle_t com_kgdb_ioh;
! 163:
! 164: int com_kgdb_getc(void *);
! 165: void com_kgdb_putc(void *, int);
! 166: #endif /* KGDB */
! 167:
! 168: #define DEVUNIT(x) (minor(x) & 0x7f)
! 169: #define DEVCUA(x) (minor(x) & 0x80)
! 170:
! 171: /* Macros for determining bus type. */
! 172: #if NPCCOM_ISA || NPCCOM_PCMCIA
! 173: #define IS_ISA(parent) \
! 174: (!strcmp((parent)->dv_cfdata->cf_driver->cd_name, "isa") || \
! 175: !strcmp((parent)->dv_cfdata->cf_driver->cd_name, "pcmcia"))
! 176: #elif NPCCOM_ISA
! 177: #define IS_ISA(parent) \
! 178: !strcmp((parent)->dv_cfdata->cf_driver->cd_name, "isa")
! 179: #elif NPCCOM_ISAPNP
! 180: #define IS_ISA(parent) 0
! 181: #endif
! 182:
! 183: #if NPCCOM_ISAPNP
! 184: #define IS_ISAPNP(parent) \
! 185: !strcmp((parent)->dv_cfdata->cf_driver->cd_name, "isapnp")
! 186: #else
! 187: #define IS_ISAPNP(parent) 0
! 188: #endif
! 189:
! 190: int
! 191: comspeed(long freq, long speed)
! 192: {
! 193: #define divrnd(n, q) (((n)*2/(q)+1)/2) /* divide and round off */
! 194:
! 195: int x, err;
! 196:
! 197: if (speed == 0)
! 198: return 0;
! 199: if (speed < 0)
! 200: return -1;
! 201: x = divrnd((freq / 16), speed);
! 202: if (x <= 0)
! 203: return -1;
! 204: err = divrnd((quad_t)freq * 1000 / 16, speed * x) - 1000;
! 205: if (err < 0)
! 206: err = -err;
! 207: if (err > COM_TOLERANCE)
! 208: return -1;
! 209: return x;
! 210:
! 211: #undef divrnd
! 212: }
! 213:
! 214: int
! 215: comprobe1(bus_space_tag_t iot, bus_space_handle_t ioh)
! 216: {
! 217: int i, k;
! 218:
! 219: /* force access to id reg */
! 220: bus_space_write_1(iot, ioh, com_lcr, 0);
! 221: bus_space_write_1(iot, ioh, com_iir, 0);
! 222: for (i = 0; i < 32; i++) {
! 223: k = bus_space_read_1(iot, ioh, com_iir);
! 224: if (k & 0x38) {
! 225: bus_space_read_1(iot, ioh, com_data); /* cleanup */
! 226: } else
! 227: break;
! 228: }
! 229: if (i >= 32)
! 230: return 0;
! 231:
! 232: return 1;
! 233: }
! 234:
! 235: int
! 236: comprobe(struct device *parent, void *match, void *aux)
! 237: {
! 238: bus_space_tag_t iot;
! 239: bus_space_handle_t ioh;
! 240: int iobase, needioh;
! 241: int rv = 1;
! 242:
! 243: /*
! 244: * XXX should be broken out into functions for isa probe and
! 245: * XXX for commulti probe, with a helper function that contains
! 246: * XXX most of the interesting stuff.
! 247: */
! 248: /* #if NPCCOM_ISA || NPCCOM_PCMCIA || NPCCOM_ISAPNP */
! 249: #if NPCCOM_ISA || NPCCOM_ISAPNP
! 250: if (IS_ISA(parent) || IS_ISAPNP(parent)) {
! 251: struct isa_attach_args *ia = aux;
! 252:
! 253: iot = ia->ia_iot;
! 254: iobase = ia->ia_iobase;
! 255: if (IS_ISAPNP(parent)) {
! 256: ioh = ia->ia_ioh;
! 257: needioh = 0;
! 258: } else
! 259: needioh = 1;
! 260: } else
! 261: #endif
! 262: #if NPCCOM_COMMULTI
! 263: if (1) {
! 264: struct cfdata *cf = match;
! 265: struct commulti_attach_args *ca = aux;
! 266:
! 267: if (cf->cf_loc[0] != -1 && cf->cf_loc[0] != ca->ca_slave)
! 268: return (0);
! 269:
! 270: iot = ca->ca_iot;
! 271: iobase = ca->ca_iobase;
! 272: ioh = ca->ca_ioh;
! 273: needioh = 0;
! 274: } else
! 275: #endif
! 276: return(0); /* This cannot happen */
! 277:
! 278: #ifdef KGDB
! 279: if (iobase == com_kgdb_addr)
! 280: goto out;
! 281: #endif /* KGDB */
! 282:
! 283: /* if it's in use as console, it's there. */
! 284: if (iobase == comconsaddr && !comconsattached)
! 285: goto out;
! 286:
! 287: if (needioh && bus_space_map(iot, iobase, COM_NPORTS, 0, &ioh)) {
! 288: rv = 0;
! 289: goto out;
! 290: }
! 291: rv = comprobe1(iot, ioh);
! 292: if (needioh)
! 293: bus_space_unmap(iot, ioh, COM_NPORTS);
! 294:
! 295: out:
! 296: /* #if NPCCOM_ISA || NPCCOM_PCMCIA */
! 297: #if NPCCOM_ISA
! 298: if (rv) {
! 299: struct isa_attach_args *ia = aux;
! 300:
! 301: ia->ia_iosize = COM_NPORTS;
! 302: ia->ia_msize = 0;
! 303: }
! 304: #endif
! 305: return (rv);
! 306: }
! 307:
! 308: void
! 309: comattach(struct device *parent, struct device *self, void *aux)
! 310: {
! 311: struct com_softc *sc = (void *)self;
! 312: bus_addr_t iobase;
! 313: bus_space_tag_t iot;
! 314: bus_space_handle_t ioh;
! 315: int irq;
! 316:
! 317: /*
! 318: * XXX should be broken out into functions for isa attach and
! 319: * XXX for commulti attach, with a helper function that contains
! 320: * XXX most of the interesting stuff.
! 321: */
! 322: /* #if NPCCOM_ISA || NPCCOM_PCMCIA || NPCCOM_ISAPNP */
! 323: #if NPCCOM_ISA || NPCCOM_ISAPNP
! 324: if (IS_ISA(parent) || IS_ISAPNP(parent)) {
! 325: struct isa_attach_args *ia = aux;
! 326:
! 327: /*
! 328: * We're living on an isa.
! 329: */
! 330: iobase = ia->ia_iobase;
! 331: iot = ia->ia_iot;
! 332: if (IS_ISAPNP(parent)) {
! 333: /* No console support! */
! 334: ioh = ia->ia_ioh;
! 335: } else {
! 336: #ifdef KGDB
! 337: if ((iobase != comconsaddr) &&
! 338: (iobase != com_kgdb_addr)) {
! 339: #else
! 340: if (iobase != comconsaddr) {
! 341: #endif /* KGDB */
! 342: if (bus_space_map(iot, iobase, COM_NPORTS, 0, &ioh))
! 343: panic("comattach: io mapping failed");
! 344: } else
! 345: #ifdef KGDB
! 346: if (iobase == comconsaddr) {
! 347: ioh = comconsioh;
! 348: } else {
! 349: ioh = com_kgdb_ioh;
! 350: }
! 351: #else
! 352: ioh = comconsioh;
! 353: #endif /* KGDB */
! 354: }
! 355: irq = ia->ia_irq;
! 356: } else
! 357: #endif
! 358: #if NPCCOM_COMMULTI
! 359: if (1) {
! 360: struct commulti_attach_args *ca = aux;
! 361:
! 362: /*
! 363: * We're living on a commulti.
! 364: */
! 365: iobase = ca->ca_iobase;
! 366: iot = ca->ca_iot;
! 367: ioh = ca->ca_ioh;
! 368: irq = IRQUNK;
! 369:
! 370: if (ca->ca_noien)
! 371: SET(sc->sc_hwflags, COM_HW_NOIEN);
! 372: } else
! 373: #endif
! 374: panic("comattach: impossible");
! 375:
! 376: sc->sc_iot = iot;
! 377: sc->sc_ioh = ioh;
! 378: sc->sc_iobase = iobase;
! 379: sc->sc_frequency = COM_FREQ;
! 380:
! 381: sc->sc_hwflags = 0;
! 382: sc->sc_swflags = 0;
! 383:
! 384: if (irq != IRQUNK) {
! 385: /* disable interrupts */
! 386: bus_space_write_1(iot, ioh, com_ier, 0);
! 387:
! 388: /* #if NPCCOM_ISA || NPCCOM_PCMCIA || NPCCOM_ISAPNP */
! 389: #if NPCCOM_ISA || NPCCOM_ISAPNP
! 390: if (IS_ISA(parent) || IS_ISAPNP(parent)) {
! 391: struct isa_attach_args *ia = aux;
! 392:
! 393: #ifdef KGDB
! 394: if (iobase == com_kgdb_addr) {
! 395: sc->sc_ih = isa_intr_establish(ia->ia_ic, irq,
! 396: IST_EDGE, IPL_HIGH, kgdbintr, sc,
! 397: sc->sc_dev.dv_xname);
! 398: } else {
! 399: sc->sc_ih = isa_intr_establish(ia->ia_ic, irq,
! 400: IST_EDGE, IPL_HIGH, comintr, sc,
! 401: sc->sc_dev.dv_xname);
! 402: }
! 403: #else
! 404: sc->sc_ih = isa_intr_establish(ia->ia_ic, irq,
! 405: IST_EDGE, IPL_HIGH, comintr, sc,
! 406: sc->sc_dev.dv_xname);
! 407: #endif /* KGDB */
! 408: } else
! 409: #endif
! 410: panic("comattach: IRQ but can't have one");
! 411: }
! 412:
! 413: com_attach_subr(sc);
! 414: }
! 415:
! 416: int
! 417: com_detach(struct device *self, int flags)
! 418: {
! 419: struct com_softc *sc = (struct com_softc *)self;
! 420: int maj, mn;
! 421:
! 422: /* locate the major number */
! 423: for (maj = 0; maj < nchrdev; maj++)
! 424: if (cdevsw[maj].d_open == comopen)
! 425: break;
! 426:
! 427: /* Nuke the vnodes for any open instances. */
! 428: mn = self->dv_unit;
! 429: vdevgone(maj, mn, mn, VCHR);
! 430:
! 431: /* XXX a symbolic constant for the cua bit would be nicer. */
! 432: mn |= 0x80;
! 433: vdevgone(maj, mn, mn, VCHR);
! 434:
! 435: /* Detach and free the tty. */
! 436: if (sc->sc_tty) {
! 437: ttyfree(sc->sc_tty);
! 438: }
! 439:
! 440: timeout_del(&sc->sc_dtr_tmo);
! 441: timeout_del(&sc->sc_diag_tmo);
! 442:
! 443: return (0);
! 444: }
! 445:
! 446: int
! 447: com_activate(struct device *self, enum devact act)
! 448: {
! 449: struct com_softc *sc = (struct com_softc *)self;
! 450: int s, rv = 0;
! 451:
! 452: /* XXX splserial, when we get that. */
! 453: s = spltty();
! 454: switch (act) {
! 455: case DVACT_ACTIVATE:
! 456: break;
! 457:
! 458: case DVACT_DEACTIVATE:
! 459: #ifdef KGDB
! 460: if (sc->sc_hwflags & (COM_HW_CONSOLE|COM_HW_KGDB)) {
! 461: #else
! 462: if (sc->sc_hwflags & COM_HW_CONSOLE) {
! 463: #endif /* KGDB */
! 464: rv = EBUSY;
! 465: break;
! 466: }
! 467:
! 468: if (sc->disable != NULL && sc->enabled != 0) {
! 469: (*sc->disable)(sc);
! 470: sc->enabled = 0;
! 471: }
! 472: break;
! 473: }
! 474: splx(s);
! 475: return (rv);
! 476: }
! 477:
! 478: int
! 479: comopen(dev_t dev, int flag, int mode, struct proc *p)
! 480: {
! 481: int unit = DEVUNIT(dev);
! 482: struct com_softc *sc;
! 483: bus_space_tag_t iot;
! 484: bus_space_handle_t ioh;
! 485: struct tty *tp;
! 486: int s;
! 487: int error = 0;
! 488:
! 489: if (unit >= pccom_cd.cd_ndevs)
! 490: return ENXIO;
! 491: sc = pccom_cd.cd_devs[unit];
! 492: if (!sc)
! 493: return ENXIO;
! 494:
! 495: #ifdef KGDB
! 496: /*
! 497: * If this is the kgdb port, no other use is permitted.
! 498: */
! 499: if (ISSET(sc->sc_hwflags, COM_HW_KGDB))
! 500: return (EBUSY);
! 501: #endif /* KGDB */
! 502:
! 503: s = spltty();
! 504: if (!sc->sc_tty) {
! 505: tp = sc->sc_tty = ttymalloc();
! 506: } else
! 507: tp = sc->sc_tty;
! 508: splx(s);
! 509:
! 510: tp->t_oproc = comstart;
! 511: tp->t_param = comparam;
! 512: tp->t_hwiflow = comhwiflow;
! 513: tp->t_dev = dev;
! 514: if (!ISSET(tp->t_state, TS_ISOPEN)) {
! 515: SET(tp->t_state, TS_WOPEN);
! 516: ttychars(tp);
! 517: tp->t_iflag = TTYDEF_IFLAG;
! 518: tp->t_oflag = TTYDEF_OFLAG;
! 519: if (ISSET(sc->sc_hwflags, COM_HW_CONSOLE))
! 520: tp->t_cflag = comconscflag;
! 521: else
! 522: tp->t_cflag = TTYDEF_CFLAG;
! 523: if (ISSET(sc->sc_swflags, COM_SW_CLOCAL))
! 524: SET(tp->t_cflag, CLOCAL);
! 525: if (ISSET(sc->sc_swflags, COM_SW_CRTSCTS))
! 526: SET(tp->t_cflag, CRTSCTS);
! 527: if (ISSET(sc->sc_swflags, COM_SW_MDMBUF))
! 528: SET(tp->t_cflag, MDMBUF);
! 529: tp->t_lflag = TTYDEF_LFLAG;
! 530: tp->t_ispeed = tp->t_ospeed = comdefaultrate;
! 531:
! 532: s = spltty();
! 533:
! 534: iot = sc->sc_iot;
! 535: ioh = sc->sc_ioh;
! 536:
! 537: /*
! 538: * Wake up the sleepy heads.
! 539: */
! 540: switch (sc->sc_uarttype) {
! 541: case COM_UART_ST16650:
! 542: case COM_UART_ST16650V2:
! 543: case COM_UART_ST16C654:
! 544: case COM_UART_XR16850:
! 545: case COM_UART_OX16C950:
! 546: bus_space_write_1(iot, ioh, com_lcr, LCR_EFR);
! 547: bus_space_write_1(iot, ioh, com_efr, EFR_ECB);
! 548: bus_space_write_1(iot, ioh, com_ier, 0);
! 549: bus_space_write_1(iot, ioh, com_efr, 0);
! 550: bus_space_write_1(iot, ioh, com_lcr, 0);
! 551: break;
! 552: case COM_UART_TI16750:
! 553: bus_space_write_1(iot, ioh, com_ier, 0);
! 554: break;
! 555: }
! 556:
! 557: sc->sc_initialize = 1;
! 558: comparam(tp, &tp->t_termios);
! 559: ttsetwater(tp);
! 560:
! 561: sc->sc_rxput = sc->sc_rxget = sc->sc_tbc = 0;
! 562:
! 563: if (ISSET(sc->sc_hwflags, COM_HW_FIFO)) {
! 564: u_int8_t fifo = FIFO_ENABLE|FIFO_RCV_RST|FIFO_XMT_RST;
! 565: u_int8_t lcr;
! 566:
! 567: switch (sc->sc_uarttype) {
! 568: case COM_UART_ST16650V2:
! 569: if (tp->t_ispeed <= 1200)
! 570: fifo |= FIFO_RCV_TRIGGER_8|FIFO_XMT_TRIGGER_8; /* XXX */
! 571: else
! 572: fifo |= FIFO_RCV_TRIGGER_28|FIFO_XMT_TRIGGER_30;
! 573: break;
! 574: case COM_UART_ST16C654:
! 575: if (tp->t_ispeed <= 1200)
! 576: fifo |= FIFO_RCV3_TRIGGER_8|FIFO_XMT3_TRIGGER_8; /* XXX */
! 577: else
! 578: fifo |= FIFO_RCV3_TRIGGER_60|FIFO_XMT3_TRIGGER_56;
! 579: break;
! 580: case COM_UART_XR16850:
! 581: case COM_UART_OX16C950:
! 582: pccom_xr16850_fifo_init(iot, ioh);
! 583: if (tp->t_ispeed <= 1200)
! 584: fifo |= FIFO_RCV3_TRIGGER_8|FIFO_XMT3_TRIGGER_8; /* XXX */
! 585: else
! 586: fifo |= FIFO_RCV3_TRIGGER_60|FIFO_XMT3_TRIGGER_56;
! 587: break;
! 588: case COM_UART_TI16750:
! 589: fifo |= FIFO_ENABLE_64BYTE;
! 590: lcr = bus_space_read_1(iot, ioh, com_lcr);
! 591: bus_space_write_1(iot, ioh, com_lcr,
! 592: lcr | LCR_DLAB);
! 593: default:
! 594: if (tp->t_ispeed <= 1200)
! 595: fifo |= FIFO_TRIGGER_1;
! 596: else
! 597: fifo |= FIFO_TRIGGER_8;
! 598: }
! 599:
! 600: /*
! 601: * (Re)enable and drain FIFOs.
! 602: *
! 603: * Certain SMC chips cause problems if the FIFOs are
! 604: * enabled while input is ready. Turn off the FIFO
! 605: * if necessary to clear the input. Test the input
! 606: * ready bit after enabling the FIFOs to handle races
! 607: * between enabling and fresh input.
! 608: *
! 609: * Set the FIFO threshold based on the receive speed.
! 610: */
! 611: for (;;) {
! 612: bus_space_write_1(iot, ioh, com_fifo, 0);
! 613: delay(100);
! 614: (void) bus_space_read_1(iot, ioh, com_data);
! 615: bus_space_write_1(iot, ioh, com_fifo, fifo |
! 616: FIFO_RCV_RST | FIFO_XMT_RST);
! 617: delay(100);
! 618: if(!ISSET(bus_space_read_1(iot, ioh,
! 619: com_lsr), LSR_RXRDY))
! 620: break;
! 621: }
! 622: if (sc->sc_uarttype == COM_UART_TI16750)
! 623: bus_space_write_1(iot, ioh, com_lcr, lcr);
! 624: }
! 625:
! 626: /* flush any pending I/O */
! 627: while (ISSET(bus_space_read_1(iot, ioh, com_lsr), LSR_RXRDY))
! 628: (void) bus_space_read_1(iot, ioh, com_data);
! 629: /* you turn me on, baby */
! 630: sc->sc_mcr = MCR_DTR | MCR_RTS;
! 631: if (!ISSET(sc->sc_hwflags, COM_HW_NOIEN))
! 632: SET(sc->sc_mcr, MCR_IENABLE);
! 633: bus_space_write_1(iot, ioh, com_mcr, sc->sc_mcr);
! 634: sc->sc_ier = IER_ERXRDY | IER_ERLS | IER_EMSC;
! 635: bus_space_write_1(iot, ioh, com_ier, sc->sc_ier);
! 636:
! 637: sc->sc_msr = bus_space_read_1(iot, ioh, com_msr);
! 638: if (ISSET(sc->sc_swflags, COM_SW_SOFTCAR) || DEVCUA(dev) ||
! 639: ISSET(sc->sc_msr, MSR_DCD) || ISSET(tp->t_cflag, MDMBUF))
! 640: SET(tp->t_state, TS_CARR_ON);
! 641: else
! 642: CLR(tp->t_state, TS_CARR_ON);
! 643: } else if (ISSET(tp->t_state, TS_XCLUDE) && p->p_ucred->cr_uid != 0)
! 644: return EBUSY;
! 645: else
! 646: s = spltty();
! 647:
! 648: if (DEVCUA(dev)) {
! 649: if (ISSET(tp->t_state, TS_ISOPEN)) {
! 650: /* Ah, but someone already is dialed in... */
! 651: splx(s);
! 652: return EBUSY;
! 653: }
! 654: sc->sc_cua = 1; /* We go into CUA mode */
! 655: } else {
! 656: /* tty (not cua) device; wait for carrier if necessary */
! 657: if (ISSET(flag, O_NONBLOCK)) {
! 658: if (sc->sc_cua) {
! 659: /* Opening TTY non-blocking... but the CUA is busy */
! 660: splx(s);
! 661: return EBUSY;
! 662: }
! 663: } else {
! 664: while (sc->sc_cua ||
! 665: (!ISSET(tp->t_cflag, CLOCAL) &&
! 666: !ISSET(tp->t_state, TS_CARR_ON))) {
! 667: SET(tp->t_state, TS_WOPEN);
! 668: error = ttysleep(tp, &tp->t_rawq, TTIPRI | PCATCH, ttopen, 0);
! 669: /*
! 670: * If TS_WOPEN has been reset, that means the cua device
! 671: * has been closed. We don't want to fail in that case,
! 672: * so just go around again.
! 673: */
! 674: if (error && ISSET(tp->t_state, TS_WOPEN)) {
! 675: CLR(tp->t_state, TS_WOPEN);
! 676: if (!sc->sc_cua && !ISSET(tp->t_state, TS_ISOPEN))
! 677: compwroff(sc);
! 678: splx(s);
! 679: return error;
! 680: }
! 681: }
! 682: }
! 683: }
! 684: splx(s);
! 685: return (*linesw[tp->t_line].l_open)(dev, tp);
! 686: }
! 687:
! 688: int
! 689: comclose(dev_t dev, int flag, int mode, struct proc *p)
! 690: {
! 691: int unit = DEVUNIT(dev);
! 692: struct com_softc *sc = pccom_cd.cd_devs[unit];
! 693: bus_space_tag_t iot = sc->sc_iot;
! 694: bus_space_handle_t ioh = sc->sc_ioh;
! 695: struct tty *tp = sc->sc_tty;
! 696: int s;
! 697:
! 698: /* XXX This is for cons.c. */
! 699: if (!ISSET(tp->t_state, TS_ISOPEN))
! 700: return 0;
! 701:
! 702: (*linesw[tp->t_line].l_close)(tp, flag);
! 703: s = spltty();
! 704: if (ISSET(tp->t_state, TS_WOPEN)) {
! 705: /* tty device is waiting for carrier; drop dtr then re-raise */
! 706: CLR(sc->sc_mcr, MCR_DTR | MCR_RTS);
! 707: bus_space_write_1(iot, ioh, com_mcr, sc->sc_mcr);
! 708: timeout_add(&sc->sc_dtr_tmo, hz * 2);
! 709: } else {
! 710: /* no one else waiting; turn off the uart */
! 711: compwroff(sc);
! 712: }
! 713: CLR(tp->t_state, TS_BUSY | TS_FLUSH);
! 714: sc->sc_cua = 0;
! 715: splx(s);
! 716: ttyclose(tp);
! 717:
! 718: #ifdef notyet /* XXXX */
! 719: if (ISSET(sc->sc_hwflags, COM_HW_CONSOLE)) {
! 720: ttyfree(tp);
! 721: sc->sc_tty = 0;
! 722: }
! 723: #endif
! 724: return 0;
! 725: }
! 726:
! 727: void
! 728: compwroff(struct com_softc *sc)
! 729: {
! 730: bus_space_tag_t iot = sc->sc_iot;
! 731: bus_space_handle_t ioh = sc->sc_ioh;
! 732: struct tty *tp = sc->sc_tty;
! 733:
! 734: CLR(sc->sc_lcr, LCR_SBREAK);
! 735: bus_space_write_1(iot, ioh, com_lcr, sc->sc_lcr);
! 736: bus_space_write_1(iot, ioh, com_ier, 0);
! 737: if (ISSET(tp->t_cflag, HUPCL) &&
! 738: !ISSET(sc->sc_swflags, COM_SW_SOFTCAR)) {
! 739: /* XXX perhaps only clear DTR */
! 740: sc->sc_mcr = 0;
! 741: bus_space_write_1(iot, ioh, com_mcr, sc->sc_mcr);
! 742: }
! 743:
! 744: /*
! 745: * Turn FIFO off; enter sleep mode if possible.
! 746: */
! 747: bus_space_write_1(iot, ioh, com_fifo, 0);
! 748: delay(100);
! 749: (void) bus_space_read_1(iot, ioh, com_data);
! 750: delay(100);
! 751: bus_space_write_1(iot, ioh, com_fifo,
! 752: FIFO_RCV_RST | FIFO_XMT_RST);
! 753:
! 754: switch (sc->sc_uarttype) {
! 755: case COM_UART_ST16650:
! 756: case COM_UART_ST16650V2:
! 757: case COM_UART_ST16C654:
! 758: case COM_UART_XR16850:
! 759: case COM_UART_OX16C950:
! 760: bus_space_write_1(iot, ioh, com_lcr, LCR_EFR);
! 761: bus_space_write_1(iot, ioh, com_efr, EFR_ECB);
! 762: bus_space_write_1(iot, ioh, com_ier, IER_SLEEP);
! 763: bus_space_write_1(iot, ioh, com_lcr, 0);
! 764: break;
! 765: case COM_UART_TI16750:
! 766: bus_space_write_1(iot, ioh, com_ier, IER_SLEEP);
! 767: break;
! 768: }
! 769: }
! 770:
! 771: void
! 772: com_raisedtr(void *arg)
! 773: {
! 774: struct com_softc *sc = arg;
! 775:
! 776: SET(sc->sc_mcr, MCR_DTR | MCR_RTS);
! 777: bus_space_write_1(sc->sc_iot, sc->sc_ioh, com_mcr, sc->sc_mcr);
! 778: }
! 779:
! 780: int
! 781: comread(dev_t dev, struct uio *uio, int flag)
! 782: {
! 783: struct com_softc *sc = pccom_cd.cd_devs[DEVUNIT(dev)];
! 784: struct tty *tp = sc->sc_tty;
! 785:
! 786: return ((*linesw[tp->t_line].l_read)(tp, uio, flag));
! 787: }
! 788:
! 789: int
! 790: comwrite(dev_t dev, struct uio *uio, int flag)
! 791: {
! 792: struct com_softc *sc = pccom_cd.cd_devs[DEVUNIT(dev)];
! 793: struct tty *tp = sc->sc_tty;
! 794:
! 795: return ((*linesw[tp->t_line].l_write)(tp, uio, flag));
! 796: }
! 797:
! 798: struct tty *
! 799: comtty(dev_t dev)
! 800: {
! 801: struct com_softc *sc = pccom_cd.cd_devs[DEVUNIT(dev)];
! 802: struct tty *tp = sc->sc_tty;
! 803:
! 804: return (tp);
! 805: }
! 806:
! 807: static u_char
! 808: tiocm_xxx2mcr(int data)
! 809: {
! 810: u_char m = 0;
! 811:
! 812: if (ISSET(data, TIOCM_DTR))
! 813: SET(m, MCR_DTR);
! 814: if (ISSET(data, TIOCM_RTS))
! 815: SET(m, MCR_RTS);
! 816: return m;
! 817: }
! 818:
! 819: int
! 820: comioctl(dev_t dev, u_long cmd, caddr_t data, int flag, struct proc *p)
! 821: {
! 822: int unit = DEVUNIT(dev);
! 823: struct com_softc *sc = pccom_cd.cd_devs[unit];
! 824: struct tty *tp = sc->sc_tty;
! 825: bus_space_tag_t iot = sc->sc_iot;
! 826: bus_space_handle_t ioh = sc->sc_ioh;
! 827: int error;
! 828:
! 829: error = (*linesw[tp->t_line].l_ioctl)(tp, cmd, data, flag, p);
! 830: if (error >= 0)
! 831: return error;
! 832: error = ttioctl(tp, cmd, data, flag, p);
! 833: if (error >= 0)
! 834: return error;
! 835:
! 836: switch (cmd) {
! 837: case TIOCSBRK:
! 838: SET(sc->sc_lcr, LCR_SBREAK);
! 839: bus_space_write_1(iot, ioh, com_lcr, sc->sc_lcr);
! 840: break;
! 841: case TIOCCBRK:
! 842: CLR(sc->sc_lcr, LCR_SBREAK);
! 843: bus_space_write_1(iot, ioh, com_lcr, sc->sc_lcr);
! 844: break;
! 845: case TIOCSDTR:
! 846: SET(sc->sc_mcr, sc->sc_dtr);
! 847: bus_space_write_1(iot, ioh, com_mcr, sc->sc_mcr);
! 848: break;
! 849: case TIOCCDTR:
! 850: CLR(sc->sc_mcr, sc->sc_dtr);
! 851: bus_space_write_1(iot, ioh, com_mcr, sc->sc_mcr);
! 852: break;
! 853: case TIOCMSET:
! 854: CLR(sc->sc_mcr, MCR_DTR | MCR_RTS);
! 855: case TIOCMBIS:
! 856: SET(sc->sc_mcr, tiocm_xxx2mcr(*(int *)data));
! 857: bus_space_write_1(iot, ioh, com_mcr, sc->sc_mcr);
! 858: break;
! 859: case TIOCMBIC:
! 860: CLR(sc->sc_mcr, tiocm_xxx2mcr(*(int *)data));
! 861: bus_space_write_1(iot, ioh, com_mcr, sc->sc_mcr);
! 862: break;
! 863: case TIOCMGET: {
! 864: u_char m;
! 865: int bits = 0;
! 866:
! 867: m = sc->sc_mcr;
! 868: if (ISSET(m, MCR_DTR))
! 869: SET(bits, TIOCM_DTR);
! 870: if (ISSET(m, MCR_RTS))
! 871: SET(bits, TIOCM_RTS);
! 872: m = sc->sc_msr;
! 873: if (ISSET(m, MSR_DCD))
! 874: SET(bits, TIOCM_CD);
! 875: if (ISSET(m, MSR_CTS))
! 876: SET(bits, TIOCM_CTS);
! 877: if (ISSET(m, MSR_DSR))
! 878: SET(bits, TIOCM_DSR);
! 879: if (ISSET(m, MSR_RI | MSR_TERI))
! 880: SET(bits, TIOCM_RI);
! 881: if (bus_space_read_1(iot, ioh, com_ier))
! 882: SET(bits, TIOCM_LE);
! 883: *(int *)data = bits;
! 884: break;
! 885: }
! 886: case TIOCGFLAGS: {
! 887: int driverbits, userbits = 0;
! 888:
! 889: driverbits = sc->sc_swflags;
! 890: if (ISSET(driverbits, COM_SW_SOFTCAR))
! 891: SET(userbits, TIOCFLAG_SOFTCAR);
! 892: if (ISSET(driverbits, COM_SW_CLOCAL))
! 893: SET(userbits, TIOCFLAG_CLOCAL);
! 894: if (ISSET(driverbits, COM_SW_CRTSCTS))
! 895: SET(userbits, TIOCFLAG_CRTSCTS);
! 896: if (ISSET(driverbits, COM_SW_MDMBUF))
! 897: SET(userbits, TIOCFLAG_MDMBUF);
! 898:
! 899: *(int *)data = userbits;
! 900: break;
! 901: }
! 902: case TIOCSFLAGS: {
! 903: int userbits, driverbits = 0;
! 904:
! 905: error = suser(p, 0);
! 906: if (error != 0)
! 907: return(EPERM);
! 908:
! 909: userbits = *(int *)data;
! 910: if (ISSET(userbits, TIOCFLAG_SOFTCAR) ||
! 911: ISSET(sc->sc_hwflags, COM_HW_CONSOLE))
! 912: SET(driverbits, COM_SW_SOFTCAR);
! 913: if (ISSET(userbits, TIOCFLAG_CLOCAL))
! 914: SET(driverbits, COM_SW_CLOCAL);
! 915: if (ISSET(userbits, TIOCFLAG_CRTSCTS))
! 916: SET(driverbits, COM_SW_CRTSCTS);
! 917: if (ISSET(userbits, TIOCFLAG_MDMBUF))
! 918: SET(driverbits, COM_SW_MDMBUF);
! 919:
! 920: sc->sc_swflags = driverbits;
! 921: break;
! 922: }
! 923: default:
! 924: return ENOTTY;
! 925: }
! 926:
! 927: return 0;
! 928: }
! 929:
! 930: int
! 931: comparam(struct tty *tp, struct termios *t)
! 932: {
! 933: struct com_softc *sc = pccom_cd.cd_devs[DEVUNIT(tp->t_dev)];
! 934: bus_space_tag_t iot = sc->sc_iot;
! 935: bus_space_handle_t ioh = sc->sc_ioh;
! 936: int ospeed = comspeed(sc->sc_frequency, t->c_ospeed);
! 937: u_int8_t lcr;
! 938: tcflag_t oldcflag;
! 939: int s;
! 940:
! 941: /* check requested parameters */
! 942: if (ospeed < 0 || (t->c_ispeed && t->c_ispeed != t->c_ospeed))
! 943: return EINVAL;
! 944:
! 945: lcr = ISSET(sc->sc_lcr, LCR_SBREAK);
! 946:
! 947: switch (ISSET(t->c_cflag, CSIZE)) {
! 948: case CS5:
! 949: SET(lcr, LCR_5BITS);
! 950: break;
! 951: case CS6:
! 952: SET(lcr, LCR_6BITS);
! 953: break;
! 954: case CS7:
! 955: SET(lcr, LCR_7BITS);
! 956: break;
! 957: case CS8:
! 958: SET(lcr, LCR_8BITS);
! 959: break;
! 960: }
! 961: if (ISSET(t->c_cflag, PARENB)) {
! 962: SET(lcr, LCR_PENAB);
! 963: if (!ISSET(t->c_cflag, PARODD))
! 964: SET(lcr, LCR_PEVEN);
! 965: }
! 966: if (ISSET(t->c_cflag, CSTOPB))
! 967: SET(lcr, LCR_STOPB);
! 968:
! 969: sc->sc_lcr = lcr;
! 970:
! 971: s = spltty();
! 972:
! 973: if (ospeed == 0) {
! 974: CLR(sc->sc_mcr, MCR_DTR);
! 975: bus_space_write_1(iot, ioh, com_mcr, sc->sc_mcr);
! 976: }
! 977:
! 978: /*
! 979: * Set the FIFO threshold based on the receive speed, if we are
! 980: * changing it.
! 981: */
! 982: if (sc->sc_initialize || (tp->t_ispeed != t->c_ispeed)) {
! 983: sc->sc_initialize = 0;
! 984:
! 985: if (ospeed != 0) {
! 986: /*
! 987: * Make sure the transmit FIFO is empty before
! 988: * proceeding. If we don't do this, some revisions
! 989: * of the UART will hang. Interestingly enough,
! 990: * even if we do this while the last character is
! 991: * still being pushed out, they don't hang. This
! 992: * seems good enough.
! 993: */
! 994: while (ISSET(tp->t_state, TS_BUSY)) {
! 995: int error;
! 996:
! 997: ++sc->sc_halt;
! 998: error = ttysleep(tp, &tp->t_outq,
! 999: TTOPRI | PCATCH, "comprm", 0);
! 1000: --sc->sc_halt;
! 1001: if (error) {
! 1002: splx(s);
! 1003: comstart(tp);
! 1004: return (error);
! 1005: }
! 1006: }
! 1007:
! 1008: bus_space_write_1(iot, ioh, com_lcr, lcr | LCR_DLAB);
! 1009: bus_space_write_1(iot, ioh, com_dlbl, ospeed);
! 1010: bus_space_write_1(iot, ioh, com_dlbh, ospeed >> 8);
! 1011: bus_space_write_1(iot, ioh, com_lcr, lcr);
! 1012: SET(sc->sc_mcr, MCR_DTR);
! 1013: bus_space_write_1(iot, ioh, com_mcr, sc->sc_mcr);
! 1014: } else
! 1015: bus_space_write_1(iot, ioh, com_lcr, lcr);
! 1016:
! 1017: if (ISSET(sc->sc_hwflags, COM_HW_FIFO)) {
! 1018: u_int8_t fifo = FIFO_ENABLE;
! 1019: u_int8_t lcr2;
! 1020:
! 1021: switch (sc->sc_uarttype) {
! 1022: case COM_UART_ST16650V2:
! 1023: if (t->c_ispeed <= 1200)
! 1024: fifo |= FIFO_RCV_TRIGGER_8|FIFO_XMT_TRIGGER_8; /* XXX */
! 1025: else
! 1026: fifo |= FIFO_RCV_TRIGGER_28|FIFO_XMT_TRIGGER_30;
! 1027: break;
! 1028: case COM_UART_ST16C654:
! 1029: case COM_UART_XR16850:
! 1030: case COM_UART_OX16C950:
! 1031: if (t->c_ispeed <= 1200)
! 1032: fifo |= FIFO_RCV3_TRIGGER_8|FIFO_XMT3_TRIGGER_8; /* XXX */
! 1033: else
! 1034: fifo |= FIFO_RCV3_TRIGGER_60|FIFO_XMT3_TRIGGER_56;
! 1035: break;
! 1036: case COM_UART_TI16750:
! 1037: fifo |= FIFO_ENABLE_64BYTE;
! 1038: lcr2 = bus_space_read_1(iot, ioh, com_lcr);
! 1039: bus_space_write_1(iot, ioh, com_lcr,
! 1040: lcr2 | LCR_DLAB);
! 1041: default:
! 1042: if (t->c_ispeed <= 1200)
! 1043: fifo |= FIFO_TRIGGER_1;
! 1044: else
! 1045: fifo |= FIFO_TRIGGER_8;
! 1046: }
! 1047: bus_space_write_1(iot, ioh, com_fifo, fifo);
! 1048:
! 1049: if (sc->sc_uarttype == COM_UART_TI16750)
! 1050: bus_space_write_1(iot, ioh, com_lcr, lcr2);
! 1051: }
! 1052: } else
! 1053: bus_space_write_1(iot, ioh, com_lcr, lcr);
! 1054:
! 1055: /* When not using CRTSCTS, RTS follows DTR. */
! 1056: if (!ISSET(t->c_cflag, CRTSCTS)) {
! 1057: if (ISSET(sc->sc_mcr, MCR_DTR)) {
! 1058: if (!ISSET(sc->sc_mcr, MCR_RTS)) {
! 1059: SET(sc->sc_mcr, MCR_RTS);
! 1060: bus_space_write_1(iot, ioh, com_mcr, sc->sc_mcr);
! 1061: }
! 1062: } else {
! 1063: if (ISSET(sc->sc_mcr, MCR_RTS)) {
! 1064: CLR(sc->sc_mcr, MCR_RTS);
! 1065: bus_space_write_1(iot, ioh, com_mcr, sc->sc_mcr);
! 1066: }
! 1067: }
! 1068: sc->sc_dtr = MCR_DTR | MCR_RTS;
! 1069: } else
! 1070: sc->sc_dtr = MCR_DTR;
! 1071:
! 1072: /* and copy to tty */
! 1073: tp->t_ispeed = t->c_ispeed;
! 1074: tp->t_ospeed = t->c_ospeed;
! 1075: oldcflag = tp->t_cflag;
! 1076: tp->t_cflag = t->c_cflag;
! 1077:
! 1078: /*
! 1079: * If DCD is off and MDMBUF is changed, ask the tty layer if we should
! 1080: * stop the device.
! 1081: */
! 1082: if (!ISSET(sc->sc_msr, MSR_DCD) &&
! 1083: !ISSET(sc->sc_swflags, COM_SW_SOFTCAR) &&
! 1084: ISSET(oldcflag, MDMBUF) != ISSET(tp->t_cflag, MDMBUF) &&
! 1085: (*linesw[tp->t_line].l_modem)(tp, 0) == 0) {
! 1086: CLR(sc->sc_mcr, sc->sc_dtr);
! 1087: bus_space_write_1(iot, ioh, com_mcr, sc->sc_mcr);
! 1088: }
! 1089:
! 1090: /* Just to be sure... */
! 1091: splx(s);
! 1092: comstart(tp);
! 1093: return 0;
! 1094: }
! 1095:
! 1096: /*
! 1097: * (un)block input via hw flowcontrol
! 1098: */
! 1099: int
! 1100: comhwiflow(struct tty *tp, int block)
! 1101: {
! 1102: struct com_softc *sc = pccom_cd.cd_devs[DEVUNIT(tp->t_dev)];
! 1103: bus_space_tag_t iot = sc->sc_iot;
! 1104: bus_space_handle_t ioh = sc->sc_ioh;
! 1105: int s;
! 1106:
! 1107: /*
! 1108: * XXX
! 1109: * Is spltty needed at all ? sc->sc_mcr is only in comsoft() not comintr()
! 1110: */
! 1111: s = spltty();
! 1112: if (block) {
! 1113: /* When not using CRTSCTS, RTS follows DTR. */
! 1114: if (ISSET(tp->t_cflag, MDMBUF)) {
! 1115: CLR(sc->sc_mcr, (MCR_DTR | MCR_RTS));
! 1116: bus_space_write_1(iot, ioh, com_mcr, sc->sc_mcr);
! 1117: }
! 1118: else {
! 1119: CLR(sc->sc_mcr, MCR_RTS);
! 1120: bus_space_write_1(iot, ioh, com_mcr, sc->sc_mcr);
! 1121: }
! 1122: }
! 1123: else {
! 1124: /* When not using CRTSCTS, RTS follows DTR. */
! 1125: if (ISSET(tp->t_cflag, MDMBUF)) {
! 1126: SET(sc->sc_mcr, (MCR_DTR | MCR_RTS));
! 1127: bus_space_write_1(iot, ioh, com_mcr, sc->sc_mcr);
! 1128: }
! 1129: else {
! 1130: SET(sc->sc_mcr, MCR_RTS);
! 1131: bus_space_write_1(iot, ioh, com_mcr, sc->sc_mcr);
! 1132: }
! 1133: }
! 1134: splx(s);
! 1135: return 1;
! 1136: }
! 1137:
! 1138: void
! 1139: comstart(struct tty *tp)
! 1140: {
! 1141: struct com_softc *sc = pccom_cd.cd_devs[DEVUNIT(tp->t_dev)];
! 1142: bus_space_tag_t iot = sc->sc_iot;
! 1143: bus_space_handle_t ioh = sc->sc_ioh;
! 1144: int s, count;
! 1145:
! 1146: s = spltty();
! 1147: if (ISSET(tp->t_state, TS_BUSY))
! 1148: goto out;
! 1149: if (ISSET(tp->t_state, TS_TIMEOUT | TS_TTSTOP) || sc->sc_halt > 0)
! 1150: goto stopped;
! 1151: if (ISSET(tp->t_cflag, CRTSCTS) && !ISSET(sc->sc_msr, MSR_CTS))
! 1152: goto stopped;
! 1153: if (tp->t_outq.c_cc <= tp->t_lowat) {
! 1154: if (ISSET(tp->t_state, TS_ASLEEP)) {
! 1155: CLR(tp->t_state, TS_ASLEEP);
! 1156: wakeup((caddr_t)&tp->t_outq);
! 1157: }
! 1158: selwakeup(&tp->t_wsel);
! 1159: }
! 1160: count = ndqb(&tp->t_outq, 0);
! 1161: splhigh();
! 1162: if (count > 0) {
! 1163: int n;
! 1164:
! 1165: SET(tp->t_state, TS_BUSY);
! 1166: if (!ISSET(sc->sc_ier, IER_ETXRDY)) {
! 1167: SET(sc->sc_ier, IER_ETXRDY);
! 1168: bus_space_write_1(iot, ioh, com_ier, sc->sc_ier);
! 1169: }
! 1170: n = sc->sc_fifolen;
! 1171: if (n > count)
! 1172: n = count;
! 1173: sc->sc_tba = tp->t_outq.c_cf;
! 1174: while (--n >= 0) {
! 1175: bus_space_write_1(iot, ioh, com_data, *sc->sc_tba++);
! 1176: --count;
! 1177: }
! 1178: sc->sc_tbc = count;
! 1179: goto out;
! 1180: }
! 1181: stopped:
! 1182: if (ISSET(sc->sc_ier, IER_ETXRDY)) {
! 1183: CLR(sc->sc_ier, IER_ETXRDY);
! 1184: bus_space_write_1(iot, ioh, com_ier, sc->sc_ier);
! 1185: }
! 1186: out:
! 1187: splx(s);
! 1188: return;
! 1189: }
! 1190:
! 1191: /*
! 1192: * Stop output on a line.
! 1193: */
! 1194: int
! 1195: comstop(struct tty *tp, int flag)
! 1196: {
! 1197: int s;
! 1198: struct com_softc *sc = pccom_cd.cd_devs[DEVUNIT(tp->t_dev)];
! 1199:
! 1200: s = splhigh();
! 1201: if (ISSET(tp->t_state, TS_BUSY)) {
! 1202: sc->sc_tbc = 0;
! 1203: if (!ISSET(tp->t_state, TS_TTSTOP))
! 1204: SET(tp->t_state, TS_FLUSH);
! 1205: }
! 1206: splx(s);
! 1207: return 0;
! 1208: }
! 1209:
! 1210: void
! 1211: comdiag(void *arg)
! 1212: {
! 1213: struct com_softc *sc = arg;
! 1214: int overflows;
! 1215: int s;
! 1216:
! 1217: s = spltty();
! 1218: overflows = sc->sc_overflows;
! 1219: sc->sc_overflows = 0;
! 1220: splx(s);
! 1221:
! 1222: if (overflows)
! 1223: log(LOG_WARNING, "%s: %d silo overflow%s\n",
! 1224: sc->sc_dev.dv_xname, overflows, overflows == 1 ? "" : "s");
! 1225: }
! 1226:
! 1227: #ifdef PCCOM_DEBUG
! 1228: int maxcc = 0;
! 1229: #endif
! 1230:
! 1231: void
! 1232: comsoft(void)
! 1233: {
! 1234: struct com_softc *sc;
! 1235: struct tty *tp;
! 1236: struct linesw *line;
! 1237: int unit, s, c;
! 1238: u_int rxget;
! 1239: static int lsrmap[8] = {
! 1240: 0, TTY_PE,
! 1241: TTY_FE, TTY_PE|TTY_FE,
! 1242: TTY_FE, TTY_PE|TTY_FE,
! 1243: TTY_FE, TTY_PE|TTY_FE
! 1244: };
! 1245:
! 1246: for (unit = 0; unit < pccom_cd.cd_ndevs; unit++) {
! 1247: sc = pccom_cd.cd_devs[unit];
! 1248: if (sc == NULL)
! 1249: continue;
! 1250: tp = sc->sc_tty;
! 1251: /*
! 1252: * XXX only use (tp == NULL) ???
! 1253: */
! 1254: if (tp == NULL || !ISSET(tp->t_state, TS_ISOPEN | TS_WOPEN))
! 1255: continue;
! 1256: line = &linesw[tp->t_line];
! 1257: /*
! 1258: * XXX where do we _really_ need spltty(), if at all ???
! 1259: */
! 1260: s = spltty();
! 1261: rxget = sc->sc_rxget;
! 1262: while (rxget != sc->sc_rxput) {
! 1263: u_int8_t lsr;
! 1264:
! 1265: lsr = sc->sc_rxbuf[rxget];
! 1266: rxget = (rxget + 1) & RBUFMASK;
! 1267: if (ISSET(lsr, LSR_RCV_MASK)) {
! 1268: c = sc->sc_rxbuf[rxget];
! 1269: if (ISSET(lsr, LSR_OE)) {
! 1270: sc->sc_overflows++;
! 1271: if (sc->sc_errors++ == 0)
! 1272: timeout_add(&sc->sc_diag_tmo, 60 * hz);
! 1273: }
! 1274: rxget = (rxget + 1) & RBUFMASK;
! 1275: c |= lsrmap[(lsr & (LSR_BI|LSR_FE|LSR_PE)) >> 2];
! 1276: line->l_rint(c, tp);
! 1277: }
! 1278: else if (ISSET(lsr, LSR_TXRDY)) {
! 1279: CLR(tp->t_state, TS_BUSY);
! 1280: if (ISSET(tp->t_state, TS_FLUSH))
! 1281: CLR(tp->t_state, TS_FLUSH);
! 1282: else
! 1283: ndflush(&tp->t_outq,
! 1284: (int)(sc->sc_tba - tp->t_outq.c_cf));
! 1285: if (sc->sc_halt > 0)
! 1286: wakeup(&tp->t_outq);
! 1287: line->l_start(tp);
! 1288: }
! 1289: else if (lsr == 0) {
! 1290: u_int8_t msr;
! 1291:
! 1292: msr = sc->sc_rxbuf[rxget];
! 1293: rxget = (rxget + 1) & RBUFMASK;
! 1294: if (ISSET(msr, MSR_DDCD) &&
! 1295: !ISSET(sc->sc_swflags, COM_SW_SOFTCAR)) {
! 1296: if (ISSET(msr, MSR_DCD))
! 1297: line->l_modem(tp, 1);
! 1298: else if (line->l_modem(tp, 0) == 0) {
! 1299: CLR(sc->sc_mcr, sc->sc_dtr);
! 1300: bus_space_write_1(sc->sc_iot,
! 1301: sc->sc_ioh,
! 1302: com_mcr,
! 1303: sc->sc_mcr);
! 1304: }
! 1305: }
! 1306: if (ISSET(msr, MSR_DCTS) &&
! 1307: ISSET(msr, MSR_CTS) &&
! 1308: ISSET(tp->t_cflag, CRTSCTS))
! 1309: line->l_start(tp);
! 1310: }
! 1311: }
! 1312: sc->sc_rxget = rxget;
! 1313: /*
! 1314: * XXX this is the place where we could unblock the input
! 1315: */
! 1316: splx(s);
! 1317: }
! 1318: }
! 1319:
! 1320: #ifdef KGDB
! 1321:
! 1322: /*
! 1323: * If a line break is set, or data matches one of the characters
! 1324: * gdb uses to signal a connection, then start up kgdb. Just gobble
! 1325: * any other data. Done in a stand alone function because comintr
! 1326: * does tty stuff and we don't have one.
! 1327: */
! 1328:
! 1329: int
! 1330: kgdbintr(void *arg)
! 1331: {
! 1332: struct com_softc *sc = arg;
! 1333: bus_space_tag_t iot = sc->sc_iot;
! 1334: bus_space_handle_t ioh = sc->sc_ioh;
! 1335: u_char lsr, data, msr, delta;
! 1336:
! 1337: if (!ISSET(sc->sc_hwflags, COM_HW_KGDB))
! 1338: return(0);
! 1339:
! 1340: for (;;) {
! 1341: lsr = bus_space_read_1(iot, ioh, com_lsr);
! 1342: if (ISSET(lsr, LSR_RXRDY)) {
! 1343: do {
! 1344: data = bus_space_read_1(iot, ioh, com_data);
! 1345: if (data == 3 || data == '$' || data == '+' ||
! 1346: ISSET(lsr, LSR_BI)) {
! 1347: kgdb_connect(1);
! 1348: data = 0;
! 1349: }
! 1350: lsr = bus_space_read_1(iot, ioh, com_lsr);
! 1351: } while (ISSET(lsr, LSR_RXRDY));
! 1352:
! 1353: }
! 1354: if (ISSET(lsr, LSR_BI|LSR_FE|LSR_PE|LSR_OE))
! 1355: printf("weird lsr %02x\n", lsr);
! 1356:
! 1357: msr = bus_space_read_1(iot, ioh, com_msr);
! 1358:
! 1359: if (msr != sc->sc_msr) {
! 1360: delta = msr ^ sc->sc_msr;
! 1361: sc->sc_msr = msr;
! 1362: if (ISSET(delta, MSR_DCD)) {
! 1363: if (!ISSET(sc->sc_swflags, COM_SW_SOFTCAR)) {
! 1364: CLR(sc->sc_mcr, sc->sc_dtr);
! 1365: bus_space_write_1(iot, ioh, com_mcr, sc->sc_mcr);
! 1366: }
! 1367: }
! 1368: }
! 1369: if (ISSET(bus_space_read_1(iot, ioh, com_iir), IIR_NOPEND))
! 1370: return (1);
! 1371: }
! 1372: }
! 1373: #endif /* KGDB */
! 1374:
! 1375: int
! 1376: comintr(void *arg)
! 1377: {
! 1378: struct com_softc *sc = arg;
! 1379: struct tty *tp = sc->sc_tty;
! 1380: bus_space_tag_t iot = sc->sc_iot;
! 1381: bus_space_handle_t ioh = sc->sc_ioh;
! 1382: u_int8_t lsr, c;
! 1383: u_int rxput;
! 1384:
! 1385: if (!sc->sc_tty)
! 1386: return (0); /* can't do squat. */
! 1387:
! 1388: if (ISSET(bus_space_read_1(iot, ioh, com_iir), IIR_NOPEND))
! 1389: return (0);
! 1390:
! 1391: rxput = sc->sc_rxput;
! 1392: do {
! 1393: u_int8_t msr, delta;
! 1394:
! 1395: for (;;) {
! 1396: lsr = bus_space_read_1(iot, ioh, com_lsr);
! 1397: if (!ISSET(lsr, LSR_RCV_MASK))
! 1398: break;
! 1399: c = bus_space_read_1(iot, ioh, com_data);
! 1400: if (ISSET(lsr, LSR_BI)) {
! 1401: #ifdef DDB
! 1402: if (ISSET(sc->sc_hwflags, COM_HW_CONSOLE)) {
! 1403: if (db_console)
! 1404: Debugger();
! 1405: continue;
! 1406: }
! 1407: #endif
! 1408: c = 0;
! 1409: }
! 1410:
! 1411: sc->sc_rxbuf[rxput] = lsr;
! 1412: rxput = (rxput + 1) & RBUFMASK;
! 1413: sc->sc_rxbuf[rxput] = c;
! 1414: rxput = (rxput + 1) & RBUFMASK;
! 1415: }
! 1416: msr = bus_space_read_1(iot, ioh, com_msr);
! 1417: delta = msr ^ sc->sc_msr;
! 1418:
! 1419: ttytstamp(tp, sc->sc_msr & MSR_CTS, msr & MSR_CTS,
! 1420: sc->sc_msr & MSR_DCD, msr & MSR_DCD);
! 1421:
! 1422: if (!ISSET(delta, MSR_DCD | MSR_CTS | MSR_RI | MSR_DSR))
! 1423: continue;
! 1424: sc->sc_msr = msr;
! 1425: /*
! 1426: * stop output straight away if CTS drops and RTS/CTS flowcontrol is used
! 1427: * XXX what about DTR/DCD flowcontrol (ISSET(t_cflag, MDMBUF))
! 1428: */
! 1429: msr = (msr & 0xf0) | (delta >> 4);
! 1430: if (ISSET(tp->t_cflag, CRTSCTS) && ISSET(msr, MSR_DCTS)) {
! 1431: if (!ISSET(msr, MSR_CTS))
! 1432: sc->sc_tbc = 0;
! 1433: }
! 1434: sc->sc_rxbuf[rxput] = 0;
! 1435: rxput = (rxput + 1) & RBUFMASK;
! 1436: sc->sc_rxbuf[rxput] = msr;
! 1437: rxput = (rxput + 1) & RBUFMASK;
! 1438: } while (!ISSET(bus_space_read_1(iot, ioh, com_iir), IIR_NOPEND));
! 1439: if (ISSET(lsr, LSR_TXRDY)) {
! 1440: if (sc->sc_tbc > 0) {
! 1441: int n;
! 1442:
! 1443: n = sc->sc_fifolen;
! 1444: if (n > sc->sc_tbc)
! 1445: n = sc->sc_tbc;
! 1446: while (--n >= 0) {
! 1447: bus_space_write_1(iot, ioh, com_data, *sc->sc_tba++);
! 1448: --sc->sc_tbc;
! 1449: }
! 1450: }
! 1451: else if (ISSET(tp->t_state, TS_BUSY)) {
! 1452: sc->sc_rxbuf[rxput] = lsr;
! 1453: rxput = (rxput + 1) & RBUFMASK;
! 1454: }
! 1455: }
! 1456: if (sc->sc_rxput != rxput) {
! 1457: /*
! 1458: * XXX
! 1459: * This is the place to do input flow control by dropping RTS or DTR.
! 1460: * However, 115200 bps transfers get maxcc only up to 112 while there's
! 1461: * room for 512 so should we bother ?
! 1462: */
! 1463: #ifdef PCCOM_DEBUG
! 1464: int cc;
! 1465:
! 1466: cc = rxput - sc->sc_rxget;
! 1467: if (cc < 0)
! 1468: cc += RBUFSIZE;
! 1469: if (cc > maxcc)
! 1470: maxcc = cc;
! 1471: #endif
! 1472: sc->sc_rxput = rxput;
! 1473: setsofttty();
! 1474: }
! 1475: return 1;
! 1476: }
! 1477:
! 1478: void
! 1479: pccom_xr16850_fifo_init(bus_space_tag_t iot, bus_space_handle_t ioh)
! 1480: {
! 1481: u_int8_t lcr, efr, fctl;
! 1482:
! 1483: lcr = bus_space_read_1(iot, ioh, com_lcr);
! 1484: bus_space_write_1(iot, ioh, com_lcr, LCR_EFR);
! 1485: efr = bus_space_read_1(iot, ioh, com_efr);
! 1486: bus_space_write_1(iot, ioh, com_efr, efr | EFR_ECB);
! 1487: fctl = bus_space_read_1(iot, ioh, com_fctl);
! 1488: bus_space_write_1(iot, ioh, com_fctl, fctl | FCTL_TRIGGER3);
! 1489: bus_space_write_1(iot, ioh, com_lcr, lcr);
! 1490: }
! 1491:
! 1492: /*
! 1493: * Following are all routines needed for PCCOM to act as console
! 1494: */
! 1495:
! 1496: void
! 1497: comcnprobe(struct consdev *cp)
! 1498: {
! 1499: /* XXX NEEDS TO BE FIXED XXX */
! 1500: bus_space_tag_t iot = 0;
! 1501: bus_space_handle_t ioh;
! 1502: int found;
! 1503:
! 1504: if (bus_space_map(iot, CONADDR, COM_NPORTS, 0, &ioh))
! 1505: return;
! 1506: found = comprobe1(iot, ioh);
! 1507: bus_space_unmap(iot, ioh, COM_NPORTS);
! 1508: if (!found)
! 1509: return;
! 1510:
! 1511: /* locate the major number */
! 1512: for (commajor = 0; commajor < nchrdev; commajor++)
! 1513: if (cdevsw[commajor].d_open == comopen)
! 1514: break;
! 1515:
! 1516: /* initialize required fields */
! 1517: cp->cn_dev = makedev(commajor, CONUNIT);
! 1518: #if defined(COMCONSOLE) || defined(PCCOMCONSOLE)
! 1519: cp->cn_pri = CN_REMOTE; /* Force a serial port console */
! 1520: #else
! 1521: cp->cn_pri = CN_NORMAL;
! 1522: #endif
! 1523: }
! 1524:
! 1525: /*
! 1526: * The following functions are polled getc and putc routines, shared
! 1527: * by the console and kgdb glue.
! 1528: */
! 1529:
! 1530: int
! 1531: com_common_getc(bus_space_tag_t iot, bus_space_handle_t ioh)
! 1532: {
! 1533: int s = splhigh();
! 1534: u_char stat, c;
! 1535:
! 1536: /* block until a character becomes available */
! 1537: while (!ISSET(stat = bus_space_read_1(iot, ioh, com_lsr), LSR_RXRDY))
! 1538: continue;
! 1539:
! 1540: c = bus_space_read_1(iot, ioh, com_data);
! 1541: /* clear any interrupts generated by this transmission */
! 1542: stat = bus_space_read_1(iot, ioh, com_iir);
! 1543: splx(s);
! 1544: return (c);
! 1545: }
! 1546:
! 1547: void
! 1548: com_common_putc(bus_space_tag_t iot, bus_space_handle_t ioh, int c)
! 1549: {
! 1550: int s = splhigh();
! 1551: int timo;
! 1552:
! 1553: /* wait for any pending transmission to finish */
! 1554: timo = 150000;
! 1555: while (!ISSET(bus_space_read_1(iot, ioh, com_lsr), LSR_TXRDY) && --timo)
! 1556: continue;
! 1557:
! 1558: bus_space_write_1(iot, ioh, com_data, c);
! 1559:
! 1560: /* wait for this transmission to complete */
! 1561: timo = 1500000;
! 1562: while (!ISSET(bus_space_read_1(iot, ioh, com_lsr), LSR_TXRDY) && --timo)
! 1563: continue;
! 1564:
! 1565: splx(s);
! 1566: }
! 1567:
! 1568: /*
! 1569: * Following are all routines needed for COM to act as console
! 1570: */
! 1571:
! 1572: void
! 1573: comcninit(struct consdev *cp)
! 1574: {
! 1575:
! 1576: #if 0
! 1577: XXX NEEDS TO BE FIXED XXX
! 1578: comconsiot = ???;
! 1579: #endif
! 1580:
! 1581: #ifdef CONADDR_OVERRIDE
! 1582: comconsaddr = CONADDR;
! 1583: #else
! 1584: const int comports[4] = { 0x3f8, 0x2f8, 0x3e8, 0x2e8 };
! 1585: int unit = minor(cp->cn_dev);
! 1586:
! 1587: if (unit >= 0 && unit < 4)
! 1588: comconsaddr = comports[unit];
! 1589: else
! 1590: comconsaddr = CONADDR;
! 1591: #endif
! 1592:
! 1593: if (bus_space_map(comconsiot, comconsaddr, COM_NPORTS, 0, &comconsioh))
! 1594: panic("comcninit: mapping failed");
! 1595:
! 1596: cominit(comconsiot, comconsioh, comdefaultrate);
! 1597: comconsinit = 0;
! 1598: }
! 1599:
! 1600: void
! 1601: cominit(bus_space_tag_t iot, bus_space_handle_t ioh, int rate)
! 1602: {
! 1603: int s = splhigh();
! 1604: u_int8_t stat;
! 1605:
! 1606: bus_space_write_1(iot, ioh, com_lcr, LCR_DLAB);
! 1607: rate = comspeed(COM_FREQ, rate); /* XXX not comdefaultrate? */
! 1608: bus_space_write_1(iot, ioh, com_dlbl, rate);
! 1609: bus_space_write_1(iot, ioh, com_dlbh, rate >> 8);
! 1610: bus_space_write_1(iot, ioh, com_lcr, LCR_8BITS);
! 1611: bus_space_write_1(iot, ioh, com_mcr, MCR_DTR | MCR_RTS);
! 1612: bus_space_write_1(iot, ioh, com_ier, IER_ERXRDY | IER_ETXRDY);
! 1613: bus_space_write_1(iot, ioh, com_fifo,
! 1614: FIFO_ENABLE | FIFO_RCV_RST | FIFO_XMT_RST | FIFO_TRIGGER_4);
! 1615: stat = bus_space_read_1(iot, ioh, com_iir);
! 1616: splx(s);
! 1617: }
! 1618:
! 1619: int
! 1620: comcngetc(dev_t dev)
! 1621: {
! 1622: return (com_common_getc(comconsiot, comconsioh));
! 1623: }
! 1624:
! 1625: /*
! 1626: * Console kernel output character routine.
! 1627: */
! 1628: void
! 1629: comcnputc(dev_t dev, int c)
! 1630: {
! 1631: #if 0
! 1632: /* XXX not needed? */
! 1633: bus_space_tag_t iot = comconsiot;
! 1634: bus_space_handle_t ioh = comconsioh;
! 1635:
! 1636: if (comconsinit == 0) {
! 1637: cominit(iot, ioh, comdefaultrate);
! 1638: comconsinit = 1;
! 1639: }
! 1640: #endif
! 1641: com_common_putc(comconsiot, comconsioh, c);
! 1642: }
! 1643:
! 1644: void
! 1645: comcnpollc(dev_t dev, int on)
! 1646: {
! 1647:
! 1648: }
! 1649:
! 1650: #ifdef KGDB
! 1651: int
! 1652: com_kgdb_attach(bus_space_tag_t iot, bus_addr_t iobase, int rate, int frequency,
! 1653: tcflag_t cflag)
! 1654: {
! 1655: if (iot == comconsiot && iobase == comconsaddr) {
! 1656: return (EBUSY); /* cannot share with console */
! 1657: }
! 1658:
! 1659: com_kgdb_iot = iot;
! 1660: com_kgdb_addr = iobase;
! 1661:
! 1662: if (bus_space_map(com_kgdb_iot, com_kgdb_addr, COM_NPORTS, 0,
! 1663: &com_kgdb_ioh))
! 1664: panic("com_kgdb_attach: mapping failed");
! 1665:
! 1666: /* XXX We currently don't respect KGDBMODE? */
! 1667: cominit(com_kgdb_iot, com_kgdb_ioh, rate);
! 1668:
! 1669: kgdb_attach(com_kgdb_getc, com_kgdb_putc, NULL);
! 1670: kgdb_dev = 123; /* unneeded, only to satisfy some tests */
! 1671:
! 1672: return (0);
! 1673: }
! 1674:
! 1675: /* ARGSUSED */
! 1676: int
! 1677: com_kgdb_getc(void *arg)
! 1678: {
! 1679:
! 1680: return (com_common_getc(com_kgdb_iot, com_kgdb_ioh));
! 1681: }
! 1682:
! 1683: /* ARGSUSED */
! 1684: void
! 1685: com_kgdb_putc(void *arg, int c)
! 1686: {
! 1687:
! 1688: return (com_common_putc(com_kgdb_iot, com_kgdb_ioh, c));
! 1689: }
! 1690: #endif /* KGDB */
CVSweb