1 // SPDX-License-Identifier: GPL-2.0+ 2 /* 3 * Support for the asynchronous serial interface (DUART) included 4 * in the BCM1250 and derived System-On-a-Chip (SOC) devices. 5 * 6 * Copyright (c) 2007 Maciej W. Rozycki 7 * 8 * Derived from drivers/char/sb1250_duart.c for which the following 9 * copyright applies: 10 * 11 * Copyright (c) 2000, 2001, 2002, 2003, 2004 Broadcom Corporation 12 * 13 * References: 14 * 15 * "BCM1250/BCM1125/BCM1125H User Manual", Broadcom Corporation 16 */ 17 18 #include <linux/compiler.h> 19 #include <linux/console.h> 20 #include <linux/delay.h> 21 #include <linux/errno.h> 22 #include <linux/init.h> 23 #include <linux/interrupt.h> 24 #include <linux/ioport.h> 25 #include <linux/kernel.h> 26 #include <linux/module.h> 27 #include <linux/major.h> 28 #include <linux/serial.h> 29 #include <linux/serial_core.h> 30 #include <linux/spinlock.h> 31 #include <linux/sysrq.h> 32 #include <linux/tty.h> 33 #include <linux/tty_flip.h> 34 #include <linux/types.h> 35 36 #include <linux/refcount.h> 37 #include <linux/io.h> 38 39 #include <asm/sibyte/sb1250.h> 40 #include <asm/sibyte/sb1250_uart.h> 41 #include <asm/sibyte/swarm.h> 42 43 44 #if defined(CONFIG_SIBYTE_BCM1x55) || defined(CONFIG_SIBYTE_BCM1x80) 45 #include <asm/sibyte/bcm1480_regs.h> 46 #include <asm/sibyte/bcm1480_int.h> 47 48 #define SBD_CHANREGS(line) A_BCM1480_DUART_CHANREG((line), 0) 49 #define SBD_CTRLREGS(line) A_BCM1480_DUART_CTRLREG((line), 0) 50 #define SBD_INT(line) (K_BCM1480_INT_UART_0 + (line)) 51 52 #define DUART_CHANREG_SPACING BCM1480_DUART_CHANREG_SPACING 53 54 #define R_DUART_IMRREG(line) R_BCM1480_DUART_IMRREG(line) 55 #define R_DUART_INCHREG(line) R_BCM1480_DUART_INCHREG(line) 56 #define R_DUART_ISRREG(line) R_BCM1480_DUART_ISRREG(line) 57 58 #elif defined(CONFIG_SIBYTE_SB1250) || defined(CONFIG_SIBYTE_BCM112X) 59 #include <asm/sibyte/sb1250_regs.h> 60 #include <asm/sibyte/sb1250_int.h> 61 62 #define SBD_CHANREGS(line) A_DUART_CHANREG((line), 0) 63 #define SBD_CTRLREGS(line) A_DUART_CTRLREG(0) 64 #define SBD_INT(line) (K_INT_UART_0 + (line)) 65 66 #else 67 #error invalid SB1250 UART configuration 68 69 #endif 70 71 72 MODULE_AUTHOR("Maciej W. Rozycki <macro@linux-mips.org>"); 73 MODULE_DESCRIPTION("BCM1xxx on-chip DUART serial driver"); 74 MODULE_LICENSE("GPL"); 75 76 77 #define DUART_MAX_CHIP 2 78 #define DUART_MAX_SIDE 2 79 80 /* 81 * Per-port state. 82 */ 83 struct sbd_port { 84 struct sbd_duart *duart; 85 struct uart_port port; 86 unsigned char __iomem *memctrl; 87 int tx_stopped; 88 int initialised; 89 }; 90 91 /* 92 * Per-DUART state for the shared register space. 93 */ 94 struct sbd_duart { 95 struct sbd_port sport[2]; 96 unsigned long mapctrl; 97 refcount_t map_guard; 98 }; 99 100 #define to_sport(uport) container_of(uport, struct sbd_port, port) 101 102 static struct sbd_duart sbd_duarts[DUART_MAX_CHIP]; 103 104 105 /* 106 * Reading and writing SB1250 DUART registers. 107 * 108 * There are three register spaces: two per-channel ones and 109 * a shared one. We have to define accessors appropriately. 110 * All registers are 64-bit and all but the Baud Rate Clock 111 * registers only define 8 least significant bits. There is 112 * also a workaround to take into account. Raw accessors use 113 * the full register width, but cooked ones truncate it 114 * intentionally so that the rest of the driver does not care. 115 */ 116 static u64 __read_sbdchn(struct sbd_port *sport, int reg) 117 { 118 void __iomem *csr = sport->port.membase + reg; 119 120 return __raw_readq(csr); 121 } 122 123 static u64 __read_sbdshr(struct sbd_port *sport, int reg) 124 { 125 void __iomem *csr = sport->memctrl + reg; 126 127 return __raw_readq(csr); 128 } 129 130 static void __write_sbdchn(struct sbd_port *sport, int reg, u64 value) 131 { 132 void __iomem *csr = sport->port.membase + reg; 133 134 __raw_writeq(value, csr); 135 } 136 137 static void __write_sbdshr(struct sbd_port *sport, int reg, u64 value) 138 { 139 void __iomem *csr = sport->memctrl + reg; 140 141 __raw_writeq(value, csr); 142 } 143 144 /* 145 * In bug 1956, we get glitches that can mess up uart registers. This 146 * "read-mode-reg after any register access" is an accepted workaround. 147 */ 148 static void __war_sbd1956(struct sbd_port *sport) 149 { 150 __read_sbdchn(sport, R_DUART_MODE_REG_1); 151 __read_sbdchn(sport, R_DUART_MODE_REG_2); 152 } 153 154 static unsigned char read_sbdchn(struct sbd_port *sport, int reg) 155 { 156 unsigned char retval; 157 158 retval = __read_sbdchn(sport, reg); 159 if (IS_ENABLED(CONFIG_SB1_PASS_2_WORKAROUNDS)) 160 __war_sbd1956(sport); 161 return retval; 162 } 163 164 static unsigned char read_sbdshr(struct sbd_port *sport, int reg) 165 { 166 unsigned char retval; 167 168 retval = __read_sbdshr(sport, reg); 169 if (IS_ENABLED(CONFIG_SB1_PASS_2_WORKAROUNDS)) 170 __war_sbd1956(sport); 171 return retval; 172 } 173 174 static void write_sbdchn(struct sbd_port *sport, int reg, unsigned int value) 175 { 176 __write_sbdchn(sport, reg, value); 177 if (IS_ENABLED(CONFIG_SB1_PASS_2_WORKAROUNDS)) 178 __war_sbd1956(sport); 179 } 180 181 static void write_sbdshr(struct sbd_port *sport, int reg, unsigned int value) 182 { 183 __write_sbdshr(sport, reg, value); 184 if (IS_ENABLED(CONFIG_SB1_PASS_2_WORKAROUNDS)) 185 __war_sbd1956(sport); 186 } 187 188 189 static int sbd_receive_ready(struct sbd_port *sport) 190 { 191 return read_sbdchn(sport, R_DUART_STATUS) & M_DUART_RX_RDY; 192 } 193 194 static int sbd_receive_drain(struct sbd_port *sport) 195 { 196 int loops = 10000; 197 198 while (sbd_receive_ready(sport) && --loops) 199 read_sbdchn(sport, R_DUART_RX_HOLD); 200 return loops; 201 } 202 203 static int __maybe_unused sbd_transmit_ready(struct sbd_port *sport) 204 { 205 return read_sbdchn(sport, R_DUART_STATUS) & M_DUART_TX_RDY; 206 } 207 208 static int __maybe_unused sbd_transmit_drain(struct sbd_port *sport) 209 { 210 int loops = 10000; 211 212 while (!sbd_transmit_ready(sport) && --loops) 213 udelay(2); 214 return loops; 215 } 216 217 static int sbd_transmit_empty(struct sbd_port *sport) 218 { 219 return read_sbdchn(sport, R_DUART_STATUS) & M_DUART_TX_EMT; 220 } 221 222 static int sbd_line_drain(struct sbd_port *sport) 223 { 224 int loops = 10000; 225 226 while (!sbd_transmit_empty(sport) && --loops) 227 udelay(2); 228 return loops; 229 } 230 231 232 static unsigned int sbd_tx_empty(struct uart_port *uport) 233 { 234 struct sbd_port *sport = to_sport(uport); 235 236 return sbd_transmit_empty(sport) ? TIOCSER_TEMT : 0; 237 } 238 239 static unsigned int sbd_get_mctrl(struct uart_port *uport) 240 { 241 struct sbd_port *sport = to_sport(uport); 242 unsigned int mctrl, status; 243 244 status = read_sbdshr(sport, R_DUART_IN_PORT); 245 status >>= (uport->line) % 2; 246 mctrl = (!(status & M_DUART_IN_PIN0_VAL) ? TIOCM_CTS : 0) | 247 (!(status & M_DUART_IN_PIN4_VAL) ? TIOCM_CAR : 0) | 248 (!(status & M_DUART_RIN0_PIN) ? TIOCM_RNG : 0) | 249 (!(status & M_DUART_IN_PIN2_VAL) ? TIOCM_DSR : 0); 250 return mctrl; 251 } 252 253 static void sbd_set_mctrl(struct uart_port *uport, unsigned int mctrl) 254 { 255 struct sbd_port *sport = to_sport(uport); 256 unsigned int clr = 0, set = 0, mode2; 257 258 if (mctrl & TIOCM_DTR) 259 set |= M_DUART_SET_OPR2; 260 else 261 clr |= M_DUART_CLR_OPR2; 262 if (mctrl & TIOCM_RTS) 263 set |= M_DUART_SET_OPR0; 264 else 265 clr |= M_DUART_CLR_OPR0; 266 clr <<= (uport->line) % 2; 267 set <<= (uport->line) % 2; 268 269 mode2 = read_sbdchn(sport, R_DUART_MODE_REG_2); 270 mode2 &= ~M_DUART_CHAN_MODE; 271 if (mctrl & TIOCM_LOOP) 272 mode2 |= V_DUART_CHAN_MODE_LCL_LOOP; 273 else 274 mode2 |= V_DUART_CHAN_MODE_NORMAL; 275 276 write_sbdshr(sport, R_DUART_CLEAR_OPR, clr); 277 write_sbdshr(sport, R_DUART_SET_OPR, set); 278 write_sbdchn(sport, R_DUART_MODE_REG_2, mode2); 279 } 280 281 static void sbd_stop_tx(struct uart_port *uport) 282 { 283 struct sbd_port *sport = to_sport(uport); 284 285 write_sbdchn(sport, R_DUART_CMD, M_DUART_TX_DIS); 286 sport->tx_stopped = 1; 287 }; 288 289 static void sbd_start_tx(struct uart_port *uport) 290 { 291 struct sbd_port *sport = to_sport(uport); 292 unsigned int mask; 293 294 /* Enable tx interrupts. */ 295 mask = read_sbdshr(sport, R_DUART_IMRREG((uport->line) % 2)); 296 mask |= M_DUART_IMR_TX; 297 write_sbdshr(sport, R_DUART_IMRREG((uport->line) % 2), mask); 298 299 /* Go!, go!, go!... */ 300 write_sbdchn(sport, R_DUART_CMD, M_DUART_TX_EN); 301 sport->tx_stopped = 0; 302 }; 303 304 static void sbd_stop_rx(struct uart_port *uport) 305 { 306 struct sbd_port *sport = to_sport(uport); 307 308 write_sbdshr(sport, R_DUART_IMRREG((uport->line) % 2), 0); 309 }; 310 311 static void sbd_enable_ms(struct uart_port *uport) 312 { 313 struct sbd_port *sport = to_sport(uport); 314 315 write_sbdchn(sport, R_DUART_AUXCTL_X, 316 M_DUART_CIN_CHNG_ENA | M_DUART_CTS_CHNG_ENA); 317 } 318 319 static void sbd_break_ctl(struct uart_port *uport, int break_state) 320 { 321 struct sbd_port *sport = to_sport(uport); 322 323 if (break_state == -1) 324 write_sbdchn(sport, R_DUART_CMD, V_DUART_MISC_CMD_START_BREAK); 325 else 326 write_sbdchn(sport, R_DUART_CMD, V_DUART_MISC_CMD_STOP_BREAK); 327 } 328 329 330 static void sbd_receive_chars(struct sbd_port *sport) 331 { 332 struct uart_port *uport = &sport->port; 333 struct uart_icount *icount; 334 unsigned int status, ch, flag; 335 int count; 336 337 for (count = 16; count; count--) { 338 status = read_sbdchn(sport, R_DUART_STATUS); 339 if (!(status & M_DUART_RX_RDY)) 340 break; 341 342 ch = read_sbdchn(sport, R_DUART_RX_HOLD); 343 344 flag = TTY_NORMAL; 345 346 icount = &uport->icount; 347 icount->rx++; 348 349 if (unlikely(status & 350 (M_DUART_RCVD_BRK | M_DUART_FRM_ERR | 351 M_DUART_PARITY_ERR | M_DUART_OVRUN_ERR))) { 352 if (status & M_DUART_RCVD_BRK) { 353 icount->brk++; 354 if (uart_handle_break(uport)) 355 continue; 356 } else if (status & M_DUART_FRM_ERR) 357 icount->frame++; 358 else if (status & M_DUART_PARITY_ERR) 359 icount->parity++; 360 if (status & M_DUART_OVRUN_ERR) 361 icount->overrun++; 362 363 status &= uport->read_status_mask; 364 if (status & M_DUART_RCVD_BRK) 365 flag = TTY_BREAK; 366 else if (status & M_DUART_FRM_ERR) 367 flag = TTY_FRAME; 368 else if (status & M_DUART_PARITY_ERR) 369 flag = TTY_PARITY; 370 } 371 372 if (uart_handle_sysrq_char(uport, ch)) 373 continue; 374 375 uart_insert_char(uport, status, M_DUART_OVRUN_ERR, ch, flag); 376 } 377 378 tty_flip_buffer_push(&uport->state->port); 379 } 380 381 static void sbd_transmit_chars(struct sbd_port *sport) 382 { 383 struct uart_port *uport = &sport->port; 384 struct circ_buf *xmit = &sport->port.state->xmit; 385 unsigned int mask; 386 int stop_tx; 387 388 /* XON/XOFF chars. */ 389 if (sport->port.x_char) { 390 write_sbdchn(sport, R_DUART_TX_HOLD, sport->port.x_char); 391 sport->port.icount.tx++; 392 sport->port.x_char = 0; 393 return; 394 } 395 396 /* If nothing to do or stopped or hardware stopped. */ 397 stop_tx = (uart_circ_empty(xmit) || uart_tx_stopped(&sport->port)); 398 399 /* Send char. */ 400 if (!stop_tx) { 401 write_sbdchn(sport, R_DUART_TX_HOLD, xmit->buf[xmit->tail]); 402 xmit->tail = (xmit->tail + 1) & (UART_XMIT_SIZE - 1); 403 sport->port.icount.tx++; 404 405 if (uart_circ_chars_pending(xmit) < WAKEUP_CHARS) 406 uart_write_wakeup(&sport->port); 407 } 408 409 /* Are we are done? */ 410 if (stop_tx || uart_circ_empty(xmit)) { 411 /* Disable tx interrupts. */ 412 mask = read_sbdshr(sport, R_DUART_IMRREG((uport->line) % 2)); 413 mask &= ~M_DUART_IMR_TX; 414 write_sbdshr(sport, R_DUART_IMRREG((uport->line) % 2), mask); 415 } 416 } 417 418 static void sbd_status_handle(struct sbd_port *sport) 419 { 420 struct uart_port *uport = &sport->port; 421 unsigned int delta; 422 423 delta = read_sbdshr(sport, R_DUART_INCHREG((uport->line) % 2)); 424 delta >>= (uport->line) % 2; 425 426 if (delta & (M_DUART_IN_PIN0_VAL << S_DUART_IN_PIN_CHNG)) 427 uart_handle_cts_change(uport, !(delta & M_DUART_IN_PIN0_VAL)); 428 429 if (delta & (M_DUART_IN_PIN2_VAL << S_DUART_IN_PIN_CHNG)) 430 uport->icount.dsr++; 431 432 if (delta & ((M_DUART_IN_PIN2_VAL | M_DUART_IN_PIN0_VAL) << 433 S_DUART_IN_PIN_CHNG)) 434 wake_up_interruptible(&uport->state->port.delta_msr_wait); 435 } 436 437 static irqreturn_t sbd_interrupt(int irq, void *dev_id) 438 { 439 struct sbd_port *sport = dev_id; 440 struct uart_port *uport = &sport->port; 441 irqreturn_t status = IRQ_NONE; 442 unsigned int intstat; 443 int count; 444 445 for (count = 16; count; count--) { 446 intstat = read_sbdshr(sport, 447 R_DUART_ISRREG((uport->line) % 2)); 448 intstat &= read_sbdshr(sport, 449 R_DUART_IMRREG((uport->line) % 2)); 450 intstat &= M_DUART_ISR_ALL; 451 if (!intstat) 452 break; 453 454 if (intstat & M_DUART_ISR_RX) 455 sbd_receive_chars(sport); 456 if (intstat & M_DUART_ISR_IN) 457 sbd_status_handle(sport); 458 if (intstat & M_DUART_ISR_TX) 459 sbd_transmit_chars(sport); 460 461 status = IRQ_HANDLED; 462 } 463 464 return status; 465 } 466 467 468 static int sbd_startup(struct uart_port *uport) 469 { 470 struct sbd_port *sport = to_sport(uport); 471 unsigned int mode1; 472 int ret; 473 474 ret = request_irq(sport->port.irq, sbd_interrupt, 475 IRQF_SHARED, "sb1250-duart", sport); 476 if (ret) 477 return ret; 478 479 /* Clear the receive FIFO. */ 480 sbd_receive_drain(sport); 481 482 /* Clear the interrupt registers. */ 483 write_sbdchn(sport, R_DUART_CMD, V_DUART_MISC_CMD_RESET_BREAK_INT); 484 read_sbdshr(sport, R_DUART_INCHREG((uport->line) % 2)); 485 486 /* Set rx/tx interrupt to FIFO available. */ 487 mode1 = read_sbdchn(sport, R_DUART_MODE_REG_1); 488 mode1 &= ~(M_DUART_RX_IRQ_SEL_RXFULL | M_DUART_TX_IRQ_SEL_TXEMPT); 489 write_sbdchn(sport, R_DUART_MODE_REG_1, mode1); 490 491 /* Disable tx, enable rx. */ 492 write_sbdchn(sport, R_DUART_CMD, M_DUART_TX_DIS | M_DUART_RX_EN); 493 sport->tx_stopped = 1; 494 495 /* Enable interrupts. */ 496 write_sbdshr(sport, R_DUART_IMRREG((uport->line) % 2), 497 M_DUART_IMR_IN | M_DUART_IMR_RX); 498 499 return 0; 500 } 501 502 static void sbd_shutdown(struct uart_port *uport) 503 { 504 struct sbd_port *sport = to_sport(uport); 505 506 write_sbdchn(sport, R_DUART_CMD, M_DUART_TX_DIS | M_DUART_RX_DIS); 507 sport->tx_stopped = 1; 508 free_irq(sport->port.irq, sport); 509 } 510 511 512 static void sbd_init_port(struct sbd_port *sport) 513 { 514 struct uart_port *uport = &sport->port; 515 516 if (sport->initialised) 517 return; 518 519 /* There is no DUART reset feature, so just set some sane defaults. */ 520 write_sbdchn(sport, R_DUART_CMD, V_DUART_MISC_CMD_RESET_TX); 521 write_sbdchn(sport, R_DUART_CMD, V_DUART_MISC_CMD_RESET_RX); 522 write_sbdchn(sport, R_DUART_MODE_REG_1, V_DUART_BITS_PER_CHAR_8); 523 write_sbdchn(sport, R_DUART_MODE_REG_2, 0); 524 write_sbdchn(sport, R_DUART_FULL_CTL, 525 V_DUART_INT_TIME(0) | V_DUART_SIG_FULL(15)); 526 write_sbdchn(sport, R_DUART_OPCR_X, 0); 527 write_sbdchn(sport, R_DUART_AUXCTL_X, 0); 528 write_sbdshr(sport, R_DUART_IMRREG((uport->line) % 2), 0); 529 530 sport->initialised = 1; 531 } 532 533 static void sbd_set_termios(struct uart_port *uport, struct ktermios *termios, 534 struct ktermios *old_termios) 535 { 536 struct sbd_port *sport = to_sport(uport); 537 unsigned int mode1 = 0, mode2 = 0, aux = 0; 538 unsigned int mode1mask = 0, mode2mask = 0, auxmask = 0; 539 unsigned int oldmode1, oldmode2, oldaux; 540 unsigned int baud, brg; 541 unsigned int command; 542 543 mode1mask |= ~(M_DUART_PARITY_MODE | M_DUART_PARITY_TYPE_ODD | 544 M_DUART_BITS_PER_CHAR); 545 mode2mask |= ~M_DUART_STOP_BIT_LEN_2; 546 auxmask |= ~M_DUART_CTS_CHNG_ENA; 547 548 /* Byte size. */ 549 switch (termios->c_cflag & CSIZE) { 550 case CS5: 551 case CS6: 552 /* Unsupported, leave unchanged. */ 553 mode1mask |= M_DUART_PARITY_MODE; 554 break; 555 case CS7: 556 mode1 |= V_DUART_BITS_PER_CHAR_7; 557 break; 558 case CS8: 559 default: 560 mode1 |= V_DUART_BITS_PER_CHAR_8; 561 break; 562 } 563 564 /* Parity and stop bits. */ 565 if (termios->c_cflag & CSTOPB) 566 mode2 |= M_DUART_STOP_BIT_LEN_2; 567 else 568 mode2 |= M_DUART_STOP_BIT_LEN_1; 569 if (termios->c_cflag & PARENB) 570 mode1 |= V_DUART_PARITY_MODE_ADD; 571 else 572 mode1 |= V_DUART_PARITY_MODE_NONE; 573 if (termios->c_cflag & PARODD) 574 mode1 |= M_DUART_PARITY_TYPE_ODD; 575 else 576 mode1 |= M_DUART_PARITY_TYPE_EVEN; 577 578 baud = uart_get_baud_rate(uport, termios, old_termios, 1200, 5000000); 579 brg = V_DUART_BAUD_RATE(baud); 580 /* The actual lower bound is 1221bps, so compensate. */ 581 if (brg > M_DUART_CLK_COUNTER) 582 brg = M_DUART_CLK_COUNTER; 583 584 uart_update_timeout(uport, termios->c_cflag, baud); 585 586 uport->read_status_mask = M_DUART_OVRUN_ERR; 587 if (termios->c_iflag & INPCK) 588 uport->read_status_mask |= M_DUART_FRM_ERR | 589 M_DUART_PARITY_ERR; 590 if (termios->c_iflag & (IGNBRK | BRKINT | PARMRK)) 591 uport->read_status_mask |= M_DUART_RCVD_BRK; 592 593 uport->ignore_status_mask = 0; 594 if (termios->c_iflag & IGNPAR) 595 uport->ignore_status_mask |= M_DUART_FRM_ERR | 596 M_DUART_PARITY_ERR; 597 if (termios->c_iflag & IGNBRK) { 598 uport->ignore_status_mask |= M_DUART_RCVD_BRK; 599 if (termios->c_iflag & IGNPAR) 600 uport->ignore_status_mask |= M_DUART_OVRUN_ERR; 601 } 602 603 if (termios->c_cflag & CREAD) 604 command = M_DUART_RX_EN; 605 else 606 command = M_DUART_RX_DIS; 607 608 if (termios->c_cflag & CRTSCTS) 609 aux |= M_DUART_CTS_CHNG_ENA; 610 else 611 aux &= ~M_DUART_CTS_CHNG_ENA; 612 613 spin_lock(&uport->lock); 614 615 if (sport->tx_stopped) 616 command |= M_DUART_TX_DIS; 617 else 618 command |= M_DUART_TX_EN; 619 620 oldmode1 = read_sbdchn(sport, R_DUART_MODE_REG_1) & mode1mask; 621 oldmode2 = read_sbdchn(sport, R_DUART_MODE_REG_2) & mode2mask; 622 oldaux = read_sbdchn(sport, R_DUART_AUXCTL_X) & auxmask; 623 624 if (!sport->tx_stopped) 625 sbd_line_drain(sport); 626 write_sbdchn(sport, R_DUART_CMD, M_DUART_TX_DIS | M_DUART_RX_DIS); 627 628 write_sbdchn(sport, R_DUART_MODE_REG_1, mode1 | oldmode1); 629 write_sbdchn(sport, R_DUART_MODE_REG_2, mode2 | oldmode2); 630 write_sbdchn(sport, R_DUART_CLK_SEL, brg); 631 write_sbdchn(sport, R_DUART_AUXCTL_X, aux | oldaux); 632 633 write_sbdchn(sport, R_DUART_CMD, command); 634 635 spin_unlock(&uport->lock); 636 } 637 638 639 static const char *sbd_type(struct uart_port *uport) 640 { 641 return "SB1250 DUART"; 642 } 643 644 static void sbd_release_port(struct uart_port *uport) 645 { 646 struct sbd_port *sport = to_sport(uport); 647 struct sbd_duart *duart = sport->duart; 648 649 iounmap(sport->memctrl); 650 sport->memctrl = NULL; 651 iounmap(uport->membase); 652 uport->membase = NULL; 653 654 if(refcount_dec_and_test(&duart->map_guard)) 655 release_mem_region(duart->mapctrl, DUART_CHANREG_SPACING); 656 release_mem_region(uport->mapbase, DUART_CHANREG_SPACING); 657 } 658 659 static int sbd_map_port(struct uart_port *uport) 660 { 661 const char *err = KERN_ERR "sbd: Cannot map MMIO\n"; 662 struct sbd_port *sport = to_sport(uport); 663 struct sbd_duart *duart = sport->duart; 664 665 if (!uport->membase) 666 uport->membase = ioremap(uport->mapbase, 667 DUART_CHANREG_SPACING); 668 if (!uport->membase) { 669 printk(err); 670 return -ENOMEM; 671 } 672 673 if (!sport->memctrl) 674 sport->memctrl = ioremap(duart->mapctrl, 675 DUART_CHANREG_SPACING); 676 if (!sport->memctrl) { 677 printk(err); 678 iounmap(uport->membase); 679 uport->membase = NULL; 680 return -ENOMEM; 681 } 682 683 return 0; 684 } 685 686 static int sbd_request_port(struct uart_port *uport) 687 { 688 const char *err = KERN_ERR "sbd: Unable to reserve MMIO resource\n"; 689 struct sbd_duart *duart = to_sport(uport)->duart; 690 int ret = 0; 691 692 if (!request_mem_region(uport->mapbase, DUART_CHANREG_SPACING, 693 "sb1250-duart")) { 694 printk(err); 695 return -EBUSY; 696 } 697 refcount_inc(&duart->map_guard); 698 if (refcount_read(&duart->map_guard) == 1) { 699 if (!request_mem_region(duart->mapctrl, DUART_CHANREG_SPACING, 700 "sb1250-duart")) { 701 refcount_dec(&duart->map_guard); 702 printk(err); 703 ret = -EBUSY; 704 } 705 } 706 if (!ret) { 707 ret = sbd_map_port(uport); 708 if (ret) { 709 if (refcount_dec_and_test(&duart->map_guard)) 710 release_mem_region(duart->mapctrl, 711 DUART_CHANREG_SPACING); 712 } 713 } 714 if (ret) { 715 release_mem_region(uport->mapbase, DUART_CHANREG_SPACING); 716 return ret; 717 } 718 return 0; 719 } 720 721 static void sbd_config_port(struct uart_port *uport, int flags) 722 { 723 struct sbd_port *sport = to_sport(uport); 724 725 if (flags & UART_CONFIG_TYPE) { 726 if (sbd_request_port(uport)) 727 return; 728 729 uport->type = PORT_SB1250_DUART; 730 731 sbd_init_port(sport); 732 } 733 } 734 735 static int sbd_verify_port(struct uart_port *uport, struct serial_struct *ser) 736 { 737 int ret = 0; 738 739 if (ser->type != PORT_UNKNOWN && ser->type != PORT_SB1250_DUART) 740 ret = -EINVAL; 741 if (ser->irq != uport->irq) 742 ret = -EINVAL; 743 if (ser->baud_base != uport->uartclk / 16) 744 ret = -EINVAL; 745 return ret; 746 } 747 748 749 static const struct uart_ops sbd_ops = { 750 .tx_empty = sbd_tx_empty, 751 .set_mctrl = sbd_set_mctrl, 752 .get_mctrl = sbd_get_mctrl, 753 .stop_tx = sbd_stop_tx, 754 .start_tx = sbd_start_tx, 755 .stop_rx = sbd_stop_rx, 756 .enable_ms = sbd_enable_ms, 757 .break_ctl = sbd_break_ctl, 758 .startup = sbd_startup, 759 .shutdown = sbd_shutdown, 760 .set_termios = sbd_set_termios, 761 .type = sbd_type, 762 .release_port = sbd_release_port, 763 .request_port = sbd_request_port, 764 .config_port = sbd_config_port, 765 .verify_port = sbd_verify_port, 766 }; 767 768 /* Initialize SB1250 DUART port structures. */ 769 static void __init sbd_probe_duarts(void) 770 { 771 static int probed; 772 int chip, side; 773 int max_lines, line; 774 775 if (probed) 776 return; 777 778 /* Set the number of available units based on the SOC type. */ 779 switch (soc_type) { 780 case K_SYS_SOC_TYPE_BCM1x55: 781 case K_SYS_SOC_TYPE_BCM1x80: 782 max_lines = 4; 783 break; 784 default: 785 /* Assume at least two serial ports at the normal address. */ 786 max_lines = 2; 787 break; 788 } 789 790 probed = 1; 791 792 for (chip = 0, line = 0; chip < DUART_MAX_CHIP && line < max_lines; 793 chip++) { 794 sbd_duarts[chip].mapctrl = SBD_CTRLREGS(line); 795 796 for (side = 0; side < DUART_MAX_SIDE && line < max_lines; 797 side++, line++) { 798 struct sbd_port *sport = &sbd_duarts[chip].sport[side]; 799 struct uart_port *uport = &sport->port; 800 801 sport->duart = &sbd_duarts[chip]; 802 803 uport->irq = SBD_INT(line); 804 uport->uartclk = 100000000 / 20 * 16; 805 uport->fifosize = 16; 806 uport->iotype = UPIO_MEM; 807 uport->flags = UPF_BOOT_AUTOCONF; 808 uport->ops = &sbd_ops; 809 uport->line = line; 810 uport->mapbase = SBD_CHANREGS(line); 811 uport->has_sysrq = IS_ENABLED(CONFIG_SERIAL_SB1250_DUART_CONSOLE); 812 } 813 } 814 } 815 816 817 #ifdef CONFIG_SERIAL_SB1250_DUART_CONSOLE 818 /* 819 * Serial console stuff. Very basic, polling driver for doing serial 820 * console output. The console_lock is held by the caller, so we 821 * shouldn't be interrupted for more console activity. 822 */ 823 static void sbd_console_putchar(struct uart_port *uport, unsigned char ch) 824 { 825 struct sbd_port *sport = to_sport(uport); 826 827 sbd_transmit_drain(sport); 828 write_sbdchn(sport, R_DUART_TX_HOLD, ch); 829 } 830 831 static void sbd_console_write(struct console *co, const char *s, 832 unsigned int count) 833 { 834 int chip = co->index / DUART_MAX_SIDE; 835 int side = co->index % DUART_MAX_SIDE; 836 struct sbd_port *sport = &sbd_duarts[chip].sport[side]; 837 struct uart_port *uport = &sport->port; 838 unsigned long flags; 839 unsigned int mask; 840 841 /* Disable transmit interrupts and enable the transmitter. */ 842 spin_lock_irqsave(&uport->lock, flags); 843 mask = read_sbdshr(sport, R_DUART_IMRREG((uport->line) % 2)); 844 write_sbdshr(sport, R_DUART_IMRREG((uport->line) % 2), 845 mask & ~M_DUART_IMR_TX); 846 write_sbdchn(sport, R_DUART_CMD, M_DUART_TX_EN); 847 spin_unlock_irqrestore(&uport->lock, flags); 848 849 uart_console_write(&sport->port, s, count, sbd_console_putchar); 850 851 /* Restore transmit interrupts and the transmitter enable. */ 852 spin_lock_irqsave(&uport->lock, flags); 853 sbd_line_drain(sport); 854 if (sport->tx_stopped) 855 write_sbdchn(sport, R_DUART_CMD, M_DUART_TX_DIS); 856 write_sbdshr(sport, R_DUART_IMRREG((uport->line) % 2), mask); 857 spin_unlock_irqrestore(&uport->lock, flags); 858 } 859 860 static int __init sbd_console_setup(struct console *co, char *options) 861 { 862 int chip = co->index / DUART_MAX_SIDE; 863 int side = co->index % DUART_MAX_SIDE; 864 struct sbd_port *sport = &sbd_duarts[chip].sport[side]; 865 struct uart_port *uport = &sport->port; 866 int baud = 115200; 867 int bits = 8; 868 int parity = 'n'; 869 int flow = 'n'; 870 int ret; 871 872 if (!sport->duart) 873 return -ENXIO; 874 875 ret = sbd_map_port(uport); 876 if (ret) 877 return ret; 878 879 sbd_init_port(sport); 880 881 if (options) 882 uart_parse_options(options, &baud, &parity, &bits, &flow); 883 return uart_set_options(uport, co, baud, parity, bits, flow); 884 } 885 886 static struct uart_driver sbd_reg; 887 static struct console sbd_console = { 888 .name = "duart", 889 .write = sbd_console_write, 890 .device = uart_console_device, 891 .setup = sbd_console_setup, 892 .flags = CON_PRINTBUFFER, 893 .index = -1, 894 .data = &sbd_reg 895 }; 896 897 static int __init sbd_serial_console_init(void) 898 { 899 sbd_probe_duarts(); 900 register_console(&sbd_console); 901 902 return 0; 903 } 904 905 console_initcall(sbd_serial_console_init); 906 907 #define SERIAL_SB1250_DUART_CONSOLE &sbd_console 908 #else 909 #define SERIAL_SB1250_DUART_CONSOLE NULL 910 #endif /* CONFIG_SERIAL_SB1250_DUART_CONSOLE */ 911 912 913 static struct uart_driver sbd_reg = { 914 .owner = THIS_MODULE, 915 .driver_name = "sb1250_duart", 916 .dev_name = "duart", 917 .major = TTY_MAJOR, 918 .minor = SB1250_DUART_MINOR_BASE, 919 .nr = DUART_MAX_CHIP * DUART_MAX_SIDE, 920 .cons = SERIAL_SB1250_DUART_CONSOLE, 921 }; 922 923 /* Set up the driver and register it. */ 924 static int __init sbd_init(void) 925 { 926 int i, ret; 927 928 sbd_probe_duarts(); 929 930 ret = uart_register_driver(&sbd_reg); 931 if (ret) 932 return ret; 933 934 for (i = 0; i < DUART_MAX_CHIP * DUART_MAX_SIDE; i++) { 935 struct sbd_duart *duart = &sbd_duarts[i / DUART_MAX_SIDE]; 936 struct sbd_port *sport = &duart->sport[i % DUART_MAX_SIDE]; 937 struct uart_port *uport = &sport->port; 938 939 if (sport->duart) 940 uart_add_one_port(&sbd_reg, uport); 941 } 942 943 return 0; 944 } 945 946 /* Unload the driver. Unregister stuff, get ready to go away. */ 947 static void __exit sbd_exit(void) 948 { 949 int i; 950 951 for (i = DUART_MAX_CHIP * DUART_MAX_SIDE - 1; i >= 0; i--) { 952 struct sbd_duart *duart = &sbd_duarts[i / DUART_MAX_SIDE]; 953 struct sbd_port *sport = &duart->sport[i % DUART_MAX_SIDE]; 954 struct uart_port *uport = &sport->port; 955 956 if (sport->duart) 957 uart_remove_one_port(&sbd_reg, uport); 958 } 959 960 uart_unregister_driver(&sbd_reg); 961 } 962 963 module_init(sbd_init); 964 module_exit(sbd_exit); 965