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 mxser_port *info, long newspd)
 614 {
 615         int quot = 0, baud;
 616         unsigned char cval;
 617
 618         if (!info->port.tty || !info->port.tty->termios)
 619                 return -1;
 620
 621         if (!(info->ioaddr))
 622                 return -1;
 623
 624         if (newspd > info->max_baud)
 625                 return -1;
 626
 627         if (newspd == 134) {
 628                 quot = 2 * info->baud_base / 269;
 629                 tty_encode_baud_rate(info->port.tty, 134, 134);
 630         } else if (newspd) {
 631                 quot = info->baud_base / newspd;
 632                 if (quot == 0)
 633                         quot = 1;
 634                 baud = info->baud_base/quot;
 635                 tty_encode_baud_rate(info->port.tty, baud, baud);
 636         } else {
 637                 quot = 0;
 638         }
 639
 640         info->timeout = ((info->xmit_fifo_size * HZ * 10 * quot) / info->baud_base);
 641         info->timeout += HZ / 50;       /* Add .02 seconds of slop */
 642
 643         if (quot) {
 644                 info->MCR |= UART_MCR_DTR;
 645                 outb(info->MCR, info->ioaddr + UART_MCR);
 646         } else {
 647                 info->MCR &= ~UART_MCR_DTR;
 648                 outb(info->MCR, info->ioaddr + UART_MCR);
 649                 return 0;
 650         }
 651
 652         cval = inb(info->ioaddr + UART_LCR);
 653
 654         outb(cval | UART_LCR_DLAB, info->ioaddr + UART_LCR);    /* set DLAB */
 655
 656         outb(quot & 0xff, info->ioaddr + UART_DLL);     /* LS of divisor */
 657         outb(quot >> 8, info->ioaddr + UART_DLM);       /* MS of divisor */
 658         outb(cval, info->ioaddr + UART_LCR);    /* reset DLAB */
 659
 660 #ifdef BOTHER
 661         if (C_BAUD(info->port.tty) == BOTHER) {
 662                 quot = info->baud_base % newspd;
 663                 quot *= 8;
 664                 if (quot % newspd > newspd / 2) {
 665                         quot /= newspd;
 666                         quot++;
 667                 } else
 668                         quot /= newspd;
 669
 670                 mxser_set_must_enum_value(info->ioaddr, quot);
 671         } else
 672 #endif
 673                 mxser_set_must_enum_value(info->ioaddr, 0);
 674
 675         return 0;
 676 }
 677
 678 /*
 679  * This routine is called to set the UART divisor registers to match
 680  * the specified baud rate for a serial port.
 681  */
 682 static int mxser_change_speed(struct mxser_port *info,
 683                 struct ktermios *old_termios)
 684 {
 685         unsigned cflag, cval, fcr;
 686         int ret = 0;
 687         unsigned char status;
 688
 689         if (!info->port.tty || !info->port.tty->termios)
 690                 return ret;
 691         cflag = info->port.tty->termios->c_cflag;
 692         if (!(info->ioaddr))
 693                 return ret;
 694
 695         if (mxser_set_baud_method[info->port.tty->index] == 0)
 696                 mxser_set_baud(info, tty_get_baud_rate(info->port.tty));
 697
 698         /* byte size and parity */
 699         switch (cflag & CSIZE) {
 700         case CS5:
 701                 cval = 0x00;
 702                 break;
 703         case CS6:
 704                 cval = 0x01;
 705                 break;
 706         case CS7:
 707                 cval = 0x02;
 708                 break;
 709         case CS8:
 710                 cval = 0x03;
 711                 break;
 712         default:
 713                 cval = 0x00;
 714                 break;          /* too keep GCC shut... */
 715         }
 716         if (cflag & CSTOPB)
 717                 cval |= 0x04;
 718         if (cflag & PARENB)
 719                 cval |= UART_LCR_PARITY;
 720         if (!(cflag & PARODD))
 721                 cval |= UART_LCR_EPAR;
 722         if (cflag & CMSPAR)
 723                 cval |= UART_LCR_SPAR;
 724
 725         if ((info->type == PORT_8250) || (info->type == PORT_16450)) {
 726                 if (info->board->chip_flag) {
 727                         fcr = UART_FCR_ENABLE_FIFO;
 728                         fcr |= MOXA_MUST_FCR_GDA_MODE_ENABLE;
 729                         mxser_set_must_fifo_value(info);
 730                 } else
 731                         fcr = 0;
 732         } else {
 733                 fcr = UART_FCR_ENABLE_FIFO;
 734                 if (info->board->chip_flag) {
 735                         fcr |= MOXA_MUST_FCR_GDA_MODE_ENABLE;
 736                         mxser_set_must_fifo_value(info);
 737                 } else {
 738                         switch (info->rx_trigger) {
 739                         case 1:
 740                                 fcr |= UART_FCR_TRIGGER_1;
 741                                 break;
 742                         case 4:
 743                                 fcr |= UART_FCR_TRIGGER_4;
 744                                 break;
 745                         case 8:
 746                                 fcr |= UART_FCR_TRIGGER_8;
 747                                 break;
 748                         default:
 749                                 fcr |= UART_FCR_TRIGGER_14;
 750                                 break;
 751                         }
 752                 }
 753         }
 754
 755         /* CTS flow control flag and modem status interrupts */
 756         info->IER &= ~UART_IER_MSI;
 757         info->MCR &= ~UART_MCR_AFE;
 758         if (cflag & CRTSCTS) {
 759                 info->port.flags |= ASYNC_CTS_FLOW;
 760                 info->IER |= UART_IER_MSI;
 761                 if ((info->type == PORT_16550A) || (info->board->chip_flag)) {
 762                         info->MCR |= UART_MCR_AFE;
 763                 } else {
 764                         status = inb(info->ioaddr + UART_MSR);
 765                         if (info->port.tty->hw_stopped) {
 766                                 if (status & UART_MSR_CTS) {
 767                                         info->port.tty->hw_stopped = 0;
 768                                         if (info->type != PORT_16550A &&
 769                                                         !info->board->chip_flag) {
 770                                                 outb(info->IER & ~UART_IER_THRI,
 771                                                         info->ioaddr +
 772                                                         UART_IER);
 773                                                 info->IER |= UART_IER_THRI;
 774                                                 outb(info->IER, info->ioaddr +
 775                                                                 UART_IER);
 776                                         }
 777                                         tty_wakeup(info->port.tty);
 778                                 }
 779                         } else {
 780                                 if (!(status & UART_MSR_CTS)) {
 781                                         info->port.tty->hw_stopped = 1;
 782                                         if ((info->type != PORT_16550A) &&
 783                                                         (!info->board->chip_flag)) {
 784                                                 info->IER &= ~UART_IER_THRI;
 785                                                 outb(info->IER, info->ioaddr +
 786                                                                 UART_IER);
 787                                         }
 788                                 }
 789                         }
 790                 }
 791         } else {
 792                 info->port.flags &= ~ASYNC_CTS_FLOW;
 793         }
 794         outb(info->MCR, info->ioaddr + UART_MCR);
 795         if (cflag & CLOCAL) {
 796                 info->port.flags &= ~ASYNC_CHECK_CD;
 797         } else {
 798                 info->port.flags |= ASYNC_CHECK_CD;
 799                 info->IER |= UART_IER_MSI;
 800         }
 801         outb(info->IER, info->ioaddr + UART_IER);
 802
 803         /*
 804          * Set up parity check flag
 805          */
 806         info->read_status_mask = UART_LSR_OE | UART_LSR_THRE | UART_LSR_DR;
 807         if (I_INPCK(info->port.tty))
 808                 info->read_status_mask |= UART_LSR_FE | UART_LSR_PE;
 809         if (I_BRKINT(info->port.tty) || I_PARMRK(info->port.tty))
 810                 info->read_status_mask |= UART_LSR_BI;
 811
 812         info->ignore_status_mask = 0;
 813
 814         if (I_IGNBRK(info->port.tty)) {
 815                 info->ignore_status_mask |= UART_LSR_BI;
 816                 info->read_status_mask |= UART_LSR_BI;
 817                 /*
 818                  * If we're ignore parity and break indicators, ignore
 819                  * overruns too.  (For real raw support).
 820                  */
 821                 if (I_IGNPAR(info->port.tty)) {
 822                         info->ignore_status_mask |=
 823                                                 UART_LSR_OE |
 824                                                 UART_LSR_PE |
 825                                                 UART_LSR_FE;
 826                         info->read_status_mask |=
 827                                                 UART_LSR_OE |
 828                                                 UART_LSR_PE |
 829                                                 UART_LSR_FE;
 830                 }
 831         }
 832         if (info->board->chip_flag) {
 833                 mxser_set_must_xon1_value(info->ioaddr, START_CHAR(info->port.tty));
 834                 mxser_set_must_xoff1_value(info->ioaddr, STOP_CHAR(info->port.tty));
 835                 if (I_IXON(info->port.tty)) {
 836                         mxser_enable_must_rx_software_flow_control(
 837                                         info->ioaddr);
 838                 } else {
 839                         mxser_disable_must_rx_software_flow_control(
 840                                         info->ioaddr);
 841                 }
 842                 if (I_IXOFF(info->port.tty)) {
 843                         mxser_enable_must_tx_software_flow_control(
 844                                         info->ioaddr);
 845                 } else {
 846                         mxser_disable_must_tx_software_flow_control(
 847                                         info->ioaddr);
 848                 }
 849         }
 850
 851
 852         outb(fcr, info->ioaddr + UART_FCR);     /* set fcr */
 853         outb(cval, info->ioaddr + UART_LCR);
 854
 855         return ret;
 856 }
 857
 858 static void mxser_check_modem_status(struct mxser_port *port, int status)
 859 {
 860         /* update input line counters */
 861         if (status & UART_MSR_TERI)
 862                 port->icount.rng++;
 863         if (status & UART_MSR_DDSR)
 864                 port->icount.dsr++;
 865         if (status & UART_MSR_DDCD)
 866                 port->icount.dcd++;
 867         if (status & UART_MSR_DCTS)
 868                 port->icount.cts++;
 869         port->mon_data.modem_status = status;
 870         wake_up_interruptible(&port->delta_msr_wait);
 871
 872         if ((port->port.flags & ASYNC_CHECK_CD) && (status & UART_MSR_DDCD)) {
 873                 if (status & UART_MSR_DCD)
 874                         wake_up_interruptible(&port->port.open_wait);
 875         }
 876
 877         if (port->port.flags & ASYNC_CTS_FLOW) {
 878                 if (port->port.tty->hw_stopped) {
 879                         if (status & UART_MSR_CTS) {
 880                                 port->port.tty->hw_stopped = 0;
 881
 882                                 if ((port->type != PORT_16550A) &&
 883                                                 (!port->board->chip_flag)) {
 884                                         outb(port->IER & ~UART_IER_THRI,
 885                                                 port->ioaddr + UART_IER);
 886                                         port->IER |= UART_IER_THRI;
 887                                         outb(port->IER, port->ioaddr +
 888                                                         UART_IER);
 889                                 }
 890                                 tty_wakeup(port->port.tty);
 891                         }
 892                 } else {
 893                         if (!(status & UART_MSR_CTS)) {
 894                                 port->port.tty->hw_stopped = 1;
 895                                 if (port->type != PORT_16550A &&
 896                                                 !port->board->chip_flag) {
 897                                         port->IER &= ~UART_IER_THRI;
 898                                         outb(port->IER, port->ioaddr +
 899                                                         UART_IER);
 900                                 }
 901                         }
 902                 }
 903         }
 904 }
 905
 906 static int mxser_startup(struct mxser_port *info)
 907 {
 908         unsigned long page;
 909         unsigned long flags;
 910
 911         page = __get_free_page(GFP_KERNEL);
 912         if (!page)
 913                 return -ENOMEM;
 914
 915         spin_lock_irqsave(&info->slock, flags);
 916
 917         if (info->port.flags & ASYNC_INITIALIZED) {
 918                 free_page(page);
 919                 spin_unlock_irqrestore(&info->slock, flags);
 920                 return 0;
 921         }
 922
 923         if (!info->ioaddr || !info->type) {
 924                 if (info->port.tty)
 925                         set_bit(TTY_IO_ERROR, &info->port.tty->flags);
 926                 free_page(page);
 927                 spin_unlock_irqrestore(&info->slock, flags);
 928                 return 0;
 929         }
 930         if (info->port.xmit_buf)
 931                 free_page(page);
 932         else
 933                 info->port.xmit_buf = (unsigned char *) page;
 934
 935         /*
 936          * Clear the FIFO buffers and disable them
 937          * (they will be reenabled in mxser_change_speed())
 938          */
 939         if (info->board->chip_flag)
 940                 outb((UART_FCR_CLEAR_RCVR |
 941                         UART_FCR_CLEAR_XMIT |
 942                         MOXA_MUST_FCR_GDA_MODE_ENABLE), info->ioaddr + UART_FCR);
 943         else
 944                 outb((UART_FCR_CLEAR_RCVR | UART_FCR_CLEAR_XMIT),
 945                         info->ioaddr + UART_FCR);
 946
 947         /*
 948          * At this point there's no way the LSR could still be 0xFF;
 949          * if it is, then bail out, because there's likely no UART
 950          * here.
 951          */
 952         if (inb(info->ioaddr + UART_LSR) == 0xff) {
 953                 spin_unlock_irqrestore(&info->slock, flags);
 954                 if (capable(CAP_SYS_ADMIN)) {
 955                         if (info->port.tty)
 956                                 set_bit(TTY_IO_ERROR, &info->port.tty->flags);
 957                         return 0;
 958                 } else
 959                         return -ENODEV;
 960         }
 961
 962         /*
 963          * Clear the interrupt registers.
 964          */
 965         (void) inb(info->ioaddr + UART_LSR);
 966         (void) inb(info->ioaddr + UART_RX);
 967         (void) inb(info->ioaddr + UART_IIR);
 968         (void) inb(info->ioaddr + UART_MSR);
 969
 970         /*
 971          * Now, initialize the UART
 972          */
 973         outb(UART_LCR_WLEN8, info->ioaddr + UART_LCR);  /* reset DLAB */
 974         info->MCR = UART_MCR_DTR | UART_MCR_RTS;
 975         outb(info->MCR, info->ioaddr + UART_MCR);
 976
 977         /*
 978          * Finally, enable interrupts
 979          */
 980         info->IER = UART_IER_MSI | UART_IER_RLSI | UART_IER_RDI;
 981
 982         if (info->board->chip_flag)
 983                 info->IER |= MOXA_MUST_IER_EGDAI;
 984         outb(info->IER, info->ioaddr + UART_IER);       /* enable interrupts */
 985
 986         /*
 987          * And clear the interrupt registers again for luck.
 988          */
 989         (void) inb(info->ioaddr + UART_LSR);
 990         (void) inb(info->ioaddr + UART_RX);
 991         (void) inb(info->ioaddr + UART_IIR);
 992         (void) inb(info->ioaddr + UART_MSR);
 993
 994         if (info->port.tty)
 995                 clear_bit(TTY_IO_ERROR, &info->port.tty->flags);
 996         info->xmit_cnt = info->xmit_head = info->xmit_tail = 0;
 997
 998         /*
 999          * and set the speed of the serial port
1000          */
1001         mxser_change_speed(info, NULL);
1002         info->port.flags |= ASYNC_INITIALIZED;
1003         spin_unlock_irqrestore(&info->slock, flags);
1004
1005         return 0;
1006 }
1007
1008 /*
1009  * This routine will shutdown a serial port; interrupts maybe disabled, and
1010  * DTR is dropped if the hangup on close termio flag is on.
1011  */
1012 static void mxser_shutdown(struct mxser_port *info)
1013 {
1014         unsigned long flags;
1015
1016         if (!(info->port.flags & ASYNC_INITIALIZED))
1017                 return;
1018
1019         spin_lock_irqsave(&info->slock, flags);
1020
1021         /*
1022          * clear delta_msr_wait queue to avoid mem leaks: we may free the irq
1023          * here so the queue might never be waken up
1024          */
1025         wake_up_interruptible(&info->delta_msr_wait);
1026
1027         /*
1028          * Free the IRQ, if necessary
1029          */
1030         if (info->port.xmit_buf) {
1031                 free_page((unsigned long) info->port.xmit_buf);
1032                 info->port.xmit_buf = NULL;
1033         }
1034
1035         info->IER = 0;
1036         outb(0x00, info->ioaddr + UART_IER);
1037
1038         if (!info->port.tty || (info->port.tty->termios->c_cflag & HUPCL))
1039                 info->MCR &= ~(UART_MCR_DTR | UART_MCR_RTS);
1040         outb(info->MCR, info->ioaddr + UART_MCR);
1041
1042         /* clear Rx/Tx FIFO's */
1043         if (info->board->chip_flag)
1044                 outb(UART_FCR_CLEAR_RCVR | UART_FCR_CLEAR_XMIT |
1045                                 MOXA_MUST_FCR_GDA_MODE_ENABLE,
1046                                 info->ioaddr + UART_FCR);
1047         else
1048                 outb(UART_FCR_CLEAR_RCVR | UART_FCR_CLEAR_XMIT,
1049                         info->ioaddr + UART_FCR);
1050
1051         /* read data port to reset things */
1052         (void) inb(info->ioaddr + UART_RX);
1053
1054         if (info->port.tty)
1055                 set_bit(TTY_IO_ERROR, &info->port.tty->flags);
1056
1057         info->port.flags &= ~ASYNC_INITIALIZED;
1058
1059         if (info->board->chip_flag)
1060                 SET_MOXA_MUST_NO_SOFTWARE_FLOW_CONTROL(info->ioaddr);
1061
1062         spin_unlock_irqrestore(&info->slock, flags);
1063 }
1064
1065 /*
1066  * This routine is called whenever a serial port is opened.  It
1067  * enables interrupts for a serial port, linking in its async structure into
1068  * the IRQ chain.   It also performs the serial-specific
1069  * initialization for the tty structure.
1070  */
1071 static int mxser_open(struct tty_struct *tty, struct file *filp)
1072 {
1073         struct mxser_port *info;
1074         unsigned long flags;
1075         int retval, line;
1076
1077         line = tty->index;
1078         if (line == MXSER_PORTS)
1079                 return 0;
1080         if (line < 0 || line > MXSER_PORTS)
1081                 return -ENODEV;
1082         info = &mxser_boards[line / MXSER_PORTS_PER_BOARD].ports[line % MXSER_PORTS_PER_BOARD];
1083         if (!info->ioaddr)
1084                 return -ENODEV;
1085
1086         tty->driver_data = info;
1087         info->port.tty = tty;
1088         /*
1089          * Start up serial port
1090          */
1091         spin_lock_irqsave(&info->slock, flags);
1092         info->port.count++;
1093         spin_unlock_irqrestore(&info->slock, flags);
1094         retval = mxser_startup(info);
1095         if (retval)
1096                 return retval;
1097
1098         retval = mxser_block_til_ready(tty, filp, info);
1099         if (retval)
1100                 return retval;
1101
1102         /* unmark here for very high baud rate (ex. 921600 bps) used */
1103         tty->low_latency = 1;
1104         return 0;
1105 }
1106
1107 static void mxser_flush_buffer(struct tty_struct *tty)
1108 {
1109         struct mxser_port *info = tty->driver_data;
1110         char fcr;
1111         unsigned long flags;
1112
1113
1114         spin_lock_irqsave(&info->slock, flags);
1115         info->xmit_cnt = info->xmit_head = info->xmit_tail = 0;
1116
1117         fcr = inb(info->ioaddr + UART_FCR);
1118         outb((fcr | UART_FCR_CLEAR_RCVR | UART_FCR_CLEAR_XMIT),
1119                 info->ioaddr + UART_FCR);
1120         outb(fcr, info->ioaddr + UART_FCR);
1121
1122         spin_unlock_irqrestore(&info->slock, flags);
1123
1124         tty_wakeup(tty);
1125 }
1126
1127
1128 /*
1129  * This routine is called when the serial port gets closed.  First, we
1130  * wait for the last remaining data to be sent.  Then, we unlink its
1131  * async structure from the interrupt chain if necessary, and we free
1132  * that IRQ if nothing is left in the chain.
1133  */
1134 static void mxser_close(struct tty_struct *tty, struct file *filp)
1135 {
1136         struct mxser_port *info = tty->driver_data;
1137
1138         unsigned long timeout;
1139         unsigned long flags;
1140
1141         if (tty->index == MXSER_PORTS)
1142                 return;
1143         if (!info)
1144                 return;
1145
1146         spin_lock_irqsave(&info->slock, flags);
1147
1148         if (tty_hung_up_p(filp)) {
1149                 spin_unlock_irqrestore(&info->slock, flags);
1150                 return;
1151         }
1152         if ((tty->count == 1) && (info->port.count != 1)) {
1153                 /*
1154                  * Uh, oh.  tty->count is 1, which means that the tty
1155                  * structure will be freed.  Info->port.count should always
1156                  * be one in these conditions.  If it's greater than
1157                  * one, we've got real problems, since it means the
1158                  * serial port won't be shutdown.
1159                  */
1160                 printk(KERN_ERR "mxser_close: bad serial port count; "
1161                         "tty->count is 1, info->port.count is %d\n", info->port.count);
1162                 info->port.count = 1;
1163         }
1164         if (--info->port.count < 0) {
1165                 printk(KERN_ERR "mxser_close: bad serial port count for "
1166                         "ttys%d: %d\n", tty->index, info->port.count);
1167                 info->port.count = 0;
1168         }
1169         if (info->port.count) {
1170                 spin_unlock_irqrestore(&info->slock, flags);
1171                 return;
1172         }
1173         info->port.flags |= ASYNC_CLOSING;
1174         spin_unlock_irqrestore(&info->slock, flags);
1175         /*
1176          * Save the termios structure, since this port may have
1177          * separate termios for callout and dialin.
1178          */
1179         if (info->port.flags & ASYNC_NORMAL_ACTIVE)
1180                 info->normal_termios = *tty->termios;
1181         /*
1182          * Now we wait for the transmit buffer to clear; and we notify
1183          * the line discipline to only process XON/XOFF characters.
1184          */
1185         tty->closing = 1;
1186         if (info->port.closing_wait != ASYNC_CLOSING_WAIT_NONE)
1187                 tty_wait_until_sent(tty, info->port.closing_wait);
1188         /*
1189          * At this point we stop accepting input.  To do this, we
1190          * disable the receive line status interrupts, and tell the
1191          * interrupt driver to stop checking the data ready bit in the
1192          * line status register.
1193          */
1194         info->IER &= ~UART_IER_RLSI;
1195         if (info->board->chip_flag)
1196                 info->IER &= ~MOXA_MUST_RECV_ISR;
1197
1198         if (info->port.flags & ASYNC_INITIALIZED) {
1199                 outb(info->IER, info->ioaddr + UART_IER);
1200                 /*
1201                  * Before we drop DTR, make sure the UART transmitter
1202                  * has completely drained; this is especially
1203                  * important if there is a transmit FIFO!
1204                  */
1205                 timeout = jiffies + HZ;
1206                 while (!(inb(info->ioaddr + UART_LSR) & UART_LSR_TEMT)) {
1207                         schedule_timeout_interruptible(5);
1208                         if (time_after(jiffies, timeout))
1209                                 break;
1210                 }
1211         }
1212         mxser_shutdown(info);
1213
1214         mxser_flush_buffer(tty);
1215         tty_ldisc_flush(tty);
1216
1217         tty->closing = 0;
1218         info->port.tty = NULL;
1219         if (info->port.blocked_open) {
1220                 if (info->port.close_delay)
1221                         schedule_timeout_interruptible(info->port.close_delay);
1222                 wake_up_interruptible(&info->port.open_wait);
1223         }
1224
1225         info->port.flags &= ~(ASYNC_NORMAL_ACTIVE | ASYNC_CLOSING);
1226 }
1227
1228 static int mxser_write(struct tty_struct *tty, const unsigned char *buf, int count)
1229 {
1230         int c, total = 0;
1231         struct mxser_port *info = tty->driver_data;
1232         unsigned long flags;
1233
1234         if (!info->port.xmit_buf)
1235                 return 0;
1236
1237         while (1) {
1238                 c = min_t(int, count, min(SERIAL_XMIT_SIZE - info->xmit_cnt - 1,
1239                                           SERIAL_XMIT_SIZE - info->xmit_head));
1240                 if (c <= 0)
1241                         break;
1242
1243                 memcpy(info->port.xmit_buf + info->xmit_head, buf, c);
1244                 spin_lock_irqsave(&info->slock, flags);
1245                 info->xmit_head = (info->xmit_head + c) &
1246                                   (SERIAL_XMIT_SIZE - 1);
1247                 info->xmit_cnt += c;
1248                 spin_unlock_irqrestore(&info->slock, flags);
1249
1250                 buf += c;
1251                 count -= c;
1252                 total += c;
1253         }
1254
1255         if (info->xmit_cnt && !tty->stopped) {
1256                 if (!tty->hw_stopped ||
1257                                 (info->type == PORT_16550A) ||
1258                                 (info->board->chip_flag)) {
1259                         spin_lock_irqsave(&info->slock, flags);
1260                         outb(info->IER & ~UART_IER_THRI, info->ioaddr +
1261                                         UART_IER);
1262                         info->IER |= UART_IER_THRI;
1263                         outb(info->IER, info->ioaddr + UART_IER);
1264                         spin_unlock_irqrestore(&info->slock, flags);
1265                 }
1266         }
1267         return total;
1268 }
1269
1270 static int mxser_put_char(struct tty_struct *tty, unsigned char ch)
1271 {
1272         struct mxser_port *info = tty->driver_data;
1273         unsigned long flags;
1274
1275         if (!info->port.xmit_buf)
1276                 return 0;
1277
1278         if (info->xmit_cnt >= SERIAL_XMIT_SIZE - 1)
1279                 return 0;
1280
1281         spin_lock_irqsave(&info->slock, flags);
1282         info->port.xmit_buf[info->xmit_head++] = ch;
1283         info->xmit_head &= SERIAL_XMIT_SIZE - 1;
1284         info->xmit_cnt++;
1285         spin_unlock_irqrestore(&info->slock, flags);
1286         if (!tty->stopped) {
1287                 if (!tty->hw_stopped ||
1288                                 (info->type == PORT_16550A) ||
1289                                 info->board->chip_flag) {
1290                         spin_lock_irqsave(&info->slock, flags);
1291                         outb(info->IER & ~UART_IER_THRI, info->ioaddr + UART_IER);
1292                         info->IER |= UART_IER_THRI;
1293                         outb(info->IER, info->ioaddr + UART_IER);
1294                         spin_unlock_irqrestore(&info->slock, flags);
1295                 }
1296         }
1297         return 1;
1298 }
1299
1300
1301 static void mxser_flush_chars(struct tty_struct *tty)
1302 {
1303         struct mxser_port *info = tty->driver_data;
1304         unsigned long flags;
1305
1306         if (info->xmit_cnt <= 0 || tty->stopped || !info->port.xmit_buf ||
1307                         (tty->hw_stopped && info->type != PORT_16550A &&
1308                          !info->board->chip_flag))
1309                 return;
1310
1311         spin_lock_irqsave(&info->slock, flags);
1312
1313         outb(info->IER & ~UART_IER_THRI, info->ioaddr + UART_IER);
1314         info->IER |= UART_IER_THRI;
1315         outb(info->IER, info->ioaddr + UART_IER);
1316
1317         spin_unlock_irqrestore(&info->slock, flags);
1318 }
1319
1320 static int mxser_write_room(struct tty_struct *tty)
1321 {
1322         struct mxser_port *info = tty->driver_data;
1323         int ret;
1324
1325         ret = SERIAL_XMIT_SIZE - info->xmit_cnt - 1;
1326         return ret < 0 ? 0 : ret;
1327 }
1328
1329 static int mxser_chars_in_buffer(struct tty_struct *tty)
1330 {
1331         struct mxser_port *info = tty->driver_data;
1332         return info->xmit_cnt;
1333 }
1334
1335 /*
1336  * ------------------------------------------------------------
1337  * friends of mxser_ioctl()
1338  * ------------------------------------------------------------
1339  */
1340 static int mxser_get_serial_info(struct mxser_port *info,
1341                 struct serial_struct __user *retinfo)
1342 {
1343         struct serial_struct tmp = {
1344                 .type = info->type,
1345                 .line = info->port.tty->index,
1346                 .port = info->ioaddr,
1347                 .irq = info->board->irq,
1348                 .flags = info->port.flags,
1349                 .baud_base = info->baud_base,
1350                 .close_delay = info->port.close_delay,
1351                 .closing_wait = info->port.closing_wait,
1352                 .custom_divisor = info->custom_divisor,
1353                 .hub6 = 0
1354         };
1355         if (copy_to_user(retinfo, &tmp, sizeof(*retinfo)))
1356                 return -EFAULT;
1357         return 0;
1358 }
1359
1360 static int mxser_set_serial_info(struct mxser_port *info,
1361                 struct serial_struct __user *new_info)
1362 {
1363         struct serial_struct new_serial;
1364         speed_t baud;
1365         unsigned long sl_flags;
1366         unsigned int flags;
1367         int retval = 0;
1368
1369         if (!new_info || !info->ioaddr)
1370                 return -ENODEV;
1371         if (copy_from_user(&new_serial, new_info, sizeof(new_serial)))
1372                 return -EFAULT;
1373
1374         if (new_serial.irq != info->board->irq ||
1375                         new_serial.port != info->ioaddr)
1376                 return -EINVAL;
1377
1378         flags = info->port.flags & ASYNC_SPD_MASK;
1379
1380         if (!capable(CAP_SYS_ADMIN)) {
1381                 if ((new_serial.baud_base != info->baud_base) ||
1382                                 (new_serial.close_delay != info->port.close_delay) ||
1383                                 ((new_serial.flags & ~ASYNC_USR_MASK) != (info->port.flags & ~ASYNC_USR_MASK)))
1384                         return -EPERM;
1385                 info->port.flags = ((info->port.flags & ~ASYNC_USR_MASK) |
1386                                 (new_serial.flags & ASYNC_USR_MASK));
1387         } else {
1388                 /*
1389                  * OK, past this point, all the error checking has been done.
1390                  * At this point, we start making changes.....
1391                  */
1392                 info->port.flags = ((info->port.flags & ~ASYNC_FLAGS) |
1393                                 (new_serial.flags & ASYNC_FLAGS));
1394                 info->port.close_delay = new_serial.close_delay * HZ / 100;
1395                 info->port.closing_wait = new_serial.closing_wait * HZ / 100;
1396                 info->port.tty->low_latency =
1397                                 (info->port.flags & ASYNC_LOW_LATENCY) ? 1 : 0;
1398                 if ((info->port.flags & ASYNC_SPD_MASK) == ASYNC_SPD_CUST &&
1399                                 (new_serial.baud_base != info->baud_base ||
1400                                 new_serial.custom_divisor !=
1401                                 info->custom_divisor)) {
1402                         baud = new_serial.baud_base / new_serial.custom_divisor;
1403                         tty_encode_baud_rate(info->port.tty, baud, baud);
1404                 }
1405         }
1406
1407         info->type = new_serial.type;
1408
1409         process_txrx_fifo(info);
1410
1411         if (info->port.flags & ASYNC_INITIALIZED) {
1412                 if (flags != (info->port.flags & ASYNC_SPD_MASK)) {
1413                         spin_lock_irqsave(&info->slock, sl_flags);
1414                         mxser_change_speed(info, NULL);
1415                         spin_unlock_irqrestore(&info->slock, sl_flags);
1416                 }
1417         } else
1418                 retval = mxser_startup(info);
1419
1420         return retval;
1421 }
1422
1423 /*
1424  * mxser_get_lsr_info - get line status register info
1425  *
1426  * Purpose: Let user call ioctl() to get info when the UART physically
1427  *          is emptied.  On bus types like RS485, the transmitter must
1428  *          release the bus after transmitting. This must be done when
1429  *          the transmit shift register is empty, not be done when the
1430  *          transmit holding register is empty.  This functionality
1431  *          allows an RS485 driver to be written in user space.
1432  */
1433 static int mxser_get_lsr_info(struct mxser_port *info,
1434                 unsigned int __user *value)
1435 {
1436         unsigned char status;
1437         unsigned int result;
1438         unsigned long flags;
1439
1440         spin_lock_irqsave(&info->slock, flags);
1441         status = inb(info->ioaddr + UART_LSR);
1442         spin_unlock_irqrestore(&info->slock, flags);
1443         result = ((status & UART_LSR_TEMT) ? TIOCSER_TEMT : 0);
1444         return put_user(result, value);
1445 }
1446
1447 static int mxser_tiocmget(struct tty_struct *tty, struct file *file)
1448 {
1449         struct mxser_port *info = tty->driver_data;
1450         unsigned char control, status;
1451         unsigned long flags;
1452
1453
1454         if (tty->index == MXSER_PORTS)
1455                 return -ENOIOCTLCMD;
1456         if (test_bit(TTY_IO_ERROR, &tty->flags))
1457                 return -EIO;
1458
1459         control = info->MCR;
1460
1461         spin_lock_irqsave(&info->slock, flags);
1462         status = inb(info->ioaddr + UART_MSR);
1463         if (status & UART_MSR_ANY_DELTA)
1464                 mxser_check_modem_status(info, status);
1465         spin_unlock_irqrestore(&info->slock, flags);
1466         return ((control & UART_MCR_RTS) ? TIOCM_RTS : 0) |
1467                     ((control & UART_MCR_DTR) ? TIOCM_DTR : 0) |
1468                     ((status & UART_MSR_DCD) ? TIOCM_CAR : 0) |
1469                     ((status & UART_MSR_RI) ? TIOCM_RNG : 0) |
1470                     ((status & UART_MSR_DSR) ? TIOCM_DSR : 0) |
1471                     ((status & UART_MSR_CTS) ? TIOCM_CTS : 0);
1472 }
1473
1474 static int mxser_tiocmset(struct tty_struct *tty, struct file *file,
1475                 unsigned int set, unsigned int clear)
1476 {
1477         struct mxser_port *info = tty->driver_data;
1478         unsigned long flags;
1479
1480
1481         if (tty->index == MXSER_PORTS)
1482                 return -ENOIOCTLCMD;
1483         if (test_bit(TTY_IO_ERROR, &tty->flags))
1484                 return -EIO;
1485
1486         spin_lock_irqsave(&info->slock, flags);
1487
1488         if (set & TIOCM_RTS)
1489                 info->MCR |= UART_MCR_RTS;
1490         if (set & TIOCM_DTR)
1491                 info->MCR |= UART_MCR_DTR;
1492
1493         if (clear & TIOCM_RTS)
1494                 info->MCR &= ~UART_MCR_RTS;
1495         if (clear & TIOCM_DTR)
1496                 info->MCR &= ~UART_MCR_DTR;
1497
1498         outb(info->MCR, info->ioaddr + UART_MCR);
1499         spin_unlock_irqrestore(&info->slock, flags);
1500         return 0;
1501 }
1502
1503 static int __init mxser_program_mode(int port)
1504 {
1505         int id, i, j, n;
1506
1507         outb(0, port);
1508         outb(0, port);
1509         outb(0, port);
1510         (void)inb(port);
1511         (void)inb(port);
1512         outb(0, port);
1513         (void)inb(port);
1514
1515         id = inb(port + 1) & 0x1F;
1516         if ((id != C168_ASIC_ID) &&
1517                         (id != C104_ASIC_ID) &&
1518                         (id != C102_ASIC_ID) &&
1519                         (id != CI132_ASIC_ID) &&
1520                         (id != CI134_ASIC_ID) &&
1521                         (id != CI104J_ASIC_ID))
1522                 return -1;
1523         for (i = 0, j = 0; i < 4; i++) {
1524                 n = inb(port + 2);
1525                 if (n == 'M') {
1526                         j = 1;
1527                 } else if ((j == 1) && (n == 1)) {
1528                         j = 2;
1529                         break;
1530                 } else
1531                         j = 0;
1532         }
1533         if (j != 2)
1534                 id = -2;
1535         return id;
1536 }
1537
1538 static void __init mxser_normal_mode(int port)
1539 {
1540         int i, n;
1541
1542         outb(0xA5, port + 1);
1543         outb(0x80, port + 3);
1544         outb(12, port + 0);     /* 9600 bps */
1545         outb(0, port + 1);
1546         outb(0x03, port + 3);   /* 8 data bits */
1547         outb(0x13, port + 4);   /* loop back mode */
1548         for (i = 0; i < 16; i++) {
1549                 n = inb(port + 5);
1550                 if ((n & 0x61) == 0x60)
1551                         break;
1552                 if ((n & 1) == 1)
1553                         (void)inb(port);
1554         }
1555         outb(0x00, port + 4);
1556 }
1557
1558 #define CHIP_SK         0x01    /* Serial Data Clock  in Eprom */
1559 #define CHIP_DO         0x02    /* Serial Data Output in Eprom */
1560 #define CHIP_CS         0x04    /* Serial Chip Select in Eprom */
1561 #define CHIP_DI         0x08    /* Serial Data Input  in Eprom */
1562 #define EN_CCMD         0x000   /* Chip's command register     */
1563 #define EN0_RSARLO      0x008   /* Remote start address reg 0  */
1564 #define EN0_RSARHI      0x009   /* Remote start address reg 1  */
1565 #define EN0_RCNTLO      0x00A   /* Remote byte count reg WR    */
1566 #define EN0_RCNTHI      0x00B   /* Remote byte count reg WR    */
1567 #define EN0_DCFG        0x00E   /* Data configuration reg WR   */
1568 #define EN0_PORT        0x010   /* Rcv missed frame error counter RD */
1569 #define ENC_PAGE0       0x000   /* Select page 0 of chip registers   */
1570 #define ENC_PAGE3       0x0C0   /* Select page 3 of chip registers   */
1571 static int __init mxser_read_register(int port, unsigned short *regs)
1572 {
1573         int i, k, value, id;
1574         unsigned int j;
1575
1576         id = mxser_program_mode(port);
1577         if (id < 0)
1578                 return id;
1579         for (i = 0; i < 14; i++) {
1580                 k = (i & 0x3F) | 0x180;
1581                 for (j = 0x100; j > 0; j >>= 1) {
1582                         outb(CHIP_CS, port);
1583                         if (k & j) {
1584                                 outb(CHIP_CS | CHIP_DO, port);
1585                                 outb(CHIP_CS | CHIP_DO | CHIP_SK, port);        /* A? bit of read */
1586                         } else {
1587                                 outb(CHIP_CS, port);
1588                                 outb(CHIP_CS | CHIP_SK, port);  /* A? bit of read */
1589                         }
1590                 }
1591                 (void)inb(port);
1592                 value = 0;
1593                 for (k = 0, j = 0x8000; k < 16; k++, j >>= 1) {
1594                         outb(CHIP_CS, port);
1595                         outb(CHIP_CS | CHIP_SK, port);
1596                         if (inb(port) & CHIP_DI)
1597                                 value |= j;
1598                 }
1599                 regs[i] = value;
1600                 outb(0, port);
1601         }
1602         mxser_normal_mode(port);
1603         return id;
1604 }
1605
1606 static int mxser_ioctl_special(unsigned int cmd, void __user *argp)
1607 {
1608         struct mxser_port *port;
1609         int result, status;
1610         unsigned int i, j;
1611         int ret = 0;
1612
1613         switch (cmd) {
1614         case MOXA_GET_MAJOR:
1615                 if (printk_ratelimit())
1616                         printk(KERN_WARNING "mxser: '%s' uses deprecated ioctl "
1617                                         "%x (GET_MAJOR), fix your userspace\n",
1618                                         current->comm, cmd);
1619                 return put_user(ttymajor, (int __user *)argp);
1620
1621         case MOXA_CHKPORTENABLE:
1622                 result = 0;
1623                 lock_kernel();
1624                 for (i = 0; i < MXSER_BOARDS; i++)
1625                         for (j = 0; j < MXSER_PORTS_PER_BOARD; j++)
1626                                 if (mxser_boards[i].ports[j].ioaddr)
1627                                         result |= (1 << i);
1628                 unlock_kernel();
1629                 return put_user(result, (unsigned long __user *)argp);
1630         case MOXA_GETDATACOUNT:
1631                 lock_kernel();
1632                 if (copy_to_user(argp, &mxvar_log, sizeof(mxvar_log)))
1633                         ret = -EFAULT;
1634                 unlock_kernel();
1635                 return ret;
1636         case MOXA_GETMSTATUS: {
1637                 struct mxser_mstatus ms, __user *msu = argp;
1638                 lock_kernel();
1639                 for (i = 0; i < MXSER_BOARDS; i++)
1640                         for (j = 0; j < MXSER_PORTS_PER_BOARD; j++) {
1641                                 port = &mxser_boards[i].ports[j];
1642                                 memset(&ms, 0, sizeof(ms));
1643
1644                                 if (!port->ioaddr)
1645                                         goto copy;
1646
1647                                 if (!port->port.tty || !port->port.tty->termios)
1648                                         ms.cflag = port->normal_termios.c_cflag;
1649                                 else
1650                                         ms.cflag = port->port.tty->termios->c_cflag;
1651
1652                                 status = inb(port->ioaddr + UART_MSR);
1653                                 if (status & UART_MSR_DCD)
1654                                         ms.dcd = 1;
1655                                 if (status & UART_MSR_DSR)
1656                                         ms.dsr = 1;
1657                                 if (status & UART_MSR_CTS)
1658                                         ms.cts = 1;
1659                         copy:
1660                                 if (copy_to_user(msu, &ms, sizeof(ms))) {
1661                                         unlock_kernel();
1662                                         return -EFAULT;
1663                                 }
1664                                 msu++;
1665                         }
1666                 unlock_kernel();
1667                 return 0;
1668         }
1669         case MOXA_ASPP_MON_EXT: {
1670                 struct mxser_mon_ext *me; /* it's 2k, stack unfriendly */
1671                 unsigned int cflag, iflag, p;
1672                 u8 opmode;
1673
1674                 me = kzalloc(sizeof(*me), GFP_KERNEL);
1675                 if (!me)
1676                         return -ENOMEM;
1677
1678                 lock_kernel();
1679                 for (i = 0, p = 0; i < MXSER_BOARDS; i++) {
1680                         for (j = 0; j < MXSER_PORTS_PER_BOARD; j++, p++) {
1681                                 if (p >= ARRAY_SIZE(me->rx_cnt)) {
1682                                         i = MXSER_BOARDS;
1683                                         break;
1684                                 }
1685                                 port = &mxser_boards[i].ports[j];
1686                                 if (!port->ioaddr)
1687                                         continue;
1688
1689                                 status = mxser_get_msr(port->ioaddr, 0, p);
1690
1691                                 if (status & UART_MSR_TERI)
1692                                         port->icount.rng++;
1693                                 if (status & UART_MSR_DDSR)
1694                                         port->icount.dsr++;
1695                                 if (status & UART_MSR_DDCD)
1696                                         port->icount.dcd++;
1697                                 if (status & UART_MSR_DCTS)
1698                                         port->icount.cts++;
1699
1700                                 port->mon_data.modem_status = status;
1701                                 me->rx_cnt[p] = port->mon_data.rxcnt;
1702                                 me->tx_cnt[p] = port->mon_data.txcnt;
1703                                 me->up_rxcnt[p] = port->mon_data.up_rxcnt;
1704                                 me->up_txcnt[p] = port->mon_data.up_txcnt;
1705                                 me->modem_status[p] =
1706                                         port->mon_data.modem_status;
1707                                 me->baudrate[p] = tty_get_baud_rate(port->port.tty);
1708
1709                                 if (!port->port.tty || !port->port.tty->termios) {
1710                                         cflag = port->normal_termios.c_cflag;
1711                                         iflag = port->normal_termios.c_iflag;
1712                                 } else {
1713                                         cflag = port->port.tty->termios->c_cflag;
1714                                         iflag = port->port.tty->termios->c_iflag;
1715                                 }
1716
1717                                 me->databits[p] = cflag & CSIZE;
1718                                 me->stopbits[p] = cflag & CSTOPB;
1719                                 me->parity[p] = cflag & (PARENB | PARODD |
1720                                                 CMSPAR);
1721
1722                                 if (cflag & CRTSCTS)
1723                                         me->flowctrl[p] |= 0x03;
1724
1725                                 if (iflag & (IXON | IXOFF))
1726                                         me->flowctrl[p] |= 0x0C;
1727
1728                                 if (port->type == PORT_16550A)
1729                                         me->fifo[p] = 1;
1730
1731                                 opmode = inb(port->opmode_ioaddr) >>
1732                                                 ((p % 4) * 2);
1733                                 opmode &= OP_MODE_MASK;
1734                                 me->iftype[p] = opmode;
1735                         }
1736                 }
1737                 unlock_kernel();
1738                 if (copy_to_user(argp, me, sizeof(*me)))
1739                         ret = -EFAULT;
1740                 kfree(me);
1741                 return ret;
1742         }
1743         default:
1744                 return -ENOIOCTLCMD;
1745         }
1746         return 0;
1747 }
1748
1749 static int mxser_cflags_changed(struct mxser_port *info, unsigned long arg,
1750                 struct async_icount *cprev)
1751 {
1752         struct async_icount cnow;
1753         unsigned long flags;
1754         int ret;
1755
1756         spin_lock_irqsave(&info->slock, flags);
1757         cnow = info->icount;    /* atomic copy */
1758         spin_unlock_irqrestore(&info->slock, flags);
1759
1760         ret =   ((arg & TIOCM_RNG) && (cnow.rng != cprev->rng)) ||
1761                 ((arg & TIOCM_DSR) && (cnow.dsr != cprev->dsr)) ||
1762                 ((arg & TIOCM_CD)  && (cnow.dcd != cprev->dcd)) ||
1763                 ((arg & TIOCM_CTS) && (cnow.cts != cprev->cts));
1764
1765         *cprev = cnow;
1766
1767         return ret;
1768 }
1769
1770 static int mxser_ioctl(struct tty_struct *tty, struct file *file,
1771                 unsigned int cmd, unsigned long arg)
1772 {
1773         struct mxser_port *info = tty->driver_data;
1774         struct async_icount cnow;
1775         unsigned long flags;
1776         void __user *argp = (void __user *)arg;
1777         int retval;
1778
1779         if (tty->index == MXSER_PORTS)
1780                 return mxser_ioctl_special(cmd, argp);
1781
1782         if (cmd == MOXA_SET_OP_MODE || cmd == MOXA_GET_OP_MODE) {
1783                 int p;
1784                 unsigned long opmode;
1785                 static unsigned char ModeMask[] = { 0xfc, 0xf3, 0xcf, 0x3f };
1786                 int shiftbit;
1787                 unsigned char val, mask;
1788
1789                 p = tty->index % 4;
1790                 if (cmd == MOXA_SET_OP_MODE) {
1791                         if (get_user(opmode, (int __user *) argp))
1792                                 return -EFAULT;
1793                         if (opmode != RS232_MODE &&
1794                                         opmode != RS485_2WIRE_MODE &&
1795                                         opmode != RS422_MODE &&
1796                                         opmode != RS485_4WIRE_MODE)
1797                                 return -EFAULT;
1798                         lock_kernel();
1799                         mask = ModeMask[p];
1800                         shiftbit = p * 2;
1801                         val = inb(info->opmode_ioaddr);
1802                         val &= mask;
1803                         val |= (opmode << shiftbit);
1804                         outb(val, info->opmode_ioaddr);
1805                         unlock_kernel();
1806                 } else {
1807                         lock_kernel();
1808                         shiftbit = p * 2;
1809                         opmode = inb(info->opmode_ioaddr) >> shiftbit;
1810                         opmode &= OP_MODE_MASK;
1811                         unlock_kernel();
1812                         if (put_user(opmode, (int __user *)argp))
1813                                 return -EFAULT;
1814                 }
1815                 return 0;
1816         }
1817
1818         if (cmd != TIOCGSERIAL && cmd != TIOCMIWAIT && cmd != TIOCGICOUNT &&
1819                         test_bit(TTY_IO_ERROR, &tty->flags))
1820                 return -EIO;
1821
1822         switch (cmd) {
1823         case TIOCGSERIAL:
1824                 lock_kernel();
1825                 retval = mxser_get_serial_info(info, argp);
1826                 unlock_kernel();
1827                 return retval;
1828         case TIOCSSERIAL:
1829                 lock_kernel();
1830                 retval = mxser_set_serial_info(info, argp);
1831                 unlock_kernel();
1832                 return retval;
1833         case TIOCSERGETLSR:     /* Get line status register */
1834                 return  mxser_get_lsr_info(info, argp);
1835                 /*
1836                  * Wait for any of the 4 modem inputs (DCD,RI,DSR,CTS) to change
1837                  * - mask passed in arg for lines of interest
1838                  *   (use |'ed TIOCM_RNG/DSR/CD/CTS for masking)
1839                  * Caller should use TIOCGICOUNT to see which one it was
1840                  */
1841         case TIOCMIWAIT:
1842                 spin_lock_irqsave(&info->slock, flags);
1843                 cnow = info->icount;    /* note the counters on entry */
1844                 spin_unlock_irqrestore(&info->slock, flags);
1845
1846                 return wait_event_interruptible(info->delta_msr_wait,
1847                                 mxser_cflags_changed(info, arg, &cnow));
1848         /*
1849          * Get counter of input serial line interrupts (DCD,RI,DSR,CTS)
1850          * Return: write counters to the user passed counter struct
1851          * NB: both 1->0 and 0->1 transitions are counted except for
1852          *     RI where only 0->1 is counted.
1853          */
1854         case TIOCGICOUNT: {
1855                 struct serial_icounter_struct icnt = { 0 };
1856                 spin_lock_irqsave(&info->slock, flags);
1857                 cnow = info->icount;
1858                 spin_unlock_irqrestore(&info->slock, flags);
1859
1860                 icnt.frame = cnow.frame;
1861                 icnt.brk = cnow.brk;
1862                 icnt.overrun = cnow.overrun;
1863                 icnt.buf_overrun = cnow.buf_overrun;
1864                 icnt.parity = cnow.parity;
1865                 icnt.rx = cnow.rx;
1866                 icnt.tx = cnow.tx;
1867                 icnt.cts = cnow.cts;
1868                 icnt.dsr = cnow.dsr;
1869                 icnt.rng = cnow.rng;
1870                 icnt.dcd = cnow.dcd;
1871
1872                 return copy_to_user(argp, &icnt, sizeof(icnt)) ? -EFAULT : 0;
1873         }
1874         case MOXA_HighSpeedOn:
1875                 return put_user(info->baud_base != 115200 ? 1 : 0, (int __user *)argp);
1876         case MOXA_SDS_RSTICOUNTER:
1877                 lock_kernel();
1878                 info->mon_data.rxcnt = 0;
1879                 info->mon_data.txcnt = 0;
1880                 unlock_kernel();
1881                 return 0;
1882
1883         case MOXA_ASPP_OQUEUE:{
1884                 int len, lsr;
1885
1886                 lock_kernel();
1887                 len = mxser_chars_in_buffer(tty);
1888                 lsr = inb(info->ioaddr + UART_LSR) & UART_LSR_TEMT;
1889                 len += (lsr ? 0 : 1);
1890                 unlock_kernel();
1891
1892                 return put_user(len, (int __user *)argp);
1893         }
1894         case MOXA_ASPP_MON: {
1895                 int mcr, status;
1896
1897                 lock_kernel();
1898                 status = mxser_get_msr(info->ioaddr, 1, tty->index);
1899                 mxser_check_modem_status(info, status);
1900
1901                 mcr = inb(info->ioaddr + UART_MCR);
1902                 if (mcr & MOXA_MUST_MCR_XON_FLAG)
1903                         info->mon_data.hold_reason &= ~NPPI_NOTIFY_XOFFHOLD;
1904                 else
1905                         info->mon_data.hold_reason |= NPPI_NOTIFY_XOFFHOLD;
1906
1907                 if (mcr & MOXA_MUST_MCR_TX_XON)
1908                         info->mon_data.hold_reason &= ~NPPI_NOTIFY_XOFFXENT;
1909                 else
1910                         info->mon_data.hold_reason |= NPPI_NOTIFY_XOFFXENT;
1911
1912                 if (info->port.tty->hw_stopped)
1913                         info->mon_data.hold_reason |= NPPI_NOTIFY_CTSHOLD;
1914                 else
1915                         info->mon_data.hold_reason &= ~NPPI_NOTIFY_CTSHOLD;
1916                 unlock_kernel();
1917                 if (copy_to_user(argp, &info->mon_data,
1918                                 sizeof(struct mxser_mon)))
1919                         return -EFAULT;
1920
1921                 return 0;
1922         }
1923         case MOXA_ASPP_LSTATUS: {
1924                 if (put_user(info->err_shadow, (unsigned char __user *)argp))
1925                         return -EFAULT;
1926
1927                 info->err_shadow = 0;
1928                 return 0;
1929         }
1930         case MOXA_SET_BAUD_METHOD: {
1931                 int method;
1932
1933                 if (get_user(method, (int __user *)argp))
1934                         return -EFAULT;
1935                 mxser_set_baud_method[tty->index] = method;
1936                 return put_user(method, (int __user *)argp);
1937         }
1938         default:
1939                 return -ENOIOCTLCMD;
1940         }
1941         return 0;
1942 }
1943
1944 static void mxser_stoprx(struct tty_struct *tty)
1945 {
1946         struct mxser_port *info = tty->driver_data;
1947
1948         info->ldisc_stop_rx = 1;
1949         if (I_IXOFF(tty)) {
1950                 if (info->board->chip_flag) {
1951                         info->IER &= ~MOXA_MUST_RECV_ISR;
1952                         outb(info->IER, info->ioaddr + UART_IER);
1953                 } else {
1954                         info->x_char = STOP_CHAR(tty);
1955                         outb(0, info->ioaddr + UART_IER);
1956                         info->IER |= UART_IER_THRI;
1957                         outb(info->IER, info->ioaddr + UART_IER);
1958                 }
1959         }
1960
1961         if (info->port.tty->termios->c_cflag & CRTSCTS) {
1962                 info->MCR &= ~UART_MCR_RTS;
1963                 outb(info->MCR, info->ioaddr + UART_MCR);
1964         }
1965 }
1966
1967 /*
1968  * This routine is called by the upper-layer tty layer to signal that
1969  * incoming characters should be throttled.
1970  */
1971 static void mxser_throttle(struct tty_struct *tty)
1972 {
1973         mxser_stoprx(tty);
1974 }
1975
1976 static void mxser_unthrottle(struct tty_struct *tty)
1977 {
1978         struct mxser_port *info = tty->driver_data;
1979
1980         /* startrx */
1981         info->ldisc_stop_rx = 0;
1982         if (I_IXOFF(tty)) {
1983                 if (info->x_char)
1984                         info->x_char = 0;
1985                 else {
1986                         if (info->board->chip_flag) {
1987                                 info->IER |= MOXA_MUST_RECV_ISR;
1988                                 outb(info->IER, info->ioaddr + UART_IER);
1989                         } else {
1990                                 info->x_char = START_CHAR(tty);
1991                                 outb(0, info->ioaddr + UART_IER);
1992                                 info->IER |= UART_IER_THRI;
1993                                 outb(info->IER, info->ioaddr + UART_IER);
1994                         }
1995                 }
1996         }
1997
1998         if (info->port.tty->termios->c_cflag & CRTSCTS) {
1999                 info->MCR |= UART_MCR_RTS;
2000                 outb(info->MCR, info->ioaddr + UART_MCR);
2001         }
2002 }
2003
2004 /*
2005  * mxser_stop() and mxser_start()
2006  *
2007  * This routines are called before setting or resetting tty->stopped.
2008  * They enable or disable transmitter interrupts, as necessary.
2009  */
2010 static void mxser_stop(struct tty_struct *tty)
2011 {
2012         struct mxser_port *info = tty->driver_data;
2013         unsigned long flags;
2014
2015         spin_lock_irqsave(&info->slock, flags);
2016         if (info->IER & UART_IER_THRI) {
2017                 info->IER &= ~UART_IER_THRI;
2018                 outb(info->IER, info->ioaddr + UART_IER);
2019         }
2020         spin_unlock_irqrestore(&info->slock, flags);
2021 }
2022
2023 static void mxser_start(struct tty_struct *tty)
2024 {
2025         struct mxser_port *info = tty->driver_data;
2026         unsigned long flags;
2027
2028         spin_lock_irqsave(&info->slock, flags);
2029         if (info->xmit_cnt && info->port.xmit_buf) {
2030                 outb(info->IER & ~UART_IER_THRI, info->ioaddr + UART_IER);
2031                 info->IER |= UART_IER_THRI;
2032                 outb(info->IER, info->ioaddr + UART_IER);
2033         }
2034         spin_unlock_irqrestore(&info->slock, flags);
2035 }
2036
2037 static void mxser_set_termios(struct tty_struct *tty, struct ktermios *old_termios)
2038 {
2039         struct mxser_port *info = tty->driver_data;
2040         unsigned long flags;
2041
2042         spin_lock_irqsave(&info->slock, flags);
2043         mxser_change_speed(info, old_termios);
2044         spin_unlock_irqrestore(&info->slock, flags);
2045
2046         if ((old_termios->c_cflag & CRTSCTS) &&
2047                         !(tty->termios->c_cflag & CRTSCTS)) {
2048                 tty->hw_stopped = 0;
2049                 mxser_start(tty);
2050         }
2051
2052         /* Handle sw stopped */
2053         if ((old_termios->c_iflag & IXON) &&
2054                         !(tty->termios->c_iflag & IXON)) {
2055                 tty->stopped = 0;
2056
2057                 if (info->board->chip_flag) {
2058                         spin_lock_irqsave(&info->slock, flags);
2059                         mxser_disable_must_rx_software_flow_control(
2060                                         info->ioaddr);
2061                         spin_unlock_irqrestore(&info->slock, flags);
2062                 }
2063
2064                 mxser_start(tty);
2065         }
2066 }
2067
2068 /*
2069  * mxser_wait_until_sent() --- wait until the transmitter is empty
2070  */
2071 static void mxser_wait_until_sent(struct tty_struct *tty, int timeout)
2072 {
2073         struct mxser_port *info = tty->driver_data;
2074         unsigned long orig_jiffies, char_time;
2075         int lsr;
2076
2077         if (info->type == PORT_UNKNOWN)
2078                 return;
2079
2080         if (info->xmit_fifo_size == 0)
2081                 return;         /* Just in case.... */
2082
2083         orig_jiffies = jiffies;
2084         /*
2085          * Set the check interval to be 1/5 of the estimated time to
2086          * send a single character, and make it at least 1.  The check
2087          * interval should also be less than the timeout.
2088          *
2089          * Note: we have to use pretty tight timings here to satisfy
2090          * the NIST-PCTS.
2091          */
2092         char_time = (info->timeout - HZ / 50) / info->xmit_fifo_size;
2093         char_time = char_time / 5;
2094         if (char_time == 0)
2095                 char_time = 1;
2096         if (timeout && timeout < char_time)
2097                 char_time = timeout;
2098         /*
2099          * If the transmitter hasn't cleared in twice the approximate
2100          * amount of time to send the entire FIFO, it probably won't
2101          * ever clear.  This assumes the UART isn't doing flow
2102          * control, which is currently the case.  Hence, if it ever
2103          * takes longer than info->timeout, this is probably due to a
2104          * UART bug of some kind.  So, we clamp the timeout parameter at
2105          * 2*info->timeout.
2106          */
2107         if (!timeout || timeout > 2 * info->timeout)
2108                 timeout = 2 * info->timeout;
2109 #ifdef SERIAL_DEBUG_RS_WAIT_UNTIL_SENT
2110         printk(KERN_DEBUG "In rs_wait_until_sent(%d) check=%lu...",
2111                 timeout, char_time);
2112         printk("jiff=%lu...", jiffies);
2113 #endif
2114         lock_kernel();
2115         while (!((lsr = inb(info->ioaddr + UART_LSR)) & UART_LSR_TEMT)) {
2116 #ifdef SERIAL_DEBUG_RS_WAIT_UNTIL_SENT
2117                 printk("lsr = %d (jiff=%lu)...", lsr, jiffies);
2118 #endif
2119                 schedule_timeout_interruptible(char_time);
2120                 if (signal_pending(current))
2121                         break;
2122                 if (timeout && time_after(jiffies, orig_jiffies + timeout))
2123                         break;
2124         }
2125         set_current_state(TASK_RUNNING);
2126         unlock_kernel();
2127
2128 #ifdef SERIAL_DEBUG_RS_WAIT_UNTIL_SENT
2129         printk("lsr = %d (jiff=%lu)...done\n", lsr, jiffies);
2130 #endif
2131 }
2132
2133 /*
2134  * This routine is called by tty_hangup() when a hangup is signaled.
2135  */
2136 static void mxser_hangup(struct tty_struct *tty)
2137 {
2138         struct mxser_port *info = tty->driver_data;
2139
2140         mxser_flush_buffer(tty);
2141         mxser_shutdown(info);
2142         info->port.count = 0;
2143         info->port.flags &= ~ASYNC_NORMAL_ACTIVE;
2144         info->port.tty = NULL;
2145         wake_up_interruptible(&info->port.open_wait);
2146 }
2147
2148 /*
2149  * mxser_rs_break() --- routine which turns the break handling on or off
2150  */
2151 static int mxser_rs_break(struct tty_struct *tty, int break_state)
2152 {
2153         struct mxser_port *info = tty->driver_data;
2154         unsigned long flags;
2155
2156         spin_lock_irqsave(&info->slock, flags);
2157         if (break_state == -1)
2158                 outb(inb(info->ioaddr + UART_LCR) | UART_LCR_SBC,
2159                         info->ioaddr + UART_LCR);
2160         else
2161                 outb(inb(info->ioaddr + UART_LCR) & ~UART_LCR_SBC,
2162                         info->ioaddr + UART_LCR);
2163         spin_unlock_irqrestore(&info->slock, flags);
2164         return 0;
2165 }
2166
2167 static void mxser_receive_chars(struct mxser_port *port, int *status)
2168 {
2169         struct tty_struct *tty = port->port.tty;
2170         unsigned char ch, gdl;
2171         int ignored = 0;
2172         int cnt = 0;
2173         int recv_room;
2174         int max = 256;
2175
2176         recv_room = tty->receive_room;
2177         if ((recv_room == 0) && (!port->ldisc_stop_rx))
2178                 mxser_stoprx(tty);
2179
2180         if (port->board->chip_flag != MOXA_OTHER_UART) {
2181
2182                 if (*status & UART_LSR_SPECIAL)
2183                         goto intr_old;
2184                 if (port->board->chip_flag == MOXA_MUST_MU860_HWID &&
2185                                 (*status & MOXA_MUST_LSR_RERR))
2186                         goto intr_old;
2187                 if (*status & MOXA_MUST_LSR_RERR)
2188                         goto intr_old;
2189
2190                 gdl = inb(port->ioaddr + MOXA_MUST_GDL_REGISTER);
2191
2192                 if (port->board->chip_flag == MOXA_MUST_MU150_HWID)
2193                         gdl &= MOXA_MUST_GDL_MASK;
2194                 if (gdl >= recv_room) {
2195                         if (!port->ldisc_stop_rx)
2196                                 mxser_stoprx(tty);
2197                 }
2198                 while (gdl--) {
2199                         ch = inb(port->ioaddr + UART_RX);
2200                         tty_insert_flip_char(tty, ch, 0);
2201                         cnt++;
2202                 }
2203                 goto end_intr;
2204         }
2205 intr_old:
2206
2207         do {
2208                 if (max-- < 0)
2209                         break;
2210
2211                 ch = inb(port->ioaddr + UART_RX);
2212                 if (port->board->chip_flag && (*status & UART_LSR_OE))
2213                         outb(0x23, port->ioaddr + UART_FCR);
2214                 *status &= port->read_status_mask;
2215                 if (*status & port->ignore_status_mask) {
2216                         if (++ignored > 100)
2217                                 break;
2218                 } else {
2219                         char flag = 0;
2220                         if (*status & UART_LSR_SPECIAL) {
2221                                 if (*status & UART_LSR_BI) {
2222                                         flag = TTY_BREAK;
2223                                         port->icount.brk++;
2224
2225                                         if (port->port.flags & ASYNC_SAK)
2226                                                 do_SAK(tty);
2227                                 } else if (*status & UART_LSR_PE) {
2228                                         flag = TTY_PARITY;
2229                                         port->icount.parity++;
2230                                 } else if (*status & UART_LSR_FE) {
2231                                         flag = TTY_FRAME;
2232                                         port->icount.frame++;
2233                                 } else if (*status & UART_LSR_OE) {
2234                                         flag = TTY_OVERRUN;
2235                                         port->icount.overrun++;
2236                                 } else
2237                                         flag = TTY_BREAK;
2238                         }
2239                         tty_insert_flip_char(tty, ch, flag);
2240                         cnt++;
2241                         if (cnt >= recv_room) {
2242                                 if (!port->ldisc_stop_rx)
2243                                         mxser_stoprx(tty);
2244                                 break;
2245                         }
2246
2247                 }
2248
2249                 if (port->board->chip_flag)
2250                         break;
2251
2252                 *status = inb(port->ioaddr + UART_LSR);
2253         } while (*status & UART_LSR_DR);
2254
2255 end_intr:
2256         mxvar_log.rxcnt[port->port.tty->index] += cnt;
2257         port->mon_data.rxcnt += cnt;
2258         port->mon_data.up_rxcnt += cnt;
2259
2260         /*
2261          * We are called from an interrupt context with &port->slock
2262          * being held. Drop it temporarily in order to prevent
2263          * recursive locking.
2264          */
2265         spin_unlock(&port->slock);
2266         tty_flip_buffer_push(tty);
2267         spin_lock(&port->slock);
2268 }
2269
2270 static void mxser_transmit_chars(struct mxser_port *port)
2271 {
2272         int count, cnt;
2273
2274         if (port->x_char) {
2275                 outb(port->x_char, port->ioaddr + UART_TX);
2276                 port->x_char = 0;
2277                 mxvar_log.txcnt[port->port.tty->index]++;
2278                 port->mon_data.txcnt++;
2279                 port->mon_data.up_txcnt++;
2280                 port->icount.tx++;
2281                 return;
2282         }
2283
2284         if (port->port.xmit_buf == NULL)
2285                 return;
2286
2287         if ((port->xmit_cnt <= 0) || port->port.tty->stopped ||
2288                         (port->port.tty->hw_stopped &&
2289                         (port->type != PORT_16550A) &&
2290                         (!port->board->chip_flag))) {
2291                 port->IER &= ~UART_IER_THRI;
2292                 outb(port->IER, port->ioaddr + UART_IER);
2293                 return;
2294         }
2295
2296         cnt = port->xmit_cnt;
2297         count = port->xmit_fifo_size;
2298         do {
2299                 outb(port->port.xmit_buf[port->xmit_tail++],
2300                         port->ioaddr + UART_TX);
2301                 port->xmit_tail = port->xmit_tail & (SERIAL_XMIT_SIZE - 1);
2302                 if (--port->xmit_cnt <= 0)
2303                         break;
2304         } while (--count > 0);
2305         mxvar_log.txcnt[port->port.tty->index] += (cnt - port->xmit_cnt);
2306
2307         port->mon_data.txcnt += (cnt - port->xmit_cnt);
2308         port->mon_data.up_txcnt += (cnt - port->xmit_cnt);
2309         port->icount.tx += (cnt - port->xmit_cnt);
2310
2311         if (port->xmit_cnt < WAKEUP_CHARS)
2312                 tty_wakeup(port->port.tty);
2313
2314         if (port->xmit_cnt <= 0) {
2315                 port->IER &= ~UART_IER_THRI;
2316                 outb(port->IER, port->ioaddr + UART_IER);
2317         }
2318 }
2319
2320 /*
2321  * This is the serial driver's generic interrupt routine
2322  */
2323 static irqreturn_t mxser_interrupt(int irq, void *dev_id)
2324 {
2325         int status, iir, i;
2326         struct mxser_board *brd = NULL;
2327         struct mxser_port *port;
2328         int max, irqbits, bits, msr;
2329         unsigned int int_cnt, pass_counter = 0;
2330         int handled = IRQ_NONE;
2331
2332         for (i = 0; i < MXSER_BOARDS; i++)
2333                 if (dev_id == &mxser_boards[i]) {
2334                         brd = dev_id;
2335                         break;
2336                 }
2337
2338         if (i == MXSER_BOARDS)
2339                 goto irq_stop;
2340         if (brd == NULL)
2341                 goto irq_stop;
2342         max = brd->info->nports;
2343         while (pass_counter++ < MXSER_ISR_PASS_LIMIT) {
2344                 irqbits = inb(brd->vector) & brd->vector_mask;
2345                 if (irqbits == brd->vector_mask)
2346                         break;
2347
2348                 handled = IRQ_HANDLED;
2349                 for (i = 0, bits = 1; i < max; i++, irqbits |= bits, bits <<= 1) {
2350                         if (irqbits == brd->vector_mask)
2351                                 break;
2352                         if (bits & irqbits)
2353                                 continue;
2354                         port = &brd->ports[i];
2355
2356                         int_cnt = 0;
2357                         spin_lock(&port->slock);
2358                         do {
2359                                 iir = inb(port->ioaddr + UART_IIR);
2360                                 if (iir & UART_IIR_NO_INT)
2361                                         break;
2362                                 iir &= MOXA_MUST_IIR_MASK;
2363                                 if (!port->port.tty ||
2364                                                 (port->port.flags & ASYNC_CLOSING) ||
2365                                                 !(port->port.flags &
2366                                                         ASYNC_INITIALIZED)) {
2367                                         status = inb(port->ioaddr + UART_LSR);
2368                                         outb(0x27, port->ioaddr + UART_FCR);
2369                                         inb(port->ioaddr + UART_MSR);
2370                                         break;
2371                                 }
2372
2373                                 status = inb(port->ioaddr + UART_LSR);
2374
2375                                 if (status & UART_LSR_PE)
2376                                         port->err_shadow |= NPPI_NOTIFY_PARITY;
2377                                 if (status & UART_LSR_FE)
2378                                         port->err_shadow |= NPPI_NOTIFY_FRAMING;
2379                                 if (status & UART_LSR_OE)
2380                                         port->err_shadow |=
2381                                                 NPPI_NOTIFY_HW_OVERRUN;
2382                                 if (status & UART_LSR_BI)
2383                                         port->err_shadow |= NPPI_NOTIFY_BREAK;
2384
2385                                 if (port->board->chip_flag) {
2386                                         if (iir == MOXA_MUST_IIR_GDA ||
2387                                             iir == MOXA_MUST_IIR_RDA ||
2388                                             iir == MOXA_MUST_IIR_RTO ||
2389                                             iir == MOXA_MUST_IIR_LSR)
2390                                                 mxser_receive_chars(port,
2391                                                                 &status);
2392
2393                                 } else {
2394                                         status &= port->read_status_mask;
2395                                         if (status & UART_LSR_DR)
2396                                                 mxser_receive_chars(port,
2397                                                                 &status);
2398                                 }
2399                                 msr = inb(port->ioaddr + UART_MSR);
2400                                 if (msr & UART_MSR_ANY_DELTA)
2401                                         mxser_check_modem_status(port, msr);
2402
2403                                 if (port->board->chip_flag) {
2404                                         if (iir == 0x02 && (status &
2405                                                                 UART_LSR_THRE))
2406                                                 mxser_transmit_chars(port);
2407                                 } else {
2408                                         if (status & UART_LSR_THRE)
2409                                                 mxser_transmit_chars(port);
2410                                 }
2411                         } while (int_cnt++ < MXSER_ISR_PASS_LIMIT);
2412                         spin_unlock(&port->slock);
2413                 }
2414         }
2415
2416 irq_stop:
2417         return handled;
2418 }
2419
2420 static const struct tty_operations mxser_ops = {
2421         .open = mxser_open,
2422         .close = mxser_close,
2423         .write = mxser_write,
2424         .put_char = mxser_put_char,
2425         .flush_chars = mxser_flush_chars,
2426         .write_room = mxser_write_room,
2427         .chars_in_buffer = mxser_chars_in_buffer,
2428         .flush_buffer = mxser_flush_buffer,
2429         .ioctl = mxser_ioctl,
2430         .throttle = mxser_throttle,
2431         .unthrottle = mxser_unthrottle,
2432         .set_termios = mxser_set_termios,
2433         .stop = mxser_stop,
2434         .start = mxser_start,
2435         .hangup = mxser_hangup,
2436         .break_ctl = mxser_rs_break,
2437         .wait_until_sent = mxser_wait_until_sent,
2438         .tiocmget = mxser_tiocmget,
2439         .tiocmset = mxser_tiocmset,
2440 };
2441
2442 /*
2443  * The MOXA Smartio/Industio serial driver boot-time initialization code!
2444  */
2445
2446 static void mxser_release_res(struct mxser_board *brd, struct pci_dev *pdev,
2447                 unsigned int irq)
2448 {
2449         if (irq)
2450                 free_irq(brd->irq, brd);
2451         if (pdev != NULL) {     /* PCI */
2452 #ifdef CONFIG_PCI
2453                 pci_release_region(pdev, 2);
2454                 pci_release_region(pdev, 3);
2455 #endif
2456         } else {
2457                 release_region(brd->ports[0].ioaddr, 8 * brd->info->nports);
2458                 release_region(brd->vector, 1);
2459         }
2460 }
2461
2462 static int __devinit mxser_initbrd(struct mxser_board *brd,
2463                 struct pci_dev *pdev)
2464 {
2465         struct mxser_port *info;
2466         unsigned int i;
2467         int retval;
2468
2469         printk(KERN_INFO "mxser: max. baud rate = %d bps\n",
2470                         brd->ports[0].max_baud);
2471
2472         for (i = 0; i < brd->info->nports; i++) {
2473                 info = &brd->ports[i];
2474                 tty_port_init(&info->port);
2475                 info->board = brd;
2476                 info->stop_rx = 0;
2477                 info->ldisc_stop_rx = 0;
2478
2479                 /* Enhance mode enabled here */
2480                 if (brd->chip_flag != MOXA_OTHER_UART)
2481                         mxser_enable_must_enchance_mode(info->ioaddr);
2482
2483                 info->port.flags = ASYNC_SHARE_IRQ;
2484                 info->type = brd->uart_type;
2485
2486                 process_txrx_fifo(info);
2487
2488                 info->custom_divisor = info->baud_base * 16;
2489                 info->port.close_delay = 5 * HZ / 10;
2490                 info->port.closing_wait = 30 * HZ;
2491                 info->normal_termios = mxvar_sdriver->init_termios;
2492                 init_waitqueue_head(&info->delta_msr_wait);
2493                 memset(&info->mon_data, 0, sizeof(struct mxser_mon));
2494                 info->err_shadow = 0;
2495                 spin_lock_init(&info->slock);
2496
2497                 /* before set INT ISR, disable all int */
2498                 outb(inb(info->ioaddr + UART_IER) & 0xf0,
2499                         info->ioaddr + UART_IER);
2500         }
2501
2502         retval = request_irq(brd->irq, mxser_interrupt, IRQF_SHARED, "mxser",
2503                         brd);
2504         if (retval) {
2505                 printk(KERN_ERR "Board %s: Request irq failed, IRQ (%d) may "
2506                         "conflict with another device.\n",
2507                         brd->info->name, brd->irq);
2508                 /* We hold resources, we need to release them. */
2509                 mxser_release_res(brd, pdev, 0);
2510         }
2511         return retval;
2512 }
2513
2514 static int __init mxser_get_ISA_conf(int cap, struct mxser_board *brd)
2515 {
2516         int id, i, bits;
2517         unsigned short regs[16], irq;
2518         unsigned char scratch, scratch2;
2519
2520         brd->chip_flag = MOXA_OTHER_UART;
2521
2522         id = mxser_read_register(cap, regs);
2523         switch (id) {
2524         case C168_ASIC_ID:
2525                 brd->info = &mxser_cards[0];
2526                 break;
2527         case C104_ASIC_ID:
2528                 brd->info = &mxser_cards[1];
2529                 break;
2530         case CI104J_ASIC_ID:
2531                 brd->info = &mxser_cards[2];
2532                 break;
2533         case C102_ASIC_ID:
2534                 brd->info = &mxser_cards[5];
2535                 break;
2536         case CI132_ASIC_ID:
2537                 brd->info = &mxser_cards[6];
2538                 break;
2539         case CI134_ASIC_ID:
2540                 brd->info = &mxser_cards[7];
2541                 break;
2542         default:
2543                 return 0;
2544         }
2545
2546         irq = 0;
2547         /* some ISA cards have 2 ports, but we want to see them as 4-port (why?)
2548            Flag-hack checks if configuration should be read as 2-port here. */
2549         if (brd->info->nports == 2 || (brd->info->flags & MXSER_HAS2)) {
2550                 irq = regs[9] & 0xF000;
2551                 irq = irq | (irq >> 4);
2552                 if (irq != (regs[9] & 0xFF00))
2553                         goto err_irqconflict;
2554         } else if (brd->info->nports == 4) {
2555                 irq = regs[9] & 0xF000;
2556                 irq = irq | (irq >> 4);
2557                 irq = irq | (irq >> 8);
2558                 if (irq != regs[9])
2559                         goto err_irqconflict;
2560         } else if (brd->info->nports == 8) {
2561                 irq = regs[9] & 0xF000;
2562                 irq = irq | (irq >> 4);
2563                 irq = irq | (irq >> 8);
2564                 if ((irq != regs[9]) || (irq != regs[10]))
2565                         goto err_irqconflict;
2566         }
2567
2568         if (!irq) {
2569                 printk(KERN_ERR "mxser: interrupt number unset\n");
2570                 return -EIO;
2571         }
2572         brd->irq = ((int)(irq & 0xF000) >> 12);
2573         for (i = 0; i < 8; i++)
2574                 brd->ports[i].ioaddr = (int) regs[i + 1] & 0xFFF8;
2575         if ((regs[12] & 0x80) == 0) {
2576                 printk(KERN_ERR "mxser: invalid interrupt vector\n");
2577                 return -EIO;
2578         }
2579         brd->vector = (int)regs[11];    /* interrupt vector */
2580         if (id == 1)
2581                 brd->vector_mask = 0x00FF;
2582         else
2583                 brd->vector_mask = 0x000F;
2584         for (i = 7, bits = 0x0100; i >= 0; i--, bits <<= 1) {
2585                 if (regs[12] & bits) {
2586                         brd->ports[i].baud_base = 921600;
2587                         brd->ports[i].max_baud = 921600;
2588                 } else {
2589                         brd->ports[i].baud_base = 115200;
2590                         brd->ports[i].max_baud = 115200;
2591                 }
2592         }
2593         scratch2 = inb(cap + UART_LCR) & (~UART_LCR_DLAB);
2594         outb(scratch2 | UART_LCR_DLAB, cap + UART_LCR);
2595         outb(0, cap + UART_EFR);        /* EFR is the same as FCR */
2596         outb(scratch2, cap + UART_LCR);
2597         outb(UART_FCR_ENABLE_FIFO, cap + UART_FCR);
2598         scratch = inb(cap + UART_IIR);
2599
2600         if (scratch & 0xC0)
2601                 brd->uart_type = PORT_16550A;
2602         else
2603                 brd->uart_type = PORT_16450;
2604         if (!request_region(brd->ports[0].ioaddr, 8 * brd->info->nports,
2605                         "mxser(IO)")) {
2606                 printk(KERN_ERR "mxser: can't request ports I/O region: "
2607                                 "0x%.8lx-0x%.8lx\n",
2608                                 brd->ports[0].ioaddr, brd->ports[0].ioaddr +
2609                                 8 * brd->info->nports - 1);
2610                 return -EIO;
2611         }
2612         if (!request_region(brd->vector, 1, "mxser(vector)")) {
2613                 release_region(brd->ports[0].ioaddr, 8 * brd->info->nports);
2614                 printk(KERN_ERR "mxser: can't request interrupt vector region: "
2615                                 "0x%.8lx-0x%.8lx\n",
2616                                 brd->ports[0].ioaddr, brd->ports[0].ioaddr +
2617                                 8 * brd->info->nports - 1);
2618                 return -EIO;
2619         }
2620         return brd->info->nports;
2621
2622 err_irqconflict:
2623         printk(KERN_ERR "mxser: invalid interrupt number\n");
2624         return -EIO;
2625 }
2626
2627 static int __devinit mxser_probe(struct pci_dev *pdev,
2628                 const struct pci_device_id *ent)
2629 {
2630 #ifdef CONFIG_PCI
2631         struct mxser_board *brd;
2632         unsigned int i, j;
2633         unsigned long ioaddress;
2634         int retval = -EINVAL;
2635
2636         for (i = 0; i < MXSER_BOARDS; i++)
2637                 if (mxser_boards[i].info == NULL)
2638                         break;
2639
2640         if (i >= MXSER_BOARDS) {
2641                 dev_err(&pdev->dev, "too many boards found (maximum %d), board "
2642                                 "not configured\n", MXSER_BOARDS);
2643                 goto err;
2644         }
2645
2646         brd = &mxser_boards[i];
2647         brd->idx = i * MXSER_PORTS_PER_BOARD;
2648         dev_info(&pdev->dev, "found MOXA %s board (BusNo=%d, DevNo=%d)\n",
2649                 mxser_cards[ent->driver_data].name,
2650                 pdev->bus->number, PCI_SLOT(pdev->devfn));
2651
2652         retval = pci_enable_device(pdev);
2653         if (retval) {
2654                 dev_err(&pdev->dev, "PCI enable failed\n");
2655                 goto err;
2656         }
2657
2658         /* io address */
2659         ioaddress = pci_resource_start(pdev, 2);
2660         retval = pci_request_region(pdev, 2, "mxser(IO)");
2661         if (retval)
2662                 goto err;
2663
2664         brd->info = &mxser_cards[ent->driver_data];
2665         for (i = 0; i < brd->info->nports; i++)
2666                 brd->ports[i].ioaddr = ioaddress + 8 * i;
2667
2668         /* vector */
2669         ioaddress = pci_resource_start(pdev, 3);
2670         retval = pci_request_region(pdev, 3, "mxser(vector)");
2671         if (retval)
2672                 goto err_relio;
2673         brd->vector = ioaddress;
2674
2675         /* irq */
2676         brd->irq = pdev->irq;
2677
2678         brd->chip_flag = CheckIsMoxaMust(brd->ports[0].ioaddr);
2679         brd->uart_type = PORT_16550A;
2680         brd->vector_mask = 0;
2681
2682         for (i = 0; i < brd->info->nports; i++) {
2683                 for (j = 0; j < UART_INFO_NUM; j++) {
2684                         if (Gpci_uart_info[j].type == brd->chip_flag) {
2685                                 brd->ports[i].max_baud =
2686                                         Gpci_uart_info[j].max_baud;
2687
2688                                 /* exception....CP-102 */
2689                                 if (brd->info->flags & MXSER_HIGHBAUD)
2690                                         brd->ports[i].max_baud = 921600;
2691                                 break;
2692                         }
2693                 }
2694         }
2695
2696         if (brd->chip_flag == MOXA_MUST_MU860_HWID) {
2697                 for (i = 0; i < brd->info->nports; i++) {
2698                         if (i < 4)
2699                                 brd->ports[i].opmode_ioaddr = ioaddress + 4;
2700                         else
2701                                 brd->ports[i].opmode_ioaddr = ioaddress + 0x0c;
2702                 }
2703                 outb(0, ioaddress + 4); /* default set to RS232 mode */
2704                 outb(0, ioaddress + 0x0c);      /* default set to RS232 mode */
2705         }
2706
2707         for (i = 0; i < brd->info->nports; i++) {
2708                 brd->vector_mask |= (1 << i);
2709                 brd->ports[i].baud_base = 921600;
2710         }
2711
2712         /* mxser_initbrd will hook ISR. */
2713         retval = mxser_initbrd(brd, pdev);
2714         if (retval)
2715                 goto err_null;
2716
2717         for (i = 0; i < brd->info->nports; i++)
2718                 tty_register_device(mxvar_sdriver, brd->idx + i, &pdev->dev);
2719
2720         pci_set_drvdata(pdev, brd);
2721
2722         return 0;
2723 err_relio:
2724         pci_release_region(pdev, 2);
2725 err_null:
2726         brd->info = NULL;
2727 err:
2728         return retval;
2729 #else
2730         return -ENODEV;
2731 #endif
2732 }
2733
2734 static void __devexit mxser_remove(struct pci_dev *pdev)
2735 {
2736         struct mxser_board *brd = pci_get_drvdata(pdev);
2737         unsigned int i;
2738
2739         for (i = 0; i < brd->info->nports; i++)
2740                 tty_unregister_device(mxvar_sdriver, brd->idx + i);
2741
2742         mxser_release_res(brd, pdev, 1);
2743         brd->info = NULL;
2744 }
2745
2746 static struct pci_driver mxser_driver = {
2747         .name = "mxser",
2748         .id_table = mxser_pcibrds,
2749         .probe = mxser_probe,
2750         .remove = __devexit_p(mxser_remove)
2751 };
2752
2753 static int __init mxser_module_init(void)
2754 {
2755         struct mxser_board *brd;
2756         unsigned int b, i, m;
2757         int retval;
2758
2759         mxvar_sdriver = alloc_tty_driver(MXSER_PORTS + 1);
2760         if (!mxvar_sdriver)
2761                 return -ENOMEM;
2762
2763         printk(KERN_INFO "MOXA Smartio/Industio family driver version %s\n",
2764                 MXSER_VERSION);
2765
2766         /* Initialize the tty_driver structure */
2767         mxvar_sdriver->owner = THIS_MODULE;
2768         mxvar_sdriver->magic = TTY_DRIVER_MAGIC;
2769         mxvar_sdriver->name = "ttyMI";
2770         mxvar_sdriver->major = ttymajor;
2771         mxvar_sdriver->minor_start = 0;
2772         mxvar_sdriver->num = MXSER_PORTS + 1;
2773         mxvar_sdriver->type = TTY_DRIVER_TYPE_SERIAL;
2774         mxvar_sdriver->subtype = SERIAL_TYPE_NORMAL;
2775         mxvar_sdriver->init_termios = tty_std_termios;
2776         mxvar_sdriver->init_termios.c_cflag = B9600|CS8|CREAD|HUPCL|CLOCAL;
2777         mxvar_sdriver->flags = TTY_DRIVER_REAL_RAW|TTY_DRIVER_DYNAMIC_DEV;
2778         tty_set_operations(mxvar_sdriver, &mxser_ops);
2779
2780         retval = tty_register_driver(mxvar_sdriver);
2781         if (retval) {
2782                 printk(KERN_ERR "Couldn't install MOXA Smartio/Industio family "
2783                                 "tty driver !\n");
2784                 goto err_put;
2785         }
2786
2787         /* Start finding ISA boards here */
2788         for (m = 0, b = 0; b < MXSER_BOARDS; b++) {
2789                 if (!ioaddr[b])
2790                         continue;
2791
2792                 brd = &mxser_boards[m];
2793                 retval = mxser_get_ISA_conf(!ioaddr[b], brd);
2794                 if (retval <= 0) {
2795                         brd->info = NULL;
2796                         continue;
2797                 }
2798
2799                 printk(KERN_INFO "mxser: found MOXA %s board (CAP=0x%lx)\n",
2800                                 brd->info->name, ioaddr[b]);
2801
2802                 /* mxser_initbrd will hook ISR. */
2803                 if (mxser_initbrd(brd, NULL) < 0) {
2804                         brd->info = NULL;
2805                         continue;
2806                 }
2807
2808                 brd->idx = m * MXSER_PORTS_PER_BOARD;
2809                 for (i = 0; i < brd->info->nports; i++)
2810                         tty_register_device(mxvar_sdriver, brd->idx + i, NULL);
2811
2812                 m++;
2813         }
2814
2815         retval = pci_register_driver(&mxser_driver);
2816         if (retval) {
2817                 printk(KERN_ERR "mxser: can't register pci driver\n");
2818                 if (!m) {
2819                         retval = -ENODEV;
2820                         goto err_unr;
2821                 } /* else: we have some ISA cards under control */
2822         }
2823
2824         return 0;
2825 err_unr:
2826         tty_unregister_driver(mxvar_sdriver);
2827 err_put:
2828         put_tty_driver(mxvar_sdriver);
2829         return retval;
2830 }
2831
2832 static void __exit mxser_module_exit(void)
2833 {
2834         unsigned int i, j;
2835
2836         pci_unregister_driver(&mxser_driver);
2837
2838         for (i = 0; i < MXSER_BOARDS; i++) /* ISA remains */
2839                 if (mxser_boards[i].info != NULL)
2840                         for (j = 0; j < mxser_boards[i].info->nports; j++)
2841                                 tty_unregister_device(mxvar_sdriver,
2842                                                 mxser_boards[i].idx + j);
2843         tty_unregister_driver(mxvar_sdriver);
2844         put_tty_driver(mxvar_sdriver);
2845
2846         for (i = 0; i < MXSER_BOARDS; i++)
2847                 if (mxser_boards[i].info != NULL)
2848                         mxser_release_res(&mxser_boards[i], NULL, 1);
2849 }
2850
2851 module_init(mxser_module_init);
2852 module_exit(mxser_module_exit);