[BNX2]: Update version to 1.6.6.
[linux-2.6] / drivers / serial / sa1100.c
1 /*
2  *  linux/drivers/char/sa1100.c
3  *
4  *  Driver for SA11x0 serial ports
5  *
6  *  Based on drivers/char/serial.c, by Linus Torvalds, Theodore Ts'o.
7  *
8  *  Copyright (C) 2000 Deep Blue Solutions Ltd.
9  *
10  * This program is free software; you can redistribute it and/or modify
11  * it under the terms of the GNU General Public License as published by
12  * the Free Software Foundation; either version 2 of the License, or
13  * (at your option) any later version.
14  *
15  * This program is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18  * GNU General Public License for more details.
19  *
20  * You should have received a copy of the GNU General Public License
21  * along with this program; if not, write to the Free Software
22  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
23  *
24  *  $Id: sa1100.c,v 1.50 2002/07/29 14:41:04 rmk Exp $
25  *
26  */
27
28 #if defined(CONFIG_SERIAL_SA1100_CONSOLE) && defined(CONFIG_MAGIC_SYSRQ)
29 #define SUPPORT_SYSRQ
30 #endif
31
32 #include <linux/module.h>
33 #include <linux/ioport.h>
34 #include <linux/init.h>
35 #include <linux/console.h>
36 #include <linux/sysrq.h>
37 #include <linux/platform_device.h>
38 #include <linux/tty.h>
39 #include <linux/tty_flip.h>
40 #include <linux/serial_core.h>
41 #include <linux/serial.h>
42
43 #include <asm/io.h>
44 #include <asm/irq.h>
45 #include <asm/hardware.h>
46 #include <asm/mach/serial_sa1100.h>
47
48 /* We've been assigned a range on the "Low-density serial ports" major */
49 #define SERIAL_SA1100_MAJOR     204
50 #define MINOR_START             5
51
52 #define NR_PORTS                3
53
54 #define SA1100_ISR_PASS_LIMIT   256
55
56 /*
57  * Convert from ignore_status_mask or read_status_mask to UTSR[01]
58  */
59 #define SM_TO_UTSR0(x)  ((x) & 0xff)
60 #define SM_TO_UTSR1(x)  ((x) >> 8)
61 #define UTSR0_TO_SM(x)  ((x))
62 #define UTSR1_TO_SM(x)  ((x) << 8)
63
64 #define UART_GET_UTCR0(sport)   __raw_readl((sport)->port.membase + UTCR0)
65 #define UART_GET_UTCR1(sport)   __raw_readl((sport)->port.membase + UTCR1)
66 #define UART_GET_UTCR2(sport)   __raw_readl((sport)->port.membase + UTCR2)
67 #define UART_GET_UTCR3(sport)   __raw_readl((sport)->port.membase + UTCR3)
68 #define UART_GET_UTSR0(sport)   __raw_readl((sport)->port.membase + UTSR0)
69 #define UART_GET_UTSR1(sport)   __raw_readl((sport)->port.membase + UTSR1)
70 #define UART_GET_CHAR(sport)    __raw_readl((sport)->port.membase + UTDR)
71
72 #define UART_PUT_UTCR0(sport,v) __raw_writel((v),(sport)->port.membase + UTCR0)
73 #define UART_PUT_UTCR1(sport,v) __raw_writel((v),(sport)->port.membase + UTCR1)
74 #define UART_PUT_UTCR2(sport,v) __raw_writel((v),(sport)->port.membase + UTCR2)
75 #define UART_PUT_UTCR3(sport,v) __raw_writel((v),(sport)->port.membase + UTCR3)
76 #define UART_PUT_UTSR0(sport,v) __raw_writel((v),(sport)->port.membase + UTSR0)
77 #define UART_PUT_UTSR1(sport,v) __raw_writel((v),(sport)->port.membase + UTSR1)
78 #define UART_PUT_CHAR(sport,v)  __raw_writel((v),(sport)->port.membase + UTDR)
79
80 /*
81  * This is the size of our serial port register set.
82  */
83 #define UART_PORT_SIZE  0x24
84
85 /*
86  * This determines how often we check the modem status signals
87  * for any change.  They generally aren't connected to an IRQ
88  * so we have to poll them.  We also check immediately before
89  * filling the TX fifo incase CTS has been dropped.
90  */
91 #define MCTRL_TIMEOUT   (250*HZ/1000)
92
93 struct sa1100_port {
94         struct uart_port        port;
95         struct timer_list       timer;
96         unsigned int            old_status;
97 };
98
99 /*
100  * Handle any change of modem status signal since we were last called.
101  */
102 static void sa1100_mctrl_check(struct sa1100_port *sport)
103 {
104         unsigned int status, changed;
105
106         status = sport->port.ops->get_mctrl(&sport->port);
107         changed = status ^ sport->old_status;
108
109         if (changed == 0)
110                 return;
111
112         sport->old_status = status;
113
114         if (changed & TIOCM_RI)
115                 sport->port.icount.rng++;
116         if (changed & TIOCM_DSR)
117                 sport->port.icount.dsr++;
118         if (changed & TIOCM_CAR)
119                 uart_handle_dcd_change(&sport->port, status & TIOCM_CAR);
120         if (changed & TIOCM_CTS)
121                 uart_handle_cts_change(&sport->port, status & TIOCM_CTS);
122
123         wake_up_interruptible(&sport->port.info->delta_msr_wait);
124 }
125
126 /*
127  * This is our per-port timeout handler, for checking the
128  * modem status signals.
129  */
130 static void sa1100_timeout(unsigned long data)
131 {
132         struct sa1100_port *sport = (struct sa1100_port *)data;
133         unsigned long flags;
134
135         if (sport->port.info) {
136                 spin_lock_irqsave(&sport->port.lock, flags);
137                 sa1100_mctrl_check(sport);
138                 spin_unlock_irqrestore(&sport->port.lock, flags);
139
140                 mod_timer(&sport->timer, jiffies + MCTRL_TIMEOUT);
141         }
142 }
143
144 /*
145  * interrupts disabled on entry
146  */
147 static void sa1100_stop_tx(struct uart_port *port)
148 {
149         struct sa1100_port *sport = (struct sa1100_port *)port;
150         u32 utcr3;
151
152         utcr3 = UART_GET_UTCR3(sport);
153         UART_PUT_UTCR3(sport, utcr3 & ~UTCR3_TIE);
154         sport->port.read_status_mask &= ~UTSR0_TO_SM(UTSR0_TFS);
155 }
156
157 /*
158  * port locked and interrupts disabled
159  */
160 static void sa1100_start_tx(struct uart_port *port)
161 {
162         struct sa1100_port *sport = (struct sa1100_port *)port;
163         u32 utcr3;
164
165         utcr3 = UART_GET_UTCR3(sport);
166         sport->port.read_status_mask |= UTSR0_TO_SM(UTSR0_TFS);
167         UART_PUT_UTCR3(sport, utcr3 | UTCR3_TIE);
168 }
169
170 /*
171  * Interrupts enabled
172  */
173 static void sa1100_stop_rx(struct uart_port *port)
174 {
175         struct sa1100_port *sport = (struct sa1100_port *)port;
176         u32 utcr3;
177
178         utcr3 = UART_GET_UTCR3(sport);
179         UART_PUT_UTCR3(sport, utcr3 & ~UTCR3_RIE);
180 }
181
182 /*
183  * Set the modem control timer to fire immediately.
184  */
185 static void sa1100_enable_ms(struct uart_port *port)
186 {
187         struct sa1100_port *sport = (struct sa1100_port *)port;
188
189         mod_timer(&sport->timer, jiffies);
190 }
191
192 static void
193 sa1100_rx_chars(struct sa1100_port *sport)
194 {
195         struct tty_struct *tty = sport->port.info->tty;
196         unsigned int status, ch, flg;
197
198         status = UTSR1_TO_SM(UART_GET_UTSR1(sport)) |
199                  UTSR0_TO_SM(UART_GET_UTSR0(sport));
200         while (status & UTSR1_TO_SM(UTSR1_RNE)) {
201                 ch = UART_GET_CHAR(sport);
202
203                 sport->port.icount.rx++;
204
205                 flg = TTY_NORMAL;
206
207                 /*
208                  * note that the error handling code is
209                  * out of the main execution path
210                  */
211                 if (status & UTSR1_TO_SM(UTSR1_PRE | UTSR1_FRE | UTSR1_ROR)) {
212                         if (status & UTSR1_TO_SM(UTSR1_PRE))
213                                 sport->port.icount.parity++;
214                         else if (status & UTSR1_TO_SM(UTSR1_FRE))
215                                 sport->port.icount.frame++;
216                         if (status & UTSR1_TO_SM(UTSR1_ROR))
217                                 sport->port.icount.overrun++;
218
219                         status &= sport->port.read_status_mask;
220
221                         if (status & UTSR1_TO_SM(UTSR1_PRE))
222                                 flg = TTY_PARITY;
223                         else if (status & UTSR1_TO_SM(UTSR1_FRE))
224                                 flg = TTY_FRAME;
225
226 #ifdef SUPPORT_SYSRQ
227                         sport->port.sysrq = 0;
228 #endif
229                 }
230
231                 if (uart_handle_sysrq_char(&sport->port, ch))
232                         goto ignore_char;
233
234                 uart_insert_char(&sport->port, status, UTSR1_TO_SM(UTSR1_ROR), ch, flg);
235
236         ignore_char:
237                 status = UTSR1_TO_SM(UART_GET_UTSR1(sport)) |
238                          UTSR0_TO_SM(UART_GET_UTSR0(sport));
239         }
240         tty_flip_buffer_push(tty);
241 }
242
243 static void sa1100_tx_chars(struct sa1100_port *sport)
244 {
245         struct circ_buf *xmit = &sport->port.info->xmit;
246
247         if (sport->port.x_char) {
248                 UART_PUT_CHAR(sport, sport->port.x_char);
249                 sport->port.icount.tx++;
250                 sport->port.x_char = 0;
251                 return;
252         }
253
254         /*
255          * Check the modem control lines before
256          * transmitting anything.
257          */
258         sa1100_mctrl_check(sport);
259
260         if (uart_circ_empty(xmit) || uart_tx_stopped(&sport->port)) {
261                 sa1100_stop_tx(&sport->port);
262                 return;
263         }
264
265         /*
266          * Tried using FIFO (not checking TNF) for fifo fill:
267          * still had the '4 bytes repeated' problem.
268          */
269         while (UART_GET_UTSR1(sport) & UTSR1_TNF) {
270                 UART_PUT_CHAR(sport, xmit->buf[xmit->tail]);
271                 xmit->tail = (xmit->tail + 1) & (UART_XMIT_SIZE - 1);
272                 sport->port.icount.tx++;
273                 if (uart_circ_empty(xmit))
274                         break;
275         }
276
277         if (uart_circ_chars_pending(xmit) < WAKEUP_CHARS)
278                 uart_write_wakeup(&sport->port);
279
280         if (uart_circ_empty(xmit))
281                 sa1100_stop_tx(&sport->port);
282 }
283
284 static irqreturn_t sa1100_int(int irq, void *dev_id)
285 {
286         struct sa1100_port *sport = dev_id;
287         unsigned int status, pass_counter = 0;
288
289         spin_lock(&sport->port.lock);
290         status = UART_GET_UTSR0(sport);
291         status &= SM_TO_UTSR0(sport->port.read_status_mask) | ~UTSR0_TFS;
292         do {
293                 if (status & (UTSR0_RFS | UTSR0_RID)) {
294                         /* Clear the receiver idle bit, if set */
295                         if (status & UTSR0_RID)
296                                 UART_PUT_UTSR0(sport, UTSR0_RID);
297                         sa1100_rx_chars(sport);
298                 }
299
300                 /* Clear the relevant break bits */
301                 if (status & (UTSR0_RBB | UTSR0_REB))
302                         UART_PUT_UTSR0(sport, status & (UTSR0_RBB | UTSR0_REB));
303
304                 if (status & UTSR0_RBB)
305                         sport->port.icount.brk++;
306
307                 if (status & UTSR0_REB)
308                         uart_handle_break(&sport->port);
309
310                 if (status & UTSR0_TFS)
311                         sa1100_tx_chars(sport);
312                 if (pass_counter++ > SA1100_ISR_PASS_LIMIT)
313                         break;
314                 status = UART_GET_UTSR0(sport);
315                 status &= SM_TO_UTSR0(sport->port.read_status_mask) |
316                           ~UTSR0_TFS;
317         } while (status & (UTSR0_TFS | UTSR0_RFS | UTSR0_RID));
318         spin_unlock(&sport->port.lock);
319
320         return IRQ_HANDLED;
321 }
322
323 /*
324  * Return TIOCSER_TEMT when transmitter is not busy.
325  */
326 static unsigned int sa1100_tx_empty(struct uart_port *port)
327 {
328         struct sa1100_port *sport = (struct sa1100_port *)port;
329
330         return UART_GET_UTSR1(sport) & UTSR1_TBY ? 0 : TIOCSER_TEMT;
331 }
332
333 static unsigned int sa1100_get_mctrl(struct uart_port *port)
334 {
335         return TIOCM_CTS | TIOCM_DSR | TIOCM_CAR;
336 }
337
338 static void sa1100_set_mctrl(struct uart_port *port, unsigned int mctrl)
339 {
340 }
341
342 /*
343  * Interrupts always disabled.
344  */
345 static void sa1100_break_ctl(struct uart_port *port, int break_state)
346 {
347         struct sa1100_port *sport = (struct sa1100_port *)port;
348         unsigned long flags;
349         unsigned int utcr3;
350
351         spin_lock_irqsave(&sport->port.lock, flags);
352         utcr3 = UART_GET_UTCR3(sport);
353         if (break_state == -1)
354                 utcr3 |= UTCR3_BRK;
355         else
356                 utcr3 &= ~UTCR3_BRK;
357         UART_PUT_UTCR3(sport, utcr3);
358         spin_unlock_irqrestore(&sport->port.lock, flags);
359 }
360
361 static int sa1100_startup(struct uart_port *port)
362 {
363         struct sa1100_port *sport = (struct sa1100_port *)port;
364         int retval;
365
366         /*
367          * Allocate the IRQ
368          */
369         retval = request_irq(sport->port.irq, sa1100_int, 0,
370                              "sa11x0-uart", sport);
371         if (retval)
372                 return retval;
373
374         /*
375          * Finally, clear and enable interrupts
376          */
377         UART_PUT_UTSR0(sport, -1);
378         UART_PUT_UTCR3(sport, UTCR3_RXE | UTCR3_TXE | UTCR3_RIE);
379
380         /*
381          * Enable modem status interrupts
382          */
383         spin_lock_irq(&sport->port.lock);
384         sa1100_enable_ms(&sport->port);
385         spin_unlock_irq(&sport->port.lock);
386
387         return 0;
388 }
389
390 static void sa1100_shutdown(struct uart_port *port)
391 {
392         struct sa1100_port *sport = (struct sa1100_port *)port;
393
394         /*
395          * Stop our timer.
396          */
397         del_timer_sync(&sport->timer);
398
399         /*
400          * Free the interrupt
401          */
402         free_irq(sport->port.irq, sport);
403
404         /*
405          * Disable all interrupts, port and break condition.
406          */
407         UART_PUT_UTCR3(sport, 0);
408 }
409
410 static void
411 sa1100_set_termios(struct uart_port *port, struct ktermios *termios,
412                    struct ktermios *old)
413 {
414         struct sa1100_port *sport = (struct sa1100_port *)port;
415         unsigned long flags;
416         unsigned int utcr0, old_utcr3, baud, quot;
417         unsigned int old_csize = old ? old->c_cflag & CSIZE : CS8;
418
419         /*
420          * We only support CS7 and CS8.
421          */
422         while ((termios->c_cflag & CSIZE) != CS7 &&
423                (termios->c_cflag & CSIZE) != CS8) {
424                 termios->c_cflag &= ~CSIZE;
425                 termios->c_cflag |= old_csize;
426                 old_csize = CS8;
427         }
428
429         if ((termios->c_cflag & CSIZE) == CS8)
430                 utcr0 = UTCR0_DSS;
431         else
432                 utcr0 = 0;
433
434         if (termios->c_cflag & CSTOPB)
435                 utcr0 |= UTCR0_SBS;
436         if (termios->c_cflag & PARENB) {
437                 utcr0 |= UTCR0_PE;
438                 if (!(termios->c_cflag & PARODD))
439                         utcr0 |= UTCR0_OES;
440         }
441
442         /*
443          * Ask the core to calculate the divisor for us.
444          */
445         baud = uart_get_baud_rate(port, termios, old, 0, port->uartclk/16); 
446         quot = uart_get_divisor(port, baud);
447
448         spin_lock_irqsave(&sport->port.lock, flags);
449
450         sport->port.read_status_mask &= UTSR0_TO_SM(UTSR0_TFS);
451         sport->port.read_status_mask |= UTSR1_TO_SM(UTSR1_ROR);
452         if (termios->c_iflag & INPCK)
453                 sport->port.read_status_mask |=
454                                 UTSR1_TO_SM(UTSR1_FRE | UTSR1_PRE);
455         if (termios->c_iflag & (BRKINT | PARMRK))
456                 sport->port.read_status_mask |=
457                                 UTSR0_TO_SM(UTSR0_RBB | UTSR0_REB);
458
459         /*
460          * Characters to ignore
461          */
462         sport->port.ignore_status_mask = 0;
463         if (termios->c_iflag & IGNPAR)
464                 sport->port.ignore_status_mask |=
465                                 UTSR1_TO_SM(UTSR1_FRE | UTSR1_PRE);
466         if (termios->c_iflag & IGNBRK) {
467                 sport->port.ignore_status_mask |=
468                                 UTSR0_TO_SM(UTSR0_RBB | UTSR0_REB);
469                 /*
470                  * If we're ignoring parity and break indicators,
471                  * ignore overruns too (for real raw support).
472                  */
473                 if (termios->c_iflag & IGNPAR)
474                         sport->port.ignore_status_mask |=
475                                 UTSR1_TO_SM(UTSR1_ROR);
476         }
477
478         del_timer_sync(&sport->timer);
479
480         /*
481          * Update the per-port timeout.
482          */
483         uart_update_timeout(port, termios->c_cflag, baud);
484
485         /*
486          * disable interrupts and drain transmitter
487          */
488         old_utcr3 = UART_GET_UTCR3(sport);
489         UART_PUT_UTCR3(sport, old_utcr3 & ~(UTCR3_RIE | UTCR3_TIE));
490
491         while (UART_GET_UTSR1(sport) & UTSR1_TBY)
492                 barrier();
493
494         /* then, disable everything */
495         UART_PUT_UTCR3(sport, 0);
496
497         /* set the parity, stop bits and data size */
498         UART_PUT_UTCR0(sport, utcr0);
499
500         /* set the baud rate */
501         quot -= 1;
502         UART_PUT_UTCR1(sport, ((quot & 0xf00) >> 8));
503         UART_PUT_UTCR2(sport, (quot & 0xff));
504
505         UART_PUT_UTSR0(sport, -1);
506
507         UART_PUT_UTCR3(sport, old_utcr3);
508
509         if (UART_ENABLE_MS(&sport->port, termios->c_cflag))
510                 sa1100_enable_ms(&sport->port);
511
512         spin_unlock_irqrestore(&sport->port.lock, flags);
513 }
514
515 static const char *sa1100_type(struct uart_port *port)
516 {
517         struct sa1100_port *sport = (struct sa1100_port *)port;
518
519         return sport->port.type == PORT_SA1100 ? "SA1100" : NULL;
520 }
521
522 /*
523  * Release the memory region(s) being used by 'port'.
524  */
525 static void sa1100_release_port(struct uart_port *port)
526 {
527         struct sa1100_port *sport = (struct sa1100_port *)port;
528
529         release_mem_region(sport->port.mapbase, UART_PORT_SIZE);
530 }
531
532 /*
533  * Request the memory region(s) being used by 'port'.
534  */
535 static int sa1100_request_port(struct uart_port *port)
536 {
537         struct sa1100_port *sport = (struct sa1100_port *)port;
538
539         return request_mem_region(sport->port.mapbase, UART_PORT_SIZE,
540                         "sa11x0-uart") != NULL ? 0 : -EBUSY;
541 }
542
543 /*
544  * Configure/autoconfigure the port.
545  */
546 static void sa1100_config_port(struct uart_port *port, int flags)
547 {
548         struct sa1100_port *sport = (struct sa1100_port *)port;
549
550         if (flags & UART_CONFIG_TYPE &&
551             sa1100_request_port(&sport->port) == 0)
552                 sport->port.type = PORT_SA1100;
553 }
554
555 /*
556  * Verify the new serial_struct (for TIOCSSERIAL).
557  * The only change we allow are to the flags and type, and
558  * even then only between PORT_SA1100 and PORT_UNKNOWN
559  */
560 static int
561 sa1100_verify_port(struct uart_port *port, struct serial_struct *ser)
562 {
563         struct sa1100_port *sport = (struct sa1100_port *)port;
564         int ret = 0;
565
566         if (ser->type != PORT_UNKNOWN && ser->type != PORT_SA1100)
567                 ret = -EINVAL;
568         if (sport->port.irq != ser->irq)
569                 ret = -EINVAL;
570         if (ser->io_type != SERIAL_IO_MEM)
571                 ret = -EINVAL;
572         if (sport->port.uartclk / 16 != ser->baud_base)
573                 ret = -EINVAL;
574         if ((void *)sport->port.mapbase != ser->iomem_base)
575                 ret = -EINVAL;
576         if (sport->port.iobase != ser->port)
577                 ret = -EINVAL;
578         if (ser->hub6 != 0)
579                 ret = -EINVAL;
580         return ret;
581 }
582
583 static struct uart_ops sa1100_pops = {
584         .tx_empty       = sa1100_tx_empty,
585         .set_mctrl      = sa1100_set_mctrl,
586         .get_mctrl      = sa1100_get_mctrl,
587         .stop_tx        = sa1100_stop_tx,
588         .start_tx       = sa1100_start_tx,
589         .stop_rx        = sa1100_stop_rx,
590         .enable_ms      = sa1100_enable_ms,
591         .break_ctl      = sa1100_break_ctl,
592         .startup        = sa1100_startup,
593         .shutdown       = sa1100_shutdown,
594         .set_termios    = sa1100_set_termios,
595         .type           = sa1100_type,
596         .release_port   = sa1100_release_port,
597         .request_port   = sa1100_request_port,
598         .config_port    = sa1100_config_port,
599         .verify_port    = sa1100_verify_port,
600 };
601
602 static struct sa1100_port sa1100_ports[NR_PORTS];
603
604 /*
605  * Setup the SA1100 serial ports.  Note that we don't include the IrDA
606  * port here since we have our own SIR/FIR driver (see drivers/net/irda)
607  *
608  * Note also that we support "console=ttySAx" where "x" is either 0 or 1.
609  * Which serial port this ends up being depends on the machine you're
610  * running this kernel on.  I'm not convinced that this is a good idea,
611  * but that's the way it traditionally works.
612  *
613  * Note that NanoEngine UART3 becomes UART2, and UART2 is no longer
614  * used here.
615  */
616 static void __init sa1100_init_ports(void)
617 {
618         static int first = 1;
619         int i;
620
621         if (!first)
622                 return;
623         first = 0;
624
625         for (i = 0; i < NR_PORTS; i++) {
626                 sa1100_ports[i].port.uartclk   = 3686400;
627                 sa1100_ports[i].port.ops       = &sa1100_pops;
628                 sa1100_ports[i].port.fifosize  = 8;
629                 sa1100_ports[i].port.line      = i;
630                 sa1100_ports[i].port.iotype    = UPIO_MEM;
631                 init_timer(&sa1100_ports[i].timer);
632                 sa1100_ports[i].timer.function = sa1100_timeout;
633                 sa1100_ports[i].timer.data     = (unsigned long)&sa1100_ports[i];
634         }
635
636         /*
637          * make transmit lines outputs, so that when the port
638          * is closed, the output is in the MARK state.
639          */
640         PPDR |= PPC_TXD1 | PPC_TXD3;
641         PPSR |= PPC_TXD1 | PPC_TXD3;
642 }
643
644 void __init sa1100_register_uart_fns(struct sa1100_port_fns *fns)
645 {
646         if (fns->get_mctrl)
647                 sa1100_pops.get_mctrl = fns->get_mctrl;
648         if (fns->set_mctrl)
649                 sa1100_pops.set_mctrl = fns->set_mctrl;
650
651         sa1100_pops.pm       = fns->pm;
652         sa1100_pops.set_wake = fns->set_wake;
653 }
654
655 void __init sa1100_register_uart(int idx, int port)
656 {
657         if (idx >= NR_PORTS) {
658                 printk(KERN_ERR "%s: bad index number %d\n", __FUNCTION__, idx);
659                 return;
660         }
661
662         switch (port) {
663         case 1:
664                 sa1100_ports[idx].port.membase = (void __iomem *)&Ser1UTCR0;
665                 sa1100_ports[idx].port.mapbase = _Ser1UTCR0;
666                 sa1100_ports[idx].port.irq     = IRQ_Ser1UART;
667                 sa1100_ports[idx].port.flags   = UPF_BOOT_AUTOCONF;
668                 break;
669
670         case 2:
671                 sa1100_ports[idx].port.membase = (void __iomem *)&Ser2UTCR0;
672                 sa1100_ports[idx].port.mapbase = _Ser2UTCR0;
673                 sa1100_ports[idx].port.irq     = IRQ_Ser2ICP;
674                 sa1100_ports[idx].port.flags   = UPF_BOOT_AUTOCONF;
675                 break;
676
677         case 3:
678                 sa1100_ports[idx].port.membase = (void __iomem *)&Ser3UTCR0;
679                 sa1100_ports[idx].port.mapbase = _Ser3UTCR0;
680                 sa1100_ports[idx].port.irq     = IRQ_Ser3UART;
681                 sa1100_ports[idx].port.flags   = UPF_BOOT_AUTOCONF;
682                 break;
683
684         default:
685                 printk(KERN_ERR "%s: bad port number %d\n", __FUNCTION__, port);
686         }
687 }
688
689
690 #ifdef CONFIG_SERIAL_SA1100_CONSOLE
691 static void sa1100_console_putchar(struct uart_port *port, int ch)
692 {
693         struct sa1100_port *sport = (struct sa1100_port *)port;
694
695         while (!(UART_GET_UTSR1(sport) & UTSR1_TNF))
696                 barrier();
697         UART_PUT_CHAR(sport, ch);
698 }
699
700 /*
701  * Interrupts are disabled on entering
702  */
703 static void
704 sa1100_console_write(struct console *co, const char *s, unsigned int count)
705 {
706         struct sa1100_port *sport = &sa1100_ports[co->index];
707         unsigned int old_utcr3, status;
708
709         /*
710          *      First, save UTCR3 and then disable interrupts
711          */
712         old_utcr3 = UART_GET_UTCR3(sport);
713         UART_PUT_UTCR3(sport, (old_utcr3 & ~(UTCR3_RIE | UTCR3_TIE)) |
714                                 UTCR3_TXE);
715
716         uart_console_write(&sport->port, s, count, sa1100_console_putchar);
717
718         /*
719          *      Finally, wait for transmitter to become empty
720          *      and restore UTCR3
721          */
722         do {
723                 status = UART_GET_UTSR1(sport);
724         } while (status & UTSR1_TBY);
725         UART_PUT_UTCR3(sport, old_utcr3);
726 }
727
728 /*
729  * If the port was already initialised (eg, by a boot loader),
730  * try to determine the current setup.
731  */
732 static void __init
733 sa1100_console_get_options(struct sa1100_port *sport, int *baud,
734                            int *parity, int *bits)
735 {
736         unsigned int utcr3;
737
738         utcr3 = UART_GET_UTCR3(sport) & (UTCR3_RXE | UTCR3_TXE);
739         if (utcr3 == (UTCR3_RXE | UTCR3_TXE)) {
740                 /* ok, the port was enabled */
741                 unsigned int utcr0, quot;
742
743                 utcr0 = UART_GET_UTCR0(sport);
744
745                 *parity = 'n';
746                 if (utcr0 & UTCR0_PE) {
747                         if (utcr0 & UTCR0_OES)
748                                 *parity = 'e';
749                         else
750                                 *parity = 'o';
751                 }
752
753                 if (utcr0 & UTCR0_DSS)
754                         *bits = 8;
755                 else
756                         *bits = 7;
757
758                 quot = UART_GET_UTCR2(sport) | UART_GET_UTCR1(sport) << 8;
759                 quot &= 0xfff;
760                 *baud = sport->port.uartclk / (16 * (quot + 1));
761         }
762 }
763
764 static int __init
765 sa1100_console_setup(struct console *co, char *options)
766 {
767         struct sa1100_port *sport;
768         int baud = 9600;
769         int bits = 8;
770         int parity = 'n';
771         int flow = 'n';
772
773         /*
774          * Check whether an invalid uart number has been specified, and
775          * if so, search for the first available port that does have
776          * console support.
777          */
778         if (co->index == -1 || co->index >= NR_PORTS)
779                 co->index = 0;
780         sport = &sa1100_ports[co->index];
781
782         if (options)
783                 uart_parse_options(options, &baud, &parity, &bits, &flow);
784         else
785                 sa1100_console_get_options(sport, &baud, &parity, &bits);
786
787         return uart_set_options(&sport->port, co, baud, parity, bits, flow);
788 }
789
790 static struct uart_driver sa1100_reg;
791 static struct console sa1100_console = {
792         .name           = "ttySA",
793         .write          = sa1100_console_write,
794         .device         = uart_console_device,
795         .setup          = sa1100_console_setup,
796         .flags          = CON_PRINTBUFFER,
797         .index          = -1,
798         .data           = &sa1100_reg,
799 };
800
801 static int __init sa1100_rs_console_init(void)
802 {
803         sa1100_init_ports();
804         register_console(&sa1100_console);
805         return 0;
806 }
807 console_initcall(sa1100_rs_console_init);
808
809 #define SA1100_CONSOLE  &sa1100_console
810 #else
811 #define SA1100_CONSOLE  NULL
812 #endif
813
814 static struct uart_driver sa1100_reg = {
815         .owner                  = THIS_MODULE,
816         .driver_name            = "ttySA",
817         .dev_name               = "ttySA",
818         .major                  = SERIAL_SA1100_MAJOR,
819         .minor                  = MINOR_START,
820         .nr                     = NR_PORTS,
821         .cons                   = SA1100_CONSOLE,
822 };
823
824 static int sa1100_serial_suspend(struct platform_device *dev, pm_message_t state)
825 {
826         struct sa1100_port *sport = platform_get_drvdata(dev);
827
828         if (sport)
829                 uart_suspend_port(&sa1100_reg, &sport->port);
830
831         return 0;
832 }
833
834 static int sa1100_serial_resume(struct platform_device *dev)
835 {
836         struct sa1100_port *sport = platform_get_drvdata(dev);
837
838         if (sport)
839                 uart_resume_port(&sa1100_reg, &sport->port);
840
841         return 0;
842 }
843
844 static int sa1100_serial_probe(struct platform_device *dev)
845 {
846         struct resource *res = dev->resource;
847         int i;
848
849         for (i = 0; i < dev->num_resources; i++, res++)
850                 if (res->flags & IORESOURCE_MEM)
851                         break;
852
853         if (i < dev->num_resources) {
854                 for (i = 0; i < NR_PORTS; i++) {
855                         if (sa1100_ports[i].port.mapbase != res->start)
856                                 continue;
857
858                         sa1100_ports[i].port.dev = &dev->dev;
859                         uart_add_one_port(&sa1100_reg, &sa1100_ports[i].port);
860                         platform_set_drvdata(dev, &sa1100_ports[i]);
861                         break;
862                 }
863         }
864
865         return 0;
866 }
867
868 static int sa1100_serial_remove(struct platform_device *pdev)
869 {
870         struct sa1100_port *sport = platform_get_drvdata(pdev);
871
872         platform_set_drvdata(pdev, NULL);
873
874         if (sport)
875                 uart_remove_one_port(&sa1100_reg, &sport->port);
876
877         return 0;
878 }
879
880 static struct platform_driver sa11x0_serial_driver = {
881         .probe          = sa1100_serial_probe,
882         .remove         = sa1100_serial_remove,
883         .suspend        = sa1100_serial_suspend,
884         .resume         = sa1100_serial_resume,
885         .driver         = {
886                 .name   = "sa11x0-uart",
887         },
888 };
889
890 static int __init sa1100_serial_init(void)
891 {
892         int ret;
893
894         printk(KERN_INFO "Serial: SA11x0 driver $Revision: 1.50 $\n");
895
896         sa1100_init_ports();
897
898         ret = uart_register_driver(&sa1100_reg);
899         if (ret == 0) {
900                 ret = platform_driver_register(&sa11x0_serial_driver);
901                 if (ret)
902                         uart_unregister_driver(&sa1100_reg);
903         }
904         return ret;
905 }
906
907 static void __exit sa1100_serial_exit(void)
908 {
909         platform_driver_unregister(&sa11x0_serial_driver);
910         uart_unregister_driver(&sa1100_reg);
911 }
912
913 module_init(sa1100_serial_init);
914 module_exit(sa1100_serial_exit);
915
916 MODULE_AUTHOR("Deep Blue Solutions Ltd");
917 MODULE_DESCRIPTION("SA1100 generic serial port driver $Revision: 1.50 $");
918 MODULE_LICENSE("GPL");
919 MODULE_ALIAS_CHARDEV_MAJOR(SERIAL_SA1100_MAJOR);