1 // SPDX-License-Identifier: GPL-2.0 2 /* 3 * LiteUART serial controller (LiteX) Driver 4 * 5 * Copyright (C) 2019-2020 Antmicro <www.antmicro.com> 6 */ 7 8 #include <linux/console.h> 9 #include <linux/litex.h> 10 #include <linux/module.h> 11 #include <linux/of.h> 12 #include <linux/of_address.h> 13 #include <linux/of_platform.h> 14 #include <linux/serial.h> 15 #include <linux/serial_core.h> 16 #include <linux/slab.h> 17 #include <linux/timer.h> 18 #include <linux/tty_flip.h> 19 #include <linux/xarray.h> 20 21 /* 22 * CSRs definitions (base address offsets + width) 23 * 24 * The definitions below are true for LiteX SoC configured for 8-bit CSR Bus, 25 * 32-bit aligned. 26 * 27 * Supporting other configurations might require new definitions or a more 28 * generic way of indexing the LiteX CSRs. 29 * 30 * For more details on how CSRs are defined and handled in LiteX, see comments 31 * in the LiteX SoC Driver: drivers/soc/litex/litex_soc_ctrl.c 32 */ 33 #define OFF_RXTX 0x00 34 #define OFF_TXFULL 0x04 35 #define OFF_RXEMPTY 0x08 36 #define OFF_EV_STATUS 0x0c 37 #define OFF_EV_PENDING 0x10 38 #define OFF_EV_ENABLE 0x14 39 40 /* events */ 41 #define EV_TX 0x1 42 #define EV_RX 0x2 43 44 struct liteuart_port { 45 struct uart_port port; 46 struct timer_list timer; 47 u32 id; 48 }; 49 50 #define to_liteuart_port(port) container_of(port, struct liteuart_port, port) 51 52 static DEFINE_XARRAY_FLAGS(liteuart_array, XA_FLAGS_ALLOC); 53 54 #ifdef CONFIG_SERIAL_LITEUART_CONSOLE 55 static struct console liteuart_console; 56 #endif 57 58 static struct uart_driver liteuart_driver = { 59 .owner = THIS_MODULE, 60 .driver_name = "liteuart", 61 .dev_name = "ttyLXU", 62 .major = 0, 63 .minor = 0, 64 .nr = CONFIG_SERIAL_LITEUART_MAX_PORTS, 65 #ifdef CONFIG_SERIAL_LITEUART_CONSOLE 66 .cons = &liteuart_console, 67 #endif 68 }; 69 70 static void liteuart_timer(struct timer_list *t) 71 { 72 struct liteuart_port *uart = from_timer(uart, t, timer); 73 struct uart_port *port = &uart->port; 74 unsigned char __iomem *membase = port->membase; 75 unsigned int flg = TTY_NORMAL; 76 int ch; 77 unsigned long status; 78 79 while ((status = !litex_read8(membase + OFF_RXEMPTY)) == 1) { 80 ch = litex_read8(membase + OFF_RXTX); 81 port->icount.rx++; 82 83 /* necessary for RXEMPTY to refresh its value */ 84 litex_write8(membase + OFF_EV_PENDING, EV_TX | EV_RX); 85 86 /* no overflow bits in status */ 87 if (!(uart_handle_sysrq_char(port, ch))) 88 uart_insert_char(port, status, 0, ch, flg); 89 90 tty_flip_buffer_push(&port->state->port); 91 } 92 93 mod_timer(&uart->timer, jiffies + uart_poll_timeout(port)); 94 } 95 96 static void liteuart_putchar(struct uart_port *port, unsigned char ch) 97 { 98 while (litex_read8(port->membase + OFF_TXFULL)) 99 cpu_relax(); 100 101 litex_write8(port->membase + OFF_RXTX, ch); 102 } 103 104 static unsigned int liteuart_tx_empty(struct uart_port *port) 105 { 106 /* not really tx empty, just checking if tx is not full */ 107 if (!litex_read8(port->membase + OFF_TXFULL)) 108 return TIOCSER_TEMT; 109 110 return 0; 111 } 112 113 static void liteuart_set_mctrl(struct uart_port *port, unsigned int mctrl) 114 { 115 /* modem control register is not present in LiteUART */ 116 } 117 118 static unsigned int liteuart_get_mctrl(struct uart_port *port) 119 { 120 return TIOCM_CTS | TIOCM_DSR | TIOCM_CAR; 121 } 122 123 static void liteuart_stop_tx(struct uart_port *port) 124 { 125 } 126 127 static void liteuart_start_tx(struct uart_port *port) 128 { 129 struct circ_buf *xmit = &port->state->xmit; 130 unsigned char ch; 131 132 if (unlikely(port->x_char)) { 133 litex_write8(port->membase + OFF_RXTX, port->x_char); 134 port->icount.tx++; 135 port->x_char = 0; 136 } else if (!uart_circ_empty(xmit)) { 137 while (xmit->head != xmit->tail) { 138 ch = xmit->buf[xmit->tail]; 139 xmit->tail = (xmit->tail + 1) & (UART_XMIT_SIZE - 1); 140 port->icount.tx++; 141 liteuart_putchar(port, ch); 142 } 143 } 144 145 if (uart_circ_chars_pending(xmit) < WAKEUP_CHARS) 146 uart_write_wakeup(port); 147 } 148 149 static void liteuart_stop_rx(struct uart_port *port) 150 { 151 struct liteuart_port *uart = to_liteuart_port(port); 152 153 /* just delete timer */ 154 del_timer(&uart->timer); 155 } 156 157 static void liteuart_break_ctl(struct uart_port *port, int break_state) 158 { 159 /* LiteUART doesn't support sending break signal */ 160 } 161 162 static int liteuart_startup(struct uart_port *port) 163 { 164 struct liteuart_port *uart = to_liteuart_port(port); 165 166 /* disable events */ 167 litex_write8(port->membase + OFF_EV_ENABLE, 0); 168 169 /* prepare timer for polling */ 170 timer_setup(&uart->timer, liteuart_timer, 0); 171 mod_timer(&uart->timer, jiffies + uart_poll_timeout(port)); 172 173 return 0; 174 } 175 176 static void liteuart_shutdown(struct uart_port *port) 177 { 178 } 179 180 static void liteuart_set_termios(struct uart_port *port, struct ktermios *new, 181 struct ktermios *old) 182 { 183 unsigned int baud; 184 unsigned long flags; 185 186 spin_lock_irqsave(&port->lock, flags); 187 188 /* update baudrate */ 189 baud = uart_get_baud_rate(port, new, old, 0, 460800); 190 uart_update_timeout(port, new->c_cflag, baud); 191 192 spin_unlock_irqrestore(&port->lock, flags); 193 } 194 195 static const char *liteuart_type(struct uart_port *port) 196 { 197 return "liteuart"; 198 } 199 200 static void liteuart_release_port(struct uart_port *port) 201 { 202 } 203 204 static int liteuart_request_port(struct uart_port *port) 205 { 206 return 0; 207 } 208 209 static void liteuart_config_port(struct uart_port *port, int flags) 210 { 211 /* 212 * Driver core for serial ports forces a non-zero value for port type. 213 * Write an arbitrary value here to accommodate the serial core driver, 214 * as ID part of UAPI is redundant. 215 */ 216 port->type = 1; 217 } 218 219 static int liteuart_verify_port(struct uart_port *port, 220 struct serial_struct *ser) 221 { 222 if (port->type != PORT_UNKNOWN && ser->type != 1) 223 return -EINVAL; 224 225 return 0; 226 } 227 228 static const struct uart_ops liteuart_ops = { 229 .tx_empty = liteuart_tx_empty, 230 .set_mctrl = liteuart_set_mctrl, 231 .get_mctrl = liteuart_get_mctrl, 232 .stop_tx = liteuart_stop_tx, 233 .start_tx = liteuart_start_tx, 234 .stop_rx = liteuart_stop_rx, 235 .break_ctl = liteuart_break_ctl, 236 .startup = liteuart_startup, 237 .shutdown = liteuart_shutdown, 238 .set_termios = liteuart_set_termios, 239 .type = liteuart_type, 240 .release_port = liteuart_release_port, 241 .request_port = liteuart_request_port, 242 .config_port = liteuart_config_port, 243 .verify_port = liteuart_verify_port, 244 }; 245 246 static int liteuart_probe(struct platform_device *pdev) 247 { 248 struct liteuart_port *uart; 249 struct uart_port *port; 250 struct xa_limit limit; 251 int dev_id, ret; 252 253 /* look for aliases; auto-enumerate for free index if not found */ 254 dev_id = of_alias_get_id(pdev->dev.of_node, "serial"); 255 if (dev_id < 0) 256 limit = XA_LIMIT(0, CONFIG_SERIAL_LITEUART_MAX_PORTS); 257 else 258 limit = XA_LIMIT(dev_id, dev_id); 259 260 uart = devm_kzalloc(&pdev->dev, sizeof(struct liteuart_port), GFP_KERNEL); 261 if (!uart) 262 return -ENOMEM; 263 264 ret = xa_alloc(&liteuart_array, &dev_id, uart, limit, GFP_KERNEL); 265 if (ret) 266 return ret; 267 268 uart->id = dev_id; 269 port = &uart->port; 270 271 /* get membase */ 272 port->membase = devm_platform_get_and_ioremap_resource(pdev, 0, NULL); 273 if (IS_ERR(port->membase)) { 274 ret = PTR_ERR(port->membase); 275 goto err_erase_id; 276 } 277 278 /* values not from device tree */ 279 port->dev = &pdev->dev; 280 port->iotype = UPIO_MEM; 281 port->flags = UPF_BOOT_AUTOCONF; 282 port->ops = &liteuart_ops; 283 port->regshift = 2; 284 port->fifosize = 16; 285 port->iobase = 1; 286 port->type = PORT_UNKNOWN; 287 port->line = dev_id; 288 spin_lock_init(&port->lock); 289 290 platform_set_drvdata(pdev, port); 291 292 ret = uart_add_one_port(&liteuart_driver, &uart->port); 293 if (ret) 294 goto err_erase_id; 295 296 return 0; 297 298 err_erase_id: 299 xa_erase(&liteuart_array, uart->id); 300 301 return ret; 302 } 303 304 static int liteuart_remove(struct platform_device *pdev) 305 { 306 struct uart_port *port = platform_get_drvdata(pdev); 307 struct liteuart_port *uart = to_liteuart_port(port); 308 309 uart_remove_one_port(&liteuart_driver, port); 310 xa_erase(&liteuart_array, uart->id); 311 312 return 0; 313 } 314 315 static const struct of_device_id liteuart_of_match[] = { 316 { .compatible = "litex,liteuart" }, 317 {} 318 }; 319 MODULE_DEVICE_TABLE(of, liteuart_of_match); 320 321 static struct platform_driver liteuart_platform_driver = { 322 .probe = liteuart_probe, 323 .remove = liteuart_remove, 324 .driver = { 325 .name = "liteuart", 326 .of_match_table = liteuart_of_match, 327 }, 328 }; 329 330 #ifdef CONFIG_SERIAL_LITEUART_CONSOLE 331 332 static void liteuart_console_write(struct console *co, const char *s, 333 unsigned int count) 334 { 335 struct liteuart_port *uart; 336 struct uart_port *port; 337 unsigned long flags; 338 339 uart = (struct liteuart_port *)xa_load(&liteuart_array, co->index); 340 port = &uart->port; 341 342 spin_lock_irqsave(&port->lock, flags); 343 uart_console_write(port, s, count, liteuart_putchar); 344 spin_unlock_irqrestore(&port->lock, flags); 345 } 346 347 static int liteuart_console_setup(struct console *co, char *options) 348 { 349 struct liteuart_port *uart; 350 struct uart_port *port; 351 int baud = 115200; 352 int bits = 8; 353 int parity = 'n'; 354 int flow = 'n'; 355 356 uart = (struct liteuart_port *)xa_load(&liteuart_array, co->index); 357 if (!uart) 358 return -ENODEV; 359 360 port = &uart->port; 361 if (!port->membase) 362 return -ENODEV; 363 364 if (options) 365 uart_parse_options(options, &baud, &parity, &bits, &flow); 366 367 return uart_set_options(port, co, baud, parity, bits, flow); 368 } 369 370 static struct console liteuart_console = { 371 .name = "liteuart", 372 .write = liteuart_console_write, 373 .device = uart_console_device, 374 .setup = liteuart_console_setup, 375 .flags = CON_PRINTBUFFER, 376 .index = -1, 377 .data = &liteuart_driver, 378 }; 379 380 static int __init liteuart_console_init(void) 381 { 382 register_console(&liteuart_console); 383 384 return 0; 385 } 386 console_initcall(liteuart_console_init); 387 388 static void early_liteuart_write(struct console *console, const char *s, 389 unsigned int count) 390 { 391 struct earlycon_device *device = console->data; 392 struct uart_port *port = &device->port; 393 394 uart_console_write(port, s, count, liteuart_putchar); 395 } 396 397 static int __init early_liteuart_setup(struct earlycon_device *device, 398 const char *options) 399 { 400 if (!device->port.membase) 401 return -ENODEV; 402 403 device->con->write = early_liteuart_write; 404 return 0; 405 } 406 407 OF_EARLYCON_DECLARE(liteuart, "litex,liteuart", early_liteuart_setup); 408 #endif /* CONFIG_SERIAL_LITEUART_CONSOLE */ 409 410 static int __init liteuart_init(void) 411 { 412 int res; 413 414 res = uart_register_driver(&liteuart_driver); 415 if (res) 416 return res; 417 418 res = platform_driver_register(&liteuart_platform_driver); 419 if (res) { 420 uart_unregister_driver(&liteuart_driver); 421 return res; 422 } 423 424 return 0; 425 } 426 427 static void __exit liteuart_exit(void) 428 { 429 platform_driver_unregister(&liteuart_platform_driver); 430 uart_unregister_driver(&liteuart_driver); 431 } 432 433 module_init(liteuart_init); 434 module_exit(liteuart_exit); 435 436 MODULE_AUTHOR("Antmicro <www.antmicro.com>"); 437 MODULE_DESCRIPTION("LiteUART serial driver"); 438 MODULE_LICENSE("GPL v2"); 439 MODULE_ALIAS("platform:liteuart"); 440