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