Linux Audio

Check our new training course

Loading...
v6.8
  1// SPDX-License-Identifier: GPL-2.0
  2/*
  3 * MPS2 UART driver
  4 *
  5 * Copyright (C) 2015 ARM Limited
  6 *
  7 * Author: Vladimir Murzin <vladimir.murzin@arm.com>
  8 *
  9 * TODO: support for SysRq
 10 */
 11
 12#define pr_fmt(fmt)	KBUILD_MODNAME ": " fmt
 13
 14#include <linux/bitops.h>
 15#include <linux/clk.h>
 16#include <linux/console.h>
 17#include <linux/io.h>
 18#include <linux/kernel.h>
 
 19#include <linux/of.h>
 20#include <linux/platform_device.h>
 21#include <linux/serial_core.h>
 22#include <linux/tty_flip.h>
 23#include <linux/types.h>
 24#include <linux/idr.h>
 25
 26#define SERIAL_NAME	"ttyMPS"
 27#define DRIVER_NAME	"mps2-uart"
 28#define MAKE_NAME(x)	(DRIVER_NAME # x)
 29
 30#define UARTn_DATA				0x00
 31
 32#define UARTn_STATE				0x04
 33#define UARTn_STATE_TX_FULL			BIT(0)
 34#define UARTn_STATE_RX_FULL			BIT(1)
 35#define UARTn_STATE_TX_OVERRUN			BIT(2)
 36#define UARTn_STATE_RX_OVERRUN			BIT(3)
 37
 38#define UARTn_CTRL				0x08
 39#define UARTn_CTRL_TX_ENABLE			BIT(0)
 40#define UARTn_CTRL_RX_ENABLE			BIT(1)
 41#define UARTn_CTRL_TX_INT_ENABLE		BIT(2)
 42#define UARTn_CTRL_RX_INT_ENABLE		BIT(3)
 43#define UARTn_CTRL_TX_OVERRUN_INT_ENABLE	BIT(4)
 44#define UARTn_CTRL_RX_OVERRUN_INT_ENABLE	BIT(5)
 45
 46#define UARTn_INT				0x0c
 47#define UARTn_INT_TX				BIT(0)
 48#define UARTn_INT_RX				BIT(1)
 49#define UARTn_INT_TX_OVERRUN			BIT(2)
 50#define UARTn_INT_RX_OVERRUN			BIT(3)
 51
 52#define UARTn_BAUDDIV				0x10
 53#define UARTn_BAUDDIV_MASK			GENMASK(20, 0)
 54
 55/*
 56 * Helpers to make typical enable/disable operations more readable.
 57 */
 58#define UARTn_CTRL_TX_GRP	(UARTn_CTRL_TX_ENABLE		 |\
 59				 UARTn_CTRL_TX_INT_ENABLE	 |\
 60				 UARTn_CTRL_TX_OVERRUN_INT_ENABLE)
 61
 62#define UARTn_CTRL_RX_GRP	(UARTn_CTRL_RX_ENABLE		 |\
 63				 UARTn_CTRL_RX_INT_ENABLE	 |\
 64				 UARTn_CTRL_RX_OVERRUN_INT_ENABLE)
 65
 66#define MPS2_MAX_PORTS		3
 67
 68#define UART_PORT_COMBINED_IRQ	BIT(0)
 69
 70struct mps2_uart_port {
 71	struct uart_port port;
 72	struct clk *clk;
 73	unsigned int tx_irq;
 74	unsigned int rx_irq;
 75	unsigned int flags;
 76};
 77
 78static inline struct mps2_uart_port *to_mps2_port(struct uart_port *port)
 79{
 80	return container_of(port, struct mps2_uart_port, port);
 81}
 82
 83static void mps2_uart_write8(struct uart_port *port, u8 val, unsigned int off)
 84{
 85	struct mps2_uart_port *mps_port = to_mps2_port(port);
 86
 87	writeb(val, mps_port->port.membase + off);
 88}
 89
 90static u8 mps2_uart_read8(struct uart_port *port, unsigned int off)
 91{
 92	struct mps2_uart_port *mps_port = to_mps2_port(port);
 93
 94	return readb(mps_port->port.membase + off);
 95}
 96
 97static void mps2_uart_write32(struct uart_port *port, u32 val, unsigned int off)
 98{
 99	struct mps2_uart_port *mps_port = to_mps2_port(port);
100
101	writel_relaxed(val, mps_port->port.membase + off);
102}
103
104static unsigned int mps2_uart_tx_empty(struct uart_port *port)
105{
106	u8 status = mps2_uart_read8(port, UARTn_STATE);
107
108	return (status & UARTn_STATE_TX_FULL) ? 0 : TIOCSER_TEMT;
109}
110
111static void mps2_uart_set_mctrl(struct uart_port *port, unsigned int mctrl)
112{
113}
114
115static unsigned int mps2_uart_get_mctrl(struct uart_port *port)
116{
117	return TIOCM_CAR | TIOCM_CTS | TIOCM_DSR;
118}
119
120static void mps2_uart_stop_tx(struct uart_port *port)
121{
122	u8 control = mps2_uart_read8(port, UARTn_CTRL);
123
124	control &= ~UARTn_CTRL_TX_INT_ENABLE;
125
126	mps2_uart_write8(port, control, UARTn_CTRL);
127}
128
129static void mps2_uart_tx_chars(struct uart_port *port)
130{
131	u8 ch;
132
133	uart_port_tx(port, ch,
134		mps2_uart_tx_empty(port),
135		mps2_uart_write8(port, ch, UARTn_DATA));
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
136}
137
138static void mps2_uart_start_tx(struct uart_port *port)
139{
140	u8 control = mps2_uart_read8(port, UARTn_CTRL);
141
142	control |= UARTn_CTRL_TX_INT_ENABLE;
143
144	mps2_uart_write8(port, control, UARTn_CTRL);
145
146	/*
147	 * We've just unmasked the TX IRQ and now slow-starting via
148	 * polling; if there is enough data to fill up the internal
149	 * write buffer in one go, the TX IRQ should assert, at which
150	 * point we switch to fully interrupt-driven TX.
151	 */
152
153	mps2_uart_tx_chars(port);
154}
155
156static void mps2_uart_stop_rx(struct uart_port *port)
157{
158	u8 control = mps2_uart_read8(port, UARTn_CTRL);
159
160	control &= ~UARTn_CTRL_RX_GRP;
161
162	mps2_uart_write8(port, control, UARTn_CTRL);
163}
164
165static void mps2_uart_break_ctl(struct uart_port *port, int ctl)
166{
167}
168
169static void mps2_uart_rx_chars(struct uart_port *port)
170{
171	struct tty_port *tport = &port->state->port;
172
173	while (mps2_uart_read8(port, UARTn_STATE) & UARTn_STATE_RX_FULL) {
174		u8 rxdata = mps2_uart_read8(port, UARTn_DATA);
175
176		port->icount.rx++;
177		tty_insert_flip_char(&port->state->port, rxdata, TTY_NORMAL);
178	}
179
180	tty_flip_buffer_push(tport);
181}
182
183static irqreturn_t mps2_uart_rxirq(int irq, void *data)
184{
185	struct uart_port *port = data;
186	u8 irqflag = mps2_uart_read8(port, UARTn_INT);
187
188	if (unlikely(!(irqflag & UARTn_INT_RX)))
189		return IRQ_NONE;
190
191	uart_port_lock(port);
192
193	mps2_uart_write8(port, UARTn_INT_RX, UARTn_INT);
194	mps2_uart_rx_chars(port);
195
196	uart_port_unlock(port);
197
198	return IRQ_HANDLED;
199}
200
201static irqreturn_t mps2_uart_txirq(int irq, void *data)
202{
203	struct uart_port *port = data;
204	u8 irqflag = mps2_uart_read8(port, UARTn_INT);
205
206	if (unlikely(!(irqflag & UARTn_INT_TX)))
207		return IRQ_NONE;
208
209	uart_port_lock(port);
210
211	mps2_uart_write8(port, UARTn_INT_TX, UARTn_INT);
212	mps2_uart_tx_chars(port);
213
214	uart_port_unlock(port);
215
216	return IRQ_HANDLED;
217}
218
219static irqreturn_t mps2_uart_oerrirq(int irq, void *data)
220{
221	irqreturn_t handled = IRQ_NONE;
222	struct uart_port *port = data;
223	u8 irqflag = mps2_uart_read8(port, UARTn_INT);
224
225	uart_port_lock(port);
226
227	if (irqflag & UARTn_INT_RX_OVERRUN) {
228		struct tty_port *tport = &port->state->port;
229
230		mps2_uart_write8(port, UARTn_INT_RX_OVERRUN, UARTn_INT);
231		port->icount.overrun++;
232		tty_insert_flip_char(tport, 0, TTY_OVERRUN);
233		tty_flip_buffer_push(tport);
234		handled = IRQ_HANDLED;
235	}
236
237	/*
238	 * It's never been seen in practice and it never *should* happen since
239	 * we check if there is enough room in TX buffer before sending data.
240	 * So we keep this check in case something suspicious has happened.
241	 */
242	if (irqflag & UARTn_INT_TX_OVERRUN) {
243		mps2_uart_write8(port, UARTn_INT_TX_OVERRUN, UARTn_INT);
244		handled = IRQ_HANDLED;
245	}
246
247	uart_port_unlock(port);
248
249	return handled;
250}
251
252static irqreturn_t mps2_uart_combinedirq(int irq, void *data)
253{
254	if (mps2_uart_rxirq(irq, data) == IRQ_HANDLED)
255		return IRQ_HANDLED;
256
257	if (mps2_uart_txirq(irq, data) == IRQ_HANDLED)
258		return IRQ_HANDLED;
259
260	if (mps2_uart_oerrirq(irq, data) == IRQ_HANDLED)
261		return IRQ_HANDLED;
262
263	return IRQ_NONE;
264}
265
266static int mps2_uart_startup(struct uart_port *port)
267{
268	struct mps2_uart_port *mps_port = to_mps2_port(port);
269	u8 control = mps2_uart_read8(port, UARTn_CTRL);
270	int ret;
271
272	control &= ~(UARTn_CTRL_RX_GRP | UARTn_CTRL_TX_GRP);
273
274	mps2_uart_write8(port, control, UARTn_CTRL);
275
276	if (mps_port->flags & UART_PORT_COMBINED_IRQ) {
277		ret = request_irq(port->irq, mps2_uart_combinedirq, 0,
278				  MAKE_NAME(-combined), mps_port);
279
280		if (ret) {
281			dev_err(port->dev, "failed to register combinedirq (%d)\n", ret);
282			return ret;
283		}
284	} else {
285		ret = request_irq(port->irq, mps2_uart_oerrirq, IRQF_SHARED,
286				  MAKE_NAME(-overrun), mps_port);
287
288		if (ret) {
289			dev_err(port->dev, "failed to register oerrirq (%d)\n", ret);
290			return ret;
291		}
292
293		ret = request_irq(mps_port->rx_irq, mps2_uart_rxirq, 0,
294				  MAKE_NAME(-rx), mps_port);
295		if (ret) {
296			dev_err(port->dev, "failed to register rxirq (%d)\n", ret);
297			goto err_free_oerrirq;
298		}
299
300		ret = request_irq(mps_port->tx_irq, mps2_uart_txirq, 0,
301				  MAKE_NAME(-tx), mps_port);
302		if (ret) {
303			dev_err(port->dev, "failed to register txirq (%d)\n", ret);
304			goto err_free_rxirq;
305		}
306
307	}
308
309	control |= UARTn_CTRL_RX_GRP | UARTn_CTRL_TX_GRP;
310
311	mps2_uart_write8(port, control, UARTn_CTRL);
312
313	return 0;
314
315err_free_rxirq:
316	free_irq(mps_port->rx_irq, mps_port);
317err_free_oerrirq:
318	free_irq(port->irq, mps_port);
319
320	return ret;
321}
322
323static void mps2_uart_shutdown(struct uart_port *port)
324{
325	struct mps2_uart_port *mps_port = to_mps2_port(port);
326	u8 control = mps2_uart_read8(port, UARTn_CTRL);
327
328	control &= ~(UARTn_CTRL_RX_GRP | UARTn_CTRL_TX_GRP);
329
330	mps2_uart_write8(port, control, UARTn_CTRL);
331
332	if (!(mps_port->flags & UART_PORT_COMBINED_IRQ)) {
333		free_irq(mps_port->rx_irq, mps_port);
334		free_irq(mps_port->tx_irq, mps_port);
335	}
336
337	free_irq(port->irq, mps_port);
338}
339
340static void
341mps2_uart_set_termios(struct uart_port *port, struct ktermios *termios,
342		      const struct ktermios *old)
343{
344	unsigned long flags;
345	unsigned int baud, bauddiv;
346
347	termios->c_cflag &= ~(CRTSCTS | CMSPAR);
348	termios->c_cflag &= ~CSIZE;
349	termios->c_cflag |= CS8;
350	termios->c_cflag &= ~PARENB;
351	termios->c_cflag &= ~CSTOPB;
352
353	baud = uart_get_baud_rate(port, termios, old,
354			DIV_ROUND_CLOSEST(port->uartclk, UARTn_BAUDDIV_MASK),
355			DIV_ROUND_CLOSEST(port->uartclk, 16));
356
357	bauddiv = DIV_ROUND_CLOSEST(port->uartclk, baud);
358
359	uart_port_lock_irqsave(port, &flags);
360
361	uart_update_timeout(port, termios->c_cflag, baud);
362	mps2_uart_write32(port, bauddiv, UARTn_BAUDDIV);
363
364	uart_port_unlock_irqrestore(port, flags);
365
366	if (tty_termios_baud_rate(termios))
367		tty_termios_encode_baud_rate(termios, baud, baud);
368}
369
370static const char *mps2_uart_type(struct uart_port *port)
371{
372	return (port->type == PORT_MPS2UART) ? DRIVER_NAME : NULL;
373}
374
375static void mps2_uart_release_port(struct uart_port *port)
376{
377}
378
379static int mps2_uart_request_port(struct uart_port *port)
380{
381	return 0;
382}
383
384static void mps2_uart_config_port(struct uart_port *port, int type)
385{
386	if (type & UART_CONFIG_TYPE && !mps2_uart_request_port(port))
387		port->type = PORT_MPS2UART;
388}
389
390static int mps2_uart_verify_port(struct uart_port *port, struct serial_struct *serinfo)
391{
392	return -EINVAL;
393}
394
395static const struct uart_ops mps2_uart_pops = {
396	.tx_empty = mps2_uart_tx_empty,
397	.set_mctrl = mps2_uart_set_mctrl,
398	.get_mctrl = mps2_uart_get_mctrl,
399	.stop_tx = mps2_uart_stop_tx,
400	.start_tx = mps2_uart_start_tx,
401	.stop_rx = mps2_uart_stop_rx,
402	.break_ctl = mps2_uart_break_ctl,
403	.startup = mps2_uart_startup,
404	.shutdown = mps2_uart_shutdown,
405	.set_termios = mps2_uart_set_termios,
406	.type = mps2_uart_type,
407	.release_port = mps2_uart_release_port,
408	.request_port = mps2_uart_request_port,
409	.config_port = mps2_uart_config_port,
410	.verify_port = mps2_uart_verify_port,
411};
412
413static DEFINE_IDR(ports_idr);
414
415#ifdef CONFIG_SERIAL_MPS2_UART_CONSOLE
416static void mps2_uart_console_putchar(struct uart_port *port, unsigned char ch)
417{
418	while (mps2_uart_read8(port, UARTn_STATE) & UARTn_STATE_TX_FULL)
419		cpu_relax();
420
421	mps2_uart_write8(port, ch, UARTn_DATA);
422}
423
424static void mps2_uart_console_write(struct console *co, const char *s, unsigned int cnt)
425{
426	struct mps2_uart_port *mps_port = idr_find(&ports_idr, co->index);
427	struct uart_port *port = &mps_port->port;
428
429	uart_console_write(port, s, cnt, mps2_uart_console_putchar);
430}
431
432static int mps2_uart_console_setup(struct console *co, char *options)
433{
434	struct mps2_uart_port *mps_port;
435	int baud = 9600;
436	int bits = 8;
437	int parity = 'n';
438	int flow = 'n';
439
440	if (co->index < 0 || co->index >= MPS2_MAX_PORTS)
441		return -ENODEV;
442
443	mps_port = idr_find(&ports_idr, co->index);
444
445	if (!mps_port)
446		return -ENODEV;
447
448	if (options)
449		uart_parse_options(options, &baud, &parity, &bits, &flow);
450
451	return uart_set_options(&mps_port->port, co, baud, parity, bits, flow);
452}
453
454static struct uart_driver mps2_uart_driver;
455
456static struct console mps2_uart_console = {
457	.name = SERIAL_NAME,
458	.device = uart_console_device,
459	.write = mps2_uart_console_write,
460	.setup = mps2_uart_console_setup,
461	.flags = CON_PRINTBUFFER,
462	.index = -1,
463	.data = &mps2_uart_driver,
464};
465
466#define MPS2_SERIAL_CONSOLE (&mps2_uart_console)
467
468static void mps2_early_putchar(struct uart_port *port, unsigned char ch)
469{
470	while (readb(port->membase + UARTn_STATE) & UARTn_STATE_TX_FULL)
471		cpu_relax();
472
473	writeb((unsigned char)ch, port->membase + UARTn_DATA);
474}
475
476static void mps2_early_write(struct console *con, const char *s, unsigned int n)
477{
478	struct earlycon_device *dev = con->data;
479
480	uart_console_write(&dev->port, s, n, mps2_early_putchar);
481}
482
483static int __init mps2_early_console_setup(struct earlycon_device *device,
484					   const char *opt)
485{
486	if (!device->port.membase)
487		return -ENODEV;
488
489	device->con->write = mps2_early_write;
490
491	return 0;
492}
493
494OF_EARLYCON_DECLARE(mps2, "arm,mps2-uart", mps2_early_console_setup);
495
496#else
497#define MPS2_SERIAL_CONSOLE NULL
498#endif
499
500static struct uart_driver mps2_uart_driver = {
501	.driver_name = DRIVER_NAME,
502	.dev_name = SERIAL_NAME,
503	.nr = MPS2_MAX_PORTS,
504	.cons = MPS2_SERIAL_CONSOLE,
505};
506
507static int mps2_of_get_port(struct platform_device *pdev,
508			    struct mps2_uart_port *mps_port)
509{
510	struct device_node *np = pdev->dev.of_node;
511	int id;
512
513	if (!np)
514		return -ENODEV;
515
516	id = of_alias_get_id(np, "serial");
517
518	if (id < 0)
519		id = idr_alloc_cyclic(&ports_idr, (void *)mps_port, 0, MPS2_MAX_PORTS, GFP_KERNEL);
520	else
521		id = idr_alloc(&ports_idr, (void *)mps_port, id, MPS2_MAX_PORTS, GFP_KERNEL);
522
523	if (id < 0)
524		return id;
525
526	/* Only combined irq is presesnt */
527	if (platform_irq_count(pdev) == 1)
528		mps_port->flags |= UART_PORT_COMBINED_IRQ;
529
530	mps_port->port.line = id;
531
532	return 0;
533}
534
535static int mps2_init_port(struct platform_device *pdev,
536			  struct mps2_uart_port *mps_port)
537{
538	struct resource *res;
539	int ret;
540
541	mps_port->port.membase = devm_platform_get_and_ioremap_resource(pdev, 0, &res);
 
542	if (IS_ERR(mps_port->port.membase))
543		return PTR_ERR(mps_port->port.membase);
544
545	mps_port->port.mapbase = res->start;
546	mps_port->port.mapsize = resource_size(res);
547	mps_port->port.iotype = UPIO_MEM;
548	mps_port->port.flags = UPF_BOOT_AUTOCONF;
549	mps_port->port.fifosize = 1;
550	mps_port->port.ops = &mps2_uart_pops;
551	mps_port->port.dev = &pdev->dev;
552
553	mps_port->clk = devm_clk_get(&pdev->dev, NULL);
554	if (IS_ERR(mps_port->clk))
555		return PTR_ERR(mps_port->clk);
556
557	ret = clk_prepare_enable(mps_port->clk);
558	if (ret)
559		return ret;
560
561	mps_port->port.uartclk = clk_get_rate(mps_port->clk);
562
563	clk_disable_unprepare(mps_port->clk);
564
565
566	if (mps_port->flags & UART_PORT_COMBINED_IRQ) {
567		mps_port->port.irq = platform_get_irq(pdev, 0);
568	} else {
569		mps_port->rx_irq = platform_get_irq(pdev, 0);
570		mps_port->tx_irq = platform_get_irq(pdev, 1);
571		mps_port->port.irq = platform_get_irq(pdev, 2);
572	}
573
574	return ret;
575}
576
577static int mps2_serial_probe(struct platform_device *pdev)
578{
579	struct mps2_uart_port *mps_port;
580	int ret;
581
582	mps_port = devm_kzalloc(&pdev->dev, sizeof(struct mps2_uart_port), GFP_KERNEL);
583
584        if (!mps_port)
585                return -ENOMEM;
586
587	ret = mps2_of_get_port(pdev, mps_port);
588	if (ret)
589		return ret;
590
591	ret = mps2_init_port(pdev, mps_port);
592	if (ret)
593		return ret;
594
595	ret = uart_add_one_port(&mps2_uart_driver, &mps_port->port);
596	if (ret)
597		return ret;
598
599	platform_set_drvdata(pdev, mps_port);
600
601	return 0;
602}
603
604#ifdef CONFIG_OF
605static const struct of_device_id mps2_match[] = {
606	{ .compatible = "arm,mps2-uart", },
607	{},
608};
609#endif
610
611static struct platform_driver mps2_serial_driver = {
612	.probe = mps2_serial_probe,
613
614	.driver = {
615		.name = DRIVER_NAME,
616		.of_match_table = of_match_ptr(mps2_match),
617		.suppress_bind_attrs = true,
618	},
619};
620
621static int __init mps2_uart_init(void)
622{
623	int ret;
624
625	ret = uart_register_driver(&mps2_uart_driver);
626	if (ret)
627		return ret;
628
629	ret = platform_driver_register(&mps2_serial_driver);
630	if (ret)
631		uart_unregister_driver(&mps2_uart_driver);
632
633	return ret;
634}
635arch_initcall(mps2_uart_init);
v5.9
  1// SPDX-License-Identifier: GPL-2.0
  2/*
  3 * MPS2 UART driver
  4 *
  5 * Copyright (C) 2015 ARM Limited
  6 *
  7 * Author: Vladimir Murzin <vladimir.murzin@arm.com>
  8 *
  9 * TODO: support for SysRq
 10 */
 11
 12#define pr_fmt(fmt)	KBUILD_MODNAME ": " fmt
 13
 14#include <linux/bitops.h>
 15#include <linux/clk.h>
 16#include <linux/console.h>
 17#include <linux/io.h>
 18#include <linux/kernel.h>
 19#include <linux/of_device.h>
 20#include <linux/of.h>
 21#include <linux/platform_device.h>
 22#include <linux/serial_core.h>
 23#include <linux/tty_flip.h>
 24#include <linux/types.h>
 25#include <linux/idr.h>
 26
 27#define SERIAL_NAME	"ttyMPS"
 28#define DRIVER_NAME	"mps2-uart"
 29#define MAKE_NAME(x)	(DRIVER_NAME # x)
 30
 31#define UARTn_DATA				0x00
 32
 33#define UARTn_STATE				0x04
 34#define UARTn_STATE_TX_FULL			BIT(0)
 35#define UARTn_STATE_RX_FULL			BIT(1)
 36#define UARTn_STATE_TX_OVERRUN			BIT(2)
 37#define UARTn_STATE_RX_OVERRUN			BIT(3)
 38
 39#define UARTn_CTRL				0x08
 40#define UARTn_CTRL_TX_ENABLE			BIT(0)
 41#define UARTn_CTRL_RX_ENABLE			BIT(1)
 42#define UARTn_CTRL_TX_INT_ENABLE		BIT(2)
 43#define UARTn_CTRL_RX_INT_ENABLE		BIT(3)
 44#define UARTn_CTRL_TX_OVERRUN_INT_ENABLE	BIT(4)
 45#define UARTn_CTRL_RX_OVERRUN_INT_ENABLE	BIT(5)
 46
 47#define UARTn_INT				0x0c
 48#define UARTn_INT_TX				BIT(0)
 49#define UARTn_INT_RX				BIT(1)
 50#define UARTn_INT_TX_OVERRUN			BIT(2)
 51#define UARTn_INT_RX_OVERRUN			BIT(3)
 52
 53#define UARTn_BAUDDIV				0x10
 54#define UARTn_BAUDDIV_MASK			GENMASK(20, 0)
 55
 56/*
 57 * Helpers to make typical enable/disable operations more readable.
 58 */
 59#define UARTn_CTRL_TX_GRP	(UARTn_CTRL_TX_ENABLE		 |\
 60				 UARTn_CTRL_TX_INT_ENABLE	 |\
 61				 UARTn_CTRL_TX_OVERRUN_INT_ENABLE)
 62
 63#define UARTn_CTRL_RX_GRP	(UARTn_CTRL_RX_ENABLE		 |\
 64				 UARTn_CTRL_RX_INT_ENABLE	 |\
 65				 UARTn_CTRL_RX_OVERRUN_INT_ENABLE)
 66
 67#define MPS2_MAX_PORTS		3
 68
 69#define UART_PORT_COMBINED_IRQ	BIT(0)
 70
 71struct mps2_uart_port {
 72	struct uart_port port;
 73	struct clk *clk;
 74	unsigned int tx_irq;
 75	unsigned int rx_irq;
 76	unsigned int flags;
 77};
 78
 79static inline struct mps2_uart_port *to_mps2_port(struct uart_port *port)
 80{
 81	return container_of(port, struct mps2_uart_port, port);
 82}
 83
 84static void mps2_uart_write8(struct uart_port *port, u8 val, unsigned int off)
 85{
 86	struct mps2_uart_port *mps_port = to_mps2_port(port);
 87
 88	writeb(val, mps_port->port.membase + off);
 89}
 90
 91static u8 mps2_uart_read8(struct uart_port *port, unsigned int off)
 92{
 93	struct mps2_uart_port *mps_port = to_mps2_port(port);
 94
 95	return readb(mps_port->port.membase + off);
 96}
 97
 98static void mps2_uart_write32(struct uart_port *port, u32 val, unsigned int off)
 99{
100	struct mps2_uart_port *mps_port = to_mps2_port(port);
101
102	writel_relaxed(val, mps_port->port.membase + off);
103}
104
105static unsigned int mps2_uart_tx_empty(struct uart_port *port)
106{
107	u8 status = mps2_uart_read8(port, UARTn_STATE);
108
109	return (status & UARTn_STATE_TX_FULL) ? 0 : TIOCSER_TEMT;
110}
111
112static void mps2_uart_set_mctrl(struct uart_port *port, unsigned int mctrl)
113{
114}
115
116static unsigned int mps2_uart_get_mctrl(struct uart_port *port)
117{
118	return TIOCM_CAR | TIOCM_CTS | TIOCM_DSR;
119}
120
121static void mps2_uart_stop_tx(struct uart_port *port)
122{
123	u8 control = mps2_uart_read8(port, UARTn_CTRL);
124
125	control &= ~UARTn_CTRL_TX_INT_ENABLE;
126
127	mps2_uart_write8(port, control, UARTn_CTRL);
128}
129
130static void mps2_uart_tx_chars(struct uart_port *port)
131{
132	struct circ_buf *xmit = &port->state->xmit;
133
134	while (!(mps2_uart_read8(port, UARTn_STATE) & UARTn_STATE_TX_FULL)) {
135		if (port->x_char) {
136			mps2_uart_write8(port, port->x_char, UARTn_DATA);
137			port->x_char = 0;
138			port->icount.tx++;
139			continue;
140		}
141
142		if (uart_circ_empty(xmit) || uart_tx_stopped(port))
143			break;
144
145		mps2_uart_write8(port, xmit->buf[xmit->tail], UARTn_DATA);
146		xmit->tail = (xmit->tail + 1) % UART_XMIT_SIZE;
147		port->icount.tx++;
148	}
149
150	if (uart_circ_chars_pending(xmit) < WAKEUP_CHARS)
151		uart_write_wakeup(port);
152
153	if (uart_circ_empty(xmit))
154		mps2_uart_stop_tx(port);
155}
156
157static void mps2_uart_start_tx(struct uart_port *port)
158{
159	u8 control = mps2_uart_read8(port, UARTn_CTRL);
160
161	control |= UARTn_CTRL_TX_INT_ENABLE;
162
163	mps2_uart_write8(port, control, UARTn_CTRL);
164
165	/*
166	 * We've just unmasked the TX IRQ and now slow-starting via
167	 * polling; if there is enough data to fill up the internal
168	 * write buffer in one go, the TX IRQ should assert, at which
169	 * point we switch to fully interrupt-driven TX.
170	 */
171
172	mps2_uart_tx_chars(port);
173}
174
175static void mps2_uart_stop_rx(struct uart_port *port)
176{
177	u8 control = mps2_uart_read8(port, UARTn_CTRL);
178
179	control &= ~UARTn_CTRL_RX_GRP;
180
181	mps2_uart_write8(port, control, UARTn_CTRL);
182}
183
184static void mps2_uart_break_ctl(struct uart_port *port, int ctl)
185{
186}
187
188static void mps2_uart_rx_chars(struct uart_port *port)
189{
190	struct tty_port *tport = &port->state->port;
191
192	while (mps2_uart_read8(port, UARTn_STATE) & UARTn_STATE_RX_FULL) {
193		u8 rxdata = mps2_uart_read8(port, UARTn_DATA);
194
195		port->icount.rx++;
196		tty_insert_flip_char(&port->state->port, rxdata, TTY_NORMAL);
197	}
198
199	tty_flip_buffer_push(tport);
200}
201
202static irqreturn_t mps2_uart_rxirq(int irq, void *data)
203{
204	struct uart_port *port = data;
205	u8 irqflag = mps2_uart_read8(port, UARTn_INT);
206
207	if (unlikely(!(irqflag & UARTn_INT_RX)))
208		return IRQ_NONE;
209
210	spin_lock(&port->lock);
211
212	mps2_uart_write8(port, UARTn_INT_RX, UARTn_INT);
213	mps2_uart_rx_chars(port);
214
215	spin_unlock(&port->lock);
216
217	return IRQ_HANDLED;
218}
219
220static irqreturn_t mps2_uart_txirq(int irq, void *data)
221{
222	struct uart_port *port = data;
223	u8 irqflag = mps2_uart_read8(port, UARTn_INT);
224
225	if (unlikely(!(irqflag & UARTn_INT_TX)))
226		return IRQ_NONE;
227
228	spin_lock(&port->lock);
229
230	mps2_uart_write8(port, UARTn_INT_TX, UARTn_INT);
231	mps2_uart_tx_chars(port);
232
233	spin_unlock(&port->lock);
234
235	return IRQ_HANDLED;
236}
237
238static irqreturn_t mps2_uart_oerrirq(int irq, void *data)
239{
240	irqreturn_t handled = IRQ_NONE;
241	struct uart_port *port = data;
242	u8 irqflag = mps2_uart_read8(port, UARTn_INT);
243
244	spin_lock(&port->lock);
245
246	if (irqflag & UARTn_INT_RX_OVERRUN) {
247		struct tty_port *tport = &port->state->port;
248
249		mps2_uart_write8(port, UARTn_INT_RX_OVERRUN, UARTn_INT);
250		port->icount.overrun++;
251		tty_insert_flip_char(tport, 0, TTY_OVERRUN);
252		tty_flip_buffer_push(tport);
253		handled = IRQ_HANDLED;
254	}
255
256	/*
257	 * It's never been seen in practice and it never *should* happen since
258	 * we check if there is enough room in TX buffer before sending data.
259	 * So we keep this check in case something suspicious has happened.
260	 */
261	if (irqflag & UARTn_INT_TX_OVERRUN) {
262		mps2_uart_write8(port, UARTn_INT_TX_OVERRUN, UARTn_INT);
263		handled = IRQ_HANDLED;
264	}
265
266	spin_unlock(&port->lock);
267
268	return handled;
269}
270
271static irqreturn_t mps2_uart_combinedirq(int irq, void *data)
272{
273	if (mps2_uart_rxirq(irq, data) == IRQ_HANDLED)
274		return IRQ_HANDLED;
275
276	if (mps2_uart_txirq(irq, data) == IRQ_HANDLED)
277		return IRQ_HANDLED;
278
279	if (mps2_uart_oerrirq(irq, data) == IRQ_HANDLED)
280		return IRQ_HANDLED;
281
282	return IRQ_NONE;
283}
284
285static int mps2_uart_startup(struct uart_port *port)
286{
287	struct mps2_uart_port *mps_port = to_mps2_port(port);
288	u8 control = mps2_uart_read8(port, UARTn_CTRL);
289	int ret;
290
291	control &= ~(UARTn_CTRL_RX_GRP | UARTn_CTRL_TX_GRP);
292
293	mps2_uart_write8(port, control, UARTn_CTRL);
294
295	if (mps_port->flags & UART_PORT_COMBINED_IRQ) {
296		ret = request_irq(port->irq, mps2_uart_combinedirq, 0,
297				  MAKE_NAME(-combined), mps_port);
298
299		if (ret) {
300			dev_err(port->dev, "failed to register combinedirq (%d)\n", ret);
301			return ret;
302		}
303	} else {
304		ret = request_irq(port->irq, mps2_uart_oerrirq, IRQF_SHARED,
305				  MAKE_NAME(-overrun), mps_port);
306
307		if (ret) {
308			dev_err(port->dev, "failed to register oerrirq (%d)\n", ret);
309			return ret;
310		}
311
312		ret = request_irq(mps_port->rx_irq, mps2_uart_rxirq, 0,
313				  MAKE_NAME(-rx), mps_port);
314		if (ret) {
315			dev_err(port->dev, "failed to register rxirq (%d)\n", ret);
316			goto err_free_oerrirq;
317		}
318
319		ret = request_irq(mps_port->tx_irq, mps2_uart_txirq, 0,
320				  MAKE_NAME(-tx), mps_port);
321		if (ret) {
322			dev_err(port->dev, "failed to register txirq (%d)\n", ret);
323			goto err_free_rxirq;
324		}
325
326	}
327
328	control |= UARTn_CTRL_RX_GRP | UARTn_CTRL_TX_GRP;
329
330	mps2_uart_write8(port, control, UARTn_CTRL);
331
332	return 0;
333
334err_free_rxirq:
335	free_irq(mps_port->rx_irq, mps_port);
336err_free_oerrirq:
337	free_irq(port->irq, mps_port);
338
339	return ret;
340}
341
342static void mps2_uart_shutdown(struct uart_port *port)
343{
344	struct mps2_uart_port *mps_port = to_mps2_port(port);
345	u8 control = mps2_uart_read8(port, UARTn_CTRL);
346
347	control &= ~(UARTn_CTRL_RX_GRP | UARTn_CTRL_TX_GRP);
348
349	mps2_uart_write8(port, control, UARTn_CTRL);
350
351	if (!(mps_port->flags & UART_PORT_COMBINED_IRQ)) {
352		free_irq(mps_port->rx_irq, mps_port);
353		free_irq(mps_port->tx_irq, mps_port);
354	}
355
356	free_irq(port->irq, mps_port);
357}
358
359static void
360mps2_uart_set_termios(struct uart_port *port, struct ktermios *termios,
361		      struct ktermios *old)
362{
363	unsigned long flags;
364	unsigned int baud, bauddiv;
365
366	termios->c_cflag &= ~(CRTSCTS | CMSPAR);
367	termios->c_cflag &= ~CSIZE;
368	termios->c_cflag |= CS8;
369	termios->c_cflag &= ~PARENB;
370	termios->c_cflag &= ~CSTOPB;
371
372	baud = uart_get_baud_rate(port, termios, old,
373			DIV_ROUND_CLOSEST(port->uartclk, UARTn_BAUDDIV_MASK),
374			DIV_ROUND_CLOSEST(port->uartclk, 16));
375
376	bauddiv = DIV_ROUND_CLOSEST(port->uartclk, baud);
377
378	spin_lock_irqsave(&port->lock, flags);
379
380	uart_update_timeout(port, termios->c_cflag, baud);
381	mps2_uart_write32(port, bauddiv, UARTn_BAUDDIV);
382
383	spin_unlock_irqrestore(&port->lock, flags);
384
385	if (tty_termios_baud_rate(termios))
386		tty_termios_encode_baud_rate(termios, baud, baud);
387}
388
389static const char *mps2_uart_type(struct uart_port *port)
390{
391	return (port->type == PORT_MPS2UART) ? DRIVER_NAME : NULL;
392}
393
394static void mps2_uart_release_port(struct uart_port *port)
395{
396}
397
398static int mps2_uart_request_port(struct uart_port *port)
399{
400	return 0;
401}
402
403static void mps2_uart_config_port(struct uart_port *port, int type)
404{
405	if (type & UART_CONFIG_TYPE && !mps2_uart_request_port(port))
406		port->type = PORT_MPS2UART;
407}
408
409static int mps2_uart_verify_port(struct uart_port *port, struct serial_struct *serinfo)
410{
411	return -EINVAL;
412}
413
414static const struct uart_ops mps2_uart_pops = {
415	.tx_empty = mps2_uart_tx_empty,
416	.set_mctrl = mps2_uart_set_mctrl,
417	.get_mctrl = mps2_uart_get_mctrl,
418	.stop_tx = mps2_uart_stop_tx,
419	.start_tx = mps2_uart_start_tx,
420	.stop_rx = mps2_uart_stop_rx,
421	.break_ctl = mps2_uart_break_ctl,
422	.startup = mps2_uart_startup,
423	.shutdown = mps2_uart_shutdown,
424	.set_termios = mps2_uart_set_termios,
425	.type = mps2_uart_type,
426	.release_port = mps2_uart_release_port,
427	.request_port = mps2_uart_request_port,
428	.config_port = mps2_uart_config_port,
429	.verify_port = mps2_uart_verify_port,
430};
431
432static DEFINE_IDR(ports_idr);
433
434#ifdef CONFIG_SERIAL_MPS2_UART_CONSOLE
435static void mps2_uart_console_putchar(struct uart_port *port, int ch)
436{
437	while (mps2_uart_read8(port, UARTn_STATE) & UARTn_STATE_TX_FULL)
438		cpu_relax();
439
440	mps2_uart_write8(port, ch, UARTn_DATA);
441}
442
443static void mps2_uart_console_write(struct console *co, const char *s, unsigned int cnt)
444{
445	struct mps2_uart_port *mps_port = idr_find(&ports_idr, co->index);
446	struct uart_port *port = &mps_port->port;
447
448	uart_console_write(port, s, cnt, mps2_uart_console_putchar);
449}
450
451static int mps2_uart_console_setup(struct console *co, char *options)
452{
453	struct mps2_uart_port *mps_port;
454	int baud = 9600;
455	int bits = 8;
456	int parity = 'n';
457	int flow = 'n';
458
459	if (co->index < 0 || co->index >= MPS2_MAX_PORTS)
460		return -ENODEV;
461
462	mps_port = idr_find(&ports_idr, co->index);
463
464	if (!mps_port)
465		return -ENODEV;
466
467	if (options)
468		uart_parse_options(options, &baud, &parity, &bits, &flow);
469
470	return uart_set_options(&mps_port->port, co, baud, parity, bits, flow);
471}
472
473static struct uart_driver mps2_uart_driver;
474
475static struct console mps2_uart_console = {
476	.name = SERIAL_NAME,
477	.device = uart_console_device,
478	.write = mps2_uart_console_write,
479	.setup = mps2_uart_console_setup,
480	.flags = CON_PRINTBUFFER,
481	.index = -1,
482	.data = &mps2_uart_driver,
483};
484
485#define MPS2_SERIAL_CONSOLE (&mps2_uart_console)
486
487static void mps2_early_putchar(struct uart_port *port, int ch)
488{
489	while (readb(port->membase + UARTn_STATE) & UARTn_STATE_TX_FULL)
490		cpu_relax();
491
492	writeb((unsigned char)ch, port->membase + UARTn_DATA);
493}
494
495static void mps2_early_write(struct console *con, const char *s, unsigned int n)
496{
497	struct earlycon_device *dev = con->data;
498
499	uart_console_write(&dev->port, s, n, mps2_early_putchar);
500}
501
502static int __init mps2_early_console_setup(struct earlycon_device *device,
503					   const char *opt)
504{
505	if (!device->port.membase)
506		return -ENODEV;
507
508	device->con->write = mps2_early_write;
509
510	return 0;
511}
512
513OF_EARLYCON_DECLARE(mps2, "arm,mps2-uart", mps2_early_console_setup);
514
515#else
516#define MPS2_SERIAL_CONSOLE NULL
517#endif
518
519static struct uart_driver mps2_uart_driver = {
520	.driver_name = DRIVER_NAME,
521	.dev_name = SERIAL_NAME,
522	.nr = MPS2_MAX_PORTS,
523	.cons = MPS2_SERIAL_CONSOLE,
524};
525
526static int mps2_of_get_port(struct platform_device *pdev,
527			    struct mps2_uart_port *mps_port)
528{
529	struct device_node *np = pdev->dev.of_node;
530	int id;
531
532	if (!np)
533		return -ENODEV;
534
535	id = of_alias_get_id(np, "serial");
536
537	if (id < 0)
538		id = idr_alloc_cyclic(&ports_idr, (void *)mps_port, 0, MPS2_MAX_PORTS, GFP_KERNEL);
539	else
540		id = idr_alloc(&ports_idr, (void *)mps_port, id, MPS2_MAX_PORTS, GFP_KERNEL);
541
542	if (id < 0)
543		return id;
544
545	/* Only combined irq is presesnt */
546	if (platform_irq_count(pdev) == 1)
547		mps_port->flags |= UART_PORT_COMBINED_IRQ;
548
549	mps_port->port.line = id;
550
551	return 0;
552}
553
554static int mps2_init_port(struct platform_device *pdev,
555			  struct mps2_uart_port *mps_port)
556{
557	struct resource *res;
558	int ret;
559
560	res = platform_get_resource(pdev, IORESOURCE_MEM, 0);
561	mps_port->port.membase = devm_ioremap_resource(&pdev->dev, res);
562	if (IS_ERR(mps_port->port.membase))
563		return PTR_ERR(mps_port->port.membase);
564
565	mps_port->port.mapbase = res->start;
566	mps_port->port.mapsize = resource_size(res);
567	mps_port->port.iotype = UPIO_MEM;
568	mps_port->port.flags = UPF_BOOT_AUTOCONF;
569	mps_port->port.fifosize = 1;
570	mps_port->port.ops = &mps2_uart_pops;
571	mps_port->port.dev = &pdev->dev;
572
573	mps_port->clk = devm_clk_get(&pdev->dev, NULL);
574	if (IS_ERR(mps_port->clk))
575		return PTR_ERR(mps_port->clk);
576
577	ret = clk_prepare_enable(mps_port->clk);
578	if (ret)
579		return ret;
580
581	mps_port->port.uartclk = clk_get_rate(mps_port->clk);
582
583	clk_disable_unprepare(mps_port->clk);
584
585
586	if (mps_port->flags & UART_PORT_COMBINED_IRQ) {
587		mps_port->port.irq = platform_get_irq(pdev, 0);
588	} else {
589		mps_port->rx_irq = platform_get_irq(pdev, 0);
590		mps_port->tx_irq = platform_get_irq(pdev, 1);
591		mps_port->port.irq = platform_get_irq(pdev, 2);
592	}
593
594	return ret;
595}
596
597static int mps2_serial_probe(struct platform_device *pdev)
598{
599	struct mps2_uart_port *mps_port;
600	int ret;
601
602	mps_port = devm_kzalloc(&pdev->dev, sizeof(struct mps2_uart_port), GFP_KERNEL);
603
604        if (!mps_port)
605                return -ENOMEM;
606
607	ret = mps2_of_get_port(pdev, mps_port);
608	if (ret)
609		return ret;
610
611	ret = mps2_init_port(pdev, mps_port);
612	if (ret)
613		return ret;
614
615	ret = uart_add_one_port(&mps2_uart_driver, &mps_port->port);
616	if (ret)
617		return ret;
618
619	platform_set_drvdata(pdev, mps_port);
620
621	return 0;
622}
623
624#ifdef CONFIG_OF
625static const struct of_device_id mps2_match[] = {
626	{ .compatible = "arm,mps2-uart", },
627	{},
628};
629#endif
630
631static struct platform_driver mps2_serial_driver = {
632	.probe = mps2_serial_probe,
633
634	.driver = {
635		.name = DRIVER_NAME,
636		.of_match_table = of_match_ptr(mps2_match),
637		.suppress_bind_attrs = true,
638	},
639};
640
641static int __init mps2_uart_init(void)
642{
643	int ret;
644
645	ret = uart_register_driver(&mps2_uart_driver);
646	if (ret)
647		return ret;
648
649	ret = platform_driver_register(&mps2_serial_driver);
650	if (ret)
651		uart_unregister_driver(&mps2_uart_driver);
652
653	return ret;
654}
655arch_initcall(mps2_uart_init);