drivers/char/mxser.c

   1 /*
   2  *          mxser.c  -- MOXA Smartio/Industio family multiport serial driver.
   3  *
   4  *      Copyright (C) 1999-2006  Moxa Technologies (support@moxa.com).
   5  *      Copyright (C) 2006-2008  Jiri Slaby <jirislaby@gmail.com>
   6  *
   7  *      This code is loosely based on the 1.8 moxa driver which is based on
   8  *      Linux serial driver, written by Linus Torvalds, Theodore T'so and
   9  *      others.
  10  *
  11  *      This program is free software; you can redistribute it and/or modify
  12  *      it under the terms of the GNU General Public License as published by
  13  *      the Free Software Foundation; either version 2 of the License, or
  14  *      (at your option) any later version.
  15  *
  16  *      Fed through a cleanup, indent and remove of non 2.6 code by Alan Cox
  17  *      <alan@redhat.com>. The original 1.8 code is available on www.moxa.com.
  18  *      - Fixed x86_64 cleanness
  19  */
  20
  21 #include <linux/module.h>
  22 #include <linux/errno.h>
  23 #include <linux/signal.h>
  24 #include <linux/sched.h>
  25 #include <linux/timer.h>
  26 #include <linux/interrupt.h>
  27 #include <linux/tty.h>
  28 #include <linux/tty_flip.h>
  29 #include <linux/serial.h>
  30 #include <linux/serial_reg.h>
  31 #include <linux/major.h>
  32 #include <linux/string.h>
  33 #include <linux/fcntl.h>
  34 #include <linux/ptrace.h>
  35 #include <linux/gfp.h>
  36 #include <linux/ioport.h>
  37 #include <linux/mm.h>
  38 #include <linux/delay.h>
  39 #include <linux/pci.h>
  40 #include <linux/bitops.h>
  41
  42 #include <asm/system.h>
  43 #include <asm/io.h>
  44 #include <asm/irq.h>
  45 #include <asm/uaccess.h>
  46
  47 #include "mxser.h"
  48
  49 #define MXSER_VERSION   "2.0.4"         /* 1.12 */
  50 #define MXSERMAJOR       174
  51
  52 #define MXSER_BOARDS            4       /* Max. boards */
  53 #define MXSER_PORTS_PER_BOARD   8       /* Max. ports per board */
  54 #define MXSER_PORTS             (MXSER_BOARDS * MXSER_PORTS_PER_BOARD)
  55 #define MXSER_ISR_PASS_LIMIT    100
  56
  57 /*CheckIsMoxaMust return value*/
  58 #define MOXA_OTHER_UART         0x00
  59 #define MOXA_MUST_MU150_HWID    0x01
  60 #define MOXA_MUST_MU860_HWID    0x02
  61
  62 #define WAKEUP_CHARS            256
  63
  64 #define UART_MCR_AFE            0x20
  65 #define UART_LSR_SPECIAL        0x1E
  66
  67 #define PCI_DEVICE_ID_POS104UL  0x1044
  68 #define PCI_DEVICE_ID_CB108     0x1080
  69 #define PCI_DEVICE_ID_CP102UF   0x1023
  70 #define PCI_DEVICE_ID_CB114     0x1142
  71 #define PCI_DEVICE_ID_CP114UL   0x1143
  72 #define PCI_DEVICE_ID_CB134I    0x1341
  73 #define PCI_DEVICE_ID_CP138U    0x1380
  74
  75
  76 #define C168_ASIC_ID    1
  77 #define C104_ASIC_ID    2
  78 #define C102_ASIC_ID    0xB
  79 #define CI132_ASIC_ID   4
  80 #define CI134_ASIC_ID   3
  81 #define CI104J_ASIC_ID  5
  82
  83 #define MXSER_HIGHBAUD  1
  84 #define MXSER_HAS2      2
  85
  86 /* This is only for PCI */
  87 static const struct {
  88         int type;
  89         int tx_fifo;
  90         int rx_fifo;
  91         int xmit_fifo_size;
  92         int rx_high_water;
  93         int rx_trigger;
  94         int rx_low_water;
  95         long max_baud;
  96 } Gpci_uart_info[] = {
  97         {MOXA_OTHER_UART, 16, 16, 16, 14, 14, 1, 921600L},
  98         {MOXA_MUST_MU150_HWID, 64, 64, 64, 48, 48, 16, 230400L},
  99         {MOXA_MUST_MU860_HWID, 128, 128, 128, 96, 96, 32, 921600L}
 100 };
 101 #define UART_INFO_NUM   ARRAY_SIZE(Gpci_uart_info)
 102
 103 struct mxser_cardinfo {
 104         char *name;
 105         unsigned int nports;
 106         unsigned int flags;
 107 };
 108
 109 static const struct mxser_cardinfo mxser_cards[] = {
 110 /* 0*/  { "C168 series",        8, },
 111         { "C104 series",        4, },
 112         { "CI-104J series",     4, },
 113         { "C168H/PCI series",   8, },
 114         { "C104H/PCI series",   4, },
 115 /* 5*/  { "C102 series",        4, MXSER_HAS2 },        /* C102-ISA */
 116         { "CI-132 series",      4, MXSER_HAS2 },
 117         { "CI-134 series",      4, },
 118         { "CP-132 series",      2, },
 119         { "CP-114 series",      4, },
 120 /*10*/  { "CT-114 series",      4, },
 121         { "CP-102 series",      2, MXSER_HIGHBAUD },
 122         { "CP-104U series",     4, },
 123         { "CP-168U series",     8, },
 124         { "CP-132U series",     2, },
 125 /*15*/  { "CP-134U series",     4, },
 126         { "CP-104JU series",    4, },
 127         { "Moxa UC7000 Serial", 8, },           /* RC7000 */
 128         { "CP-118U series",     8, },
 129         { "CP-102UL series",    2, },
 130 /*20*/  { "CP-102U series",     2, },
 131         { "CP-118EL series",    8, },
 132         { "CP-168EL series",    8, },
 133         { "CP-104EL series",    4, },
 134         { "CB-108 series",      8, },
 135 /*25*/  { "CB-114 series",      4, },
 136         { "CB-134I series",     4, },
 137         { "CP-138U series",     8, },
 138         { "POS-104UL series",   4, },
 139         { "CP-114UL series",    4, },
 140 /*30*/  { "CP-102UF series",    2, }
 141 };
 142
 143 /* driver_data correspond to the lines in the structure above
 144    see also ISA probe function before you change something */
 145 static struct pci_device_id mxser_pcibrds[] = {
 146         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_MOXA_C168),   .driver_data = 3 },
 147         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_MOXA_C104),   .driver_data = 4 },
 148         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_MOXA_CP132),  .driver_data = 8 },
 149         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_MOXA_CP114),  .driver_data = 9 },
 150         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_MOXA_CT114),  .driver_data = 10 },
 151         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_MOXA_CP102),  .driver_data = 11 },
 152         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_MOXA_CP104U), .driver_data = 12 },
 153         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_MOXA_CP168U), .driver_data = 13 },
 154         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_MOXA_CP132U), .driver_data = 14 },
 155         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_MOXA_CP134U), .driver_data = 15 },
 156         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_MOXA_CP104JU),.driver_data = 16 },
 157         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_MOXA_RC7000), .driver_data = 17 },
 158         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_MOXA_CP118U), .driver_data = 18 },
 159         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_MOXA_CP102UL),.driver_data = 19 },
 160         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_MOXA_CP102U), .driver_data = 20 },
 161         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_MOXA_CP118EL),.driver_data = 21 },
 162         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_MOXA_CP168EL),.driver_data = 22 },
 163         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_MOXA_CP104EL),.driver_data = 23 },
 164         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_CB108),       .driver_data = 24 },
 165         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_CB114),       .driver_data = 25 },
 166         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_CB134I),      .driver_data = 26 },
 167         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_CP138U),      .driver_data = 27 },
 168         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_POS104UL),    .driver_data = 28 },
 169         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_CP114UL),     .driver_data = 29 },
 170         { PCI_VDEVICE(MOXA, PCI_DEVICE_ID_CP102UF),     .driver_data = 30 },
 171         { }
 172 };
 173 MODULE_DEVICE_TABLE(pci, mxser_pcibrds);
 174
 175 static unsigned long ioaddr[MXSER_BOARDS];
 176 static int ttymajor = MXSERMAJOR;
 177
 178 /* Variables for insmod */
 179
 180 MODULE_AUTHOR("Casper Yang");
 181 MODULE_DESCRIPTION("MOXA Smartio/Industio Family Multiport Board Device Driver");
 182 module_param_array(ioaddr, ulong, NULL, 0);
 183 MODULE_PARM_DESC(ioaddr, "ISA io addresses to look for a moxa board");
 184 module_param(ttymajor, int, 0);
 185 MODULE_LICENSE("GPL");
 186
 187 struct mxser_log {
 188         int tick;
 189         unsigned long rxcnt[MXSER_PORTS];
 190         unsigned long txcnt[MXSER_PORTS];
 191 };
 192
 193 struct mxser_mon {
 194         unsigned long rxcnt;
 195         unsigned long txcnt;
 196         unsigned long up_rxcnt;
 197         unsigned long up_txcnt;
 198         int modem_status;
 199         unsigned char hold_reason;
 200 };
 201
 202 struct mxser_mon_ext {
 203         unsigned long rx_cnt[32];
 204         unsigned long tx_cnt[32];
 205         unsigned long up_rxcnt[32];
 206         unsigned long up_txcnt[32];
 207         int modem_status[32];
 208
 209         long baudrate[32];
 210         int databits[32];
 211         int stopbits[32];
 212         int parity[32];
 213         int flowctrl[32];
 214         int fifo[32];
 215         int iftype[32];
 216 };
 217
 218 struct mxser_board;
 219
 220 struct mxser_port {
 221         struct tty_port port;
 222         struct mxser_board *board;
 223
 224         unsigned long ioaddr;
 225         unsigned long opmode_ioaddr;
 226         int max_baud;
 227
 228         int rx_high_water;
 229         int rx_trigger;         /* Rx fifo trigger level */
 230         int rx_low_water;
 231         int baud_base;          /* max. speed */
 232         int type;               /* UART type */
 233
 234         int x_char;             /* xon/xoff character */
 235         int IER;                /* Interrupt Enable Register */
 236         int MCR;                /* Modem control register */
 237
 238         unsigned char stop_rx;
 239         unsigned char ldisc_stop_rx;
 240
 241         int custom_divisor;
 242         unsigned char err_shadow;
 243
 244         struct async_icount icount; /* kernel counters for 4 input interrupts */
 245         int timeout;
 246
 247         int read_status_mask;
 248         int ignore_status_mask;
 249         int xmit_fifo_size;
 250         int xmit_head;
 251         int xmit_tail;
 252         int xmit_cnt;
 253
 254         struct ktermios normal_termios;
 255
 256         struct mxser_mon mon_data;
 257
 258         spinlock_t slock;
 259         wait_queue_head_t delta_msr_wait;
 260 };
 261
 262 struct mxser_board {
 263         unsigned int idx;
 264         int irq;
 265         const struct mxser_cardinfo *info;
 266         unsigned long vector;
 267         unsigned long vector_mask;
 268
 269         int chip_flag;
 270         int uart_type;
 271
 272         struct mxser_port ports[MXSER_PORTS_PER_BOARD];
 273 };
 274
 275 struct mxser_mstatus {
 276         tcflag_t cflag;
 277         int cts;
 278         int dsr;
 279         int ri;
 280         int dcd;
 281 };
 282
 283 static struct mxser_board mxser_boards[MXSER_BOARDS];
 284 static struct tty_driver *mxvar_sdriver;
 285 static struct mxser_log mxvar_log;
 286 static int mxser_set_baud_method[MXSER_PORTS + 1];
 287
 288 static void mxser_enable_must_enchance_mode(unsigned long baseio)
 289 {
 290         u8 oldlcr;
 291         u8 efr;
 292
 293         oldlcr = inb(baseio + UART_LCR);
 294         outb(MOXA_MUST_ENTER_ENCHANCE, baseio + UART_LCR);
 295
 296         efr = inb(baseio + MOXA_MUST_EFR_REGISTER);
 297         efr |= MOXA_MUST_EFR_EFRB_ENABLE;
 298
 299         outb(efr, baseio + MOXA_MUST_EFR_REGISTER);
 300         outb(oldlcr, baseio + UART_LCR);
 301 }
 302
 303 static void mxser_disable_must_enchance_mode(unsigned long baseio)
 304 {
 305         u8 oldlcr;
 306         u8 efr;
 307
 308         oldlcr = inb(baseio + UART_LCR);
 309         outb(MOXA_MUST_ENTER_ENCHANCE, baseio + UART_LCR);
 310
 311         efr = inb(baseio + MOXA_MUST_EFR_REGISTER);
 312         efr &= ~MOXA_MUST_EFR_EFRB_ENABLE;
 313
 314         outb(efr, baseio + MOXA_MUST_EFR_REGISTER);
 315         outb(oldlcr, baseio + UART_LCR);
 316 }
 317
 318 static void mxser_set_must_xon1_value(unsigned long baseio, u8 value)
 319 {
 320         u8 oldlcr;
 321         u8 efr;
 322
 323         oldlcr = inb(baseio + UART_LCR);
 324         outb(MOXA_MUST_ENTER_ENCHANCE, baseio + UART_LCR);
 325
 326         efr = inb(baseio + MOXA_MUST_EFR_REGISTER);
 327         efr &= ~MOXA_MUST_EFR_BANK_MASK;
 328         efr |= MOXA_MUST_EFR_BANK0;
 329
 330         outb(efr, baseio + MOXA_MUST_EFR_REGISTER);
 331         outb(value, baseio + MOXA_MUST_XON1_REGISTER);
 332         outb(oldlcr, baseio + UART_LCR);
 333 }
 334
 335 static void mxser_set_must_xoff1_value(unsigned long baseio, u8 value)
 336 {
 337         u8 oldlcr;
 338         u8 efr;
 339
 340         oldlcr = inb(baseio + UART_LCR);
 341         outb(MOXA_MUST_ENTER_ENCHANCE, baseio + UART_LCR);
 342
 343         efr = inb(baseio + MOXA_MUST_EFR_REGISTER);
 344         efr &= ~MOXA_MUST_EFR_BANK_MASK;
 345         efr |= MOXA_MUST_EFR_BANK0;
 346
 347         outb(efr, baseio + MOXA_MUST_EFR_REGISTER);
 348         outb(value, baseio + MOXA_MUST_XOFF1_REGISTER);
 349         outb(oldlcr, baseio + UART_LCR);
 350 }
 351
 352 static void mxser_set_must_fifo_value(struct mxser_port *info)
 353 {
 354         u8 oldlcr;
 355         u8 efr;
 356
 357         oldlcr = inb(info->ioaddr + UART_LCR);
 358         outb(MOXA_MUST_ENTER_ENCHANCE, info->ioaddr + UART_LCR);
 359
 360         efr = inb(info->ioaddr + MOXA_MUST_EFR_REGISTER);
 361         efr &= ~MOXA_MUST_EFR_BANK_MASK;
 362         efr |= MOXA_MUST_EFR_BANK1;
 363
 364         outb(efr, info->ioaddr + MOXA_MUST_EFR_REGISTER);
 365         outb((u8)info->rx_high_water, info->ioaddr + MOXA_MUST_RBRTH_REGISTER);
 366         outb((u8)info->rx_trigger, info->ioaddr + MOXA_MUST_RBRTI_REGISTER);
 367         outb((u8)info->rx_low_water, info->ioaddr + MOXA_MUST_RBRTL_REGISTER);
 368         outb(oldlcr, info->ioaddr + UART_LCR);
 369 }
 370
 371 static void mxser_set_must_enum_value(unsigned long baseio, u8 value)
 372 {
 373         u8 oldlcr;
 374         u8 efr;
 375
 376         oldlcr = inb(baseio + UART_LCR);
 377         outb(MOXA_MUST_ENTER_ENCHANCE, baseio + UART_LCR);
 378
 379         efr = inb(baseio + MOXA_MUST_EFR_REGISTER);
 380         efr &= ~MOXA_MUST_EFR_BANK_MASK;
 381         efr |= MOXA_MUST_EFR_BANK2;
 382
 383         outb(efr, baseio + MOXA_MUST_EFR_REGISTER);
 384         outb(value, baseio + MOXA_MUST_ENUM_REGISTER);
 385         outb(oldlcr, baseio + UART_LCR);
 386 }
 387
 388 static void mxser_get_must_hardware_id(unsigned long baseio, u8 *pId)
 389 {
 390         u8 oldlcr;
 391         u8 efr;
 392
 393         oldlcr = inb(baseio + UART_LCR);
 394         outb(MOXA_MUST_ENTER_ENCHANCE, baseio + UART_LCR);
 395
 396         efr = inb(baseio + MOXA_MUST_EFR_REGISTER);
 397         efr &= ~MOXA_MUST_EFR_BANK_MASK;
 398         efr |= MOXA_MUST_EFR_BANK2;
 399
 400         outb(efr, baseio + MOXA_MUST_EFR_REGISTER);
 401         *pId = inb(baseio + MOXA_MUST_HWID_REGISTER);
 402         outb(oldlcr, baseio + UART_LCR);
 403 }
 404
 405 static void SET_MOXA_MUST_NO_SOFTWARE_FLOW_CONTROL(unsigned long baseio)
 406 {
 407         u8 oldlcr;
 408         u8 efr;
 409
 410         oldlcr = inb(baseio + UART_LCR);
 411         outb(MOXA_MUST_ENTER_ENCHANCE, baseio + UART_LCR);
 412
 413         efr = inb(baseio + MOXA_MUST_EFR_REGISTER);
 414         efr &= ~MOXA_MUST_EFR_SF_MASK;
 415
 416         outb(efr, baseio + MOXA_MUST_EFR_REGISTER);
 417         outb(oldlcr, baseio + UART_LCR);
 418 }
 419
 420 static void mxser_enable_must_tx_software_flow_control(unsigned long baseio)
 421 {
 422         u8 oldlcr;
 423         u8 efr;
 424
 425         oldlcr = inb(baseio + UART_LCR);
 426         outb(MOXA_MUST_ENTER_ENCHANCE, baseio + UART_LCR);
 427
 428         efr = inb(baseio + MOXA_MUST_EFR_REGISTER);
 429         efr &= ~MOXA_MUST_EFR_SF_TX_MASK;
 430         efr |= MOXA_MUST_EFR_SF_TX1;
 431
 432         outb(efr, baseio + MOXA_MUST_EFR_REGISTER);
 433         outb(oldlcr, baseio + UART_LCR);
 434 }
 435
 436 static void mxser_disable_must_tx_software_flow_control(unsigned long baseio)
 437 {
 438         u8 oldlcr;
 439         u8 efr;
 440
 441         oldlcr = inb(baseio + UART_LCR);
 442         outb(MOXA_MUST_ENTER_ENCHANCE, baseio + UART_LCR);
 443
 444         efr = inb(baseio + MOXA_MUST_EFR_REGISTER);
 445         efr &= ~MOXA_MUST_EFR_SF_TX_MASK;
 446
 447         outb(efr, baseio + MOXA_MUST_EFR_REGISTER);
 448         outb(oldlcr, baseio + UART_LCR);
 449 }
 450
 451 static void mxser_enable_must_rx_software_flow_control(unsigned long baseio)
 452 {
 453         u8 oldlcr;
 454         u8 efr;
 455
 456         oldlcr = inb(baseio + UART_LCR);
 457         outb(MOXA_MUST_ENTER_ENCHANCE, baseio + UART_LCR);
 458
 459         efr = inb(baseio + MOXA_MUST_EFR_REGISTER);
 460         efr &= ~MOXA_MUST_EFR_SF_RX_MASK;
 461         efr |= MOXA_MUST_EFR_SF_RX1;
 462
 463         outb(efr, baseio + MOXA_MUST_EFR_REGISTER);
 464         outb(oldlcr, baseio + UART_LCR);
 465 }
 466
 467 static void mxser_disable_must_rx_software_flow_control(unsigned long baseio)
 468 {
 469         u8 oldlcr;
 470         u8 efr;
 471
 472         oldlcr = inb(baseio + UART_LCR);
 473         outb(MOXA_MUST_ENTER_ENCHANCE, baseio + UART_LCR);
 474
 475         efr = inb(baseio + MOXA_MUST_EFR_REGISTER);
 476         efr &= ~MOXA_MUST_EFR_SF_RX_MASK;
 477
 478         outb(efr, baseio + MOXA_MUST_EFR_REGISTER);
 479         outb(oldlcr, baseio + UART_LCR);
 480 }
 481
 482 #ifdef CONFIG_PCI
 483 static int __devinit CheckIsMoxaMust(unsigned long io)
 484 {
 485         u8 oldmcr, hwid;
 486         int i;
 487
 488         outb(0, io + UART_LCR);
 489         mxser_disable_must_enchance_mode(io);
 490         oldmcr = inb(io + UART_MCR);
 491         outb(0, io + UART_MCR);
 492         mxser_set_must_xon1_value(io, 0x11);
 493         if ((hwid = inb(io + UART_MCR)) != 0) {
 494                 outb(oldmcr, io + UART_MCR);
 495                 return MOXA_OTHER_UART;
 496         }
 497
 498         mxser_get_must_hardware_id(io, &hwid);
 499         for (i = 1; i < UART_INFO_NUM; i++) { /* 0 = OTHER_UART */
 500                 if (hwid == Gpci_uart_info[i].type)
 501                         return (int)hwid;
 502         }
 503         return MOXA_OTHER_UART;
 504 }
 505 #endif
 506
 507 static void process_txrx_fifo(struct mxser_port *info)
 508 {
 509         int i;
 510
 511         if ((info->type == PORT_16450) || (info->type == PORT_8250)) {
 512                 info->rx_trigger = 1;
 513                 info->rx_high_water = 1;
 514                 info->rx_low_water = 1;
 515                 info->xmit_fifo_size = 1;
 516         } else
 517                 for (i = 0; i < UART_INFO_NUM; i++)
 518                         if (info->board->chip_flag == Gpci_uart_info[i].type) {
 519                                 info->rx_trigger = Gpci_uart_info[i].rx_trigger;
 520                                 info->rx_low_water = Gpci_uart_info[i].rx_low_water;
 521                                 info->rx_high_water = Gpci_uart_info[i].rx_high_water;
 522                                 info->xmit_fifo_size = Gpci_uart_info[i].xmit_fifo_size;
 523                                 break;
 524                         }
 525 }
 526
 527 static unsigned char mxser_get_msr(int baseaddr, int mode, int port)
 528 {
 529         static unsigned char mxser_msr[MXSER_PORTS + 1];
 530         unsigned char status = 0;
 531
 532         status = inb(baseaddr + UART_MSR);
 533
 534         mxser_msr[port] &= 0x0F;
 535         mxser_msr[port] |= status;
 536         status = mxser_msr[port];
 537         if (mode)
 538                 mxser_msr[port] = 0;
 539
 540         return status;
 541 }
 542
 543 static int mxser_block_til_ready(struct tty_struct *tty, struct file *filp,
 544                 struct mxser_port *port)
 545 {
 546         DECLARE_WAITQUEUE(wait, current);
 547         int retval;
 548         int do_clocal = 0;
 549         unsigned long flags;
 550
 551         /*
 552          * If non-blocking mode is set, or the port is not enabled,
 553          * then make the check up front and then exit.
 554          */
 555         if ((filp->f_flags & O_NONBLOCK) ||
 556                         test_bit(TTY_IO_ERROR, &tty->flags)) {
 557                 port->port.flags |= ASYNC_NORMAL_ACTIVE;
 558                 return 0;
 559         }
 560
 561         if (tty->termios->c_cflag & CLOCAL)
 562                 do_clocal = 1;
 563
 564         /*
 565          * Block waiting for the carrier detect and the line to become
 566          * free (i.e., not in use by the callout).  While we are in
 567          * this loop, port->port.count is dropped by one, so that
 568          * mxser_close() knows when to free things.  We restore it upon
 569          * exit, either normal or abnormal.
 570          */
 571         retval = 0;
 572         add_wait_queue(&port->port.open_wait, &wait);
 573
 574         spin_lock_irqsave(&port->slock, flags);
 575         if (!tty_hung_up_p(filp))
 576                 port->port.count--;
 577         spin_unlock_irqrestore(&port->slock, flags);
 578         port->port.blocked_open++;
 579         while (1) {
 580                 spin_lock_irqsave(&port->slock, flags);
 581                 outb(inb(port->ioaddr + UART_MCR) |
 582                         UART_MCR_DTR | UART_MCR_RTS, port->ioaddr + UART_MCR);
 583                 spin_unlock_irqrestore(&port->slock, flags);
 584                 set_current_state(TASK_INTERRUPTIBLE);
 585                 if (tty_hung_up_p(filp) || !(port->port.flags & ASYNC_INITIALIZED)) {
 586                         if (port->port.flags & ASYNC_HUP_NOTIFY)
 587                                 retval = -EAGAIN;
 588                         else
 589                                 retval = -ERESTARTSYS;
 590                         break;
 591                 }
 592                 if (!(port->port.flags & ASYNC_CLOSING) &&
 593                                 (do_clocal ||
 594                                 (inb(port->ioaddr + UART_MSR) & UART_MSR_DCD)))
 595                         break;
 596                 if (signal_pending(current)) {
 597                         retval = -ERESTARTSYS;
 598                         break;
 599                 }
 600                 schedule();
 601         }
 602         set_current_state(TASK_RUNNING);
 603         remove_wait_queue(&port->port.open_wait, &wait);
 604         if (!tty_hung_up_p(filp))
 605                 port->port.count++;
 606         port->port.blocked_open--;
 607         if (retval)
 608                 return retval;
 609         port->port.flags |= ASYNC_NORMAL_ACTIVE;
 610         return 0;
 611 }
 612
 613 static int mxser_set_baud(struct tty_struct *tty, long newspd)
 614 {
 615         struct mxser_port *info = tty->driver_data;
 616         int quot = 0, baud;
 617         unsigned char cval;
 618
 619         if (!tty->termios)
 620                 return -1;
 621
 622         if (!info->ioaddr)
 623                 return -1;
 624
 625         if (newspd > info->max_baud)
 626                 return -1;
 627
 628         if (newspd == 134) {
 629                 quot = 2 * info->baud_base / 269;
 630                 tty_encode_baud_rate(tty, 134, 134);
 631         } else if (newspd) {
 632                 quot = info->baud_base / newspd;
 633                 if (quot == 0)
 634                         quot = 1;
 635                 baud = info->baud_base/quot;
 636                 tty_encode_baud_rate(tty, baud, baud);
 637         } else {
 638                 quot = 0;
 639         }
 640
 641         info->timeout = ((info->xmit_fifo_size * HZ * 10 * quot) / info->baud_base);
 642         info->timeout += HZ / 50;       /* Add .02 seconds of slop */
 643
 644         if (quot) {
 645                 info->MCR |= UART_MCR_DTR;
 646                 outb(info->MCR, info->ioaddr + UART_MCR);
 647         } else {
 648                 info->MCR &= ~UART_MCR_DTR;
 649                 outb(info->MCR, info->ioaddr + UART_MCR);
 650                 return 0;
 651         }
 652
 653         cval = inb(info->ioaddr + UART_LCR);
 654
 655         outb(cval | UART_LCR_DLAB, info->ioaddr + UART_LCR);    /* set DLAB */
 656
 657         outb(quot & 0xff, info->ioaddr + UART_DLL);     /* LS of divisor */
 658         outb(quot >> 8, info->ioaddr + UART_DLM);       /* MS of divisor */
 659         outb(cval, info->ioaddr + UART_LCR);    /* reset DLAB */
 660
 661 #ifdef BOTHER
 662         if (C_BAUD(tty) == BOTHER) {
 663                 quot = info->baud_base % newspd;
 664                 quot *= 8;
 665                 if (quot % newspd > newspd / 2) {
 666                         quot /= newspd;
 667                         quot++;
 668                 } else
 669                         quot /= newspd;
 670
 671                 mxser_set_must_enum_value(info->ioaddr, quot);
 672         } else
 673 #endif
 674                 mxser_set_must_enum_value(info->ioaddr, 0);
 675
 676         return 0;
 677 }
 678
 679 /*
 680  * This routine is called to set the UART divisor registers to match
 681  * the specified baud rate for a serial port.
 682  */
 683 static int mxser_change_speed(struct tty_struct *tty,
 684                                         struct ktermios *old_termios)
 685 {
 686         struct mxser_port *info = tty->driver_data;
 687         unsigned cflag, cval, fcr;
 688         int ret = 0;
 689         unsigned char status;
 690
 691         if (!tty->termios)
 692                 return ret;
 693         cflag = tty->termios->c_cflag;
 694         if (!info->ioaddr)
 695                 return ret;
 696
 697         if (mxser_set_baud_method[tty->index] == 0)
 698                 mxser_set_baud(tty, tty_get_baud_rate(tty));
 699
 700         /* byte size and parity */
 701         switch (cflag & CSIZE) {
 702         case CS5:
 703                 cval = 0x00;
 704                 break;
 705         case CS6:
 706                 cval = 0x01;
 707                 break;
 708         case CS7:
 709                 cval = 0x02;
 710                 break;
 711         case CS8:
 712                 cval = 0x03;
 713                 break;
 714         default:
 715                 cval = 0x00;
 716                 break;          /* too keep GCC shut... */
 717         }
 718         if (cflag & CSTOPB)
 719                 cval |= 0x04;
 720         if (cflag & PARENB)
 721                 cval |= UART_LCR_PARITY;
 722         if (!(cflag & PARODD))
 723                 cval |= UART_LCR_EPAR;
 724         if (cflag & CMSPAR)
 725                 cval |= UART_LCR_SPAR;
 726
 727         if ((info->type == PORT_8250) || (info->type == PORT_16450)) {
 728                 if (info->board->chip_flag) {
 729                         fcr = UART_FCR_ENABLE_FIFO;
 730                         fcr |= MOXA_MUST_FCR_GDA_MODE_ENABLE;
 731                         mxser_set_must_fifo_value(info);
 732                 } else
 733                         fcr = 0;
 734         } else {
 735                 fcr = UART_FCR_ENABLE_FIFO;
 736                 if (info->board->chip_flag) {
 737                         fcr |= MOXA_MUST_FCR_GDA_MODE_ENABLE;
 738                         mxser_set_must_fifo_value(info);
 739                 } else {
 740                         switch (info->rx_trigger) {
 741                         case 1:
 742                                 fcr |= UART_FCR_TRIGGER_1;
 743                                 break;
 744                         case 4:
 745                                 fcr |= UART_FCR_TRIGGER_4;
 746                                 break;
 747                         case 8:
 748                                 fcr |= UART_FCR_TRIGGER_8;
 749                                 break;
 750                         default:
 751                                 fcr |= UART_FCR_TRIGGER_14;
 752                                 break;
 753                         }
 754                 }
 755         }
 756
 757         /* CTS flow control flag and modem status interrupts */
 758         info->IER &= ~UART_IER_MSI;
 759         info->MCR &= ~UART_MCR_AFE;
 760         if (cflag & CRTSCTS) {
 761                 info->port.flags |= ASYNC_CTS_FLOW;
 762                 info->IER |= UART_IER_MSI;
 763                 if ((info->type == PORT_16550A) || (info->board->chip_flag)) {
 764                         info->MCR |= UART_MCR_AFE;
 765                 } else {
 766                         status = inb(info->ioaddr + UART_MSR);
 767                         if (tty->hw_stopped) {
 768                                 if (status & UART_MSR_CTS) {
 769                                         tty->hw_stopped = 0;
 770                                         if (info->type != PORT_16550A &&
 771                                                         !info->board->chip_flag) {
 772                                                 outb(info->IER & ~UART_IER_THRI,
 773                                                         info->ioaddr +
 774                                                         UART_IER);
 775                                                 info->IER |= UART_IER_THRI;
 776                                                 outb(info->IER, info->ioaddr +
 777                                                                 UART_IER);
 778                                         }
 779                                         tty_wakeup(tty);
 780                                 }
 781                         } else {
 782                                 if (!(status & UART_MSR_CTS)) {
 783                                         tty->hw_stopped = 1;
 784                                         if ((info->type != PORT_16550A) &&
 785                                                         (!info->board->chip_flag)) {
 786                                                 info->IER &= ~UART_IER_THRI;
 787                                                 outb(info->IER, info->ioaddr +
 788                                                                 UART_IER);
 789                                         }
 790                                 }
 791                         }
 792                 }
 793         } else {
 794                 info->port.flags &= ~ASYNC_CTS_FLOW;
 795         }
 796         outb(info->MCR, info->ioaddr + UART_MCR);
 797         if (cflag & CLOCAL) {
 798                 info->port.flags &= ~ASYNC_CHECK_CD;
 799         } else {
 800                 info->port.flags |= ASYNC_CHECK_CD;
 801                 info->IER |= UART_IER_MSI;
 802         }
 803         outb(info->IER, info->ioaddr + UART_IER);
 804
 805         /*
 806          * Set up parity check flag
 807          */
 808         info->read_status_mask = UART_LSR_OE | UART_LSR_THRE | UART_LSR_DR;
 809         if (I_INPCK(tty))
 810                 info->read_status_mask |= UART_LSR_FE | UART_LSR_PE;
 811         if (I_BRKINT(tty) || I_PARMRK(tty))
 812                 info->read_status_mask |= UART_LSR_BI;
 813
 814         info->ignore_status_mask = 0;
 815
 816         if (I_IGNBRK(tty)) {
 817                 info->ignore_status_mask |= UART_LSR_BI;
 818                 info->read_status_mask |= UART_LSR_BI;
 819                 /*
 820                  * If we're ignore parity and break indicators, ignore
 821                  * overruns too.  (For real raw support).
 822                  */
 823                 if (I_IGNPAR(tty)) {
 824                         info->ignore_status_mask |=
 825                                                 UART_LSR_OE |
 826                                                 UART_LSR_PE |
 827                                                 UART_LSR_FE;
 828                         info->read_status_mask |=
 829                                                 UART_LSR_OE |
 830                                                 UART_LSR_PE |
 831                                                 UART_LSR_FE;
 832                 }
 833         }
 834         if (info->board->chip_flag) {
 835                 mxser_set_must_xon1_value(info->ioaddr, START_CHAR(tty));
 836                 mxser_set_must_xoff1_value(info->ioaddr, STOP_CHAR(tty));
 837                 if (I_IXON(tty)) {
 838                         mxser_enable_must_rx_software_flow_control(
 839                                         info->ioaddr);
 840                 } else {
 841                         mxser_disable_must_rx_software_flow_control(
 842                                         info->ioaddr);
 843                 }
 844                 if (I_IXOFF(tty)) {
 845                         mxser_enable_must_tx_software_flow_control(
 846                                         info->ioaddr);
 847                 } else {
 848                         mxser_disable_must_tx_software_flow_control(
 849                                         info->ioaddr);
 850                 }
 851         }
 852
 853
 854         outb(fcr, info->ioaddr + UART_FCR);     /* set fcr */
 855         outb(cval, info->ioaddr + UART_LCR);
 856
 857         return ret;
 858 }
 859
 860 static void mxser_check_modem_status(struct tty_struct *tty,
 861                                 struct mxser_port *port, int status)
 862 {
 863         /* update input line counters */
 864         if (status & UART_MSR_TERI)
 865                 port->icount.rng++;
 866         if (status & UART_MSR_DDSR)
 867                 port->icount.dsr++;
 868         if (status & UART_MSR_DDCD)
 869                 port->icount.dcd++;
 870         if (status & UART_MSR_DCTS)
 871                 port->icount.cts++;
 872         port->mon_data.modem_status = status;
 873         wake_up_interruptible(&port->delta_msr_wait);
 874
 875         if ((port->port.flags & ASYNC_CHECK_CD) && (status & UART_MSR_DDCD)) {
 876                 if (status & UART_MSR_DCD)
 877                         wake_up_interruptible(&port->port.open_wait);
 878         }
 879
 880         tty = tty_port_tty_get(&port->port);
 881         if (port->port.flags & ASYNC_CTS_FLOW) {
 882                 if (tty->hw_stopped) {
 883                         if (status & UART_MSR_CTS) {
 884                                 tty->hw_stopped = 0;
 885
 886                                 if ((port->type != PORT_16550A) &&
 887                                                 (!port->board->chip_flag)) {
 888                                         outb(port->IER & ~UART_IER_THRI,
 889                                                 port->ioaddr + UART_IER);
 890                                         port->IER |= UART_IER_THRI;
 891                                         outb(port->IER, port->ioaddr +
 892                                                         UART_IER);
 893                                 }
 894                                 tty_wakeup(tty);
 895                         }
 896                 } else {
 897                         if (!(status & UART_MSR_CTS)) {
 898                                 tty->hw_stopped = 1;
 899                                 if (port->type != PORT_16550A &&
 900                                                 !port->board->chip_flag) {
 901                                         port->IER &= ~UART_IER_THRI;
 902                                         outb(port->IER, port->ioaddr +
 903                                                         UART_IER);
 904                                 }
 905                         }
 906                 }
 907         }
 908 }
 909
 910 static int mxser_startup(struct tty_struct *tty)
 911 {
 912         struct mxser_port *info = tty->driver_data;
 913         unsigned long page;
 914         unsigned long flags;
 915
 916         page = __get_free_page(GFP_KERNEL);
 917         if (!page)
 918                 return -ENOMEM;
 919
 920         spin_lock_irqsave(&info->slock, flags);
 921
 922         if (info->port.flags & ASYNC_INITIALIZED) {
 923                 free_page(page);
 924                 spin_unlock_irqrestore(&info->slock, flags);
 925                 return 0;
 926         }
 927
 928         if (!info->ioaddr || !info->type) {
 929                 set_bit(TTY_IO_ERROR, &tty->flags);
 930                 free_page(page);
 931                 spin_unlock_irqrestore(&info->slock, flags);
 932                 return 0;
 933         }
 934         if (info->port.xmit_buf)
 935                 free_page(page);
 936         else
 937                 info->port.xmit_buf = (unsigned char *) page;
 938
 939         /*
 940          * Clear the FIFO buffers and disable them
 941          * (they will be reenabled in mxser_change_speed())
 942          */
 943         if (info->board->chip_flag)
 944                 outb((UART_FCR_CLEAR_RCVR |
 945                         UART_FCR_CLEAR_XMIT |
 946                         MOXA_MUST_FCR_GDA_MODE_ENABLE), info->ioaddr + UART_FCR);
 947         else
 948                 outb((UART_FCR_CLEAR_RCVR | UART_FCR_CLEAR_XMIT),
 949                         info->ioaddr + UART_FCR);
 950
 951         /*
 952          * At this point there's no way the LSR could still be 0xFF;
 953          * if it is, then bail out, because there's likely no UART
 954          * here.
 955          */
 956         if (inb(info->ioaddr + UART_LSR) == 0xff) {
 957                 spin_unlock_irqrestore(&info->slock, flags);
 958                 if (capable(CAP_SYS_ADMIN)) {
 959                         if (tty)
 960                                 set_bit(TTY_IO_ERROR, &tty->flags);
 961                         return 0;
 962                 } else
 963                         return -ENODEV;
 964         }
 965
 966         /*
 967          * Clear the interrupt registers.
 968          */
 969         (void) inb(info->ioaddr + UART_LSR);
 970         (void) inb(info->ioaddr + UART_RX);
 971         (void) inb(info->ioaddr + UART_IIR);
 972         (void) inb(info->ioaddr + UART_MSR);
 973
 974         /*
 975          * Now, initialize the UART
 976          */
 977         outb(UART_LCR_WLEN8, info->ioaddr + UART_LCR);  /* reset DLAB */
 978         info->MCR = UART_MCR_DTR | UART_MCR_RTS;
 979         outb(info->MCR, info->ioaddr + UART_MCR);
 980
 981         /*
 982          * Finally, enable interrupts
 983          */
 984         info->IER = UART_IER_MSI | UART_IER_RLSI | UART_IER_RDI;
 985
 986         if (info->board->chip_flag)
 987                 info->IER |= MOXA_MUST_IER_EGDAI;
 988         outb(info->IER, info->ioaddr + UART_IER);       /* enable interrupts */
 989
 990         /*
 991          * And clear the interrupt registers again for luck.
 992          */
 993         (void) inb(info->ioaddr + UART_LSR);
 994         (void) inb(info->ioaddr + UART_RX);
 995         (void) inb(info->ioaddr + UART_IIR);
 996         (void) inb(info->ioaddr + UART_MSR);
 997
 998         clear_bit(TTY_IO_ERROR, &tty->flags);
 999         info->xmit_cnt = info->xmit_head = info->xmit_tail = 0;
1000
1001         /*
1002          * and set the speed of the serial port
1003          */
1004         mxser_change_speed(tty, NULL);
1005         info->port.flags |= ASYNC_INITIALIZED;
1006         spin_unlock_irqrestore(&info->slock, flags);
1007
1008         return 0;
1009 }
1010
1011 /*
1012  * This routine will shutdown a serial port; interrupts maybe disabled, and
1013  * DTR is dropped if the hangup on close termio flag is on.
1014  */
1015 static void mxser_shutdown(struct tty_struct *tty)
1016 {
1017         struct mxser_port *info = tty->driver_data;
1018         unsigned long flags;
1019
1020         if (!(info->port.flags & ASYNC_INITIALIZED))
1021                 return;
1022
1023         spin_lock_irqsave(&info->slock, flags);
1024
1025         /*
1026          * clear delta_msr_wait queue to avoid mem leaks: we may free the irq
1027          * here so the queue might never be waken up
1028          */
1029         wake_up_interruptible(&info->delta_msr_wait);
1030
1031         /*
1032          * Free the IRQ, if necessary
1033          */
1034         if (info->port.xmit_buf) {
1035                 free_page((unsigned long) info->port.xmit_buf);
1036                 info->port.xmit_buf = NULL;
1037         }
1038
1039         info->IER = 0;
1040         outb(0x00, info->ioaddr + UART_IER);
1041
1042         if (tty->termios->c_cflag & HUPCL)
1043                 info->MCR &= ~(UART_MCR_DTR | UART_MCR_RTS);
1044         outb(info->MCR, info->ioaddr + UART_MCR);
1045
1046         /* clear Rx/Tx FIFO's */
1047         if (info->board->chip_flag)
1048                 outb(UART_FCR_CLEAR_RCVR | UART_FCR_CLEAR_XMIT |
1049                                 MOXA_MUST_FCR_GDA_MODE_ENABLE,
1050                                 info->ioaddr + UART_FCR);
1051         else
1052                 outb(UART_FCR_CLEAR_RCVR | UART_FCR_CLEAR_XMIT,
1053                         info->ioaddr + UART_FCR);
1054
1055         /* read data port to reset things */
1056         (void) inb(info->ioaddr + UART_RX);
1057
1058         set_bit(TTY_IO_ERROR, &tty->flags);
1059
1060         info->port.flags &= ~ASYNC_INITIALIZED;
1061
1062         if (info->board->chip_flag)
1063                 SET_MOXA_MUST_NO_SOFTWARE_FLOW_CONTROL(info->ioaddr);
1064
1065         spin_unlock_irqrestore(&info->slock, flags);
1066 }
1067
1068 /*
1069  * This routine is called whenever a serial port is opened.  It
1070  * enables interrupts for a serial port, linking in its async structure into
1071  * the IRQ chain.   It also performs the serial-specific
1072  * initialization for the tty structure.
1073  */
1074 static int mxser_open(struct tty_struct *tty, struct file *filp)
1075 {
1076         struct mxser_port *info;
1077         unsigned long flags;
1078         int retval, line;
1079
1080         line = tty->index;
1081         if (line == MXSER_PORTS)
1082                 return 0;
1083         if (line < 0 || line > MXSER_PORTS)
1084                 return -ENODEV;
1085         info = &mxser_boards[line / MXSER_PORTS_PER_BOARD].ports[line % MXSER_PORTS_PER_BOARD];
1086         if (!info->ioaddr)
1087                 return -ENODEV;
1088
1089         tty->driver_data = info;
1090         tty_port_tty_set(&info->port, tty);
1091         /*
1092          * Start up serial port
1093          */
1094         spin_lock_irqsave(&info->slock, flags);
1095         info->port.count++;
1096         spin_unlock_irqrestore(&info->slock, flags);
1097         retval = mxser_startup(tty);
1098         if (retval)
1099                 return retval;
1100
1101         retval = mxser_block_til_ready(tty, filp, info);
1102         if (retval)
1103                 return retval;
1104
1105         /* unmark here for very high baud rate (ex. 921600 bps) used */
1106         tty->low_latency = 1;
1107         return 0;
1108 }
1109
1110 static void mxser_flush_buffer(struct tty_struct *tty)
1111 {
1112         struct mxser_port *info = tty->driver_data;
1113         char fcr;
1114         unsigned long flags;
1115
1116
1117         spin_lock_irqsave(&info->slock, flags);
1118         info->xmit_cnt = info->xmit_head = info->xmit_tail = 0;
1119
1120         fcr = inb(info->ioaddr + UART_FCR);
1121         outb((fcr | UART_FCR_CLEAR_RCVR | UART_FCR_CLEAR_XMIT),
1122                 info->ioaddr + UART_FCR);
1123         outb(fcr, info->ioaddr + UART_FCR);
1124
1125         spin_unlock_irqrestore(&info->slock, flags);
1126
1127         tty_wakeup(tty);
1128 }
1129
1130
1131 /*
1132  * This routine is called when the serial port gets closed.  First, we
1133  * wait for the last remaining data to be sent.  Then, we unlink its
1134  * async structure from the interrupt chain if necessary, and we free
1135  * that IRQ if nothing is left in the chain.
1136  */
1137 static void mxser_close(struct tty_struct *tty, struct file *filp)
1138 {
1139         struct mxser_port *info = tty->driver_data;
1140
1141         unsigned long timeout;
1142         unsigned long flags;
1143
1144         if (tty->index == MXSER_PORTS)
1145                 return;
1146         if (!info)
1147                 return;
1148
1149         spin_lock_irqsave(&info->slock, flags);
1150
1151         if (tty_hung_up_p(filp)) {
1152                 spin_unlock_irqrestore(&info->slock, flags);
1153                 return;
1154         }
1155         if ((tty->count == 1) && (info->port.count != 1)) {
1156                 /*
1157                  * Uh, oh.  tty->count is 1, which means that the tty
1158                  * structure will be freed.  Info->port.count should always
1159                  * be one in these conditions.  If it's greater than
1160                  * one, we've got real problems, since it means the
1161                  * serial port won't be shutdown.
1162                  */
1163                 printk(KERN_ERR "mxser_close: bad serial port count; "
1164                         "tty->count is 1, info->port.count is %d\n", info->port.count);
1165                 info->port.count = 1;
1166         }
1167         if (--info->port.count < 0) {
1168                 printk(KERN_ERR "mxser_close: bad serial port count for "
1169                         "ttys%d: %d\n", tty->index, info->port.count);
1170                 info->port.count = 0;
1171         }
1172         if (info->port.count) {
1173                 spin_unlock_irqrestore(&info->slock, flags);
1174                 return;
1175         }
1176         info->port.flags |= ASYNC_CLOSING;
1177         spin_unlock_irqrestore(&info->slock, flags);
1178         /*
1179          * Save the termios structure, since this port may have
1180          * separate termios for callout and dialin.
1181          */
1182         if (info->port.flags & ASYNC_NORMAL_ACTIVE)
1183                 info->normal_termios = *tty->termios;
1184         /*
1185          * Now we wait for the transmit buffer to clear; and we notify
1186          * the line discipline to only process XON/XOFF characters.
1187          */
1188         tty->closing = 1;
1189         if (info->port.closing_wait != ASYNC_CLOSING_WAIT_NONE)
1190                 tty_wait_until_sent(tty, info->port.closing_wait);
1191         /*
1192          * At this point we stop accepting input.  To do this, we
1193          * disable the receive line status interrupts, and tell the
1194          * interrupt driver to stop checking the data ready bit in the
1195          * line status register.
1196          */
1197         info->IER &= ~UART_IER_RLSI;
1198         if (info->board->chip_flag)
1199                 info->IER &= ~MOXA_MUST_RECV_ISR;
1200
1201         if (info->port.flags & ASYNC_INITIALIZED) {
1202                 outb(info->IER, info->ioaddr + UART_IER);
1203                 /*
1204                  * Before we drop DTR, make sure the UART transmitter
1205                  * has completely drained; this is especially
1206                  * important if there is a transmit FIFO!
1207                  */
1208                 timeout = jiffies + HZ;
1209                 while (!(inb(info->ioaddr + UART_LSR) & UART_LSR_TEMT)) {
1210                         schedule_timeout_interruptible(5);
1211                         if (time_after(jiffies, timeout))
1212                                 break;
1213                 }
1214         }
1215         mxser_shutdown(tty);
1216
1217         mxser_flush_buffer(tty);
1218         tty_ldisc_flush(tty);
1219
1220         tty->closing = 0;
1221         tty_port_tty_set(&info->port, NULL);
1222         if (info->port.blocked_open) {
1223                 if (info->port.close_delay)
1224                         schedule_timeout_interruptible(info->port.close_delay);
1225                 wake_up_interruptible(&info->port.open_wait);
1226         }
1227
1228         info->port.flags &= ~(ASYNC_NORMAL_ACTIVE | ASYNC_CLOSING);
1229 }
1230
1231 static int mxser_write(struct tty_struct *tty, const unsigned char *buf, int count)
1232 {
1233         int c, total = 0;
1234         struct mxser_port *info = tty->driver_data;
1235         unsigned long flags;
1236
1237         if (!info->port.xmit_buf)
1238                 return 0;
1239
1240         while (1) {
1241                 c = min_t(int, count, min(SERIAL_XMIT_SIZE - info->xmit_cnt - 1,
1242                                           SERIAL_XMIT_SIZE - info->xmit_head));
1243                 if (c <= 0)
1244                         break;
1245
1246                 memcpy(info->port.xmit_buf + info->xmit_head, buf, c);
1247                 spin_lock_irqsave(&info->slock, flags);
1248                 info->xmit_head = (info->xmit_head + c) &
1249                                   (SERIAL_XMIT_SIZE - 1);
1250                 info->xmit_cnt += c;
1251                 spin_unlock_irqrestore(&info->slock, flags);
1252
1253                 buf += c;
1254                 count -= c;
1255                 total += c;
1256         }
1257
1258         if (info->xmit_cnt && !tty->stopped) {
1259                 if (!tty->hw_stopped ||
1260                                 (info->type == PORT_16550A) ||
1261                                 (info->board->chip_flag)) {
1262                         spin_lock_irqsave(&info->slock, flags);
1263                         outb(info->IER & ~UART_IER_THRI, info->ioaddr +
1264                                         UART_IER);
1265                         info->IER |= UART_IER_THRI;
1266                         outb(info->IER, info->ioaddr + UART_IER);
1267                         spin_unlock_irqrestore(&info->slock, flags);
1268                 }
1269         }
1270         return total;
1271 }
1272
1273 static int mxser_put_char(struct tty_struct *tty, unsigned char ch)
1274 {
1275         struct mxser_port *info = tty->driver_data;
1276         unsigned long flags;
1277
1278         if (!info->port.xmit_buf)
1279                 return 0;
1280
1281         if (info->xmit_cnt >= SERIAL_XMIT_SIZE - 1)
1282                 return 0;
1283
1284         spin_lock_irqsave(&info->slock, flags);
1285         info->port.xmit_buf[info->xmit_head++] = ch;
1286         info->xmit_head &= SERIAL_XMIT_SIZE - 1;
1287         info->xmit_cnt++;
1288         spin_unlock_irqrestore(&info->slock, flags);
1289         if (!tty->stopped) {
1290                 if (!tty->hw_stopped ||
1291                                 (info->type == PORT_16550A) ||
1292                                 info->board->chip_flag) {
1293                         spin_lock_irqsave(&info->slock, flags);
1294                         outb(info->IER & ~UART_IER_THRI, info->ioaddr + UART_IER);
1295                         info->IER |= UART_IER_THRI;
1296                         outb(info->IER, info->ioaddr + UART_IER);
1297                         spin_unlock_irqrestore(&info->slock, flags);
1298                 }
1299         }
1300         return 1;
1301 }
1302
1303
1304 static void mxser_flush_chars(struct tty_struct *tty)
1305 {
1306         struct mxser_port *info = tty->driver_data;
1307         unsigned long flags;
1308
1309         if (info->xmit_cnt <= 0 || tty->stopped || !info->port.xmit_buf ||
1310                         (tty->hw_stopped && info->type != PORT_16550A &&
1311                          !info->board->chip_flag))
1312                 return;
1313
1314         spin_lock_irqsave(&info->slock, flags);
1315
1316         outb(info->IER & ~UART_IER_THRI, info->ioaddr + UART_IER);
1317         info->IER |= UART_IER_THRI;
1318         outb(info->IER, info->ioaddr + UART_IER);
1319
1320         spin_unlock_irqrestore(&info->slock, flags);
1321 }
1322
1323 static int mxser_write_room(struct tty_struct *tty)
1324 {
1325         struct mxser_port *info = tty->driver_data;
1326         int ret;
1327
1328         ret = SERIAL_XMIT_SIZE - info->xmit_cnt - 1;
1329         return ret < 0 ? 0 : ret;
1330 }
1331
1332 static int mxser_chars_in_buffer(struct tty_struct *tty)
1333 {
1334         struct mxser_port *info = tty->driver_data;
1335         return info->xmit_cnt;
1336 }
1337
1338 /*
1339  * ------------------------------------------------------------
1340  * friends of mxser_ioctl()
1341  * ------------------------------------------------------------
1342  */
1343 static int mxser_get_serial_info(struct tty_struct *tty,
1344                 struct serial_struct __user *retinfo)
1345 {
1346         struct mxser_port *info = tty->driver_data;
1347         struct serial_struct tmp = {
1348                 .type = info->type,
1349                 .line = tty->index,
1350                 .port = info->ioaddr,
1351                 .irq = info->board->irq,
1352                 .flags = info->port.flags,
1353                 .baud_base = info->baud_base,
1354                 .close_delay = info->port.close_delay,
1355                 .closing_wait = info->port.closing_wait,
1356                 .custom_divisor = info->custom_divisor,
1357                 .hub6 = 0
1358         };
1359         if (copy_to_user(retinfo, &tmp, sizeof(*retinfo)))
1360                 return -EFAULT;
1361         return 0;
1362 }
1363
1364 static int mxser_set_serial_info(struct tty_struct *tty,
1365                 struct serial_struct __user *new_info)
1366 {
1367         struct mxser_port *info = tty->driver_data;
1368         struct serial_struct new_serial;
1369         speed_t baud;
1370         unsigned long sl_flags;
1371         unsigned int flags;
1372         int retval = 0;
1373
1374         if (!new_info || !info->ioaddr)
1375                 return -ENODEV;
1376         if (copy_from_user(&new_serial, new_info, sizeof(new_serial)))
1377                 return -EFAULT;
1378
1379         if (new_serial.irq != info->board->irq ||
1380                         new_serial.port != info->ioaddr)
1381                 return -EINVAL;
1382
1383         flags = info->port.flags & ASYNC_SPD_MASK;
1384
1385         if (!capable(CAP_SYS_ADMIN)) {
1386                 if ((new_serial.baud_base != info->baud_base) ||
1387                                 (new_serial.close_delay != info->port.close_delay) ||
1388                                 ((new_serial.flags & ~ASYNC_USR_MASK) != (info->port.flags & ~ASYNC_USR_MASK)))
1389                         return -EPERM;
1390                 info->port.flags = ((info->port.flags & ~ASYNC_USR_MASK) |
1391                                 (new_serial.flags & ASYNC_USR_MASK));
1392         } else {
1393                 /*
1394                  * OK, past this point, all the error checking has been done.
1395                  * At this point, we start making changes.....
1396                  */
1397                 info->port.flags = ((info->port.flags & ~ASYNC_FLAGS) |
1398                                 (new_serial.flags & ASYNC_FLAGS));
1399                 info->port.close_delay = new_serial.close_delay * HZ / 100;
1400                 info->port.closing_wait = new_serial.closing_wait * HZ / 100;
1401                 tty->low_latency = (info->port.flags & ASYNC_LOW_LATENCY)
1402                                                                 ? 1 : 0;
1403                 if ((info->port.flags & ASYNC_SPD_MASK) == ASYNC_SPD_CUST &&
1404                                 (new_serial.baud_base != info->baud_base ||
1405                                 new_serial.custom_divisor !=
1406                                 info->custom_divisor)) {
1407                         baud = new_serial.baud_base / new_serial.custom_divisor;
1408                         tty_encode_baud_rate(tty, baud, baud);
1409                 }
1410         }
1411
1412         info->type = new_serial.type;
1413
1414         process_txrx_fifo(info);
1415
1416         if (info->port.flags & ASYNC_INITIALIZED) {
1417                 if (flags != (info->port.flags & ASYNC_SPD_MASK)) {
1418                         spin_lock_irqsave(&info->slock, sl_flags);
1419                         mxser_change_speed(tty, NULL);
1420                         spin_unlock_irqrestore(&info->slock, sl_flags);
1421                 }
1422         } else
1423                 retval = mxser_startup(tty);
1424
1425         return retval;
1426 }
1427
1428 /*
1429  * mxser_get_lsr_info - get line status register info
1430  *
1431  * Purpose: Let user call ioctl() to get info when the UART physically
1432  *          is emptied.  On bus types like RS485, the transmitter must
1433  *          release the bus after transmitting. This must be done when
1434  *          the transmit shift register is empty, not be done when the
1435  *          transmit holding register is empty.  This functionality
1436  *          allows an RS485 driver to be written in user space.
1437  */
1438 static int mxser_get_lsr_info(struct mxser_port *info,
1439                 unsigned int __user *value)
1440 {
1441         unsigned char status;
1442         unsigned int result;
1443         unsigned long flags;
1444
1445         spin_lock_irqsave(&info->slock, flags);
1446         status = inb(info->ioaddr + UART_LSR);
1447         spin_unlock_irqrestore(&info->slock, flags);
1448         result = ((status & UART_LSR_TEMT) ? TIOCSER_TEMT : 0);
1449         return put_user(result, value);
1450 }
1451
1452 static int mxser_tiocmget(struct tty_struct *tty, struct file *file)
1453 {
1454         struct mxser_port *info = tty->driver_data;
1455         unsigned char control, status;
1456         unsigned long flags;
1457
1458
1459         if (tty->index == MXSER_PORTS)
1460                 return -ENOIOCTLCMD;
1461         if (test_bit(TTY_IO_ERROR, &tty->flags))
1462                 return -EIO;
1463
1464         control = info->MCR;
1465
1466         spin_lock_irqsave(&info->slock, flags);
1467         status = inb(info->ioaddr + UART_MSR);
1468         if (status & UART_MSR_ANY_DELTA)
1469                 mxser_check_modem_status(tty, info, status);
1470         spin_unlock_irqrestore(&info->slock, flags);
1471         return ((control & UART_MCR_RTS) ? TIOCM_RTS : 0) |
1472                     ((control & UART_MCR_DTR) ? TIOCM_DTR : 0) |
1473                     ((status & UART_MSR_DCD) ? TIOCM_CAR : 0) |
1474                     ((status & UART_MSR_RI) ? TIOCM_RNG : 0) |
1475                     ((status & UART_MSR_DSR) ? TIOCM_DSR : 0) |
1476                     ((status & UART_MSR_CTS) ? TIOCM_CTS : 0);
1477 }
1478
1479 static int mxser_tiocmset(struct tty_struct *tty, struct file *file,
1480                 unsigned int set, unsigned int clear)
1481 {
1482         struct mxser_port *info = tty->driver_data;
1483         unsigned long flags;
1484
1485
1486         if (tty->index == MXSER_PORTS)
1487                 return -ENOIOCTLCMD;
1488         if (test_bit(TTY_IO_ERROR, &tty->flags))
1489                 return -EIO;
1490
1491         spin_lock_irqsave(&info->slock, flags);
1492
1493         if (set & TIOCM_RTS)
1494                 info->MCR |= UART_MCR_RTS;
1495         if (set & TIOCM_DTR)
1496                 info->MCR |= UART_MCR_DTR;
1497
1498         if (clear & TIOCM_RTS)
1499                 info->MCR &= ~UART_MCR_RTS;
1500         if (clear & TIOCM_DTR)
1501                 info->MCR &= ~UART_MCR_DTR;
1502
1503         outb(info->MCR, info->ioaddr + UART_MCR);
1504         spin_unlock_irqrestore(&info->slock, flags);
1505         return 0;
1506 }
1507
1508 static int __init mxser_program_mode(int port)
1509 {
1510         int id, i, j, n;
1511
1512         outb(0, port);
1513         outb(0, port);
1514         outb(0, port);
1515         (void)inb(port);
1516         (void)inb(port);
1517         outb(0, port);
1518         (void)inb(port);
1519
1520         id = inb(port + 1) & 0x1F;
1521         if ((id != C168_ASIC_ID) &&
1522                         (id != C104_ASIC_ID) &&
1523                         (id != C102_ASIC_ID) &&
1524                         (id != CI132_ASIC_ID) &&
1525                         (id != CI134_ASIC_ID) &&
1526                         (id != CI104J_ASIC_ID))
1527                 return -1;
1528         for (i = 0, j = 0; i < 4; i++) {
1529                 n = inb(port + 2);
1530                 if (n == 'M') {
1531                         j = 1;
1532                 } else if ((j == 1) && (n == 1)) {
1533                         j = 2;
1534                         break;
1535                 } else
1536                         j = 0;
1537         }
1538         if (j != 2)
1539                 id = -2;
1540         return id;
1541 }
1542
1543 static void __init mxser_normal_mode(int port)
1544 {
1545         int i, n;
1546
1547         outb(0xA5, port + 1);
1548         outb(0x80, port + 3);
1549         outb(12, port + 0);     /* 9600 bps */
1550         outb(0, port + 1);
1551         outb(0x03, port + 3);   /* 8 data bits */
1552         outb(0x13, port + 4);   /* loop back mode */
1553         for (i = 0; i < 16; i++) {
1554                 n = inb(port + 5);
1555                 if ((n & 0x61) == 0x60)
1556                         break;
1557                 if ((n & 1) == 1)
1558                         (void)inb(port);
1559         }
1560         outb(0x00, port + 4);
1561 }
1562
1563 #define CHIP_SK         0x01    /* Serial Data Clock  in Eprom */
1564 #define CHIP_DO         0x02    /* Serial Data Output in Eprom */
1565 #define CHIP_CS         0x04    /* Serial Chip Select in Eprom */
1566 #define CHIP_DI         0x08    /* Serial Data Input  in Eprom */
1567 #define EN_CCMD         0x000   /* Chip's command register     */
1568 #define EN0_RSARLO      0x008   /* Remote start address reg 0  */
1569 #define EN0_RSARHI      0x009   /* Remote start address reg 1  */
1570 #define EN0_RCNTLO      0x00A   /* Remote byte count reg WR    */
1571 #define EN0_RCNTHI      0x00B   /* Remote byte count reg WR    */
1572 #define EN0_DCFG        0x00E   /* Data configuration reg WR   */
1573 #define EN0_PORT        0x010   /* Rcv missed frame error counter RD */
1574 #define ENC_PAGE0       0x000   /* Select page 0 of chip registers   */
1575 #define ENC_PAGE3       0x0C0   /* Select page 3 of chip registers   */
1576 static int __init mxser_read_register(int port, unsigned short *regs)
1577 {
1578         int i, k, value, id;
1579         unsigned int j;
1580
1581         id = mxser_program_mode(port);
1582         if (id < 0)
1583                 return id;
1584         for (i = 0; i < 14; i++) {
1585                 k = (i & 0x3F) | 0x180;
1586                 for (j = 0x100; j > 0; j >>= 1) {
1587                         outb(CHIP_CS, port);
1588                         if (k & j) {
1589                                 outb(CHIP_CS | CHIP_DO, port);
1590                                 outb(CHIP_CS | CHIP_DO | CHIP_SK, port);        /* A? bit of read */
1591                         } else {
1592                                 outb(CHIP_CS, port);
1593                                 outb(CHIP_CS | CHIP_SK, port);  /* A? bit of read */
1594                         }
1595                 }
1596                 (void)inb(port);
1597                 value = 0;
1598                 for (k = 0, j = 0x8000; k < 16; k++, j >>= 1) {
1599                         outb(CHIP_CS, port);
1600                         outb(CHIP_CS | CHIP_SK, port);
1601                         if (inb(port) & CHIP_DI)
1602                                 value |= j;
1603                 }
1604                 regs[i] = value;
1605                 outb(0, port);
1606         }
1607         mxser_normal_mode(port);
1608         return id;
1609 }
1610
1611 static int mxser_ioctl_special(unsigned int cmd, void __user *argp)
1612 {
1613         struct mxser_port *port;
1614         struct tty_struct *tty;
1615         int result, status;
1616         unsigned int i, j;
1617         int ret = 0;
1618
1619         switch (cmd) {
1620         case MOXA_GET_MAJOR:
1621                 if (printk_ratelimit())
1622                         printk(KERN_WARNING "mxser: '%s' uses deprecated ioctl "
1623                                         "%x (GET_MAJOR), fix your userspace\n",
1624                                         current->comm, cmd);
1625                 return put_user(ttymajor, (int __user *)argp);
1626
1627         case MOXA_CHKPORTENABLE:
1628                 result = 0;
1629                 lock_kernel();
1630                 for (i = 0; i < MXSER_BOARDS; i++)
1631                         for (j = 0; j < MXSER_PORTS_PER_BOARD; j++)
1632                                 if (mxser_boards[i].ports[j].ioaddr)
1633                                         result |= (1 << i);
1634                 unlock_kernel();
1635                 return put_user(result, (unsigned long __user *)argp);
1636         case MOXA_GETDATACOUNT:
1637                 lock_kernel();
1638                 if (copy_to_user(argp, &mxvar_log, sizeof(mxvar_log)))
1639                         ret = -EFAULT;
1640                 unlock_kernel();
1641                 return ret;
1642         case MOXA_GETMSTATUS: {
1643                 struct mxser_mstatus ms, __user *msu = argp;
1644                 lock_kernel();
1645                 for (i = 0; i < MXSER_BOARDS; i++)
1646                         for (j = 0; j < MXSER_PORTS_PER_BOARD; j++) {
1647                                 port = &mxser_boards[i].ports[j];
1648                                 memset(&ms, 0, sizeof(ms));
1649
1650                                 if (!port->ioaddr)
1651                                         goto copy;
1652
1653                                 tty = tty_port_tty_get(&port->port);
1654
1655                                 if (!tty || !tty->termios)
1656                                         ms.cflag = port->normal_termios.c_cflag;
1657                                 else
1658                                         ms.cflag = tty->termios->c_cflag;
1659                                 tty_kref_put(tty);
1660                                 status = inb(port->ioaddr + UART_MSR);
1661                                 if (status & UART_MSR_DCD)
1662                                         ms.dcd = 1;
1663                                 if (status & UART_MSR_DSR)
1664                                         ms.dsr = 1;
1665                                 if (status & UART_MSR_CTS)
1666                                         ms.cts = 1;
1667                         copy:
1668                                 if (copy_to_user(msu, &ms, sizeof(ms))) {
1669                                         unlock_kernel();
1670                                         return -EFAULT;
1671                                 }
1672                                 msu++;
1673                         }
1674                 unlock_kernel();
1675                 return 0;
1676         }
1677         case MOXA_ASPP_MON_EXT: {
1678                 struct mxser_mon_ext *me; /* it's 2k, stack unfriendly */
1679                 unsigned int cflag, iflag, p;
1680                 u8 opmode;
1681
1682                 me = kzalloc(sizeof(*me), GFP_KERNEL);
1683                 if (!me)
1684                         return -ENOMEM;
1685
1686                 lock_kernel();
1687                 for (i = 0, p = 0; i < MXSER_BOARDS; i++) {
1688                         for (j = 0; j < MXSER_PORTS_PER_BOARD; j++, p++) {
1689                                 if (p >= ARRAY_SIZE(me->rx_cnt)) {
1690                                         i = MXSER_BOARDS;
1691                                         break;
1692                                 }
1693                                 port = &mxser_boards[i].ports[j];
1694                                 if (!port->ioaddr)
1695                                         continue;
1696
1697                                 status = mxser_get_msr(port->ioaddr, 0, p);
1698
1699                                 if (status & UART_MSR_TERI)
1700                                         port->icount.rng++;
1701                                 if (status & UART_MSR_DDSR)
1702                                         port->icount.dsr++;
1703                                 if (status & UART_MSR_DDCD)
1704                                         port->icount.dcd++;
1705                                 if (status & UART_MSR_DCTS)
1706                                         port->icount.cts++;
1707
1708                                 port->mon_data.modem_status = status;
1709                                 me->rx_cnt[p] = port->mon_data.rxcnt;
1710                                 me->tx_cnt[p] = port->mon_data.txcnt;
1711                                 me->up_rxcnt[p] = port->mon_data.up_rxcnt;
1712                                 me->up_txcnt[p] = port->mon_data.up_txcnt;
1713                                 me->modem_status[p] =
1714                                         port->mon_data.modem_status;
1715                                 tty = tty_port_tty_get(&port->port);
1716
1717                                 if (!tty || !tty->termios) {
1718                                         cflag = port->normal_termios.c_cflag;
1719                                         iflag = port->normal_termios.c_iflag;
1720                                         me->baudrate[p] = tty_termios_baud_rate(&port->normal_termios);
1721                                 } else {
1722                                         cflag = tty->termios->c_cflag;
1723                                         iflag = tty->termios->c_iflag;
1724                                         me->baudrate[p] = tty_get_baud_rate(tty);
1725                                 }
1726                                 tty_kref_put(tty);
1727
1728                                 me->databits[p] = cflag & CSIZE;
1729                                 me->stopbits[p] = cflag & CSTOPB;
1730                                 me->parity[p] = cflag & (PARENB | PARODD |
1731                                                 CMSPAR);
1732
1733                                 if (cflag & CRTSCTS)
1734                                         me->flowctrl[p] |= 0x03;
1735
1736                                 if (iflag & (IXON | IXOFF))
1737                                         me->flowctrl[p] |= 0x0C;
1738
1739                                 if (port->type == PORT_16550A)
1740                                         me->fifo[p] = 1;
1741
1742                                 opmode = inb(port->opmode_ioaddr) >>
1743                                                 ((p % 4) * 2);
1744                                 opmode &= OP_MODE_MASK;
1745                                 me->iftype[p] = opmode;
1746                         }
1747                 }
1748                 unlock_kernel();
1749                 if (copy_to_user(argp, me, sizeof(*me)))
1750                         ret = -EFAULT;
1751                 kfree(me);
1752                 return ret;
1753         }
1754         default:
1755                 return -ENOIOCTLCMD;
1756         }
1757         return 0;
1758 }
1759
1760 static int mxser_cflags_changed(struct mxser_port *info, unsigned long arg,
1761                 struct async_icount *cprev)
1762 {
1763         struct async_icount cnow;
1764         unsigned long flags;
1765         int ret;
1766
1767         spin_lock_irqsave(&info->slock, flags);
1768         cnow = info->icount;    /* atomic copy */
1769         spin_unlock_irqrestore(&info->slock, flags);
1770
1771         ret =   ((arg & TIOCM_RNG) && (cnow.rng != cprev->rng)) ||
1772                 ((arg & TIOCM_DSR) && (cnow.dsr != cprev->dsr)) ||
1773                 ((arg & TIOCM_CD)  && (cnow.dcd != cprev->dcd)) ||
1774                 ((arg & TIOCM_CTS) && (cnow.cts != cprev->cts));
1775
1776         *cprev = cnow;
1777
1778         return ret;
1779 }
1780
1781 static int mxser_ioctl(struct tty_struct *tty, struct file *file,
1782                 unsigned int cmd, unsigned long arg)
1783 {
1784         struct mxser_port *info = tty->driver_data;
1785         struct async_icount cnow;
1786         unsigned long flags;
1787         void __user *argp = (void __user *)arg;
1788         int retval;
1789
1790         if (tty->index == MXSER_PORTS)
1791                 return mxser_ioctl_special(cmd, argp);
1792
1793         if (cmd == MOXA_SET_OP_MODE || cmd == MOXA_GET_OP_MODE) {
1794                 int p;
1795                 unsigned long opmode;
1796                 static unsigned char ModeMask[] = { 0xfc, 0xf3, 0xcf, 0x3f };
1797                 int shiftbit;
1798                 unsigned char val, mask;
1799
1800                 p = tty->index % 4;
1801                 if (cmd == MOXA_SET_OP_MODE) {
1802                         if (get_user(opmode, (int __user *) argp))
1803                                 return -EFAULT;
1804                         if (opmode != RS232_MODE &&
1805                                         opmode != RS485_2WIRE_MODE &&
1806                                         opmode != RS422_MODE &&
1807                                         opmode != RS485_4WIRE_MODE)
1808                                 return -EFAULT;
1809                         lock_kernel();
1810                         mask = ModeMask[p];
1811                         shiftbit = p * 2;
1812                         val = inb(info->opmode_ioaddr);
1813                         val &= mask;
1814                         val |= (opmode << shiftbit);
1815                         outb(val, info->opmode_ioaddr);
1816                         unlock_kernel();
1817                 } else {
1818                         lock_kernel();
1819                         shiftbit = p * 2;
1820                         opmode = inb(info->opmode_ioaddr) >> shiftbit;
1821                         opmode &= OP_MODE_MASK;
1822                         unlock_kernel();
1823                         if (put_user(opmode, (int __user *)argp))
1824                                 return -EFAULT;
1825                 }
1826                 return 0;
1827         }
1828
1829         if (cmd != TIOCGSERIAL && cmd != TIOCMIWAIT && cmd != TIOCGICOUNT &&
1830                         test_bit(TTY_IO_ERROR, &tty->flags))
1831                 return -EIO;
1832
1833         switch (cmd) {
1834         case TIOCGSERIAL:
1835                 lock_kernel();
1836                 retval = mxser_get_serial_info(tty, argp);
1837                 unlock_kernel();
1838                 return retval;
1839         case TIOCSSERIAL:
1840                 lock_kernel();
1841                 retval = mxser_set_serial_info(tty, argp);
1842                 unlock_kernel();
1843                 return retval;
1844         case TIOCSERGETLSR:     /* Get line status register */
1845                 return  mxser_get_lsr_info(info, argp);
1846                 /*
1847                  * Wait for any of the 4 modem inputs (DCD,RI,DSR,CTS) to change
1848                  * - mask passed in arg for lines of interest
1849                  *   (use |'ed TIOCM_RNG/DSR/CD/CTS for masking)
1850                  * Caller should use TIOCGICOUNT to see which one it was
1851                  */
1852         case TIOCMIWAIT:
1853                 spin_lock_irqsave(&info->slock, flags);
1854                 cnow = info->icount;    /* note the counters on entry */
1855                 spin_unlock_irqrestore(&info->slock, flags);
1856
1857                 return wait_event_interruptible(info->delta_msr_wait,
1858                                 mxser_cflags_changed(info, arg, &cnow));
1859         /*
1860          * Get counter of input serial line interrupts (DCD,RI,DSR,CTS)
1861          * Return: write counters to the user passed counter struct
1862          * NB: both 1->0 and 0->1 transitions are counted except for
1863          *     RI where only 0->1 is counted.
1864          */
1865         case TIOCGICOUNT: {
1866                 struct serial_icounter_struct icnt = { 0 };
1867                 spin_lock_irqsave(&info->slock, flags);
1868                 cnow = info->icount;
1869                 spin_unlock_irqrestore(&info->slock, flags);
1870
1871                 icnt.frame = cnow.frame;
1872                 icnt.brk = cnow.brk;
1873                 icnt.overrun = cnow.overrun;
1874                 icnt.buf_overrun = cnow.buf_overrun;
1875                 icnt.parity = cnow.parity;
1876                 icnt.rx = cnow.rx;
1877                 icnt.tx = cnow.tx;
1878                 icnt.cts = cnow.cts;
1879                 icnt.dsr = cnow.dsr;
1880                 icnt.rng = cnow.rng;
1881                 icnt.dcd = cnow.dcd;
1882
1883                 return copy_to_user(argp, &icnt, sizeof(icnt)) ? -EFAULT : 0;
1884         }
1885         case MOXA_HighSpeedOn:
1886                 return put_user(info->baud_base != 115200 ? 1 : 0, (int __user *)argp);
1887         case MOXA_SDS_RSTICOUNTER:
1888                 lock_kernel();
1889                 info->mon_data.rxcnt = 0;
1890                 info->mon_data.txcnt = 0;
1891                 unlock_kernel();
1892                 return 0;
1893
1894         case MOXA_ASPP_OQUEUE:{
1895                 int len, lsr;
1896
1897                 lock_kernel();
1898                 len = mxser_chars_in_buffer(tty);
1899                 lsr = inb(info->ioaddr + UART_LSR) & UART_LSR_TEMT;
1900                 len += (lsr ? 0 : 1);
1901                 unlock_kernel();
1902
1903                 return put_user(len, (int __user *)argp);
1904         }
1905         case MOXA_ASPP_MON: {
1906                 int mcr, status;
1907
1908                 lock_kernel();
1909                 status = mxser_get_msr(info->ioaddr, 1, tty->index);
1910                 mxser_check_modem_status(tty, info, status);
1911
1912                 mcr = inb(info->ioaddr + UART_MCR);
1913                 if (mcr & MOXA_MUST_MCR_XON_FLAG)
1914                         info->mon_data.hold_reason &= ~NPPI_NOTIFY_XOFFHOLD;
1915                 else
1916                         info->mon_data.hold_reason |= NPPI_NOTIFY_XOFFHOLD;
1917
1918                 if (mcr & MOXA_MUST_MCR_TX_XON)
1919                         info->mon_data.hold_reason &= ~NPPI_NOTIFY_XOFFXENT;
1920                 else
1921                         info->mon_data.hold_reason |= NPPI_NOTIFY_XOFFXENT;
1922
1923                 if (tty->hw_stopped)
1924                         info->mon_data.hold_reason |= NPPI_NOTIFY_CTSHOLD;
1925                 else
1926                         info->mon_data.hold_reason &= ~NPPI_NOTIFY_CTSHOLD;
1927                 unlock_kernel();
1928                 if (copy_to_user(argp, &info->mon_data,
1929                                 sizeof(struct mxser_mon)))
1930                         return -EFAULT;
1931
1932                 return 0;
1933         }
1934         case MOXA_ASPP_LSTATUS: {
1935                 if (put_user(info->err_shadow, (unsigned char __user *)argp))
1936                         return -EFAULT;
1937
1938                 info->err_shadow = 0;
1939                 return 0;
1940         }
1941         case MOXA_SET_BAUD_METHOD: {
1942                 int method;
1943
1944                 if (get_user(method, (int __user *)argp))
1945                         return -EFAULT;
1946                 mxser_set_baud_method[tty->index] = method;
1947                 return put_user(method, (int __user *)argp);
1948         }
1949         default:
1950                 return -ENOIOCTLCMD;
1951         }
1952         return 0;
1953 }
1954
1955 static void mxser_stoprx(struct tty_struct *tty)
1956 {
1957         struct mxser_port *info = tty->driver_data;
1958
1959         info->ldisc_stop_rx = 1;
1960         if (I_IXOFF(tty)) {
1961                 if (info->board->chip_flag) {
1962                         info->IER &= ~MOXA_MUST_RECV_ISR;
1963                         outb(info->IER, info->ioaddr + UART_IER);
1964                 } else {
1965                         info->x_char = STOP_CHAR(tty);
1966                         outb(0, info->ioaddr + UART_IER);
1967                         info->IER |= UART_IER_THRI;
1968                         outb(info->IER, info->ioaddr + UART_IER);
1969                 }
1970         }
1971
1972         if (tty->termios->c_cflag & CRTSCTS) {
1973                 info->MCR &= ~UART_MCR_RTS;
1974                 outb(info->MCR, info->ioaddr + UART_MCR);
1975         }
1976 }
1977
1978 /*
1979  * This routine is called by the upper-layer tty layer to signal that
1980  * incoming characters should be throttled.
1981  */
1982 static void mxser_throttle(struct tty_struct *tty)
1983 {
1984         mxser_stoprx(tty);
1985 }
1986
1987 static void mxser_unthrottle(struct tty_struct *tty)
1988 {
1989         struct mxser_port *info = tty->driver_data;
1990
1991         /* startrx */
1992         info->ldisc_stop_rx = 0;
1993         if (I_IXOFF(tty)) {
1994                 if (info->x_char)
1995                         info->x_char = 0;
1996                 else {
1997                         if (info->board->chip_flag) {
1998                                 info->IER |= MOXA_MUST_RECV_ISR;
1999                                 outb(info->IER, info->ioaddr + UART_IER);
2000                         } else {
2001                                 info->x_char = START_CHAR(tty);
2002                                 outb(0, info->ioaddr + UART_IER);
2003                                 info->IER |= UART_IER_THRI;
2004                                 outb(info->IER, info->ioaddr + UART_IER);
2005                         }
2006                 }
2007         }
2008
2009         if (tty->termios->c_cflag & CRTSCTS) {
2010                 info->MCR |= UART_MCR_RTS;
2011                 outb(info->MCR, info->ioaddr + UART_MCR);
2012         }
2013 }
2014
2015 /*
2016  * mxser_stop() and mxser_start()
2017  *
2018  * This routines are called before setting or resetting tty->stopped.
2019  * They enable or disable transmitter interrupts, as necessary.
2020  */
2021 static void mxser_stop(struct tty_struct *tty)
2022 {
2023         struct mxser_port *info = tty->driver_data;
2024         unsigned long flags;
2025
2026         spin_lock_irqsave(&info->slock, flags);
2027         if (info->IER & UART_IER_THRI) {
2028                 info->IER &= ~UART_IER_THRI;
2029                 outb(info->IER, info->ioaddr + UART_IER);
2030         }
2031         spin_unlock_irqrestore(&info->slock, flags);
2032 }
2033
2034 static void mxser_start(struct tty_struct *tty)
2035 {
2036         struct mxser_port *info = tty->driver_data;
2037         unsigned long flags;
2038
2039         spin_lock_irqsave(&info->slock, flags);
2040         if (info->xmit_cnt && info->port.xmit_buf) {
2041                 outb(info->IER & ~UART_IER_THRI, info->ioaddr + UART_IER);
2042                 info->IER |= UART_IER_THRI;
2043                 outb(info->IER, info->ioaddr + UART_IER);
2044         }
2045         spin_unlock_irqrestore(&info->slock, flags);
2046 }
2047
2048 static void mxser_set_termios(struct tty_struct *tty, struct ktermios *old_termios)
2049 {
2050         struct mxser_port *info = tty->driver_data;
2051         unsigned long flags;
2052
2053         spin_lock_irqsave(&info->slock, flags);
2054         mxser_change_speed(tty, old_termios);
2055         spin_unlock_irqrestore(&info->slock, flags);
2056
2057         if ((old_termios->c_cflag & CRTSCTS) &&
2058                         !(tty->termios->c_cflag & CRTSCTS)) {
2059                 tty->hw_stopped = 0;
2060                 mxser_start(tty);
2061         }
2062
2063         /* Handle sw stopped */
2064         if ((old_termios->c_iflag & IXON) &&
2065                         !(tty->termios->c_iflag & IXON)) {
2066                 tty->stopped = 0;
2067
2068                 if (info->board->chip_flag) {
2069                         spin_lock_irqsave(&info->slock, flags);
2070                         mxser_disable_must_rx_software_flow_control(
2071                                         info->ioaddr);
2072                         spin_unlock_irqrestore(&info->slock, flags);
2073                 }
2074
2075                 mxser_start(tty);
2076         }
2077 }
2078
2079 /*
2080  * mxser_wait_until_sent() --- wait until the transmitter is empty
2081  */
2082 static void mxser_wait_until_sent(struct tty_struct *tty, int timeout)
2083 {
2084         struct mxser_port *info = tty->driver_data;
2085         unsigned long orig_jiffies, char_time;
2086         int lsr;
2087
2088         if (info->type == PORT_UNKNOWN)
2089                 return;
2090
2091         if (info->xmit_fifo_size == 0)
2092                 return;         /* Just in case.... */
2093
2094         orig_jiffies = jiffies;
2095         /*
2096          * Set the check interval to be 1/5 of the estimated time to
2097          * send a single character, and make it at least 1.  The check
2098          * interval should also be less than the timeout.
2099          *
2100          * Note: we have to use pretty tight timings here to satisfy
2101          * the NIST-PCTS.
2102          */
2103         char_time = (info->timeout - HZ / 50) / info->xmit_fifo_size;
2104         char_time = char_time / 5;
2105         if (char_time == 0)
2106                 char_time = 1;
2107         if (timeout && timeout < char_time)
2108                 char_time = timeout;
2109         /*
2110          * If the transmitter hasn't cleared in twice the approximate
2111          * amount of time to send the entire FIFO, it probably won't
2112          * ever clear.  This assumes the UART isn't doing flow
2113          * control, which is currently the case.  Hence, if it ever
2114          * takes longer than info->timeout, this is probably due to a
2115          * UART bug of some kind.  So, we clamp the timeout parameter at
2116          * 2*info->timeout.
2117          */
2118         if (!timeout || timeout > 2 * info->timeout)
2119                 timeout = 2 * info->timeout;
2120 #ifdef SERIAL_DEBUG_RS_WAIT_UNTIL_SENT
2121         printk(KERN_DEBUG "In rs_wait_until_sent(%d) check=%lu...",
2122                 timeout, char_time);
2123         printk("jiff=%lu...", jiffies);
2124 #endif
2125         lock_kernel();
2126         while (!((lsr = inb(info->ioaddr + UART_LSR)) & UART_LSR_TEMT)) {
2127 #ifdef SERIAL_DEBUG_RS_WAIT_UNTIL_SENT
2128                 printk("lsr = %d (jiff=%lu)...", lsr, jiffies);
2129 #endif
2130                 schedule_timeout_interruptible(char_time);
2131                 if (signal_pending(current))
2132                         break;
2133                 if (timeout && time_after(jiffies, orig_jiffies + timeout))
2134                         break;
2135         }
2136         set_current_state(TASK_RUNNING);
2137         unlock_kernel();
2138
2139 #ifdef SERIAL_DEBUG_RS_WAIT_UNTIL_SENT
2140         printk("lsr = %d (jiff=%lu)...done\n", lsr, jiffies);
2141 #endif
2142 }
2143
2144 /*
2145  * This routine is called by tty_hangup() when a hangup is signaled.
2146  */
2147 static void mxser_hangup(struct tty_struct *tty)
2148 {
2149         struct mxser_port *info = tty->driver_data;
2150
2151         mxser_flush_buffer(tty);
2152         mxser_shutdown(tty);
2153         info->port.count = 0;
2154         info->port.flags &= ~ASYNC_NORMAL_ACTIVE;
2155         tty_port_tty_set(&info->port, NULL);
2156         wake_up_interruptible(&info->port.open_wait);
2157 }
2158
2159 /*
2160  * mxser_rs_break() --- routine which turns the break handling on or off
2161  */
2162 static int mxser_rs_break(struct tty_struct *tty, int break_state)
2163 {
2164         struct mxser_port *info = tty->driver_data;
2165         unsigned long flags;
2166
2167         spin_lock_irqsave(&info->slock, flags);
2168         if (break_state == -1)
2169                 outb(inb(info->ioaddr + UART_LCR) | UART_LCR_SBC,
2170                         info->ioaddr + UART_LCR);
2171         else
2172                 outb(inb(info->ioaddr + UART_LCR) & ~UART_LCR_SBC,
2173                         info->ioaddr + UART_LCR);
2174         spin_unlock_irqrestore(&info->slock, flags);
2175         return 0;
2176 }
2177
2178 static void mxser_receive_chars(struct tty_struct *tty,
2179                                 struct mxser_port *port, int *status)
2180 {
2181         unsigned char ch, gdl;
2182         int ignored = 0;
2183         int cnt = 0;
2184         int recv_room;
2185         int max = 256;
2186
2187         recv_room = tty->receive_room;
2188         if (recv_room == 0 && !port->ldisc_stop_rx)
2189                 mxser_stoprx(tty);
2190         if (port->board->chip_flag != MOXA_OTHER_UART) {
2191
2192                 if (*status & UART_LSR_SPECIAL)
2193                         goto intr_old;
2194                 if (port->board->chip_flag == MOXA_MUST_MU860_HWID &&
2195                                 (*status & MOXA_MUST_LSR_RERR))
2196                         goto intr_old;
2197                 if (*status & MOXA_MUST_LSR_RERR)
2198                         goto intr_old;
2199
2200                 gdl = inb(port->ioaddr + MOXA_MUST_GDL_REGISTER);
2201
2202                 if (port->board->chip_flag == MOXA_MUST_MU150_HWID)
2203                         gdl &= MOXA_MUST_GDL_MASK;
2204                 if (gdl >= recv_room) {
2205                         if (!port->ldisc_stop_rx)
2206                                 mxser_stoprx(tty);
2207                 }
2208                 while (gdl--) {
2209                         ch = inb(port->ioaddr + UART_RX);
2210                         tty_insert_flip_char(tty, ch, 0);
2211                         cnt++;
2212                 }
2213                 goto end_intr;
2214         }
2215 intr_old:
2216
2217         do {
2218                 if (max-- < 0)
2219                         break;
2220
2221                 ch = inb(port->ioaddr + UART_RX);
2222                 if (port->board->chip_flag && (*status & UART_LSR_OE))
2223                         outb(0x23, port->ioaddr + UART_FCR);
2224                 *status &= port->read_status_mask;
2225                 if (*status & port->ignore_status_mask) {
2226                         if (++ignored > 100)
2227                                 break;
2228                 } else {
2229                         char flag = 0;
2230                         if (*status & UART_LSR_SPECIAL) {
2231                                 if (*status & UART_LSR_BI) {
2232                                         flag = TTY_BREAK;
2233                                         port->icount.brk++;
2234
2235                                         if (port->port.flags & ASYNC_SAK)
2236                                                 do_SAK(tty);
2237                                 } else if (*status & UART_LSR_PE) {
2238                                         flag = TTY_PARITY;
2239                                         port->icount.parity++;
2240                                 } else if (*status & UART_LSR_FE) {
2241                                         flag = TTY_FRAME;
2242                                         port->icount.frame++;
2243                                 } else if (*status & UART_LSR_OE) {
2244                                         flag = TTY_OVERRUN;
2245                                         port->icount.overrun++;
2246                                 } else
2247                                         flag = TTY_BREAK;
2248                         }
2249                         tty_insert_flip_char(tty, ch, flag);
2250                         cnt++;
2251                         if (cnt >= recv_room) {
2252                                 if (!port->ldisc_stop_rx)
2253                                         mxser_stoprx(tty);
2254                                 break;
2255                         }
2256
2257                 }
2258
2259                 if (port->board->chip_flag)
2260                         break;
2261
2262                 *status = inb(port->ioaddr + UART_LSR);
2263         } while (*status & UART_LSR_DR);
2264
2265 end_intr:
2266         mxvar_log.rxcnt[tty->index] += cnt;
2267         port->mon_data.rxcnt += cnt;
2268         port->mon_data.up_rxcnt += cnt;
2269
2270         /*
2271          * We are called from an interrupt context with &port->slock
2272          * being held. Drop it temporarily in order to prevent
2273          * recursive locking.
2274          */
2275         spin_unlock(&port->slock);
2276         tty_flip_buffer_push(tty);
2277         spin_lock(&port->slock);
2278 }
2279
2280 static void mxser_transmit_chars(struct tty_struct *tty, struct mxser_port *port)
2281 {
2282         int count, cnt;
2283
2284         if (port->x_char) {
2285                 outb(port->x_char, port->ioaddr + UART_TX);
2286                 port->x_char = 0;
2287                 mxvar_log.txcnt[tty->index]++;
2288                 port->mon_data.txcnt++;
2289                 port->mon_data.up_txcnt++;
2290                 port->icount.tx++;
2291                 return;
2292         }
2293
2294         if (port->port.xmit_buf == NULL)
2295                 return;
2296
2297         if (port->xmit_cnt <= 0 || tty->stopped ||
2298                         (tty->hw_stopped &&
2299                         (port->type != PORT_16550A) &&
2300                         (!port->board->chip_flag))) {
2301                 port->IER &= ~UART_IER_THRI;
2302                 outb(port->IER, port->ioaddr + UART_IER);
2303                 return;
2304         }
2305
2306         cnt = port->xmit_cnt;
2307         count = port->xmit_fifo_size;
2308         do {
2309                 outb(port->port.xmit_buf[port->xmit_tail++],
2310                         port->ioaddr + UART_TX);
2311                 port->xmit_tail = port->xmit_tail & (SERIAL_XMIT_SIZE - 1);
2312                 if (--port->xmit_cnt <= 0)
2313                         break;
2314         } while (--count > 0);
2315         mxvar_log.txcnt[tty->index] += (cnt - port->xmit_cnt);
2316
2317         port->mon_data.txcnt += (cnt - port->xmit_cnt);
2318         port->mon_data.up_txcnt += (cnt - port->xmit_cnt);
2319         port->icount.tx += (cnt - port->xmit_cnt);
2320
2321         if (port->xmit_cnt < WAKEUP_CHARS && tty)
2322                 tty_wakeup(tty);
2323
2324         if (port->xmit_cnt <= 0) {
2325                 port->IER &= ~UART_IER_THRI;
2326                 outb(port->IER, port->ioaddr + UART_IER);
2327         }
2328 }
2329
2330 /*
2331  * This is the serial driver's generic interrupt routine
2332  */
2333 static irqreturn_t mxser_interrupt(int irq, void *dev_id)
2334 {
2335         int status, iir, i;
2336         struct mxser_board *brd = NULL;
2337         struct mxser_port *port;
2338         int max, irqbits, bits, msr;
2339         unsigned int int_cnt, pass_counter = 0;
2340         int handled = IRQ_NONE;
2341         struct tty_struct *tty;
2342
2343         for (i = 0; i < MXSER_BOARDS; i++)
2344                 if (dev_id == &mxser_boards[i]) {
2345                         brd = dev_id;
2346                         break;
2347                 }
2348
2349         if (i == MXSER_BOARDS)
2350                 goto irq_stop;
2351         if (brd == NULL)
2352                 goto irq_stop;
2353         max = brd->info->nports;
2354         while (pass_counter++ < MXSER_ISR_PASS_LIMIT) {
2355                 irqbits = inb(brd->vector) & brd->vector_mask;
2356                 if (irqbits == brd->vector_mask)
2357                         break;
2358
2359                 handled = IRQ_HANDLED;
2360                 for (i = 0, bits = 1; i < max; i++, irqbits |= bits, bits <<= 1) {
2361                         if (irqbits == brd->vector_mask)
2362                                 break;
2363                         if (bits & irqbits)
2364                                 continue;
2365                         port = &brd->ports[i];
2366
2367                         int_cnt = 0;
2368                         spin_lock(&port->slock);
2369                         do {
2370                                 iir = inb(port->ioaddr + UART_IIR);
2371                                 if (iir & UART_IIR_NO_INT)
2372                                         break;
2373                                 iir &= MOXA_MUST_IIR_MASK;
2374                                 tty = tty_port_tty_get(&port->port);
2375                                 if (!tty ||
2376                                                 (port->port.flags & ASYNC_CLOSING) ||
2377                                                 !(port->port.flags &
2378                                                         ASYNC_INITIALIZED)) {
2379                                         status = inb(port->ioaddr + UART_LSR);
2380                                         outb(0x27, port->ioaddr + UART_FCR);
2381                                         inb(port->ioaddr + UART_MSR);
2382                                         tty_kref_put(tty);
2383                                         break;
2384                                 }
2385
2386                                 status = inb(port->ioaddr + UART_LSR);
2387
2388                                 if (status & UART_LSR_PE)
2389                                         port->err_shadow |= NPPI_NOTIFY_PARITY;
2390                                 if (status & UART_LSR_FE)
2391                                         port->err_shadow |= NPPI_NOTIFY_FRAMING;
2392                                 if (status & UART_LSR_OE)
2393                                         port->err_shadow |=
2394                                                 NPPI_NOTIFY_HW_OVERRUN;
2395                                 if (status & UART_LSR_BI)
2396                                         port->err_shadow |= NPPI_NOTIFY_BREAK;
2397
2398                                 if (port->board->chip_flag) {
2399                                         if (iir == MOXA_MUST_IIR_GDA ||
2400                                             iir == MOXA_MUST_IIR_RDA ||
2401                                             iir == MOXA_MUST_IIR_RTO ||
2402                                             iir == MOXA_MUST_IIR_LSR)
2403                                                 mxser_receive_chars(tty, port,
2404                                                                 &status);
2405
2406                                 } else {
2407                                         status &= port->read_status_mask;
2408                                         if (status & UART_LSR_DR)
2409                                                 mxser_receive_chars(tty, port,
2410                                                                 &status);
2411                                 }
2412                                 msr = inb(port->ioaddr + UART_MSR);
2413                                 if (msr & UART_MSR_ANY_DELTA)
2414                                         mxser_check_modem_status(tty, port, msr);
2415
2416                                 if (port->board->chip_flag) {
2417                                         if (iir == 0x02 && (status &
2418                                                                 UART_LSR_THRE))
2419                                                 mxser_transmit_chars(tty, port);
2420                                 } else {
2421                                         if (status & UART_LSR_THRE)
2422                                                 mxser_transmit_chars(tty, port);
2423                                 }
2424                                 tty_kref_put(tty);
2425                         } while (int_cnt++ < MXSER_ISR_PASS_LIMIT);
2426                         spin_unlock(&port->slock);
2427                 }
2428         }
2429
2430 irq_stop:
2431         return handled;
2432 }
2433
2434 static const struct tty_operations mxser_ops = {
2435         .open = mxser_open,
2436         .close = mxser_close,
2437         .write = mxser_write,
2438         .put_char = mxser_put_char,
2439         .flush_chars = mxser_flush_chars,
2440         .write_room = mxser_write_room,
2441         .chars_in_buffer = mxser_chars_in_buffer,
2442         .flush_buffer = mxser_flush_buffer,
2443         .ioctl = mxser_ioctl,
2444         .throttle = mxser_throttle,
2445         .unthrottle = mxser_unthrottle,
2446         .set_termios = mxser_set_termios,
2447         .stop = mxser_stop,
2448         .start = mxser_start,
2449         .hangup = mxser_hangup,
2450         .break_ctl = mxser_rs_break,
2451         .wait_until_sent = mxser_wait_until_sent,
2452         .tiocmget = mxser_tiocmget,
2453         .tiocmset = mxser_tiocmset,
2454 };
2455
2456 /*
2457  * The MOXA Smartio/Industio serial driver boot-time initialization code!
2458  */
2459
2460 static void mxser_release_res(struct mxser_board *brd, struct pci_dev *pdev,
2461                 unsigned int irq)
2462 {
2463         if (irq)
2464                 free_irq(brd->irq, brd);
2465         if (pdev != NULL) {     /* PCI */
2466 #ifdef CONFIG_PCI
2467                 pci_release_region(pdev, 2);
2468                 pci_release_region(pdev, 3);
2469 #endif
2470         } else {
2471                 release_region(brd->ports[0].ioaddr, 8 * brd->info->nports);
2472                 release_region(brd->vector, 1);
2473         }
2474 }
2475
2476 static int __devinit mxser_initbrd(struct mxser_board *brd,
2477                 struct pci_dev *pdev)
2478 {
2479         struct mxser_port *info;
2480         unsigned int i;
2481         int retval;
2482
2483         printk(KERN_INFO "mxser: max. baud rate = %d bps\n",
2484                         brd->ports[0].max_baud);
2485
2486         for (i = 0; i < brd->info->nports; i++) {
2487                 info = &brd->ports[i];
2488                 tty_port_init(&info->port);
2489                 info->board = brd;
2490                 info->stop_rx = 0;
2491                 info->ldisc_stop_rx = 0;
2492
2493                 /* Enhance mode enabled here */
2494                 if (brd->chip_flag != MOXA_OTHER_UART)
2495                         mxser_enable_must_enchance_mode(info->ioaddr);
2496
2497                 info->port.flags = ASYNC_SHARE_IRQ;
2498                 info->type = brd->uart_type;
2499
2500                 process_txrx_fifo(info);
2501
2502                 info->custom_divisor = info->baud_base * 16;
2503                 info->port.close_delay = 5 * HZ / 10;
2504                 info->port.closing_wait = 30 * HZ;
2505                 info->normal_termios = mxvar_sdriver->init_termios;
2506                 init_waitqueue_head(&info->delta_msr_wait);
2507                 memset(&info->mon_data, 0, sizeof(struct mxser_mon));
2508                 info->err_shadow = 0;
2509                 spin_lock_init(&info->slock);
2510
2511                 /* before set INT ISR, disable all int */
2512                 outb(inb(info->ioaddr + UART_IER) & 0xf0,
2513                         info->ioaddr + UART_IER);
2514         }
2515
2516         retval = request_irq(brd->irq, mxser_interrupt, IRQF_SHARED, "mxser",
2517                         brd);
2518         if (retval) {
2519                 printk(KERN_ERR "Board %s: Request irq failed, IRQ (%d) may "
2520                         "conflict with another device.\n",
2521                         brd->info->name, brd->irq);
2522                 /* We hold resources, we need to release them. */
2523                 mxser_release_res(brd, pdev, 0);
2524         }
2525         return retval;
2526 }
2527
2528 static int __init mxser_get_ISA_conf(int cap, struct mxser_board *brd)
2529 {
2530         int id, i, bits;
2531         unsigned short regs[16], irq;
2532         unsigned char scratch, scratch2;
2533
2534         brd->chip_flag = MOXA_OTHER_UART;
2535
2536         id = mxser_read_register(cap, regs);
2537         switch (id) {
2538         case C168_ASIC_ID:
2539                 brd->info = &mxser_cards[0];
2540                 break;
2541         case C104_ASIC_ID:
2542                 brd->info = &mxser_cards[1];
2543                 break;
2544         case CI104J_ASIC_ID:
2545                 brd->info = &mxser_cards[2];
2546                 break;
2547         case C102_ASIC_ID:
2548                 brd->info = &mxser_cards[5];
2549                 break;
2550         case CI132_ASIC_ID:
2551                 brd->info = &mxser_cards[6];
2552                 break;
2553         case CI134_ASIC_ID:
2554                 brd->info = &mxser_cards[7];
2555                 break;
2556         default:
2557                 return 0;
2558         }
2559
2560         irq = 0;
2561         /* some ISA cards have 2 ports, but we want to see them as 4-port (why?)
2562            Flag-hack checks if configuration should be read as 2-port here. */
2563         if (brd->info->nports == 2 || (brd->info->flags & MXSER_HAS2)) {
2564                 irq = regs[9] & 0xF000;
2565                 irq = irq | (irq >> 4);
2566                 if (irq != (regs[9] & 0xFF00))
2567                         goto err_irqconflict;
2568         } else if (brd->info->nports == 4) {
2569                 irq = regs[9] & 0xF000;
2570                 irq = irq | (irq >> 4);
2571                 irq = irq | (irq >> 8);
2572                 if (irq != regs[9])
2573                         goto err_irqconflict;
2574         } else if (brd->info->nports == 8) {
2575                 irq = regs[9] & 0xF000;
2576                 irq = irq | (irq >> 4);
2577                 irq = irq | (irq >> 8);
2578                 if ((irq != regs[9]) || (irq != regs[10]))
2579                         goto err_irqconflict;
2580         }
2581
2582         if (!irq) {
2583                 printk(KERN_ERR "mxser: interrupt number unset\n");
2584                 return -EIO;
2585         }
2586         brd->irq = ((int)(irq & 0xF000) >> 12);
2587         for (i = 0; i < 8; i++)
2588                 brd->ports[i].ioaddr = (int) regs[i + 1] & 0xFFF8;
2589         if ((regs[12] & 0x80) == 0) {
2590                 printk(KERN_ERR "mxser: invalid interrupt vector\n");
2591                 return -EIO;
2592         }
2593         brd->vector = (int)regs[11];    /* interrupt vector */
2594         if (id == 1)
2595                 brd->vector_mask = 0x00FF;
2596         else
2597                 brd->vector_mask = 0x000F;
2598         for (i = 7, bits = 0x0100; i >= 0; i--, bits <<= 1) {
2599                 if (regs[12] & bits) {
2600                         brd->ports[i].baud_base = 921600;
2601                         brd->ports[i].max_baud = 921600;
2602                 } else {
2603                         brd->ports[i].baud_base = 115200;
2604                         brd->ports[i].max_baud = 115200;
2605                 }
2606         }
2607         scratch2 = inb(cap + UART_LCR) & (~UART_LCR_DLAB);
2608         outb(scratch2 | UART_LCR_DLAB, cap + UART_LCR);
2609         outb(0, cap + UART_EFR);        /* EFR is the same as FCR */
2610         outb(scratch2, cap + UART_LCR);
2611         outb(UART_FCR_ENABLE_FIFO, cap + UART_FCR);
2612         scratch = inb(cap + UART_IIR);
2613
2614         if (scratch & 0xC0)
2615                 brd->uart_type = PORT_16550A;
2616         else
2617                 brd->uart_type = PORT_16450;
2618         if (!request_region(brd->ports[0].ioaddr, 8 * brd->info->nports,
2619                         "mxser(IO)")) {
2620                 printk(KERN_ERR "mxser: can't request ports I/O region: "
2621                                 "0x%.8lx-0x%.8lx\n",
2622                                 brd->ports[0].ioaddr, brd->ports[0].ioaddr +
2623                                 8 * brd->info->nports - 1);
2624                 return -EIO;
2625         }
2626         if (!request_region(brd->vector, 1, "mxser(vector)")) {
2627                 release_region(brd->ports[0].ioaddr, 8 * brd->info->nports);
2628                 printk(KERN_ERR "mxser: can't request interrupt vector region: "
2629                                 "0x%.8lx-0x%.8lx\n",
2630                                 brd->ports[0].ioaddr, brd->ports[0].ioaddr +
2631                                 8 * brd->info->nports - 1);
2632                 return -EIO;
2633         }
2634         return brd->info->nports;
2635
2636 err_irqconflict:
2637         printk(KERN_ERR "mxser: invalid interrupt number\n");
2638         return -EIO;
2639 }
2640
2641 static int __devinit mxser_probe(struct pci_dev *pdev,
2642                 const struct pci_device_id *ent)
2643 {
2644 #ifdef CONFIG_PCI
2645         struct mxser_board *brd;
2646         unsigned int i, j;
2647         unsigned long ioaddress;
2648         int retval = -EINVAL;
2649
2650         for (i = 0; i < MXSER_BOARDS; i++)
2651                 if (mxser_boards[i].info == NULL)
2652                         break;
2653
2654         if (i >= MXSER_BOARDS) {
2655                 dev_err(&pdev->dev, "too many boards found (maximum %d), board "
2656                                 "not configured\n", MXSER_BOARDS);
2657                 goto err;
2658         }
2659
2660         brd = &mxser_boards[i];
2661         brd->idx = i * MXSER_PORTS_PER_BOARD;
2662         dev_info(&pdev->dev, "found MOXA %s board (BusNo=%d, DevNo=%d)\n",
2663                 mxser_cards[ent->driver_data].name,
2664                 pdev->bus->number, PCI_SLOT(pdev->devfn));
2665
2666         retval = pci_enable_device(pdev);
2667         if (retval) {
2668                 dev_err(&pdev->dev, "PCI enable failed\n");
2669                 goto err;
2670         }
2671
2672         /* io address */
2673         ioaddress = pci_resource_start(pdev, 2);
2674         retval = pci_request_region(pdev, 2, "mxser(IO)");
2675         if (retval)
2676                 goto err;
2677
2678         brd->info = &mxser_cards[ent->driver_data];
2679         for (i = 0; i < brd->info->nports; i++)
2680                 brd->ports[i].ioaddr = ioaddress + 8 * i;
2681
2682         /* vector */
2683         ioaddress = pci_resource_start(pdev, 3);
2684         retval = pci_request_region(pdev, 3, "mxser(vector)");
2685         if (retval)
2686                 goto err_relio;
2687         brd->vector = ioaddress;
2688
2689         /* irq */
2690         brd->irq = pdev->irq;
2691
2692         brd->chip_flag = CheckIsMoxaMust(brd->ports[0].ioaddr);
2693         brd->uart_type = PORT_16550A;
2694         brd->vector_mask = 0;
2695
2696         for (i = 0; i < brd->info->nports; i++) {
2697                 for (j = 0; j < UART_INFO_NUM; j++) {
2698                         if (Gpci_uart_info[j].type == brd->chip_flag) {
2699                                 brd->ports[i].max_baud =
2700                                         Gpci_uart_info[j].max_baud;
2701
2702                                 /* exception....CP-102 */
2703                                 if (brd->info->flags & MXSER_HIGHBAUD)
2704                                         brd->ports[i].max_baud = 921600;
2705                                 break;
2706                         }
2707                 }
2708         }
2709
2710         if (brd->chip_flag == MOXA_MUST_MU860_HWID) {
2711                 for (i = 0; i < brd->info->nports; i++) {
2712                         if (i < 4)
2713                                 brd->ports[i].opmode_ioaddr = ioaddress + 4;
2714                         else
2715                                 brd->ports[i].opmode_ioaddr = ioaddress + 0x0c;
2716                 }
2717                 outb(0, ioaddress + 4); /* default set to RS232 mode */
2718                 outb(0, ioaddress + 0x0c);      /* default set to RS232 mode */
2719         }
2720
2721         for (i = 0; i < brd->info->nports; i++) {
2722                 brd->vector_mask |= (1 << i);
2723                 brd->ports[i].baud_base = 921600;
2724         }
2725
2726         /* mxser_initbrd will hook ISR. */
2727         retval = mxser_initbrd(brd, pdev);
2728         if (retval)
2729                 goto err_null;
2730
2731         for (i = 0; i < brd->info->nports; i++)
2732                 tty_register_device(mxvar_sdriver, brd->idx + i, &pdev->dev);
2733
2734         pci_set_drvdata(pdev, brd);
2735
2736         return 0;
2737 err_relio:
2738         pci_release_region(pdev, 2);
2739 err_null:
2740         brd->info = NULL;
2741 err:
2742         return retval;
2743 #else
2744         return -ENODEV;
2745 #endif
2746 }
2747
2748 static void __devexit mxser_remove(struct pci_dev *pdev)
2749 {
2750         struct mxser_board *brd = pci_get_drvdata(pdev);
2751         unsigned int i;
2752
2753         for (i = 0; i < brd->info->nports; i++)
2754                 tty_unregister_device(mxvar_sdriver, brd->idx + i);
2755
2756         mxser_release_res(brd, pdev, 1);
2757         brd->info = NULL;
2758 }
2759
2760 static struct pci_driver mxser_driver = {
2761         .name = "mxser",
2762         .id_table = mxser_pcibrds,
2763         .probe = mxser_probe,
2764         .remove = __devexit_p(mxser_remove)
2765 };
2766
2767 static int __init mxser_module_init(void)
2768 {
2769         struct mxser_board *brd;
2770         unsigned int b, i, m;
2771         int retval;
2772
2773         mxvar_sdriver = alloc_tty_driver(MXSER_PORTS + 1);
2774         if (!mxvar_sdriver)
2775                 return -ENOMEM;
2776
2777         printk(KERN_INFO "MOXA Smartio/Industio family driver version %s\n",
2778                 MXSER_VERSION);
2779
2780         /* Initialize the tty_driver structure */
2781         mxvar_sdriver->owner = THIS_MODULE;
2782         mxvar_sdriver->magic = TTY_DRIVER_MAGIC;
2783         mxvar_sdriver->name = "ttyMI";
2784         mxvar_sdriver->major = ttymajor;
2785         mxvar_sdriver->minor_start = 0;
2786         mxvar_sdriver->num = MXSER_PORTS + 1;
2787         mxvar_sdriver->type = TTY_DRIVER_TYPE_SERIAL;
2788         mxvar_sdriver->subtype = SERIAL_TYPE_NORMAL;
2789         mxvar_sdriver->init_termios = tty_std_termios;
2790         mxvar_sdriver->init_termios.c_cflag = B9600|CS8|CREAD|HUPCL|CLOCAL;
2791         mxvar_sdriver->flags = TTY_DRIVER_REAL_RAW|TTY_DRIVER_DYNAMIC_DEV;
2792         tty_set_operations(mxvar_sdriver, &mxser_ops);
2793
2794         retval = tty_register_driver(mxvar_sdriver);
2795         if (retval) {
2796                 printk(KERN_ERR "Couldn't install MOXA Smartio/Industio family "
2797                                 "tty driver !\n");
2798                 goto err_put;
2799         }
2800
2801         /* Start finding ISA boards here */
2802         for (m = 0, b = 0; b < MXSER_BOARDS; b++) {
2803                 if (!ioaddr[b])
2804                         continue;
2805
2806                 brd = &mxser_boards[m];
2807                 retval = mxser_get_ISA_conf(!ioaddr[b], brd);
2808                 if (retval <= 0) {
2809                         brd->info = NULL;
2810                         continue;
2811                 }
2812
2813                 printk(KERN_INFO "mxser: found MOXA %s board (CAP=0x%lx)\n",
2814                                 brd->info->name, ioaddr[b]);
2815
2816                 /* mxser_initbrd will hook ISR. */
2817                 if (mxser_initbrd(brd, NULL) < 0) {
2818                         brd->info = NULL;
2819                         continue;
2820                 }
2821
2822                 brd->idx = m * MXSER_PORTS_PER_BOARD;
2823                 for (i = 0; i < brd->info->nports; i++)
2824                         tty_register_device(mxvar_sdriver, brd->idx + i, NULL);
2825
2826                 m++;
2827         }
2828
2829         retval = pci_register_driver(&mxser_driver);
2830         if (retval) {
2831                 printk(KERN_ERR "mxser: can't register pci driver\n");
2832                 if (!m) {
2833                         retval = -ENODEV;
2834                         goto err_unr;
2835                 } /* else: we have some ISA cards under control */
2836         }
2837
2838         return 0;
2839 err_unr:
2840         tty_unregister_driver(mxvar_sdriver);
2841 err_put:
2842         put_tty_driver(mxvar_sdriver);
2843         return retval;
2844 }
2845
2846 static void __exit mxser_module_exit(void)
2847 {
2848         unsigned int i, j;
2849
2850         pci_unregister_driver(&mxser_driver);
2851
2852         for (i = 0; i < MXSER_BOARDS; i++) /* ISA remains */
2853                 if (mxser_boards[i].info != NULL)
2854                         for (j = 0; j < mxser_boards[i].info->nports; j++)
2855                                 tty_unregister_device(mxvar_sdriver,
2856                                                 mxser_boards[i].idx + j);
2857         tty_unregister_driver(mxvar_sdriver);
2858         put_tty_driver(mxvar_sdriver);
2859
2860         for (i = 0; i < MXSER_BOARDS; i++)
2861                 if (mxser_boards[i].info != NULL)
2862                         mxser_release_res(&mxser_boards[i], NULL, 1);
2863 }
2864
2865 module_init(mxser_module_init);
2866 module_exit(mxser_module_exit);