1 /* 2 * COM1 NS16550 support 3 * originally from linux source (arch/powerpc/boot/ns16550.c) 4 * modified to use CONFIG_SYS_ISA_MEM and new defines 5 */ 6 7 #include <common.h> 8 #include <dm.h> 9 #include <errno.h> 10 #include <fdtdec.h> 11 #include <mapmem.h> 12 #include <ns16550.h> 13 #include <serial.h> 14 #include <watchdog.h> 15 #include <linux/types.h> 16 #include <asm/io.h> 17 18 DECLARE_GLOBAL_DATA_PTR; 19 20 #define UART_LCRVAL UART_LCR_8N1 /* 8 data, 1 stop, no parity */ 21 #define UART_MCRVAL (UART_MCR_DTR | \ 22 UART_MCR_RTS) /* RTS/DTR */ 23 #define UART_FCRVAL (UART_FCR_FIFO_EN | \ 24 UART_FCR_RXSR | \ 25 UART_FCR_TXSR) /* Clear & enable FIFOs */ 26 27 #ifndef CONFIG_DM_SERIAL 28 #ifdef CONFIG_SYS_NS16550_PORT_MAPPED 29 #define serial_out(x, y) outb(x, (ulong)y) 30 #define serial_in(y) inb((ulong)y) 31 #elif defined(CONFIG_SYS_NS16550_MEM32) && (CONFIG_SYS_NS16550_REG_SIZE > 0) 32 #define serial_out(x, y) out_be32(y, x) 33 #define serial_in(y) in_be32(y) 34 #elif defined(CONFIG_SYS_NS16550_MEM32) && (CONFIG_SYS_NS16550_REG_SIZE < 0) 35 #define serial_out(x, y) out_le32(y, x) 36 #define serial_in(y) in_le32(y) 37 #else 38 #define serial_out(x, y) writeb(x, y) 39 #define serial_in(y) readb(y) 40 #endif 41 #endif /* !CONFIG_DM_SERIAL */ 42 43 #if defined(CONFIG_SOC_KEYSTONE) 44 #define UART_REG_VAL_PWREMU_MGMT_UART_DISABLE 0 45 #define UART_REG_VAL_PWREMU_MGMT_UART_ENABLE ((1 << 14) | (1 << 13) | (1 << 0)) 46 #undef UART_MCRVAL 47 #ifdef CONFIG_SERIAL_HW_FLOW_CONTROL 48 #define UART_MCRVAL (UART_MCR_RTS | UART_MCR_AFE) 49 #else 50 #define UART_MCRVAL (UART_MCR_RTS) 51 #endif 52 #endif 53 54 #ifndef CONFIG_SYS_NS16550_IER 55 #define CONFIG_SYS_NS16550_IER 0x00 56 #endif /* CONFIG_SYS_NS16550_IER */ 57 58 #ifdef CONFIG_DM_SERIAL 59 60 static inline void serial_out_shift(void *addr, int shift, int value) 61 { 62 #ifdef CONFIG_SYS_NS16550_PORT_MAPPED 63 outb(value, (ulong)addr); 64 #elif defined(CONFIG_SYS_NS16550_MEM32) && !defined(CONFIG_SYS_BIG_ENDIAN) 65 out_le32(addr, value); 66 #elif defined(CONFIG_SYS_NS16550_MEM32) && defined(CONFIG_SYS_BIG_ENDIAN) 67 out_be32(addr, value); 68 #elif defined(CONFIG_SYS_BIG_ENDIAN) 69 writeb(value, addr + (1 << shift) - 1); 70 #else 71 writeb(value, addr); 72 #endif 73 } 74 75 static inline int serial_in_shift(void *addr, int shift) 76 { 77 #ifdef CONFIG_SYS_NS16550_PORT_MAPPED 78 return inb((ulong)addr); 79 #elif defined(CONFIG_SYS_NS16550_MEM32) && !defined(CONFIG_SYS_BIG_ENDIAN) 80 return in_le32(addr); 81 #elif defined(CONFIG_SYS_NS16550_MEM32) && defined(CONFIG_SYS_BIG_ENDIAN) 82 return in_be32(addr); 83 #elif defined(CONFIG_SYS_BIG_ENDIAN) 84 return readb(addr + (1 << shift) - 1); 85 #else 86 return readb(addr); 87 #endif 88 } 89 90 static void ns16550_writeb(NS16550_t port, int offset, int value) 91 { 92 struct ns16550_platdata *plat = port->plat; 93 unsigned char *addr; 94 95 offset *= 1 << plat->reg_shift; 96 addr = map_sysmem(plat->base, 0) + offset; 97 /* 98 * As far as we know it doesn't make sense to support selection of 99 * these options at run-time, so use the existing CONFIG options. 100 */ 101 serial_out_shift(addr, plat->reg_shift, value); 102 } 103 104 static int ns16550_readb(NS16550_t port, int offset) 105 { 106 struct ns16550_platdata *plat = port->plat; 107 unsigned char *addr; 108 109 offset *= 1 << plat->reg_shift; 110 addr = map_sysmem(plat->base, 0) + offset; 111 112 return serial_in_shift(addr, plat->reg_shift); 113 } 114 115 /* We can clean these up once everything is moved to driver model */ 116 #define serial_out(value, addr) \ 117 ns16550_writeb(com_port, \ 118 (unsigned char *)addr - (unsigned char *)com_port, value) 119 #define serial_in(addr) \ 120 ns16550_readb(com_port, \ 121 (unsigned char *)addr - (unsigned char *)com_port) 122 #endif 123 124 static inline int calc_divisor(NS16550_t port, int clock, int baudrate) 125 { 126 const unsigned int mode_x_div = 16; 127 128 return DIV_ROUND_CLOSEST(clock, mode_x_div * baudrate); 129 } 130 131 int ns16550_calc_divisor(NS16550_t port, int clock, int baudrate) 132 { 133 #ifdef CONFIG_OMAP1510 134 /* If can't cleanly clock 115200 set div to 1 */ 135 if ((clock == 12000000) && (baudrate == 115200)) { 136 port->osc_12m_sel = OSC_12M_SEL; /* enable 6.5 * divisor */ 137 return 1; /* return 1 for base divisor */ 138 } 139 port->osc_12m_sel = 0; /* clear if previsouly set */ 140 #endif 141 142 return calc_divisor(port, clock, baudrate); 143 } 144 145 static void NS16550_setbrg(NS16550_t com_port, int baud_divisor) 146 { 147 serial_out(UART_LCR_BKSE | UART_LCRVAL, &com_port->lcr); 148 serial_out(baud_divisor & 0xff, &com_port->dll); 149 serial_out((baud_divisor >> 8) & 0xff, &com_port->dlm); 150 serial_out(UART_LCRVAL, &com_port->lcr); 151 } 152 153 void NS16550_init(NS16550_t com_port, int baud_divisor) 154 { 155 #if (defined(CONFIG_SPL_BUILD) && \ 156 (defined(CONFIG_OMAP34XX) || defined(CONFIG_OMAP44XX))) 157 /* 158 * On some OMAP3/OMAP4 devices when UART3 is configured for boot mode 159 * before SPL starts only THRE bit is set. We have to empty the 160 * transmitter before initialization starts. 161 */ 162 if ((serial_in(&com_port->lsr) & (UART_LSR_TEMT | UART_LSR_THRE)) 163 == UART_LSR_THRE) { 164 if (baud_divisor != -1) 165 NS16550_setbrg(com_port, baud_divisor); 166 serial_out(0, &com_port->mdr1); 167 } 168 #endif 169 170 while (!(serial_in(&com_port->lsr) & UART_LSR_TEMT)) 171 ; 172 173 serial_out(CONFIG_SYS_NS16550_IER, &com_port->ier); 174 #if defined(CONFIG_OMAP) || defined(CONFIG_AM33XX) || \ 175 defined(CONFIG_TI81XX) || defined(CONFIG_AM43XX) 176 serial_out(0x7, &com_port->mdr1); /* mode select reset TL16C750*/ 177 #endif 178 serial_out(UART_MCRVAL, &com_port->mcr); 179 serial_out(UART_FCRVAL, &com_port->fcr); 180 if (baud_divisor != -1) 181 NS16550_setbrg(com_port, baud_divisor); 182 #if defined(CONFIG_OMAP) || \ 183 defined(CONFIG_AM33XX) || defined(CONFIG_SOC_DA8XX) || \ 184 defined(CONFIG_TI81XX) || defined(CONFIG_AM43XX) 185 186 /* /16 is proper to hit 115200 with 48MHz */ 187 serial_out(0, &com_port->mdr1); 188 #endif /* CONFIG_OMAP */ 189 #if defined(CONFIG_SOC_KEYSTONE) 190 serial_out(UART_REG_VAL_PWREMU_MGMT_UART_ENABLE, &com_port->regC); 191 #endif 192 } 193 194 #ifndef CONFIG_NS16550_MIN_FUNCTIONS 195 void NS16550_reinit(NS16550_t com_port, int baud_divisor) 196 { 197 serial_out(CONFIG_SYS_NS16550_IER, &com_port->ier); 198 NS16550_setbrg(com_port, 0); 199 serial_out(UART_MCRVAL, &com_port->mcr); 200 serial_out(UART_FCRVAL, &com_port->fcr); 201 NS16550_setbrg(com_port, baud_divisor); 202 } 203 #endif /* CONFIG_NS16550_MIN_FUNCTIONS */ 204 205 void NS16550_putc(NS16550_t com_port, char c) 206 { 207 while ((serial_in(&com_port->lsr) & UART_LSR_THRE) == 0) 208 ; 209 serial_out(c, &com_port->thr); 210 211 /* 212 * Call watchdog_reset() upon newline. This is done here in putc 213 * since the environment code uses a single puts() to print the complete 214 * environment upon "printenv". So we can't put this watchdog call 215 * in puts(). 216 */ 217 if (c == '\n') 218 WATCHDOG_RESET(); 219 } 220 221 #ifndef CONFIG_NS16550_MIN_FUNCTIONS 222 char NS16550_getc(NS16550_t com_port) 223 { 224 while ((serial_in(&com_port->lsr) & UART_LSR_DR) == 0) { 225 #if !defined(CONFIG_SPL_BUILD) && defined(CONFIG_USB_TTY) 226 extern void usbtty_poll(void); 227 usbtty_poll(); 228 #endif 229 WATCHDOG_RESET(); 230 } 231 return serial_in(&com_port->rbr); 232 } 233 234 int NS16550_tstc(NS16550_t com_port) 235 { 236 return (serial_in(&com_port->lsr) & UART_LSR_DR) != 0; 237 } 238 239 #endif /* CONFIG_NS16550_MIN_FUNCTIONS */ 240 241 #ifdef CONFIG_DEBUG_UART_NS16550 242 243 #include <debug_uart.h> 244 245 void debug_uart_init(void) 246 { 247 struct NS16550 *com_port = (struct NS16550 *)CONFIG_DEBUG_UART_BASE; 248 int baud_divisor; 249 250 /* 251 * We copy the code from above because it is already horribly messy. 252 * Trying to refactor to nicely remove the duplication doesn't seem 253 * feasible. The better fix is to move all users of this driver to 254 * driver model. 255 */ 256 baud_divisor = calc_divisor(com_port, CONFIG_DEBUG_UART_CLOCK, 257 CONFIG_BAUDRATE); 258 baud_divisor = 13; 259 serial_out_shift(&com_port->ier, CONFIG_DEBUG_UART_SHIFT, 260 CONFIG_SYS_NS16550_IER); 261 serial_out_shift(&com_port->mcr, CONFIG_DEBUG_UART_SHIFT, UART_MCRVAL); 262 serial_out_shift(&com_port->fcr, CONFIG_DEBUG_UART_SHIFT, UART_FCRVAL); 263 264 serial_out_shift(&com_port->lcr, CONFIG_DEBUG_UART_SHIFT, 265 UART_LCR_BKSE | UART_LCRVAL); 266 serial_out_shift(&com_port->dll, CONFIG_DEBUG_UART_SHIFT, 267 baud_divisor & 0xff); 268 serial_out_shift(&com_port->dlm, CONFIG_DEBUG_UART_SHIFT, 269 (baud_divisor >> 8) & 0xff); 270 serial_out_shift(&com_port->lcr, CONFIG_DEBUG_UART_SHIFT, 271 UART_LCRVAL); 272 } 273 274 static inline void _debug_uart_putc(int ch) 275 { 276 struct NS16550 *com_port = (struct NS16550 *)CONFIG_DEBUG_UART_BASE; 277 278 while (!(serial_in_shift(&com_port->lsr, 0) & UART_LSR_THRE)) 279 ; 280 serial_out_shift(&com_port->thr, CONFIG_DEBUG_UART_SHIFT, ch); 281 } 282 283 DEBUG_UART_FUNCS 284 285 #endif 286 287 #ifdef CONFIG_DM_SERIAL 288 static int ns16550_serial_putc(struct udevice *dev, const char ch) 289 { 290 struct NS16550 *const com_port = dev_get_priv(dev); 291 292 if (!(serial_in(&com_port->lsr) & UART_LSR_THRE)) 293 return -EAGAIN; 294 serial_out(ch, &com_port->thr); 295 296 /* 297 * Call watchdog_reset() upon newline. This is done here in putc 298 * since the environment code uses a single puts() to print the complete 299 * environment upon "printenv". So we can't put this watchdog call 300 * in puts(). 301 */ 302 if (ch == '\n') 303 WATCHDOG_RESET(); 304 305 return 0; 306 } 307 308 static int ns16550_serial_pending(struct udevice *dev, bool input) 309 { 310 struct NS16550 *const com_port = dev_get_priv(dev); 311 312 if (input) 313 return serial_in(&com_port->lsr) & UART_LSR_DR ? 1 : 0; 314 else 315 return serial_in(&com_port->lsr) & UART_LSR_THRE ? 0 : 1; 316 } 317 318 static int ns16550_serial_getc(struct udevice *dev) 319 { 320 struct NS16550 *const com_port = dev_get_priv(dev); 321 322 if (!(serial_in(&com_port->lsr) & UART_LSR_DR)) 323 return -EAGAIN; 324 325 return serial_in(&com_port->rbr); 326 } 327 328 static int ns16550_serial_setbrg(struct udevice *dev, int baudrate) 329 { 330 struct NS16550 *const com_port = dev_get_priv(dev); 331 struct ns16550_platdata *plat = com_port->plat; 332 int clock_divisor; 333 334 clock_divisor = ns16550_calc_divisor(com_port, plat->clock, baudrate); 335 336 NS16550_setbrg(com_port, clock_divisor); 337 338 return 0; 339 } 340 341 int ns16550_serial_probe(struct udevice *dev) 342 { 343 struct NS16550 *const com_port = dev_get_priv(dev); 344 345 com_port->plat = dev_get_platdata(dev); 346 NS16550_init(com_port, -1); 347 348 return 0; 349 } 350 351 #ifdef CONFIG_OF_CONTROL 352 int ns16550_serial_ofdata_to_platdata(struct udevice *dev) 353 { 354 struct ns16550_platdata *plat = dev->platdata; 355 fdt_addr_t addr; 356 357 /* try Processor Local Bus device first */ 358 addr = fdtdec_get_addr(gd->fdt_blob, dev->of_offset, "reg"); 359 #ifdef CONFIG_PCI 360 if (addr == FDT_ADDR_T_NONE) { 361 /* then try pci device */ 362 struct fdt_pci_addr pci_addr; 363 u32 bar; 364 int ret; 365 366 /* we prefer to use a memory-mapped register */ 367 ret = fdtdec_get_pci_addr(gd->fdt_blob, dev->of_offset, 368 FDT_PCI_SPACE_MEM32, "reg", 369 &pci_addr); 370 if (ret) { 371 /* try if there is any i/o-mapped register */ 372 ret = fdtdec_get_pci_addr(gd->fdt_blob, 373 dev->of_offset, 374 FDT_PCI_SPACE_IO, 375 "reg", &pci_addr); 376 if (ret) 377 return ret; 378 } 379 380 ret = fdtdec_get_pci_bar32(gd->fdt_blob, dev->of_offset, 381 &pci_addr, &bar); 382 if (ret) 383 return ret; 384 385 addr = bar; 386 } 387 #endif 388 389 if (addr == FDT_ADDR_T_NONE) 390 return -EINVAL; 391 392 plat->base = addr; 393 plat->reg_shift = fdtdec_get_int(gd->fdt_blob, dev->of_offset, 394 "reg-shift", 1); 395 396 return 0; 397 } 398 #endif 399 400 const struct dm_serial_ops ns16550_serial_ops = { 401 .putc = ns16550_serial_putc, 402 .pending = ns16550_serial_pending, 403 .getc = ns16550_serial_getc, 404 .setbrg = ns16550_serial_setbrg, 405 }; 406 #endif /* CONFIG_DM_SERIAL */ 407