1 /* 2 * (C) Copyright 2000 3 * Rob Taylor, Flying Pig Systems. robt@flyingpig.com. 4 * 5 * (C) Copyright 2004 6 * ARM Ltd. 7 * Philippe Robin, <philippe.robin@arm.com> 8 * 9 * See file CREDITS for list of people who contributed to this 10 * project. 11 * 12 * This program is free software; you can redistribute it and/or 13 * modify it under the terms of the GNU General Public License as 14 * published by the Free Software Foundation; either version 2 of 15 * the License, or (at your option) any later version. 16 * 17 * This program is distributed in the hope that it will be useful, 18 * but WITHOUT ANY WARRANTY; without even the implied warranty of 19 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 20 * GNU General Public License for more details. 21 * 22 * You should have received a copy of the GNU General Public License 23 * along with this program; if not, write to the Free Software 24 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, 25 * MA 02111-1307 USA 26 */ 27 28 /* Simple U-Boot driver for the PrimeCell PL010/PL011 UARTs */ 29 30 #include <common.h> 31 #include <watchdog.h> 32 #include <asm/io.h> 33 #include <serial.h> 34 #include <linux/compiler.h> 35 #include "serial_pl01x.h" 36 37 /* 38 * Integrator AP has two UARTs, we use the first one, at 38400-8-N-1 39 * Integrator CP has two UARTs, use the first one, at 38400-8-N-1 40 * Versatile PB has four UARTs. 41 */ 42 #define CONSOLE_PORT CONFIG_CONS_INDEX 43 static volatile unsigned char *const port[] = CONFIG_PL01x_PORTS; 44 #define NUM_PORTS (sizeof(port)/sizeof(port[0])) 45 46 static void pl01x_putc (int portnum, char c); 47 static int pl01x_getc (int portnum); 48 static int pl01x_tstc (int portnum); 49 unsigned int baudrate = CONFIG_BAUDRATE; 50 DECLARE_GLOBAL_DATA_PTR; 51 52 static struct pl01x_regs *pl01x_get_regs(int portnum) 53 { 54 return (struct pl01x_regs *) port[portnum]; 55 } 56 57 #ifdef CONFIG_PL010_SERIAL 58 59 static int pl01x_serial_init(void) 60 { 61 struct pl01x_regs *regs = pl01x_get_regs(CONSOLE_PORT); 62 unsigned int divisor; 63 64 /* First, disable everything */ 65 writel(0, ®s->pl010_cr); 66 67 /* Set baud rate */ 68 switch (baudrate) { 69 case 9600: 70 divisor = UART_PL010_BAUD_9600; 71 break; 72 73 case 19200: 74 divisor = UART_PL010_BAUD_9600; 75 break; 76 77 case 38400: 78 divisor = UART_PL010_BAUD_38400; 79 break; 80 81 case 57600: 82 divisor = UART_PL010_BAUD_57600; 83 break; 84 85 case 115200: 86 divisor = UART_PL010_BAUD_115200; 87 break; 88 89 default: 90 divisor = UART_PL010_BAUD_38400; 91 } 92 93 writel((divisor & 0xf00) >> 8, ®s->pl010_lcrm); 94 writel(divisor & 0xff, ®s->pl010_lcrl); 95 96 /* Set the UART to be 8 bits, 1 stop bit, no parity, fifo enabled */ 97 writel(UART_PL010_LCRH_WLEN_8 | UART_PL010_LCRH_FEN, ®s->pl010_lcrh); 98 99 /* Finally, enable the UART */ 100 writel(UART_PL010_CR_UARTEN, ®s->pl010_cr); 101 102 return 0; 103 } 104 105 #endif /* CONFIG_PL010_SERIAL */ 106 107 #ifdef CONFIG_PL011_SERIAL 108 109 static int pl01x_serial_init(void) 110 { 111 struct pl01x_regs *regs = pl01x_get_regs(CONSOLE_PORT); 112 unsigned int temp; 113 unsigned int divider; 114 unsigned int remainder; 115 unsigned int fraction; 116 unsigned int lcr; 117 118 #ifdef CONFIG_PL011_SERIAL_FLUSH_ON_INIT 119 /* Empty RX fifo if necessary */ 120 if (readl(®s->pl011_cr) & UART_PL011_CR_UARTEN) { 121 while (!(readl(®s->fr) & UART_PL01x_FR_RXFE)) 122 readl(®s->dr); 123 } 124 #endif 125 126 /* First, disable everything */ 127 writel(0, ®s->pl011_cr); 128 129 /* 130 * Set baud rate 131 * 132 * IBRD = UART_CLK / (16 * BAUD_RATE) 133 * FBRD = RND((64 * MOD(UART_CLK,(16 * BAUD_RATE))) / (16 * BAUD_RATE)) 134 */ 135 temp = 16 * baudrate; 136 divider = CONFIG_PL011_CLOCK / temp; 137 remainder = CONFIG_PL011_CLOCK % temp; 138 temp = (8 * remainder) / baudrate; 139 fraction = (temp >> 1) + (temp & 1); 140 141 writel(divider, ®s->pl011_ibrd); 142 writel(fraction, ®s->pl011_fbrd); 143 144 /* Set the UART to be 8 bits, 1 stop bit, no parity, fifo enabled */ 145 lcr = UART_PL011_LCRH_WLEN_8 | UART_PL011_LCRH_FEN; 146 writel(lcr, ®s->pl011_lcrh); 147 148 #ifdef CONFIG_PL011_SERIAL_RLCR 149 { 150 int i; 151 152 /* 153 * Program receive line control register after waiting 154 * 10 bus cycles. Delay be writing to readonly register 155 * 10 times 156 */ 157 for (i = 0; i < 10; i++) 158 writel(lcr, ®s->fr); 159 160 writel(lcr, ®s->pl011_rlcr); 161 /* lcrh needs to be set again for change to be effective */ 162 writel(lcr, ®s->pl011_lcrh); 163 } 164 #endif 165 /* Finally, enable the UART */ 166 writel(UART_PL011_CR_UARTEN | UART_PL011_CR_TXE | UART_PL011_CR_RXE, 167 ®s->pl011_cr); 168 169 return 0; 170 } 171 172 #endif /* CONFIG_PL011_SERIAL */ 173 174 static void pl01x_serial_putc(const char c) 175 { 176 if (c == '\n') 177 pl01x_putc (CONSOLE_PORT, '\r'); 178 179 pl01x_putc (CONSOLE_PORT, c); 180 } 181 182 static void pl01x_serial_puts(const char *s) 183 { 184 while (*s) { 185 serial_putc (*s++); 186 } 187 } 188 189 static int pl01x_serial_getc(void) 190 { 191 return pl01x_getc (CONSOLE_PORT); 192 } 193 194 static int pl01x_serial_tstc(void) 195 { 196 return pl01x_tstc (CONSOLE_PORT); 197 } 198 199 static void pl01x_serial_setbrg(void) 200 { 201 struct pl01x_regs *regs = pl01x_get_regs(CONSOLE_PORT); 202 203 baudrate = gd->baudrate; 204 /* 205 * Flush FIFO and wait for non-busy before changing baudrate to avoid 206 * crap in console 207 */ 208 while (!(readl(®s->fr) & UART_PL01x_FR_TXFE)) 209 WATCHDOG_RESET(); 210 while (readl(®s->fr) & UART_PL01x_FR_BUSY) 211 WATCHDOG_RESET(); 212 serial_init(); 213 } 214 215 static void pl01x_putc (int portnum, char c) 216 { 217 struct pl01x_regs *regs = pl01x_get_regs(portnum); 218 219 /* Wait until there is space in the FIFO */ 220 while (readl(®s->fr) & UART_PL01x_FR_TXFF) 221 WATCHDOG_RESET(); 222 223 /* Send the character */ 224 writel(c, ®s->dr); 225 } 226 227 static int pl01x_getc (int portnum) 228 { 229 struct pl01x_regs *regs = pl01x_get_regs(portnum); 230 unsigned int data; 231 232 /* Wait until there is data in the FIFO */ 233 while (readl(®s->fr) & UART_PL01x_FR_RXFE) 234 WATCHDOG_RESET(); 235 236 data = readl(®s->dr); 237 238 /* Check for an error flag */ 239 if (data & 0xFFFFFF00) { 240 /* Clear the error */ 241 writel(0xFFFFFFFF, ®s->ecr); 242 return -1; 243 } 244 245 return (int) data; 246 } 247 248 static int pl01x_tstc (int portnum) 249 { 250 struct pl01x_regs *regs = pl01x_get_regs(portnum); 251 252 WATCHDOG_RESET(); 253 return !(readl(®s->fr) & UART_PL01x_FR_RXFE); 254 } 255 256 static struct serial_device pl01x_serial_drv = { 257 .name = "pl01x_serial", 258 .start = pl01x_serial_init, 259 .stop = NULL, 260 .setbrg = pl01x_serial_setbrg, 261 .putc = pl01x_serial_putc, 262 .puts = pl01x_serial_puts, 263 .getc = pl01x_serial_getc, 264 .tstc = pl01x_serial_tstc, 265 }; 266 267 void pl01x_serial_initialize(void) 268 { 269 serial_register(&pl01x_serial_drv); 270 } 271 272 __weak struct serial_device *default_serial_console(void) 273 { 274 return &pl01x_serial_drv; 275 } 276