Merge git://git.kernel.org/pub/scm/linux/kernel/git/mason/btrfs-unstable
[linux-2.6] / drivers / serial / m32r_sio.c
1 /*
2  *  m32r_sio.c
3  *
4  *  Driver for M32R serial ports
5  *
6  *  Based on drivers/char/serial.c, by Linus Torvalds, Theodore Ts'o.
7  *  Based on drivers/serial/8250.c.
8  *
9  *  Copyright (C) 2001  Russell King.
10  *  Copyright (C) 2004  Hirokazu Takata <takata at linux-m32r.org>
11  *
12  * This program is free software; you can redistribute it and/or modify
13  * it under the terms of the GNU General Public License as published by
14  * the Free Software Foundation; either version 2 of the License, or
15  * (at your option) any later version.
16  */
17
18 /*
19  * A note about mapbase / membase
20  *
21  *  mapbase is the physical address of the IO port.  Currently, we don't
22  *  support this very well, and it may well be dropped from this driver
23  *  in future.  As such, mapbase should be NULL.
24  *
25  *  membase is an 'ioremapped' cookie.  This is compatible with the old
26  *  serial.c driver, and is currently the preferred form.
27  */
28
29 #if defined(CONFIG_SERIAL_M32R_SIO_CONSOLE) && defined(CONFIG_MAGIC_SYSRQ)
30 #define SUPPORT_SYSRQ
31 #endif
32
33 #include <linux/module.h>
34 #include <linux/tty.h>
35 #include <linux/ioport.h>
36 #include <linux/init.h>
37 #include <linux/console.h>
38 #include <linux/sysrq.h>
39 #include <linux/serial.h>
40 #include <linux/serialP.h>
41 #include <linux/delay.h>
42
43 #include <asm/m32r.h>
44 #include <asm/io.h>
45 #include <asm/irq.h>
46
47 #define PORT_M32R_BASE  PORT_M32R_SIO
48 #define PORT_INDEX(x)   (x - PORT_M32R_BASE + 1)
49 #define BAUD_RATE       115200
50
51 #include <linux/serial_core.h>
52 #include "m32r_sio.h"
53 #include "m32r_sio_reg.h"
54
55 /*
56  * Debugging.
57  */
58 #if 0
59 #define DEBUG_AUTOCONF(fmt...)  printk(fmt)
60 #else
61 #define DEBUG_AUTOCONF(fmt...)  do { } while (0)
62 #endif
63
64 #if 0
65 #define DEBUG_INTR(fmt...)      printk(fmt)
66 #else
67 #define DEBUG_INTR(fmt...)      do { } while (0)
68 #endif
69
70 #define PASS_LIMIT      256
71
72 /*
73  * We default to IRQ0 for the "no irq" hack.   Some
74  * machine types want others as well - they're free
75  * to redefine this in their header file.
76  */
77 #define is_real_interrupt(irq)  ((irq) != 0)
78
79 #define BASE_BAUD       115200
80
81 /* Standard COM flags */
82 #define STD_COM_FLAGS (UPF_BOOT_AUTOCONF | UPF_SKIP_TEST)
83
84 /*
85  * SERIAL_PORT_DFNS tells us about built-in ports that have no
86  * standard enumeration mechanism.   Platforms that can find all
87  * serial ports via mechanisms like ACPI or PCI need not supply it.
88  */
89 #if defined(CONFIG_PLAT_USRV)
90
91 #define SERIAL_PORT_DFNS                                                \
92        /* UART  CLK     PORT   IRQ            FLAGS */                  \
93         { 0, BASE_BAUD, 0x3F8, PLD_IRQ_UART0, STD_COM_FLAGS }, /* ttyS0 */ \
94         { 0, BASE_BAUD, 0x2F8, PLD_IRQ_UART1, STD_COM_FLAGS }, /* ttyS1 */
95
96 #else /* !CONFIG_PLAT_USRV */
97
98 #if defined(CONFIG_SERIAL_M32R_PLDSIO)
99 #define SERIAL_PORT_DFNS                                                \
100         { 0, BASE_BAUD, ((unsigned long)PLD_ESIO0CR), PLD_IRQ_SIO0_RCV, \
101           STD_COM_FLAGS }, /* ttyS0 */
102 #else
103 #define SERIAL_PORT_DFNS                                                \
104         { 0, BASE_BAUD, M32R_SIO_OFFSET, M32R_IRQ_SIO0_R,               \
105           STD_COM_FLAGS }, /* ttyS0 */
106 #endif
107
108 #endif /* !CONFIG_PLAT_USRV */
109
110 static struct old_serial_port old_serial_port[] = {
111         SERIAL_PORT_DFNS
112 };
113
114 #define UART_NR ARRAY_SIZE(old_serial_port)
115
116 struct uart_sio_port {
117         struct uart_port        port;
118         struct timer_list       timer;          /* "no irq" timer */
119         struct list_head        list;           /* ports on this IRQ */
120         unsigned short          rev;
121         unsigned char           acr;
122         unsigned char           ier;
123         unsigned char           lcr;
124         unsigned char           mcr_mask;       /* mask of user bits */
125         unsigned char           mcr_force;      /* mask of forced bits */
126         unsigned char           lsr_break_flag;
127
128         /*
129          * We provide a per-port pm hook.
130          */
131         void                    (*pm)(struct uart_port *port,
132                                       unsigned int state, unsigned int old);
133 };
134
135 struct irq_info {
136         spinlock_t              lock;
137         struct list_head        *head;
138 };
139
140 static struct irq_info irq_lists[NR_IRQS];
141
142 /*
143  * Here we define the default xmit fifo size used for each type of UART.
144  */
145 static const struct serial_uart_config uart_config[] = {
146         [PORT_UNKNOWN] = {
147                 .name                   = "unknown",
148                 .dfl_xmit_fifo_size     = 1,
149                 .flags                  = 0,
150         },
151         [PORT_INDEX(PORT_M32R_SIO)] = {
152                 .name                   = "M32RSIO",
153                 .dfl_xmit_fifo_size     = 1,
154                 .flags                  = 0,
155         },
156 };
157
158 #ifdef CONFIG_SERIAL_M32R_PLDSIO
159
160 #define __sio_in(x) inw((unsigned long)(x))
161 #define __sio_out(v,x) outw((v),(unsigned long)(x))
162
163 static inline void sio_set_baud_rate(unsigned long baud)
164 {
165         unsigned short sbaud;
166         sbaud = (boot_cpu_data.bus_clock / (baud * 4))-1;
167         __sio_out(sbaud, PLD_ESIO0BAUR);
168 }
169
170 static void sio_reset(void)
171 {
172         unsigned short tmp;
173
174         tmp = __sio_in(PLD_ESIO0RXB);
175         tmp = __sio_in(PLD_ESIO0RXB);
176         tmp = __sio_in(PLD_ESIO0CR);
177         sio_set_baud_rate(BAUD_RATE);
178         __sio_out(0x0300, PLD_ESIO0CR);
179         __sio_out(0x0003, PLD_ESIO0CR);
180 }
181
182 static void sio_init(void)
183 {
184         unsigned short tmp;
185
186         tmp = __sio_in(PLD_ESIO0RXB);
187         tmp = __sio_in(PLD_ESIO0RXB);
188         tmp = __sio_in(PLD_ESIO0CR);
189         __sio_out(0x0300, PLD_ESIO0CR);
190         __sio_out(0x0003, PLD_ESIO0CR);
191 }
192
193 static void sio_error(int *status)
194 {
195         printk("SIO0 error[%04x]\n", *status);
196         do {
197                 sio_init();
198         } while ((*status = __sio_in(PLD_ESIO0CR)) != 3);
199 }
200
201 #else /* not CONFIG_SERIAL_M32R_PLDSIO */
202
203 #define __sio_in(x) inl(x)
204 #define __sio_out(v,x) outl((v),(x))
205
206 static inline void sio_set_baud_rate(unsigned long baud)
207 {
208         unsigned long i, j;
209
210         i = boot_cpu_data.bus_clock / (baud * 16);
211         j = (boot_cpu_data.bus_clock - (i * baud * 16)) / baud;
212         i -= 1;
213         j = (j + 1) >> 1;
214
215         __sio_out(i, M32R_SIO0_BAUR_PORTL);
216         __sio_out(j, M32R_SIO0_RBAUR_PORTL);
217 }
218
219 static void sio_reset(void)
220 {
221         __sio_out(0x00000300, M32R_SIO0_CR_PORTL);      /* init status */
222         __sio_out(0x00000800, M32R_SIO0_MOD1_PORTL);    /* 8bit        */
223         __sio_out(0x00000080, M32R_SIO0_MOD0_PORTL);    /* 1stop non   */
224         sio_set_baud_rate(BAUD_RATE);
225         __sio_out(0x00000000, M32R_SIO0_TRCR_PORTL);
226         __sio_out(0x00000003, M32R_SIO0_CR_PORTL);      /* RXCEN */
227 }
228
229 static void sio_init(void)
230 {
231         unsigned int tmp;
232
233         tmp = __sio_in(M32R_SIO0_RXB_PORTL);
234         tmp = __sio_in(M32R_SIO0_RXB_PORTL);
235         tmp = __sio_in(M32R_SIO0_STS_PORTL);
236         __sio_out(0x00000003, M32R_SIO0_CR_PORTL);
237 }
238
239 static void sio_error(int *status)
240 {
241         printk("SIO0 error[%04x]\n", *status);
242         do {
243                 sio_init();
244         } while ((*status = __sio_in(M32R_SIO0_CR_PORTL)) != 3);
245 }
246
247 #endif /* CONFIG_SERIAL_M32R_PLDSIO */
248
249 static unsigned int sio_in(struct uart_sio_port *up, int offset)
250 {
251         return __sio_in(up->port.iobase + offset);
252 }
253
254 static void sio_out(struct uart_sio_port *up, int offset, int value)
255 {
256         __sio_out(value, up->port.iobase + offset);
257 }
258
259 static unsigned int serial_in(struct uart_sio_port *up, int offset)
260 {
261         if (!offset)
262                 return 0;
263
264         return __sio_in(offset);
265 }
266
267 static void serial_out(struct uart_sio_port *up, int offset, int value)
268 {
269         if (!offset)
270                 return;
271
272         __sio_out(value, offset);
273 }
274
275 static void m32r_sio_stop_tx(struct uart_port *port)
276 {
277         struct uart_sio_port *up = (struct uart_sio_port *)port;
278
279         if (up->ier & UART_IER_THRI) {
280                 up->ier &= ~UART_IER_THRI;
281                 serial_out(up, UART_IER, up->ier);
282         }
283 }
284
285 static void m32r_sio_start_tx(struct uart_port *port)
286 {
287 #ifdef CONFIG_SERIAL_M32R_PLDSIO
288         struct uart_sio_port *up = (struct uart_sio_port *)port;
289         struct circ_buf *xmit = &up->port.info->xmit;
290
291         if (!(up->ier & UART_IER_THRI)) {
292                 up->ier |= UART_IER_THRI;
293                 serial_out(up, UART_IER, up->ier);
294                 serial_out(up, UART_TX, xmit->buf[xmit->tail]);
295                 xmit->tail = (xmit->tail + 1) & (UART_XMIT_SIZE - 1);
296                 up->port.icount.tx++;
297         }
298         while((serial_in(up, UART_LSR) & UART_EMPTY) != UART_EMPTY);
299 #else
300         struct uart_sio_port *up = (struct uart_sio_port *)port;
301
302         if (!(up->ier & UART_IER_THRI)) {
303                 up->ier |= UART_IER_THRI;
304                 serial_out(up, UART_IER, up->ier);
305         }
306 #endif
307 }
308
309 static void m32r_sio_stop_rx(struct uart_port *port)
310 {
311         struct uart_sio_port *up = (struct uart_sio_port *)port;
312
313         up->ier &= ~UART_IER_RLSI;
314         up->port.read_status_mask &= ~UART_LSR_DR;
315         serial_out(up, UART_IER, up->ier);
316 }
317
318 static void m32r_sio_enable_ms(struct uart_port *port)
319 {
320         struct uart_sio_port *up = (struct uart_sio_port *)port;
321
322         up->ier |= UART_IER_MSI;
323         serial_out(up, UART_IER, up->ier);
324 }
325
326 static void receive_chars(struct uart_sio_port *up, int *status)
327 {
328         struct tty_struct *tty = up->port.info->port.tty;
329         unsigned char ch;
330         unsigned char flag;
331         int max_count = 256;
332
333         do {
334                 ch = sio_in(up, SIORXB);
335                 flag = TTY_NORMAL;
336                 up->port.icount.rx++;
337
338                 if (unlikely(*status & (UART_LSR_BI | UART_LSR_PE |
339                                        UART_LSR_FE | UART_LSR_OE))) {
340                         /*
341                          * For statistics only
342                          */
343                         if (*status & UART_LSR_BI) {
344                                 *status &= ~(UART_LSR_FE | UART_LSR_PE);
345                                 up->port.icount.brk++;
346                                 /*
347                                  * We do the SysRQ and SAK checking
348                                  * here because otherwise the break
349                                  * may get masked by ignore_status_mask
350                                  * or read_status_mask.
351                                  */
352                                 if (uart_handle_break(&up->port))
353                                         goto ignore_char;
354                         } else if (*status & UART_LSR_PE)
355                                 up->port.icount.parity++;
356                         else if (*status & UART_LSR_FE)
357                                 up->port.icount.frame++;
358                         if (*status & UART_LSR_OE)
359                                 up->port.icount.overrun++;
360
361                         /*
362                          * Mask off conditions which should be ingored.
363                          */
364                         *status &= up->port.read_status_mask;
365
366                         if (up->port.line == up->port.cons->index) {
367                                 /* Recover the break flag from console xmit */
368                                 *status |= up->lsr_break_flag;
369                                 up->lsr_break_flag = 0;
370                         }
371
372                         if (*status & UART_LSR_BI) {
373                                 DEBUG_INTR("handling break....");
374                                 flag = TTY_BREAK;
375                         } else if (*status & UART_LSR_PE)
376                                 flag = TTY_PARITY;
377                         else if (*status & UART_LSR_FE)
378                                 flag = TTY_FRAME;
379                 }
380                 if (uart_handle_sysrq_char(&up->port, ch))
381                         goto ignore_char;
382                 if ((*status & up->port.ignore_status_mask) == 0)
383                         tty_insert_flip_char(tty, ch, flag);
384
385                 if (*status & UART_LSR_OE) {
386                         /*
387                          * Overrun is special, since it's reported
388                          * immediately, and doesn't affect the current
389                          * character.
390                          */
391                         tty_insert_flip_char(tty, 0, TTY_OVERRUN);
392                 }
393         ignore_char:
394                 *status = serial_in(up, UART_LSR);
395         } while ((*status & UART_LSR_DR) && (max_count-- > 0));
396         tty_flip_buffer_push(tty);
397 }
398
399 static void transmit_chars(struct uart_sio_port *up)
400 {
401         struct circ_buf *xmit = &up->port.info->xmit;
402         int count;
403
404         if (up->port.x_char) {
405 #ifndef CONFIG_SERIAL_M32R_PLDSIO       /* XXX */
406                 serial_out(up, UART_TX, up->port.x_char);
407 #endif
408                 up->port.icount.tx++;
409                 up->port.x_char = 0;
410                 return;
411         }
412         if (uart_circ_empty(xmit) || uart_tx_stopped(&up->port)) {
413                 m32r_sio_stop_tx(&up->port);
414                 return;
415         }
416
417         count = up->port.fifosize;
418         do {
419                 serial_out(up, UART_TX, xmit->buf[xmit->tail]);
420                 xmit->tail = (xmit->tail + 1) & (UART_XMIT_SIZE - 1);
421                 up->port.icount.tx++;
422                 if (uart_circ_empty(xmit))
423                         break;
424                 while (!(serial_in(up, UART_LSR) & UART_LSR_THRE));
425
426         } while (--count > 0);
427
428         if (uart_circ_chars_pending(xmit) < WAKEUP_CHARS)
429                 uart_write_wakeup(&up->port);
430
431         DEBUG_INTR("THRE...");
432
433         if (uart_circ_empty(xmit))
434                 m32r_sio_stop_tx(&up->port);
435 }
436
437 /*
438  * This handles the interrupt from one port.
439  */
440 static inline void m32r_sio_handle_port(struct uart_sio_port *up,
441         unsigned int status)
442 {
443         DEBUG_INTR("status = %x...", status);
444
445         if (status & 0x04)
446                 receive_chars(up, &status);
447         if (status & 0x01)
448                 transmit_chars(up);
449 }
450
451 /*
452  * This is the serial driver's interrupt routine.
453  *
454  * Arjan thinks the old way was overly complex, so it got simplified.
455  * Alan disagrees, saying that need the complexity to handle the weird
456  * nature of ISA shared interrupts.  (This is a special exception.)
457  *
458  * In order to handle ISA shared interrupts properly, we need to check
459  * that all ports have been serviced, and therefore the ISA interrupt
460  * line has been de-asserted.
461  *
462  * This means we need to loop through all ports. checking that they
463  * don't have an interrupt pending.
464  */
465 static irqreturn_t m32r_sio_interrupt(int irq, void *dev_id)
466 {
467         struct irq_info *i = dev_id;
468         struct list_head *l, *end = NULL;
469         int pass_counter = 0;
470
471         DEBUG_INTR("m32r_sio_interrupt(%d)...", irq);
472
473 #ifdef CONFIG_SERIAL_M32R_PLDSIO
474 //      if (irq == PLD_IRQ_SIO0_SND)
475 //              irq = PLD_IRQ_SIO0_RCV;
476 #else
477         if (irq == M32R_IRQ_SIO0_S)
478                 irq = M32R_IRQ_SIO0_R;
479 #endif
480
481         spin_lock(&i->lock);
482
483         l = i->head;
484         do {
485                 struct uart_sio_port *up;
486                 unsigned int sts;
487
488                 up = list_entry(l, struct uart_sio_port, list);
489
490                 sts = sio_in(up, SIOSTS);
491                 if (sts & 0x5) {
492                         spin_lock(&up->port.lock);
493                         m32r_sio_handle_port(up, sts);
494                         spin_unlock(&up->port.lock);
495
496                         end = NULL;
497                 } else if (end == NULL)
498                         end = l;
499
500                 l = l->next;
501
502                 if (l == i->head && pass_counter++ > PASS_LIMIT) {
503                         if (sts & 0xe0)
504                                 sio_error(&sts);
505                         break;
506                 }
507         } while (l != end);
508
509         spin_unlock(&i->lock);
510
511         DEBUG_INTR("end.\n");
512
513         return IRQ_HANDLED;
514 }
515
516 /*
517  * To support ISA shared interrupts, we need to have one interrupt
518  * handler that ensures that the IRQ line has been deasserted
519  * before returning.  Failing to do this will result in the IRQ
520  * line being stuck active, and, since ISA irqs are edge triggered,
521  * no more IRQs will be seen.
522  */
523 static void serial_do_unlink(struct irq_info *i, struct uart_sio_port *up)
524 {
525         spin_lock_irq(&i->lock);
526
527         if (!list_empty(i->head)) {
528                 if (i->head == &up->list)
529                         i->head = i->head->next;
530                 list_del(&up->list);
531         } else {
532                 BUG_ON(i->head != &up->list);
533                 i->head = NULL;
534         }
535
536         spin_unlock_irq(&i->lock);
537 }
538
539 static int serial_link_irq_chain(struct uart_sio_port *up)
540 {
541         struct irq_info *i = irq_lists + up->port.irq;
542         int ret, irq_flags = 0;
543
544         spin_lock_irq(&i->lock);
545
546         if (i->head) {
547                 list_add(&up->list, i->head);
548                 spin_unlock_irq(&i->lock);
549
550                 ret = 0;
551         } else {
552                 INIT_LIST_HEAD(&up->list);
553                 i->head = &up->list;
554                 spin_unlock_irq(&i->lock);
555
556                 ret = request_irq(up->port.irq, m32r_sio_interrupt,
557                                   irq_flags, "SIO0-RX", i);
558                 ret |= request_irq(up->port.irq + 1, m32r_sio_interrupt,
559                                   irq_flags, "SIO0-TX", i);
560                 if (ret < 0)
561                         serial_do_unlink(i, up);
562         }
563
564         return ret;
565 }
566
567 static void serial_unlink_irq_chain(struct uart_sio_port *up)
568 {
569         struct irq_info *i = irq_lists + up->port.irq;
570
571         BUG_ON(i->head == NULL);
572
573         if (list_empty(i->head)) {
574                 free_irq(up->port.irq, i);
575                 free_irq(up->port.irq + 1, i);
576         }
577
578         serial_do_unlink(i, up);
579 }
580
581 /*
582  * This function is used to handle ports that do not have an interrupt.
583  */
584 static void m32r_sio_timeout(unsigned long data)
585 {
586         struct uart_sio_port *up = (struct uart_sio_port *)data;
587         unsigned int timeout;
588         unsigned int sts;
589
590         sts = sio_in(up, SIOSTS);
591         if (sts & 0x5) {
592                 spin_lock(&up->port.lock);
593                 m32r_sio_handle_port(up, sts);
594                 spin_unlock(&up->port.lock);
595         }
596
597         timeout = up->port.timeout;
598         timeout = timeout > 6 ? (timeout / 2 - 2) : 1;
599         mod_timer(&up->timer, jiffies + timeout);
600 }
601
602 static unsigned int m32r_sio_tx_empty(struct uart_port *port)
603 {
604         struct uart_sio_port *up = (struct uart_sio_port *)port;
605         unsigned long flags;
606         unsigned int ret;
607
608         spin_lock_irqsave(&up->port.lock, flags);
609         ret = serial_in(up, UART_LSR) & UART_LSR_TEMT ? TIOCSER_TEMT : 0;
610         spin_unlock_irqrestore(&up->port.lock, flags);
611
612         return ret;
613 }
614
615 static unsigned int m32r_sio_get_mctrl(struct uart_port *port)
616 {
617         return 0;
618 }
619
620 static void m32r_sio_set_mctrl(struct uart_port *port, unsigned int mctrl)
621 {
622
623 }
624
625 static void m32r_sio_break_ctl(struct uart_port *port, int break_state)
626 {
627
628 }
629
630 static int m32r_sio_startup(struct uart_port *port)
631 {
632         struct uart_sio_port *up = (struct uart_sio_port *)port;
633         int retval;
634
635         sio_init();
636
637         /*
638          * If the "interrupt" for this port doesn't correspond with any
639          * hardware interrupt, we use a timer-based system.  The original
640          * driver used to do this with IRQ0.
641          */
642         if (!is_real_interrupt(up->port.irq)) {
643                 unsigned int timeout = up->port.timeout;
644
645                 timeout = timeout > 6 ? (timeout / 2 - 2) : 1;
646
647                 up->timer.data = (unsigned long)up;
648                 mod_timer(&up->timer, jiffies + timeout);
649         } else {
650                 retval = serial_link_irq_chain(up);
651                 if (retval)
652                         return retval;
653         }
654
655         /*
656          * Finally, enable interrupts.  Note: Modem status interrupts
657          * are set via set_termios(), which will be occurring imminently
658          * anyway, so we don't enable them here.
659          * - M32R_SIO: 0x0c
660          * - M32R_PLDSIO: 0x04
661          */
662         up->ier = UART_IER_MSI | UART_IER_RLSI | UART_IER_RDI;
663         sio_out(up, SIOTRCR, up->ier);
664
665         /*
666          * And clear the interrupt registers again for luck.
667          */
668         sio_reset();
669
670         return 0;
671 }
672
673 static void m32r_sio_shutdown(struct uart_port *port)
674 {
675         struct uart_sio_port *up = (struct uart_sio_port *)port;
676
677         /*
678          * Disable interrupts from this port
679          */
680         up->ier = 0;
681         sio_out(up, SIOTRCR, 0);
682
683         /*
684          * Disable break condition and FIFOs
685          */
686
687         sio_init();
688
689         if (!is_real_interrupt(up->port.irq))
690                 del_timer_sync(&up->timer);
691         else
692                 serial_unlink_irq_chain(up);
693 }
694
695 static unsigned int m32r_sio_get_divisor(struct uart_port *port,
696         unsigned int baud)
697 {
698         return uart_get_divisor(port, baud);
699 }
700
701 static void m32r_sio_set_termios(struct uart_port *port,
702         struct ktermios *termios, struct ktermios *old)
703 {
704         struct uart_sio_port *up = (struct uart_sio_port *)port;
705         unsigned char cval = 0;
706         unsigned long flags;
707         unsigned int baud, quot;
708
709         switch (termios->c_cflag & CSIZE) {
710         case CS5:
711                 cval = UART_LCR_WLEN5;
712                 break;
713         case CS6:
714                 cval = UART_LCR_WLEN6;
715                 break;
716         case CS7:
717                 cval = UART_LCR_WLEN7;
718                 break;
719         default:
720         case CS8:
721                 cval = UART_LCR_WLEN8;
722                 break;
723         }
724
725         if (termios->c_cflag & CSTOPB)
726                 cval |= UART_LCR_STOP;
727         if (termios->c_cflag & PARENB)
728                 cval |= UART_LCR_PARITY;
729         if (!(termios->c_cflag & PARODD))
730                 cval |= UART_LCR_EPAR;
731 #ifdef CMSPAR
732         if (termios->c_cflag & CMSPAR)
733                 cval |= UART_LCR_SPAR;
734 #endif
735
736         /*
737          * Ask the core to calculate the divisor for us.
738          */
739 #ifdef CONFIG_SERIAL_M32R_PLDSIO
740         baud = uart_get_baud_rate(port, termios, old, 0, port->uartclk/4);
741 #else
742         baud = uart_get_baud_rate(port, termios, old, 0, port->uartclk/16);
743 #endif
744         quot = m32r_sio_get_divisor(port, baud);
745
746         /*
747          * Ok, we're now changing the port state.  Do it with
748          * interrupts disabled.
749          */
750         spin_lock_irqsave(&up->port.lock, flags);
751
752         sio_set_baud_rate(baud);
753
754         /*
755          * Update the per-port timeout.
756          */
757         uart_update_timeout(port, termios->c_cflag, baud);
758
759         up->port.read_status_mask = UART_LSR_OE | UART_LSR_THRE | UART_LSR_DR;
760         if (termios->c_iflag & INPCK)
761                 up->port.read_status_mask |= UART_LSR_FE | UART_LSR_PE;
762         if (termios->c_iflag & (BRKINT | PARMRK))
763                 up->port.read_status_mask |= UART_LSR_BI;
764
765         /*
766          * Characteres to ignore
767          */
768         up->port.ignore_status_mask = 0;
769         if (termios->c_iflag & IGNPAR)
770                 up->port.ignore_status_mask |= UART_LSR_PE | UART_LSR_FE;
771         if (termios->c_iflag & IGNBRK) {
772                 up->port.ignore_status_mask |= UART_LSR_BI;
773                 /*
774                  * If we're ignoring parity and break indicators,
775                  * ignore overruns too (for real raw support).
776                  */
777                 if (termios->c_iflag & IGNPAR)
778                         up->port.ignore_status_mask |= UART_LSR_OE;
779         }
780
781         /*
782          * ignore all characters if CREAD is not set
783          */
784         if ((termios->c_cflag & CREAD) == 0)
785                 up->port.ignore_status_mask |= UART_LSR_DR;
786
787         /*
788          * CTS flow control flag and modem status interrupts
789          */
790         up->ier &= ~UART_IER_MSI;
791         if (UART_ENABLE_MS(&up->port, termios->c_cflag))
792                 up->ier |= UART_IER_MSI;
793
794         serial_out(up, UART_IER, up->ier);
795
796         up->lcr = cval;                                 /* Save LCR */
797         spin_unlock_irqrestore(&up->port.lock, flags);
798 }
799
800 static void m32r_sio_pm(struct uart_port *port, unsigned int state,
801         unsigned int oldstate)
802 {
803         struct uart_sio_port *up = (struct uart_sio_port *)port;
804
805         if (up->pm)
806                 up->pm(port, state, oldstate);
807 }
808
809 /*
810  * Resource handling.  This is complicated by the fact that resources
811  * depend on the port type.  Maybe we should be claiming the standard
812  * 8250 ports, and then trying to get other resources as necessary?
813  */
814 static int
815 m32r_sio_request_std_resource(struct uart_sio_port *up, struct resource **res)
816 {
817         unsigned int size = 8 << up->port.regshift;
818 #ifndef CONFIG_SERIAL_M32R_PLDSIO
819         unsigned long start;
820 #endif
821         int ret = 0;
822
823         switch (up->port.iotype) {
824         case UPIO_MEM:
825                 if (up->port.mapbase) {
826 #ifdef CONFIG_SERIAL_M32R_PLDSIO
827                         *res = request_mem_region(up->port.mapbase, size, "serial");
828 #else
829                         start = up->port.mapbase;
830                         *res = request_mem_region(start, size, "serial");
831 #endif
832                         if (!*res)
833                                 ret = -EBUSY;
834                 }
835                 break;
836
837         case UPIO_PORT:
838                 *res = request_region(up->port.iobase, size, "serial");
839                 if (!*res)
840                         ret = -EBUSY;
841                 break;
842         }
843         return ret;
844 }
845
846 static void m32r_sio_release_port(struct uart_port *port)
847 {
848         struct uart_sio_port *up = (struct uart_sio_port *)port;
849         unsigned long start, offset = 0, size = 0;
850
851         size <<= up->port.regshift;
852
853         switch (up->port.iotype) {
854         case UPIO_MEM:
855                 if (up->port.mapbase) {
856                         /*
857                          * Unmap the area.
858                          */
859                         iounmap(up->port.membase);
860                         up->port.membase = NULL;
861
862                         start = up->port.mapbase;
863
864                         if (size)
865                                 release_mem_region(start + offset, size);
866                         release_mem_region(start, 8 << up->port.regshift);
867                 }
868                 break;
869
870         case UPIO_PORT:
871                 start = up->port.iobase;
872
873                 if (size)
874                         release_region(start + offset, size);
875                 release_region(start + offset, 8 << up->port.regshift);
876                 break;
877
878         default:
879                 break;
880         }
881 }
882
883 static int m32r_sio_request_port(struct uart_port *port)
884 {
885         struct uart_sio_port *up = (struct uart_sio_port *)port;
886         struct resource *res = NULL;
887         int ret = 0;
888
889         ret = m32r_sio_request_std_resource(up, &res);
890
891         /*
892          * If we have a mapbase, then request that as well.
893          */
894         if (ret == 0 && up->port.flags & UPF_IOREMAP) {
895                 int size = res->end - res->start + 1;
896
897                 up->port.membase = ioremap(up->port.mapbase, size);
898                 if (!up->port.membase)
899                         ret = -ENOMEM;
900         }
901
902         if (ret < 0) {
903                 if (res)
904                         release_resource(res);
905         }
906
907         return ret;
908 }
909
910 static void m32r_sio_config_port(struct uart_port *port, int flags)
911 {
912         struct uart_sio_port *up = (struct uart_sio_port *)port;
913
914         spin_lock_irqsave(&up->port.lock, flags);
915
916         up->port.type = (PORT_M32R_SIO - PORT_M32R_BASE + 1);
917         up->port.fifosize = uart_config[up->port.type].dfl_xmit_fifo_size;
918
919         spin_unlock_irqrestore(&up->port.lock, flags);
920 }
921
922 static int
923 m32r_sio_verify_port(struct uart_port *port, struct serial_struct *ser)
924 {
925         if (ser->irq >= nr_irqs || ser->irq < 0 ||
926             ser->baud_base < 9600 || ser->type < PORT_UNKNOWN ||
927             ser->type >= ARRAY_SIZE(uart_config))
928                 return -EINVAL;
929         return 0;
930 }
931
932 static const char *
933 m32r_sio_type(struct uart_port *port)
934 {
935         int type = port->type;
936
937         if (type >= ARRAY_SIZE(uart_config))
938                 type = 0;
939         return uart_config[type].name;
940 }
941
942 static struct uart_ops m32r_sio_pops = {
943         .tx_empty       = m32r_sio_tx_empty,
944         .set_mctrl      = m32r_sio_set_mctrl,
945         .get_mctrl      = m32r_sio_get_mctrl,
946         .stop_tx        = m32r_sio_stop_tx,
947         .start_tx       = m32r_sio_start_tx,
948         .stop_rx        = m32r_sio_stop_rx,
949         .enable_ms      = m32r_sio_enable_ms,
950         .break_ctl      = m32r_sio_break_ctl,
951         .startup        = m32r_sio_startup,
952         .shutdown       = m32r_sio_shutdown,
953         .set_termios    = m32r_sio_set_termios,
954         .pm             = m32r_sio_pm,
955         .type           = m32r_sio_type,
956         .release_port   = m32r_sio_release_port,
957         .request_port   = m32r_sio_request_port,
958         .config_port    = m32r_sio_config_port,
959         .verify_port    = m32r_sio_verify_port,
960 };
961
962 static struct uart_sio_port m32r_sio_ports[UART_NR];
963
964 static void __init m32r_sio_init_ports(void)
965 {
966         struct uart_sio_port *up;
967         static int first = 1;
968         int i;
969
970         if (!first)
971                 return;
972         first = 0;
973
974         for (i = 0, up = m32r_sio_ports; i < ARRAY_SIZE(old_serial_port);
975              i++, up++) {
976                 up->port.iobase   = old_serial_port[i].port;
977                 up->port.irq      = irq_canonicalize(old_serial_port[i].irq);
978                 up->port.uartclk  = old_serial_port[i].baud_base * 16;
979                 up->port.flags    = old_serial_port[i].flags;
980                 up->port.membase  = old_serial_port[i].iomem_base;
981                 up->port.iotype   = old_serial_port[i].io_type;
982                 up->port.regshift = old_serial_port[i].iomem_reg_shift;
983                 up->port.ops      = &m32r_sio_pops;
984         }
985 }
986
987 static void __init m32r_sio_register_ports(struct uart_driver *drv)
988 {
989         int i;
990
991         m32r_sio_init_ports();
992
993         for (i = 0; i < UART_NR; i++) {
994                 struct uart_sio_port *up = &m32r_sio_ports[i];
995
996                 up->port.line = i;
997                 up->port.ops = &m32r_sio_pops;
998                 init_timer(&up->timer);
999                 up->timer.function = m32r_sio_timeout;
1000
1001                 /*
1002                  * ALPHA_KLUDGE_MCR needs to be killed.
1003                  */
1004                 up->mcr_mask = ~ALPHA_KLUDGE_MCR;
1005                 up->mcr_force = ALPHA_KLUDGE_MCR;
1006
1007                 uart_add_one_port(drv, &up->port);
1008         }
1009 }
1010
1011 #ifdef CONFIG_SERIAL_M32R_SIO_CONSOLE
1012
1013 /*
1014  *      Wait for transmitter & holding register to empty
1015  */
1016 static inline void wait_for_xmitr(struct uart_sio_port *up)
1017 {
1018         unsigned int status, tmout = 10000;
1019
1020         /* Wait up to 10ms for the character(s) to be sent. */
1021         do {
1022                 status = sio_in(up, SIOSTS);
1023
1024                 if (--tmout == 0)
1025                         break;
1026                 udelay(1);
1027         } while ((status & UART_EMPTY) != UART_EMPTY);
1028
1029         /* Wait up to 1s for flow control if necessary */
1030         if (up->port.flags & UPF_CONS_FLOW) {
1031                 tmout = 1000000;
1032                 while (--tmout)
1033                         udelay(1);
1034         }
1035 }
1036
1037 static void m32r_sio_console_putchar(struct uart_port *port, int ch)
1038 {
1039         struct uart_sio_port *up = (struct uart_sio_port *)port;
1040
1041         wait_for_xmitr(up);
1042         sio_out(up, SIOTXB, ch);
1043 }
1044
1045 /*
1046  *      Print a string to the serial port trying not to disturb
1047  *      any possible real use of the port...
1048  *
1049  *      The console_lock must be held when we get here.
1050  */
1051 static void m32r_sio_console_write(struct console *co, const char *s,
1052         unsigned int count)
1053 {
1054         struct uart_sio_port *up = &m32r_sio_ports[co->index];
1055         unsigned int ier;
1056
1057         /*
1058          *      First save the UER then disable the interrupts
1059          */
1060         ier = sio_in(up, SIOTRCR);
1061         sio_out(up, SIOTRCR, 0);
1062
1063         uart_console_write(&up->port, s, count, m32r_sio_console_putchar);
1064
1065         /*
1066          *      Finally, wait for transmitter to become empty
1067          *      and restore the IER
1068          */
1069         wait_for_xmitr(up);
1070         sio_out(up, SIOTRCR, ier);
1071 }
1072
1073 static int __init m32r_sio_console_setup(struct console *co, char *options)
1074 {
1075         struct uart_port *port;
1076         int baud = 9600;
1077         int bits = 8;
1078         int parity = 'n';
1079         int flow = 'n';
1080
1081         /*
1082          * Check whether an invalid uart number has been specified, and
1083          * if so, search for the first available port that does have
1084          * console support.
1085          */
1086         if (co->index >= UART_NR)
1087                 co->index = 0;
1088         port = &m32r_sio_ports[co->index].port;
1089
1090         /*
1091          * Temporary fix.
1092          */
1093         spin_lock_init(&port->lock);
1094
1095         if (options)
1096                 uart_parse_options(options, &baud, &parity, &bits, &flow);
1097
1098         return uart_set_options(port, co, baud, parity, bits, flow);
1099 }
1100
1101 static struct uart_driver m32r_sio_reg;
1102 static struct console m32r_sio_console = {
1103         .name           = "ttyS",
1104         .write          = m32r_sio_console_write,
1105         .device         = uart_console_device,
1106         .setup          = m32r_sio_console_setup,
1107         .flags          = CON_PRINTBUFFER,
1108         .index          = -1,
1109         .data           = &m32r_sio_reg,
1110 };
1111
1112 static int __init m32r_sio_console_init(void)
1113 {
1114         sio_reset();
1115         sio_init();
1116         m32r_sio_init_ports();
1117         register_console(&m32r_sio_console);
1118         return 0;
1119 }
1120 console_initcall(m32r_sio_console_init);
1121
1122 #define M32R_SIO_CONSOLE        &m32r_sio_console
1123 #else
1124 #define M32R_SIO_CONSOLE        NULL
1125 #endif
1126
1127 static struct uart_driver m32r_sio_reg = {
1128         .owner                  = THIS_MODULE,
1129         .driver_name            = "sio",
1130         .dev_name               = "ttyS",
1131         .major                  = TTY_MAJOR,
1132         .minor                  = 64,
1133         .nr                     = UART_NR,
1134         .cons                   = M32R_SIO_CONSOLE,
1135 };
1136
1137 /**
1138  *      m32r_sio_suspend_port - suspend one serial port
1139  *      @line: serial line number
1140  *
1141  *      Suspend one serial port.
1142  */
1143 void m32r_sio_suspend_port(int line)
1144 {
1145         uart_suspend_port(&m32r_sio_reg, &m32r_sio_ports[line].port);
1146 }
1147
1148 /**
1149  *      m32r_sio_resume_port - resume one serial port
1150  *      @line: serial line number
1151  *
1152  *      Resume one serial port.
1153  */
1154 void m32r_sio_resume_port(int line)
1155 {
1156         uart_resume_port(&m32r_sio_reg, &m32r_sio_ports[line].port);
1157 }
1158
1159 static int __init m32r_sio_init(void)
1160 {
1161         int ret, i;
1162
1163         printk(KERN_INFO "Serial: M32R SIO driver\n");
1164
1165         for (i = 0; i < nr_irqs; i++)
1166                 spin_lock_init(&irq_lists[i].lock);
1167
1168         ret = uart_register_driver(&m32r_sio_reg);
1169         if (ret >= 0)
1170                 m32r_sio_register_ports(&m32r_sio_reg);
1171
1172         return ret;
1173 }
1174
1175 static void __exit m32r_sio_exit(void)
1176 {
1177         int i;
1178
1179         for (i = 0; i < UART_NR; i++)
1180                 uart_remove_one_port(&m32r_sio_reg, &m32r_sio_ports[i].port);
1181
1182         uart_unregister_driver(&m32r_sio_reg);
1183 }
1184
1185 module_init(m32r_sio_init);
1186 module_exit(m32r_sio_exit);
1187
1188 EXPORT_SYMBOL(m32r_sio_suspend_port);
1189 EXPORT_SYMBOL(m32r_sio_resume_port);
1190
1191 MODULE_LICENSE("GPL");
1192 MODULE_DESCRIPTION("Generic M32R SIO serial driver");