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