xref: /openbmc/linux/drivers/tty/serial/lantiq.c (revision dc6a81c3)
1 // SPDX-License-Identifier: GPL-2.0
2 /*
3  *  Based on drivers/char/serial.c, by Linus Torvalds, Theodore Ts'o.
4  *
5  * Copyright (C) 2004 Infineon IFAP DC COM CPE
6  * Copyright (C) 2007 Felix Fietkau <nbd@openwrt.org>
7  * Copyright (C) 2007 John Crispin <john@phrozen.org>
8  * Copyright (C) 2010 Thomas Langer, <thomas.langer@lantiq.com>
9  */
10 
11 #include <linux/clk.h>
12 #include <linux/console.h>
13 #include <linux/device.h>
14 #include <linux/gpio.h>
15 #include <linux/init.h>
16 #include <linux/io.h>
17 #include <linux/ioport.h>
18 #include <linux/lantiq.h>
19 #include <linux/of_address.h>
20 #include <linux/of_irq.h>
21 #include <linux/of_platform.h>
22 #include <linux/serial.h>
23 #include <linux/serial_core.h>
24 #include <linux/slab.h>
25 #include <linux/sysrq.h>
26 #include <linux/tty.h>
27 #include <linux/tty_flip.h>
28 
29 #define PORT_LTQ_ASC		111
30 #define MAXPORTS		2
31 #define UART_DUMMY_UER_RX	1
32 #define DRVNAME			"lantiq,asc"
33 #ifdef __BIG_ENDIAN
34 #define LTQ_ASC_TBUF		(0x0020 + 3)
35 #define LTQ_ASC_RBUF		(0x0024 + 3)
36 #else
37 #define LTQ_ASC_TBUF		0x0020
38 #define LTQ_ASC_RBUF		0x0024
39 #endif
40 #define LTQ_ASC_FSTAT		0x0048
41 #define LTQ_ASC_WHBSTATE	0x0018
42 #define LTQ_ASC_STATE		0x0014
43 #define LTQ_ASC_IRNCR		0x00F8
44 #define LTQ_ASC_CLC		0x0000
45 #define LTQ_ASC_ID		0x0008
46 #define LTQ_ASC_PISEL		0x0004
47 #define LTQ_ASC_TXFCON		0x0044
48 #define LTQ_ASC_RXFCON		0x0040
49 #define LTQ_ASC_CON		0x0010
50 #define LTQ_ASC_BG		0x0050
51 #define LTQ_ASC_IRNREN		0x00F4
52 
53 #define ASC_IRNREN_TX		0x1
54 #define ASC_IRNREN_RX		0x2
55 #define ASC_IRNREN_ERR		0x4
56 #define ASC_IRNREN_TX_BUF	0x8
57 #define ASC_IRNCR_TIR		0x1
58 #define ASC_IRNCR_RIR		0x2
59 #define ASC_IRNCR_EIR		0x4
60 #define ASC_IRNCR_MASK		GENMASK(2, 0)
61 
62 #define ASCOPT_CSIZE		0x3
63 #define TXFIFO_FL		1
64 #define RXFIFO_FL		1
65 #define ASCCLC_DISS		0x2
66 #define ASCCLC_RMCMASK		0x0000FF00
67 #define ASCCLC_RMCOFFSET	8
68 #define ASCCON_M_8ASYNC		0x0
69 #define ASCCON_M_7ASYNC		0x2
70 #define ASCCON_ODD		0x00000020
71 #define ASCCON_STP		0x00000080
72 #define ASCCON_BRS		0x00000100
73 #define ASCCON_FDE		0x00000200
74 #define ASCCON_R		0x00008000
75 #define ASCCON_FEN		0x00020000
76 #define ASCCON_ROEN		0x00080000
77 #define ASCCON_TOEN		0x00100000
78 #define ASCSTATE_PE		0x00010000
79 #define ASCSTATE_FE		0x00020000
80 #define ASCSTATE_ROE		0x00080000
81 #define ASCSTATE_ANY		(ASCSTATE_ROE|ASCSTATE_PE|ASCSTATE_FE)
82 #define ASCWHBSTATE_CLRREN	0x00000001
83 #define ASCWHBSTATE_SETREN	0x00000002
84 #define ASCWHBSTATE_CLRPE	0x00000004
85 #define ASCWHBSTATE_CLRFE	0x00000008
86 #define ASCWHBSTATE_CLRROE	0x00000020
87 #define ASCTXFCON_TXFEN		0x0001
88 #define ASCTXFCON_TXFFLU	0x0002
89 #define ASCTXFCON_TXFITLMASK	0x3F00
90 #define ASCTXFCON_TXFITLOFF	8
91 #define ASCRXFCON_RXFEN		0x0001
92 #define ASCRXFCON_RXFFLU	0x0002
93 #define ASCRXFCON_RXFITLMASK	0x3F00
94 #define ASCRXFCON_RXFITLOFF	8
95 #define ASCFSTAT_RXFFLMASK	0x003F
96 #define ASCFSTAT_TXFFLMASK	0x3F00
97 #define ASCFSTAT_TXFREEMASK	0x3F000000
98 #define ASCFSTAT_TXFREEOFF	24
99 
100 static void lqasc_tx_chars(struct uart_port *port);
101 static struct ltq_uart_port *lqasc_port[MAXPORTS];
102 static struct uart_driver lqasc_reg;
103 
104 struct ltq_soc_data {
105 	int	(*fetch_irq)(struct device *dev, struct ltq_uart_port *ltq_port);
106 	int	(*request_irq)(struct uart_port *port);
107 	void	(*free_irq)(struct uart_port *port);
108 };
109 
110 struct ltq_uart_port {
111 	struct uart_port	port;
112 	/* clock used to derive divider */
113 	struct clk		*freqclk;
114 	/* clock gating of the ASC core */
115 	struct clk		*clk;
116 	unsigned int		tx_irq;
117 	unsigned int		rx_irq;
118 	unsigned int		err_irq;
119 	unsigned int		common_irq;
120 	spinlock_t		lock; /* exclusive access for multi core */
121 
122 	const struct ltq_soc_data	*soc;
123 };
124 
125 static inline void asc_update_bits(u32 clear, u32 set, void __iomem *reg)
126 {
127 	u32 tmp = __raw_readl(reg);
128 
129 	__raw_writel((tmp & ~clear) | set, reg);
130 }
131 
132 static inline struct
133 ltq_uart_port *to_ltq_uart_port(struct uart_port *port)
134 {
135 	return container_of(port, struct ltq_uart_port, port);
136 }
137 
138 static void
139 lqasc_stop_tx(struct uart_port *port)
140 {
141 	return;
142 }
143 
144 static void
145 lqasc_start_tx(struct uart_port *port)
146 {
147 	unsigned long flags;
148 	struct ltq_uart_port *ltq_port = to_ltq_uart_port(port);
149 
150 	spin_lock_irqsave(&ltq_port->lock, flags);
151 	lqasc_tx_chars(port);
152 	spin_unlock_irqrestore(&ltq_port->lock, flags);
153 	return;
154 }
155 
156 static void
157 lqasc_stop_rx(struct uart_port *port)
158 {
159 	__raw_writel(ASCWHBSTATE_CLRREN, port->membase + LTQ_ASC_WHBSTATE);
160 }
161 
162 static int
163 lqasc_rx_chars(struct uart_port *port)
164 {
165 	struct tty_port *tport = &port->state->port;
166 	unsigned int ch = 0, rsr = 0, fifocnt;
167 
168 	fifocnt = __raw_readl(port->membase + LTQ_ASC_FSTAT) &
169 		  ASCFSTAT_RXFFLMASK;
170 	while (fifocnt--) {
171 		u8 flag = TTY_NORMAL;
172 		ch = readb(port->membase + LTQ_ASC_RBUF);
173 		rsr = (__raw_readl(port->membase + LTQ_ASC_STATE)
174 			& ASCSTATE_ANY) | UART_DUMMY_UER_RX;
175 		tty_flip_buffer_push(tport);
176 		port->icount.rx++;
177 
178 		/*
179 		 * Note that the error handling code is
180 		 * out of the main execution path
181 		 */
182 		if (rsr & ASCSTATE_ANY) {
183 			if (rsr & ASCSTATE_PE) {
184 				port->icount.parity++;
185 				asc_update_bits(0, ASCWHBSTATE_CLRPE,
186 					port->membase + LTQ_ASC_WHBSTATE);
187 			} else if (rsr & ASCSTATE_FE) {
188 				port->icount.frame++;
189 				asc_update_bits(0, ASCWHBSTATE_CLRFE,
190 					port->membase + LTQ_ASC_WHBSTATE);
191 			}
192 			if (rsr & ASCSTATE_ROE) {
193 				port->icount.overrun++;
194 				asc_update_bits(0, ASCWHBSTATE_CLRROE,
195 					port->membase + LTQ_ASC_WHBSTATE);
196 			}
197 
198 			rsr &= port->read_status_mask;
199 
200 			if (rsr & ASCSTATE_PE)
201 				flag = TTY_PARITY;
202 			else if (rsr & ASCSTATE_FE)
203 				flag = TTY_FRAME;
204 		}
205 
206 		if ((rsr & port->ignore_status_mask) == 0)
207 			tty_insert_flip_char(tport, ch, flag);
208 
209 		if (rsr & ASCSTATE_ROE)
210 			/*
211 			 * Overrun is special, since it's reported
212 			 * immediately, and doesn't affect the current
213 			 * character
214 			 */
215 			tty_insert_flip_char(tport, 0, TTY_OVERRUN);
216 	}
217 
218 	if (ch != 0)
219 		tty_flip_buffer_push(tport);
220 
221 	return 0;
222 }
223 
224 static void
225 lqasc_tx_chars(struct uart_port *port)
226 {
227 	struct circ_buf *xmit = &port->state->xmit;
228 	if (uart_tx_stopped(port)) {
229 		lqasc_stop_tx(port);
230 		return;
231 	}
232 
233 	while (((__raw_readl(port->membase + LTQ_ASC_FSTAT) &
234 		ASCFSTAT_TXFREEMASK) >> ASCFSTAT_TXFREEOFF) != 0) {
235 		if (port->x_char) {
236 			writeb(port->x_char, port->membase + LTQ_ASC_TBUF);
237 			port->icount.tx++;
238 			port->x_char = 0;
239 			continue;
240 		}
241 
242 		if (uart_circ_empty(xmit))
243 			break;
244 
245 		writeb(port->state->xmit.buf[port->state->xmit.tail],
246 			port->membase + LTQ_ASC_TBUF);
247 		xmit->tail = (xmit->tail + 1) & (UART_XMIT_SIZE - 1);
248 		port->icount.tx++;
249 	}
250 
251 	if (uart_circ_chars_pending(xmit) < WAKEUP_CHARS)
252 		uart_write_wakeup(port);
253 }
254 
255 static irqreturn_t
256 lqasc_tx_int(int irq, void *_port)
257 {
258 	unsigned long flags;
259 	struct uart_port *port = (struct uart_port *)_port;
260 	struct ltq_uart_port *ltq_port = to_ltq_uart_port(port);
261 
262 	spin_lock_irqsave(&ltq_port->lock, flags);
263 	__raw_writel(ASC_IRNCR_TIR, port->membase + LTQ_ASC_IRNCR);
264 	spin_unlock_irqrestore(&ltq_port->lock, flags);
265 	lqasc_start_tx(port);
266 	return IRQ_HANDLED;
267 }
268 
269 static irqreturn_t
270 lqasc_err_int(int irq, void *_port)
271 {
272 	unsigned long flags;
273 	struct uart_port *port = (struct uart_port *)_port;
274 	struct ltq_uart_port *ltq_port = to_ltq_uart_port(port);
275 
276 	spin_lock_irqsave(&ltq_port->lock, flags);
277 	/* clear any pending interrupts */
278 	asc_update_bits(0, ASCWHBSTATE_CLRPE | ASCWHBSTATE_CLRFE |
279 		ASCWHBSTATE_CLRROE, port->membase + LTQ_ASC_WHBSTATE);
280 	spin_unlock_irqrestore(&ltq_port->lock, flags);
281 	return IRQ_HANDLED;
282 }
283 
284 static irqreturn_t
285 lqasc_rx_int(int irq, void *_port)
286 {
287 	unsigned long flags;
288 	struct uart_port *port = (struct uart_port *)_port;
289 	struct ltq_uart_port *ltq_port = to_ltq_uart_port(port);
290 
291 	spin_lock_irqsave(&ltq_port->lock, flags);
292 	__raw_writel(ASC_IRNCR_RIR, port->membase + LTQ_ASC_IRNCR);
293 	lqasc_rx_chars(port);
294 	spin_unlock_irqrestore(&ltq_port->lock, flags);
295 	return IRQ_HANDLED;
296 }
297 
298 static irqreturn_t lqasc_irq(int irq, void *p)
299 {
300 	unsigned long flags;
301 	u32 stat;
302 	struct uart_port *port = p;
303 	struct ltq_uart_port *ltq_port = to_ltq_uart_port(port);
304 
305 	spin_lock_irqsave(&ltq_port->lock, flags);
306 	stat = readl(port->membase + LTQ_ASC_IRNCR);
307 	spin_unlock_irqrestore(&ltq_port->lock, flags);
308 	if (!(stat & ASC_IRNCR_MASK))
309 		return IRQ_NONE;
310 
311 	if (stat & ASC_IRNCR_TIR)
312 		lqasc_tx_int(irq, p);
313 
314 	if (stat & ASC_IRNCR_RIR)
315 		lqasc_rx_int(irq, p);
316 
317 	if (stat & ASC_IRNCR_EIR)
318 		lqasc_err_int(irq, p);
319 
320 	return IRQ_HANDLED;
321 }
322 
323 static unsigned int
324 lqasc_tx_empty(struct uart_port *port)
325 {
326 	int status;
327 	status = __raw_readl(port->membase + LTQ_ASC_FSTAT) &
328 		 ASCFSTAT_TXFFLMASK;
329 	return status ? 0 : TIOCSER_TEMT;
330 }
331 
332 static unsigned int
333 lqasc_get_mctrl(struct uart_port *port)
334 {
335 	return TIOCM_CTS | TIOCM_CAR | TIOCM_DSR;
336 }
337 
338 static void
339 lqasc_set_mctrl(struct uart_port *port, u_int mctrl)
340 {
341 }
342 
343 static void
344 lqasc_break_ctl(struct uart_port *port, int break_state)
345 {
346 }
347 
348 static int
349 lqasc_startup(struct uart_port *port)
350 {
351 	struct ltq_uart_port *ltq_port = to_ltq_uart_port(port);
352 	int retval;
353 	unsigned long flags;
354 
355 	if (!IS_ERR(ltq_port->clk))
356 		clk_prepare_enable(ltq_port->clk);
357 	port->uartclk = clk_get_rate(ltq_port->freqclk);
358 
359 	spin_lock_irqsave(&ltq_port->lock, flags);
360 	asc_update_bits(ASCCLC_DISS | ASCCLC_RMCMASK, (1 << ASCCLC_RMCOFFSET),
361 		port->membase + LTQ_ASC_CLC);
362 
363 	__raw_writel(0, port->membase + LTQ_ASC_PISEL);
364 	__raw_writel(
365 		((TXFIFO_FL << ASCTXFCON_TXFITLOFF) & ASCTXFCON_TXFITLMASK) |
366 		ASCTXFCON_TXFEN | ASCTXFCON_TXFFLU,
367 		port->membase + LTQ_ASC_TXFCON);
368 	__raw_writel(
369 		((RXFIFO_FL << ASCRXFCON_RXFITLOFF) & ASCRXFCON_RXFITLMASK)
370 		| ASCRXFCON_RXFEN | ASCRXFCON_RXFFLU,
371 		port->membase + LTQ_ASC_RXFCON);
372 	/* make sure other settings are written to hardware before
373 	 * setting enable bits
374 	 */
375 	wmb();
376 	asc_update_bits(0, ASCCON_M_8ASYNC | ASCCON_FEN | ASCCON_TOEN |
377 		ASCCON_ROEN, port->membase + LTQ_ASC_CON);
378 
379 	spin_unlock_irqrestore(&ltq_port->lock, flags);
380 
381 	retval = ltq_port->soc->request_irq(port);
382 	if (retval)
383 		return retval;
384 
385 	__raw_writel(ASC_IRNREN_RX | ASC_IRNREN_ERR | ASC_IRNREN_TX,
386 		port->membase + LTQ_ASC_IRNREN);
387 	return retval;
388 }
389 
390 static void
391 lqasc_shutdown(struct uart_port *port)
392 {
393 	struct ltq_uart_port *ltq_port = to_ltq_uart_port(port);
394 	unsigned long flags;
395 
396 	ltq_port->soc->free_irq(port);
397 
398 	spin_lock_irqsave(&ltq_port->lock, flags);
399 	__raw_writel(0, port->membase + LTQ_ASC_CON);
400 	asc_update_bits(ASCRXFCON_RXFEN, ASCRXFCON_RXFFLU,
401 		port->membase + LTQ_ASC_RXFCON);
402 	asc_update_bits(ASCTXFCON_TXFEN, ASCTXFCON_TXFFLU,
403 		port->membase + LTQ_ASC_TXFCON);
404 	spin_unlock_irqrestore(&ltq_port->lock, flags);
405 	if (!IS_ERR(ltq_port->clk))
406 		clk_disable_unprepare(ltq_port->clk);
407 }
408 
409 static void
410 lqasc_set_termios(struct uart_port *port,
411 	struct ktermios *new, struct ktermios *old)
412 {
413 	unsigned int cflag;
414 	unsigned int iflag;
415 	unsigned int divisor;
416 	unsigned int baud;
417 	unsigned int con = 0;
418 	unsigned long flags;
419 	struct ltq_uart_port *ltq_port = to_ltq_uart_port(port);
420 
421 	cflag = new->c_cflag;
422 	iflag = new->c_iflag;
423 
424 	switch (cflag & CSIZE) {
425 	case CS7:
426 		con = ASCCON_M_7ASYNC;
427 		break;
428 
429 	case CS5:
430 	case CS6:
431 	default:
432 		new->c_cflag &= ~ CSIZE;
433 		new->c_cflag |= CS8;
434 		con = ASCCON_M_8ASYNC;
435 		break;
436 	}
437 
438 	cflag &= ~CMSPAR; /* Mark/Space parity is not supported */
439 
440 	if (cflag & CSTOPB)
441 		con |= ASCCON_STP;
442 
443 	if (cflag & PARENB) {
444 		if (!(cflag & PARODD))
445 			con &= ~ASCCON_ODD;
446 		else
447 			con |= ASCCON_ODD;
448 	}
449 
450 	port->read_status_mask = ASCSTATE_ROE;
451 	if (iflag & INPCK)
452 		port->read_status_mask |= ASCSTATE_FE | ASCSTATE_PE;
453 
454 	port->ignore_status_mask = 0;
455 	if (iflag & IGNPAR)
456 		port->ignore_status_mask |= ASCSTATE_FE | ASCSTATE_PE;
457 
458 	if (iflag & IGNBRK) {
459 		/*
460 		 * If we're ignoring parity and break indicators,
461 		 * ignore overruns too (for real raw support).
462 		 */
463 		if (iflag & IGNPAR)
464 			port->ignore_status_mask |= ASCSTATE_ROE;
465 	}
466 
467 	if ((cflag & CREAD) == 0)
468 		port->ignore_status_mask |= UART_DUMMY_UER_RX;
469 
470 	/* set error signals  - framing, parity  and overrun, enable receiver */
471 	con |= ASCCON_FEN | ASCCON_TOEN | ASCCON_ROEN;
472 
473 	spin_lock_irqsave(&ltq_port->lock, flags);
474 
475 	/* set up CON */
476 	asc_update_bits(0, con, port->membase + LTQ_ASC_CON);
477 
478 	/* Set baud rate - take a divider of 2 into account */
479 	baud = uart_get_baud_rate(port, new, old, 0, port->uartclk / 16);
480 	divisor = uart_get_divisor(port, baud);
481 	divisor = divisor / 2 - 1;
482 
483 	/* disable the baudrate generator */
484 	asc_update_bits(ASCCON_R, 0, port->membase + LTQ_ASC_CON);
485 
486 	/* make sure the fractional divider is off */
487 	asc_update_bits(ASCCON_FDE, 0, port->membase + LTQ_ASC_CON);
488 
489 	/* set up to use divisor of 2 */
490 	asc_update_bits(ASCCON_BRS, 0, port->membase + LTQ_ASC_CON);
491 
492 	/* now we can write the new baudrate into the register */
493 	__raw_writel(divisor, port->membase + LTQ_ASC_BG);
494 
495 	/* turn the baudrate generator back on */
496 	asc_update_bits(0, ASCCON_R, port->membase + LTQ_ASC_CON);
497 
498 	/* enable rx */
499 	__raw_writel(ASCWHBSTATE_SETREN, port->membase + LTQ_ASC_WHBSTATE);
500 
501 	spin_unlock_irqrestore(&ltq_port->lock, flags);
502 
503 	/* Don't rewrite B0 */
504 	if (tty_termios_baud_rate(new))
505 		tty_termios_encode_baud_rate(new, baud, baud);
506 
507 	uart_update_timeout(port, cflag, baud);
508 }
509 
510 static const char*
511 lqasc_type(struct uart_port *port)
512 {
513 	if (port->type == PORT_LTQ_ASC)
514 		return DRVNAME;
515 	else
516 		return NULL;
517 }
518 
519 static void
520 lqasc_release_port(struct uart_port *port)
521 {
522 	struct platform_device *pdev = to_platform_device(port->dev);
523 
524 	if (port->flags & UPF_IOREMAP) {
525 		devm_iounmap(&pdev->dev, port->membase);
526 		port->membase = NULL;
527 	}
528 }
529 
530 static int
531 lqasc_request_port(struct uart_port *port)
532 {
533 	struct platform_device *pdev = to_platform_device(port->dev);
534 	struct resource *res;
535 	int size;
536 
537 	res = platform_get_resource(pdev, IORESOURCE_MEM, 0);
538 	if (!res) {
539 		dev_err(&pdev->dev, "cannot obtain I/O memory region");
540 		return -ENODEV;
541 	}
542 	size = resource_size(res);
543 
544 	res = devm_request_mem_region(&pdev->dev, res->start,
545 		size, dev_name(&pdev->dev));
546 	if (!res) {
547 		dev_err(&pdev->dev, "cannot request I/O memory region");
548 		return -EBUSY;
549 	}
550 
551 	if (port->flags & UPF_IOREMAP) {
552 		port->membase = devm_ioremap(&pdev->dev,
553 			port->mapbase, size);
554 		if (port->membase == NULL)
555 			return -ENOMEM;
556 	}
557 	return 0;
558 }
559 
560 static void
561 lqasc_config_port(struct uart_port *port, int flags)
562 {
563 	if (flags & UART_CONFIG_TYPE) {
564 		port->type = PORT_LTQ_ASC;
565 		lqasc_request_port(port);
566 	}
567 }
568 
569 static int
570 lqasc_verify_port(struct uart_port *port,
571 	struct serial_struct *ser)
572 {
573 	int ret = 0;
574 	if (ser->type != PORT_UNKNOWN && ser->type != PORT_LTQ_ASC)
575 		ret = -EINVAL;
576 	if (ser->irq < 0 || ser->irq >= NR_IRQS)
577 		ret = -EINVAL;
578 	if (ser->baud_base < 9600)
579 		ret = -EINVAL;
580 	return ret;
581 }
582 
583 static const struct uart_ops lqasc_pops = {
584 	.tx_empty =	lqasc_tx_empty,
585 	.set_mctrl =	lqasc_set_mctrl,
586 	.get_mctrl =	lqasc_get_mctrl,
587 	.stop_tx =	lqasc_stop_tx,
588 	.start_tx =	lqasc_start_tx,
589 	.stop_rx =	lqasc_stop_rx,
590 	.break_ctl =	lqasc_break_ctl,
591 	.startup =	lqasc_startup,
592 	.shutdown =	lqasc_shutdown,
593 	.set_termios =	lqasc_set_termios,
594 	.type =		lqasc_type,
595 	.release_port =	lqasc_release_port,
596 	.request_port =	lqasc_request_port,
597 	.config_port =	lqasc_config_port,
598 	.verify_port =	lqasc_verify_port,
599 };
600 
601 static void
602 lqasc_console_putchar(struct uart_port *port, int ch)
603 {
604 	int fifofree;
605 
606 	if (!port->membase)
607 		return;
608 
609 	do {
610 		fifofree = (__raw_readl(port->membase + LTQ_ASC_FSTAT)
611 			& ASCFSTAT_TXFREEMASK) >> ASCFSTAT_TXFREEOFF;
612 	} while (fifofree == 0);
613 	writeb(ch, port->membase + LTQ_ASC_TBUF);
614 }
615 
616 static void lqasc_serial_port_write(struct uart_port *port, const char *s,
617 				    u_int count)
618 {
619 	uart_console_write(port, s, count, lqasc_console_putchar);
620 }
621 
622 static void
623 lqasc_console_write(struct console *co, const char *s, u_int count)
624 {
625 	struct ltq_uart_port *ltq_port;
626 	unsigned long flags;
627 
628 	if (co->index >= MAXPORTS)
629 		return;
630 
631 	ltq_port = lqasc_port[co->index];
632 	if (!ltq_port)
633 		return;
634 
635 	spin_lock_irqsave(&ltq_port->lock, flags);
636 	lqasc_serial_port_write(&ltq_port->port, s, count);
637 	spin_unlock_irqrestore(&ltq_port->lock, flags);
638 }
639 
640 static int __init
641 lqasc_console_setup(struct console *co, char *options)
642 {
643 	struct ltq_uart_port *ltq_port;
644 	struct uart_port *port;
645 	int baud = 115200;
646 	int bits = 8;
647 	int parity = 'n';
648 	int flow = 'n';
649 
650 	if (co->index >= MAXPORTS)
651 		return -ENODEV;
652 
653 	ltq_port = lqasc_port[co->index];
654 	if (!ltq_port)
655 		return -ENODEV;
656 
657 	port = &ltq_port->port;
658 
659 	if (!IS_ERR(ltq_port->clk))
660 		clk_prepare_enable(ltq_port->clk);
661 
662 	port->uartclk = clk_get_rate(ltq_port->freqclk);
663 
664 	if (options)
665 		uart_parse_options(options, &baud, &parity, &bits, &flow);
666 	return uart_set_options(port, co, baud, parity, bits, flow);
667 }
668 
669 static struct console lqasc_console = {
670 	.name =		"ttyLTQ",
671 	.write =	lqasc_console_write,
672 	.device =	uart_console_device,
673 	.setup =	lqasc_console_setup,
674 	.flags =	CON_PRINTBUFFER,
675 	.index =	-1,
676 	.data =		&lqasc_reg,
677 };
678 
679 static int __init
680 lqasc_console_init(void)
681 {
682 	register_console(&lqasc_console);
683 	return 0;
684 }
685 console_initcall(lqasc_console_init);
686 
687 static void lqasc_serial_early_console_write(struct console *co,
688 					     const char *s,
689 					     u_int count)
690 {
691 	struct earlycon_device *dev = co->data;
692 
693 	lqasc_serial_port_write(&dev->port, s, count);
694 }
695 
696 static int __init
697 lqasc_serial_early_console_setup(struct earlycon_device *device,
698 				 const char *opt)
699 {
700 	if (!device->port.membase)
701 		return -ENODEV;
702 
703 	device->con->write = lqasc_serial_early_console_write;
704 	return 0;
705 }
706 OF_EARLYCON_DECLARE(lantiq, "lantiq,asc", lqasc_serial_early_console_setup);
707 OF_EARLYCON_DECLARE(lantiq, "intel,lgm-asc", lqasc_serial_early_console_setup);
708 
709 static struct uart_driver lqasc_reg = {
710 	.owner =	THIS_MODULE,
711 	.driver_name =	DRVNAME,
712 	.dev_name =	"ttyLTQ",
713 	.major =	0,
714 	.minor =	0,
715 	.nr =		MAXPORTS,
716 	.cons =		&lqasc_console,
717 };
718 
719 static int fetch_irq_lantiq(struct device *dev, struct ltq_uart_port *ltq_port)
720 {
721 	struct uart_port *port = &ltq_port->port;
722 	struct resource irqres[3];
723 	int ret;
724 
725 	ret = of_irq_to_resource_table(dev->of_node, irqres, 3);
726 	if (ret != 3) {
727 		dev_err(dev,
728 			"failed to get IRQs for serial port\n");
729 		return -ENODEV;
730 	}
731 	ltq_port->tx_irq = irqres[0].start;
732 	ltq_port->rx_irq = irqres[1].start;
733 	ltq_port->err_irq = irqres[2].start;
734 	port->irq = irqres[0].start;
735 
736 	return 0;
737 }
738 
739 static int request_irq_lantiq(struct uart_port *port)
740 {
741 	struct ltq_uart_port *ltq_port = to_ltq_uart_port(port);
742 	int retval;
743 
744 	retval = request_irq(ltq_port->tx_irq, lqasc_tx_int,
745 			     0, "asc_tx", port);
746 	if (retval) {
747 		dev_err(port->dev, "failed to request asc_tx\n");
748 		return retval;
749 	}
750 
751 	retval = request_irq(ltq_port->rx_irq, lqasc_rx_int,
752 			     0, "asc_rx", port);
753 	if (retval) {
754 		dev_err(port->dev, "failed to request asc_rx\n");
755 		goto err1;
756 	}
757 
758 	retval = request_irq(ltq_port->err_irq, lqasc_err_int,
759 			     0, "asc_err", port);
760 	if (retval) {
761 		dev_err(port->dev, "failed to request asc_err\n");
762 		goto err2;
763 	}
764 	return 0;
765 
766 err2:
767 	free_irq(ltq_port->rx_irq, port);
768 err1:
769 	free_irq(ltq_port->tx_irq, port);
770 	return retval;
771 }
772 
773 static void free_irq_lantiq(struct uart_port *port)
774 {
775 	struct ltq_uart_port *ltq_port = to_ltq_uart_port(port);
776 
777 	free_irq(ltq_port->tx_irq, port);
778 	free_irq(ltq_port->rx_irq, port);
779 	free_irq(ltq_port->err_irq, port);
780 }
781 
782 static int fetch_irq_intel(struct device *dev, struct ltq_uart_port *ltq_port)
783 {
784 	struct uart_port *port = &ltq_port->port;
785 	int ret;
786 
787 	ret = of_irq_get(dev->of_node, 0);
788 	if (ret < 0) {
789 		dev_err(dev, "failed to fetch IRQ for serial port\n");
790 		return ret;
791 	}
792 	ltq_port->common_irq = ret;
793 	port->irq = ret;
794 
795 	return 0;
796 }
797 
798 static int request_irq_intel(struct uart_port *port)
799 {
800 	struct ltq_uart_port *ltq_port = to_ltq_uart_port(port);
801 	int retval;
802 
803 	retval = request_irq(ltq_port->common_irq, lqasc_irq, 0,
804 			     "asc_irq", port);
805 	if (retval)
806 		dev_err(port->dev, "failed to request asc_irq\n");
807 
808 	return retval;
809 }
810 
811 static void free_irq_intel(struct uart_port *port)
812 {
813 	struct ltq_uart_port *ltq_port = to_ltq_uart_port(port);
814 
815 	free_irq(ltq_port->common_irq, port);
816 }
817 
818 static int __init
819 lqasc_probe(struct platform_device *pdev)
820 {
821 	struct device_node *node = pdev->dev.of_node;
822 	struct ltq_uart_port *ltq_port;
823 	struct uart_port *port;
824 	struct resource *mmres;
825 	int line;
826 	int ret;
827 
828 	mmres = platform_get_resource(pdev, IORESOURCE_MEM, 0);
829 	if (!mmres) {
830 		dev_err(&pdev->dev,
831 			"failed to get memory for serial port\n");
832 		return -ENODEV;
833 	}
834 
835 	ltq_port = devm_kzalloc(&pdev->dev, sizeof(struct ltq_uart_port),
836 				GFP_KERNEL);
837 	if (!ltq_port)
838 		return -ENOMEM;
839 
840 	port = &ltq_port->port;
841 
842 	ltq_port->soc = of_device_get_match_data(&pdev->dev);
843 	ret = ltq_port->soc->fetch_irq(&pdev->dev, ltq_port);
844 	if (ret)
845 		return ret;
846 
847 	/* get serial id */
848 	line = of_alias_get_id(node, "serial");
849 	if (line < 0) {
850 		if (IS_ENABLED(CONFIG_LANTIQ)) {
851 			if (mmres->start == CPHYSADDR(LTQ_EARLY_ASC))
852 				line = 0;
853 			else
854 				line = 1;
855 		} else {
856 			dev_err(&pdev->dev, "failed to get alias id, errno %d\n",
857 				line);
858 			return line;
859 		}
860 	}
861 
862 	if (lqasc_port[line]) {
863 		dev_err(&pdev->dev, "port %d already allocated\n", line);
864 		return -EBUSY;
865 	}
866 
867 	port->iotype	= SERIAL_IO_MEM;
868 	port->flags	= UPF_BOOT_AUTOCONF | UPF_IOREMAP;
869 	port->ops	= &lqasc_pops;
870 	port->fifosize	= 16;
871 	port->type	= PORT_LTQ_ASC,
872 	port->line	= line;
873 	port->dev	= &pdev->dev;
874 	/* unused, just to be backward-compatible */
875 	port->mapbase	= mmres->start;
876 
877 	if (IS_ENABLED(CONFIG_LANTIQ) && !IS_ENABLED(CONFIG_COMMON_CLK))
878 		ltq_port->freqclk = clk_get_fpi();
879 	else
880 		ltq_port->freqclk = devm_clk_get(&pdev->dev, "freq");
881 
882 
883 	if (IS_ERR(ltq_port->freqclk)) {
884 		pr_err("failed to get fpi clk\n");
885 		return -ENOENT;
886 	}
887 
888 	/* not all asc ports have clock gates, lets ignore the return code */
889 	if (IS_ENABLED(CONFIG_LANTIQ) && !IS_ENABLED(CONFIG_COMMON_CLK))
890 		ltq_port->clk = clk_get(&pdev->dev, NULL);
891 	else
892 		ltq_port->clk = devm_clk_get(&pdev->dev, "asc");
893 
894 	spin_lock_init(&ltq_port->lock);
895 	lqasc_port[line] = ltq_port;
896 	platform_set_drvdata(pdev, ltq_port);
897 
898 	ret = uart_add_one_port(&lqasc_reg, port);
899 
900 	return ret;
901 }
902 
903 static const struct ltq_soc_data soc_data_lantiq = {
904 	.fetch_irq = fetch_irq_lantiq,
905 	.request_irq = request_irq_lantiq,
906 	.free_irq = free_irq_lantiq,
907 };
908 
909 static const struct ltq_soc_data soc_data_intel = {
910 	.fetch_irq = fetch_irq_intel,
911 	.request_irq = request_irq_intel,
912 	.free_irq = free_irq_intel,
913 };
914 
915 static const struct of_device_id ltq_asc_match[] = {
916 	{ .compatible = "lantiq,asc", .data = &soc_data_lantiq },
917 	{ .compatible = "intel,lgm-asc", .data = &soc_data_intel },
918 	{},
919 };
920 
921 static struct platform_driver lqasc_driver = {
922 	.driver		= {
923 		.name	= DRVNAME,
924 		.of_match_table = ltq_asc_match,
925 	},
926 };
927 
928 static int __init
929 init_lqasc(void)
930 {
931 	int ret;
932 
933 	ret = uart_register_driver(&lqasc_reg);
934 	if (ret != 0)
935 		return ret;
936 
937 	ret = platform_driver_probe(&lqasc_driver, lqasc_probe);
938 	if (ret != 0)
939 		uart_unregister_driver(&lqasc_reg);
940 
941 	return ret;
942 }
943 device_initcall(init_lqasc);
944