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