blob: 8c40167778dea949e077954a10445736f9f6ea21 [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/*
2 * mcfserial.c -- serial driver for ColdFire internal UARTS.
3 *
4 * Copyright (C) 1999-2003 Greg Ungerer <gerg@snapgear.com>
5 * Copyright (c) 2000-2001 Lineo, Inc. <www.lineo.com>
6 * Copyright (C) 2001-2002 SnapGear Inc. <www.snapgear.com>
7 *
8 * Based on code from 68332serial.c which was:
9 *
10 * Copyright (C) 1995 David S. Miller (davem@caip.rutgers.edu)
11 * Copyright (C) 1998 TSHG
12 * Copyright (c) 1999 Rt-Control Inc. <jeff@uclinux.org>
13 *
14 * Changes:
15 * 08/07/2003 Daniele Bellucci <bellucda@tiscali.it>
16 * some cleanups in mcfrs_write.
17 *
18 */
19
20#include <linux/module.h>
21#include <linux/errno.h>
22#include <linux/signal.h>
23#include <linux/sched.h>
24#include <linux/timer.h>
25#include <linux/wait.h>
26#include <linux/interrupt.h>
27#include <linux/tty.h>
28#include <linux/tty_flip.h>
29#include <linux/string.h>
30#include <linux/fcntl.h>
31#include <linux/mm.h>
32#include <linux/kernel.h>
33#include <linux/serial.h>
34#include <linux/serialP.h>
35#include <linux/console.h>
36#include <linux/init.h>
37#include <linux/bitops.h>
38#include <linux/delay.h>
39
40#include <asm/io.h>
41#include <asm/irq.h>
42#include <asm/system.h>
43#include <asm/segment.h>
44#include <asm/semaphore.h>
45#include <asm/delay.h>
46#include <asm/coldfire.h>
47#include <asm/mcfsim.h>
48#include <asm/mcfuart.h>
49#include <asm/nettel.h>
50#include <asm/uaccess.h>
51#include "mcfserial.h"
52
53struct timer_list mcfrs_timer_struct;
54
55/*
56 * Default console baud rate, we use this as the default
57 * for all ports so init can just open /dev/console and
58 * keep going. Perhaps one day the cflag settings for the
59 * console can be used instead.
60 */
61#if defined(CONFIG_ARNEWSH) || defined(CONFIG_MOTOROLA) || defined(CONFIG_senTec) || defined(CONFIG_SNEHA)
62#define CONSOLE_BAUD_RATE 19200
63#define DEFAULT_CBAUD B19200
64#endif
65
66#if defined(CONFIG_HW_FEITH)
67 #define CONSOLE_BAUD_RATE 38400
68 #define DEFAULT_CBAUD B38400
69#endif
70
71#ifndef CONSOLE_BAUD_RATE
72#define CONSOLE_BAUD_RATE 9600
73#define DEFAULT_CBAUD B9600
74#endif
75
76int mcfrs_console_inited = 0;
77int mcfrs_console_port = -1;
78int mcfrs_console_baud = CONSOLE_BAUD_RATE;
79int mcfrs_console_cbaud = DEFAULT_CBAUD;
80
81/*
82 * Driver data structures.
83 */
84static struct tty_driver *mcfrs_serial_driver;
85
86/* number of characters left in xmit buffer before we ask for more */
87#define WAKEUP_CHARS 256
88
89/* Debugging...
90 */
91#undef SERIAL_DEBUG_OPEN
92#undef SERIAL_DEBUG_FLOW
93
94#if defined(CONFIG_M527x) || defined(CONFIG_M528x)
95#define IRQBASE (MCFINT_VECBASE+MCFINT_UART0)
96#else
97#define IRQBASE 73
98#endif
99
100/*
101 * Configuration table, UARTs to look for at startup.
102 */
103static struct mcf_serial mcfrs_table[] = {
104 { /* ttyS0 */
105 .magic = 0,
106 .addr = (volatile unsigned char *) (MCF_MBAR+MCFUART_BASE1),
107 .irq = IRQBASE,
108 .flags = ASYNC_BOOT_AUTOCONF,
109 },
110 { /* ttyS1 */
111 .magic = 0,
112 .addr = (volatile unsigned char *) (MCF_MBAR+MCFUART_BASE2),
113 .irq = IRQBASE+1,
114 .flags = ASYNC_BOOT_AUTOCONF,
115 },
116};
117
118
119#define NR_PORTS (sizeof(mcfrs_table) / sizeof(struct mcf_serial))
120
121/*
122 * This is used to figure out the divisor speeds and the timeouts.
123 */
124static int mcfrs_baud_table[] = {
125 0, 50, 75, 110, 134, 150, 200, 300, 600, 1200, 1800, 2400, 4800,
126 9600, 19200, 38400, 57600, 115200, 230400, 460800, 0
127};
128#define MCFRS_BAUD_TABLE_SIZE \
129 (sizeof(mcfrs_baud_table)/sizeof(mcfrs_baud_table[0]))
130
131
132#ifdef CONFIG_MAGIC_SYSRQ
133/*
134 * Magic system request keys. Used for debugging...
135 */
136extern int magic_sysrq_key(int ch);
137#endif
138
139
140/*
141 * Forware declarations...
142 */
143static void mcfrs_change_speed(struct mcf_serial *info);
144static void mcfrs_wait_until_sent(struct tty_struct *tty, int timeout);
145
146
147static inline int serial_paranoia_check(struct mcf_serial *info,
148 char *name, const char *routine)
149{
150#ifdef SERIAL_PARANOIA_CHECK
151 static const char badmagic[] =
152 "MCFRS(warning): bad magic number for serial struct %s in %s\n";
153 static const char badinfo[] =
154 "MCFRS(warning): null mcf_serial for %s in %s\n";
155
156 if (!info) {
157 printk(badinfo, name, routine);
158 return 1;
159 }
160 if (info->magic != SERIAL_MAGIC) {
161 printk(badmagic, name, routine);
162 return 1;
163 }
164#endif
165 return 0;
166}
167
168/*
169 * Sets or clears DTR and RTS on the requested line.
170 */
171static void mcfrs_setsignals(struct mcf_serial *info, int dtr, int rts)
172{
173 volatile unsigned char *uartp;
174 unsigned long flags;
175
176#if 0
177 printk("%s(%d): mcfrs_setsignals(info=%x,dtr=%d,rts=%d)\n",
178 __FILE__, __LINE__, info, dtr, rts);
179#endif
180
181 local_irq_save(flags);
182 if (dtr >= 0) {
183#ifdef MCFPP_DTR0
184 if (info->line)
185 mcf_setppdata(MCFPP_DTR1, (dtr ? 0 : MCFPP_DTR1));
186 else
187 mcf_setppdata(MCFPP_DTR0, (dtr ? 0 : MCFPP_DTR0));
188#endif
189 }
190 if (rts >= 0) {
191 uartp = info->addr;
192 if (rts) {
193 info->sigs |= TIOCM_RTS;
194 uartp[MCFUART_UOP1] = MCFUART_UOP_RTS;
195 } else {
196 info->sigs &= ~TIOCM_RTS;
197 uartp[MCFUART_UOP0] = MCFUART_UOP_RTS;
198 }
199 }
200 local_irq_restore(flags);
201 return;
202}
203
204/*
205 * Gets values of serial signals.
206 */
207static int mcfrs_getsignals(struct mcf_serial *info)
208{
209 volatile unsigned char *uartp;
210 unsigned long flags;
211 int sigs;
212#if defined(CONFIG_NETtel) && defined(CONFIG_M5307)
213 unsigned short ppdata;
214#endif
215
216#if 0
217 printk("%s(%d): mcfrs_getsignals(info=%x)\n", __FILE__, __LINE__);
218#endif
219
220 local_irq_save(flags);
221 uartp = info->addr;
222 sigs = (uartp[MCFUART_UIPR] & MCFUART_UIPR_CTS) ? 0 : TIOCM_CTS;
223 sigs |= (info->sigs & TIOCM_RTS);
224
225#ifdef MCFPP_DCD0
226{
227 unsigned int ppdata;
228 ppdata = mcf_getppdata();
229 if (info->line == 0) {
230 sigs |= (ppdata & MCFPP_DCD0) ? 0 : TIOCM_CD;
231 sigs |= (ppdata & MCFPP_DTR0) ? 0 : TIOCM_DTR;
232 } else if (info->line == 1) {
233 sigs |= (ppdata & MCFPP_DCD1) ? 0 : TIOCM_CD;
234 sigs |= (ppdata & MCFPP_DTR1) ? 0 : TIOCM_DTR;
235 }
236}
237#endif
238
239 local_irq_restore(flags);
240 return(sigs);
241}
242
243/*
244 * ------------------------------------------------------------
245 * mcfrs_stop() and mcfrs_start()
246 *
247 * This routines are called before setting or resetting tty->stopped.
248 * They enable or disable transmitter interrupts, as necessary.
249 * ------------------------------------------------------------
250 */
251static void mcfrs_stop(struct tty_struct *tty)
252{
253 volatile unsigned char *uartp;
254 struct mcf_serial *info = (struct mcf_serial *)tty->driver_data;
255 unsigned long flags;
256
257 if (serial_paranoia_check(info, tty->name, "mcfrs_stop"))
258 return;
259
260 local_irq_save(flags);
261 uartp = info->addr;
262 info->imr &= ~MCFUART_UIR_TXREADY;
263 uartp[MCFUART_UIMR] = info->imr;
264 local_irq_restore(flags);
265}
266
267static void mcfrs_start(struct tty_struct *tty)
268{
269 volatile unsigned char *uartp;
270 struct mcf_serial *info = (struct mcf_serial *)tty->driver_data;
271 unsigned long flags;
272
273 if (serial_paranoia_check(info, tty->name, "mcfrs_start"))
274 return;
275
276 local_irq_save(flags);
277 if (info->xmit_cnt && info->xmit_buf) {
278 uartp = info->addr;
279 info->imr |= MCFUART_UIR_TXREADY;
280 uartp[MCFUART_UIMR] = info->imr;
281 }
282 local_irq_restore(flags);
283}
284
285/*
286 * ----------------------------------------------------------------------
287 *
288 * Here starts the interrupt handling routines. All of the following
289 * subroutines are declared as inline and are folded into
290 * mcfrs_interrupt(). They were separated out for readability's sake.
291 *
292 * Note: mcfrs_interrupt() is a "fast" interrupt, which means that it
293 * runs with interrupts turned off. People who may want to modify
294 * mcfrs_interrupt() should try to keep the interrupt handler as fast as
295 * possible. After you are done making modifications, it is not a bad
296 * idea to do:
297 *
298 * gcc -S -DKERNEL -Wall -Wstrict-prototypes -O6 -fomit-frame-pointer serial.c
299 *
300 * and look at the resulting assemble code in serial.s.
301 *
302 * - Ted Ts'o (tytso@mit.edu), 7-Mar-93
303 * -----------------------------------------------------------------------
304 */
305
306static inline void receive_chars(struct mcf_serial *info)
307{
308 volatile unsigned char *uartp;
309 struct tty_struct *tty = info->tty;
310 unsigned char status, ch;
311
312 if (!tty)
313 return;
314
315 uartp = info->addr;
316
317 while ((status = uartp[MCFUART_USR]) & MCFUART_USR_RXREADY) {
318
319 if (tty->flip.count >= TTY_FLIPBUF_SIZE)
320 break;
321
322 ch = uartp[MCFUART_URB];
323 info->stats.rx++;
324
325#ifdef CONFIG_MAGIC_SYSRQ
326 if (mcfrs_console_inited && (info->line == mcfrs_console_port)) {
327 if (magic_sysrq_key(ch))
328 continue;
329 }
330#endif
331
332 tty->flip.count++;
333 if (status & MCFUART_USR_RXERR) {
334 uartp[MCFUART_UCR] = MCFUART_UCR_CMDRESETERR;
335 if (status & MCFUART_USR_RXBREAK) {
336 info->stats.rxbreak++;
337 *tty->flip.flag_buf_ptr++ = TTY_BREAK;
338 } else if (status & MCFUART_USR_RXPARITY) {
339 info->stats.rxparity++;
340 *tty->flip.flag_buf_ptr++ = TTY_PARITY;
341 } else if (status & MCFUART_USR_RXOVERRUN) {
342 info->stats.rxoverrun++;
343 *tty->flip.flag_buf_ptr++ = TTY_OVERRUN;
344 } else if (status & MCFUART_USR_RXFRAMING) {
345 info->stats.rxframing++;
346 *tty->flip.flag_buf_ptr++ = TTY_FRAME;
347 } else {
348 /* This should never happen... */
349 *tty->flip.flag_buf_ptr++ = 0;
350 }
351 } else {
352 *tty->flip.flag_buf_ptr++ = 0;
353 }
354 *tty->flip.char_buf_ptr++ = ch;
355 }
356
357 schedule_work(&tty->flip.work);
358 return;
359}
360
361static inline void transmit_chars(struct mcf_serial *info)
362{
363 volatile unsigned char *uartp;
364
365 uartp = info->addr;
366
367 if (info->x_char) {
368 /* Send special char - probably flow control */
369 uartp[MCFUART_UTB] = info->x_char;
370 info->x_char = 0;
371 info->stats.tx++;
372 }
373
374 if ((info->xmit_cnt <= 0) || info->tty->stopped) {
375 info->imr &= ~MCFUART_UIR_TXREADY;
376 uartp[MCFUART_UIMR] = info->imr;
377 return;
378 }
379
380 while (uartp[MCFUART_USR] & MCFUART_USR_TXREADY) {
381 uartp[MCFUART_UTB] = info->xmit_buf[info->xmit_tail++];
382 info->xmit_tail = info->xmit_tail & (SERIAL_XMIT_SIZE-1);
383 info->stats.tx++;
384 if (--info->xmit_cnt <= 0)
385 break;
386 }
387
388 if (info->xmit_cnt < WAKEUP_CHARS)
389 schedule_work(&info->tqueue);
390 return;
391}
392
393/*
394 * This is the serial driver's generic interrupt routine
395 */
396irqreturn_t mcfrs_interrupt(int irq, void *dev_id, struct pt_regs *regs)
397{
398 struct mcf_serial *info;
399 unsigned char isr;
400
401 info = &mcfrs_table[(irq - IRQBASE)];
402 isr = info->addr[MCFUART_UISR] & info->imr;
403
404 if (isr & MCFUART_UIR_RXREADY)
405 receive_chars(info);
406 if (isr & MCFUART_UIR_TXREADY)
407 transmit_chars(info);
408 return IRQ_HANDLED;
409}
410
411/*
412 * -------------------------------------------------------------------
413 * Here ends the serial interrupt routines.
414 * -------------------------------------------------------------------
415 */
416
417static void mcfrs_offintr(void *private)
418{
419 struct mcf_serial *info = (struct mcf_serial *) private;
420 struct tty_struct *tty;
421
422 tty = info->tty;
423 if (!tty)
424 return;
425 tty_wakeup(tty);
426}
427
428
429/*
430 * Change of state on a DCD line.
431 */
432void mcfrs_modem_change(struct mcf_serial *info, int dcd)
433{
434 if (info->count == 0)
435 return;
436
437 if (info->flags & ASYNC_CHECK_CD) {
438 if (dcd)
439 wake_up_interruptible(&info->open_wait);
440 else
441 schedule_work(&info->tqueue_hangup);
442 }
443}
444
445
446#ifdef MCFPP_DCD0
447
448unsigned short mcfrs_ppstatus;
449
450/*
451 * This subroutine is called when the RS_TIMER goes off. It is used
452 * to monitor the state of the DCD lines - since they have no edge
453 * sensors and interrupt generators.
454 */
455static void mcfrs_timer(void)
456{
457 unsigned int ppstatus, dcdval, i;
458
459 ppstatus = mcf_getppdata() & (MCFPP_DCD0 | MCFPP_DCD1);
460
461 if (ppstatus != mcfrs_ppstatus) {
462 for (i = 0; (i < 2); i++) {
463 dcdval = (i ? MCFPP_DCD1 : MCFPP_DCD0);
464 if ((ppstatus & dcdval) != (mcfrs_ppstatus & dcdval)) {
465 mcfrs_modem_change(&mcfrs_table[i],
466 ((ppstatus & dcdval) ? 0 : 1));
467 }
468 }
469 }
470 mcfrs_ppstatus = ppstatus;
471
472 /* Re-arm timer */
473 mcfrs_timer_struct.expires = jiffies + HZ/25;
474 add_timer(&mcfrs_timer_struct);
475}
476
477#endif /* MCFPP_DCD0 */
478
479
480/*
481 * This routine is called from the scheduler tqueue when the interrupt
482 * routine has signalled that a hangup has occurred. The path of
483 * hangup processing is:
484 *
485 * serial interrupt routine -> (scheduler tqueue) ->
486 * do_serial_hangup() -> tty->hangup() -> mcfrs_hangup()
487 *
488 */
489static void do_serial_hangup(void *private)
490{
491 struct mcf_serial *info = (struct mcf_serial *) private;
492 struct tty_struct *tty;
493
494 tty = info->tty;
495 if (!tty)
496 return;
497
498 tty_hangup(tty);
499}
500
501static int startup(struct mcf_serial * info)
502{
503 volatile unsigned char *uartp;
504 unsigned long flags;
505
506 if (info->flags & ASYNC_INITIALIZED)
507 return 0;
508
509 if (!info->xmit_buf) {
510 info->xmit_buf = (unsigned char *) __get_free_page(GFP_KERNEL);
511 if (!info->xmit_buf)
512 return -ENOMEM;
513 }
514
515 local_irq_save(flags);
516
517#ifdef SERIAL_DEBUG_OPEN
518 printk("starting up ttyS%d (irq %d)...\n", info->line, info->irq);
519#endif
520
521 /*
522 * Reset UART, get it into known state...
523 */
524 uartp = info->addr;
525 uartp[MCFUART_UCR] = MCFUART_UCR_CMDRESETRX; /* reset RX */
526 uartp[MCFUART_UCR] = MCFUART_UCR_CMDRESETTX; /* reset TX */
527 mcfrs_setsignals(info, 1, 1);
528
529 if (info->tty)
530 clear_bit(TTY_IO_ERROR, &info->tty->flags);
531 info->xmit_cnt = info->xmit_head = info->xmit_tail = 0;
532
533 /*
534 * and set the speed of the serial port
535 */
536 mcfrs_change_speed(info);
537
538 /*
539 * Lastly enable the UART transmitter and receiver, and
540 * interrupt enables.
541 */
542 info->imr = MCFUART_UIR_RXREADY;
543 uartp[MCFUART_UCR] = MCFUART_UCR_RXENABLE | MCFUART_UCR_TXENABLE;
544 uartp[MCFUART_UIMR] = info->imr;
545
546 info->flags |= ASYNC_INITIALIZED;
547 local_irq_restore(flags);
548 return 0;
549}
550
551/*
552 * This routine will shutdown a serial port; interrupts are disabled, and
553 * DTR is dropped if the hangup on close termio flag is on.
554 */
555static void shutdown(struct mcf_serial * info)
556{
557 volatile unsigned char *uartp;
558 unsigned long flags;
559
560 if (!(info->flags & ASYNC_INITIALIZED))
561 return;
562
563#ifdef SERIAL_DEBUG_OPEN
564 printk("Shutting down serial port %d (irq %d)....\n", info->line,
565 info->irq);
566#endif
567
568 local_irq_save(flags);
569
570 uartp = info->addr;
571 uartp[MCFUART_UIMR] = 0; /* mask all interrupts */
572 uartp[MCFUART_UCR] = MCFUART_UCR_CMDRESETRX; /* reset RX */
573 uartp[MCFUART_UCR] = MCFUART_UCR_CMDRESETTX; /* reset TX */
574
575 if (!info->tty || (info->tty->termios->c_cflag & HUPCL))
576 mcfrs_setsignals(info, 0, 0);
577
578 if (info->xmit_buf) {
579 free_page((unsigned long) info->xmit_buf);
580 info->xmit_buf = 0;
581 }
582
583 if (info->tty)
584 set_bit(TTY_IO_ERROR, &info->tty->flags);
585
586 info->flags &= ~ASYNC_INITIALIZED;
587 local_irq_restore(flags);
588}
589
590
591/*
592 * This routine is called to set the UART divisor registers to match
593 * the specified baud rate for a serial port.
594 */
595static void mcfrs_change_speed(struct mcf_serial *info)
596{
597 volatile unsigned char *uartp;
598 unsigned int baudclk, cflag;
599 unsigned long flags;
600 unsigned char mr1, mr2;
601 int i;
602#ifdef CONFIG_M5272
603 unsigned int fraction;
604#endif
605
606 if (!info->tty || !info->tty->termios)
607 return;
608 cflag = info->tty->termios->c_cflag;
609 if (info->addr == 0)
610 return;
611
612#if 0
613 printk("%s(%d): mcfrs_change_speed()\n", __FILE__, __LINE__);
614#endif
615
616 i = cflag & CBAUD;
617 if (i & CBAUDEX) {
618 i &= ~CBAUDEX;
619 if (i < 1 || i > 4)
620 info->tty->termios->c_cflag &= ~CBAUDEX;
621 else
622 i += 15;
623 }
624 if (i == 0) {
625 mcfrs_setsignals(info, 0, -1);
626 return;
627 }
628
629 /* compute the baudrate clock */
630#ifdef CONFIG_M5272
631 /*
632 * For the MCF5272, also compute the baudrate fraction.
633 */
634 baudclk = (MCF_BUSCLK / mcfrs_baud_table[i]) / 32;
635 fraction = MCF_BUSCLK - (baudclk * 32 * mcfrs_baud_table[i]);
636 fraction *= 16;
637 fraction /= (32 * mcfrs_baud_table[i]);
638#else
639 baudclk = ((MCF_BUSCLK / mcfrs_baud_table[i]) + 16) / 32;
640#endif
641
642 info->baud = mcfrs_baud_table[i];
643
644 mr1 = MCFUART_MR1_RXIRQRDY | MCFUART_MR1_RXERRCHAR;
645 mr2 = 0;
646
647 switch (cflag & CSIZE) {
648 case CS5: mr1 |= MCFUART_MR1_CS5; break;
649 case CS6: mr1 |= MCFUART_MR1_CS6; break;
650 case CS7: mr1 |= MCFUART_MR1_CS7; break;
651 case CS8:
652 default: mr1 |= MCFUART_MR1_CS8; break;
653 }
654
655 if (cflag & PARENB) {
656 if (cflag & CMSPAR) {
657 if (cflag & PARODD)
658 mr1 |= MCFUART_MR1_PARITYMARK;
659 else
660 mr1 |= MCFUART_MR1_PARITYSPACE;
661 } else {
662 if (cflag & PARODD)
663 mr1 |= MCFUART_MR1_PARITYODD;
664 else
665 mr1 |= MCFUART_MR1_PARITYEVEN;
666 }
667 } else {
668 mr1 |= MCFUART_MR1_PARITYNONE;
669 }
670
671 if (cflag & CSTOPB)
672 mr2 |= MCFUART_MR2_STOP2;
673 else
674 mr2 |= MCFUART_MR2_STOP1;
675
676 if (cflag & CRTSCTS) {
677 mr1 |= MCFUART_MR1_RXRTS;
678 mr2 |= MCFUART_MR2_TXCTS;
679 }
680
681 if (cflag & CLOCAL)
682 info->flags &= ~ASYNC_CHECK_CD;
683 else
684 info->flags |= ASYNC_CHECK_CD;
685
686 uartp = info->addr;
687
688 local_irq_save(flags);
689#if 0
690 printk("%s(%d): mr1=%x mr2=%x baudclk=%x\n", __FILE__, __LINE__,
691 mr1, mr2, baudclk);
692#endif
693 /*
694 Note: pg 12-16 of MCF5206e User's Manual states that a
695 software reset should be performed prior to changing
696 UMR1,2, UCSR, UACR, bit 7
697 */
698 uartp[MCFUART_UCR] = MCFUART_UCR_CMDRESETRX; /* reset RX */
699 uartp[MCFUART_UCR] = MCFUART_UCR_CMDRESETTX; /* reset TX */
700 uartp[MCFUART_UCR] = MCFUART_UCR_CMDRESETMRPTR; /* reset MR pointer */
701 uartp[MCFUART_UMR] = mr1;
702 uartp[MCFUART_UMR] = mr2;
703 uartp[MCFUART_UBG1] = (baudclk & 0xff00) >> 8; /* set msb byte */
704 uartp[MCFUART_UBG2] = (baudclk & 0xff); /* set lsb byte */
705#ifdef CONFIG_M5272
706 uartp[MCFUART_UFPD] = (fraction & 0xf); /* set fraction */
707#endif
708 uartp[MCFUART_UCSR] = MCFUART_UCSR_RXCLKTIMER | MCFUART_UCSR_TXCLKTIMER;
709 uartp[MCFUART_UCR] = MCFUART_UCR_RXENABLE | MCFUART_UCR_TXENABLE;
710 mcfrs_setsignals(info, 1, -1);
711 local_irq_restore(flags);
712 return;
713}
714
715static void mcfrs_flush_chars(struct tty_struct *tty)
716{
717 volatile unsigned char *uartp;
718 struct mcf_serial *info = (struct mcf_serial *)tty->driver_data;
719 unsigned long flags;
720
721 if (serial_paranoia_check(info, tty->name, "mcfrs_flush_chars"))
722 return;
723
724 uartp = (volatile unsigned char *) info->addr;
725
726 /*
727 * re-enable receiver interrupt
728 */
729 local_irq_save(flags);
730 if ((!(info->imr & MCFUART_UIR_RXREADY)) &&
731 (info->flags & ASYNC_INITIALIZED) ) {
732 info->imr |= MCFUART_UIR_RXREADY;
733 uartp[MCFUART_UIMR] = info->imr;
734 }
735 local_irq_restore(flags);
736
737 if (info->xmit_cnt <= 0 || tty->stopped || tty->hw_stopped ||
738 !info->xmit_buf)
739 return;
740
741 /* Enable transmitter */
742 local_irq_save(flags);
743 info->imr |= MCFUART_UIR_TXREADY;
744 uartp[MCFUART_UIMR] = info->imr;
745 local_irq_restore(flags);
746}
747
748static int mcfrs_write(struct tty_struct * tty,
749 const unsigned char *buf, int count)
750{
751 volatile unsigned char *uartp;
752 struct mcf_serial *info = (struct mcf_serial *)tty->driver_data;
753 unsigned long flags;
754 int c, total = 0;
755
756#if 0
757 printk("%s(%d): mcfrs_write(tty=%x,buf=%x,count=%d)\n",
758 __FILE__, __LINE__, (int)tty, (int)buf, count);
759#endif
760
761 if (serial_paranoia_check(info, tty->name, "mcfrs_write"))
762 return 0;
763
764 if (!tty || !info->xmit_buf)
765 return 0;
766
767 local_save_flags(flags);
768 while (1) {
769 local_irq_disable();
770 c = min(count, (int) min(((int)SERIAL_XMIT_SIZE) - info->xmit_cnt - 1,
771 ((int)SERIAL_XMIT_SIZE) - info->xmit_head));
772 local_irq_restore(flags);
773
774 if (c <= 0)
775 break;
776
777 memcpy(info->xmit_buf + info->xmit_head, buf, c);
778
779 local_irq_disable();
780 info->xmit_head = (info->xmit_head + c) & (SERIAL_XMIT_SIZE-1);
781 info->xmit_cnt += c;
782 local_irq_restore(flags);
783
784 buf += c;
785 count -= c;
786 total += c;
787 }
788
789 local_irq_disable();
790 uartp = info->addr;
791 info->imr |= MCFUART_UIR_TXREADY;
792 uartp[MCFUART_UIMR] = info->imr;
793 local_irq_restore(flags);
794
795 return total;
796}
797
798static int mcfrs_write_room(struct tty_struct *tty)
799{
800 struct mcf_serial *info = (struct mcf_serial *)tty->driver_data;
801 int ret;
802
803 if (serial_paranoia_check(info, tty->name, "mcfrs_write_room"))
804 return 0;
805 ret = SERIAL_XMIT_SIZE - info->xmit_cnt - 1;
806 if (ret < 0)
807 ret = 0;
808 return ret;
809}
810
811static int mcfrs_chars_in_buffer(struct tty_struct *tty)
812{
813 struct mcf_serial *info = (struct mcf_serial *)tty->driver_data;
814
815 if (serial_paranoia_check(info, tty->name, "mcfrs_chars_in_buffer"))
816 return 0;
817 return info->xmit_cnt;
818}
819
820static void mcfrs_flush_buffer(struct tty_struct *tty)
821{
822 struct mcf_serial *info = (struct mcf_serial *)tty->driver_data;
823 unsigned long flags;
824
825 if (serial_paranoia_check(info, tty->name, "mcfrs_flush_buffer"))
826 return;
827
828 local_irq_save(flags);
829 info->xmit_cnt = info->xmit_head = info->xmit_tail = 0;
830 local_irq_restore(flags);
831
832 tty_wakeup(tty);
833}
834
835/*
836 * ------------------------------------------------------------
837 * mcfrs_throttle()
838 *
839 * This routine is called by the upper-layer tty layer to signal that
840 * incoming characters should be throttled.
841 * ------------------------------------------------------------
842 */
843static void mcfrs_throttle(struct tty_struct * tty)
844{
845 struct mcf_serial *info = (struct mcf_serial *)tty->driver_data;
846#ifdef SERIAL_DEBUG_THROTTLE
847 char buf[64];
848
849 printk("throttle %s: %d....\n", _tty_name(tty, buf),
850 tty->ldisc.chars_in_buffer(tty));
851#endif
852
853 if (serial_paranoia_check(info, tty->name, "mcfrs_throttle"))
854 return;
855
856 if (I_IXOFF(tty))
857 info->x_char = STOP_CHAR(tty);
858
859 /* Turn off RTS line (do this atomic) */
860}
861
862static void mcfrs_unthrottle(struct tty_struct * tty)
863{
864 struct mcf_serial *info = (struct mcf_serial *)tty->driver_data;
865#ifdef SERIAL_DEBUG_THROTTLE
866 char buf[64];
867
868 printk("unthrottle %s: %d....\n", _tty_name(tty, buf),
869 tty->ldisc.chars_in_buffer(tty));
870#endif
871
872 if (serial_paranoia_check(info, tty->name, "mcfrs_unthrottle"))
873 return;
874
875 if (I_IXOFF(tty)) {
876 if (info->x_char)
877 info->x_char = 0;
878 else
879 info->x_char = START_CHAR(tty);
880 }
881
882 /* Assert RTS line (do this atomic) */
883}
884
885/*
886 * ------------------------------------------------------------
887 * mcfrs_ioctl() and friends
888 * ------------------------------------------------------------
889 */
890
891static int get_serial_info(struct mcf_serial * info,
892 struct serial_struct * retinfo)
893{
894 struct serial_struct tmp;
895
896 if (!retinfo)
897 return -EFAULT;
898 memset(&tmp, 0, sizeof(tmp));
899 tmp.type = info->type;
900 tmp.line = info->line;
901 tmp.port = (unsigned int) info->addr;
902 tmp.irq = info->irq;
903 tmp.flags = info->flags;
904 tmp.baud_base = info->baud_base;
905 tmp.close_delay = info->close_delay;
906 tmp.closing_wait = info->closing_wait;
907 tmp.custom_divisor = info->custom_divisor;
908 return copy_to_user(retinfo,&tmp,sizeof(*retinfo)) ? -EFAULT : 0;
909}
910
911static int set_serial_info(struct mcf_serial * info,
912 struct serial_struct * new_info)
913{
914 struct serial_struct new_serial;
915 struct mcf_serial old_info;
916 int retval = 0;
917
918 if (!new_info)
919 return -EFAULT;
920 if (copy_from_user(&new_serial,new_info,sizeof(new_serial)))
921 return -EFAULT;
922 old_info = *info;
923
924 if (!capable(CAP_SYS_ADMIN)) {
925 if ((new_serial.baud_base != info->baud_base) ||
926 (new_serial.type != info->type) ||
927 (new_serial.close_delay != info->close_delay) ||
928 ((new_serial.flags & ~ASYNC_USR_MASK) !=
929 (info->flags & ~ASYNC_USR_MASK)))
930 return -EPERM;
931 info->flags = ((info->flags & ~ASYNC_USR_MASK) |
932 (new_serial.flags & ASYNC_USR_MASK));
933 info->custom_divisor = new_serial.custom_divisor;
934 goto check_and_exit;
935 }
936
937 if (info->count > 1)
938 return -EBUSY;
939
940 /*
941 * OK, past this point, all the error checking has been done.
942 * At this point, we start making changes.....
943 */
944
945 info->baud_base = new_serial.baud_base;
946 info->flags = ((info->flags & ~ASYNC_FLAGS) |
947 (new_serial.flags & ASYNC_FLAGS));
948 info->type = new_serial.type;
949 info->close_delay = new_serial.close_delay;
950 info->closing_wait = new_serial.closing_wait;
951
952check_and_exit:
953 retval = startup(info);
954 return retval;
955}
956
957/*
958 * get_lsr_info - get line status register info
959 *
960 * Purpose: Let user call ioctl() to get info when the UART physically
961 * is emptied. On bus types like RS485, the transmitter must
962 * release the bus after transmitting. This must be done when
963 * the transmit shift register is empty, not be done when the
964 * transmit holding register is empty. This functionality
965 * allows an RS485 driver to be written in user space.
966 */
967static int get_lsr_info(struct mcf_serial * info, unsigned int *value)
968{
969 volatile unsigned char *uartp;
970 unsigned long flags;
971 unsigned char status;
972
973 local_irq_save(flags);
974 uartp = info->addr;
975 status = (uartp[MCFUART_USR] & MCFUART_USR_TXEMPTY) ? TIOCSER_TEMT : 0;
976 local_irq_restore(flags);
977
978 return put_user(status,value);
979}
980
981/*
982 * This routine sends a break character out the serial port.
983 */
984static void send_break( struct mcf_serial * info, int duration)
985{
986 volatile unsigned char *uartp;
987 unsigned long flags;
988
989 if (!info->addr)
990 return;
991 set_current_state(TASK_INTERRUPTIBLE);
992 uartp = info->addr;
993
994 local_irq_save(flags);
995 uartp[MCFUART_UCR] = MCFUART_UCR_CMDBREAKSTART;
996 schedule_timeout(duration);
997 uartp[MCFUART_UCR] = MCFUART_UCR_CMDBREAKSTOP;
998 local_irq_restore(flags);
999}
1000
1001static int mcfrs_tiocmget(struct tty_struct *tty, struct file *file)
1002{
1003 struct mcf_serial * info = (struct mcf_serial *)tty->driver_data;
1004
1005 if (serial_paranoia_check(info, tty->name, "mcfrs_ioctl"))
1006 return -ENODEV;
1007 if (tty->flags & (1 << TTY_IO_ERROR))
1008 return -EIO;
1009
1010 return mcfrs_getsignals(info);
1011}
1012
1013static int mcfrs_tiocmset(struct tty_struct *tty, struct file *file,
1014 unsigned int set, unsigned int clear)
1015{
1016 struct mcf_serial * info = (struct mcf_serial *)tty->driver_data;
1017 int rts = -1, dtr = -1;
1018
1019 if (serial_paranoia_check(info, tty->name, "mcfrs_ioctl"))
1020 return -ENODEV;
1021 if (tty->flags & (1 << TTY_IO_ERROR))
1022 return -EIO;
1023
1024 if (set & TIOCM_RTS)
1025 rts = 1;
1026 if (set & TIOCM_DTR)
1027 dtr = 1;
1028 if (clear & TIOCM_RTS)
1029 rts = 0;
1030 if (clear & TIOCM_DTR)
1031 dtr = 0;
1032
1033 mcfrs_setsignals(info, dtr, rts);
1034
1035 return 0;
1036}
1037
1038static int mcfrs_ioctl(struct tty_struct *tty, struct file * file,
1039 unsigned int cmd, unsigned long arg)
1040{
1041 struct mcf_serial * info = (struct mcf_serial *)tty->driver_data;
1042 int retval, error;
1043
1044 if (serial_paranoia_check(info, tty->name, "mcfrs_ioctl"))
1045 return -ENODEV;
1046
1047 if ((cmd != TIOCGSERIAL) && (cmd != TIOCSSERIAL) &&
1048 (cmd != TIOCSERCONFIG) && (cmd != TIOCSERGWILD) &&
1049 (cmd != TIOCSERSWILD) && (cmd != TIOCSERGSTRUCT)) {
1050 if (tty->flags & (1 << TTY_IO_ERROR))
1051 return -EIO;
1052 }
1053
1054 switch (cmd) {
1055 case TCSBRK: /* SVID version: non-zero arg --> no break */
1056 retval = tty_check_change(tty);
1057 if (retval)
1058 return retval;
1059 tty_wait_until_sent(tty, 0);
1060 if (!arg)
1061 send_break(info, HZ/4); /* 1/4 second */
1062 return 0;
1063 case TCSBRKP: /* support for POSIX tcsendbreak() */
1064 retval = tty_check_change(tty);
1065 if (retval)
1066 return retval;
1067 tty_wait_until_sent(tty, 0);
1068 send_break(info, arg ? arg*(HZ/10) : HZ/4);
1069 return 0;
1070 case TIOCGSOFTCAR:
1071 error = put_user(C_CLOCAL(tty) ? 1 : 0,
1072 (unsigned long *) arg);
1073 if (error)
1074 return error;
1075 return 0;
1076 case TIOCSSOFTCAR:
1077 get_user(arg, (unsigned long *) arg);
1078 tty->termios->c_cflag =
1079 ((tty->termios->c_cflag & ~CLOCAL) |
1080 (arg ? CLOCAL : 0));
1081 return 0;
1082 case TIOCGSERIAL:
1083 if (access_ok(VERIFY_WRITE, (void *) arg,
1084 sizeof(struct serial_struct)))
1085 return get_serial_info(info,
1086 (struct serial_struct *) arg);
1087 return -EFAULT;
1088 case TIOCSSERIAL:
1089 return set_serial_info(info,
1090 (struct serial_struct *) arg);
1091 case TIOCSERGETLSR: /* Get line status register */
1092 if (access_ok(VERIFY_WRITE, (void *) arg,
1093 sizeof(unsigned int)))
1094 return get_lsr_info(info, (unsigned int *) arg);
1095 return -EFAULT;
1096 case TIOCSERGSTRUCT:
1097 error = copy_to_user((struct mcf_serial *) arg,
1098 info, sizeof(struct mcf_serial));
1099 if (error)
1100 return -EFAULT;
1101 return 0;
1102
1103#ifdef TIOCSET422
1104 case TIOCSET422: {
1105 unsigned int val;
1106 get_user(val, (unsigned int *) arg);
1107 mcf_setpa(MCFPP_PA11, (val ? 0 : MCFPP_PA11));
1108 break;
1109 }
1110 case TIOCGET422: {
1111 unsigned int val;
1112 val = (mcf_getpa() & MCFPP_PA11) ? 0 : 1;
1113 put_user(val, (unsigned int *) arg);
1114 break;
1115 }
1116#endif
1117
1118 default:
1119 return -ENOIOCTLCMD;
1120 }
1121 return 0;
1122}
1123
1124static void mcfrs_set_termios(struct tty_struct *tty, struct termios *old_termios)
1125{
1126 struct mcf_serial *info = (struct mcf_serial *)tty->driver_data;
1127
1128 if (tty->termios->c_cflag == old_termios->c_cflag)
1129 return;
1130
1131 mcfrs_change_speed(info);
1132
1133 if ((old_termios->c_cflag & CRTSCTS) &&
1134 !(tty->termios->c_cflag & CRTSCTS)) {
1135 tty->hw_stopped = 0;
1136 mcfrs_setsignals(info, -1, 1);
1137#if 0
1138 mcfrs_start(tty);
1139#endif
1140 }
1141}
1142
1143/*
1144 * ------------------------------------------------------------
1145 * mcfrs_close()
1146 *
1147 * This routine is called when the serial port gets closed. First, we
1148 * wait for the last remaining data to be sent. Then, we unlink its
1149 * S structure from the interrupt chain if necessary, and we free
1150 * that IRQ if nothing is left in the chain.
1151 * ------------------------------------------------------------
1152 */
1153static void mcfrs_close(struct tty_struct *tty, struct file * filp)
1154{
1155 volatile unsigned char *uartp;
1156 struct mcf_serial *info = (struct mcf_serial *)tty->driver_data;
1157 unsigned long flags;
1158
1159 if (!info || serial_paranoia_check(info, tty->name, "mcfrs_close"))
1160 return;
1161
1162 local_irq_save(flags);
1163
1164 if (tty_hung_up_p(filp)) {
1165 local_irq_restore(flags);
1166 return;
1167 }
1168
1169#ifdef SERIAL_DEBUG_OPEN
1170 printk("mcfrs_close ttyS%d, count = %d\n", info->line, info->count);
1171#endif
1172 if ((tty->count == 1) && (info->count != 1)) {
1173 /*
1174 * Uh, oh. tty->count is 1, which means that the tty
1175 * structure will be freed. Info->count should always
1176 * be one in these conditions. If it's greater than
1177 * one, we've got real problems, since it means the
1178 * serial port won't be shutdown.
1179 */
1180 printk("MCFRS: bad serial port count; tty->count is 1, "
1181 "info->count is %d\n", info->count);
1182 info->count = 1;
1183 }
1184 if (--info->count < 0) {
1185 printk("MCFRS: bad serial port count for ttyS%d: %d\n",
1186 info->line, info->count);
1187 info->count = 0;
1188 }
1189 if (info->count) {
1190 local_irq_restore(flags);
1191 return;
1192 }
1193 info->flags |= ASYNC_CLOSING;
1194
1195 /*
1196 * Now we wait for the transmit buffer to clear; and we notify
1197 * the line discipline to only process XON/XOFF characters.
1198 */
1199 tty->closing = 1;
1200 if (info->closing_wait != ASYNC_CLOSING_WAIT_NONE)
1201 tty_wait_until_sent(tty, info->closing_wait);
1202
1203 /*
1204 * At this point we stop accepting input. To do this, we
1205 * disable the receive line status interrupts, and tell the
1206 * interrupt driver to stop checking the data ready bit in the
1207 * line status register.
1208 */
1209 info->imr &= ~MCFUART_UIR_RXREADY;
1210 uartp = info->addr;
1211 uartp[MCFUART_UIMR] = info->imr;
1212
1213#if 0
1214 /* FIXME: do we need to keep this enabled for console?? */
1215 if (mcfrs_console_inited && (mcfrs_console_port == info->line)) {
1216 /* Do not disable the UART */ ;
1217 } else
1218#endif
1219 shutdown(info);
1220 if (tty->driver->flush_buffer)
1221 tty->driver->flush_buffer(tty);
1222 tty_ldisc_flush(tty);
1223
1224 tty->closing = 0;
1225 info->event = 0;
1226 info->tty = 0;
1227#if 0
1228 if (tty->ldisc.num != ldiscs[N_TTY].num) {
1229 if (tty->ldisc.close)
1230 (tty->ldisc.close)(tty);
1231 tty->ldisc = ldiscs[N_TTY];
1232 tty->termios->c_line = N_TTY;
1233 if (tty->ldisc.open)
1234 (tty->ldisc.open)(tty);
1235 }
1236#endif
1237 if (info->blocked_open) {
1238 if (info->close_delay) {
1239 msleep_interruptible(jiffies_to_msecs(info->close_delay));
1240 }
1241 wake_up_interruptible(&info->open_wait);
1242 }
1243 info->flags &= ~(ASYNC_NORMAL_ACTIVE|ASYNC_CLOSING);
1244 wake_up_interruptible(&info->close_wait);
1245 local_irq_restore(flags);
1246}
1247
1248/*
1249 * mcfrs_wait_until_sent() --- wait until the transmitter is empty
1250 */
1251static void
1252mcfrs_wait_until_sent(struct tty_struct *tty, int timeout)
1253{
1254#ifdef CONFIG_M5272
1255#define MCF5272_FIFO_SIZE 25 /* fifo size + shift reg */
1256
1257 struct mcf_serial * info = (struct mcf_serial *)tty->driver_data;
1258 volatile unsigned char *uartp;
1259 unsigned long orig_jiffies, fifo_time, char_time, fifo_cnt;
1260
1261 if (serial_paranoia_check(info, tty->name, "mcfrs_wait_until_sent"))
1262 return;
1263
1264 orig_jiffies = jiffies;
1265
1266 /*
1267 * Set the check interval to be 1/5 of the approximate time
1268 * to send the entire fifo, and make it at least 1. The check
1269 * interval should also be less than the timeout.
1270 *
1271 * Note: we have to use pretty tight timings here to satisfy
1272 * the NIST-PCTS.
1273 */
1274 fifo_time = (MCF5272_FIFO_SIZE * HZ * 10) / info->baud;
1275 char_time = fifo_time / 5;
1276 if (char_time == 0)
1277 char_time = 1;
1278 if (timeout && timeout < char_time)
1279 char_time = timeout;
1280
1281 /*
1282 * Clamp the timeout period at 2 * the time to empty the
1283 * fifo. Just to be safe, set the minimum at .5 seconds.
1284 */
1285 fifo_time *= 2;
1286 if (fifo_time < (HZ/2))
1287 fifo_time = HZ/2;
1288 if (!timeout || timeout > fifo_time)
1289 timeout = fifo_time;
1290
1291 /*
1292 * Account for the number of bytes in the UART
1293 * transmitter FIFO plus any byte being shifted out.
1294 */
1295 uartp = (volatile unsigned char *) info->addr;
1296 for (;;) {
1297 fifo_cnt = (uartp[MCFUART_UTF] & MCFUART_UTF_TXB);
1298 if ((uartp[MCFUART_USR] & (MCFUART_USR_TXREADY|
1299 MCFUART_USR_TXEMPTY)) ==
1300 MCFUART_USR_TXREADY)
1301 fifo_cnt++;
1302 if (fifo_cnt == 0)
1303 break;
1304 msleep_interruptible(jiffies_to_msecs(char_time));
1305 if (signal_pending(current))
1306 break;
1307 if (timeout && time_after(jiffies, orig_jiffies + timeout))
1308 break;
1309 }
1310#else
1311 /*
1312 * For the other coldfire models, assume all data has been sent
1313 */
1314#endif
1315}
1316
1317/*
1318 * mcfrs_hangup() --- called by tty_hangup() when a hangup is signaled.
1319 */
1320void mcfrs_hangup(struct tty_struct *tty)
1321{
1322 struct mcf_serial * info = (struct mcf_serial *)tty->driver_data;
1323
1324 if (serial_paranoia_check(info, tty->name, "mcfrs_hangup"))
1325 return;
1326
1327 mcfrs_flush_buffer(tty);
1328 shutdown(info);
1329 info->event = 0;
1330 info->count = 0;
1331 info->flags &= ~ASYNC_NORMAL_ACTIVE;
1332 info->tty = 0;
1333 wake_up_interruptible(&info->open_wait);
1334}
1335
1336/*
1337 * ------------------------------------------------------------
1338 * mcfrs_open() and friends
1339 * ------------------------------------------------------------
1340 */
1341static int block_til_ready(struct tty_struct *tty, struct file * filp,
1342 struct mcf_serial *info)
1343{
1344 DECLARE_WAITQUEUE(wait, current);
1345 int retval;
1346 int do_clocal = 0;
1347
1348 /*
1349 * If the device is in the middle of being closed, then block
1350 * until it's done, and then try again.
1351 */
1352 if (info->flags & ASYNC_CLOSING) {
1353 interruptible_sleep_on(&info->close_wait);
1354#ifdef SERIAL_DO_RESTART
1355 if (info->flags & ASYNC_HUP_NOTIFY)
1356 return -EAGAIN;
1357 else
1358 return -ERESTARTSYS;
1359#else
1360 return -EAGAIN;
1361#endif
1362 }
1363
1364 /*
1365 * If non-blocking mode is set, or the port is not enabled,
1366 * then make the check up front and then exit.
1367 */
1368 if ((filp->f_flags & O_NONBLOCK) ||
1369 (tty->flags & (1 << TTY_IO_ERROR))) {
1370 info->flags |= ASYNC_NORMAL_ACTIVE;
1371 return 0;
1372 }
1373
1374 if (tty->termios->c_cflag & CLOCAL)
1375 do_clocal = 1;
1376
1377 /*
1378 * Block waiting for the carrier detect and the line to become
1379 * free (i.e., not in use by the callout). While we are in
1380 * this loop, info->count is dropped by one, so that
1381 * mcfrs_close() knows when to free things. We restore it upon
1382 * exit, either normal or abnormal.
1383 */
1384 retval = 0;
1385 add_wait_queue(&info->open_wait, &wait);
1386#ifdef SERIAL_DEBUG_OPEN
1387 printk("block_til_ready before block: ttyS%d, count = %d\n",
1388 info->line, info->count);
1389#endif
1390 info->count--;
1391 info->blocked_open++;
1392 while (1) {
1393 local_irq_disable();
1394 mcfrs_setsignals(info, 1, 1);
1395 local_irq_enable();
1396 current->state = TASK_INTERRUPTIBLE;
1397 if (tty_hung_up_p(filp) ||
1398 !(info->flags & ASYNC_INITIALIZED)) {
1399#ifdef SERIAL_DO_RESTART
1400 if (info->flags & ASYNC_HUP_NOTIFY)
1401 retval = -EAGAIN;
1402 else
1403 retval = -ERESTARTSYS;
1404#else
1405 retval = -EAGAIN;
1406#endif
1407 break;
1408 }
1409 if (!(info->flags & ASYNC_CLOSING) &&
1410 (do_clocal || (mcfrs_getsignals(info) & TIOCM_CD)))
1411 break;
1412 if (signal_pending(current)) {
1413 retval = -ERESTARTSYS;
1414 break;
1415 }
1416#ifdef SERIAL_DEBUG_OPEN
1417 printk("block_til_ready blocking: ttyS%d, count = %d\n",
1418 info->line, info->count);
1419#endif
1420 schedule();
1421 }
1422 current->state = TASK_RUNNING;
1423 remove_wait_queue(&info->open_wait, &wait);
1424 if (!tty_hung_up_p(filp))
1425 info->count++;
1426 info->blocked_open--;
1427#ifdef SERIAL_DEBUG_OPEN
1428 printk("block_til_ready after blocking: ttyS%d, count = %d\n",
1429 info->line, info->count);
1430#endif
1431 if (retval)
1432 return retval;
1433 info->flags |= ASYNC_NORMAL_ACTIVE;
1434 return 0;
1435}
1436
1437/*
1438 * This routine is called whenever a serial port is opened. It
1439 * enables interrupts for a serial port, linking in its structure into
1440 * the IRQ chain. It also performs the serial-specific
1441 * initialization for the tty structure.
1442 */
1443int mcfrs_open(struct tty_struct *tty, struct file * filp)
1444{
1445 struct mcf_serial *info;
1446 int retval, line;
1447
1448 line = tty->index;
1449 if ((line < 0) || (line >= NR_PORTS))
1450 return -ENODEV;
1451 info = mcfrs_table + line;
1452 if (serial_paranoia_check(info, tty->name, "mcfrs_open"))
1453 return -ENODEV;
1454#ifdef SERIAL_DEBUG_OPEN
1455 printk("mcfrs_open %s, count = %d\n", tty->name, info->count);
1456#endif
1457 info->count++;
1458 tty->driver_data = info;
1459 info->tty = tty;
1460
1461 /*
1462 * Start up serial port
1463 */
1464 retval = startup(info);
1465 if (retval)
1466 return retval;
1467
1468 retval = block_til_ready(tty, filp, info);
1469 if (retval) {
1470#ifdef SERIAL_DEBUG_OPEN
1471 printk("mcfrs_open returning after block_til_ready with %d\n",
1472 retval);
1473#endif
1474 return retval;
1475 }
1476
1477#ifdef SERIAL_DEBUG_OPEN
1478 printk("mcfrs_open %s successful...\n", tty->name);
1479#endif
1480 return 0;
1481}
1482
1483/*
1484 * Based on the line number set up the internal interrupt stuff.
1485 */
1486static void mcfrs_irqinit(struct mcf_serial *info)
1487{
1488#if defined(CONFIG_M5272)
1489 volatile unsigned long *icrp;
1490 volatile unsigned long *portp;
1491 volatile unsigned char *uartp;
1492
1493 uartp = info->addr;
1494 icrp = (volatile unsigned long *) (MCF_MBAR + MCFSIM_ICR2);
1495
1496 switch (info->line) {
1497 case 0:
1498 *icrp = 0xe0000000;
1499 break;
1500 case 1:
1501 *icrp = 0x0e000000;
1502 break;
1503 default:
1504 printk("MCFRS: don't know how to handle UART %d interrupt?\n",
1505 info->line);
1506 return;
1507 }
1508
1509 /* Enable the output lines for the serial ports */
1510 portp = (volatile unsigned long *) (MCF_MBAR + MCFSIM_PBCNT);
1511 *portp = (*portp & ~0x000000ff) | 0x00000055;
1512 portp = (volatile unsigned long *) (MCF_MBAR + MCFSIM_PDCNT);
1513 *portp = (*portp & ~0x000003fc) | 0x000002a8;
1514#elif defined(CONFIG_M527x) || defined(CONFIG_M528x)
1515 volatile unsigned char *icrp, *uartp;
1516 volatile unsigned long *imrp;
1517
1518 uartp = info->addr;
1519
1520 icrp = (volatile unsigned char *) (MCF_MBAR + MCFICM_INTC0 +
1521 MCFINTC_ICR0 + MCFINT_UART0 + info->line);
1522 *icrp = 0x33; /* UART0 with level 6, priority 3 */
1523
1524 imrp = (volatile unsigned long *) (MCF_MBAR + MCFICM_INTC0 +
1525 MCFINTC_IMRL);
1526 *imrp &= ~((1 << (info->irq - MCFINT_VECBASE)) | 1);
1527#else
1528 volatile unsigned char *icrp, *uartp;
1529
1530 switch (info->line) {
1531 case 0:
1532 icrp = (volatile unsigned char *) (MCF_MBAR + MCFSIM_UART1ICR);
1533 *icrp = /*MCFSIM_ICR_AUTOVEC |*/ MCFSIM_ICR_LEVEL6 |
1534 MCFSIM_ICR_PRI1;
1535 mcf_setimr(mcf_getimr() & ~MCFSIM_IMR_UART1);
1536 break;
1537 case 1:
1538 icrp = (volatile unsigned char *) (MCF_MBAR + MCFSIM_UART2ICR);
1539 *icrp = /*MCFSIM_ICR_AUTOVEC |*/ MCFSIM_ICR_LEVEL6 |
1540 MCFSIM_ICR_PRI2;
1541 mcf_setimr(mcf_getimr() & ~MCFSIM_IMR_UART2);
1542 break;
1543 default:
1544 printk("MCFRS: don't know how to handle UART %d interrupt?\n",
1545 info->line);
1546 return;
1547 }
1548
1549 uartp = info->addr;
1550 uartp[MCFUART_UIVR] = info->irq;
1551#endif
1552
1553 /* Clear mask, so no surprise interrupts. */
1554 uartp[MCFUART_UIMR] = 0;
1555
1556 if (request_irq(info->irq, mcfrs_interrupt, SA_INTERRUPT,
1557 "ColdFire UART", NULL)) {
1558 printk("MCFRS: Unable to attach ColdFire UART %d interrupt "
1559 "vector=%d\n", info->line, info->irq);
1560 }
1561
1562 return;
1563}
1564
1565
1566char *mcfrs_drivername = "ColdFire internal UART serial driver version 1.00\n";
1567
1568
1569/*
1570 * Serial stats reporting...
1571 */
1572int mcfrs_readproc(char *page, char **start, off_t off, int count,
1573 int *eof, void *data)
1574{
1575 struct mcf_serial *info;
1576 char str[20];
1577 int len, sigs, i;
1578
1579 len = sprintf(page, mcfrs_drivername);
1580 for (i = 0; (i < NR_PORTS); i++) {
1581 info = &mcfrs_table[i];
1582 len += sprintf((page + len), "%d: port:%x irq=%d baud:%d ",
1583 i, (unsigned int) info->addr, info->irq, info->baud);
1584 if (info->stats.rx || info->stats.tx)
1585 len += sprintf((page + len), "tx:%d rx:%d ",
1586 info->stats.tx, info->stats.rx);
1587 if (info->stats.rxframing)
1588 len += sprintf((page + len), "fe:%d ",
1589 info->stats.rxframing);
1590 if (info->stats.rxparity)
1591 len += sprintf((page + len), "pe:%d ",
1592 info->stats.rxparity);
1593 if (info->stats.rxbreak)
1594 len += sprintf((page + len), "brk:%d ",
1595 info->stats.rxbreak);
1596 if (info->stats.rxoverrun)
1597 len += sprintf((page + len), "oe:%d ",
1598 info->stats.rxoverrun);
1599
1600 str[0] = str[1] = 0;
1601 if ((sigs = mcfrs_getsignals(info))) {
1602 if (sigs & TIOCM_RTS)
1603 strcat(str, "|RTS");
1604 if (sigs & TIOCM_CTS)
1605 strcat(str, "|CTS");
1606 if (sigs & TIOCM_DTR)
1607 strcat(str, "|DTR");
1608 if (sigs & TIOCM_CD)
1609 strcat(str, "|CD");
1610 }
1611
1612 len += sprintf((page + len), "%s\n", &str[1]);
1613 }
1614
1615 return(len);
1616}
1617
1618
1619/* Finally, routines used to initialize the serial driver. */
1620
1621static void show_serial_version(void)
1622{
1623 printk(mcfrs_drivername);
1624}
1625
1626static struct tty_operations mcfrs_ops = {
1627 .open = mcfrs_open,
1628 .close = mcfrs_close,
1629 .write = mcfrs_write,
1630 .flush_chars = mcfrs_flush_chars,
1631 .write_room = mcfrs_write_room,
1632 .chars_in_buffer = mcfrs_chars_in_buffer,
1633 .flush_buffer = mcfrs_flush_buffer,
1634 .ioctl = mcfrs_ioctl,
1635 .throttle = mcfrs_throttle,
1636 .unthrottle = mcfrs_unthrottle,
1637 .set_termios = mcfrs_set_termios,
1638 .stop = mcfrs_stop,
1639 .start = mcfrs_start,
1640 .hangup = mcfrs_hangup,
1641 .read_proc = mcfrs_readproc,
1642 .wait_until_sent = mcfrs_wait_until_sent,
1643 .tiocmget = mcfrs_tiocmget,
1644 .tiocmset = mcfrs_tiocmset,
1645};
1646
1647/* mcfrs_init inits the driver */
1648static int __init
1649mcfrs_init(void)
1650{
1651 struct mcf_serial *info;
1652 unsigned long flags;
1653 int i;
1654
1655 /* Setup base handler, and timer table. */
1656#ifdef MCFPP_DCD0
1657 init_timer(&mcfrs_timer_struct);
1658 mcfrs_timer_struct.function = mcfrs_timer;
1659 mcfrs_timer_struct.data = 0;
1660 mcfrs_timer_struct.expires = jiffies + HZ/25;
1661 add_timer(&mcfrs_timer_struct);
1662 mcfrs_ppstatus = mcf_getppdata() & (MCFPP_DCD0 | MCFPP_DCD1);
1663#endif
1664 mcfrs_serial_driver = alloc_tty_driver(NR_PORTS);
1665 if (!mcfrs_serial_driver)
1666 return -ENOMEM;
1667
1668 show_serial_version();
1669
1670 /* Initialize the tty_driver structure */
1671 mcfrs_serial_driver->owner = THIS_MODULE;
1672 mcfrs_serial_driver->name = "ttyS";
1673 mcfrs_serial_driver->devfs_name = "ttys/";
1674 mcfrs_serial_driver->driver_name = "serial";
1675 mcfrs_serial_driver->major = TTY_MAJOR;
1676 mcfrs_serial_driver->minor_start = 64;
1677 mcfrs_serial_driver->type = TTY_DRIVER_TYPE_SERIAL;
1678 mcfrs_serial_driver->subtype = SERIAL_TYPE_NORMAL;
1679 mcfrs_serial_driver->init_termios = tty_std_termios;
1680
1681 mcfrs_serial_driver->init_termios.c_cflag =
1682 mcfrs_console_cbaud | CS8 | CREAD | HUPCL | CLOCAL;
1683 mcfrs_serial_driver->flags = TTY_DRIVER_REAL_RAW;
1684
1685 tty_set_operations(mcfrs_serial_driver, &mcfrs_ops);
1686
1687 if (tty_register_driver(mcfrs_serial_driver)) {
1688 printk("MCFRS: Couldn't register serial driver\n");
1689 put_tty_driver(mcfrs_serial_driver);
1690 return(-EBUSY);
1691 }
1692
1693 local_irq_save(flags);
1694
1695 /*
1696 * Configure all the attached serial ports.
1697 */
1698 for (i = 0, info = mcfrs_table; (i < NR_PORTS); i++, info++) {
1699 info->magic = SERIAL_MAGIC;
1700 info->line = i;
1701 info->tty = 0;
1702 info->custom_divisor = 16;
1703 info->close_delay = 50;
1704 info->closing_wait = 3000;
1705 info->x_char = 0;
1706 info->event = 0;
1707 info->count = 0;
1708 info->blocked_open = 0;
1709 INIT_WORK(&info->tqueue, mcfrs_offintr, info);
1710 INIT_WORK(&info->tqueue_hangup, do_serial_hangup, info);
1711 init_waitqueue_head(&info->open_wait);
1712 init_waitqueue_head(&info->close_wait);
1713
1714 info->imr = 0;
1715 mcfrs_setsignals(info, 0, 0);
1716 mcfrs_irqinit(info);
1717
1718 printk("ttyS%d at 0x%04x (irq = %d)", info->line,
1719 (unsigned int) info->addr, info->irq);
1720 printk(" is a builtin ColdFire UART\n");
1721 }
1722
1723 local_irq_restore(flags);
1724 return 0;
1725}
1726
1727module_init(mcfrs_init);
1728
1729/****************************************************************************/
1730/* Serial Console */
1731/****************************************************************************/
1732
1733/*
1734 * Quick and dirty UART initialization, for console output.
1735 */
1736
1737void mcfrs_init_console(void)
1738{
1739 volatile unsigned char *uartp;
1740 unsigned int clk;
1741
1742 /*
1743 * Reset UART, get it into known state...
1744 */
1745 uartp = (volatile unsigned char *) (MCF_MBAR +
1746 (mcfrs_console_port ? MCFUART_BASE2 : MCFUART_BASE1));
1747
1748 uartp[MCFUART_UCR] = MCFUART_UCR_CMDRESETRX; /* reset RX */
1749 uartp[MCFUART_UCR] = MCFUART_UCR_CMDRESETTX; /* reset TX */
1750 uartp[MCFUART_UCR] = MCFUART_UCR_CMDRESETMRPTR; /* reset MR pointer */
1751
1752 /*
1753 * Set port for defined baud , 8 data bits, 1 stop bit, no parity.
1754 */
1755 uartp[MCFUART_UMR] = MCFUART_MR1_PARITYNONE | MCFUART_MR1_CS8;
1756 uartp[MCFUART_UMR] = MCFUART_MR2_STOP1;
1757
1758 clk = ((MCF_BUSCLK / mcfrs_console_baud) + 16) / 32; /* set baud */
1759 uartp[MCFUART_UBG1] = (clk & 0xff00) >> 8; /* set msb baud */
1760 uartp[MCFUART_UBG2] = (clk & 0xff); /* set lsb baud */
1761
1762 uartp[MCFUART_UCSR] = MCFUART_UCSR_RXCLKTIMER | MCFUART_UCSR_TXCLKTIMER;
1763 uartp[MCFUART_UCR] = MCFUART_UCR_RXENABLE | MCFUART_UCR_TXENABLE;
1764
1765 mcfrs_console_inited++;
1766 return;
1767}
1768
1769
1770/*
1771 * Setup for console. Argument comes from the boot command line.
1772 */
1773
1774int mcfrs_console_setup(struct console *cp, char *arg)
1775{
1776 int i, n = CONSOLE_BAUD_RATE;
1777
1778 if (!cp)
1779 return(-1);
1780
1781 if (!strncmp(cp->name, "ttyS", 4))
1782 mcfrs_console_port = cp->index;
1783 else if (!strncmp(cp->name, "cua", 3))
1784 mcfrs_console_port = cp->index;
1785 else
1786 return(-1);
1787
1788 if (arg)
1789 n = simple_strtoul(arg,NULL,0);
1790 for (i = 0; i < MCFRS_BAUD_TABLE_SIZE; i++)
1791 if (mcfrs_baud_table[i] == n)
1792 break;
1793 if (i < MCFRS_BAUD_TABLE_SIZE) {
1794 mcfrs_console_baud = n;
1795 mcfrs_console_cbaud = 0;
1796 if (i > 15) {
1797 mcfrs_console_cbaud |= CBAUDEX;
1798 i -= 15;
1799 }
1800 mcfrs_console_cbaud |= i;
1801 }
1802 mcfrs_init_console(); /* make sure baud rate changes */
1803 return(0);
1804}
1805
1806
1807static struct tty_driver *mcfrs_console_device(struct console *c, int *index)
1808{
1809 *index = c->index;
1810 return mcfrs_serial_driver;
1811}
1812
1813
1814/*
1815 * Output a single character, using UART polled mode.
1816 * This is used for console output.
1817 */
1818
1819void mcfrs_put_char(char ch)
1820{
1821 volatile unsigned char *uartp;
1822 unsigned long flags;
1823 int i;
1824
1825 uartp = (volatile unsigned char *) (MCF_MBAR +
1826 (mcfrs_console_port ? MCFUART_BASE2 : MCFUART_BASE1));
1827
1828 local_irq_save(flags);
1829 for (i = 0; (i < 0x10000); i++) {
1830 if (uartp[MCFUART_USR] & MCFUART_USR_TXREADY)
1831 break;
1832 }
1833 if (i < 0x10000) {
1834 uartp[MCFUART_UTB] = ch;
1835 for (i = 0; (i < 0x10000); i++)
1836 if (uartp[MCFUART_USR] & MCFUART_USR_TXEMPTY)
1837 break;
1838 }
1839 if (i >= 0x10000)
1840 mcfrs_init_console(); /* try and get it back */
1841 local_irq_restore(flags);
1842
1843 return;
1844}
1845
1846
1847/*
1848 * rs_console_write is registered for printk output.
1849 */
1850
1851void mcfrs_console_write(struct console *cp, const char *p, unsigned len)
1852{
1853 if (!mcfrs_console_inited)
1854 mcfrs_init_console();
1855 while (len-- > 0) {
1856 if (*p == '\n')
1857 mcfrs_put_char('\r');
1858 mcfrs_put_char(*p++);
1859 }
1860}
1861
1862/*
1863 * declare our consoles
1864 */
1865
1866struct console mcfrs_console = {
1867 .name = "ttyS",
1868 .write = mcfrs_console_write,
1869 .device = mcfrs_console_device,
1870 .setup = mcfrs_console_setup,
1871 .flags = CON_PRINTBUFFER,
1872 .index = -1,
1873};
1874
1875static int __init mcfrs_console_init(void)
1876{
1877 register_console(&mcfrs_console);
1878 return 0;
1879}
1880
1881console_initcall(mcfrs_console_init);
1882
1883/****************************************************************************/