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