[linux-block.git] / drivers / tty / serial / apbuart.c

// SPDX-License-Identifier: GPL-2.0
/*
 *  Driver for GRLIB serial ports (APBUART)
 *
 *  Based on linux/drivers/serial/amba.c
 *
 *  Copyright (C) 2000 Deep Blue Solutions Ltd.
 *  Copyright (C) 2003 Konrad Eisele <eiselekd@web.de>
 *  Copyright (C) 2006 Daniel Hellstrom <daniel@gaisler.com>, Aeroflex Gaisler AB
 *  Copyright (C) 2008 Gilead Kutnick <kutnickg@zin-tech.com>
 *  Copyright (C) 2009 Kristoffer Glembo <kristoffer@gaisler.com>, Aeroflex Gaisler AB
 */

#include <linux/module.h>
#include <linux/tty.h>
#include <linux/tty_flip.h>
#include <linux/ioport.h>
#include <linux/init.h>
#include <linux/serial.h>
#include <linux/console.h>
#include <linux/sysrq.h>
#include <linux/kthread.h>
#include <linux/device.h>
#include <linux/of.h>
#include <linux/of_device.h>
#include <linux/of_platform.h>
#include <linux/of_irq.h>
#include <linux/platform_device.h>
#include <linux/io.h>
#include <linux/serial_core.h>
#include <asm/irq.h>

#include "apbuart.h"

#define SERIAL_APBUART_MAJOR	TTY_MAJOR
#define SERIAL_APBUART_MINOR	64
#define UART_DUMMY_RSR_RX	0x8000	/* for ignore all read */

static void apbuart_tx_chars(struct uart_port *port);

static void apbuart_stop_tx(struct uart_port *port)
{
	unsigned int cr;

	cr = UART_GET_CTRL(port);
	cr &= ~UART_CTRL_TI;
	UART_PUT_CTRL(port, cr);
}

static void apbuart_start_tx(struct uart_port *port)
{
	unsigned int cr;

	cr = UART_GET_CTRL(port);
	cr |= UART_CTRL_TI;
	UART_PUT_CTRL(port, cr);

	if (UART_GET_STATUS(port) & UART_STATUS_THE)
		apbuart_tx_chars(port);
}

static void apbuart_stop_rx(struct uart_port *port)
{
	unsigned int cr;

	cr = UART_GET_CTRL(port);
	cr &= ~(UART_CTRL_RI);
	UART_PUT_CTRL(port, cr);
}

static void apbuart_rx_chars(struct uart_port *port)
{
	unsigned int status, ch, rsr, flag;
	unsigned int max_chars = port->fifosize;

	status = UART_GET_STATUS(port);

	while (UART_RX_DATA(status) && (max_chars--)) {

		ch = UART_GET_CHAR(port);
		flag = TTY_NORMAL;

		port->icount.rx++;

		rsr = UART_GET_STATUS(port) | UART_DUMMY_RSR_RX;
		UART_PUT_STATUS(port, 0);
		if (rsr & UART_STATUS_ERR) {

			if (rsr & UART_STATUS_BR) {
				rsr &= ~(UART_STATUS_FE | UART_STATUS_PE);
				port->icount.brk++;
				if (uart_handle_break(port))
					goto ignore_char;
			} else if (rsr & UART_STATUS_PE) {
				port->icount.parity++;
			} else if (rsr & UART_STATUS_FE) {
				port->icount.frame++;
			}
			if (rsr & UART_STATUS_OE)
				port->icount.overrun++;

			rsr &= port->read_status_mask;

			if (rsr & UART_STATUS_PE)
				flag = TTY_PARITY;
			else if (rsr & UART_STATUS_FE)
				flag = TTY_FRAME;
		}

		if (uart_handle_sysrq_char(port, ch))
			goto ignore_char;

		uart_insert_char(port, rsr, UART_STATUS_OE, ch, flag);


	      ignore_char:
		status = UART_GET_STATUS(port);
	}

	spin_unlock(&port->lock);
	tty_flip_buffer_push(&port->state->port);
	spin_lock(&port->lock);
}

static void apbuart_tx_chars(struct uart_port *port)
{
	struct circ_buf *xmit = &port->state->xmit;
	int count;

	if (port->x_char) {
		UART_PUT_CHAR(port, port->x_char);
		port->icount.tx++;
		port->x_char = 0;
		return;
	}

	if (uart_circ_empty(xmit) || uart_tx_stopped(port)) {
		apbuart_stop_tx(port);
		return;
	}

	/* amba: fill FIFO */
	count = port->fifosize >> 1;
	do {
		UART_PUT_CHAR(port, xmit->buf[xmit->tail]);
		xmit->tail = (xmit->tail + 1) & (UART_XMIT_SIZE - 1);
		port->icount.tx++;
		if (uart_circ_empty(xmit))
			break;
	} while (--count > 0);

	if (uart_circ_chars_pending(xmit) < WAKEUP_CHARS)
		uart_write_wakeup(port);

	if (uart_circ_empty(xmit))
		apbuart_stop_tx(port);
}

static irqreturn_t apbuart_int(int irq, void *dev_id)
{
	struct uart_port *port = dev_id;
	unsigned int status;

	spin_lock(&port->lock);

	status = UART_GET_STATUS(port);
	if (status & UART_STATUS_DR)
		apbuart_rx_chars(port);
	if (status & UART_STATUS_THE)
		apbuart_tx_chars(port);

	spin_unlock(&port->lock);

	return IRQ_HANDLED;
}

static unsigned int apbuart_tx_empty(struct uart_port *port)
{
	unsigned int status = UART_GET_STATUS(port);
	return status & UART_STATUS_THE ? TIOCSER_TEMT : 0;
}

static unsigned int apbuart_get_mctrl(struct uart_port *port)
{
	/* The GRLIB APBUART handles flow control in hardware */
	return TIOCM_CAR | TIOCM_DSR | TIOCM_CTS;
}

static void apbuart_set_mctrl(struct uart_port *port, unsigned int mctrl)
{
	/* The GRLIB APBUART handles flow control in hardware */
}

static void apbuart_break_ctl(struct uart_port *port, int break_state)
{
	/* We don't support sending break */
}

static int apbuart_startup(struct uart_port *port)
{
	int retval;
	unsigned int cr;

	/* Allocate the IRQ */
	retval = request_irq(port->irq, apbuart_int, 0, "apbuart", port);
	if (retval)
		return retval;

	/* Finally, enable interrupts */
	cr = UART_GET_CTRL(port);
	UART_PUT_CTRL(port,
		      cr | UART_CTRL_RE | UART_CTRL_TE |
		      UART_CTRL_RI | UART_CTRL_TI);

	return 0;
}

static void apbuart_shutdown(struct uart_port *port)
{
	unsigned int cr;

	/* disable all interrupts, disable the port */
	cr = UART_GET_CTRL(port);
	UART_PUT_CTRL(port,
		      cr & ~(UART_CTRL_RE | UART_CTRL_TE |
			     UART_CTRL_RI | UART_CTRL_TI));

	/* Free the interrupt */
	free_irq(port->irq, port);
}

static void apbuart_set_termios(struct uart_port *port,
				struct ktermios *termios, struct ktermios *old)
{
	unsigned int cr;
	unsigned long flags;
	unsigned int baud, quot;

	/* Ask the core to calculate the divisor for us. */
	baud = uart_get_baud_rate(port, termios, old, 0, port->uartclk / 16);
	if (baud == 0)
		panic("invalid baudrate %i\n", port->uartclk / 16);

	/* uart_get_divisor calc a *16 uart freq, apbuart is *8 */
	quot = (uart_get_divisor(port, baud)) * 2;
	cr = UART_GET_CTRL(port);
	cr &= ~(UART_CTRL_PE | UART_CTRL_PS);

	if (termios->c_cflag & PARENB) {
		cr |= UART_CTRL_PE;
		if ((termios->c_cflag & PARODD))
			cr |= UART_CTRL_PS;
	}

	/* Enable flow control. */
	if (termios->c_cflag & CRTSCTS)
		cr |= UART_CTRL_FL;

	spin_lock_irqsave(&port->lock, flags);

	/* Update the per-port timeout. */
	uart_update_timeout(port, termios->c_cflag, baud);

	port->read_status_mask = UART_STATUS_OE;
	if (termios->c_iflag & INPCK)
		port->read_status_mask |= UART_STATUS_FE | UART_STATUS_PE;

	/* Characters to ignore */
	port->ignore_status_mask = 0;
	if (termios->c_iflag & IGNPAR)
		port->ignore_status_mask |= UART_STATUS_FE | UART_STATUS_PE;

	/* Ignore all characters if CREAD is not set. */
	if ((termios->c_cflag & CREAD) == 0)
		port->ignore_status_mask |= UART_DUMMY_RSR_RX;

	/* Set baud rate */
	quot -= 1;
	UART_PUT_SCAL(port, quot);
	UART_PUT_CTRL(port, cr);

	spin_unlock_irqrestore(&port->lock, flags);
}

static const char *apbuart_type(struct uart_port *port)
{
	return port->type == PORT_APBUART ? "GRLIB/APBUART" : NULL;
}

static void apbuart_release_port(struct uart_port *port)
{
	release_mem_region(port->mapbase, 0x100);
}

static int apbuart_request_port(struct uart_port *port)
{
	return request_mem_region(port->mapbase, 0x100, "grlib-apbuart")
	    != NULL ? 0 : -EBUSY;
	return 0;
}

/* Configure/autoconfigure the port */
static void apbuart_config_port(struct uart_port *port, int flags)
{
	if (flags & UART_CONFIG_TYPE) {
		port->type = PORT_APBUART;
		apbuart_request_port(port);
	}
}

/* Verify the new serial_struct (for TIOCSSERIAL) */
static int apbuart_verify_port(struct uart_port *port,
			       struct serial_struct *ser)
{
	int ret = 0;
	if (ser->type != PORT_UNKNOWN && ser->type != PORT_APBUART)
		ret = -EINVAL;
	if (ser->irq < 0 || ser->irq >= NR_IRQS)
		ret = -EINVAL;
	if (ser->baud_base < 9600)
		ret = -EINVAL;
	return ret;
}

static const struct uart_ops grlib_apbuart_ops = {
	.tx_empty = apbuart_tx_empty,
	.set_mctrl = apbuart_set_mctrl,
	.get_mctrl = apbuart_get_mctrl,
	.stop_tx = apbuart_stop_tx,
	.start_tx = apbuart_start_tx,
	.stop_rx = apbuart_stop_rx,
	.break_ctl = apbuart_break_ctl,
	.startup = apbuart_startup,
	.shutdown = apbuart_shutdown,
	.set_termios = apbuart_set_termios,
	.type = apbuart_type,
	.release_port = apbuart_release_port,
	.request_port = apbuart_request_port,
	.config_port = apbuart_config_port,
	.verify_port = apbuart_verify_port,
};

static struct uart_port grlib_apbuart_ports[UART_NR];
static struct device_node *grlib_apbuart_nodes[UART_NR];

static int apbuart_scan_fifo_size(struct uart_port *port, int portnumber)
{
	int ctrl, loop = 0;
	int status;
	int fifosize;
	unsigned long flags;

	ctrl = UART_GET_CTRL(port);

	/*
	 * Enable the transceiver and wait for it to be ready to send data.
	 * Clear interrupts so that this process will not be externally
	 * interrupted in the middle (which can cause the transceiver to
	 * drain prematurely).
	 */

	local_irq_save(flags);

	UART_PUT_CTRL(port, ctrl | UART_CTRL_TE);

	while (!UART_TX_READY(UART_GET_STATUS(port)))
		loop++;

	/*
	 * Disable the transceiver so data isn't actually sent during the
	 * actual test.
	 */

	UART_PUT_CTRL(port, ctrl & ~(UART_CTRL_TE));

	fifosize = 1;
	UART_PUT_CHAR(port, 0);

	/*
	 * So long as transmitting a character increments the tranceivier FIFO
	 * length the FIFO must be at least that big. These bytes will
	 * automatically drain off of the FIFO.
	 */

	status = UART_GET_STATUS(port);
	while (((status >> 20) & 0x3F) == fifosize) {
		fifosize++;
		UART_PUT_CHAR(port, 0);
		status = UART_GET_STATUS(port);
	}

	fifosize--;

	UART_PUT_CTRL(port, ctrl);
	local_irq_restore(flags);

	if (fifosize == 0)
		fifosize = 1;

	return fifosize;
}

static void apbuart_flush_fifo(struct uart_port *port)
{
	int i;

	for (i = 0; i < port->fifosize; i++)
		UART_GET_CHAR(port);
}


/* ======================================================================== */
/* Console driver, if enabled                                               */
/* ======================================================================== */

#ifdef CONFIG_SERIAL_GRLIB_GAISLER_APBUART_CONSOLE

static void apbuart_console_putchar(struct uart_port *port, int ch)
{
	unsigned int status;
	do {
		status = UART_GET_STATUS(port);
	} while (!UART_TX_READY(status));
	UART_PUT_CHAR(port, ch);
}

static void
apbuart_console_write(struct console *co, const char *s, unsigned int count)
{
	struct uart_port *port = &grlib_apbuart_ports[co->index];
	unsigned int status, old_cr, new_cr;

	/* First save the CR then disable the interrupts */
	old_cr = UART_GET_CTRL(port);
	new_cr = old_cr & ~(UART_CTRL_RI | UART_CTRL_TI);
	UART_PUT_CTRL(port, new_cr);

	uart_console_write(port, s, count, apbuart_console_putchar);

	/*
	 *      Finally, wait for transmitter to become empty
	 *      and restore the TCR
	 */
	do {
		status = UART_GET_STATUS(port);
	} while (!UART_TX_READY(status));
	UART_PUT_CTRL(port, old_cr);
}

static void __init
apbuart_console_get_options(struct uart_port *port, int *baud,
			    int *parity, int *bits)
{
	if (UART_GET_CTRL(port) & (UART_CTRL_RE | UART_CTRL_TE)) {

		unsigned int quot, status;
		status = UART_GET_STATUS(port);

		*parity = 'n';
		if (status & UART_CTRL_PE) {
			if ((status & UART_CTRL_PS) == 0)
				*parity = 'e';
			else
				*parity = 'o';
		}

		*bits = 8;
		quot = UART_GET_SCAL(port) / 8;
		*baud = port->uartclk / (16 * (quot + 1));
	}
}

static int __init apbuart_console_setup(struct console *co, char *options)
{
	struct uart_port *port;
	int baud = 38400;
	int bits = 8;
	int parity = 'n';
	int flow = 'n';

	pr_debug("apbuart_console_setup co=%p, co->index=%i, options=%s\n",
		 co, co->index, options);

	/*
	 * Check whether an invalid uart number has been specified, and
	 * if so, search for the first available port that does have
	 * console support.
	 */
	if (co->index >= grlib_apbuart_port_nr)
		co->index = 0;

	port = &grlib_apbuart_ports[co->index];

	spin_lock_init(&port->lock);

	if (options)
		uart_parse_options(options, &baud, &parity, &bits, &flow);
	else
		apbuart_console_get_options(port, &baud, &parity, &bits);

	return uart_set_options(port, co, baud, parity, bits, flow);
}

static struct uart_driver grlib_apbuart_driver;

static struct console grlib_apbuart_console = {
	.name = "ttyS",
	.write = apbuart_console_write,
	.device = uart_console_device,
	.setup = apbuart_console_setup,
	.flags = CON_PRINTBUFFER,
	.index = -1,
	.data = &grlib_apbuart_driver,
};


static int grlib_apbuart_configure(void);

static int __init apbuart_console_init(void)
{
	if (grlib_apbuart_configure())
		return -ENODEV;
	register_console(&grlib_apbuart_console);
	return 0;
}

console_initcall(apbuart_console_init);

#define APBUART_CONSOLE	(&grlib_apbuart_console)
#else
#define APBUART_CONSOLE	NULL
#endif

static struct uart_driver grlib_apbuart_driver = {
	.owner = THIS_MODULE,
	.driver_name = "serial",
	.dev_name = "ttyS",
	.major = SERIAL_APBUART_MAJOR,
	.minor = SERIAL_APBUART_MINOR,
	.nr = UART_NR,
	.cons = APBUART_CONSOLE,
};


/* ======================================================================== */
/* OF Platform Driver                                                       */
/* ======================================================================== */

static int apbuart_probe(struct platform_device *op)
{
	int i;
	struct uart_port *port = NULL;

	for (i = 0; i < grlib_apbuart_port_nr; i++) {
		if (op->dev.of_node == grlib_apbuart_nodes[i])
			break;
	}

	port = &grlib_apbuart_ports[i];
	port->dev = &op->dev;
	port->irq = op->archdata.irqs[0];

	uart_add_one_port(&grlib_apbuart_driver, (struct uart_port *) port);

	apbuart_flush_fifo((struct uart_port *) port);

	printk(KERN_INFO "grlib-apbuart at 0x%llx, irq %d\n",
	       (unsigned long long) port->mapbase, port->irq);
	return 0;
}

static const struct of_device_id apbuart_match[] = {
	{
	 .name = "GAISLER_APBUART",
	 },
	{
	 .name = "01_00c",
	 },
	{},
};
MODULE_DEVICE_TABLE(of, apbuart_match);

static struct platform_driver grlib_apbuart_of_driver = {
	.probe = apbuart_probe,
	.driver = {
		.name = "grlib-apbuart",
		.of_match_table = apbuart_match,
	},
};


static int __init grlib_apbuart_configure(void)
{
	struct device_node *np;
	int line = 0;

	for_each_matching_node(np, apbuart_match) {
		const int *ampopts;
		const u32 *freq_hz;
		const struct amba_prom_registers *regs;
		struct uart_port *port;
		unsigned long addr;

		ampopts = of_get_property(np, "ampopts", NULL);
		if (ampopts && (*ampopts == 0))
			continue; /* Ignore if used by another OS instance */
		regs = of_get_property(np, "reg", NULL);
		/* Frequency of APB Bus is frequency of UART */
		freq_hz = of_get_property(np, "freq", NULL);

		if (!regs || !freq_hz || (*freq_hz == 0))
			continue;

		grlib_apbuart_nodes[line] = np;

		addr = regs->phys_addr;

		port = &grlib_apbuart_ports[line];

		port->mapbase = addr;
		port->membase = ioremap(addr, sizeof(struct grlib_apbuart_regs_map));
		port->irq = 0;
		port->iotype = UPIO_MEM;
		port->ops = &grlib_apbuart_ops;
		port->has_sysrq = IS_ENABLED(CONFIG_SERIAL_GRLIB_GAISLER_APBUART_CONSOLE);
		port->flags = UPF_BOOT_AUTOCONF;
		port->line = line;
		port->uartclk = *freq_hz;
		port->fifosize = apbuart_scan_fifo_size((struct uart_port *) port, line);
		line++;

		/* We support maximum UART_NR uarts ... */
		if (line == UART_NR)
			break;
	}

	grlib_apbuart_driver.nr = grlib_apbuart_port_nr = line;
	return line ? 0 : -ENODEV;
}

static int __init grlib_apbuart_init(void)
{
	int ret;

	/* Find all APBUARTS in device the tree and initialize their ports */
	ret = grlib_apbuart_configure();
	if (ret)
		return ret;

	printk(KERN_INFO "Serial: GRLIB APBUART driver\n");

	ret = uart_register_driver(&grlib_apbuart_driver);

	if (ret) {
		printk(KERN_ERR "%s: uart_register_driver failed (%i)\n",
		       __FILE__, ret);
		return ret;
	}

	ret = platform_driver_register(&grlib_apbuart_of_driver);
	if (ret) {
		printk(KERN_ERR
		       "%s: platform_driver_register failed (%i)\n",
		       __FILE__, ret);
		uart_unregister_driver(&grlib_apbuart_driver);
		return ret;
	}

	return ret;
}

static void __exit grlib_apbuart_exit(void)
{
	int i;

	for (i = 0; i < grlib_apbuart_port_nr; i++)
		uart_remove_one_port(&grlib_apbuart_driver,
				     &grlib_apbuart_ports[i]);

	uart_unregister_driver(&grlib_apbuart_driver);
	platform_driver_unregister(&grlib_apbuart_of_driver);
}

module_init(grlib_apbuart_init);
module_exit(grlib_apbuart_exit);

MODULE_AUTHOR("Aeroflex Gaisler AB");
MODULE_DESCRIPTION("GRLIB APBUART serial driver");
MODULE_VERSION("2.1");
MODULE_LICENSE("GPL");
Commit	Line	Data
e3b3d0f5	1	// SPDX-License-Identifier: GPL-2.0
d4ac42a5 KG	2	/*
	3	* Driver for GRLIB serial ports (APBUART)
	4	*
	5	* Based on linux/drivers/serial/amba.c
	6	*
	7	* Copyright (C) 2000 Deep Blue Solutions Ltd.
	8	* Copyright (C) 2003 Konrad Eisele <eiselekd@web.de>
	9	* Copyright (C) 2006 Daniel Hellstrom <daniel@gaisler.com>, Aeroflex Gaisler AB
	10	* Copyright (C) 2008 Gilead Kutnick <kutnickg@zin-tech.com>
	11	* Copyright (C) 2009 Kristoffer Glembo <kristoffer@gaisler.com>, Aeroflex Gaisler AB
	12	*/
	13
d4ac42a5 KG	14	#include <linux/module.h>
d4ac42a5 KG	15	#include <linux/tty.h>
ee160a38	16	#include <linux/tty_flip.h>
d4ac42a5 KG	17	#include <linux/ioport.h>
	18	#include <linux/init.h>
	19	#include <linux/serial.h>
	20	#include <linux/console.h>
	21	#include <linux/sysrq.h>
	22	#include <linux/kthread.h>
	23	#include <linux/device.h>
	24	#include <linux/of.h>
	25	#include <linux/of_device.h>
ddaf1b27	26	#include <linux/of_platform.h>
f28f3313	27	#include <linux/of_irq.h>
d4ac42a5 KG	28	#include <linux/platform_device.h>
	29	#include <linux/io.h>
	30	#include <linux/serial_core.h>
	31	#include <asm/irq.h>
d4ac42a5 KG	32
	33	#include "apbuart.h"
	34
	35	#define SERIAL_APBUART_MAJOR TTY_MAJOR
	36	#define SERIAL_APBUART_MINOR 64
	37	#define UART_DUMMY_RSR_RX 0x8000 /* for ignore all read */
	38
	39	static void apbuart_tx_chars(struct uart_port *port);
	40
	41	static void apbuart_stop_tx(struct uart_port *port)
	42	{
	43	unsigned int cr;
	44
	45	cr = UART_GET_CTRL(port);
	46	cr &= ~UART_CTRL_TI;
	47	UART_PUT_CTRL(port, cr);
	48	}
	49
	50	static void apbuart_start_tx(struct uart_port *port)
	51	{
	52	unsigned int cr;
	53
	54	cr = UART_GET_CTRL(port);
	55	cr \|= UART_CTRL_TI;
	56	UART_PUT_CTRL(port, cr);
	57
	58	if (UART_GET_STATUS(port) & UART_STATUS_THE)
	59	apbuart_tx_chars(port);
	60	}
	61
	62	static void apbuart_stop_rx(struct uart_port *port)
	63	{
	64	unsigned int cr;
	65
	66	cr = UART_GET_CTRL(port);
	67	cr &= ~(UART_CTRL_RI);
	68	UART_PUT_CTRL(port, cr);
	69	}
	70
d4ac42a5 KG	71	static void apbuart_rx_chars(struct uart_port *port)
d4ac42a5 KG	72	{
d4ac42a5 KG	73	unsigned int status, ch, rsr, flag;
	74	unsigned int max_chars = port->fifosize;
	75
	76	status = UART_GET_STATUS(port);
	77
	78	while (UART_RX_DATA(status) && (max_chars--)) {
	79
	80	ch = UART_GET_CHAR(port);
	81	flag = TTY_NORMAL;
	82
	83	port->icount.rx++;
	84
	85	rsr = UART_GET_STATUS(port) \| UART_DUMMY_RSR_RX;
	86	UART_PUT_STATUS(port, 0);
	87	if (rsr & UART_STATUS_ERR) {
	88
	89	if (rsr & UART_STATUS_BR) {
	90	rsr &= ~(UART_STATUS_FE \| UART_STATUS_PE);
	91	port->icount.brk++;
	92	if (uart_handle_break(port))
	93	goto ignore_char;
	94	} else if (rsr & UART_STATUS_PE) {
	95	port->icount.parity++;
	96	} else if (rsr & UART_STATUS_FE) {
	97	port->icount.frame++;
	98	}
	99	if (rsr & UART_STATUS_OE)
	100	port->icount.overrun++;
	101
	102	rsr &= port->read_status_mask;
	103
	104	if (rsr & UART_STATUS_PE)
	105	flag = TTY_PARITY;
	106	else if (rsr & UART_STATUS_FE)
	107	flag = TTY_FRAME;
	108	}
	109
	110	if (uart_handle_sysrq_char(port, ch))
	111	goto ignore_char;
	112
	113	uart_insert_char(port, rsr, UART_STATUS_OE, ch, flag);
	114
	115
	116	ignore_char:
	117	status = UART_GET_STATUS(port);
	118	}
	119
78d34d75	120	spin_unlock(&port->lock);
2e124b4a	121	tty_flip_buffer_push(&port->state->port);
78d34d75	122	spin_lock(&port->lock);
d4ac42a5 KG	123	}
	124
	125	static void apbuart_tx_chars(struct uart_port *port)
	126	{
	127	struct circ_buf *xmit = &port->state->xmit;
	128	int count;
	129
	130	if (port->x_char) {
	131	UART_PUT_CHAR(port, port->x_char);
	132	port->icount.tx++;
	133	port->x_char = 0;
	134	return;
	135	}
	136
	137	if (uart_circ_empty(xmit) \|\| uart_tx_stopped(port)) {
	138	apbuart_stop_tx(port);
	139	return;
	140	}
	141
	142	/* amba: fill FIFO */
	143	count = port->fifosize >> 1;
	144	do {
	145	UART_PUT_CHAR(port, xmit->buf[xmit->tail]);
	146	xmit->tail = (xmit->tail + 1) & (UART_XMIT_SIZE - 1);
	147	port->icount.tx++;
	148	if (uart_circ_empty(xmit))
	149	break;
	150	} while (--count > 0);
	151
	152	if (uart_circ_chars_pending(xmit) < WAKEUP_CHARS)
	153	uart_write_wakeup(port);
	154
	155	if (uart_circ_empty(xmit))
	156	apbuart_stop_tx(port);
	157	}
	158
	159	static irqreturn_t apbuart_int(int irq, void *dev_id)
	160	{
	161	struct uart_port *port = dev_id;
	162	unsigned int status;
	163
	164	spin_lock(&port->lock);
	165
	166	status = UART_GET_STATUS(port);
	167	if (status & UART_STATUS_DR)
	168	apbuart_rx_chars(port);
	169	if (status & UART_STATUS_THE)
	170	apbuart_tx_chars(port);
	171
	172	spin_unlock(&port->lock);
	173
	174	return IRQ_HANDLED;
	175	}
	176
	177	static unsigned int apbuart_tx_empty(struct uart_port *port)
	178	{
	179	unsigned int status = UART_GET_STATUS(port);
	180	return status & UART_STATUS_THE ? TIOCSER_TEMT : 0;
	181	}
	182
	183	static unsigned int apbuart_get_mctrl(struct uart_port *port)
	184	{
	185	/* The GRLIB APBUART handles flow control in hardware */
	186	return TIOCM_CAR \| TIOCM_DSR \| TIOCM_CTS;
187	}
188
189	static void apbuart_set_mctrl(struct uart_port *port, unsigned int mctrl)
190	{
191	/* The GRLIB APBUART handles flow control in hardware */
192	}
193
194	static void apbuart_break_ctl(struct uart_port *port, int break_state)
195	{
196	/* We don't support sending break */
197	}
198
199	static int apbuart_startup(struct uart_port *port)
200	{
201	int retval;
202	unsigned int cr;
203
204	/* Allocate the IRQ */
205	retval = request_irq(port->irq, apbuart_int, 0, "apbuart", port);
206	if (retval)
207	return retval;
208
209	/* Finally, enable interrupts */
210	cr = UART_GET_CTRL(port);
211	UART_PUT_CTRL(port,
212	cr \| UART_CTRL_RE \| UART_CTRL_TE \|
213	UART_CTRL_RI \| UART_CTRL_TI);
214
215	return 0;
216	}
217
218	static void apbuart_shutdown(struct uart_port *port)
219	{
220	unsigned int cr;
221
222	/* disable all interrupts, disable the port */
223	cr = UART_GET_CTRL(port);
224	UART_PUT_CTRL(port,
225	cr & ~(UART_CTRL_RE \| UART_CTRL_TE \|
226	UART_CTRL_RI \| UART_CTRL_TI));
227
228	/* Free the interrupt */
229	free_irq(port->irq, port);
230	}
231
232	static void apbuart_set_termios(struct uart_port *port,
233	struct ktermios termios, struct ktermios old)
234	{
235	unsigned int cr;
236	unsigned long flags;
237	unsigned int baud, quot;
238
239	/* Ask the core to calculate the divisor for us. */
240	baud = uart_get_baud_rate(port, termios, old, 0, port->uartclk / 16);
241	if (baud == 0)
242	panic("invalid baudrate %i\n", port->uartclk / 16);
243
244	/* uart_get_divisor calc a 16 uart freq, apbuart is 8 */
245	quot = (uart_get_divisor(port, baud)) * 2;
246	cr = UART_GET_CTRL(port);
247	cr &= ~(UART_CTRL_PE \| UART_CTRL_PS);
248
249	if (termios->c_cflag & PARENB) {
250	cr \|= UART_CTRL_PE;
251	if ((termios->c_cflag & PARODD))
252	cr \|= UART_CTRL_PS;
253	}
254
255	/* Enable flow control. */
256	if (termios->c_cflag & CRTSCTS)
257	cr \|= UART_CTRL_FL;
258
259	spin_lock_irqsave(&port->lock, flags);
260
261	/* Update the per-port timeout. */
262	uart_update_timeout(port, termios->c_cflag, baud);
263
264	port->read_status_mask = UART_STATUS_OE;
265	if (termios->c_iflag & INPCK)
266	port->read_status_mask \|= UART_STATUS_FE \| UART_STATUS_PE;
267
268	/* Characters to ignore */
269	port->ignore_status_mask = 0;
270	if (termios->c_iflag & IGNPAR)
271	port->ignore_status_mask \|= UART_STATUS_FE \| UART_STATUS_PE;
272
273	/* Ignore all characters if CREAD is not set. */
274	if ((termios->c_cflag & CREAD) == 0)
275	port->ignore_status_mask \|= UART_DUMMY_RSR_RX;
276
277	/* Set baud rate */
278	quot -= 1;
279	UART_PUT_SCAL(port, quot);
280	UART_PUT_CTRL(port, cr);
281
282	spin_unlock_irqrestore(&port->lock, flags);
283	}
284
285	static const char apbuart_type(struct uart_port port)
286	{
287	return port->type == PORT_APBUART ? "GRLIB/APBUART" : NULL;
288	}
289
290	static void apbuart_release_port(struct uart_port *port)
291	{
292	release_mem_region(port->mapbase, 0x100);
293	}
294
295	static int apbuart_request_port(struct uart_port *port)
296	{
297	return request_mem_region(port->mapbase, 0x100, "grlib-apbuart")
298	!= NULL ? 0 : -EBUSY;
299	return 0;
300	}
301
302	/* Configure/autoconfigure the port */
303	static void apbuart_config_port(struct uart_port *port, int flags)
304	{
305	if (flags & UART_CONFIG_TYPE) {
306	port->type = PORT_APBUART;
307	apbuart_request_port(port);
308	}
309	}
310
311	/* Verify the new serial_struct (for TIOCSSERIAL) */
312	static int apbuart_verify_port(struct uart_port *port,
313	struct serial_struct *ser)
314	{
315	int ret = 0;
316	if (ser->type != PORT_UNKNOWN && ser->type != PORT_APBUART)
317	ret = -EINVAL;
318	if (ser->irq < 0 \|\| ser->irq >= NR_IRQS)
319	ret = -EINVAL;
320	if (ser->baud_base < 9600)
321	ret = -EINVAL;
322	return ret;
323	}
324
57495265	325	static const struct uart_ops grlib_apbuart_ops = {
d4ac42a5 KG	326	.tx_empty = apbuart_tx_empty,
	327	.set_mctrl = apbuart_set_mctrl,
	328	.get_mctrl = apbuart_get_mctrl,
	329	.stop_tx = apbuart_stop_tx,
	330	.start_tx = apbuart_start_tx,
	331	.stop_rx = apbuart_stop_rx,
d4ac42a5 KG	332	.break_ctl = apbuart_break_ctl,
	333	.startup = apbuart_startup,
	334	.shutdown = apbuart_shutdown,
	335	.set_termios = apbuart_set_termios,
	336	.type = apbuart_type,
	337	.release_port = apbuart_release_port,
	338	.request_port = apbuart_request_port,
	339	.config_port = apbuart_config_port,
	340	.verify_port = apbuart_verify_port,
	341	};
	342
	343	static struct uart_port grlib_apbuart_ports[UART_NR];
	344	static struct device_node *grlib_apbuart_nodes[UART_NR];
	345
	346	static int apbuart_scan_fifo_size(struct uart_port *port, int portnumber)
	347	{
	348	int ctrl, loop = 0;
	349	int status;
	350	int fifosize;
	351	unsigned long flags;
	352
	353	ctrl = UART_GET_CTRL(port);
	354
	355	/*
	356	* Enable the transceiver and wait for it to be ready to send data.
	357	* Clear interrupts so that this process will not be externally
	358	* interrupted in the middle (which can cause the transceiver to
	359	* drain prematurely).
	360	*/
	361
	362	local_irq_save(flags);
	363
	364	UART_PUT_CTRL(port, ctrl \| UART_CTRL_TE);
	365
	366	while (!UART_TX_READY(UART_GET_STATUS(port)))
	367	loop++;
	368
	369	/*
	370	* Disable the transceiver so data isn't actually sent during the
	371	* actual test.
	372	*/
	373
	374	UART_PUT_CTRL(port, ctrl & ~(UART_CTRL_TE));
	375
	376	fifosize = 1;
	377	UART_PUT_CHAR(port, 0);
	378
	379	/*
	380	* So long as transmitting a character increments the tranceivier FIFO
	381	* length the FIFO must be at least that big. These bytes will
	382	* automatically drain off of the FIFO.
	383	*/
	384
	385	status = UART_GET_STATUS(port);
	386	while (((status >> 20) & 0x3F) == fifosize) {
	387	fifosize++;
	388	UART_PUT_CHAR(port, 0);
	389	status = UART_GET_STATUS(port);
	390	}
	391
	392	fifosize--;
	393
	394	UART_PUT_CTRL(port, ctrl);
	395	local_irq_restore(flags);
396
397	if (fifosize == 0)
398	fifosize = 1;
399
400	return fifosize;
401	}
402
403	static void apbuart_flush_fifo(struct uart_port *port)
404	{
405	int i;
406
407	for (i = 0; i < port->fifosize; i++)
408	UART_GET_CHAR(port);
409	}
410
411
412	/* ======================================================================== */
413	/* Console driver, if enabled */
414	/* ======================================================================== */
415
416	#ifdef CONFIG_SERIAL_GRLIB_GAISLER_APBUART_CONSOLE
417
418	static void apbuart_console_putchar(struct uart_port *port, int ch)
419	{
420	unsigned int status;
421	do {
422	status = UART_GET_STATUS(port);
423	} while (!UART_TX_READY(status));
424	UART_PUT_CHAR(port, ch);
425	}
426
427	static void
428	apbuart_console_write(struct console co, const char s, unsigned int count)
429	{
430	struct uart_port *port = &grlib_apbuart_ports[co->index];
431	unsigned int status, old_cr, new_cr;
432
433	/* First save the CR then disable the interrupts */
434	old_cr = UART_GET_CTRL(port);
435	new_cr = old_cr & ~(UART_CTRL_RI \| UART_CTRL_TI);
436	UART_PUT_CTRL(port, new_cr);
437
438	uart_console_write(port, s, count, apbuart_console_putchar);
439
440	/*
441	* Finally, wait for transmitter to become empty
442	* and restore the TCR
443	*/
444	do {
445	status = UART_GET_STATUS(port);
446	} while (!UART_TX_READY(status));
447	UART_PUT_CTRL(port, old_cr);
448	}
449
450	static void __init
451	apbuart_console_get_options(struct uart_port port, int baud,
452	int parity, int bits)
453	{
454	if (UART_GET_CTRL(port) & (UART_CTRL_RE \| UART_CTRL_TE)) {
455
456	unsigned int quot, status;
457	status = UART_GET_STATUS(port);
458
459	*parity = 'n';
460	if (status & UART_CTRL_PE) {
461	if ((status & UART_CTRL_PS) == 0)
462	*parity = 'e';
463	else
464	*parity = 'o';
465	}
466
467	*bits = 8;
468	quot = UART_GET_SCAL(port) / 8;
469	baud = port->uartclk / (16 (quot + 1));
470	}
471	}
472
473	static int __init apbuart_console_setup(struct console co, char options)
474	{
475	struct uart_port *port;
476	int baud = 38400;
477	int bits = 8;
478	int parity = 'n';
479	int flow = 'n';
480
481	pr_debug("apbuart_console_setup co=%p, co->index=%i, options=%s\n",
482	co, co->index, options);
483
484	/*
485	* Check whether an invalid uart number has been specified, and
486	* if so, search for the first available port that does have
487	* console support.
488	*/
489	if (co->index >= grlib_apbuart_port_nr)
490	co->index = 0;
491
492	port = &grlib_apbuart_ports[co->index];
493
494	spin_lock_init(&port->lock);
495
496	if (options)
497	uart_parse_options(options, &baud, &parity, &bits, &flow);
498	else
499	apbuart_console_get_options(port, &baud, &parity, &bits);
500
501	return uart_set_options(port, co, baud, parity, bits, flow);
502	}
503
504	static struct uart_driver grlib_apbuart_driver;
505
506	static struct console grlib_apbuart_console = {
507	.name = "ttyS",
508	.write = apbuart_console_write,
509	.device = uart_console_device,
510	.setup = apbuart_console_setup,
511	.flags = CON_PRINTBUFFER,
512	.index = -1,
513	.data = &grlib_apbuart_driver,
514	};
515
516
568389c2	517	static int grlib_apbuart_configure(void);
d4ac42a5 KG	518
	519	static int __init apbuart_console_init(void)
	520	{
568389c2 TG	521	if (grlib_apbuart_configure())
568389c2 TG	522	return -ENODEV;
d4ac42a5 KG	523	register_console(&grlib_apbuart_console);
	524	return 0;
	525	}
	526
	527	console_initcall(apbuart_console_init);
	528
	529	#define APBUART_CONSOLE (&grlib_apbuart_console)
	530	#else
	531	#define APBUART_CONSOLE NULL
	532	#endif
	533
	534	static struct uart_driver grlib_apbuart_driver = {
	535	.owner = THIS_MODULE,
	536	.driver_name = "serial",
	537	.dev_name = "ttyS",
	538	.major = SERIAL_APBUART_MAJOR,
	539	.minor = SERIAL_APBUART_MINOR,
	540	.nr = UART_NR,
	541	.cons = APBUART_CONSOLE,
	542	};
	543
	544
	545	/* ======================================================================== */
	546	/* OF Platform Driver */
	547	/* ======================================================================== */
	548
9671f099	549	static int apbuart_probe(struct platform_device *op)
d4ac42a5	550	{
10544f12	551	int i;
d4ac42a5 KG	552	struct uart_port *port = NULL;
d4ac42a5 KG	553
d4ac42a5	554	for (i = 0; i < grlib_apbuart_port_nr; i++) {
61c7a080	555	if (op->dev.of_node == grlib_apbuart_nodes[i])
d4ac42a5 KG	556	break;
	557	}
	558
	559	port = &grlib_apbuart_ports[i];
	560	port->dev = &op->dev;
10544f12	561	port->irq = op->archdata.irqs[0];
d4ac42a5 KG	562
	563	uart_add_one_port(&grlib_apbuart_driver, (struct uart_port *) port);
	564
	565	apbuart_flush_fifo((struct uart_port *) port);
	566
384a17b2 DM	567	printk(KERN_INFO "grlib-apbuart at 0x%llx, irq %d\n",
384a17b2 DM	568	(unsigned long long) port->mapbase, port->irq);
d4ac42a5	569	return 0;
d4ac42a5 KG	570	}
d4ac42a5 KG	571
ed0bb232	572	static const struct of_device_id apbuart_match[] = {
d4ac42a5 KG	573	{
	574	.name = "GAISLER_APBUART",
	575	},
d89ddf0d DH	576	{
	577	.name = "01_00c",
	578	},
d4ac42a5 KG	579	{},
d4ac42a5 KG	580	};
50a84487	581	MODULE_DEVICE_TABLE(of, apbuart_match);
d4ac42a5	582
793218df	583	static struct platform_driver grlib_apbuart_of_driver = {
d4ac42a5 KG	584	.probe = apbuart_probe,
d4ac42a5 KG	585	.driver = {
4018294b GL	586	.name = "grlib-apbuart",
	587	.of_match_table = apbuart_match,
	588	},
d4ac42a5 KG	589	};
	590
	591
ab17da5c	592	static int __init grlib_apbuart_configure(void)
d4ac42a5	593	{
c897dcf6 DH	594	struct device_node *np;
c897dcf6 DH	595	int line = 0;
d4ac42a5	596
d4ac42a5	597	for_each_matching_node(np, apbuart_match) {
10544f12	598	const int *ampopts;
c897dcf6	599	const u32 *freq_hz;
35c64e5d TG	600	const struct amba_prom_registers *regs;
	601	struct uart_port *port;
	602	unsigned long addr;
d4ac42a5	603
56b85f32	604	ampopts = of_get_property(np, "ampopts", NULL);
f28f3313 DH	605	if (ampopts && (*ampopts == 0))
f28f3313 DH	606	continue; /* Ignore if used by another OS instance */
35c64e5d	607	regs = of_get_property(np, "reg", NULL);
c897dcf6 DH	608	/* Frequency of APB Bus is frequency of UART */
c897dcf6 DH	609	freq_hz = of_get_property(np, "freq", NULL);
d4ac42a5	610
c897dcf6	611	if (!regs \|\| !freq_hz \|\| (*freq_hz == 0))
56b85f32	612	continue;
d4ac42a5 KG	613
	614	grlib_apbuart_nodes[line] = np;
	615
	616	addr = regs->phys_addr;
d4ac42a5 KG	617
	618	port = &grlib_apbuart_ports[line];
	619
	620	port->mapbase = addr;
	621	port->membase = ioremap(addr, sizeof(struct grlib_apbuart_regs_map));
10544f12	622	port->irq = 0;
d4ac42a5 KG	623	port->iotype = UPIO_MEM;
d4ac42a5 KG	624	port->ops = &grlib_apbuart_ops;
3db3cca6	625	port->has_sysrq = IS_ENABLED(CONFIG_SERIAL_GRLIB_GAISLER_APBUART_CONSOLE);
d4ac42a5 KG	626	port->flags = UPF_BOOT_AUTOCONF;
d4ac42a5 KG	627	port->line = line;
c897dcf6	628	port->uartclk = *freq_hz;
d4ac42a5 KG	629	port->fifosize = apbuart_scan_fifo_size((struct uart_port *) port, line);
	630	line++;
	631
	632	/* We support maximum UART_NR uarts ... */
	633	if (line == UART_NR)
	634	break;
d4ac42a5 KG	635	}
d4ac42a5 KG	636
d4ac42a5	637	grlib_apbuart_driver.nr = grlib_apbuart_port_nr = line;
35c64e5d	638	return line ? 0 : -ENODEV;
d4ac42a5 KG	639	}
	640
	641	static int __init grlib_apbuart_init(void)
	642	{
	643	int ret;
	644
	645	/* Find all APBUARTS in device the tree and initialize their ports */
35c64e5d TG	646	ret = grlib_apbuart_configure();
	647	if (ret)
	648	return ret;
d4ac42a5 KG	649
	650	printk(KERN_INFO "Serial: GRLIB APBUART driver\n");
	651
	652	ret = uart_register_driver(&grlib_apbuart_driver);
	653
	654	if (ret) {
	655	printk(KERN_ERR "%s: uart_register_driver failed (%i)\n",
	656	__FILE__, ret);
	657	return ret;
	658	}
	659
793218df	660	ret = platform_driver_register(&grlib_apbuart_of_driver);
d4ac42a5 KG	661	if (ret) {
d4ac42a5 KG	662	printk(KERN_ERR
793218df	663	"%s: platform_driver_register failed (%i)\n",
d4ac42a5 KG	664	__FILE__, ret);
	665	uart_unregister_driver(&grlib_apbuart_driver);
	666	return ret;
	667	}
	668
	669	return ret;
	670	}
	671
	672	static void __exit grlib_apbuart_exit(void)
	673	{
	674	int i;
	675
	676	for (i = 0; i < grlib_apbuart_port_nr; i++)
	677	uart_remove_one_port(&grlib_apbuart_driver,
	678	&grlib_apbuart_ports[i]);
	679
	680	uart_unregister_driver(&grlib_apbuart_driver);
793218df	681	platform_driver_unregister(&grlib_apbuart_of_driver);
d4ac42a5 KG	682	}
	683
	684	module_init(grlib_apbuart_init);
	685	module_exit(grlib_apbuart_exit);
	686
	687	MODULE_AUTHOR("Aeroflex Gaisler AB");
	688	MODULE_DESCRIPTION("GRLIB APBUART serial driver");
	689	MODULE_VERSION("2.1");
	690	MODULE_LICENSE("GPL");