sys/dev/cy/cy.c

   1 /*-
   2  * cyclades cyclom-y serial driver
   3  *      Andrew Herbert <andrew@werple.apana.org.au>, 17 August 1993
   4  *
   5  * Copyright (c) 1993 Andrew Herbert.
   6  * All rights reserved.
   7  *
   8  * Redistribution and use in source and binary forms, with or without
   9  * modification, are permitted provided that the following conditions
  10  * are met:
  11  * 1. Redistributions of source code must retain the above copyright
  12  *    notice, this list of conditions and the following disclaimer.
  13  * 2. Redistributions in binary form must reproduce the above copyright
  14  *    notice, this list of conditions and the following disclaimer in the
  15  *    documentation and/or other materials provided with the distribution.
  16  * 3. The name Andrew Herbert may not be used to endorse or promote products
  17  *    derived from this software without specific prior written permission.
  18  *
  19  * THIS SOFTWARE IS PROVIDED BY ``AS IS'' AND ANY EXPRESS OR IMPLIED
  20  * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
  21  * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN
  22  * NO EVENT SHALL I BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
  23  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
  24  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
  25  * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
  26  * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
  27  * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
  28  * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  29  *
  30  * $FreeBSD$
  31  */
  32
  33 #include "opt_compat.h"
  34 #include "cy.h"
  35
  36 /*
  37  * TODO:
  38  * Atomic COR change.
  39  * Consoles.
  40  */
  41
  42 /*
  43  * Temporary compile-time configuration options.
  44  */
  45 #define RxFifoThreshold (CD1400_RX_FIFO_SIZE / 2)
  46                         /* Number of chars in the receiver FIFO before an
  47                          * an interrupt is generated.  Should depend on
  48                          * line speed.  Needs to be about 6 on a 486DX33
  49                          * for 4 active ports at 115200 bps.  Why doesn't
  50                          * 10 work?
  51                          */
  52 #define PollMode        /* Use polling-based irq service routine, not the
  53                          * hardware svcack lines.  Must be defined for
  54                          * Cyclom-16Y boards.  Less efficient for Cyclom-8Ys,
  55                          * and stops 4 * 115200 bps from working.
  56                          */
  57 #undef  Smarts          /* Enable slightly more CD1400 intelligence.  Mainly
  58                          * the output CR/LF processing, plus we can avoid a
  59                          * few checks usually done in ttyinput().
  60                          *
  61                          * XXX not fully implemented, and not particularly
  62                          * worthwhile.
  63                          */
  64 #undef  CyDebug         /* Include debugging code (not very expensive). */
  65
  66 /* These will go away. */
  67 #undef  SOFT_CTS_OFLOW
  68 #define SOFT_HOTCHAR
  69
  70 #include <sys/param.h>
  71 #include <sys/systm.h>
  72 #include <sys/bus.h>
  73 #include <sys/conf.h>
  74 #include <sys/dkstat.h>
  75 #include <sys/fcntl.h>
  76 #include <sys/interrupt.h>
  77 #include <sys/kernel.h>
  78 #include <sys/lock.h>
  79 #include <sys/malloc.h>
  80 #include <sys/mutex.h>
  81 #include <sys/syslog.h>
  82 #include <sys/tty.h>
  83
  84 #include <machine/psl.h>
  85
  86 #include <i386/isa/isa_device.h>
  87 #include <i386/isa/cyreg.h>
  88 #include <i386/isa/ic/cd1400.h>
  89
  90 #ifndef COMPAT_OLDISA
  91 #error "The cy device requires the old isa compatibility shims"
  92 #endif
  93
  94 #ifdef SMP
  95
  96 #include <machine/smptests.h>                   /** xxx_LOCK */
  97
  98 #ifdef USE_COMLOCK
  99 #define COM_LOCK()      mtx_lock_spin(&com_mtx)
 100 #define COM_UNLOCK()    mtx_unlock_spin(&com_mtx)
 101 #else
 102 #define COM_LOCK()
 103 #define COM_UNLOCK()
 104 #endif /* USE_COMLOCK */
 105
 106 #else /* SMP */
 107
 108 #define COM_LOCK()
 109 #define COM_UNLOCK()
 110
 111 #endif /* SMP */
 112
 113 extern struct mtx       com_mtx;
 114
 115 /*
 116  * Dictionary so that I can name everything *sio* or *com* to compare with
 117  * sio.c.  There is also lots of ugly formatting and unnecessary ifdefs to
 118  * simplify the comparision.  These will go away.
 119  */
 120 #define LSR_BI          CD1400_RDSR_BREAK
 121 #define LSR_FE          CD1400_RDSR_FE
 122 #define LSR_OE          CD1400_RDSR_OE
 123 #define LSR_PE          CD1400_RDSR_PE
 124 #define MCR_DTR         CD1400_MSVR2_DTR
 125 #define MCR_RTS         CD1400_MSVR1_RTS
 126 #define MSR_CTS         CD1400_MSVR2_CTS
 127 #define MSR_DCD         CD1400_MSVR2_CD
 128 #define MSR_DSR         CD1400_MSVR2_DSR
 129 #define MSR_RI          CD1400_MSVR2_RI
 130 #define NSIO            (NCY * CY_MAX_PORTS)
 131 #define comconsole      cyconsole
 132 #define comdefaultrate  cydefaultrate
 133 #define com_events      cy_events
 134 #define comhardclose    cyhardclose
 135 #define commctl         cymctl
 136 #define comparam        cyparam
 137 #define comspeed        cyspeed
 138 #define comstart        cystart
 139 #define comwakeup       cywakeup
 140 #define p_com_addr      p_cy_addr
 141 #define sioattach       cyattach
 142 #define sioclose        cyclose
 143 #define siodriver       cydriver
 144 #define siodtrwakeup    cydtrwakeup
 145 #define sioinput        cyinput
 146 #define siointr         cyintr
 147 #define siointr1        cyintr1
 148 #define sioioctl        cyioctl
 149 #define sioopen         cyopen
 150 #define siopoll         cypoll
 151 #define sioprobe        cyprobe
 152 #define siosettimeout   cysettimeout
 153 #define siosetwater     cysetwater
 154 #define comstop         cystop
 155 #define siowrite        cywrite
 156 #define sio_ih          cy_ih
 157 #define sio_irec        cy_irec
 158 #define sio_timeout     cy_timeout
 159 #define sio_timeout_handle cy_timeout_handle
 160 #define sio_timeouts_until_log  cy_timeouts_until_log
 161
 162 #define CY_MAX_PORTS            (CD1400_NO_OF_CHANNELS * CY_MAX_CD1400s)
 163
 164 /* We encode the cyclom unit number (cyu) in spare bits in the IVR's. */
 165 #define CD1400_xIVR_CHAN_SHIFT  3
 166 #define CD1400_xIVR_CHAN        0x1F
 167
 168 /*
 169  * ETC states.  com->etc may also contain a hardware ETC command value,
 170  * meaning that execution of that command is pending.
 171  */
 172 #define ETC_NONE                0       /* we depend on bzero() setting this */
 173 #define ETC_BREAK_STARTING      1
 174 #define ETC_BREAK_STARTED       2
 175 #define ETC_BREAK_ENDING        3
 176 #define ETC_BREAK_ENDED         4
 177
 178 #define LOTS_OF_EVENTS  64      /* helps separate urgent events from input */
 179
 180 #define CALLOUT_MASK            0x80
 181 #define CONTROL_MASK            0x60
 182 #define CONTROL_INIT_STATE      0x20
 183 #define CONTROL_LOCK_STATE      0x40
 184 #define DEV_TO_UNIT(dev)        (MINOR_TO_UNIT(minor(dev)))
 185 #define MINOR_MAGIC_MASK        (CALLOUT_MASK | CONTROL_MASK)
 186 /*
 187  * Not all of the magic is parametrized in the following macros.  16 and
 188  * 0xff are related to the bitfields in a udev_t.  CY_MAX_PORTS must be
 189  * ((0xff & ~MINOR_MAGIC_MASK) + 1) for things to work.
 190  */
 191 #define MINOR_TO_UNIT(mynor)    (((mynor) >> 16) * CY_MAX_PORTS \
 192                                  | (((mynor) & 0xff) & ~MINOR_MAGIC_MASK))
 193 #define UNIT_TO_MINOR(unit)     (((unit) / CY_MAX_PORTS) << 16 \
 194                                  | (((unit) & 0xff) & ~MINOR_MAGIC_MASK))
 195
 196 /*
 197  * com state bits.
 198  * (CS_BUSY | CS_TTGO) and (CS_BUSY | CS_TTGO | CS_ODEVREADY) must be higher
 199  * than the other bits so that they can be tested as a group without masking
 200  * off the low bits.
 201  *
 202  * The following com and tty flags correspond closely:
 203  *      CS_BUSY         = TS_BUSY (maintained by comstart(), siopoll() and
 204  *                                 comstop())
 205  *      CS_TTGO         = ~TS_TTSTOP (maintained by comparam() and comstart())
 206  *      CS_CTS_OFLOW    = CCTS_OFLOW (maintained by comparam())
 207  *      CS_RTS_IFLOW    = CRTS_IFLOW (maintained by comparam())
 208  * TS_FLUSH is not used.
 209  * XXX I think TIOCSETA doesn't clear TS_TTSTOP when it clears IXON.
 210  * XXX CS_*FLOW should be CF_*FLOW in com->flags (control flags not state).
 211  */
 212 #define CS_BUSY         0x80    /* output in progress */
 213 #define CS_TTGO         0x40    /* output not stopped by XOFF */
 214 #define CS_ODEVREADY    0x20    /* external device h/w ready (CTS) */
 215 #define CS_CHECKMSR     1       /* check of MSR scheduled */
 216 #define CS_CTS_OFLOW    2       /* use CTS output flow control */
 217 #define CS_DTR_OFF      0x10    /* DTR held off */
 218 #define CS_ODONE        4       /* output completed */
 219 #define CS_RTS_IFLOW    8       /* use RTS input flow control */
 220 #define CSE_ODONE       1       /* output transmitted */
 221
 222 static  char const * const      error_desc[] = {
 223 #define CE_OVERRUN                      0
 224         "silo overflow",
 225 #define CE_INTERRUPT_BUF_OVERFLOW       1
 226         "interrupt-level buffer overflow",
 227 #define CE_TTY_BUF_OVERFLOW             2
 228         "tty-level buffer overflow",
 229 };
 230
 231 #define CE_NTYPES                       3
 232 #define CE_RECORD(com, errnum)          (++(com)->delta_error_counts[errnum])
 233
 234 /* types.  XXX - should be elsewhere */
 235 typedef u_char  bool_t;         /* boolean */
 236 typedef u_char volatile *cy_addr;
 237
 238 /* queue of linear buffers */
 239 struct lbq {
 240         u_char  *l_head;        /* next char to process */
 241         u_char  *l_tail;        /* one past the last char to process */
 242         struct lbq *l_next;     /* next in queue */
 243         bool_t  l_queued;       /* nonzero if queued */
 244 };
 245
 246 /* com device structure */
 247 struct com_s {
 248         u_char  state;          /* miscellaneous flag bits */
 249         bool_t  active_out;     /* nonzero if the callout device is open */
 250 #if 0
 251         u_char  cfcr_image;     /* copy of value written to CFCR */
 252 #endif
 253         u_char  etc;            /* pending Embedded Transmit Command */
 254         u_char  extra_state;    /* more flag bits, separate for order trick */
 255 #if 0
 256         u_char  fifo_image;     /* copy of value written to FIFO */
 257 #endif
 258         u_char  gfrcr_image;    /* copy of value read from GFRCR */
 259 #if 0
 260         bool_t  hasfifo;        /* nonzero for 16550 UARTs */
 261         bool_t  loses_outints;  /* nonzero if device loses output interrupts */
 262 #endif
 263         u_char  mcr_dtr;        /* MCR bit that is wired to DTR */
 264         u_char  mcr_image;      /* copy of value written to MCR */
 265         u_char  mcr_rts;        /* MCR bit that is wired to RTS */
 266 #if 0
 267 #ifdef COM_MULTIPORT
 268         bool_t  multiport;      /* is this unit part of a multiport device? */
 269 #endif /* COM_MULTIPORT */
 270         bool_t  no_irq;         /* nonzero if irq is not attached */
 271         bool_t  poll;           /* nonzero if polling is required */
 272         bool_t  poll_output;    /* nonzero if polling for output is required */
 273 #endif
 274         int     unit;           /* unit number */
 275         int     dtr_wait;       /* time to hold DTR down on close (* 1/hz) */
 276 #if 0
 277         u_int   tx_fifo_size;
 278 #endif
 279         u_int   wopeners;       /* # processes waiting for DCD in open() */
 280
 281         /*
 282          * The high level of the driver never reads status registers directly
 283          * because there would be too many side effects to handle conveniently.
 284          * Instead, it reads copies of the registers stored here by the
 285          * interrupt handler.
 286          */
 287         u_char  last_modem_status;      /* last MSR read by intr handler */
 288         u_char  prev_modem_status;      /* last MSR handled by high level */
 289
 290         u_char  hotchar;        /* ldisc-specific char to be handled ASAP */
 291         u_char  *ibuf;          /* start of input buffer */
 292         u_char  *ibufend;       /* end of input buffer */
 293         u_char  *ibufold;       /* old input buffer, to be freed */
 294         u_char  *ihighwater;    /* threshold in input buffer */
 295         u_char  *iptr;          /* next free spot in input buffer */
 296         int     ibufsize;       /* size of ibuf (not include error bytes) */
 297         int     ierroff;        /* offset of error bytes in ibuf */
 298
 299         struct lbq      obufq;  /* head of queue of output buffers */
 300         struct lbq      obufs[2];       /* output buffers */
 301
 302         int     cy_align;       /* index for register alignment */
 303         cy_addr cy_iobase;      /* base address of this port's cyclom */
 304         cy_addr iobase;         /* base address of this port's cd1400 */
 305         int     mcr_rts_reg;    /* cd1400 reg number of reg holding mcr_rts */
 306
 307         struct tty      *tp;    /* cross reference */
 308
 309         /* Initial state. */
 310         struct termios  it_in;  /* should be in struct tty */
 311         struct termios  it_out;
 312
 313         /* Lock state. */
 314         struct termios  lt_in;  /* should be in struct tty */
 315         struct termios  lt_out;
 316
 317         bool_t  do_timestamp;
 318         bool_t  do_dcd_timestamp;
 319         struct timeval  timestamp;
 320         struct timeval  dcd_timestamp;
 321
 322         u_long  bytes_in;       /* statistics */
 323         u_long  bytes_out;
 324         u_int   delta_error_counts[CE_NTYPES];
 325         u_long  error_counts[CE_NTYPES];
 326
 327         u_int   recv_exception; /* exception chars received */
 328         u_int   mdm;            /* modem signal changes */
 329 #ifdef CyDebug
 330         u_int   start_count;    /* no. of calls to comstart() */
 331         u_int   start_real;     /* no. of calls that did something */
 332 #endif
 333         u_char  car;            /* CD1400 CAR shadow (if first unit in cd) */
 334         u_char  channel_control;/* CD1400 CCR control command shadow */
 335         u_char  cor[3];         /* CD1400 COR1-3 shadows */
 336         u_char  intr_enable;    /* CD1400 SRER shadow */
 337
 338         /*
 339          * Data area for output buffers.  Someday we should build the output
 340          * buffer queue without copying data.
 341          */
 342         u_char  obuf1[256];
 343         u_char  obuf2[256];
 344 };
 345
 346 /* PCI driver entry point. */
 347 int     cyattach_common(cy_addr cy_iobase, int cy_align);
 348 ointhand2_t     siointr;
 349
 350 static  int     cy_units(cy_addr cy_iobase, int cy_align);
 351 static  int     sioattach(struct isa_device *dev);
 352 static  void    cd1400_channel_cmd(struct com_s *com, int cmd);
 353 static  void    cd1400_channel_cmd_wait(struct com_s *com);
 354 static  void    cd_etc(struct com_s *com, int etc);
 355 static  int     cd_getreg(struct com_s *com, int reg);
 356 static  void    cd_setreg(struct com_s *com, int reg, int val);
 357 static  timeout_t siodtrwakeup;
 358 static  void    comhardclose(struct com_s *com);
 359 static  void    sioinput(struct com_s *com);
 360 #if 0
 361 static  void    siointr1(struct com_s *com);
 362 #endif
 363 static  int     commctl(struct com_s *com, int bits, int how);
 364 static  int     comparam(struct tty *tp, struct termios *t);
 365 static  void    siopoll(void *arg);
 366 static  int     sioprobe(struct isa_device *dev);
 367 static  void    siosettimeout(void);
 368 static  int     siosetwater(struct com_s *com, speed_t speed);
 369 static  int     comspeed(speed_t speed, u_long cy_clock, int *prescaler_io);
 370 static  void    comstart(struct tty *tp);
 371 static  void    comstop(struct tty *tp, int rw);
 372 static  timeout_t comwakeup;
 373 static  void    disc_optim(struct tty *tp, struct termios *t,
 374                     struct com_s *com);
 375
 376 #ifdef CyDebug
 377 void    cystatus(int unit);
 378 #endif
 379
 380 static char driver_name[] = "cy";
 381
 382 /* table and macro for fast conversion from a unit number to its com struct */
 383 static  struct com_s    *p_com_addr[NSIO];
 384 #define com_addr(unit)  (p_com_addr[unit])
 385
 386 struct isa_driver       siodriver = {
 387         INTR_TYPE_TTY | INTR_FAST,
 388         sioprobe,
 389         sioattach,
 390         driver_name
 391 };
 392 COMPAT_ISA_DRIVER(cy, cydriver);        /* XXX */
 393
 394 static  d_open_t        sioopen;
 395 static  d_close_t       sioclose;
 396 static  d_write_t       siowrite;
 397 static  d_ioctl_t       sioioctl;
 398
 399 #define CDEV_MAJOR      48
 400 static struct cdevsw sio_cdevsw = {
 401         /* open */      sioopen,
 402         /* close */     sioclose,
 403         /* read */      ttyread,
 404         /* write */     siowrite,
 405         /* ioctl */     sioioctl,
 406         /* poll */      ttypoll,
 407         /* mmap */      nommap,
 408         /* strategy */  nostrategy,
 409         /* name */      driver_name,
 410         /* maj */       CDEV_MAJOR,
 411         /* dump */      nodump,
 412         /* psize */     nopsize,
 413         /* flags */     D_TTY | D_KQFILTER,
 414         /* kqfilter */  ttykqfilter,
 415 };
 416
 417 static  int     comconsole = -1;
 418 static  speed_t comdefaultrate = TTYDEF_SPEED;
 419 static  u_int   com_events;     /* input chars + weighted output completions */
 420 static  void    *sio_ih;
 421 static  int     sio_timeout;
 422 static  int     sio_timeouts_until_log;
 423 static  struct  callout_handle sio_timeout_handle
 424     = CALLOUT_HANDLE_INITIALIZER(&sio_timeout_handle);
 425
 426 #ifdef CyDebug
 427 static  u_int   cd_inbs;
 428 static  u_int   cy_inbs;
 429 static  u_int   cd_outbs;
 430 static  u_int   cy_outbs;
 431 static  u_int   cy_svrr_probes;
 432 static  u_int   cy_timeouts;
 433 #endif
 434
 435 static  int     cy_chip_offset[] = {
 436         0x0000, 0x0400, 0x0800, 0x0c00, 0x0200, 0x0600, 0x0a00, 0x0e00,
 437 };
 438 static  int     cy_nr_cd1400s[NCY];
 439 static  int     cy_total_devices;
 440 #undef  RxFifoThreshold
 441 static  int     volatile RxFifoThreshold = (CD1400_RX_FIFO_SIZE / 2);
 442
 443 static int
 444 sioprobe(dev)
 445         struct isa_device       *dev;
 446 {
 447         cy_addr iobase;
 448
 449         iobase = (cy_addr)dev->id_maddr;
 450
 451         /* Cyclom-16Y hardware reset (Cyclom-8Ys don't care) */
 452         cy_inb(iobase, CY16_RESET, 0);  /* XXX? */
 453         DELAY(500);     /* wait for the board to get its act together */
 454
 455         /* this is needed to get the board out of reset */
 456         cy_outb(iobase, CY_CLEAR_INTR, 0, 0);
 457         DELAY(500);
 458
 459         return (cy_units(iobase, 0) == 0 ? 0 : -1);
 460 }
 461
 462 static int
 463 cy_units(cy_iobase, cy_align)
 464         cy_addr cy_iobase;
 465         int     cy_align;
 466 {
 467         int     cyu;
 468         u_char  firmware_version;
 469         int     i;
 470         cy_addr iobase;
 471
 472         for (cyu = 0; cyu < CY_MAX_CD1400s; ++cyu) {
 473                 iobase = cy_iobase + (cy_chip_offset[cyu] << cy_align);
 474
 475                 /* wait for chip to become ready for new command */
 476                 for (i = 0; i < 10; i++) {
 477                         DELAY(50);
 478                         if (!cd_inb(iobase, CD1400_CCR, cy_align))
 479                                 break;
 480                 }
 481
 482                 /* clear the GFRCR register */
 483                 cd_outb(iobase, CD1400_GFRCR, cy_align, 0);
 484
 485                 /* issue a reset command */
 486                 cd_outb(iobase, CD1400_CCR, cy_align,
 487                         CD1400_CCR_CMDRESET | CD1400_CCR_FULLRESET);
 488
 489                 /* XXX bogus initialization to avoid a gcc bug/warning. */
 490                 firmware_version = 0;
 491
 492                 /* wait for the CD1400 to initialize itself */
 493                 for (i = 0; i < 200; i++) {
 494                         DELAY(50);
 495
 496                         /* retrieve firmware version */
 497                         firmware_version = cd_inb(iobase, CD1400_GFRCR,
 498                                                   cy_align);
 499                         if ((firmware_version & 0xf0) == 0x40)
 500                                 break;
 501                 }
 502
 503                 /*
 504                  * Anything in the 0x40-0x4F range is fine.
 505                  * If one CD1400 is bad then we don't support higher
 506                  * numbered good ones on this board.
 507                  */
 508                 if ((firmware_version & 0xf0) != 0x40)
 509                         break;
 510         }
 511         return (cyu);
 512 }
 513
 514 static int
 515 sioattach(isdp)
 516         struct isa_device       *isdp;
 517 {
 518         int     adapter;
 519
 520         adapter = cyattach_common((cy_addr) isdp->id_maddr, 0);
 521         if (adapter < 0)
 522                 return (0);
 523
 524         /*
 525          * XXX
 526          * This kludge is to allow ISA/PCI device specifications in the
 527          * kernel config file to be in any order.
 528          */
 529         if (isdp->id_unit != adapter) {
 530                 printf("cy%d: attached as cy%d\n", isdp->id_unit, adapter);
 531                 isdp->id_unit = adapter;        /* XXX */
 532         }
 533         isdp->id_ointr = siointr;
 534         /* isdp->id_ri_flags |= RI_FAST; XXX unimplemented - use newbus! */
 535         return (1);
 536 }
 537
 538 int
 539 cyattach_common(cy_iobase, cy_align)
 540         cy_addr cy_iobase;
 541         int     cy_align;
 542 {
 543         int     adapter;
 544         int     cyu;
 545         u_char  firmware_version;
 546         cy_addr iobase;
 547         int     minorbase;
 548         int     ncyu;
 549         int     unit;
 550
 551         adapter = cy_total_devices;
 552         if ((u_int)adapter >= NCY) {
 553                 printf(
 554         "cy%d: can't attach adapter: insufficient cy devices configured\n",
 555                        adapter);
 556                 return (-1);
 557         }
 558         ncyu = cy_units(cy_iobase, cy_align);
 559         if (ncyu == 0)
 560                 return (-1);
 561         cy_nr_cd1400s[adapter] = ncyu;
 562         cy_total_devices++;
 563
 564         unit = adapter * CY_MAX_PORTS;
 565         for (cyu = 0; cyu < ncyu; ++cyu) {
 566                 int     cdu;
 567
 568                 iobase = (cy_addr) (cy_iobase
 569                                     + (cy_chip_offset[cyu] << cy_align));
 570                 firmware_version = cd_inb(iobase, CD1400_GFRCR, cy_align);
 571
 572                 /* Set up a receive timeout period of than 1+ ms. */
 573                 cd_outb(iobase, CD1400_PPR, cy_align,
 574                         howmany(CY_CLOCK(firmware_version)
 575                                 / CD1400_PPR_PRESCALER, 1000));
 576
 577                 for (cdu = 0; cdu < CD1400_NO_OF_CHANNELS; ++cdu, ++unit) {
 578                         struct com_s    *com;
 579                         int             s;
 580
 581         com = malloc(sizeof *com, M_DEVBUF, M_NOWAIT | M_ZERO);
 582         if (com == NULL)
 583                 break;
 584         com->unit = unit;
 585                         com->gfrcr_image = firmware_version;
 586                         if (CY_RTS_DTR_SWAPPED(firmware_version)) {
 587                                 com->mcr_dtr = MCR_RTS;
 588                                 com->mcr_rts = MCR_DTR;
 589                                 com->mcr_rts_reg = CD1400_MSVR2;
 590                         } else {
 591                                 com->mcr_dtr = MCR_DTR;
 592                                 com->mcr_rts = MCR_RTS;
 593                                 com->mcr_rts_reg = CD1400_MSVR1;
 594                         }
 595         com->dtr_wait = 3 * hz;
 596         com->obufs[0].l_head = com->obuf1;
 597         com->obufs[1].l_head = com->obuf2;
 598
 599                         com->cy_align = cy_align;
 600                         com->cy_iobase = cy_iobase;
 601         com->iobase = iobase;
 602                         com->car = ~CD1400_CAR_CHAN;
 603
 604         /*
 605          * We don't use all the flags from <sys/ttydefaults.h> since they
 606          * are only relevant for logins.  It's important to have echo off
 607          * initially so that the line doesn't start blathering before the
 608          * echo flag can be turned off.
 609          */
 610         com->it_in.c_iflag = 0;
 611         com->it_in.c_oflag = 0;
 612         com->it_in.c_cflag = TTYDEF_CFLAG;
 613         com->it_in.c_lflag = 0;
 614         if (unit == comconsole) {
 615                 com->it_in.c_iflag = TTYDEF_IFLAG;
 616                 com->it_in.c_oflag = TTYDEF_OFLAG;
 617                 com->it_in.c_cflag = TTYDEF_CFLAG | CLOCAL;
 618                 com->it_in.c_lflag = TTYDEF_LFLAG;
 619                 com->lt_out.c_cflag = com->lt_in.c_cflag = CLOCAL;
 620         }
 621         if (siosetwater(com, com->it_in.c_ispeed) != 0) {
 622                 free(com, M_DEVBUF);
 623                 return (0);
 624         }
 625         termioschars(&com->it_in);
 626         com->it_in.c_ispeed = com->it_in.c_ospeed = comdefaultrate;
 627         com->it_out = com->it_in;
 628
 629         s = spltty();
 630         com_addr(unit) = com;
 631         splx(s);
 632
 633         if (sio_ih == NULL) {
 634                 swi_add(&tty_ithd, "tty:cy", siopoll, NULL, SWI_TTY, 0,
 635                     &sio_ih);
 636         }
 637         minorbase = UNIT_TO_MINOR(unit);
 638         make_dev(&sio_cdevsw, minorbase,
 639                 UID_ROOT, GID_WHEEL, 0600, "ttyc%r%r", adapter,
 640                 unit % CY_MAX_PORTS);
 641         make_dev(&sio_cdevsw, minorbase | CONTROL_INIT_STATE,
 642                 UID_ROOT, GID_WHEEL, 0600, "ttyic%r%r", adapter,
 643                 unit % CY_MAX_PORTS);
 644         make_dev(&sio_cdevsw, minorbase | CONTROL_LOCK_STATE,
 645                 UID_ROOT, GID_WHEEL, 0600, "ttylc%r%r", adapter,
 646                 unit % CY_MAX_PORTS);
 647         make_dev(&sio_cdevsw, minorbase | CALLOUT_MASK,
 648                 UID_UUCP, GID_DIALER, 0660, "cuac%r%r", adapter,
 649                 unit % CY_MAX_PORTS);
 650         make_dev(&sio_cdevsw, minorbase | CALLOUT_MASK | CONTROL_INIT_STATE,
 651                 UID_UUCP, GID_DIALER, 0660, "cuaic%r%r", adapter,
 652                 unit % CY_MAX_PORTS);
 653         make_dev(&sio_cdevsw, minorbase | CALLOUT_MASK | CONTROL_LOCK_STATE,
 654                 UID_UUCP, GID_DIALER, 0660, "cualc%r%r", adapter,
 655                 unit % CY_MAX_PORTS);
 656                 }
 657         }
 658
 659         /* ensure an edge for the next interrupt */
 660         cy_outb(cy_iobase, CY_CLEAR_INTR, cy_align, 0);
 661
 662         return (adapter);
 663 }
 664
 665 static int
 666 sioopen(dev, flag, mode, td)
 667         dev_t           dev;
 668         int             flag;
 669         int             mode;
 670         struct thread   *td;
 671 {
 672         struct com_s    *com;
 673         int             error;
 674         int             mynor;
 675         int             s;
 676         struct tty      *tp;
 677         int             unit;
 678
 679         mynor = minor(dev);
 680         unit = MINOR_TO_UNIT(mynor);
 681         if ((u_int) unit >= NSIO || (com = com_addr(unit)) == NULL)
 682                 return (ENXIO);
 683         if (mynor & CONTROL_MASK)
 684                 return (0);
 685         tp = dev->si_tty = com->tp = ttymalloc(com->tp);
 686         s = spltty();
 687         /*
 688          * We jump to this label after all non-interrupted sleeps to pick
 689          * up any changes of the device state.
 690          */
 691 open_top:
 692         while (com->state & CS_DTR_OFF) {
 693                 error = tsleep(&com->dtr_wait, TTIPRI | PCATCH, "cydtr", 0);
 694                 if (error != 0)
 695                         goto out;
 696         }
 697         if (tp->t_state & TS_ISOPEN) {
 698                 /*
 699                  * The device is open, so everything has been initialized.
 700                  * Handle conflicts.
 701                  */
 702                 if (mynor & CALLOUT_MASK) {
 703                         if (!com->active_out) {
 704                                 error = EBUSY;
 705                                 goto out;
 706                         }
 707                 } else {
 708                         if (com->active_out) {
 709                                 if (flag & O_NONBLOCK) {
 710                                         error = EBUSY;
 711                                         goto out;
 712                                 }
 713                                 error = tsleep(&com->active_out,
 714                                                TTIPRI | PCATCH, "cybi", 0);
 715                                 if (error != 0)
 716                                         goto out;
 717                                 goto open_top;
 718                         }
 719                 }
 720                 if (tp->t_state & TS_XCLUDE &&
 721                     suser(td)) {
 722                         error = EBUSY;
 723                         goto out;
 724                 }
 725         } else {
 726                 /*
 727                  * The device isn't open, so there are no conflicts.
 728                  * Initialize it.  Initialization is done twice in many
 729                  * cases: to preempt sleeping callin opens if we are
 730                  * callout, and to complete a callin open after DCD rises.
 731                  */
 732                 tp->t_oproc = comstart;
 733                 tp->t_stop = comstop;
 734                 tp->t_param = comparam;
 735                 tp->t_dev = dev;
 736                 tp->t_termios = mynor & CALLOUT_MASK
 737                                 ? com->it_out : com->it_in;
 738
 739                 /* Encode per-board unit in LIVR for access in intr routines. */
 740                 cd_setreg(com, CD1400_LIVR,
 741                           (unit & CD1400_xIVR_CHAN) << CD1400_xIVR_CHAN_SHIFT);
 742
 743                 (void)commctl(com, TIOCM_DTR | TIOCM_RTS, DMSET);
 744 #if 0
 745                 com->poll = com->no_irq;
 746                 com->poll_output = com->loses_outints;
 747 #endif
 748                 ++com->wopeners;
 749                 error = comparam(tp, &tp->t_termios);
 750                 --com->wopeners;
 751                 if (error != 0)
 752                         goto out;
 753 #if 0
 754                 if (com->hasfifo) {
 755                         /*
 756                          * (Re)enable and flush fifos.
 757                          *
 758                          * Certain SMC chips cause problems if the fifos
 759                          * are enabled while input is ready.  Turn off the
 760                          * fifo if necessary to clear the input.  We test
 761                          * the input ready bit after enabling the fifos
 762                          * since we've already enabled them in comparam()
 763                          * and to handle races between enabling and fresh
 764                          * input.
 765                          */
 766                         while (TRUE) {
 767                                 outb(iobase + com_fifo,
 768                                      FIFO_RCV_RST | FIFO_XMT_RST
 769                                      | com->fifo_image);
 770                                 DELAY(100);
 771                                 if (!(inb(com->line_status_port) & LSR_RXRDY))
 772                                         break;
 773                                 outb(iobase + com_fifo, 0);
 774                                 DELAY(100);
 775                                 (void) inb(com->data_port);
 776                         }
 777                 }
 778
 779                 critical_enter();
 780                 COM_LOCK();
 781                 (void) inb(com->line_status_port);
 782                 (void) inb(com->data_port);
 783                 com->prev_modem_status = com->last_modem_status
 784                     = inb(com->modem_status_port);
 785                 outb(iobase + com_ier, IER_ERXRDY | IER_ETXRDY | IER_ERLS
 786                                        | IER_EMSC);
 787                 COM_UNLOCK();
 788                 critical_exit();
 789 #else /* !0 */
 790                 /*
 791                  * Flush fifos.  This requires a full channel reset which
 792                  * also disables the transmitter and receiver.  Recover
 793                  * from this.
 794                  */
 795                 cd1400_channel_cmd(com,
 796                                    CD1400_CCR_CMDRESET | CD1400_CCR_CHANRESET);
 797                 cd1400_channel_cmd(com, com->channel_control);
 798
 799                 critical_enter();
 800                 COM_LOCK();
 801                 com->prev_modem_status = com->last_modem_status
 802                     = cd_getreg(com, CD1400_MSVR2);
 803                 cd_setreg(com, CD1400_SRER,
 804                           com->intr_enable
 805                           = CD1400_SRER_MDMCH | CD1400_SRER_RXDATA);
 806                 COM_UNLOCK();
 807                 critical_exit();
 808 #endif /* 0 */
 809                 /*
 810                  * Handle initial DCD.  Callout devices get a fake initial
 811                  * DCD (trapdoor DCD).  If we are callout, then any sleeping
 812                  * callin opens get woken up and resume sleeping on "cybi"
 813                  * instead of "cydcd".
 814                  */
 815                 /*
 816                  * XXX `mynor & CALLOUT_MASK' should be
 817                  * `tp->t_cflag & (SOFT_CARRIER | TRAPDOOR_CARRIER) where
 818                  * TRAPDOOR_CARRIER is the default initial state for callout
 819                  * devices and SOFT_CARRIER is like CLOCAL except it hides
 820                  * the true carrier.
 821                  */
 822                 if (com->prev_modem_status & MSR_DCD || mynor & CALLOUT_MASK)
 823                         (*linesw[tp->t_line].l_modem)(tp, 1);
 824         }
 825         /*
 826          * Wait for DCD if necessary.
 827          */
 828         if (!(tp->t_state & TS_CARR_ON) && !(mynor & CALLOUT_MASK)
 829             && !(tp->t_cflag & CLOCAL) && !(flag & O_NONBLOCK)) {
 830                 ++com->wopeners;
 831                 error = tsleep(TSA_CARR_ON(tp), TTIPRI | PCATCH, "cydcd", 0);
 832                 --com->wopeners;
 833                 if (error != 0)
 834                         goto out;
 835                 goto open_top;
 836         }
 837         error = (*linesw[tp->t_line].l_open)(dev, tp);
 838         disc_optim(tp, &tp->t_termios, com);
 839         if (tp->t_state & TS_ISOPEN && mynor & CALLOUT_MASK)
 840                 com->active_out = TRUE;
 841         siosettimeout();
 842 out:
 843         splx(s);
 844         if (!(tp->t_state & TS_ISOPEN) && com->wopeners == 0)
 845                 comhardclose(com);
 846         return (error);
 847 }
 848
 849 static int
 850 sioclose(dev, flag, mode, td)
 851         dev_t           dev;
 852         int             flag;
 853         int             mode;
 854         struct thread   *td;
 855 {
 856         struct com_s    *com;
 857         int             mynor;
 858         int             s;
 859         struct tty      *tp;
 860
 861         mynor = minor(dev);
 862         if (mynor & CONTROL_MASK)
 863                 return (0);
 864         com = com_addr(MINOR_TO_UNIT(mynor));
 865         tp = com->tp;
 866         s = spltty();
 867         cd_etc(com, CD1400_ETC_STOPBREAK);
 868         (*linesw[tp->t_line].l_close)(tp, flag);
 869         disc_optim(tp, &tp->t_termios, com);
 870         comstop(tp, FREAD | FWRITE);
 871         comhardclose(com);
 872         ttyclose(tp);
 873         siosettimeout();
 874         splx(s);
 875 #ifdef broken /* session holds a ref to the tty; can't deallocate */
 876         ttyfree(tp);
 877         com->tp = NULL;
 878 #endif
 879         return (0);
 880 }
 881
 882 static void
 883 comhardclose(com)
 884         struct com_s    *com;
 885 {
 886         cy_addr         iobase;
 887         int             s;
 888         struct tty      *tp;
 889         int             unit;
 890
 891         unit = com->unit;
 892         iobase = com->iobase;
 893         s = spltty();
 894 #if 0
 895         com->poll = FALSE;
 896         com->poll_output = FALSE;
 897 #endif
 898         com->do_timestamp = 0;
 899 #if 0
 900         outb(iobase + com_cfcr, com->cfcr_image &= ~CFCR_SBREAK);
 901 #else
 902         /* XXX */
 903         critical_enter();
 904         COM_LOCK();
 905         com->etc = ETC_NONE;
 906         cd_setreg(com, CD1400_COR2, com->cor[1] &= ~CD1400_COR2_ETC);
 907         COM_UNLOCK();
 908         critical_exit();
 909         cd1400_channel_cmd(com, CD1400_CCR_CMDRESET | CD1400_CCR_FTF);
 910 #endif
 911
 912         {
 913 #if 0
 914                 outb(iobase + com_ier, 0);
 915 #else
 916                 critical_enter();
 917                 COM_LOCK();
 918                 cd_setreg(com, CD1400_SRER, com->intr_enable = 0);
 919                 COM_UNLOCK();
 920                 critical_exit();
 921 #endif
 922                 tp = com->tp;
 923                 if ((tp->t_cflag & HUPCL)
 924                     /*
 925                      * XXX we will miss any carrier drop between here and the
 926                      * next open.  Perhaps we should watch DCD even when the
 927                      * port is closed; it is not sufficient to check it at
 928                      * the next open because it might go up and down while
 929                      * we're not watching.
 930                      */
 931                     || (!com->active_out
 932                        && !(com->prev_modem_status & MSR_DCD)
 933                        && !(com->it_in.c_cflag & CLOCAL))
 934                     || !(tp->t_state & TS_ISOPEN)) {
 935                         (void)commctl(com, TIOCM_DTR, DMBIC);
 936
 937                         /* Disable receiver (leave transmitter enabled). */
 938                         com->channel_control = CD1400_CCR_CMDCHANCTL
 939                                                | CD1400_CCR_XMTEN
 940                                                | CD1400_CCR_RCVDIS;
 941                         cd1400_channel_cmd(com, com->channel_control);
 942
 943                         if (com->dtr_wait != 0 && !(com->state & CS_DTR_OFF)) {
 944                                 timeout(siodtrwakeup, com, com->dtr_wait);
 945                                 com->state |= CS_DTR_OFF;
 946                         }
 947                 }
 948         }
 949 #if 0
 950         if (com->hasfifo) {
 951                 /*
 952                  * Disable fifos so that they are off after controlled
 953                  * reboots.  Some BIOSes fail to detect 16550s when the
 954                  * fifos are enabled.
 955                  */
 956                 outb(iobase + com_fifo, 0);
 957         }
 958 #endif
 959         com->active_out = FALSE;
 960         wakeup(&com->active_out);
 961         wakeup(TSA_CARR_ON(tp));        /* restart any wopeners */
 962         splx(s);
 963 }
 964
 965 static int
 966 siowrite(dev, uio, flag)
 967         dev_t           dev;
 968         struct uio      *uio;
 969         int             flag;
 970 {
 971         int             mynor;
 972         struct tty      *tp;
 973         int             unit;
 974
 975         mynor = minor(dev);
 976         if (mynor & CONTROL_MASK)
 977                 return (ENODEV);
 978
 979         unit = MINOR_TO_UNIT(mynor);
 980         tp = com_addr(unit)->tp;
 981         /*
 982          * (XXX) We disallow virtual consoles if the physical console is
 983          * a serial port.  This is in case there is a display attached that
 984          * is not the console.  In that situation we don't need/want the X
 985          * server taking over the console.
 986          */
 987         if (constty != NULL && unit == comconsole)
 988                 constty = NULL;
 989 #ifdef Smarts
 990         /* XXX duplicate ttwrite(), but without so much output processing on
 991          * CR & LF chars.  Hardly worth the effort, given that high-throughput
 992          * sessions are raw anyhow.
 993          */
 994 #else
 995         return ((*linesw[tp->t_line].l_write)(tp, uio, flag));
 996 #endif
 997 }
 998
 999 static void
1000 siodtrwakeup(chan)
1001         void    *chan;
1002 {
1003         struct com_s    *com;
1004
1005         com = (struct com_s *)chan;
1006         com->state &= ~CS_DTR_OFF;
1007         wakeup(&com->dtr_wait);
1008 }
1009
1010 /*
1011  * This function:
1012  *  a) needs to be called with COM_LOCK() held, and
1013  *  b) needs to return with COM_LOCK() held.
1014  */
1015 static void
1016 sioinput(com)
1017         struct com_s    *com;
1018 {
1019         u_char          *buf;
1020         int             incc;
1021         u_char          line_status;
1022         int             recv_data;
1023         struct tty      *tp;
1024
1025         buf = com->ibuf;
1026         tp = com->tp;
1027         if (!(tp->t_state & TS_ISOPEN)) {
1028                 com_events -= (com->iptr - com->ibuf);
1029                 com->iptr = com->ibuf;
1030                 return;
1031         }
1032         if (tp->t_state & TS_CAN_BYPASS_L_RINT) {
1033                 /*
1034                  * Avoid the grotesquely inefficient lineswitch routine
1035                  * (ttyinput) in "raw" mode.  It usually takes about 450
1036                  * instructions (that's without canonical processing or echo!).
1037                  * slinput is reasonably fast (usually 40 instructions plus
1038                  * call overhead).
1039                  */
1040
1041                 do {
1042                         /*
1043                          * This may look odd, but it is using save-and-enable
1044                          * semantics instead of the save-and-disable semantics
1045                          * that are used everywhere else.
1046                          */
1047                         COM_UNLOCK();
1048                         critical_exit();
1049                         incc = com->iptr - buf;
1050                         if (tp->t_rawq.c_cc + incc > tp->t_ihiwat
1051                             && (com->state & CS_RTS_IFLOW
1052                                 || tp->t_iflag & IXOFF)
1053                             && !(tp->t_state & TS_TBLOCK))
1054                                 ttyblock(tp);
1055                         com->delta_error_counts[CE_TTY_BUF_OVERFLOW]
1056                                 += b_to_q((char *)buf, incc, &tp->t_rawq);
1057                         buf += incc;
1058                         tk_nin += incc;
1059                         tk_rawcc += incc;
1060                         tp->t_rawcc += incc;
1061                         ttwakeup(tp);
1062                         if (tp->t_state & TS_TTSTOP
1063                             && (tp->t_iflag & IXANY
1064                                 || tp->t_cc[VSTART] == tp->t_cc[VSTOP])) {
1065                                 tp->t_state &= ~TS_TTSTOP;
1066                                 tp->t_lflag &= ~FLUSHO;
1067                                 comstart(tp);
1068                         }
1069                         critical_enter();
1070                         COM_LOCK();
1071                 } while (buf < com->iptr);
1072         } else {
1073                 do {
1074                         /*
1075                          * This may look odd, but it is using save-and-enable
1076                          * semantics instead of the save-and-disable semantics
1077                          * that are used everywhere else.
1078                          */
1079                         COM_UNLOCK();
1080                         critical_exit();
1081                         line_status = buf[com->ierroff];
1082                         recv_data = *buf++;
1083                         if (line_status
1084                             & (LSR_BI | LSR_FE | LSR_OE | LSR_PE)) {
1085                                 if (line_status & LSR_BI)
1086                                         recv_data |= TTY_BI;
1087                                 if (line_status & LSR_FE)
1088                                         recv_data |= TTY_FE;
1089                                 if (line_status & LSR_OE)
1090                                         recv_data |= TTY_OE;
1091                                 if (line_status & LSR_PE)
1092                                         recv_data |= TTY_PE;
1093                         }
1094                         (*linesw[tp->t_line].l_rint)(recv_data, tp);
1095                         critical_enter();
1096                         COM_LOCK();
1097                 } while (buf < com->iptr);
1098         }
1099         com_events -= (com->iptr - com->ibuf);
1100         com->iptr = com->ibuf;
1101
1102         /*
1103          * There is now room for another low-level buffer full of input,
1104          * so enable RTS if it is now disabled and there is room in the
1105          * high-level buffer.
1106          */
1107         if ((com->state & CS_RTS_IFLOW) && !(com->mcr_image & com->mcr_rts) &&
1108             !(tp->t_state & TS_TBLOCK))
1109 #if 0
1110                 outb(com->modem_ctl_port, com->mcr_image |= MCR_RTS);
1111 #else
1112                 cd_setreg(com, com->mcr_rts_reg,
1113                           com->mcr_image |= com->mcr_rts);
1114 #endif
1115 }
1116
1117 void
1118 siointr(unit)
1119         int     unit;
1120 {
1121         int     baseu;
1122         int     cy_align;
1123         cy_addr cy_iobase;
1124         int     cyu;
1125         cy_addr iobase;
1126         u_char  status;
1127
1128         COM_LOCK();     /* XXX could this be placed down lower in the loop? */
1129
1130         baseu = unit * CY_MAX_PORTS;
1131         cy_align = com_addr(baseu)->cy_align;
1132         cy_iobase = com_addr(baseu)->cy_iobase;
1133
1134         /* check each CD1400 in turn */
1135         for (cyu = 0; cyu < cy_nr_cd1400s[unit]; ++cyu) {
1136                 iobase = (cy_addr) (cy_iobase
1137                                     + (cy_chip_offset[cyu] << cy_align));
1138                 /* poll to see if it has any work */
1139                 status = cd_inb(iobase, CD1400_SVRR, cy_align);
1140                 if (status == 0)
1141                         continue;
1142 #ifdef CyDebug
1143                 ++cy_svrr_probes;
1144 #endif
1145                 /* service requests as appropriate, giving priority to RX */
1146                 if (status & CD1400_SVRR_RXRDY) {
1147                         struct com_s    *com;
1148                         u_int           count;
1149                         u_char          *ioptr;
1150                         u_char          line_status;
1151                         u_char          recv_data;
1152                         u_char          serv_type;
1153 #ifdef PollMode
1154                         u_char          save_rir;
1155 #endif
1156
1157 #ifdef PollMode
1158                         save_rir = cd_inb(iobase, CD1400_RIR, cy_align);
1159
1160                         /* enter rx service */
1161                         cd_outb(iobase, CD1400_CAR, cy_align, save_rir);
1162                         com_addr(baseu + cyu * CD1400_NO_OF_CHANNELS)->car
1163                         = save_rir & CD1400_CAR_CHAN;
1164
1165                         serv_type = cd_inb(iobase, CD1400_RIVR, cy_align);
1166                         com = com_addr(baseu
1167                                        + ((serv_type >> CD1400_xIVR_CHAN_SHIFT)
1168                                           & CD1400_xIVR_CHAN));
1169 #else
1170                         /* ack receive service */
1171                         serv_type = cy_inb(iobase, CY8_SVCACKR, cy_align);
1172
1173                         com = com_addr(baseu +
1174                                        + ((serv_type >> CD1400_xIVR_CHAN_SHIFT)
1175                                           & CD1400_xIVR_CHAN));
1176 #endif
1177
1178                 if (serv_type & CD1400_RIVR_EXCEPTION) {
1179                         ++com->recv_exception;
1180                         line_status = cd_inb(iobase, CD1400_RDSR, cy_align);
1181                         /* break/unnattached error bits or real input? */
1182                         recv_data = cd_inb(iobase, CD1400_RDSR, cy_align);
1183 #ifndef SOFT_HOTCHAR
1184                         if (line_status & CD1400_RDSR_SPECIAL
1185                             && com->hotchar != 0)
1186                                 swi_sched(sio_ih, 0);
1187
1188 #endif
1189 #if 1 /* XXX "intelligent" PFO error handling would break O error handling */
1190                         if (line_status & (LSR_PE|LSR_FE|LSR_BI)) {
1191                                 /*
1192                                   Don't store PE if IGNPAR and BI if IGNBRK,
1193                                   this hack allows "raw" tty optimization
1194                                   works even if IGN* is set.
1195                                 */
1196                                 if (   com->tp == NULL
1197                                     || !(com->tp->t_state & TS_ISOPEN)
1198                                     || ((line_status & (LSR_PE|LSR_FE))
1199                                     &&  (com->tp->t_iflag & IGNPAR))
1200                                     || ((line_status & LSR_BI)
1201                                     &&  (com->tp->t_iflag & IGNBRK)))
1202                                         goto cont;
1203                                 if (   (line_status & (LSR_PE|LSR_FE))
1204                                     && (com->tp->t_state & TS_CAN_BYPASS_L_RINT)
1205                                     && ((line_status & LSR_FE)
1206                                     ||  ((line_status & LSR_PE)
1207                                     &&  (com->tp->t_iflag & INPCK))))
1208                                         recv_data = 0;
1209                         }
1210 #endif /* 1 */
1211                         ++com->bytes_in;
1212 #ifdef SOFT_HOTCHAR
1213                         if (com->hotchar != 0 && recv_data == com->hotchar)
1214                                 swi_sched(sio_ih, 0);
1215 #endif
1216                         ioptr = com->iptr;
1217                         if (ioptr >= com->ibufend)
1218                                 CE_RECORD(com, CE_INTERRUPT_BUF_OVERFLOW);
1219                         else {
1220                                 if (com->do_timestamp)
1221                                         microtime(&com->timestamp);
1222                                 ++com_events;
1223                                 ioptr[0] = recv_data;
1224                                 ioptr[com->ierroff] = line_status;
1225                                 com->iptr = ++ioptr;
1226                                 if (ioptr == com->ihighwater
1227                                     && com->state & CS_RTS_IFLOW)
1228 #if 0
1229                                         outb(com->modem_ctl_port,
1230                                              com->mcr_image &= ~MCR_RTS);
1231 #else
1232                                         cd_outb(iobase, com->mcr_rts_reg,
1233                                                 cy_align,
1234                                                 com->mcr_image &=
1235                                                 ~com->mcr_rts);
1236 #endif
1237                                 if (line_status & LSR_OE)
1238                                         CE_RECORD(com, CE_OVERRUN);
1239                         }
1240                         goto cont;
1241                 } else {
1242                         int     ifree;
1243
1244                         count = cd_inb(iobase, CD1400_RDCR, cy_align);
1245                         if (!count)
1246                                 goto cont;
1247                         com->bytes_in += count;
1248                         ioptr = com->iptr;
1249                         ifree = com->ibufend - ioptr;
1250                         if (count > ifree) {
1251                                 count -= ifree;
1252                                 com_events += ifree;
1253                                 if (ifree != 0) {
1254                                         if (com->do_timestamp)
1255                                                 microtime(&com->timestamp);
1256                                         do {
1257                                                 recv_data = cd_inb(iobase,
1258                                                                    CD1400_RDSR,
1259                                                                    cy_align);
1260 #ifdef SOFT_HOTCHAR
1261                                                 if (com->hotchar != 0
1262                                                     && recv_data
1263                                                        == com->hotchar)
1264                                                         swi_sched(sio_ih, 0);
1265 #endif
1266                                                 ioptr[0] = recv_data;
1267                                                 ioptr[com->ierroff] = 0;
1268                                                 ++ioptr;
1269                                         } while (--ifree != 0);
1270                                 }
1271                                 com->delta_error_counts
1272                                     [CE_INTERRUPT_BUF_OVERFLOW] += count;
1273                                 do {
1274                                         recv_data = cd_inb(iobase, CD1400_RDSR,
1275                                                            cy_align);
1276 #ifdef SOFT_HOTCHAR
1277                                         if (com->hotchar != 0
1278                                             && recv_data == com->hotchar)
1279                                                 swi_sched(sio_ih, 0);
1280 #endif
1281                                 } while (--count != 0);
1282                         } else {
1283                                 if (com->do_timestamp)
1284                                         microtime(&com->timestamp);
1285                                 if (ioptr <= com->ihighwater
1286                                     && ioptr + count > com->ihighwater
1287                                     && com->state & CS_RTS_IFLOW)
1288 #if 0
1289                                         outb(com->modem_ctl_port,
1290                                              com->mcr_image &= ~MCR_RTS);
1291 #else
1292                                         cd_outb(iobase, com->mcr_rts_reg,
1293                                                 cy_align,
1294                                                 com->mcr_image
1295                                                 &= ~com->mcr_rts);
1296 #endif
1297                                 com_events += count;
1298                                 do {
1299                                         recv_data = cd_inb(iobase, CD1400_RDSR,
1300                                                            cy_align);
1301 #ifdef SOFT_HOTCHAR
1302                                         if (com->hotchar != 0
1303                                             && recv_data == com->hotchar)
1304                                                 swi_sched(sio_ih, 0);
1305 #endif
1306                                         ioptr[0] = recv_data;
1307                                         ioptr[com->ierroff] = 0;
1308                                         ++ioptr;
1309                                 } while (--count != 0);
1310                         }
1311                         com->iptr = ioptr;
1312                 }
1313 cont:
1314
1315                         /* terminate service context */
1316 #ifdef PollMode
1317                         cd_outb(iobase, CD1400_RIR, cy_align,
1318                                 save_rir
1319                                 & ~(CD1400_RIR_RDIREQ | CD1400_RIR_RBUSY));
1320 #else
1321                         cd_outb(iobase, CD1400_EOSRR, cy_align, 0);
1322 #endif
1323                 }
1324                 if (status & CD1400_SVRR_MDMCH) {
1325                         struct com_s    *com;
1326                         u_char  modem_status;
1327 #ifdef PollMode
1328                         u_char  save_mir;
1329 #else
1330                         u_char  vector;
1331 #endif
1332
1333 #ifdef PollMode
1334                         save_mir = cd_inb(iobase, CD1400_MIR, cy_align);
1335
1336                         /* enter modem service */
1337                         cd_outb(iobase, CD1400_CAR, cy_align, save_mir);
1338                         com_addr(baseu + cyu * CD1400_NO_OF_CHANNELS)->car
1339                         = save_mir & CD1400_CAR_CHAN;
1340
1341                         com = com_addr(baseu + cyu * CD1400_NO_OF_CHANNELS
1342                                        + (save_mir & CD1400_MIR_CHAN));
1343 #else
1344                         /* ack modem service */
1345                         vector = cy_inb(iobase, CY8_SVCACKM, cy_align);
1346
1347                         com = com_addr(baseu
1348                                        + ((vector >> CD1400_xIVR_CHAN_SHIFT)
1349                                           & CD1400_xIVR_CHAN));
1350 #endif
1351                         ++com->mdm;
1352                         modem_status = cd_inb(iobase, CD1400_MSVR2, cy_align);
1353                 if (modem_status != com->last_modem_status) {
1354                         if (com->do_dcd_timestamp
1355                             && !(com->last_modem_status & MSR_DCD)
1356                             && modem_status & MSR_DCD)
1357                                 microtime(&com->dcd_timestamp);
1358
1359                         /*
1360                          * Schedule high level to handle DCD changes.  Note
1361                          * that we don't use the delta bits anywhere.  Some
1362                          * UARTs mess them up, and it's easy to remember the
1363                          * previous bits and calculate the delta.
1364                          */
1365                         com->last_modem_status = modem_status;
1366                         if (!(com->state & CS_CHECKMSR)) {
1367                                 com_events += LOTS_OF_EVENTS;
1368                                 com->state |= CS_CHECKMSR;
1369                                 swi_sched(sio_ih, 0);
1370                         }
1371
1372 #ifdef SOFT_CTS_OFLOW
1373                         /* handle CTS change immediately for crisp flow ctl */
1374                         if (com->state & CS_CTS_OFLOW) {
1375                                 if (modem_status & MSR_CTS) {
1376                                         com->state |= CS_ODEVREADY;
1377                                         if (com->state >= (CS_BUSY | CS_TTGO
1378                                                            | CS_ODEVREADY)
1379                                             && !(com->intr_enable
1380                                                  & CD1400_SRER_TXRDY))
1381                                                 cd_outb(iobase, CD1400_SRER,
1382                                                         cy_align,
1383                                                         com->intr_enable
1384                                                         = com->intr_enable
1385                                                           & ~CD1400_SRER_TXMPTY
1386                                                           | CD1400_SRER_TXRDY);
1387                                 } else {
1388                                         com->state &= ~CS_ODEVREADY;
1389                                         if (com->intr_enable
1390                                             & CD1400_SRER_TXRDY)
1391                                                 cd_outb(iobase, CD1400_SRER,
1392                                                         cy_align,
1393                                                         com->intr_enable
1394                                                         = com->intr_enable
1395                                                           & ~CD1400_SRER_TXRDY
1396                                                           | CD1400_SRER_TXMPTY);
1397                                 }
1398                         }
1399 #endif
1400                 }
1401
1402                         /* terminate service context */
1403 #ifdef PollMode
1404                         cd_outb(iobase, CD1400_MIR, cy_align,
1405                                 save_mir
1406                                 & ~(CD1400_MIR_RDIREQ | CD1400_MIR_RBUSY));
1407 #else
1408                         cd_outb(iobase, CD1400_EOSRR, cy_align, 0);
1409 #endif
1410                 }
1411                 if (status & CD1400_SVRR_TXRDY) {
1412                         struct com_s    *com;
1413 #ifdef PollMode
1414                         u_char  save_tir;
1415 #else
1416                         u_char  vector;
1417 #endif
1418
1419 #ifdef PollMode
1420                         save_tir = cd_inb(iobase, CD1400_TIR, cy_align);
1421
1422                         /* enter tx service */
1423                         cd_outb(iobase, CD1400_CAR, cy_align, save_tir);
1424                         com_addr(baseu + cyu * CD1400_NO_OF_CHANNELS)->car
1425                         = save_tir & CD1400_CAR_CHAN;
1426
1427                         com = com_addr(baseu
1428                                        + cyu * CD1400_NO_OF_CHANNELS
1429                                        + (save_tir & CD1400_TIR_CHAN));
1430 #else
1431                         /* ack transmit service */
1432                         vector = cy_inb(iobase, CY8_SVCACKT, cy_align);
1433
1434                         com = com_addr(baseu
1435                                        + ((vector >> CD1400_xIVR_CHAN_SHIFT)
1436                                           & CD1400_xIVR_CHAN));
1437 #endif
1438
1439                         if (com->etc != ETC_NONE) {
1440                                 if (com->intr_enable & CD1400_SRER_TXRDY) {
1441                                         /*
1442                                          * Here due to sloppy SRER_TXRDY
1443                                          * enabling.  Ignore.  Come back when
1444                                          * tx is empty.
1445                                          */
1446                                         cd_outb(iobase, CD1400_SRER, cy_align,
1447                                                 com->intr_enable
1448                                                 = (com->intr_enable
1449                                                   & ~CD1400_SRER_TXRDY)
1450                                                   | CD1400_SRER_TXMPTY);
1451                                         goto terminate_tx_service;
1452                                 }
1453                                 switch (com->etc) {
1454                                 case CD1400_ETC_SENDBREAK:
1455                                 case CD1400_ETC_STOPBREAK:
1456                                         /*
1457                                          * Start the command.  Come back on
1458                                          * next tx empty interrupt, hopefully
1459                                          * after command has been executed.
1460                                          */
1461                                         cd_outb(iobase, CD1400_COR2, cy_align,
1462                                                 com->cor[1] |= CD1400_COR2_ETC);
1463                                         cd_outb(iobase, CD1400_TDR, cy_align,
1464                                                 CD1400_ETC_CMD);
1465                                         cd_outb(iobase, CD1400_TDR, cy_align,
1466                                                 com->etc);
1467                                         if (com->etc == CD1400_ETC_SENDBREAK)
1468                                                 com->etc = ETC_BREAK_STARTING;
1469                                         else
1470                                                 com->etc = ETC_BREAK_ENDING;
1471                                         goto terminate_tx_service;
1472                                 case ETC_BREAK_STARTING:
1473                                         /*
1474                                          * BREAK is now on.  Continue with
1475                                          * SRER_TXMPTY processing, hopefully
1476                                          * don't come back.
1477                                          */
1478                                         com->etc = ETC_BREAK_STARTED;
1479                                         break;
1480                                 case ETC_BREAK_STARTED:
1481                                         /*
1482                                          * Came back due to sloppy SRER_TXMPTY
1483                                          * enabling.  Hope again.
1484                                          */
1485                                         break;
1486                                 case ETC_BREAK_ENDING:
1487                                         /*
1488                                          * BREAK is now off.  Continue with
1489                                          * SRER_TXMPTY processing and don't
1490                                          * come back.  The SWI handler will
1491                                          * restart tx interrupts if necessary.
1492                                          */
1493                                         cd_outb(iobase, CD1400_COR2, cy_align,
1494                                                 com->cor[1]
1495                                                 &= ~CD1400_COR2_ETC);
1496                                         com->etc = ETC_BREAK_ENDED;
1497                                         if (!(com->state & CS_ODONE)) {
1498                                                 com_events += LOTS_OF_EVENTS;
1499                                                 com->state |= CS_ODONE;
1500                                                 swi_sched(sio_ih, 0);
1501                                         }
1502                                         break;
1503                                 case ETC_BREAK_ENDED:
1504                                         /*
1505                                          * Shouldn't get here.  Hope again.
1506                                          */
1507                                         break;
1508                                 }
1509                         }
1510                         if (com->intr_enable & CD1400_SRER_TXMPTY) {
1511                                 if (!(com->extra_state & CSE_ODONE)) {
1512                                         com_events += LOTS_OF_EVENTS;
1513                                         com->extra_state |= CSE_ODONE;
1514                                         swi_sched(sio_ih, 0);
1515                                 }
1516                                 cd_outb(iobase, CD1400_SRER, cy_align,
1517                                         com->intr_enable
1518                                         &= ~CD1400_SRER_TXMPTY);
1519                                 goto terminate_tx_service;
1520                         }
1521                 if (com->state >= (CS_BUSY | CS_TTGO | CS_ODEVREADY)) {
1522                         u_char  *ioptr;
1523                         u_int   ocount;
1524
1525                         ioptr = com->obufq.l_head;
1526                                 ocount = com->obufq.l_tail - ioptr;
1527                                 if (ocount > CD1400_TX_FIFO_SIZE)
1528                                         ocount = CD1400_TX_FIFO_SIZE;
1529                                 com->bytes_out += ocount;
1530                                 do
1531                                         cd_outb(iobase, CD1400_TDR, cy_align,
1532                                                 *ioptr++);
1533                                 while (--ocount != 0);
1534                         com->obufq.l_head = ioptr;
1535                         if (ioptr >= com->obufq.l_tail) {
1536                                 struct lbq      *qp;
1537
1538                                 qp = com->obufq.l_next;
1539                                 qp->l_queued = FALSE;
1540                                 qp = qp->l_next;
1541                                 if (qp != NULL) {
1542                                         com->obufq.l_head = qp->l_head;
1543                                         com->obufq.l_tail = qp->l_tail;
1544                                         com->obufq.l_next = qp;
1545                                 } else {
1546                                         /* output just completed */
1547                                         com->state &= ~CS_BUSY;
1548
1549                                         /*
1550                                          * The setting of CSE_ODONE may be
1551                                          * stale here.  We currently only
1552                                          * use it when CS_BUSY is set, and
1553                                          * fixing it when we clear CS_BUSY
1554                                          * is easiest.
1555                                          */
1556                                         if (com->extra_state & CSE_ODONE) {
1557                                                 com_events -= LOTS_OF_EVENTS;
1558                                                 com->extra_state &= ~CSE_ODONE;
1559                                         }
1560
1561                                         cd_outb(iobase, CD1400_SRER, cy_align,
1562                                                 com->intr_enable
1563                                                 = (com->intr_enable
1564                                                   & ~CD1400_SRER_TXRDY)
1565                                                   | CD1400_SRER_TXMPTY);
1566                                 }
1567                                 if (!(com->state & CS_ODONE)) {
1568                                         com_events += LOTS_OF_EVENTS;
1569                                         com->state |= CS_ODONE;
1570
1571                                         /* handle at high level ASAP */
1572                                         swi_sched(sio_ih, 0);
1573                                 }
1574                         }
1575                 }
1576
1577                         /* terminate service context */
1578 terminate_tx_service:
1579 #ifdef PollMode
1580                         cd_outb(iobase, CD1400_TIR, cy_align,
1581                                 save_tir
1582                                 & ~(CD1400_TIR_RDIREQ | CD1400_TIR_RBUSY));
1583 #else
1584                         cd_outb(iobase, CD1400_EOSRR, cy_align, 0);
1585 #endif
1586                 }
1587         }
1588
1589         /* ensure an edge for the next interrupt */
1590         cy_outb(cy_iobase, CY_CLEAR_INTR, cy_align, 0);
1591
1592         swi_sched(sio_ih, 0);
1593
1594         COM_UNLOCK();
1595 }
1596
1597 #if 0
1598 static void
1599 siointr1(com)
1600         struct com_s    *com;
1601 {
1602 }
1603 #endif
1604
1605 static int
1606 sioioctl(dev, cmd, data, flag, td)
1607         dev_t           dev;
1608         u_long          cmd;
1609         caddr_t         data;
1610         int             flag;
1611         struct thread   *td;
1612 {
1613         struct com_s    *com;
1614         int             error;
1615         int             mynor;
1616         int             s;
1617         struct tty      *tp;
1618 #if defined(COMPAT_43) || defined(COMPAT_SUNOS)
1619         int             oldcmd;
1620         struct termios  term;
1621 #endif
1622
1623         mynor = minor(dev);
1624         com = com_addr(MINOR_TO_UNIT(mynor));
1625         if (mynor & CONTROL_MASK) {
1626                 struct termios  *ct;
1627
1628                 switch (mynor & CONTROL_MASK) {
1629                 case CONTROL_INIT_STATE:
1630                         ct = mynor & CALLOUT_MASK ? &com->it_out : &com->it_in;
1631                         break;
1632                 case CONTROL_LOCK_STATE:
1633                         ct = mynor & CALLOUT_MASK ? &com->lt_out : &com->lt_in;
1634                         break;
1635                 default:
1636                         return (ENODEV);        /* /dev/nodev */
1637                 }
1638                 switch (cmd) {
1639                 case TIOCSETA:
1640                         error = suser(td);
1641                         if (error != 0)
1642                                 return (error);
1643                         *ct = *(struct termios *)data;
1644                         return (0);
1645                 case TIOCGETA:
1646                         *(struct termios *)data = *ct;
1647                         return (0);
1648                 case TIOCGETD:
1649                         *(int *)data = TTYDISC;
1650                         return (0);
1651                 case TIOCGWINSZ:
1652                         bzero(data, sizeof(struct winsize));
1653                         return (0);
1654                 default:
1655                         return (ENOTTY);
1656                 }
1657         }
1658         tp = com->tp;
1659 #if defined(COMPAT_43) || defined(COMPAT_SUNOS)
1660         term = tp->t_termios;
1661         oldcmd = cmd;
1662         error = ttsetcompat(tp, &cmd, data, &term);
1663         if (error != 0)
1664                 return (error);
1665         if (cmd != oldcmd)
1666                 data = (caddr_t)&term;
1667 #endif
1668         if (cmd == TIOCSETA || cmd == TIOCSETAW || cmd == TIOCSETAF) {
1669                 int     cc;
1670                 struct termios *dt = (struct termios *)data;
1671                 struct termios *lt = mynor & CALLOUT_MASK
1672                                      ? &com->lt_out : &com->lt_in;
1673
1674                 dt->c_iflag = (tp->t_iflag & lt->c_iflag)
1675                               | (dt->c_iflag & ~lt->c_iflag);
1676                 dt->c_oflag = (tp->t_oflag & lt->c_oflag)
1677                               | (dt->c_oflag & ~lt->c_oflag);
1678                 dt->c_cflag = (tp->t_cflag & lt->c_cflag)
1679                               | (dt->c_cflag & ~lt->c_cflag);
1680                 dt->c_lflag = (tp->t_lflag & lt->c_lflag)
1681                               | (dt->c_lflag & ~lt->c_lflag);
1682                 for (cc = 0; cc < NCCS; ++cc)
1683                         if (lt->c_cc[cc] != 0)
1684                                 dt->c_cc[cc] = tp->t_cc[cc];
1685                 if (lt->c_ispeed != 0)
1686                         dt->c_ispeed = tp->t_ispeed;
1687                 if (lt->c_ospeed != 0)
1688                         dt->c_ospeed = tp->t_ospeed;
1689         }
1690         error = (*linesw[tp->t_line].l_ioctl)(tp, cmd, data, flag, td);
1691         if (error != ENOIOCTL)
1692                 return (error);
1693         s = spltty();
1694         error = ttioctl(tp, cmd, data, flag);
1695         disc_optim(tp, &tp->t_termios, com);
1696         if (error != ENOIOCTL) {
1697                 splx(s);
1698                 return (error);
1699         }
1700         switch (cmd) {
1701         case TIOCSBRK:
1702 #if 0
1703                 outb(iobase + com_cfcr, com->cfcr_image |= CFCR_SBREAK);
1704 #else
1705                 cd_etc(com, CD1400_ETC_SENDBREAK);
1706 #endif
1707                 break;
1708         case TIOCCBRK:
1709 #if 0
1710                 outb(iobase + com_cfcr, com->cfcr_image &= ~CFCR_SBREAK);
1711 #else
1712                 cd_etc(com, CD1400_ETC_STOPBREAK);
1713 #endif
1714                 break;
1715         case TIOCSDTR:
1716                 (void)commctl(com, TIOCM_DTR, DMBIS);
1717                 break;
1718         case TIOCCDTR:
1719                 (void)commctl(com, TIOCM_DTR, DMBIC);
1720                 break;
1721         /*
1722          * XXX should disallow changing MCR_RTS if CS_RTS_IFLOW is set.  The
1723          * changes get undone on the next call to comparam().
1724          */
1725         case TIOCMSET:
1726                 (void)commctl(com, *(int *)data, DMSET);
1727                 break;
1728         case TIOCMBIS:
1729                 (void)commctl(com, *(int *)data, DMBIS);
1730                 break;
1731         case TIOCMBIC:
1732                 (void)commctl(com, *(int *)data, DMBIC);
1733                 break;
1734         case TIOCMGET:
1735                 *(int *)data = commctl(com, 0, DMGET);
1736                 break;
1737         case TIOCMSDTRWAIT:
1738                 /* must be root since the wait applies to following logins */
1739                 error = suser(td);
1740                 if (error != 0) {
1741                         splx(s);
1742                         return (error);
1743                 }
1744                 com->dtr_wait = *(int *)data * hz / 100;
1745                 break;
1746         case TIOCMGDTRWAIT:
1747                 *(int *)data = com->dtr_wait * 100 / hz;
1748                 break;
1749         case TIOCTIMESTAMP:
1750                 com->do_timestamp = TRUE;
1751                 *(struct timeval *)data = com->timestamp;
1752                 break;
1753         case TIOCDCDTIMESTAMP:
1754                 com->do_dcd_timestamp = TRUE;
1755                 *(struct timeval *)data = com->dcd_timestamp;
1756                 break;
1757         default:
1758                 splx(s);
1759                 return (ENOTTY);
1760         }
1761         splx(s);
1762         return (0);
1763 }
1764
1765 static void
1766 siopoll(void *arg)
1767 {
1768         int             unit;
1769
1770 #ifdef CyDebug
1771         ++cy_timeouts;
1772 #endif
1773         if (com_events == 0)
1774                 return;
1775 repeat:
1776         for (unit = 0; unit < NSIO; ++unit) {
1777                 struct com_s    *com;
1778                 int             incc;
1779                 struct tty      *tp;
1780
1781                 com = com_addr(unit);
1782                 if (com == NULL)
1783                         continue;
1784                 tp = com->tp;
1785                 if (tp == NULL) {
1786                         /*
1787                          * XXX forget any events related to closed devices
1788                          * (actually never opened devices) so that we don't
1789                          * loop.
1790                          */
1791                         critical_enter();
1792                         COM_LOCK();
1793                         incc = com->iptr - com->ibuf;
1794                         com->iptr = com->ibuf;
1795                         if (com->state & CS_CHECKMSR) {
1796                                 incc += LOTS_OF_EVENTS;
1797                                 com->state &= ~CS_CHECKMSR;
1798                         }
1799                         com_events -= incc;
1800                         COM_UNLOCK();
1801                         critical_exit();
1802                         if (incc != 0)
1803                                 log(LOG_DEBUG,
1804                                     "sio%d: %d events for device with no tp\n",
1805                                     unit, incc);
1806                         continue;
1807                 }
1808                 if (com->iptr != com->ibuf) {
1809                         critical_enter();
1810                         COM_LOCK();
1811                         sioinput(com);
1812                         COM_UNLOCK();
1813                         critical_exit();
1814                 }
1815                 if (com->state & CS_CHECKMSR) {
1816                         u_char  delta_modem_status;
1817
1818                         critical_enter();
1819                         COM_LOCK();
1820                         sioinput(com);
1821                         delta_modem_status = com->last_modem_status
1822                                              ^ com->prev_modem_status;
1823                         com->prev_modem_status = com->last_modem_status;
1824                         com_events -= LOTS_OF_EVENTS;
1825                         com->state &= ~CS_CHECKMSR;
1826                         COM_UNLOCK();
1827                         critical_exit();
1828                         if (delta_modem_status & MSR_DCD)
1829                                 (*linesw[tp->t_line].l_modem)
1830                                         (tp, com->prev_modem_status & MSR_DCD);
1831                 }
1832                 if (com->extra_state & CSE_ODONE) {
1833                         critical_enter();
1834                         COM_LOCK();
1835                         com_events -= LOTS_OF_EVENTS;
1836                         com->extra_state &= ~CSE_ODONE;
1837                         COM_UNLOCK();
1838                         critical_exit();
1839                         if (!(com->state & CS_BUSY)) {
1840                                 tp->t_state &= ~TS_BUSY;
1841                                 ttwwakeup(com->tp);
1842                         }
1843                         if (com->etc != ETC_NONE) {
1844                                 if (com->etc == ETC_BREAK_ENDED)
1845                                         com->etc = ETC_NONE;
1846                                 wakeup(&com->etc);
1847                         }
1848                 }
1849                 if (com->state & CS_ODONE) {
1850                         critical_enter();
1851                         COM_LOCK();
1852                         com_events -= LOTS_OF_EVENTS;
1853                         com->state &= ~CS_ODONE;
1854                         COM_UNLOCK();
1855                         critical_exit();
1856                         (*linesw[tp->t_line].l_start)(tp);
1857                 }
1858                 if (com_events == 0)
1859                         break;
1860         }
1861         if (com_events >= LOTS_OF_EVENTS)
1862                 goto repeat;
1863 }
1864
1865 static int
1866 comparam(tp, t)
1867         struct tty      *tp;
1868         struct termios  *t;
1869 {
1870         int             bits;
1871         int             cflag;
1872         struct com_s    *com;
1873         u_char          cor_change;
1874         u_long          cy_clock;
1875         int             idivisor;
1876         int             iflag;
1877         int             iprescaler;
1878         int             itimeout;
1879         int             odivisor;
1880         int             oprescaler;
1881         u_char          opt;
1882         int             s;
1883         int             unit;
1884
1885         /* do historical conversions */
1886         if (t->c_ispeed == 0)
1887                 t->c_ispeed = t->c_ospeed;
1888
1889         unit = DEV_TO_UNIT(tp->t_dev);
1890         com = com_addr(unit);
1891
1892         /* check requested parameters */
1893         cy_clock = CY_CLOCK(com->gfrcr_image);
1894         idivisor = comspeed(t->c_ispeed, cy_clock, &iprescaler);
1895         if (idivisor < 0)
1896                 return (EINVAL);
1897         odivisor = comspeed(t->c_ospeed, cy_clock, &oprescaler);
1898         if (odivisor < 0)
1899                 return (EINVAL);
1900
1901         /* parameters are OK, convert them to the com struct and the device */
1902         s = spltty();
1903         if (odivisor == 0)
1904                 (void)commctl(com, TIOCM_DTR, DMBIC);   /* hang up line */
1905         else
1906                 (void)commctl(com, TIOCM_DTR, DMBIS);
1907
1908         (void) siosetwater(com, t->c_ispeed);
1909
1910         /* XXX we don't actually change the speed atomically. */
1911
1912         if (idivisor != 0) {
1913                 cd_setreg(com, CD1400_RBPR, idivisor);
1914                 cd_setreg(com, CD1400_RCOR, iprescaler);
1915         }
1916         if (odivisor != 0) {
1917                 cd_setreg(com, CD1400_TBPR, odivisor);
1918                 cd_setreg(com, CD1400_TCOR, oprescaler);
1919         }
1920
1921         /*
1922          * channel control
1923          *      receiver enable
1924          *      transmitter enable (always set)
1925          */
1926         cflag = t->c_cflag;
1927         opt = CD1400_CCR_CMDCHANCTL | CD1400_CCR_XMTEN
1928               | (cflag & CREAD ? CD1400_CCR_RCVEN : CD1400_CCR_RCVDIS);
1929         if (opt != com->channel_control) {
1930                 com->channel_control = opt;
1931                 cd1400_channel_cmd(com, opt);
1932         }
1933
1934 #ifdef Smarts
1935         /* set special chars */
1936         /* XXX if one is _POSIX_VDISABLE, can't use some others */
1937         if (t->c_cc[VSTOP] != _POSIX_VDISABLE)
1938                 cd_setreg(com, CD1400_SCHR1, t->c_cc[VSTOP]);
1939         if (t->c_cc[VSTART] != _POSIX_VDISABLE)
1940                 cd_setreg(com, CD1400_SCHR2, t->c_cc[VSTART]);
1941         if (t->c_cc[VINTR] != _POSIX_VDISABLE)
1942                 cd_setreg(com, CD1400_SCHR3, t->c_cc[VINTR]);
1943         if (t->c_cc[VSUSP] != _POSIX_VDISABLE)
1944                 cd_setreg(com, CD1400_SCHR4, t->c_cc[VSUSP]);
1945 #endif
1946
1947         /*
1948          * set channel option register 1 -
1949          *      parity mode
1950          *      stop bits
1951          *      char length
1952          */
1953         opt = 0;
1954         /* parity */
1955         if (cflag & PARENB) {
1956                 if (cflag & PARODD)
1957                         opt |= CD1400_COR1_PARODD;
1958                 opt |= CD1400_COR1_PARNORMAL;
1959         }
1960         iflag = t->c_iflag;
1961         if (!(iflag & INPCK))
1962                 opt |= CD1400_COR1_NOINPCK;
1963         bits = 1 + 1;
1964         /* stop bits */
1965         if (cflag & CSTOPB) {
1966                 ++bits;
1967                 opt |= CD1400_COR1_STOP2;
1968         }
1969         /* char length */
1970         switch (cflag & CSIZE) {
1971         case CS5:
1972                 bits += 5;
1973                 opt |= CD1400_COR1_CS5;
1974                 break;
1975         case CS6:
1976                 bits += 6;
1977                 opt |= CD1400_COR1_CS6;
1978                 break;
1979         case CS7:
1980                 bits += 7;
1981                 opt |= CD1400_COR1_CS7;
1982                 break;
1983         default:
1984                 bits += 8;
1985                 opt |= CD1400_COR1_CS8;
1986                 break;
1987         }
1988         cor_change = 0;
1989         if (opt != com->cor[0]) {
1990                 cor_change |= CD1400_CCR_COR1;
1991                 cd_setreg(com, CD1400_COR1, com->cor[0] = opt);
1992         }
1993
1994         /*
1995          * Set receive time-out period, normally to max(one char time, 5 ms).
1996          */
1997         if (t->c_ispeed == 0)
1998                 itimeout = cd_getreg(com, CD1400_RTPR);
1999         else {
2000                 itimeout = (1000 * bits + t->c_ispeed - 1) / t->c_ispeed;
2001 #ifdef SOFT_HOTCHAR
2002 #define MIN_RTP         1
2003 #else
2004 #define MIN_RTP         5
2005 #endif
2006                 if (itimeout < MIN_RTP)
2007                         itimeout = MIN_RTP;
2008         }
2009         if (!(t->c_lflag & ICANON) && t->c_cc[VMIN] != 0 && t->c_cc[VTIME] != 0
2010             && t->c_cc[VTIME] * 10 > itimeout)
2011                 itimeout = t->c_cc[VTIME] * 10;
2012         if (itimeout > 255)
2013                 itimeout = 255;
2014         cd_setreg(com, CD1400_RTPR, itimeout);
2015
2016         /*
2017          * set channel option register 2 -
2018          *      flow control
2019          */
2020         opt = 0;
2021 #ifdef Smarts
2022         if (iflag & IXANY)
2023                 opt |= CD1400_COR2_IXANY;
2024         if (iflag & IXOFF)
2025                 opt |= CD1400_COR2_IXOFF;
2026 #endif
2027 #ifndef SOFT_CTS_OFLOW
2028         if (cflag & CCTS_OFLOW)
2029                 opt |= CD1400_COR2_CCTS_OFLOW;
2030 #endif
2031         critical_enter();
2032         COM_LOCK();
2033         if (opt != com->cor[1]) {
2034                 cor_change |= CD1400_CCR_COR2;
2035                 cd_setreg(com, CD1400_COR2, com->cor[1] = opt);
2036         }
2037         COM_UNLOCK();
2038         critical_exit();
2039
2040         /*
2041          * set channel option register 3 -
2042          *      receiver FIFO interrupt threshold
2043          *      flow control
2044          */
2045         opt = RxFifoThreshold;
2046 #ifdef Smarts
2047         if (t->c_lflag & ICANON)
2048                 opt |= CD1400_COR3_SCD34;       /* detect INTR & SUSP chars */
2049         if (iflag & IXOFF)
2050                 /* detect and transparently handle START and STOP chars */
2051                 opt |= CD1400_COR3_FCT | CD1400_COR3_SCD12;
2052 #endif
2053         if (opt != com->cor[2]) {
2054                 cor_change |= CD1400_CCR_COR3;
2055                 cd_setreg(com, CD1400_COR3, com->cor[2] = opt);
2056         }
2057
2058         /* notify the CD1400 if COR1-3 have changed */
2059         if (cor_change)
2060                 cd1400_channel_cmd(com, CD1400_CCR_CMDCORCHG | cor_change);
2061
2062         /*
2063          * set channel option register 4 -
2064          *      CR/NL processing
2065          *      break processing
2066          *      received exception processing
2067          */
2068         opt = 0;
2069         if (iflag & IGNCR)
2070                 opt |= CD1400_COR4_IGNCR;
2071 #ifdef Smarts
2072         /*
2073          * we need a new ttyinput() for this, as we don't want to
2074          * have ICRNL && INLCR being done in both layers, or to have
2075          * synchronisation problems
2076          */
2077         if (iflag & ICRNL)
2078                 opt |= CD1400_COR4_ICRNL;
2079         if (iflag & INLCR)
2080                 opt |= CD1400_COR4_INLCR;
2081 #endif
2082         if (iflag & IGNBRK)
2083                 opt |= CD1400_COR4_IGNBRK | CD1400_COR4_NOBRKINT;
2084         /*
2085          * The `-ignbrk -brkint parmrk' case is not handled by the hardware,
2086          * so only tell the hardware about -brkint if -parmrk.
2087          */
2088         if (!(iflag & (BRKINT | PARMRK)))
2089                 opt |= CD1400_COR4_NOBRKINT;
2090 #if 0
2091         /* XXX using this "intelligence" breaks reporting of overruns. */
2092         if (iflag & IGNPAR)
2093                 opt |= CD1400_COR4_PFO_DISCARD;
2094         else {
2095                 if (iflag & PARMRK)
2096                         opt |= CD1400_COR4_PFO_ESC;
2097                 else
2098                         opt |= CD1400_COR4_PFO_NUL;
2099         }
2100 #else
2101         opt |= CD1400_COR4_PFO_EXCEPTION;
2102 #endif
2103         cd_setreg(com, CD1400_COR4, opt);
2104
2105         /*
2106          * set channel option register 5 -
2107          */
2108         opt = 0;
2109         if (iflag & ISTRIP)
2110                 opt |= CD1400_COR5_ISTRIP;
2111         if (t->c_iflag & IEXTEN)
2112                 /* enable LNEXT (e.g. ctrl-v quoting) handling */
2113                 opt |= CD1400_COR5_LNEXT;
2114 #ifdef Smarts
2115         if (t->c_oflag & ONLCR)
2116                 opt |= CD1400_COR5_ONLCR;
2117         if (t->c_oflag & OCRNL)
2118                 opt |= CD1400_COR5_OCRNL;
2119 #endif
2120         cd_setreg(com, CD1400_COR5, opt);
2121
2122         /*
2123          * We always generate modem status change interrupts for CD changes.
2124          * Among other things, this is necessary to track TS_CARR_ON for
2125          * pstat to print even when the driver doesn't care.  CD changes
2126          * should be rare so interrupts for them are not worth extra code to
2127          * avoid.  We avoid interrupts for other modem status changes (except
2128          * for CTS changes when SOFT_CTS_OFLOW is configured) since this is
2129          * simplest and best.
2130          */
2131
2132         /*
2133          * set modem change option register 1
2134          *      generate modem interrupts on which 1 -> 0 input transitions
2135          *      also controls auto-DTR output flow-control, which we don't use
2136          */
2137         opt = CD1400_MCOR1_CDzd;
2138 #ifdef SOFT_CTS_OFLOW
2139         if (cflag & CCTS_OFLOW)
2140                 opt |= CD1400_MCOR1_CTSzd;
2141 #endif
2142         cd_setreg(com, CD1400_MCOR1, opt);
2143
2144         /*
2145          * set modem change option register 2
2146          *      generate modem interrupts on specific 0 -> 1 input transitions
2147          */
2148         opt = CD1400_MCOR2_CDod;
2149 #ifdef SOFT_CTS_OFLOW
2150         if (cflag & CCTS_OFLOW)
2151                 opt |= CD1400_MCOR2_CTSod;
2152 #endif
2153         cd_setreg(com, CD1400_MCOR2, opt);
2154
2155         /*
2156          * XXX should have done this long ago, but there is too much state
2157          * to change all atomically.
2158          */
2159         critical_enter();
2160         COM_LOCK();
2161
2162         com->state &= ~CS_TTGO;
2163         if (!(tp->t_state & TS_TTSTOP))
2164                 com->state |= CS_TTGO;
2165         if (cflag & CRTS_IFLOW) {
2166                 com->state |= CS_RTS_IFLOW;
2167                 /*
2168                  * If CS_RTS_IFLOW just changed from off to on, the change
2169                  * needs to be propagated to MCR_RTS.  This isn't urgent,
2170                  * so do it later by calling comstart() instead of repeating
2171                  * a lot of code from comstart() here.
2172                  */
2173         } else if (com->state & CS_RTS_IFLOW) {
2174                 com->state &= ~CS_RTS_IFLOW;
2175                 /*
2176                  * CS_RTS_IFLOW just changed from on to off.  Force MCR_RTS
2177                  * on here, since comstart() won't do it later.
2178                  */
2179 #if 0
2180                 outb(com->modem_ctl_port, com->mcr_image |= MCR_RTS);
2181 #else
2182                 cd_setreg(com, com->mcr_rts_reg,
2183                           com->mcr_image |= com->mcr_rts);
2184 #endif
2185         }
2186
2187         /*
2188          * Set up state to handle output flow control.
2189          * XXX - worth handling MDMBUF (DCD) flow control at the lowest level?
2190          * Now has 10+ msec latency, while CTS flow has 50- usec latency.
2191          */
2192         com->state |= CS_ODEVREADY;
2193 #ifdef SOFT_CTS_OFLOW
2194         com->state &= ~CS_CTS_OFLOW;
2195         if (cflag & CCTS_OFLOW) {
2196                 com->state |= CS_CTS_OFLOW;
2197                 if (!(com->last_modem_status & MSR_CTS))
2198                         com->state &= ~CS_ODEVREADY;
2199         }
2200 #endif
2201         /* XXX shouldn't call functions while intrs are disabled. */
2202         disc_optim(tp, t, com);
2203 #if 0
2204         /*
2205          * Recover from fiddling with CS_TTGO.  We used to call siointr1()
2206          * unconditionally, but that defeated the careful discarding of
2207          * stale input in sioopen().
2208          */
2209         if (com->state >= (CS_BUSY | CS_TTGO))
2210                 siointr1(com);
2211 #endif
2212         if (com->state >= (CS_BUSY | CS_TTGO | CS_ODEVREADY)) {
2213                 if (!(com->intr_enable & CD1400_SRER_TXRDY))
2214                         cd_setreg(com, CD1400_SRER,
2215                                   com->intr_enable
2216                                   = (com->intr_enable & ~CD1400_SRER_TXMPTY)
2217                                     | CD1400_SRER_TXRDY);
2218         } else {
2219                 if (com->intr_enable & CD1400_SRER_TXRDY)
2220                         cd_setreg(com, CD1400_SRER,
2221                                   com->intr_enable
2222                                   = (com->intr_enable & ~CD1400_SRER_TXRDY)
2223                                     | CD1400_SRER_TXMPTY);
2224         }
2225
2226         COM_UNLOCK();
2227         critical_exit();
2228         splx(s);
2229         comstart(tp);
2230         if (com->ibufold != NULL) {
2231                 free(com->ibufold, M_DEVBUF);
2232                 com->ibufold = NULL;
2233         }
2234         return (0);
2235 }
2236
2237 static int
2238 siosetwater(com, speed)
2239         struct com_s    *com;
2240         speed_t         speed;
2241 {
2242         int             cp4ticks;
2243         u_char          *ibuf;
2244         int             ibufsize;
2245         struct tty      *tp;
2246
2247         /*
2248          * Make the buffer size large enough to handle a softtty interrupt
2249          * latency of about 2 ticks without loss of throughput or data
2250          * (about 3 ticks if input flow control is not used or not honoured,
2251          * but a bit less for CS5-CS7 modes).
2252          */
2253         cp4ticks = speed / 10 / hz * 4;
2254         for (ibufsize = 128; ibufsize < cp4ticks;)
2255                 ibufsize <<= 1;
2256         if (ibufsize == com->ibufsize) {
2257                 return (0);
2258         }
2259
2260         /*
2261          * Allocate input buffer.  The extra factor of 2 in the size is
2262          * to allow for an error byte for each input byte.
2263          */
2264         ibuf = malloc(2 * ibufsize, M_DEVBUF, M_NOWAIT);
2265         if (ibuf == NULL) {
2266                 return (ENOMEM);
2267         }
2268
2269         /* Initialize non-critical variables. */
2270         com->ibufold = com->ibuf;
2271         com->ibufsize = ibufsize;
2272         tp = com->tp;
2273         if (tp != NULL) {
2274                 tp->t_ififosize = 2 * ibufsize;
2275                 tp->t_ispeedwat = (speed_t)-1;
2276                 tp->t_ospeedwat = (speed_t)-1;
2277         }
2278
2279         /*
2280          * Read current input buffer, if any.  Continue with interrupts
2281          * disabled.
2282          */
2283         critical_enter();
2284         COM_LOCK();
2285         if (com->iptr != com->ibuf)
2286                 sioinput(com);
2287
2288         /*-
2289          * Initialize critical variables, including input buffer watermarks.
2290          * The external device is asked to stop sending when the buffer
2291          * exactly reaches high water, or when the high level requests it.
2292          * The high level is notified immediately (rather than at a later
2293          * clock tick) when this watermark is reached.
2294          * The buffer size is chosen so the watermark should almost never
2295          * be reached.
2296          * The low watermark is invisibly 0 since the buffer is always
2297          * emptied all at once.
2298          */
2299         com->iptr = com->ibuf = ibuf;
2300         com->ibufend = ibuf + ibufsize;
2301         com->ierroff = ibufsize;
2302         com->ihighwater = ibuf + 3 * ibufsize / 4;
2303
2304         COM_UNLOCK();
2305         critical_exit();
2306         return (0);
2307 }
2308
2309 static void
2310 comstart(tp)
2311         struct tty      *tp;
2312 {
2313         struct com_s    *com;
2314         int             s;
2315 #ifdef CyDebug
2316         bool_t          started;
2317 #endif
2318         int             unit;
2319
2320         unit = DEV_TO_UNIT(tp->t_dev);
2321         com = com_addr(unit);
2322         s = spltty();
2323
2324 #ifdef CyDebug
2325         ++com->start_count;
2326         started = FALSE;
2327 #endif
2328
2329         critical_enter();
2330         COM_LOCK();
2331         if (tp->t_state & TS_TTSTOP) {
2332                 com->state &= ~CS_TTGO;
2333                 if (com->intr_enable & CD1400_SRER_TXRDY)
2334                         cd_setreg(com, CD1400_SRER,
2335                                   com->intr_enable
2336                                   = (com->intr_enable & ~CD1400_SRER_TXRDY)
2337                                     | CD1400_SRER_TXMPTY);
2338         } else {
2339                 com->state |= CS_TTGO;
2340                 if (com->state >= (CS_BUSY | CS_TTGO | CS_ODEVREADY)
2341                     && !(com->intr_enable & CD1400_SRER_TXRDY))
2342                         cd_setreg(com, CD1400_SRER,
2343                                   com->intr_enable
2344                                   = (com->intr_enable & ~CD1400_SRER_TXMPTY)
2345                                     | CD1400_SRER_TXRDY);
2346         }
2347         if (tp->t_state & TS_TBLOCK) {
2348                 if (com->mcr_image & com->mcr_rts && com->state & CS_RTS_IFLOW)
2349 #if 0
2350                         outb(com->modem_ctl_port, com->mcr_image &= ~MCR_RTS);
2351 #else
2352                         cd_setreg(com, com->mcr_rts_reg,
2353                                   com->mcr_image &= ~com->mcr_rts);
2354 #endif
2355         } else {
2356                 if (!(com->mcr_image & com->mcr_rts)
2357                     && com->iptr < com->ihighwater
2358                     && com->state & CS_RTS_IFLOW)
2359 #if 0
2360                         outb(com->modem_ctl_port, com->mcr_image |= MCR_RTS);
2361 #else
2362                         cd_setreg(com, com->mcr_rts_reg,
2363                                   com->mcr_image |= com->mcr_rts);
2364 #endif
2365         }
2366         COM_UNLOCK();
2367         critical_exit();
2368         if (tp->t_state & (TS_TIMEOUT | TS_TTSTOP)) {
2369                 ttwwakeup(tp);
2370                 splx(s);
2371                 return;
2372         }
2373         if (tp->t_outq.c_cc != 0) {
2374                 struct lbq      *qp;
2375                 struct lbq      *next;
2376
2377                 if (!com->obufs[0].l_queued) {
2378 #ifdef CyDebug
2379                         started = TRUE;
2380 #endif
2381                         com->obufs[0].l_tail
2382                             = com->obuf1 + q_to_b(&tp->t_outq, com->obuf1,
2383                                                   sizeof com->obuf1);
2384                         com->obufs[0].l_next = NULL;
2385                         com->obufs[0].l_queued = TRUE;
2386                         critical_enter();
2387                         COM_LOCK();
2388                         if (com->state & CS_BUSY) {
2389                                 qp = com->obufq.l_next;
2390                                 while ((next = qp->l_next) != NULL)
2391                                         qp = next;
2392                                 qp->l_next = &com->obufs[0];
2393                         } else {
2394                                 com->obufq.l_head = com->obufs[0].l_head;
2395                                 com->obufq.l_tail = com->obufs[0].l_tail;
2396                                 com->obufq.l_next = &com->obufs[0];
2397                                 com->state |= CS_BUSY;
2398                                 if (com->state >= (CS_BUSY | CS_TTGO
2399                                                    | CS_ODEVREADY))
2400                                         cd_setreg(com, CD1400_SRER,
2401                                                   com->intr_enable
2402                                                   = (com->intr_enable
2403                                                     & ~CD1400_SRER_TXMPTY)
2404                                                     | CD1400_SRER_TXRDY);
2405                         }
2406                         COM_UNLOCK();
2407                         critical_exit();
2408                 }
2409                 if (tp->t_outq.c_cc != 0 && !com->obufs[1].l_queued) {
2410 #ifdef CyDebug
2411                         started = TRUE;
2412 #endif
2413                         com->obufs[1].l_tail
2414                             = com->obuf2 + q_to_b(&tp->t_outq, com->obuf2,
2415                                                   sizeof com->obuf2);
2416                         com->obufs[1].l_next = NULL;
2417                         com->obufs[1].l_queued = TRUE;
2418                         critical_enter();
2419                         COM_LOCK();
2420                         if (com->state & CS_BUSY) {
2421                                 qp = com->obufq.l_next;
2422                                 while ((next = qp->l_next) != NULL)
2423                                         qp = next;
2424                                 qp->l_next = &com->obufs[1];
2425                         } else {
2426                                 com->obufq.l_head = com->obufs[1].l_head;
2427                                 com->obufq.l_tail = com->obufs[1].l_tail;
2428                                 com->obufq.l_next = &com->obufs[1];
2429                                 com->state |= CS_BUSY;
2430                                 if (com->state >= (CS_BUSY | CS_TTGO
2431                                                    | CS_ODEVREADY))
2432                                         cd_setreg(com, CD1400_SRER,
2433                                                   com->intr_enable
2434                                                   = (com->intr_enable
2435                                                     & ~CD1400_SRER_TXMPTY)
2436                                                     | CD1400_SRER_TXRDY);
2437                         }
2438                         COM_UNLOCK();
2439                         critical_exit();
2440                 }
2441                 tp->t_state |= TS_BUSY;
2442         }
2443 #ifdef CyDebug
2444         if (started)
2445                 ++com->start_real;
2446 #endif
2447 #if 0
2448         critical_enter();
2449         COM_LOCK();
2450         if (com->state >= (CS_BUSY | CS_TTGO))
2451                 siointr1(com);  /* fake interrupt to start output */
2452         COM_UNLOCK();
2453         critical_exit();
2454 #endif
2455         ttwwakeup(tp);
2456         splx(s);
2457 }
2458
2459 static void
2460 comstop(tp, rw)
2461         struct tty      *tp;
2462         int             rw;
2463 {
2464         struct com_s    *com;
2465         bool_t          wakeup_etc;
2466
2467         com = com_addr(DEV_TO_UNIT(tp->t_dev));
2468         wakeup_etc = FALSE;
2469         critical_enter();
2470         COM_LOCK();
2471         if (rw & FWRITE) {
2472                 com->obufs[0].l_queued = FALSE;
2473                 com->obufs[1].l_queued = FALSE;
2474                 if (com->extra_state & CSE_ODONE) {
2475                         com_events -= LOTS_OF_EVENTS;
2476                         com->extra_state &= ~CSE_ODONE;
2477                         if (com->etc != ETC_NONE) {
2478                                 if (com->etc == ETC_BREAK_ENDED)
2479                                         com->etc = ETC_NONE;
2480                                 wakeup_etc = TRUE;
2481                         }
2482                 }
2483                 com->tp->t_state &= ~TS_BUSY;
2484                 if (com->state & CS_ODONE)
2485                         com_events -= LOTS_OF_EVENTS;
2486                 com->state &= ~(CS_ODONE | CS_BUSY);
2487         }
2488         if (rw & FREAD) {
2489                 /* XXX no way to reset only input fifo. */
2490                 com_events -= (com->iptr - com->ibuf);
2491                 com->iptr = com->ibuf;
2492         }
2493         COM_UNLOCK();
2494         critical_exit();
2495         if (wakeup_etc)
2496                 wakeup(&com->etc);
2497         if (rw & FWRITE && com->etc == ETC_NONE)
2498                 cd1400_channel_cmd(com, CD1400_CCR_CMDRESET | CD1400_CCR_FTF);
2499         comstart(tp);
2500 }
2501
2502 static int
2503 commctl(com, bits, how)
2504         struct com_s    *com;
2505         int             bits;
2506         int             how;
2507 {
2508         int     mcr;
2509         int     msr;
2510
2511         if (how == DMGET) {
2512                 if (com->channel_control & CD1400_CCR_RCVEN)
2513                         bits |= TIOCM_LE;
2514                 mcr = com->mcr_image;
2515                 if (mcr & com->mcr_dtr)
2516                         bits |= TIOCM_DTR;
2517                 if (mcr & com->mcr_rts)
2518                         /* XXX wired on for Cyclom-8Ys */
2519                         bits |= TIOCM_RTS;
2520
2521                 /*
2522                  * We must read the modem status from the hardware because
2523                  * we don't generate modem status change interrupts for all
2524                  * changes, so com->prev_modem_status is not guaranteed to
2525                  * be up to date.  This is safe, unlike for sio, because
2526                  * reading the status register doesn't clear pending modem
2527                  * status change interrupts.
2528                  */
2529                 msr = cd_getreg(com, CD1400_MSVR2);
2530
2531                 if (msr & MSR_CTS)
2532                         bits |= TIOCM_CTS;
2533                 if (msr & MSR_DCD)
2534                         bits |= TIOCM_CD;
2535                 if (msr & MSR_DSR)
2536                         bits |= TIOCM_DSR;
2537                 if (msr & MSR_RI)
2538                         /* XXX not connected except for Cyclom-16Y? */
2539                         bits |= TIOCM_RI;
2540                 return (bits);
2541         }
2542         mcr = 0;
2543         if (bits & TIOCM_DTR)
2544                 mcr |= com->mcr_dtr;
2545         if (bits & TIOCM_RTS)
2546                 mcr |= com->mcr_rts;
2547         critical_enter();
2548         COM_LOCK();
2549         switch (how) {
2550         case DMSET:
2551                 com->mcr_image = mcr;
2552                 cd_setreg(com, CD1400_MSVR1, mcr);
2553                 cd_setreg(com, CD1400_MSVR2, mcr);
2554                 break;
2555         case DMBIS:
2556                 com->mcr_image = mcr = com->mcr_image | mcr;
2557                 cd_setreg(com, CD1400_MSVR1, mcr);
2558                 cd_setreg(com, CD1400_MSVR2, mcr);
2559                 break;
2560         case DMBIC:
2561                 com->mcr_image = mcr = com->mcr_image & ~mcr;
2562                 cd_setreg(com, CD1400_MSVR1, mcr);
2563                 cd_setreg(com, CD1400_MSVR2, mcr);
2564                 break;
2565         }
2566         COM_UNLOCK();
2567         critical_exit();
2568         return (0);
2569 }
2570
2571 static void
2572 siosettimeout()
2573 {
2574         struct com_s    *com;
2575         bool_t          someopen;
2576         int             unit;
2577
2578         /*
2579          * Set our timeout period to 1 second if no polled devices are open.
2580          * Otherwise set it to max(1/200, 1/hz).
2581          * Enable timeouts iff some device is open.
2582          */
2583         untimeout(comwakeup, (void *)NULL, sio_timeout_handle);
2584         sio_timeout = hz;
2585         someopen = FALSE;
2586         for (unit = 0; unit < NSIO; ++unit) {
2587                 com = com_addr(unit);
2588                 if (com != NULL && com->tp != NULL
2589                     && com->tp->t_state & TS_ISOPEN) {
2590                         someopen = TRUE;
2591 #if 0
2592                         if (com->poll || com->poll_output) {
2593                                 sio_timeout = hz > 200 ? hz / 200 : 1;
2594                                 break;
2595                         }
2596 #endif
2597                 }
2598         }
2599         if (someopen) {
2600                 sio_timeouts_until_log = hz / sio_timeout;
2601                 sio_timeout_handle = timeout(comwakeup, (void *)NULL,
2602                                              sio_timeout);
2603         } else {
2604                 /* Flush error messages, if any. */
2605                 sio_timeouts_until_log = 1;
2606                 comwakeup((void *)NULL);
2607                 untimeout(comwakeup, (void *)NULL, sio_timeout_handle);
2608         }
2609 }
2610
2611 static void
2612 comwakeup(chan)
2613         void    *chan;
2614 {
2615         struct com_s    *com;
2616         int             unit;
2617
2618         sio_timeout_handle = timeout(comwakeup, (void *)NULL, sio_timeout);
2619
2620 #if 0
2621         /*
2622          * Recover from lost output interrupts.
2623          * Poll any lines that don't use interrupts.
2624          */
2625         for (unit = 0; unit < NSIO; ++unit) {
2626                 com = com_addr(unit);
2627                 if (com != NULL
2628                     && (com->state >= (CS_BUSY | CS_TTGO) || com->poll)) {
2629                         critical_enter();
2630                         COM_LOCK();
2631                         siointr1(com);
2632                         COM_UNLOCK();
2633                         critical_exit();
2634                 }
2635         }
2636 #endif
2637
2638         /*
2639          * Check for and log errors, but not too often.
2640          */
2641         if (--sio_timeouts_until_log > 0)
2642                 return;
2643         sio_timeouts_until_log = hz / sio_timeout;
2644         for (unit = 0; unit < NSIO; ++unit) {
2645                 int     errnum;
2646
2647                 com = com_addr(unit);
2648                 if (com == NULL)
2649                         continue;
2650                 for (errnum = 0; errnum < CE_NTYPES; ++errnum) {
2651                         u_int   delta;
2652                         u_long  total;
2653
2654                         critical_enter();
2655                         COM_LOCK();
2656                         delta = com->delta_error_counts[errnum];
2657                         com->delta_error_counts[errnum] = 0;
2658                         COM_UNLOCK();
2659                         critical_exit();
2660                         if (delta == 0)
2661                                 continue;
2662                         total = com->error_counts[errnum] += delta;
2663                         log(LOG_ERR, "cy%d: %u more %s%s (total %lu)\n",
2664                             unit, delta, error_desc[errnum],
2665                             delta == 1 ? "" : "s", total);
2666                 }
2667         }
2668 }
2669
2670 static void
2671 disc_optim(tp, t, com)
2672         struct tty      *tp;
2673         struct termios  *t;
2674         struct com_s    *com;
2675 {
2676 #ifndef SOFT_HOTCHAR
2677         u_char  opt;
2678 #endif
2679
2680         /*
2681          * XXX can skip a lot more cases if Smarts.  Maybe
2682          * (IGNCR | ISTRIP | IXON) in c_iflag.  But perhaps we
2683          * shouldn't skip if (TS_CNTTB | TS_LNCH) is set in t_state.
2684          */
2685         if (!(t->c_iflag & (ICRNL | IGNCR | IMAXBEL | INLCR | ISTRIP | IXON))
2686             && (!(t->c_iflag & BRKINT) || (t->c_iflag & IGNBRK))
2687             && (!(t->c_iflag & PARMRK)
2688                 || (t->c_iflag & (IGNPAR | IGNBRK)) == (IGNPAR | IGNBRK))
2689             && !(t->c_lflag & (ECHO | ICANON | IEXTEN | ISIG | PENDIN))
2690             && linesw[tp->t_line].l_rint == ttyinput)
2691                 tp->t_state |= TS_CAN_BYPASS_L_RINT;
2692         else
2693                 tp->t_state &= ~TS_CAN_BYPASS_L_RINT;
2694         com->hotchar = linesw[tp->t_line].l_hotchar;
2695 #ifndef SOFT_HOTCHAR
2696         opt = com->cor[2] & ~CD1400_COR3_SCD34;
2697         if (com->hotchar != 0) {
2698                 cd_setreg(com, CD1400_SCHR3, com->hotchar);
2699                 cd_setreg(com, CD1400_SCHR4, com->hotchar);
2700                 opt |= CD1400_COR3_SCD34;
2701         }
2702         if (opt != com->cor[2]) {
2703                 cd_setreg(com, CD1400_COR3, com->cor[2] = opt);
2704                 cd1400_channel_cmd(com, CD1400_CCR_CMDCORCHG | CD1400_CCR_COR3);
2705         }
2706 #endif
2707 }
2708
2709 #ifdef Smarts
2710 /* standard line discipline input routine */
2711 int
2712 cyinput(c, tp)
2713         int             c;
2714         struct tty      *tp;
2715 {
2716         /* XXX duplicate ttyinput(), but without the IXOFF/IXON/ISTRIP/IPARMRK
2717          * bits, as they are done by the CD1400.  Hardly worth the effort,
2718          * given that high-throughput sessions are raw anyhow.
2719          */
2720 }
2721 #endif /* Smarts */
2722
2723 static int
2724 comspeed(speed, cy_clock, prescaler_io)
2725         speed_t speed;
2726         u_long  cy_clock;
2727         int     *prescaler_io;
2728 {
2729         int     actual;
2730         int     error;
2731         int     divider;
2732         int     prescaler;
2733         int     prescaler_unit;
2734
2735         if (speed == 0)
2736                 return (0);
2737         if (speed < 0 || speed > 150000)
2738                 return (-1);
2739
2740         /* determine which prescaler to use */
2741         for (prescaler_unit = 4, prescaler = 2048; prescaler_unit;
2742                 prescaler_unit--, prescaler >>= 2) {
2743                 if (cy_clock / prescaler / speed > 63)
2744                         break;
2745         }
2746
2747         divider = (cy_clock / prescaler * 2 / speed + 1) / 2; /* round off */
2748         if (divider > 255)
2749                 divider = 255;
2750         actual = cy_clock/prescaler/divider;
2751
2752         /* 10 times error in percent: */
2753         error = ((actual - (long)speed) * 2000 / (long)speed + 1) / 2;
2754
2755         /* 3.0% max error tolerance */
2756         if (error < -30 || error > 30)
2757                 return (-1);
2758
2759 #if 0
2760         printf("prescaler = %d (%d)\n", prescaler, prescaler_unit);
2761         printf("divider = %d (%x)\n", divider, divider);
2762         printf("actual = %d\n", actual);
2763         printf("error = %d\n", error);
2764 #endif
2765
2766         *prescaler_io = prescaler_unit;
2767         return (divider);
2768 }
2769
2770 static void
2771 cd1400_channel_cmd(com, cmd)
2772         struct com_s    *com;
2773         int             cmd;
2774 {
2775         cd1400_channel_cmd_wait(com);
2776         cd_setreg(com, CD1400_CCR, cmd);
2777         cd1400_channel_cmd_wait(com);
2778 }
2779
2780 static void
2781 cd1400_channel_cmd_wait(com)
2782         struct com_s    *com;
2783 {
2784         struct timeval  start;
2785         struct timeval  tv;
2786         long            usec;
2787
2788         if (cd_getreg(com, CD1400_CCR) == 0)
2789                 return;
2790         microtime(&start);
2791         for (;;) {
2792                 if (cd_getreg(com, CD1400_CCR) == 0)
2793                         return;
2794                 microtime(&tv);
2795                 usec = 1000000 * (tv.tv_sec - start.tv_sec) +
2796                     tv.tv_usec - start.tv_usec;
2797                 if (usec >= 5000) {
2798                         log(LOG_ERR,
2799                             "cy%d: channel command timeout (%ld usec)\n",
2800                             com->unit, usec);
2801                         return;
2802                 }
2803         }
2804 }
2805
2806 static void
2807 cd_etc(com, etc)
2808         struct com_s    *com;
2809         int             etc;
2810 {
2811
2812         /*
2813          * We can't change the hardware's ETC state while there are any
2814          * characters in the tx fifo, since those characters would be
2815          * interpreted as commands!  Unputting characters from the fifo
2816          * is difficult, so we wait up to 12 character times for the fifo
2817          * to drain.  The command will be delayed for up to 2 character
2818          * times for the tx to become empty.  Unputting characters from
2819          * the tx holding and shift registers is impossible, so we wait
2820          * for the tx to become empty so that the command is sure to be
2821          * executed soon after we issue it.
2822          */
2823         critical_enter();
2824         COM_LOCK();
2825         if (com->etc == etc)
2826                 goto wait;
2827         if ((etc == CD1400_ETC_SENDBREAK
2828             && (com->etc == ETC_BREAK_STARTING
2829                 || com->etc == ETC_BREAK_STARTED))
2830             || (etc == CD1400_ETC_STOPBREAK
2831                && (com->etc == ETC_BREAK_ENDING || com->etc == ETC_BREAK_ENDED
2832                    || com->etc == ETC_NONE))) {
2833                 COM_UNLOCK();
2834                 critical_exit();
2835                 return;
2836         }
2837         com->etc = etc;
2838         cd_setreg(com, CD1400_SRER,
2839                   com->intr_enable
2840                   = (com->intr_enable & ~CD1400_SRER_TXRDY) | CD1400_SRER_TXMPTY);
2841 wait:
2842         COM_UNLOCK();
2843         critical_exit();
2844         while (com->etc == etc
2845                && tsleep(&com->etc, TTIPRI | PCATCH, "cyetc", 0) == 0)
2846                 continue;
2847 }
2848
2849 static int
2850 cd_getreg(com, reg)
2851         struct com_s    *com;
2852         int             reg;
2853 {
2854         struct com_s    *basecom;
2855         u_char  car;
2856         int     cy_align;
2857         register_t      eflags;
2858         cy_addr iobase;
2859         int     val;
2860
2861         basecom = com_addr(com->unit & ~(CD1400_NO_OF_CHANNELS - 1));
2862         car = com->unit & CD1400_CAR_CHAN;
2863         cy_align = com->cy_align;
2864         iobase = com->iobase;
2865         eflags = read_eflags();
2866         critical_enter();
2867         if (eflags & PSL_I)
2868                 COM_LOCK();
2869         if (basecom->car != car)
2870                 cd_outb(iobase, CD1400_CAR, cy_align, basecom->car = car);
2871         val = cd_inb(iobase, reg, cy_align);
2872         if (eflags & PSL_I)
2873                 COM_UNLOCK();
2874         critical_exit();
2875         return (val);
2876 }
2877
2878 static void
2879 cd_setreg(com, reg, val)
2880         struct com_s    *com;
2881         int             reg;
2882         int             val;
2883 {
2884         struct com_s    *basecom;
2885         u_char  car;
2886         int     cy_align;
2887         register_t      eflags;
2888         cy_addr iobase;
2889
2890         basecom = com_addr(com->unit & ~(CD1400_NO_OF_CHANNELS - 1));
2891         car = com->unit & CD1400_CAR_CHAN;
2892         cy_align = com->cy_align;
2893         iobase = com->iobase;
2894         eflags = read_eflags();
2895         critical_enter();
2896         if (eflags & PSL_I)
2897                 COM_LOCK();
2898         if (basecom->car != car)
2899                 cd_outb(iobase, CD1400_CAR, cy_align, basecom->car = car);
2900         cd_outb(iobase, reg, cy_align, val);
2901         if (eflags & PSL_I)
2902                 COM_UNLOCK();
2903         critical_exit();
2904 }
2905
2906 #ifdef CyDebug
2907 /* useful in ddb */
2908 void
2909 cystatus(unit)
2910         int     unit;
2911 {
2912         struct com_s    *com;
2913         cy_addr         iobase;
2914         u_int           ocount;
2915         struct tty      *tp;
2916
2917         com = com_addr(unit);
2918         printf("info for channel %d\n", unit);
2919         printf("------------------\n");
2920         printf("total cyclom service probes:\t%d\n", cy_svrr_probes);
2921         printf("calls to upper layer:\t\t%d\n", cy_timeouts);
2922         if (com == NULL)
2923                 return;
2924         iobase = com->iobase;
2925         printf("\n");
2926         printf("cd1400 base address:\\tt%p\n", iobase);
2927         printf("saved channel_control:\t\t0x%02x\n", com->channel_control);
2928         printf("saved cor1-3:\t\t\t0x%02x 0x%02x 0x%02x\n",
2929                com->cor[0], com->cor[1], com->cor[2]);
2930         printf("service request enable reg:\t0x%02x (0x%02x cached)\n",
2931                cd_getreg(com, CD1400_SRER), com->intr_enable);
2932         printf("service request register:\t0x%02x\n",
2933                cd_inb(iobase, CD1400_SVRR, com->cy_align));
2934         printf("modem status:\t\t\t0x%02x (0x%02x cached)\n",
2935                cd_getreg(com, CD1400_MSVR2), com->prev_modem_status);
2936         printf("rx/tx/mdm interrupt registers:\t0x%02x 0x%02x 0x%02x\n",
2937                cd_inb(iobase, CD1400_RIR, com->cy_align),
2938                cd_inb(iobase, CD1400_TIR, com->cy_align),
2939                cd_inb(iobase, CD1400_MIR, com->cy_align));
2940         printf("\n");
2941         printf("com state:\t\t\t0x%02x\n", com->state);
2942         printf("calls to comstart():\t\t%d (%d useful)\n",
2943                com->start_count, com->start_real);
2944         printf("rx buffer chars free:\t\t%d\n", com->iptr - com->ibuf);
2945         ocount = 0;
2946         if (com->obufs[0].l_queued)
2947                 ocount += com->obufs[0].l_tail - com->obufs[0].l_head;
2948         if (com->obufs[1].l_queued)
2949                 ocount += com->obufs[1].l_tail - com->obufs[1].l_head;
2950         printf("tx buffer chars:\t\t%u\n", ocount);
2951         printf("received chars:\t\t\t%d\n", com->bytes_in);
2952         printf("received exceptions:\t\t%d\n", com->recv_exception);
2953         printf("modem signal deltas:\t\t%d\n", com->mdm);
2954         printf("transmitted chars:\t\t%d\n", com->bytes_out);
2955         printf("\n");
2956         tp = com->tp;
2957         if (tp != NULL) {
2958                 printf("tty state:\t\t\t0x%08x\n", tp->t_state);
2959                 printf(
2960                 "upper layer queue lengths:\t%d raw, %d canon, %d output\n",
2961                        tp->t_rawq.c_cc, tp->t_canq.c_cc, tp->t_outq.c_cc);
2962         } else
2963                 printf("tty state:\t\t\tclosed\n");
2964 }
2965 #endif /* CyDebug */