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