Merge master.kernel.org:/home/rmk/linux-2.6-arm
[linux-2.6] / drivers / serial / mpc52xx_uart.c
1 /*
2  * drivers/serial/mpc52xx_uart.c
3  *
4  * Driver for the PSC of the Freescale MPC52xx PSCs configured as UARTs.
5  *
6  * FIXME According to the usermanual the status bits in the status register
7  * are only updated when the peripherals access the FIFO and not when the
8  * CPU access them. So since we use this bits to know when we stop writing
9  * and reading, they may not be updated in-time and a race condition may
10  * exists. But I haven't be able to prove this and I don't care. But if
11  * any problem arises, it might worth checking. The TX/RX FIFO Stats
12  * registers should be used in addition.
13  * Update: Actually, they seem updated ... At least the bits we use.
14  *
15  *
16  * Maintainer : Sylvain Munaut <tnt@246tNt.com>
17  * 
18  * Some of the code has been inspired/copied from the 2.4 code written
19  * by Dale Farnsworth <dfarnsworth@mvista.com>.
20  * 
21  * Copyright (C) 2004-2005 Sylvain Munaut <tnt@246tNt.com>
22  * Copyright (C) 2003 MontaVista, Software, Inc.
23  * 
24  * This file is licensed under the terms of the GNU General Public License
25  * version 2. This program is licensed "as is" without any warranty of any
26  * kind, whether express or implied.
27  */
28  
29 /* Platform device Usage :
30  *
31  * Since PSCs can have multiple function, the correct driver for each one
32  * is selected by calling mpc52xx_match_psc_function(...). The function
33  * handled by this driver is "uart".
34  *
35  * The driver init all necessary registers to place the PSC in uart mode without
36  * DCD. However, the pin multiplexing aren't changed and should be set either
37  * by the bootloader or in the platform init code.
38  *
39  * The idx field must be equal to the PSC index ( e.g. 0 for PSC1, 1 for PSC2,
40  * and so on). So the PSC1 is mapped to /dev/ttyS0, PSC2 to /dev/ttyS1 and so
41  * on. But be warned, it's an ABSOLUTE REQUIREMENT ! This is needed mainly for
42  * the console code : without this 1:1 mapping, at early boot time, when we are
43  * parsing the kernel args console=ttyS?, we wouldn't know wich PSC it will be
44  * mapped to.
45  */
46
47 #include <linux/config.h>
48 #include <linux/device.h>
49 #include <linux/module.h>
50 #include <linux/tty.h>
51 #include <linux/serial.h>
52 #include <linux/sysrq.h>
53 #include <linux/console.h>
54
55 #include <asm/delay.h>
56 #include <asm/io.h>
57
58 #include <asm/mpc52xx.h>
59 #include <asm/mpc52xx_psc.h>
60
61 #if defined(CONFIG_SERIAL_MPC52xx_CONSOLE) && defined(CONFIG_MAGIC_SYSRQ)
62 #define SUPPORT_SYSRQ
63 #endif
64
65 #include <linux/serial_core.h>
66
67
68
69 #define ISR_PASS_LIMIT 256      /* Max number of iteration in the interrupt */
70
71
72 static struct uart_port mpc52xx_uart_ports[MPC52xx_PSC_MAXNUM];
73         /* Rem: - We use the read_status_mask as a shadow of
74          *        psc->mpc52xx_psc_imr
75          *      - It's important that is array is all zero on start as we
76          *        use it to know if it's initialized or not ! If it's not sure
77          *        it's cleared, then a memset(...,0,...) should be added to
78          *        the console_init
79          */
80
81 #define PSC(port) ((struct mpc52xx_psc __iomem *)((port)->membase))
82
83
84 /* Forward declaration of the interruption handling routine */
85 static irqreturn_t mpc52xx_uart_int(int irq,void *dev_id,struct pt_regs *regs);
86
87
88 /* Simple macro to test if a port is console or not. This one is taken
89  * for serial_core.c and maybe should be moved to serial_core.h ? */
90 #ifdef CONFIG_SERIAL_CORE_CONSOLE
91 #define uart_console(port)      ((port)->cons && (port)->cons->index == (port)->line)
92 #else
93 #define uart_console(port)      (0)
94 #endif
95
96
97 /* ======================================================================== */
98 /* UART operations                                                          */
99 /* ======================================================================== */
100
101 static unsigned int 
102 mpc52xx_uart_tx_empty(struct uart_port *port)
103 {
104         int status = in_be16(&PSC(port)->mpc52xx_psc_status);
105         return (status & MPC52xx_PSC_SR_TXEMP) ? TIOCSER_TEMT : 0;
106 }
107
108 static void 
109 mpc52xx_uart_set_mctrl(struct uart_port *port, unsigned int mctrl)
110 {
111         /* Not implemented */
112 }
113
114 static unsigned int 
115 mpc52xx_uart_get_mctrl(struct uart_port *port)
116 {
117         /* Not implemented */
118         return TIOCM_CTS | TIOCM_DSR | TIOCM_CAR;
119 }
120
121 static void 
122 mpc52xx_uart_stop_tx(struct uart_port *port)
123 {
124         /* port->lock taken by caller */
125         port->read_status_mask &= ~MPC52xx_PSC_IMR_TXRDY;
126         out_be16(&PSC(port)->mpc52xx_psc_imr,port->read_status_mask);
127 }
128
129 static void 
130 mpc52xx_uart_start_tx(struct uart_port *port)
131 {
132         /* port->lock taken by caller */
133         port->read_status_mask |= MPC52xx_PSC_IMR_TXRDY;
134         out_be16(&PSC(port)->mpc52xx_psc_imr,port->read_status_mask);
135 }
136
137 static void 
138 mpc52xx_uart_send_xchar(struct uart_port *port, char ch)
139 {
140         unsigned long flags;
141         spin_lock_irqsave(&port->lock, flags);
142         
143         port->x_char = ch;
144         if (ch) {
145                 /* Make sure tx interrupts are on */
146                 /* Truly necessary ??? They should be anyway */
147                 port->read_status_mask |= MPC52xx_PSC_IMR_TXRDY;
148                 out_be16(&PSC(port)->mpc52xx_psc_imr,port->read_status_mask);
149         }
150         
151         spin_unlock_irqrestore(&port->lock, flags);
152 }
153
154 static void
155 mpc52xx_uart_stop_rx(struct uart_port *port)
156 {
157         /* port->lock taken by caller */
158         port->read_status_mask &= ~MPC52xx_PSC_IMR_RXRDY;
159         out_be16(&PSC(port)->mpc52xx_psc_imr,port->read_status_mask);
160 }
161
162 static void
163 mpc52xx_uart_enable_ms(struct uart_port *port)
164 {
165         /* Not implemented */
166 }
167
168 static void
169 mpc52xx_uart_break_ctl(struct uart_port *port, int ctl)
170 {
171         unsigned long flags;
172         spin_lock_irqsave(&port->lock, flags);
173
174         if ( ctl == -1 )
175                 out_8(&PSC(port)->command,MPC52xx_PSC_START_BRK);
176         else
177                 out_8(&PSC(port)->command,MPC52xx_PSC_STOP_BRK);
178         
179         spin_unlock_irqrestore(&port->lock, flags);
180 }
181
182 static int
183 mpc52xx_uart_startup(struct uart_port *port)
184 {
185         struct mpc52xx_psc __iomem *psc = PSC(port);
186         int ret;
187
188         /* Request IRQ */
189         ret = request_irq(port->irq, mpc52xx_uart_int,
190                 SA_INTERRUPT | SA_SAMPLE_RANDOM, "mpc52xx_psc_uart", port);
191         if (ret)
192                 return ret;
193
194         /* Reset/activate the port, clear and enable interrupts */
195         out_8(&psc->command,MPC52xx_PSC_RST_RX);
196         out_8(&psc->command,MPC52xx_PSC_RST_TX);
197         
198         out_be32(&psc->sicr,0); /* UART mode DCD ignored */
199
200         out_be16(&psc->mpc52xx_psc_clock_select, 0xdd00); /* /16 prescaler on */
201         
202         out_8(&psc->rfcntl, 0x00);
203         out_be16(&psc->rfalarm, 0x1ff);
204         out_8(&psc->tfcntl, 0x07);
205         out_be16(&psc->tfalarm, 0x80);
206
207         port->read_status_mask |= MPC52xx_PSC_IMR_RXRDY | MPC52xx_PSC_IMR_TXRDY;
208         out_be16(&psc->mpc52xx_psc_imr,port->read_status_mask);
209         
210         out_8(&psc->command,MPC52xx_PSC_TX_ENABLE);
211         out_8(&psc->command,MPC52xx_PSC_RX_ENABLE);
212                 
213         return 0;
214 }
215
216 static void
217 mpc52xx_uart_shutdown(struct uart_port *port)
218 {
219         struct mpc52xx_psc __iomem *psc = PSC(port);
220         
221         /* Shut down the port, interrupt and all */
222         out_8(&psc->command,MPC52xx_PSC_RST_RX);
223         out_8(&psc->command,MPC52xx_PSC_RST_TX);
224         
225         port->read_status_mask = 0; 
226         out_be16(&psc->mpc52xx_psc_imr,port->read_status_mask);
227
228         /* Release interrupt */
229         free_irq(port->irq, port);
230 }
231
232 static void 
233 mpc52xx_uart_set_termios(struct uart_port *port, struct termios *new,
234                          struct termios *old)
235 {
236         struct mpc52xx_psc __iomem *psc = PSC(port);
237         unsigned long flags;
238         unsigned char mr1, mr2;
239         unsigned short ctr;
240         unsigned int j, baud, quot;
241         
242         /* Prepare what we're gonna write */
243         mr1 = 0;
244         
245         switch (new->c_cflag & CSIZE) {
246                 case CS5:       mr1 |= MPC52xx_PSC_MODE_5_BITS;
247                                 break;
248                 case CS6:       mr1 |= MPC52xx_PSC_MODE_6_BITS;
249                                 break;
250                 case CS7:       mr1 |= MPC52xx_PSC_MODE_7_BITS;
251                                 break;
252                 case CS8:
253                 default:        mr1 |= MPC52xx_PSC_MODE_8_BITS;
254         }
255
256         if (new->c_cflag & PARENB) {
257                 mr1 |= (new->c_cflag & PARODD) ?
258                         MPC52xx_PSC_MODE_PARODD : MPC52xx_PSC_MODE_PAREVEN;
259         } else
260                 mr1 |= MPC52xx_PSC_MODE_PARNONE;
261         
262         
263         mr2 = 0;
264
265         if (new->c_cflag & CSTOPB)
266                 mr2 |= MPC52xx_PSC_MODE_TWO_STOP;
267         else
268                 mr2 |= ((new->c_cflag & CSIZE) == CS5) ?
269                         MPC52xx_PSC_MODE_ONE_STOP_5_BITS :
270                         MPC52xx_PSC_MODE_ONE_STOP;
271
272
273         baud = uart_get_baud_rate(port, new, old, 0, port->uartclk/16);
274         quot = uart_get_divisor(port, baud);
275         ctr = quot & 0xffff;
276         
277         /* Get the lock */
278         spin_lock_irqsave(&port->lock, flags);
279
280         /* Update the per-port timeout */
281         uart_update_timeout(port, new->c_cflag, baud);
282
283         /* Do our best to flush TX & RX, so we don't loose anything */
284         /* But we don't wait indefinitly ! */
285         j = 5000000;    /* Maximum wait */
286         /* FIXME Can't receive chars since set_termios might be called at early
287          * boot for the console, all stuff is not yet ready to receive at that
288          * time and that just makes the kernel oops */
289         /* while (j-- && mpc52xx_uart_int_rx_chars(port)); */
290         while (!(in_be16(&psc->mpc52xx_psc_status) & MPC52xx_PSC_SR_TXEMP) && 
291                --j)
292                 udelay(1);
293
294         if (!j)
295                 printk( KERN_ERR "mpc52xx_uart.c: "
296                         "Unable to flush RX & TX fifos in-time in set_termios."
297                         "Some chars may have been lost.\n" ); 
298
299         /* Reset the TX & RX */
300         out_8(&psc->command,MPC52xx_PSC_RST_RX);
301         out_8(&psc->command,MPC52xx_PSC_RST_TX);
302
303         /* Send new mode settings */
304         out_8(&psc->command,MPC52xx_PSC_SEL_MODE_REG_1);
305         out_8(&psc->mode,mr1);
306         out_8(&psc->mode,mr2);
307         out_8(&psc->ctur,ctr >> 8);
308         out_8(&psc->ctlr,ctr & 0xff);
309         
310         /* Reenable TX & RX */
311         out_8(&psc->command,MPC52xx_PSC_TX_ENABLE);
312         out_8(&psc->command,MPC52xx_PSC_RX_ENABLE);
313
314         /* We're all set, release the lock */
315         spin_unlock_irqrestore(&port->lock, flags);
316 }
317
318 static const char *
319 mpc52xx_uart_type(struct uart_port *port)
320 {
321         return port->type == PORT_MPC52xx ? "MPC52xx PSC" : NULL;
322 }
323
324 static void
325 mpc52xx_uart_release_port(struct uart_port *port)
326 {
327         if (port->flags & UPF_IOREMAP) { /* remapped by us ? */
328                 iounmap(port->membase);
329                 port->membase = NULL;
330         }
331
332         release_mem_region(port->mapbase, MPC52xx_PSC_SIZE);
333 }
334
335 static int
336 mpc52xx_uart_request_port(struct uart_port *port)
337 {
338         if (port->flags & UPF_IOREMAP) /* Need to remap ? */
339                 port->membase = ioremap(port->mapbase, MPC52xx_PSC_SIZE);
340
341         if (!port->membase)
342                 return -EINVAL;
343
344         return request_mem_region(port->mapbase, MPC52xx_PSC_SIZE,
345                         "mpc52xx_psc_uart") != NULL ? 0 : -EBUSY;
346 }
347
348 static void
349 mpc52xx_uart_config_port(struct uart_port *port, int flags)
350 {
351         if ( (flags & UART_CONFIG_TYPE) &&
352              (mpc52xx_uart_request_port(port) == 0) )
353                 port->type = PORT_MPC52xx;
354 }
355
356 static int
357 mpc52xx_uart_verify_port(struct uart_port *port, struct serial_struct *ser)
358 {
359         if ( ser->type != PORT_UNKNOWN && ser->type != PORT_MPC52xx )
360                 return -EINVAL;
361
362         if ( (ser->irq != port->irq) ||
363              (ser->io_type != SERIAL_IO_MEM) ||
364              (ser->baud_base != port->uartclk)  || 
365              (ser->iomem_base != (void*)port->mapbase) ||
366              (ser->hub6 != 0 ) )
367                 return -EINVAL;
368
369         return 0;
370 }
371
372
373 static struct uart_ops mpc52xx_uart_ops = {
374         .tx_empty       = mpc52xx_uart_tx_empty,
375         .set_mctrl      = mpc52xx_uart_set_mctrl,
376         .get_mctrl      = mpc52xx_uart_get_mctrl,
377         .stop_tx        = mpc52xx_uart_stop_tx,
378         .start_tx       = mpc52xx_uart_start_tx,
379         .send_xchar     = mpc52xx_uart_send_xchar,
380         .stop_rx        = mpc52xx_uart_stop_rx,
381         .enable_ms      = mpc52xx_uart_enable_ms,
382         .break_ctl      = mpc52xx_uart_break_ctl,
383         .startup        = mpc52xx_uart_startup,
384         .shutdown       = mpc52xx_uart_shutdown,
385         .set_termios    = mpc52xx_uart_set_termios,
386 /*      .pm             = mpc52xx_uart_pm,              Not supported yet */
387 /*      .set_wake       = mpc52xx_uart_set_wake,        Not supported yet */
388         .type           = mpc52xx_uart_type,
389         .release_port   = mpc52xx_uart_release_port,
390         .request_port   = mpc52xx_uart_request_port,
391         .config_port    = mpc52xx_uart_config_port,
392         .verify_port    = mpc52xx_uart_verify_port
393 };
394
395         
396 /* ======================================================================== */
397 /* Interrupt handling                                                       */
398 /* ======================================================================== */
399         
400 static inline int
401 mpc52xx_uart_int_rx_chars(struct uart_port *port, struct pt_regs *regs)
402 {
403         struct tty_struct *tty = port->info->tty;
404         unsigned char ch;
405         unsigned short status;
406
407         /* While we can read, do so ! */
408         while ( (status = in_be16(&PSC(port)->mpc52xx_psc_status)) &
409                 MPC52xx_PSC_SR_RXRDY) {
410
411                 /* If we are full, just stop reading */
412                 if (tty->flip.count >= TTY_FLIPBUF_SIZE)
413                         break;
414                 
415                 /* Get the char */
416                 ch = in_8(&PSC(port)->mpc52xx_psc_buffer_8);
417
418                 /* Handle sysreq char */
419 #ifdef SUPPORT_SYSRQ
420                 if (uart_handle_sysrq_char(port, ch, regs)) {
421                         port->sysrq = 0;
422                         continue;
423                 }
424 #endif
425
426                 /* Store it */
427                 *tty->flip.char_buf_ptr = ch;
428                 *tty->flip.flag_buf_ptr = 0;
429                 port->icount.rx++;
430         
431                 if ( status & (MPC52xx_PSC_SR_PE |
432                                MPC52xx_PSC_SR_FE |
433                                MPC52xx_PSC_SR_RB |
434                                MPC52xx_PSC_SR_OE) ) {
435                         
436                         if (status & MPC52xx_PSC_SR_RB) {
437                                 *tty->flip.flag_buf_ptr = TTY_BREAK;
438                                 uart_handle_break(port);
439                         } else if (status & MPC52xx_PSC_SR_PE)
440                                 *tty->flip.flag_buf_ptr = TTY_PARITY;
441                         else if (status & MPC52xx_PSC_SR_FE)
442                                 *tty->flip.flag_buf_ptr = TTY_FRAME;
443                         if (status & MPC52xx_PSC_SR_OE) {
444                                 /*
445                                  * Overrun is special, since it's
446                                  * reported immediately, and doesn't
447                                  * affect the current character
448                                  */
449                                 if (tty->flip.count < (TTY_FLIPBUF_SIZE-1)) {
450                                         tty->flip.flag_buf_ptr++;
451                                         tty->flip.char_buf_ptr++;
452                                         tty->flip.count++;
453                                 }
454                                 *tty->flip.flag_buf_ptr = TTY_OVERRUN;
455                         }
456
457                         /* Clear error condition */
458                         out_8(&PSC(port)->command,MPC52xx_PSC_RST_ERR_STAT);
459
460                 }
461
462                 tty->flip.char_buf_ptr++;
463                 tty->flip.flag_buf_ptr++;
464                 tty->flip.count++;
465
466         }
467
468         tty_flip_buffer_push(tty);
469         
470         return in_be16(&PSC(port)->mpc52xx_psc_status) & MPC52xx_PSC_SR_RXRDY;
471 }
472
473 static inline int
474 mpc52xx_uart_int_tx_chars(struct uart_port *port)
475 {
476         struct circ_buf *xmit = &port->info->xmit;
477
478         /* Process out of band chars */
479         if (port->x_char) {
480                 out_8(&PSC(port)->mpc52xx_psc_buffer_8, port->x_char);
481                 port->icount.tx++;
482                 port->x_char = 0;
483                 return 1;
484         }
485
486         /* Nothing to do ? */
487         if (uart_circ_empty(xmit) || uart_tx_stopped(port)) {
488                 mpc52xx_uart_stop_tx(port);
489                 return 0;
490         }
491
492         /* Send chars */
493         while (in_be16(&PSC(port)->mpc52xx_psc_status) & MPC52xx_PSC_SR_TXRDY) {
494                 out_8(&PSC(port)->mpc52xx_psc_buffer_8, xmit->buf[xmit->tail]);
495                 xmit->tail = (xmit->tail + 1) & (UART_XMIT_SIZE - 1);
496                 port->icount.tx++;
497                 if (uart_circ_empty(xmit))
498                         break;
499         }
500
501         /* Wake up */
502         if (uart_circ_chars_pending(xmit) < WAKEUP_CHARS)
503                 uart_write_wakeup(port);
504
505         /* Maybe we're done after all */
506         if (uart_circ_empty(xmit)) {
507                 mpc52xx_uart_stop_tx(port);
508                 return 0;
509         }
510
511         return 1;
512 }
513
514 static irqreturn_t 
515 mpc52xx_uart_int(int irq, void *dev_id, struct pt_regs *regs)
516 {
517         struct uart_port *port = (struct uart_port *) dev_id;
518         unsigned long pass = ISR_PASS_LIMIT;
519         unsigned int keepgoing;
520         unsigned short status;
521         
522         if ( irq != port->irq ) {
523                 printk( KERN_WARNING
524                         "mpc52xx_uart_int : " \
525                         "Received wrong int %d. Waiting for %d\n",
526                        irq, port->irq);
527                 return IRQ_NONE;
528         }
529         
530         spin_lock(&port->lock);
531         
532         /* While we have stuff to do, we continue */
533         do {
534                 /* If we don't find anything to do, we stop */
535                 keepgoing = 0; 
536                 
537                 /* Read status */
538                 status = in_be16(&PSC(port)->mpc52xx_psc_isr);
539                 status &= port->read_status_mask;
540                         
541                 /* Do we need to receive chars ? */
542                 /* For this RX interrupts must be on and some chars waiting */
543                 if ( status & MPC52xx_PSC_IMR_RXRDY )
544                         keepgoing |= mpc52xx_uart_int_rx_chars(port, regs);
545
546                 /* Do we need to send chars ? */
547                 /* For this, TX must be ready and TX interrupt enabled */
548                 if ( status & MPC52xx_PSC_IMR_TXRDY )
549                         keepgoing |= mpc52xx_uart_int_tx_chars(port);
550                 
551                 /* Limit number of iteration */
552                 if ( !(--pass) )
553                         keepgoing = 0;
554
555         } while (keepgoing);
556         
557         spin_unlock(&port->lock);
558         
559         return IRQ_HANDLED;
560 }
561
562
563 /* ======================================================================== */
564 /* Console ( if applicable )                                                */
565 /* ======================================================================== */
566
567 #ifdef CONFIG_SERIAL_MPC52xx_CONSOLE
568
569 static void __init
570 mpc52xx_console_get_options(struct uart_port *port,
571                             int *baud, int *parity, int *bits, int *flow)
572 {
573         struct mpc52xx_psc __iomem *psc = PSC(port);
574         unsigned char mr1;
575
576         /* Read the mode registers */
577         out_8(&psc->command,MPC52xx_PSC_SEL_MODE_REG_1);
578         mr1 = in_8(&psc->mode);
579         
580         /* CT{U,L}R are write-only ! */
581         *baud = __res.bi_baudrate ?
582                 __res.bi_baudrate : CONFIG_SERIAL_MPC52xx_CONSOLE_BAUD;
583
584         /* Parse them */
585         switch (mr1 & MPC52xx_PSC_MODE_BITS_MASK) {
586                 case MPC52xx_PSC_MODE_5_BITS:   *bits = 5; break;
587                 case MPC52xx_PSC_MODE_6_BITS:   *bits = 6; break;
588                 case MPC52xx_PSC_MODE_7_BITS:   *bits = 7; break;
589                 case MPC52xx_PSC_MODE_8_BITS:
590                 default:                        *bits = 8;
591         }
592         
593         if (mr1 & MPC52xx_PSC_MODE_PARNONE)
594                 *parity = 'n';
595         else
596                 *parity = mr1 & MPC52xx_PSC_MODE_PARODD ? 'o' : 'e';
597 }
598
599 static void  
600 mpc52xx_console_write(struct console *co, const char *s, unsigned int count)
601 {
602         struct uart_port *port = &mpc52xx_uart_ports[co->index];
603         struct mpc52xx_psc __iomem *psc = PSC(port);
604         unsigned int i, j;
605         
606         /* Disable interrupts */
607         out_be16(&psc->mpc52xx_psc_imr, 0);
608
609         /* Wait the TX buffer to be empty */
610         j = 5000000;    /* Maximum wait */      
611         while (!(in_be16(&psc->mpc52xx_psc_status) & MPC52xx_PSC_SR_TXEMP) && 
612                --j)
613                 udelay(1);
614
615         /* Write all the chars */
616         for ( i=0 ; i<count ; i++ ) {
617         
618                 /* Send the char */
619                 out_8(&psc->mpc52xx_psc_buffer_8, *s);
620
621                 /* Line return handling */
622                 if ( *s++ == '\n' )
623                         out_8(&psc->mpc52xx_psc_buffer_8, '\r');
624                 
625                 /* Wait the TX buffer to be empty */
626                 j = 20000;      /* Maximum wait */      
627                 while (!(in_be16(&psc->mpc52xx_psc_status) & 
628                          MPC52xx_PSC_SR_TXEMP) && --j)
629                         udelay(1);
630         }
631
632         /* Restore interrupt state */
633         out_be16(&psc->mpc52xx_psc_imr, port->read_status_mask);
634 }
635
636 static int __init
637 mpc52xx_console_setup(struct console *co, char *options)
638 {
639         struct uart_port *port = &mpc52xx_uart_ports[co->index];
640
641         int baud = CONFIG_SERIAL_MPC52xx_CONSOLE_BAUD;
642         int bits = 8;
643         int parity = 'n';
644         int flow = 'n';
645
646         if (co->index < 0 || co->index >= MPC52xx_PSC_MAXNUM)
647                 return -EINVAL;
648         
649         /* Basic port init. Needed since we use some uart_??? func before
650          * real init for early access */
651         spin_lock_init(&port->lock);
652         port->uartclk   = __res.bi_ipbfreq / 2; /* Look at CTLR doc */
653         port->ops       = &mpc52xx_uart_ops;
654         port->mapbase   = MPC52xx_PA(MPC52xx_PSCx_OFFSET(co->index+1));
655
656         /* We ioremap ourself */
657         port->membase = ioremap(port->mapbase, MPC52xx_PSC_SIZE);
658         if (port->membase == NULL)
659                 return -EINVAL;
660
661         /* Setup the port parameters accoding to options */
662         if (options)
663                 uart_parse_options(options, &baud, &parity, &bits, &flow);
664         else
665                 mpc52xx_console_get_options(port, &baud, &parity, &bits, &flow);
666
667         return uart_set_options(port, co, baud, parity, bits, flow);
668 }
669
670
671 extern struct uart_driver mpc52xx_uart_driver;
672
673 static struct console mpc52xx_console = {
674         .name   = "ttyS",
675         .write  = mpc52xx_console_write,
676         .device = uart_console_device,
677         .setup  = mpc52xx_console_setup,
678         .flags  = CON_PRINTBUFFER,
679         .index  = -1,   /* Specified on the cmdline (e.g. console=ttyS0 ) */
680         .data   = &mpc52xx_uart_driver,
681 };
682
683         
684 static int __init 
685 mpc52xx_console_init(void)
686 {
687         register_console(&mpc52xx_console);
688         return 0;
689 }
690
691 console_initcall(mpc52xx_console_init);
692
693 #define MPC52xx_PSC_CONSOLE &mpc52xx_console
694 #else
695 #define MPC52xx_PSC_CONSOLE NULL
696 #endif
697
698
699 /* ======================================================================== */
700 /* UART Driver                                                              */
701 /* ======================================================================== */
702
703 static struct uart_driver mpc52xx_uart_driver = {
704         .owner          = THIS_MODULE,
705         .driver_name    = "mpc52xx_psc_uart",
706         .dev_name       = "ttyS",
707         .devfs_name     = "ttyS",
708         .major          = TTY_MAJOR,
709         .minor          = 64,
710         .nr             = MPC52xx_PSC_MAXNUM,
711         .cons           = MPC52xx_PSC_CONSOLE,
712 };
713
714
715 /* ======================================================================== */
716 /* Platform Driver                                                          */
717 /* ======================================================================== */
718
719 static int __devinit
720 mpc52xx_uart_probe(struct device *dev)
721 {
722         struct platform_device *pdev = to_platform_device(dev);
723         struct resource *res = pdev->resource;
724
725         struct uart_port *port = NULL;
726         int i, idx, ret;
727
728         /* Check validity & presence */
729         idx = pdev->id;
730         if (idx < 0 || idx >= MPC52xx_PSC_MAXNUM)
731                 return -EINVAL;
732
733         if (!mpc52xx_match_psc_function(idx,"uart"))
734                 return -ENODEV;
735
736         /* Init the port structure */
737         port = &mpc52xx_uart_ports[idx];
738
739         memset(port, 0x00, sizeof(struct uart_port));
740
741         spin_lock_init(&port->lock);
742         port->uartclk   = __res.bi_ipbfreq / 2; /* Look at CTLR doc */
743         port->fifosize  = 255; /* Should be 512 ! But it can't be */
744                                /* stored in a unsigned char       */
745         port->iotype    = UPIO_MEM;
746         port->flags     = UPF_BOOT_AUTOCONF |
747                           ( uart_console(port) ? 0 : UPF_IOREMAP );
748         port->line      = idx;
749         port->ops       = &mpc52xx_uart_ops;
750
751         /* Search for IRQ and mapbase */
752         for (i=0 ; i<pdev->num_resources ; i++, res++) {
753                 if (res->flags & IORESOURCE_MEM)
754                         port->mapbase = res->start;
755                 else if (res->flags & IORESOURCE_IRQ)
756                         port->irq = res->start;
757         }
758         if (!port->irq || !port->mapbase)
759                 return -EINVAL;
760
761         /* Add the port to the uart sub-system */
762         ret = uart_add_one_port(&mpc52xx_uart_driver, port);
763         if (!ret)
764                 dev_set_drvdata(dev, (void*)port);
765
766         return ret;
767 }
768
769 static int
770 mpc52xx_uart_remove(struct device *dev)
771 {
772         struct uart_port *port = (struct uart_port *) dev_get_drvdata(dev);
773
774         dev_set_drvdata(dev, NULL);
775
776         if (port)
777                 uart_remove_one_port(&mpc52xx_uart_driver, port);
778
779         return 0;
780 }
781
782 #ifdef CONFIG_PM
783 static int
784 mpc52xx_uart_suspend(struct device *dev, pm_message_t state, u32 level)
785 {
786         struct uart_port *port = (struct uart_port *) dev_get_drvdata(dev);
787
788         if (sport && level == SUSPEND_DISABLE)
789                 uart_suspend_port(&mpc52xx_uart_driver, port);
790
791         return 0;
792 }
793
794 static int
795 mpc52xx_uart_resume(struct device *dev, u32 level)
796 {
797         struct uart_port *port = (struct uart_port *) dev_get_drvdata(dev);
798
799         if (port && level == RESUME_ENABLE)
800                 uart_resume_port(&mpc52xx_uart_driver, port);
801
802         return 0;
803 }
804 #endif
805
806 static struct device_driver mpc52xx_uart_platform_driver = {
807         .name           = "mpc52xx-psc",
808         .bus            = &platform_bus_type,
809         .probe          = mpc52xx_uart_probe,
810         .remove         = mpc52xx_uart_remove,
811 #ifdef CONFIG_PM
812         .suspend        = mpc52xx_uart_suspend,
813         .resume         = mpc52xx_uart_resume,
814 #endif
815 };
816
817
818 /* ======================================================================== */
819 /* Module                                                                   */
820 /* ======================================================================== */
821
822 static int __init
823 mpc52xx_uart_init(void)
824 {
825         int ret;
826
827         printk(KERN_INFO "Serial: MPC52xx PSC driver\n");
828
829         ret = uart_register_driver(&mpc52xx_uart_driver);
830         if (ret == 0) {
831                 ret = driver_register(&mpc52xx_uart_platform_driver);
832                 if (ret)
833                         uart_unregister_driver(&mpc52xx_uart_driver);
834         }
835
836         return ret;
837 }
838
839 static void __exit
840 mpc52xx_uart_exit(void)
841 {
842         driver_unregister(&mpc52xx_uart_platform_driver);
843         uart_unregister_driver(&mpc52xx_uart_driver);
844 }
845
846
847 module_init(mpc52xx_uart_init);
848 module_exit(mpc52xx_uart_exit);
849
850 MODULE_AUTHOR("Sylvain Munaut <tnt@246tNt.com>");
851 MODULE_DESCRIPTION("Freescale MPC52xx PSC UART");
852 MODULE_LICENSE("GPL");