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