SAFE public projects git trees. - safe/jmp/linux-2.6/blob - drivers/char/moxa.c

   1 /*****************************************************************************/
   2 /*
   3  *           moxa.c  -- MOXA Intellio family multiport serial driver.
   4  *
   5  *      Copyright (C) 1999-2000  Moxa Technologies (support@moxa.com).
   6  *      Copyright (c) 2007 Jiri Slaby <jirislaby@gmail.com>
   7  *
   8  *      This code is loosely based on the Linux serial driver, written by
   9  *      Linus Torvalds, Theodore T'so and 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
  17 /*
  18  *    MOXA Intellio Series Driver
  19  *      for             : LINUX
  20  *      date            : 1999/1/7
  21  *      version         : 5.1
  22  */
  23
  24 #include <linux/module.h>
  25 #include <linux/types.h>
  26 #include <linux/mm.h>
  27 #include <linux/ioport.h>
  28 #include <linux/errno.h>
  29 #include <linux/firmware.h>
  30 #include <linux/signal.h>
  31 #include <linux/sched.h>
  32 #include <linux/timer.h>
  33 #include <linux/interrupt.h>
  34 #include <linux/tty.h>
  35 #include <linux/tty_flip.h>
  36 #include <linux/major.h>
  37 #include <linux/string.h>
  38 #include <linux/fcntl.h>
  39 #include <linux/ptrace.h>
  40 #include <linux/serial.h>
  41 #include <linux/tty_driver.h>
  42 #include <linux/delay.h>
  43 #include <linux/pci.h>
  44 #include <linux/init.h>
  45 #include <linux/bitops.h>
  46
  47 #include <asm/system.h>
  48 #include <asm/io.h>
  49 #include <asm/uaccess.h>
  50
  51 #include "moxa.h"
  52
  53 #define MOXA_VERSION            "6.0k"
  54
  55 #define MOXA_FW_HDRLEN          32
  56
  57 #define MOXAMAJOR               172
  58
  59 #define MAX_BOARDS              4       /* Don't change this value */
  60 #define MAX_PORTS_PER_BOARD     32      /* Don't change this value */
  61 #define MAX_PORTS               (MAX_BOARDS * MAX_PORTS_PER_BOARD)
  62
  63 #define MOXA_IS_320(brd) ((brd)->boardType == MOXA_BOARD_C320_ISA || \
  64                 (brd)->boardType == MOXA_BOARD_C320_PCI)
  65
  66 /*
  67  *    Define the Moxa PCI vendor and device IDs.
  68  */
  69 #define MOXA_BUS_TYPE_ISA       0
  70 #define MOXA_BUS_TYPE_PCI       1
  71
  72 enum {
  73         MOXA_BOARD_C218_PCI = 1,
  74         MOXA_BOARD_C218_ISA,
  75         MOXA_BOARD_C320_PCI,
  76         MOXA_BOARD_C320_ISA,
  77         MOXA_BOARD_CP204J,
  78 };
  79
  80 static char *moxa_brdname[] =
  81 {
  82         "C218 Turbo PCI series",
  83         "C218 Turbo ISA series",
  84         "C320 Turbo PCI series",
  85         "C320 Turbo ISA series",
  86         "CP-204J series",
  87 };
  88
  89 #ifdef CONFIG_PCI
  90 static struct pci_device_id moxa_pcibrds[] = {
  91         { PCI_DEVICE(PCI_VENDOR_ID_MOXA, PCI_DEVICE_ID_MOXA_C218),
  92                 .driver_data = MOXA_BOARD_C218_PCI },
  93         { PCI_DEVICE(PCI_VENDOR_ID_MOXA, PCI_DEVICE_ID_MOXA_C320),
  94                 .driver_data = MOXA_BOARD_C320_PCI },
  95         { PCI_DEVICE(PCI_VENDOR_ID_MOXA, PCI_DEVICE_ID_MOXA_CP204J),
  96                 .driver_data = MOXA_BOARD_CP204J },
  97         { 0 }
  98 };
  99 MODULE_DEVICE_TABLE(pci, moxa_pcibrds);
 100 #endif /* CONFIG_PCI */
 101
 102 struct moxa_port;
 103
 104 static struct moxa_board_conf {
 105         int boardType;
 106         int numPorts;
 107         int busType;
 108
 109         unsigned int ready;
 110
 111         struct moxa_port *ports;
 112
 113         void __iomem *basemem;
 114         void __iomem *intNdx;
 115         void __iomem *intPend;
 116         void __iomem *intTable;
 117 } moxa_boards[MAX_BOARDS];
 118
 119 struct mxser_mstatus {
 120         tcflag_t cflag;
 121         int cts;
 122         int dsr;
 123         int ri;
 124         int dcd;
 125 };
 126
 127 struct moxaq_str {
 128         int inq;
 129         int outq;
 130 };
 131
 132 struct moxa_port {
 133         struct tty_port port;
 134         struct moxa_board_conf *board;
 135         void __iomem *tableAddr;
 136
 137         int type;
 138         int cflag;
 139         unsigned long statusflags;
 140
 141         u8 DCDState;            /* Protected by the port lock */
 142         u8 lineCtrl;
 143         u8 lowChkFlag;
 144 };
 145
 146 struct mon_str {
 147         int tick;
 148         int rxcnt[MAX_PORTS];
 149         int txcnt[MAX_PORTS];
 150 };
 151
 152 /* statusflags */
 153 #define TXSTOPPED       1
 154 #define LOWWAIT         2
 155 #define EMPTYWAIT       3
 156
 157 #define SERIAL_DO_RESTART
 158
 159 #define WAKEUP_CHARS            256
 160
 161 static int ttymajor = MOXAMAJOR;
 162 static struct mon_str moxaLog;
 163 static unsigned int moxaFuncTout = HZ / 2;
 164 static unsigned int moxaLowWaterChk;
 165 static DEFINE_MUTEX(moxa_openlock);
 166 static DEFINE_SPINLOCK(moxa_lock);
 167
 168 static unsigned long baseaddr[MAX_BOARDS];
 169 static unsigned int type[MAX_BOARDS];
 170 static unsigned int numports[MAX_BOARDS];
 171
 172 MODULE_AUTHOR("William Chen");
 173 MODULE_DESCRIPTION("MOXA Intellio Family Multiport Board Device Driver");
 174 MODULE_LICENSE("GPL");
 175
 176 module_param_array(type, uint, NULL, 0);
 177 MODULE_PARM_DESC(type, "card type: C218=2, C320=4");
 178 module_param_array(baseaddr, ulong, NULL, 0);
 179 MODULE_PARM_DESC(baseaddr, "base address");
 180 module_param_array(numports, uint, NULL, 0);
 181 MODULE_PARM_DESC(numports, "numports (ignored for C218)");
 182
 183 module_param(ttymajor, int, 0);
 184
 185 /*
 186  * static functions:
 187  */
 188 static int moxa_open(struct tty_struct *, struct file *);
 189 static void moxa_close(struct tty_struct *, struct file *);
 190 static int moxa_write(struct tty_struct *, const unsigned char *, int);
 191 static int moxa_write_room(struct tty_struct *);
 192 static void moxa_flush_buffer(struct tty_struct *);
 193 static int moxa_chars_in_buffer(struct tty_struct *);
 194 static void moxa_set_termios(struct tty_struct *, struct ktermios *);
 195 static void moxa_stop(struct tty_struct *);
 196 static void moxa_start(struct tty_struct *);
 197 static void moxa_hangup(struct tty_struct *);
 198 static int moxa_tiocmget(struct tty_struct *tty, struct file *file);
 199 static int moxa_tiocmset(struct tty_struct *tty, struct file *file,
 200                          unsigned int set, unsigned int clear);
 201 static void moxa_poll(unsigned long);
 202 static void moxa_set_tty_param(struct tty_struct *, struct ktermios *);
 203 static void moxa_shutdown(struct tty_port *);
 204 static int moxa_carrier_raised(struct tty_port *);
 205 static void moxa_dtr_rts(struct tty_port *, int);
 206 /*
 207  * moxa board interface functions:
 208  */
 209 static void MoxaPortEnable(struct moxa_port *);
 210 static void MoxaPortDisable(struct moxa_port *);
 211 static int MoxaPortSetTermio(struct moxa_port *, struct ktermios *, speed_t);
 212 static int MoxaPortGetLineOut(struct moxa_port *, int *, int *);
 213 static void MoxaPortLineCtrl(struct moxa_port *, int, int);
 214 static void MoxaPortFlowCtrl(struct moxa_port *, int, int, int, int, int);
 215 static int MoxaPortLineStatus(struct moxa_port *);
 216 static void MoxaPortFlushData(struct moxa_port *, int);
 217 static int MoxaPortWriteData(struct tty_struct *, const unsigned char *, int);
 218 static int MoxaPortReadData(struct moxa_port *);
 219 static int MoxaPortTxQueue(struct moxa_port *);
 220 static int MoxaPortRxQueue(struct moxa_port *);
 221 static int MoxaPortTxFree(struct moxa_port *);
 222 static void MoxaPortTxDisable(struct moxa_port *);
 223 static void MoxaPortTxEnable(struct moxa_port *);
 224 static int moxa_get_serial_info(struct moxa_port *, struct serial_struct __user *);
 225 static int moxa_set_serial_info(struct moxa_port *, struct serial_struct __user *);
 226 static void MoxaSetFifo(struct moxa_port *port, int enable);
 227
 228 /*
 229  * I/O functions
 230  */
 231
 232 static DEFINE_SPINLOCK(moxafunc_lock);
 233
 234 static void moxa_wait_finish(void __iomem *ofsAddr)
 235 {
 236         unsigned long end = jiffies + moxaFuncTout;
 237
 238         while (readw(ofsAddr + FuncCode) != 0)
 239                 if (time_after(jiffies, end))
 240                         return;
 241         if (readw(ofsAddr + FuncCode) != 0 && printk_ratelimit())
 242                 printk(KERN_WARNING "moxa function expired\n");
 243 }
 244
 245 static void moxafunc(void __iomem *ofsAddr, u16 cmd, u16 arg)
 246 {
 247         unsigned long flags;
 248         spin_lock_irqsave(&moxafunc_lock, flags);
 249         writew(arg, ofsAddr + FuncArg);
 250         writew(cmd, ofsAddr + FuncCode);
 251         moxa_wait_finish(ofsAddr);
 252         spin_unlock_irqrestore(&moxafunc_lock, flags);
 253 }
 254
 255 static int moxafuncret(void __iomem *ofsAddr, u16 cmd, u16 arg)
 256 {
 257         unsigned long flags;
 258         u16 ret;
 259         spin_lock_irqsave(&moxafunc_lock, flags);
 260         writew(arg, ofsAddr + FuncArg);
 261         writew(cmd, ofsAddr + FuncCode);
 262         moxa_wait_finish(ofsAddr);
 263         ret = readw(ofsAddr + FuncArg);
 264         spin_unlock_irqrestore(&moxafunc_lock, flags);
 265         return ret;
 266 }
 267
 268 static void moxa_low_water_check(void __iomem *ofsAddr)
 269 {
 270         u16 rptr, wptr, mask, len;
 271
 272         if (readb(ofsAddr + FlagStat) & Xoff_state) {
 273                 rptr = readw(ofsAddr + RXrptr);
 274                 wptr = readw(ofsAddr + RXwptr);
 275                 mask = readw(ofsAddr + RX_mask);
 276                 len = (wptr - rptr) & mask;
 277                 if (len <= Low_water)
 278                         moxafunc(ofsAddr, FC_SendXon, 0);
 279         }
 280 }
 281
 282 /*
 283  * TTY operations
 284  */
 285
 286 static int moxa_ioctl(struct tty_struct *tty, struct file *file,
 287                       unsigned int cmd, unsigned long arg)
 288 {
 289         struct moxa_port *ch = tty->driver_data;
 290         void __user *argp = (void __user *)arg;
 291         int status, ret = 0;
 292
 293         if (tty->index == MAX_PORTS) {
 294                 if (cmd != MOXA_GETDATACOUNT && cmd != MOXA_GET_IOQUEUE &&
 295                                 cmd != MOXA_GETMSTATUS)
 296                         return -EINVAL;
 297         } else if (!ch)
 298                 return -ENODEV;
 299
 300         switch (cmd) {
 301         case MOXA_GETDATACOUNT:
 302                 moxaLog.tick = jiffies;
 303                 if (copy_to_user(argp, &moxaLog, sizeof(moxaLog)))
 304                         ret = -EFAULT;
 305                 break;
 306         case MOXA_FLUSH_QUEUE:
 307                 MoxaPortFlushData(ch, arg);
 308                 break;
 309         case MOXA_GET_IOQUEUE: {
 310                 struct moxaq_str __user *argm = argp;
 311                 struct moxaq_str tmp;
 312                 struct moxa_port *p;
 313                 unsigned int i, j;
 314
 315                 for (i = 0; i < MAX_BOARDS; i++) {
 316                         p = moxa_boards[i].ports;
 317                         for (j = 0; j < MAX_PORTS_PER_BOARD; j++, p++, argm++) {
 318                                 memset(&tmp, 0, sizeof(tmp));
 319                                 spin_lock_bh(&moxa_lock);
 320                                 if (moxa_boards[i].ready) {
 321                                         tmp.inq = MoxaPortRxQueue(p);
 322                                         tmp.outq = MoxaPortTxQueue(p);
 323                                 }
 324                                 spin_unlock_bh(&moxa_lock);
 325                                 if (copy_to_user(argm, &tmp, sizeof(tmp)))
 326                                         return -EFAULT;
 327                         }
 328                 }
 329                 break;
 330         } case MOXA_GET_OQUEUE:
 331                 status = MoxaPortTxQueue(ch);
 332                 ret = put_user(status, (unsigned long __user *)argp);
 333                 break;
 334         case MOXA_GET_IQUEUE:
 335                 status = MoxaPortRxQueue(ch);
 336                 ret = put_user(status, (unsigned long __user *)argp);
 337                 break;
 338         case MOXA_GETMSTATUS: {
 339                 struct mxser_mstatus __user *argm = argp;
 340                 struct mxser_mstatus tmp;
 341                 struct moxa_port *p;
 342                 unsigned int i, j;
 343
 344                 for (i = 0; i < MAX_BOARDS; i++) {
 345                         p = moxa_boards[i].ports;
 346                         for (j = 0; j < MAX_PORTS_PER_BOARD; j++, p++, argm++) {
 347                                 struct tty_struct *ttyp;
 348                                 memset(&tmp, 0, sizeof(tmp));
 349                                 spin_lock_bh(&moxa_lock);
 350                                 if (!moxa_boards[i].ready) {
 351                                         spin_unlock_bh(&moxa_lock);
 352                                         goto copy;
 353                                 }
 354
 355                                 status = MoxaPortLineStatus(p);
 356                                 spin_unlock_bh(&moxa_lock);
 357
 358                                 if (status & 1)
 359                                         tmp.cts = 1;
 360                                 if (status & 2)
 361                                         tmp.dsr = 1;
 362                                 if (status & 4)
 363                                         tmp.dcd = 1;
 364
 365                                 ttyp = tty_port_tty_get(&p->port);
 366                                 if (!ttyp || !ttyp->termios)
 367                                         tmp.cflag = p->cflag;
 368                                 else
 369                                         tmp.cflag = ttyp->termios->c_cflag;
 370                                 tty_kref_put(tty);
 371 copy:
 372                                 if (copy_to_user(argm, &tmp, sizeof(tmp)))
 373                                         return -EFAULT;
 374                         }
 375                 }
 376                 break;
 377         }
 378         case TIOCGSERIAL:
 379                 mutex_lock(&ch->port.mutex);
 380                 ret = moxa_get_serial_info(ch, argp);
 381                 mutex_unlock(&ch->port.mutex);
 382                 break;
 383         case TIOCSSERIAL:
 384                 mutex_lock(&ch->port.mutex);
 385                 ret = moxa_set_serial_info(ch, argp);
 386                 mutex_unlock(&ch->port.mutex);
 387                 break;
 388         default:
 389                 ret = -ENOIOCTLCMD;
 390         }
 391         return ret;
 392 }
 393
 394 static int moxa_break_ctl(struct tty_struct *tty, int state)
 395 {
 396         struct moxa_port *port = tty->driver_data;
 397
 398         moxafunc(port->tableAddr, state ? FC_SendBreak : FC_StopBreak,
 399                         Magic_code);
 400         return 0;
 401 }
 402
 403 static const struct tty_operations moxa_ops = {
 404         .open = moxa_open,
 405         .close = moxa_close,
 406         .write = moxa_write,
 407         .write_room = moxa_write_room,
 408         .flush_buffer = moxa_flush_buffer,
 409         .chars_in_buffer = moxa_chars_in_buffer,
 410         .ioctl = moxa_ioctl,
 411         .set_termios = moxa_set_termios,
 412         .stop = moxa_stop,
 413         .start = moxa_start,
 414         .hangup = moxa_hangup,
 415         .break_ctl = moxa_break_ctl,
 416         .tiocmget = moxa_tiocmget,
 417         .tiocmset = moxa_tiocmset,
 418 };
 419
 420 static const struct tty_port_operations moxa_port_ops = {
 421         .carrier_raised = moxa_carrier_raised,
 422         .dtr_rts = moxa_dtr_rts,
 423         .shutdown = moxa_shutdown,
 424 };
 425
 426 static struct tty_driver *moxaDriver;
 427 static DEFINE_TIMER(moxaTimer, moxa_poll, 0, 0);
 428
 429 /*
 430  * HW init
 431  */
 432
 433 static int moxa_check_fw_model(struct moxa_board_conf *brd, u8 model)
 434 {
 435         switch (brd->boardType) {
 436         case MOXA_BOARD_C218_ISA:
 437         case MOXA_BOARD_C218_PCI:
 438                 if (model != 1)
 439                         goto err;
 440                 break;
 441         case MOXA_BOARD_CP204J:
 442                 if (model != 3)
 443                         goto err;
 444                 break;
 445         default:
 446                 if (model != 2)
 447                         goto err;
 448                 break;
 449         }
 450         return 0;
 451 err:
 452         return -EINVAL;
 453 }
 454
 455 static int moxa_check_fw(const void *ptr)
 456 {
 457         const __le16 *lptr = ptr;
 458
 459         if (*lptr != cpu_to_le16(0x7980))
 460                 return -EINVAL;
 461
 462         return 0;
 463 }
 464
 465 static int moxa_load_bios(struct moxa_board_conf *brd, const u8 *buf,
 466                 size_t len)
 467 {
 468         void __iomem *baseAddr = brd->basemem;
 469         u16 tmp;
 470
 471         writeb(HW_reset, baseAddr + Control_reg);       /* reset */
 472         msleep(10);
 473         memset_io(baseAddr, 0, 4096);
 474         memcpy_toio(baseAddr, buf, len);        /* download BIOS */
 475         writeb(0, baseAddr + Control_reg);      /* restart */
 476
 477         msleep(2000);
 478
 479         switch (brd->boardType) {
 480         case MOXA_BOARD_C218_ISA:
 481         case MOXA_BOARD_C218_PCI:
 482                 tmp = readw(baseAddr + C218_key);
 483                 if (tmp != C218_KeyCode)
 484                         goto err;
 485                 break;
 486         case MOXA_BOARD_CP204J:
 487                 tmp = readw(baseAddr + C218_key);
 488                 if (tmp != CP204J_KeyCode)
 489                         goto err;
 490                 break;
 491         default:
 492                 tmp = readw(baseAddr + C320_key);
 493                 if (tmp != C320_KeyCode)
 494                         goto err;
 495                 tmp = readw(baseAddr + C320_status);
 496                 if (tmp != STS_init) {
 497                         printk(KERN_ERR "MOXA: bios upload failed -- CPU/Basic "
 498                                         "module not found\n");
 499                         return -EIO;
 500                 }
 501                 break;
 502         }
 503
 504         return 0;
 505 err:
 506         printk(KERN_ERR "MOXA: bios upload failed -- board not found\n");
 507         return -EIO;
 508 }
 509
 510 static int moxa_load_320b(struct moxa_board_conf *brd, const u8 *ptr,
 511                 size_t len)
 512 {
 513         void __iomem *baseAddr = brd->basemem;
 514
 515         if (len < 7168) {
 516                 printk(KERN_ERR "MOXA: invalid 320 bios -- too short\n");
 517                 return -EINVAL;
 518         }
 519
 520         writew(len - 7168 - 2, baseAddr + C320bapi_len);
 521         writeb(1, baseAddr + Control_reg);      /* Select Page 1 */
 522         memcpy_toio(baseAddr + DynPage_addr, ptr, 7168);
 523         writeb(2, baseAddr + Control_reg);      /* Select Page 2 */
 524         memcpy_toio(baseAddr + DynPage_addr, ptr + 7168, len - 7168);
 525
 526         return 0;
 527 }
 528
 529 static int moxa_real_load_code(struct moxa_board_conf *brd, const void *ptr,
 530                 size_t len)
 531 {
 532         void __iomem *baseAddr = brd->basemem;
 533         const __le16 *uptr = ptr;
 534         size_t wlen, len2, j;
 535         unsigned long key, loadbuf, loadlen, checksum, checksum_ok;
 536         unsigned int i, retry;
 537         u16 usum, keycode;
 538
 539         keycode = (brd->boardType == MOXA_BOARD_CP204J) ? CP204J_KeyCode :
 540                                 C218_KeyCode;
 541
 542         switch (brd->boardType) {
 543         case MOXA_BOARD_CP204J:
 544         case MOXA_BOARD_C218_ISA:
 545         case MOXA_BOARD_C218_PCI:
 546                 key = C218_key;
 547                 loadbuf = C218_LoadBuf;
 548                 loadlen = C218DLoad_len;
 549                 checksum = C218check_sum;
 550                 checksum_ok = C218chksum_ok;
 551                 break;
 552         default:
 553                 key = C320_key;
 554                 keycode = C320_KeyCode;
 555                 loadbuf = C320_LoadBuf;
 556                 loadlen = C320DLoad_len;
 557                 checksum = C320check_sum;
 558                 checksum_ok = C320chksum_ok;
 559                 break;
 560         }
 561
 562         usum = 0;
 563         wlen = len >> 1;
 564         for (i = 0; i < wlen; i++)
 565                 usum += le16_to_cpu(uptr[i]);
 566         retry = 0;
 567         do {
 568                 wlen = len >> 1;
 569                 j = 0;
 570                 while (wlen) {
 571                         len2 = (wlen > 2048) ? 2048 : wlen;
 572                         wlen -= len2;
 573                         memcpy_toio(baseAddr + loadbuf, ptr + j, len2 << 1);
 574                         j += len2 << 1;
 575
 576                         writew(len2, baseAddr + loadlen);
 577                         writew(0, baseAddr + key);
 578                         for (i = 0; i < 100; i++) {
 579                                 if (readw(baseAddr + key) == keycode)
 580                                         break;
 581                                 msleep(10);
 582                         }
 583                         if (readw(baseAddr + key) != keycode)
 584                                 return -EIO;
 585                 }
 586                 writew(0, baseAddr + loadlen);
 587                 writew(usum, baseAddr + checksum);
 588                 writew(0, baseAddr + key);
 589                 for (i = 0; i < 100; i++) {
 590                         if (readw(baseAddr + key) == keycode)
 591                                 break;
 592                         msleep(10);
 593                 }
 594                 retry++;
 595         } while ((readb(baseAddr + checksum_ok) != 1) && (retry < 3));
 596         if (readb(baseAddr + checksum_ok) != 1)
 597                 return -EIO;
 598
 599         writew(0, baseAddr + key);
 600         for (i = 0; i < 600; i++) {
 601                 if (readw(baseAddr + Magic_no) == Magic_code)
 602                         break;
 603                 msleep(10);
 604         }
 605         if (readw(baseAddr + Magic_no) != Magic_code)
 606                 return -EIO;
 607
 608         if (MOXA_IS_320(brd)) {
 609                 if (brd->busType == MOXA_BUS_TYPE_PCI) {        /* ASIC board */
 610                         writew(0x3800, baseAddr + TMS320_PORT1);
 611                         writew(0x3900, baseAddr + TMS320_PORT2);
 612                         writew(28499, baseAddr + TMS320_CLOCK);
 613                 } else {
 614                         writew(0x3200, baseAddr + TMS320_PORT1);
 615                         writew(0x3400, baseAddr + TMS320_PORT2);
 616                         writew(19999, baseAddr + TMS320_CLOCK);
 617                 }
 618         }
 619         writew(1, baseAddr + Disable_IRQ);
 620         writew(0, baseAddr + Magic_no);
 621         for (i = 0; i < 500; i++) {
 622                 if (readw(baseAddr + Magic_no) == Magic_code)
 623                         break;
 624                 msleep(10);
 625         }
 626         if (readw(baseAddr + Magic_no) != Magic_code)
 627                 return -EIO;
 628
 629         if (MOXA_IS_320(brd)) {
 630                 j = readw(baseAddr + Module_cnt);
 631                 if (j <= 0)
 632                         return -EIO;
 633                 brd->numPorts = j * 8;
 634                 writew(j, baseAddr + Module_no);
 635                 writew(0, baseAddr + Magic_no);
 636                 for (i = 0; i < 600; i++) {
 637                         if (readw(baseAddr + Magic_no) == Magic_code)
 638                                 break;
 639                         msleep(10);
 640                 }
 641                 if (readw(baseAddr + Magic_no) != Magic_code)
 642                         return -EIO;
 643         }
 644         brd->intNdx = baseAddr + IRQindex;
 645         brd->intPend = baseAddr + IRQpending;
 646         brd->intTable = baseAddr + IRQtable;
 647
 648         return 0;
 649 }
 650
 651 static int moxa_load_code(struct moxa_board_conf *brd, const void *ptr,
 652                 size_t len)
 653 {
 654         void __iomem *ofsAddr, *baseAddr = brd->basemem;
 655         struct moxa_port *port;
 656         int retval, i;
 657
 658         if (len % 2) {
 659                 printk(KERN_ERR "MOXA: bios length is not even\n");
 660                 return -EINVAL;
 661         }
 662
 663         retval = moxa_real_load_code(brd, ptr, len); /* may change numPorts */
 664         if (retval)
 665                 return retval;
 666
 667         switch (brd->boardType) {
 668         case MOXA_BOARD_C218_ISA:
 669         case MOXA_BOARD_C218_PCI:
 670         case MOXA_BOARD_CP204J:
 671                 port = brd->ports;
 672                 for (i = 0; i < brd->numPorts; i++, port++) {
 673                         port->board = brd;
 674                         port->DCDState = 0;
 675                         port->tableAddr = baseAddr + Extern_table +
 676                                         Extern_size * i;
 677                         ofsAddr = port->tableAddr;
 678                         writew(C218rx_mask, ofsAddr + RX_mask);
 679                         writew(C218tx_mask, ofsAddr + TX_mask);
 680                         writew(C218rx_spage + i * C218buf_pageno, ofsAddr + Page_rxb);
 681                         writew(readw(ofsAddr + Page_rxb) + C218rx_pageno, ofsAddr + EndPage_rxb);
 682
 683                         writew(C218tx_spage + i * C218buf_pageno, ofsAddr + Page_txb);
 684                         writew(readw(ofsAddr + Page_txb) + C218tx_pageno, ofsAddr + EndPage_txb);
 685
 686                 }
 687                 break;
 688         default:
 689                 port = brd->ports;
 690                 for (i = 0; i < brd->numPorts; i++, port++) {
 691                         port->board = brd;
 692                         port->DCDState = 0;
 693                         port->tableAddr = baseAddr + Extern_table +
 694                                         Extern_size * i;
 695                         ofsAddr = port->tableAddr;
 696                         switch (brd->numPorts) {
 697                         case 8:
 698                                 writew(C320p8rx_mask, ofsAddr + RX_mask);
 699                                 writew(C320p8tx_mask, ofsAddr + TX_mask);
 700                                 writew(C320p8rx_spage + i * C320p8buf_pgno, ofsAddr + Page_rxb);
 701                                 writew(readw(ofsAddr + Page_rxb) + C320p8rx_pgno, ofsAddr + EndPage_rxb);
 702                                 writew(C320p8tx_spage + i * C320p8buf_pgno, ofsAddr + Page_txb);
 703                                 writew(readw(ofsAddr + Page_txb) + C320p8tx_pgno, ofsAddr + EndPage_txb);
 704
 705                                 break;
 706                         case 16:
 707                                 writew(C320p16rx_mask, ofsAddr + RX_mask);
 708                                 writew(C320p16tx_mask, ofsAddr + TX_mask);
 709                                 writew(C320p16rx_spage + i * C320p16buf_pgno, ofsAddr + Page_rxb);
 710                                 writew(readw(ofsAddr + Page_rxb) + C320p16rx_pgno, ofsAddr + EndPage_rxb);
 711                                 writew(C320p16tx_spage + i * C320p16buf_pgno, ofsAddr + Page_txb);
 712                                 writew(readw(ofsAddr + Page_txb) + C320p16tx_pgno, ofsAddr + EndPage_txb);
 713                                 break;
 714
 715                         case 24:
 716                                 writew(C320p24rx_mask, ofsAddr + RX_mask);
 717                                 writew(C320p24tx_mask, ofsAddr + TX_mask);
 718                                 writew(C320p24rx_spage + i * C320p24buf_pgno, ofsAddr + Page_rxb);
 719                                 writew(readw(ofsAddr + Page_rxb) + C320p24rx_pgno, ofsAddr + EndPage_rxb);
 720                                 writew(C320p24tx_spage + i * C320p24buf_pgno, ofsAddr + Page_txb);
 721                                 writew(readw(ofsAddr + Page_txb), ofsAddr + EndPage_txb);
 722                                 break;
 723                         case 32:
 724                                 writew(C320p32rx_mask, ofsAddr + RX_mask);
 725                                 writew(C320p32tx_mask, ofsAddr + TX_mask);
 726                                 writew(C320p32tx_ofs, ofsAddr + Ofs_txb);
 727                                 writew(C320p32rx_spage + i * C320p32buf_pgno, ofsAddr + Page_rxb);
 728                                 writew(readb(ofsAddr + Page_rxb), ofsAddr + EndPage_rxb);
 729                                 writew(C320p32tx_spage + i * C320p32buf_pgno, ofsAddr + Page_txb);
 730                                 writew(readw(ofsAddr + Page_txb), ofsAddr + EndPage_txb);
 731                                 break;
 732                         }
 733                 }
 734                 break;
 735         }
 736         return 0;
 737 }
 738
 739 static int moxa_load_fw(struct moxa_board_conf *brd, const struct firmware *fw)
 740 {
 741         const void *ptr = fw->data;
 742         char rsn[64];
 743         u16 lens[5];
 744         size_t len;
 745         unsigned int a, lenp, lencnt;
 746         int ret = -EINVAL;
 747         struct {
 748                 __le32 magic;   /* 0x34303430 */
 749                 u8 reserved1[2];
 750                 u8 type;        /* UNIX = 3 */
 751                 u8 model;       /* C218T=1, C320T=2, CP204=3 */
 752                 u8 reserved2[8];
 753                 __le16 len[5];
 754         } const *hdr = ptr;
 755
 756         BUILD_BUG_ON(ARRAY_SIZE(hdr->len) != ARRAY_SIZE(lens));
 757
 758         if (fw->size < MOXA_FW_HDRLEN) {
 759                 strcpy(rsn, "too short (even header won't fit)");
 760                 goto err;
 761         }
 762         if (hdr->magic != cpu_to_le32(0x30343034)) {
 763                 sprintf(rsn, "bad magic: %.8x", le32_to_cpu(hdr->magic));
 764                 goto err;
 765         }
 766         if (hdr->type != 3) {
 767                 sprintf(rsn, "not for linux, type is %u", hdr->type);
 768                 goto err;
 769         }
 770         if (moxa_check_fw_model(brd, hdr->model)) {
 771                 sprintf(rsn, "not for this card, model is %u", hdr->model);
 772                 goto err;
 773         }
 774
 775         len = MOXA_FW_HDRLEN;
 776         lencnt = hdr->model == 2 ? 5 : 3;
 777         for (a = 0; a < ARRAY_SIZE(lens); a++) {
 778                 lens[a] = le16_to_cpu(hdr->len[a]);
 779                 if (lens[a] && len + lens[a] <= fw->size &&
 780                                 moxa_check_fw(&fw->data[len]))
 781                         printk(KERN_WARNING "MOXA firmware: unexpected input "
 782                                 "at offset %u, but going on\n", (u32)len);
 783                 if (!lens[a] && a < lencnt) {
 784                         sprintf(rsn, "too few entries in fw file");
 785                         goto err;
 786                 }
 787                 len += lens[a];
 788         }
 789
 790         if (len != fw->size) {
 791                 sprintf(rsn, "bad length: %u (should be %u)", (u32)fw->size,
 792                                 (u32)len);
 793                 goto err;
 794         }
 795
 796         ptr += MOXA_FW_HDRLEN;
 797         lenp = 0; /* bios */
 798
 799         strcpy(rsn, "read above");
 800
 801         ret = moxa_load_bios(brd, ptr, lens[lenp]);
 802         if (ret)
 803                 goto err;
 804
 805         /* we skip the tty section (lens[1]), since we don't need it */
 806         ptr += lens[lenp] + lens[lenp + 1];
 807         lenp += 2; /* comm */
 808
 809         if (hdr->model == 2) {
 810                 ret = moxa_load_320b(brd, ptr, lens[lenp]);
 811                 if (ret)
 812                         goto err;
 813                 /* skip another tty */
 814                 ptr += lens[lenp] + lens[lenp + 1];
 815                 lenp += 2;
 816         }
 817
 818         ret = moxa_load_code(brd, ptr, lens[lenp]);
 819         if (ret)
 820                 goto err;
 821
 822         return 0;
 823 err:
 824         printk(KERN_ERR "firmware failed to load, reason: %s\n", rsn);
 825         return ret;
 826 }
 827
 828 static int moxa_init_board(struct moxa_board_conf *brd, struct device *dev)
 829 {
 830         const struct firmware *fw;
 831         const char *file;
 832         struct moxa_port *p;
 833         unsigned int i;
 834         int ret;
 835
 836         brd->ports = kcalloc(MAX_PORTS_PER_BOARD, sizeof(*brd->ports),
 837                         GFP_KERNEL);
 838         if (brd->ports == NULL) {
 839                 printk(KERN_ERR "cannot allocate memory for ports\n");
 840                 ret = -ENOMEM;
 841                 goto err;
 842         }
 843
 844         for (i = 0, p = brd->ports; i < MAX_PORTS_PER_BOARD; i++, p++) {
 845                 tty_port_init(&p->port);
 846                 p->port.ops = &moxa_port_ops;
 847                 p->type = PORT_16550A;
 848                 p->cflag = B9600 | CS8 | CREAD | CLOCAL | HUPCL;
 849         }
 850
 851         switch (brd->boardType) {
 852         case MOXA_BOARD_C218_ISA:
 853         case MOXA_BOARD_C218_PCI:
 854                 file = "c218tunx.cod";
 855                 break;
 856         case MOXA_BOARD_CP204J:
 857                 file = "cp204unx.cod";
 858                 break;
 859         default:
 860                 file = "c320tunx.cod";
 861                 break;
 862         }
 863
 864         ret = request_firmware(&fw, file, dev);
 865         if (ret) {
 866                 printk(KERN_ERR "MOXA: request_firmware failed. Make sure "
 867                                 "you've placed '%s' file into your firmware "
 868                                 "loader directory (e.g. /lib/firmware)\n",
 869                                 file);
 870                 goto err_free;
 871         }
 872
 873         ret = moxa_load_fw(brd, fw);
 874
 875         release_firmware(fw);
 876
 877         if (ret)
 878                 goto err_free;
 879
 880         spin_lock_bh(&moxa_lock);
 881         brd->ready = 1;
 882         if (!timer_pending(&moxaTimer))
 883                 mod_timer(&moxaTimer, jiffies + HZ / 50);
 884         spin_unlock_bh(&moxa_lock);
 885
 886         return 0;
 887 err_free:
 888         kfree(brd->ports);
 889 err:
 890         return ret;
 891 }
 892
 893 static void moxa_board_deinit(struct moxa_board_conf *brd)
 894 {
 895         unsigned int a, opened;
 896
 897         mutex_lock(&moxa_openlock);
 898         spin_lock_bh(&moxa_lock);
 899         brd->ready = 0;
 900         spin_unlock_bh(&moxa_lock);
 901
 902         /* pci hot-un-plug support */
 903         for (a = 0; a < brd->numPorts; a++)
 904                 if (brd->ports[a].port.flags & ASYNC_INITIALIZED) {
 905                         struct tty_struct *tty = tty_port_tty_get(
 906                                                 &brd->ports[a].port);
 907                         if (tty) {
 908                                 tty_hangup(tty);
 909                                 tty_kref_put(tty);
 910                         }
 911                 }
 912         while (1) {
 913                 opened = 0;
 914                 for (a = 0; a < brd->numPorts; a++)
 915                         if (brd->ports[a].port.flags & ASYNC_INITIALIZED)
 916                                 opened++;
 917                 mutex_unlock(&moxa_openlock);
 918                 if (!opened)
 919                         break;
 920                 msleep(50);
 921                 mutex_lock(&moxa_openlock);
 922         }
 923
 924         iounmap(brd->basemem);
 925         brd->basemem = NULL;
 926         kfree(brd->ports);
 927 }
 928
 929 #ifdef CONFIG_PCI
 930 static int __devinit moxa_pci_probe(struct pci_dev *pdev,
 931                 const struct pci_device_id *ent)
 932 {
 933         struct moxa_board_conf *board;
 934         unsigned int i;
 935         int board_type = ent->driver_data;
 936         int retval;
 937
 938         retval = pci_enable_device(pdev);
 939         if (retval) {
 940                 dev_err(&pdev->dev, "can't enable pci device\n");
 941                 goto err;
 942         }
 943
 944         for (i = 0; i < MAX_BOARDS; i++)
 945                 if (moxa_boards[i].basemem == NULL)
 946                         break;
 947
 948         retval = -ENODEV;
 949         if (i >= MAX_BOARDS) {
 950                 dev_warn(&pdev->dev, "more than %u MOXA Intellio family boards "
 951                                 "found. Board is ignored.\n", MAX_BOARDS);
 952                 goto err;
 953         }
 954
 955         board = &moxa_boards[i];
 956
 957         retval = pci_request_region(pdev, 2, "moxa-base");
 958         if (retval) {
 959                 dev_err(&pdev->dev, "can't request pci region 2\n");
 960                 goto err;
 961         }
 962
 963         board->basemem = ioremap_nocache(pci_resource_start(pdev, 2), 0x4000);
 964         if (board->basemem == NULL) {
 965                 dev_err(&pdev->dev, "can't remap io space 2\n");
 966                 goto err_reg;
 967         }
 968
 969         board->boardType = board_type;
 970         switch (board_type) {
 971         case MOXA_BOARD_C218_ISA:
 972         case MOXA_BOARD_C218_PCI:
 973                 board->numPorts = 8;
 974                 break;
 975
 976         case MOXA_BOARD_CP204J:
 977                 board->numPorts = 4;
 978                 break;
 979         default:
 980                 board->numPorts = 0;
 981                 break;
 982         }
 983         board->busType = MOXA_BUS_TYPE_PCI;
 984
 985         retval = moxa_init_board(board, &pdev->dev);
 986         if (retval)
 987                 goto err_base;
 988
 989         pci_set_drvdata(pdev, board);
 990
 991         dev_info(&pdev->dev, "board '%s' ready (%u ports, firmware loaded)\n",
 992                         moxa_brdname[board_type - 1], board->numPorts);
 993
 994         return 0;
 995 err_base:
 996         iounmap(board->basemem);
 997         board->basemem = NULL;
 998 err_reg:
 999         pci_release_region(pdev, 2);
1000 err:
1001         return retval;
1002 }
1003
1004 static void __devexit moxa_pci_remove(struct pci_dev *pdev)
1005 {
1006         struct moxa_board_conf *brd = pci_get_drvdata(pdev);
1007
1008         moxa_board_deinit(brd);
1009
1010         pci_release_region(pdev, 2);
1011 }
1012
1013 static struct pci_driver moxa_pci_driver = {
1014         .name = "moxa",
1015         .id_table = moxa_pcibrds,
1016         .probe = moxa_pci_probe,
1017         .remove = __devexit_p(moxa_pci_remove)
1018 };
1019 #endif /* CONFIG_PCI */
1020
1021 static int __init moxa_init(void)
1022 {
1023         unsigned int isabrds = 0;
1024         int retval = 0;
1025         struct moxa_board_conf *brd = moxa_boards;
1026         unsigned int i;
1027
1028         printk(KERN_INFO "MOXA Intellio family driver version %s\n",
1029                         MOXA_VERSION);
1030         moxaDriver = alloc_tty_driver(MAX_PORTS + 1);
1031         if (!moxaDriver)
1032                 return -ENOMEM;
1033
1034         moxaDriver->owner = THIS_MODULE;
1035         moxaDriver->name = "ttyMX";
1036         moxaDriver->major = ttymajor;
1037         moxaDriver->minor_start = 0;
1038         moxaDriver->type = TTY_DRIVER_TYPE_SERIAL;
1039         moxaDriver->subtype = SERIAL_TYPE_NORMAL;
1040         moxaDriver->init_termios = tty_std_termios;
1041         moxaDriver->init_termios.c_cflag = B9600 | CS8 | CREAD | CLOCAL | HUPCL;
1042         moxaDriver->init_termios.c_ispeed = 9600;
1043         moxaDriver->init_termios.c_ospeed = 9600;
1044         moxaDriver->flags = TTY_DRIVER_REAL_RAW;
1045         tty_set_operations(moxaDriver, &moxa_ops);
1046
1047         if (tty_register_driver(moxaDriver)) {
1048                 printk(KERN_ERR "can't register MOXA Smartio tty driver!\n");
1049                 put_tty_driver(moxaDriver);
1050                 return -1;
1051         }
1052
1053         /* Find the boards defined from module args. */
1054
1055         for (i = 0; i < MAX_BOARDS; i++) {
1056                 if (!baseaddr[i])
1057                         break;
1058                 if (type[i] == MOXA_BOARD_C218_ISA ||
1059                                 type[i] == MOXA_BOARD_C320_ISA) {
1060                         pr_debug("Moxa board %2d: %s board(baseAddr=%lx)\n",
1061                                         isabrds + 1, moxa_brdname[type[i] - 1],
1062                                         baseaddr[i]);
1063                         brd->boardType = type[i];
1064                         brd->numPorts = type[i] == MOXA_BOARD_C218_ISA ? 8 :
1065                                         numports[i];
1066                         brd->busType = MOXA_BUS_TYPE_ISA;
1067                         brd->basemem = ioremap_nocache(baseaddr[i], 0x4000);
1068                         if (!brd->basemem) {
1069                                 printk(KERN_ERR "MOXA: can't remap %lx\n",
1070                                                 baseaddr[i]);
1071                                 continue;
1072                         }
1073                         if (moxa_init_board(brd, NULL)) {
1074                                 iounmap(brd->basemem);
1075                                 brd->basemem = NULL;
1076                                 continue;
1077                         }
1078
1079                         printk(KERN_INFO "MOXA isa board found at 0x%.8lu and "
1080                                         "ready (%u ports, firmware loaded)\n",
1081                                         baseaddr[i], brd->numPorts);
1082
1083                         brd++;
1084                         isabrds++;
1085                 }
1086         }
1087
1088 #ifdef CONFIG_PCI
1089         retval = pci_register_driver(&moxa_pci_driver);
1090         if (retval) {
1091                 printk(KERN_ERR "Can't register MOXA pci driver!\n");
1092                 if (isabrds)
1093                         retval = 0;
1094         }
1095 #endif
1096
1097         return retval;
1098 }
1099
1100 static void __exit moxa_exit(void)
1101 {
1102         unsigned int i;
1103
1104 #ifdef CONFIG_PCI
1105         pci_unregister_driver(&moxa_pci_driver);
1106 #endif
1107
1108         for (i = 0; i < MAX_BOARDS; i++) /* ISA boards */
1109                 if (moxa_boards[i].ready)
1110                         moxa_board_deinit(&moxa_boards[i]);
1111
1112         del_timer_sync(&moxaTimer);
1113
1114         if (tty_unregister_driver(moxaDriver))
1115                 printk(KERN_ERR "Couldn't unregister MOXA Intellio family "
1116                                 "serial driver\n");
1117         put_tty_driver(moxaDriver);
1118 }
1119
1120 module_init(moxa_init);
1121 module_exit(moxa_exit);
1122
1123 static void moxa_shutdown(struct tty_port *port)
1124 {
1125         struct moxa_port *ch = container_of(port, struct moxa_port, port);
1126         MoxaPortDisable(ch);
1127         MoxaPortFlushData(ch, 2);
1128         clear_bit(ASYNCB_NORMAL_ACTIVE, &port->flags);
1129 }
1130
1131 static int moxa_carrier_raised(struct tty_port *port)
1132 {
1133         struct moxa_port *ch = container_of(port, struct moxa_port, port);
1134         int dcd;
1135
1136         spin_lock_irq(&port->lock);
1137         dcd = ch->DCDState;
1138         spin_unlock_irq(&port->lock);
1139         return dcd;
1140 }
1141
1142 static void moxa_dtr_rts(struct tty_port *port, int onoff)
1143 {
1144         struct moxa_port *ch = container_of(port, struct moxa_port, port);
1145         MoxaPortLineCtrl(ch, onoff, onoff);
1146 }
1147
1148
1149 static int moxa_open(struct tty_struct *tty, struct file *filp)
1150 {
1151         struct moxa_board_conf *brd;
1152         struct moxa_port *ch;
1153         int port;
1154         int retval;
1155
1156         port = tty->index;
1157         if (port == MAX_PORTS) {
1158                 return capable(CAP_SYS_ADMIN) ? 0 : -EPERM;
1159         }
1160         if (mutex_lock_interruptible(&moxa_openlock))
1161                 return -ERESTARTSYS;
1162         brd = &moxa_boards[port / MAX_PORTS_PER_BOARD];
1163         if (!brd->ready) {
1164                 mutex_unlock(&moxa_openlock);
1165                 return -ENODEV;
1166         }
1167
1168         if (port % MAX_PORTS_PER_BOARD >= brd->numPorts) {
1169                 mutex_unlock(&moxa_openlock);
1170                 return -ENODEV;
1171         }
1172
1173         ch = &brd->ports[port % MAX_PORTS_PER_BOARD];
1174         ch->port.count++;
1175         tty->driver_data = ch;
1176         tty_port_tty_set(&ch->port, tty);
1177         mutex_lock(&ch->port.mutex);
1178         if (!(ch->port.flags & ASYNC_INITIALIZED)) {
1179                 ch->statusflags = 0;
1180                 moxa_set_tty_param(tty, tty->termios);
1181                 MoxaPortLineCtrl(ch, 1, 1);
1182                 MoxaPortEnable(ch);
1183                 MoxaSetFifo(ch, ch->type == PORT_16550A);
1184                 ch->port.flags |= ASYNC_INITIALIZED;
1185         }
1186         mutex_unlock(&ch->port.mutex);
1187         mutex_unlock(&moxa_openlock);
1188
1189         retval = tty_port_block_til_ready(&ch->port, tty, filp);
1190         if (retval == 0)
1191                 set_bit(ASYNCB_NORMAL_ACTIVE, &ch->port.flags);
1192         return retval;
1193 }
1194
1195 static void moxa_close(struct tty_struct *tty, struct file *filp)
1196 {
1197         struct moxa_port *ch = tty->driver_data;
1198         ch->cflag = tty->termios->c_cflag;
1199         tty_port_close(&ch->port, tty, filp);
1200 }
1201
1202 static int moxa_write(struct tty_struct *tty,
1203                       const unsigned char *buf, int count)
1204 {
1205         struct moxa_port *ch = tty->driver_data;
1206         int len;
1207
1208         if (ch == NULL)
1209                 return 0;
1210
1211         spin_lock_bh(&moxa_lock);
1212         len = MoxaPortWriteData(tty, buf, count);
1213         spin_unlock_bh(&moxa_lock);
1214
1215         set_bit(LOWWAIT, &ch->statusflags);
1216         return len;
1217 }
1218
1219 static int moxa_write_room(struct tty_struct *tty)
1220 {
1221         struct moxa_port *ch;
1222
1223         if (tty->stopped)
1224                 return 0;
1225         ch = tty->driver_data;
1226         if (ch == NULL)
1227                 return 0;
1228         return MoxaPortTxFree(ch);
1229 }
1230
1231 static void moxa_flush_buffer(struct tty_struct *tty)
1232 {
1233         struct moxa_port *ch = tty->driver_data;
1234
1235         if (ch == NULL)
1236                 return;
1237         MoxaPortFlushData(ch, 1);
1238         tty_wakeup(tty);
1239 }
1240
1241 static int moxa_chars_in_buffer(struct tty_struct *tty)
1242 {
1243         struct moxa_port *ch = tty->driver_data;
1244         int chars;
1245
1246         chars = MoxaPortTxQueue(ch);
1247         if (chars)
1248                 /*
1249                  * Make it possible to wakeup anything waiting for output
1250                  * in tty_ioctl.c, etc.
1251                  */
1252                 set_bit(EMPTYWAIT, &ch->statusflags);
1253         return chars;
1254 }
1255
1256 static int moxa_tiocmget(struct tty_struct *tty, struct file *file)
1257 {
1258         struct moxa_port *ch = tty->driver_data;
1259         int flag = 0, dtr, rts;
1260
1261         MoxaPortGetLineOut(ch, &dtr, &rts);
1262         if (dtr)
1263                 flag |= TIOCM_DTR;
1264         if (rts)
1265                 flag |= TIOCM_RTS;
1266         dtr = MoxaPortLineStatus(ch);
1267         if (dtr & 1)
1268                 flag |= TIOCM_CTS;
1269         if (dtr & 2)
1270                 flag |= TIOCM_DSR;
1271         if (dtr & 4)
1272                 flag |= TIOCM_CD;
1273         return flag;
1274 }
1275
1276 static int moxa_tiocmset(struct tty_struct *tty, struct file *file,
1277                          unsigned int set, unsigned int clear)
1278 {
1279         struct moxa_port *ch;
1280         int port;
1281         int dtr, rts;
1282
1283         port = tty->index;
1284         mutex_lock(&moxa_openlock);
1285         ch = tty->driver_data;
1286         if (!ch) {
1287                 mutex_unlock(&moxa_openlock);
1288                 return -EINVAL;
1289         }
1290
1291         MoxaPortGetLineOut(ch, &dtr, &rts);
1292         if (set & TIOCM_RTS)
1293                 rts = 1;
1294         if (set & TIOCM_DTR)
1295                 dtr = 1;
1296         if (clear & TIOCM_RTS)
1297                 rts = 0;
1298         if (clear & TIOCM_DTR)
1299                 dtr = 0;
1300         MoxaPortLineCtrl(ch, dtr, rts);
1301         mutex_unlock(&moxa_openlock);
1302         return 0;
1303 }
1304
1305 static void moxa_set_termios(struct tty_struct *tty,
1306                 struct ktermios *old_termios)
1307 {
1308         struct moxa_port *ch = tty->driver_data;
1309
1310         if (ch == NULL)
1311                 return;
1312         moxa_set_tty_param(tty, old_termios);
1313         if (!(old_termios->c_cflag & CLOCAL) && C_CLOCAL(tty))
1314                 wake_up_interruptible(&ch->port.open_wait);
1315 }
1316
1317 static void moxa_stop(struct tty_struct *tty)
1318 {
1319         struct moxa_port *ch = tty->driver_data;
1320
1321         if (ch == NULL)
1322                 return;
1323         MoxaPortTxDisable(ch);
1324         set_bit(TXSTOPPED, &ch->statusflags);
1325 }
1326
1327
1328 static void moxa_start(struct tty_struct *tty)
1329 {
1330         struct moxa_port *ch = tty->driver_data;
1331
1332         if (ch == NULL)
1333                 return;
1334
1335         if (!(ch->statusflags & TXSTOPPED))
1336                 return;
1337
1338         MoxaPortTxEnable(ch);
1339         clear_bit(TXSTOPPED, &ch->statusflags);
1340 }
1341
1342 static void moxa_hangup(struct tty_struct *tty)
1343 {
1344         struct moxa_port *ch = tty->driver_data;
1345         tty_port_hangup(&ch->port);
1346 }
1347
1348 static void moxa_new_dcdstate(struct moxa_port *p, u8 dcd)
1349 {
1350         struct tty_struct *tty;
1351         unsigned long flags;
1352         dcd = !!dcd;
1353
1354         spin_lock_irqsave(&p->port.lock, flags);
1355         if (dcd != p->DCDState) {
1356                 p->DCDState = dcd;
1357                 spin_unlock_irqrestore(&p->port.lock, flags);
1358                 tty = tty_port_tty_get(&p->port);
1359                 if (tty && C_CLOCAL(tty) && !dcd)
1360                         tty_hangup(tty);
1361                 tty_kref_put(tty);
1362         }
1363         else
1364                 spin_unlock_irqrestore(&p->port.lock, flags);
1365 }
1366
1367 static int moxa_poll_port(struct moxa_port *p, unsigned int handle,
1368                 u16 __iomem *ip)
1369 {
1370         struct tty_struct *tty = tty_port_tty_get(&p->port);
1371         void __iomem *ofsAddr;
1372         unsigned int inited = p->port.flags & ASYNC_INITIALIZED;
1373         u16 intr;
1374
1375         if (tty) {
1376                 if (test_bit(EMPTYWAIT, &p->statusflags) &&
1377                                 MoxaPortTxQueue(p) == 0) {
1378                         clear_bit(EMPTYWAIT, &p->statusflags);
1379                         tty_wakeup(tty);
1380                 }
1381                 if (test_bit(LOWWAIT, &p->statusflags) && !tty->stopped &&
1382                                 MoxaPortTxQueue(p) <= WAKEUP_CHARS) {
1383                         clear_bit(LOWWAIT, &p->statusflags);
1384                         tty_wakeup(tty);
1385                 }
1386
1387                 if (inited && !test_bit(TTY_THROTTLED, &tty->flags) &&
1388                                 MoxaPortRxQueue(p) > 0) { /* RX */
1389                         MoxaPortReadData(p);
1390                         tty_schedule_flip(tty);
1391                 }
1392         } else {
1393                 clear_bit(EMPTYWAIT, &p->statusflags);
1394                 MoxaPortFlushData(p, 0); /* flush RX */
1395         }
1396
1397         if (!handle) /* nothing else to do */
1398                 goto put;
1399
1400         intr = readw(ip); /* port irq status */
1401         if (intr == 0)
1402                 goto put;
1403
1404         writew(0, ip); /* ACK port */
1405         ofsAddr = p->tableAddr;
1406         if (intr & IntrTx) /* disable tx intr */
1407                 writew(readw(ofsAddr + HostStat) & ~WakeupTx,
1408                                 ofsAddr + HostStat);
1409
1410         if (!inited)
1411                 goto put;
1412
1413         if (tty && (intr & IntrBreak) && !I_IGNBRK(tty)) { /* BREAK */
1414                 tty_insert_flip_char(tty, 0, TTY_BREAK);
1415                 tty_schedule_flip(tty);
1416         }
1417
1418         if (intr & IntrLine)
1419                 moxa_new_dcdstate(p, readb(ofsAddr + FlagStat) & DCD_state);
1420 put:
1421         tty_kref_put(tty);
1422
1423         return 0;
1424 }
1425
1426 static void moxa_poll(unsigned long ignored)
1427 {
1428         struct moxa_board_conf *brd;
1429         u16 __iomem *ip;
1430         unsigned int card, port, served = 0;
1431
1432         spin_lock(&moxa_lock);
1433         for (card = 0; card < MAX_BOARDS; card++) {
1434                 brd = &moxa_boards[card];
1435                 if (!brd->ready)
1436                         continue;
1437
1438                 served++;
1439
1440                 ip = NULL;
1441                 if (readb(brd->intPend) == 0xff)
1442                         ip = brd->intTable + readb(brd->intNdx);
1443
1444                 for (port = 0; port < brd->numPorts; port++)
1445                         moxa_poll_port(&brd->ports[port], !!ip, ip + port);
1446
1447                 if (ip)
1448                         writeb(0, brd->intPend); /* ACK */
1449
1450                 if (moxaLowWaterChk) {
1451                         struct moxa_port *p = brd->ports;
1452                         for (port = 0; port < brd->numPorts; port++, p++)
1453                                 if (p->lowChkFlag) {
1454                                         p->lowChkFlag = 0;
1455                                         moxa_low_water_check(p->tableAddr);
1456                                 }
1457                 }
1458         }
1459         moxaLowWaterChk = 0;
1460
1461         if (served)
1462                 mod_timer(&moxaTimer, jiffies + HZ / 50);
1463         spin_unlock(&moxa_lock);
1464 }
1465
1466 /******************************************************************************/
1467
1468 static void moxa_set_tty_param(struct tty_struct *tty, struct ktermios *old_termios)
1469 {
1470         register struct ktermios *ts = tty->termios;
1471         struct moxa_port *ch = tty->driver_data;
1472         int rts, cts, txflow, rxflow, xany, baud;
1473
1474         rts = cts = txflow = rxflow = xany = 0;
1475         if (ts->c_cflag & CRTSCTS)
1476                 rts = cts = 1;
1477         if (ts->c_iflag & IXON)
1478                 txflow = 1;
1479         if (ts->c_iflag & IXOFF)
1480                 rxflow = 1;
1481         if (ts->c_iflag & IXANY)
1482                 xany = 1;
1483
1484         /* Clear the features we don't support */
1485         ts->c_cflag &= ~CMSPAR;
1486         MoxaPortFlowCtrl(ch, rts, cts, txflow, rxflow, xany);
1487         baud = MoxaPortSetTermio(ch, ts, tty_get_baud_rate(tty));
1488         if (baud == -1)
1489                 baud = tty_termios_baud_rate(old_termios);
1490         /* Not put the baud rate into the termios data */
1491         tty_encode_baud_rate(tty, baud, baud);
1492 }
1493
1494 /*****************************************************************************
1495  *      Driver level functions:                                              *
1496  *****************************************************************************/
1497
1498 static void MoxaPortFlushData(struct moxa_port *port, int mode)
1499 {
1500         void __iomem *ofsAddr;
1501         if (mode < 0 || mode > 2)
1502                 return;
1503         ofsAddr = port->tableAddr;
1504         moxafunc(ofsAddr, FC_FlushQueue, mode);
1505         if (mode != 1) {
1506                 port->lowChkFlag = 0;
1507                 moxa_low_water_check(ofsAddr);
1508         }
1509 }
1510
1511 /*
1512  *    Moxa Port Number Description:
1513  *
1514  *      MOXA serial driver supports up to 4 MOXA-C218/C320 boards. And,
1515  *      the port number using in MOXA driver functions will be 0 to 31 for
1516  *      first MOXA board, 32 to 63 for second, 64 to 95 for third and 96
1517  *      to 127 for fourth. For example, if you setup three MOXA boards,
1518  *      first board is C218, second board is C320-16 and third board is
1519  *      C320-32. The port number of first board (C218 - 8 ports) is from
1520  *      0 to 7. The port number of second board (C320 - 16 ports) is form
1521  *      32 to 47. The port number of third board (C320 - 32 ports) is from
1522  *      64 to 95. And those port numbers form 8 to 31, 48 to 63 and 96 to
1523  *      127 will be invalid.
1524  *
1525  *
1526  *      Moxa Functions Description:
1527  *
1528  *      Function 1:     Driver initialization routine, this routine must be
1529  *                      called when initialized driver.
1530  *      Syntax:
1531  *      void MoxaDriverInit();
1532  *
1533  *
1534  *      Function 2:     Moxa driver private IOCTL command processing.
1535  *      Syntax:
1536  *      int  MoxaDriverIoctl(unsigned int cmd, unsigned long arg, int port);
1537  *
1538  *           unsigned int cmd   : IOCTL command
1539  *           unsigned long arg  : IOCTL argument
1540  *           int port           : port number (0 - 127)
1541  *
1542  *           return:    0  (OK)
1543  *                      -EINVAL
1544  *                      -ENOIOCTLCMD
1545  *
1546  *
1547  *      Function 6:     Enable this port to start Tx/Rx data.
1548  *      Syntax:
1549  *      void MoxaPortEnable(int port);
1550  *           int port           : port number (0 - 127)
1551  *
1552  *
1553  *      Function 7:     Disable this port
1554  *      Syntax:
1555  *      void MoxaPortDisable(int port);
1556  *           int port           : port number (0 - 127)
1557  *
1558  *
1559  *      Function 10:    Setting baud rate of this port.
1560  *      Syntax:
1561  *      speed_t MoxaPortSetBaud(int port, speed_t baud);
1562  *           int port           : port number (0 - 127)
1563  *           long baud          : baud rate (50 - 115200)
1564  *
1565  *           return:    0       : this port is invalid or baud < 50
1566  *                      50 - 115200 : the real baud rate set to the port, if
1567  *                                    the argument baud is large than maximun
1568  *                                    available baud rate, the real setting
1569  *                                    baud rate will be the maximun baud rate.
1570  *
1571  *
1572  *      Function 12:    Configure the port.
1573  *      Syntax:
1574  *      int  MoxaPortSetTermio(int port, struct ktermios *termio, speed_t baud);
1575  *           int port           : port number (0 - 127)
1576  *           struct ktermios * termio : termio structure pointer
1577  *           speed_t baud       : baud rate
1578  *
1579  *           return:    -1      : this port is invalid or termio == NULL
1580  *                      0       : setting O.K.
1581  *
1582  *
1583  *      Function 13:    Get the DTR/RTS state of this port.
1584  *      Syntax:
1585  *      int  MoxaPortGetLineOut(int port, int *dtrState, int *rtsState);
1586  *           int port           : port number (0 - 127)
1587  *           int * dtrState     : pointer to INT to receive the current DTR
1588  *                                state. (if NULL, this function will not
1589  *                                write to this address)
1590  *           int * rtsState     : pointer to INT to receive the current RTS
1591  *                                state. (if NULL, this function will not
1592  *                                write to this address)
1593  *
1594  *           return:    -1      : this port is invalid
1595  *                      0       : O.K.
1596  *
1597  *
1598  *      Function 14:    Setting the DTR/RTS output state of this port.
1599  *      Syntax:
1600  *      void MoxaPortLineCtrl(int port, int dtrState, int rtsState);
1601  *           int port           : port number (0 - 127)
1602  *           int dtrState       : DTR output state (0: off, 1: on)
1603  *           int rtsState       : RTS output state (0: off, 1: on)
1604  *
1605  *
1606  *      Function 15:    Setting the flow control of this port.
1607  *      Syntax:
1608  *      void MoxaPortFlowCtrl(int port, int rtsFlow, int ctsFlow, int rxFlow,
1609  *                            int txFlow,int xany);
1610  *           int port           : port number (0 - 127)
1611  *           int rtsFlow        : H/W RTS flow control (0: no, 1: yes)
1612  *           int ctsFlow        : H/W CTS flow control (0: no, 1: yes)
1613  *           int rxFlow         : S/W Rx XON/XOFF flow control (0: no, 1: yes)
1614  *           int txFlow         : S/W Tx XON/XOFF flow control (0: no, 1: yes)
1615  *           int xany           : S/W XANY flow control (0: no, 1: yes)
1616  *
1617  *
1618  *      Function 16:    Get ths line status of this port
1619  *      Syntax:
1620  *      int  MoxaPortLineStatus(int port);
1621  *           int port           : port number (0 - 127)
1622  *
1623  *           return:    Bit 0 - CTS state (0: off, 1: on)
1624  *                      Bit 1 - DSR state (0: off, 1: on)
1625  *                      Bit 2 - DCD state (0: off, 1: on)
1626  *
1627  *
1628  *      Function 19:    Flush the Rx/Tx buffer data of this port.
1629  *      Syntax:
1630  *      void MoxaPortFlushData(int port, int mode);
1631  *           int port           : port number (0 - 127)
1632  *           int mode
1633  *                      0       : flush the Rx buffer
1634  *                      1       : flush the Tx buffer
1635  *                      2       : flush the Rx and Tx buffer
1636  *
1637  *
1638  *      Function 20:    Write data.
1639  *      Syntax:
1640  *      int  MoxaPortWriteData(int port, unsigned char * buffer, int length);
1641  *           int port           : port number (0 - 127)
1642  *           unsigned char * buffer     : pointer to write data buffer.
1643  *           int length         : write data length
1644  *
1645  *           return:    0 - length      : real write data length
1646  *
1647  *
1648  *      Function 21:    Read data.
1649  *      Syntax:
1650  *      int  MoxaPortReadData(int port, struct tty_struct *tty);
1651  *           int port           : port number (0 - 127)
1652  *           struct tty_struct *tty : tty for data
1653  *
1654  *           return:    0 - length      : real read data length
1655  *
1656  *
1657  *      Function 24:    Get the Tx buffer current queued data bytes
1658  *      Syntax:
1659  *      int  MoxaPortTxQueue(int port);
1660  *           int port           : port number (0 - 127)
1661  *
1662  *           return:    ..      : Tx buffer current queued data bytes
1663  *
1664  *
1665  *      Function 25:    Get the Tx buffer current free space
1666  *      Syntax:
1667  *      int  MoxaPortTxFree(int port);
1668  *           int port           : port number (0 - 127)
1669  *
1670  *           return:    ..      : Tx buffer current free space
1671  *
1672  *
1673  *      Function 26:    Get the Rx buffer current queued data bytes
1674  *      Syntax:
1675  *      int  MoxaPortRxQueue(int port);
1676  *           int port           : port number (0 - 127)
1677  *
1678  *           return:    ..      : Rx buffer current queued data bytes
1679  *
1680  *
1681  *      Function 28:    Disable port data transmission.
1682  *      Syntax:
1683  *      void MoxaPortTxDisable(int port);
1684  *           int port           : port number (0 - 127)
1685  *
1686  *
1687  *      Function 29:    Enable port data transmission.
1688  *      Syntax:
1689  *      void MoxaPortTxEnable(int port);
1690  *           int port           : port number (0 - 127)
1691  *
1692  *
1693  *      Function 31:    Get the received BREAK signal count and reset it.
1694  *      Syntax:
1695  *      int  MoxaPortResetBrkCnt(int port);
1696  *           int port           : port number (0 - 127)
1697  *
1698  *           return:    0 - ..  : BREAK signal count
1699  *
1700  *
1701  */
1702
1703 static void MoxaPortEnable(struct moxa_port *port)
1704 {
1705         void __iomem *ofsAddr;
1706         u16 lowwater = 512;
1707
1708         ofsAddr = port->tableAddr;
1709         writew(lowwater, ofsAddr + Low_water);
1710         if (MOXA_IS_320(port->board))
1711                 moxafunc(ofsAddr, FC_SetBreakIrq, 0);
1712         else
1713                 writew(readw(ofsAddr + HostStat) | WakeupBreak,
1714                                 ofsAddr + HostStat);
1715
1716         moxafunc(ofsAddr, FC_SetLineIrq, Magic_code);
1717         moxafunc(ofsAddr, FC_FlushQueue, 2);
1718
1719         moxafunc(ofsAddr, FC_EnableCH, Magic_code);
1720         MoxaPortLineStatus(port);
1721 }
1722
1723 static void MoxaPortDisable(struct moxa_port *port)
1724 {
1725         void __iomem *ofsAddr = port->tableAddr;
1726
1727         moxafunc(ofsAddr, FC_SetFlowCtl, 0);    /* disable flow control */
1728         moxafunc(ofsAddr, FC_ClrLineIrq, Magic_code);
1729         writew(0, ofsAddr + HostStat);
1730         moxafunc(ofsAddr, FC_DisableCH, Magic_code);
1731 }
1732
1733 static speed_t MoxaPortSetBaud(struct moxa_port *port, speed_t baud)
1734 {
1735         void __iomem *ofsAddr = port->tableAddr;
1736         unsigned int clock, val;
1737         speed_t max;
1738
1739         max = MOXA_IS_320(port->board) ? 460800 : 921600;
1740         if (baud < 50)
1741                 return 0;
1742         if (baud > max)
1743                 baud = max;
1744         clock = 921600;
1745         val = clock / baud;
1746         moxafunc(ofsAddr, FC_SetBaud, val);
1747         baud = clock / val;
1748         return baud;
1749 }
1750
1751 static int MoxaPortSetTermio(struct moxa_port *port, struct ktermios *termio,
1752                 speed_t baud)
1753 {
1754         void __iomem *ofsAddr;
1755         tcflag_t cflag;
1756         tcflag_t mode = 0;
1757
1758         ofsAddr = port->tableAddr;
1759         cflag = termio->c_cflag;        /* termio->c_cflag */
1760
1761         mode = termio->c_cflag & CSIZE;
1762         if (mode == CS5)
1763                 mode = MX_CS5;
1764         else if (mode == CS6)
1765                 mode = MX_CS6;
1766         else if (mode == CS7)
1767                 mode = MX_CS7;
1768         else if (mode == CS8)
1769                 mode = MX_CS8;
1770
1771         if (termio->c_cflag & CSTOPB) {
1772                 if (mode == MX_CS5)
1773                         mode |= MX_STOP15;
1774                 else
1775                         mode |= MX_STOP2;
1776         } else
1777                 mode |= MX_STOP1;
1778
1779         if (termio->c_cflag & PARENB) {
1780                 if (termio->c_cflag & PARODD)
1781                         mode |= MX_PARODD;
1782                 else
1783                         mode |= MX_PAREVEN;
1784         } else
1785                 mode |= MX_PARNONE;
1786
1787         moxafunc(ofsAddr, FC_SetDataMode, (u16)mode);
1788
1789         if (MOXA_IS_320(port->board) && baud >= 921600)
1790                 return -1;
1791
1792         baud = MoxaPortSetBaud(port, baud);
1793
1794         if (termio->c_iflag & (IXON | IXOFF | IXANY)) {
1795                 spin_lock_irq(&moxafunc_lock);
1796                 writeb(termio->c_cc[VSTART], ofsAddr + FuncArg);
1797                 writeb(termio->c_cc[VSTOP], ofsAddr + FuncArg1);
1798                 writeb(FC_SetXonXoff, ofsAddr + FuncCode);
1799                 moxa_wait_finish(ofsAddr);
1800                 spin_unlock_irq(&moxafunc_lock);
1801
1802         }
1803         return baud;
1804 }
1805
1806 static int MoxaPortGetLineOut(struct moxa_port *port, int *dtrState,
1807                 int *rtsState)
1808 {
1809         if (dtrState)
1810                 *dtrState = !!(port->lineCtrl & DTR_ON);
1811         if (rtsState)
1812                 *rtsState = !!(port->lineCtrl & RTS_ON);
1813
1814         return 0;
1815 }
1816
1817 static void MoxaPortLineCtrl(struct moxa_port *port, int dtr, int rts)
1818 {
1819         u8 mode = 0;
1820
1821         if (dtr)
1822                 mode |= DTR_ON;
1823         if (rts)
1824                 mode |= RTS_ON;
1825         port->lineCtrl = mode;
1826         moxafunc(port->tableAddr, FC_LineControl, mode);
1827 }
1828
1829 static void MoxaPortFlowCtrl(struct moxa_port *port, int rts, int cts,
1830                 int txflow, int rxflow, int txany)
1831 {
1832         int mode = 0;
1833
1834         if (rts)
1835                 mode |= RTS_FlowCtl;
1836         if (cts)
1837                 mode |= CTS_FlowCtl;
1838         if (txflow)
1839                 mode |= Tx_FlowCtl;
1840         if (rxflow)
1841                 mode |= Rx_FlowCtl;
1842         if (txany)
1843                 mode |= IXM_IXANY;
1844         moxafunc(port->tableAddr, FC_SetFlowCtl, mode);
1845 }
1846
1847 static int MoxaPortLineStatus(struct moxa_port *port)
1848 {
1849         void __iomem *ofsAddr;
1850         int val;
1851
1852         ofsAddr = port->tableAddr;
1853         if (MOXA_IS_320(port->board))
1854                 val = moxafuncret(ofsAddr, FC_LineStatus, 0);
1855         else
1856                 val = readw(ofsAddr + FlagStat) >> 4;
1857         val &= 0x0B;
1858         if (val & 8)
1859                 val |= 4;
1860         moxa_new_dcdstate(port, val & 8);
1861         val &= 7;
1862         return val;
1863 }
1864
1865 static int MoxaPortWriteData(struct tty_struct *tty,
1866                 const unsigned char *buffer, int len)
1867 {
1868         struct moxa_port *port = tty->driver_data;
1869         void __iomem *baseAddr, *ofsAddr, *ofs;
1870         unsigned int c, total;
1871         u16 head, tail, tx_mask, spage, epage;
1872         u16 pageno, pageofs, bufhead;
1873
1874         ofsAddr = port->tableAddr;
1875         baseAddr = port->board->basemem;
1876         tx_mask = readw(ofsAddr + TX_mask);
1877         spage = readw(ofsAddr + Page_txb);
1878         epage = readw(ofsAddr + EndPage_txb);
1879         tail = readw(ofsAddr + TXwptr);
1880         head = readw(ofsAddr + TXrptr);
1881         c = (head > tail) ? (head - tail - 1) : (head - tail + tx_mask);
1882         if (c > len)
1883                 c = len;
1884         moxaLog.txcnt[port->port.tty->index] += c;
1885         total = c;
1886         if (spage == epage) {
1887                 bufhead = readw(ofsAddr + Ofs_txb);
1888                 writew(spage, baseAddr + Control_reg);
1889                 while (c > 0) {
1890                         if (head > tail)
1891                                 len = head - tail - 1;
1892                         else
1893                                 len = tx_mask + 1 - tail;
1894                         len = (c > len) ? len : c;
1895                         ofs = baseAddr + DynPage_addr + bufhead + tail;
1896                         memcpy_toio(ofs, buffer, len);
1897                         buffer += len;
1898                         tail = (tail + len) & tx_mask;
1899                         c -= len;
1900                 }
1901         } else {
1902                 pageno = spage + (tail >> 13);
1903                 pageofs = tail & Page_mask;
1904                 while (c > 0) {
1905                         len = Page_size - pageofs;
1906                         if (len > c)
1907                                 len = c;
1908                         writeb(pageno, baseAddr + Control_reg);
1909                         ofs = baseAddr + DynPage_addr + pageofs;
1910                         memcpy_toio(ofs, buffer, len);
1911                         buffer += len;
1912                         if (++pageno == epage)
1913                                 pageno = spage;
1914                         pageofs = 0;
1915                         c -= len;
1916                 }
1917                 tail = (tail + total) & tx_mask;
1918         }
1919         writew(tail, ofsAddr + TXwptr);
1920         writeb(1, ofsAddr + CD180TXirq);        /* start to send */
1921         return total;
1922 }
1923
1924 static int MoxaPortReadData(struct moxa_port *port)
1925 {
1926         struct tty_struct *tty = port->port.tty;
1927         unsigned char *dst;
1928         void __iomem *baseAddr, *ofsAddr, *ofs;
1929         unsigned int count, len, total;
1930         u16 tail, rx_mask, spage, epage;
1931         u16 pageno, pageofs, bufhead, head;
1932
1933         ofsAddr = port->tableAddr;
1934         baseAddr = port->board->basemem;
1935         head = readw(ofsAddr + RXrptr);
1936         tail = readw(ofsAddr + RXwptr);
1937         rx_mask = readw(ofsAddr + RX_mask);
1938         spage = readw(ofsAddr + Page_rxb);
1939         epage = readw(ofsAddr + EndPage_rxb);
1940         count = (tail >= head) ? (tail - head) : (tail - head + rx_mask + 1);
1941         if (count == 0)
1942                 return 0;
1943
1944         total = count;
1945         moxaLog.rxcnt[tty->index] += total;
1946         if (spage == epage) {
1947                 bufhead = readw(ofsAddr + Ofs_rxb);
1948                 writew(spage, baseAddr + Control_reg);
1949                 while (count > 0) {
1950                         ofs = baseAddr + DynPage_addr + bufhead + head;
1951                         len = (tail >= head) ? (tail - head) :
1952                                         (rx_mask + 1 - head);
1953                         len = tty_prepare_flip_string(tty, &dst,
1954                                         min(len, count));
1955                         memcpy_fromio(dst, ofs, len);
1956                         head = (head + len) & rx_mask;
1957                         count -= len;
1958                 }
1959         } else {
1960                 pageno = spage + (head >> 13);
1961                 pageofs = head & Page_mask;
1962                 while (count > 0) {
1963                         writew(pageno, baseAddr + Control_reg);
1964                         ofs = baseAddr + DynPage_addr + pageofs;
1965                         len = tty_prepare_flip_string(tty, &dst,
1966                                         min(Page_size - pageofs, count));
1967                         memcpy_fromio(dst, ofs, len);
1968
1969                         count -= len;
1970                         pageofs = (pageofs + len) & Page_mask;
1971                         if (pageofs == 0 && ++pageno == epage)
1972                                 pageno = spage;
1973                 }
1974                 head = (head + total) & rx_mask;
1975         }
1976         writew(head, ofsAddr + RXrptr);
1977         if (readb(ofsAddr + FlagStat) & Xoff_state) {
1978                 moxaLowWaterChk = 1;
1979                 port->lowChkFlag = 1;
1980         }
1981         return total;
1982 }
1983
1984
1985 static int MoxaPortTxQueue(struct moxa_port *port)
1986 {
1987         void __iomem *ofsAddr = port->tableAddr;
1988         u16 rptr, wptr, mask;
1989
1990         rptr = readw(ofsAddr + TXrptr);
1991         wptr = readw(ofsAddr + TXwptr);
1992         mask = readw(ofsAddr + TX_mask);
1993         return (wptr - rptr) & mask;
1994 }
1995
1996 static int MoxaPortTxFree(struct moxa_port *port)
1997 {
1998         void __iomem *ofsAddr = port->tableAddr;
1999         u16 rptr, wptr, mask;
2000
2001         rptr = readw(ofsAddr + TXrptr);
2002         wptr = readw(ofsAddr + TXwptr);
2003         mask = readw(ofsAddr + TX_mask);
2004         return mask - ((wptr - rptr) & mask);
2005 }
2006
2007 static int MoxaPortRxQueue(struct moxa_port *port)
2008 {
2009         void __iomem *ofsAddr = port->tableAddr;
2010         u16 rptr, wptr, mask;
2011
2012         rptr = readw(ofsAddr + RXrptr);
2013         wptr = readw(ofsAddr + RXwptr);
2014         mask = readw(ofsAddr + RX_mask);
2015         return (wptr - rptr) & mask;
2016 }
2017
2018 static void MoxaPortTxDisable(struct moxa_port *port)
2019 {
2020         moxafunc(port->tableAddr, FC_SetXoffState, Magic_code);
2021 }
2022
2023 static void MoxaPortTxEnable(struct moxa_port *port)
2024 {
2025         moxafunc(port->tableAddr, FC_SetXonState, Magic_code);
2026 }
2027
2028 static int moxa_get_serial_info(struct moxa_port *info,
2029                 struct serial_struct __user *retinfo)
2030 {
2031         struct serial_struct tmp = {
2032                 .type = info->type,
2033                 .line = info->port.tty->index,
2034                 .flags = info->port.flags,
2035                 .baud_base = 921600,
2036                 .close_delay = info->port.close_delay
2037         };
2038         return copy_to_user(retinfo, &tmp, sizeof(*retinfo)) ? -EFAULT : 0;
2039 }
2040
2041
2042 static int moxa_set_serial_info(struct moxa_port *info,
2043                 struct serial_struct __user *new_info)
2044 {
2045         struct serial_struct new_serial;
2046
2047         if (copy_from_user(&new_serial, new_info, sizeof(new_serial)))
2048                 return -EFAULT;
2049
2050         if (new_serial.irq != 0 || new_serial.port != 0 ||
2051                         new_serial.custom_divisor != 0 ||
2052                         new_serial.baud_base != 921600)
2053                 return -EPERM;
2054
2055         if (!capable(CAP_SYS_ADMIN)) {
2056                 if (((new_serial.flags & ~ASYNC_USR_MASK) !=
2057                      (info->port.flags & ~ASYNC_USR_MASK)))
2058                         return -EPERM;
2059         } else
2060                 info->port.close_delay = new_serial.close_delay * HZ / 100;
2061
2062         new_serial.flags = (new_serial.flags & ~ASYNC_FLAGS);
2063         new_serial.flags |= (info->port.flags & ASYNC_FLAGS);
2064
2065         MoxaSetFifo(info, new_serial.type == PORT_16550A);
2066
2067         info->type = new_serial.type;
2068         return 0;
2069 }
2070
2071
2072
2073 /*****************************************************************************
2074  *      Static local functions:                                              *
2075  *****************************************************************************/
2076
2077 static void MoxaSetFifo(struct moxa_port *port, int enable)
2078 {
2079         void __iomem *ofsAddr = port->tableAddr;
2080
2081         if (!enable) {
2082                 moxafunc(ofsAddr, FC_SetRxFIFOTrig, 0);
2083                 moxafunc(ofsAddr, FC_SetTxFIFOCnt, 1);
2084         } else {
2085                 moxafunc(ofsAddr, FC_SetRxFIFOTrig, 3);
2086                 moxafunc(ofsAddr, FC_SetTxFIFOCnt, 16);
2087         }
2088 }