xref: /openbmc/u-boot/drivers/serial/serial_pxa.c (revision 33b1d3f4) 
1 /*
2  * (C) Copyright 2002
3  * Wolfgang Denk, DENX Software Engineering, <wd@denx.de>
4  *
5  * (C) Copyright 2002
6  * Sysgo Real-Time Solutions, GmbH <www.elinos.com>
7  * Marius Groeger <mgroeger@sysgo.de>
8  *
9  * (C) Copyright 2002
10  * Sysgo Real-Time Solutions, GmbH <www.elinos.com>
11  * Alex Zuepke <azu@sysgo.de>
12  *
13  * Copyright (C) 1999 2000 2001 Erik Mouw (J.A.K.Mouw@its.tudelft.nl)
14  *
15  * This program is free software; you can redistribute it and/or modify
16  * it under the terms of the GNU General Public License as published by
17  * the Free Software Foundation; either version 2 of the License, or
18  * (at your option) any later version.
19  *
20  * This program is distributed in the hope that it will be useful,
21  * but WITHOUT ANY WARRANTY; without even the implied warranty of
22  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
23  * GNU General Public License for more details.
24  *
25  * You should have received a copy of the GNU General Public License
26  * along with this program; if not, write to the Free Software
27  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
28  *
29  */
30 
31 #include <common.h>
32 #include <watchdog.h>
33 #include <serial.h>
34 #include <asm/arch/pxa-regs.h>
35 
36 DECLARE_GLOBAL_DATA_PTR;
37 
38 #define FFUART_INDEX	0
39 #define BTUART_INDEX	1
40 #define STUART_INDEX	2
41 
42 #ifndef CONFIG_SERIAL_MULTI
43 #if defined (CONFIG_FFUART)
44 #define UART_INDEX	FFUART_INDEX
45 #elif defined (CONFIG_BTUART)
46 #define UART_INDEX	BTUART_INDEX
47 #elif defined (CONFIG_STUART)
48 #define UART_INDEX	STUART_INDEX
49 #else
50 #error "Bad: you didn't configure serial ..."
51 #endif
52 #endif
53 
54 void pxa_setbrg_dev (unsigned int uart_index)
55 {
56 	unsigned int quot = 0;
57 
58 	if (gd->baudrate == 1200)
59 		quot = 768;
60 	else if (gd->baudrate == 9600)
61 		quot = 96;
62 	else if (gd->baudrate == 19200)
63 		quot = 48;
64 	else if (gd->baudrate == 38400)
65 		quot = 24;
66 	else if (gd->baudrate == 57600)
67 		quot = 16;
68 	else if (gd->baudrate == 115200)
69 		quot = 8;
70 	else
71 		hang ();
72 
73 	switch (uart_index) {
74 		case FFUART_INDEX:
75 #ifdef CONFIG_CPU_MONAHANS
76 			CKENA |= CKENA_22_FFUART;
77 #else
78 			CKEN |= CKEN6_FFUART;
79 #endif /* CONFIG_CPU_MONAHANS */
80 
81 			FFIER = 0;	/* Disable for now */
82 			FFFCR = 0;	/* No fifos enabled */
83 
84 			/* set baud rate */
85 			FFLCR = LCR_WLS0 | LCR_WLS1 | LCR_DLAB;
86 			FFDLL = quot & 0xff;
87 			FFDLH = quot >> 8;
88 			FFLCR = LCR_WLS0 | LCR_WLS1;
89 
90 			FFIER = IER_UUE;	/* Enable FFUART */
91 		break;
92 
93 		case BTUART_INDEX:
94 #ifdef CONFIG_CPU_MONAHANS
95 			CKENA |= CKENA_21_BTUART;
96 #else
97 			CKEN |= CKEN7_BTUART;
98 #endif /*  CONFIG_CPU_MONAHANS */
99 
100 			BTIER = 0;
101 			BTFCR = 0;
102 
103 			/* set baud rate */
104 			BTLCR = LCR_DLAB;
105 			BTDLL = quot & 0xff;
106 			BTDLH = quot >> 8;
107 			BTLCR = LCR_WLS0 | LCR_WLS1;
108 
109 			BTIER = IER_UUE;	/* Enable BFUART */
110 
111 		break;
112 
113 		case STUART_INDEX:
114 #ifdef CONFIG_CPU_MONAHANS
115 			CKENA |= CKENA_23_STUART;
116 #else
117 			CKEN |= CKEN5_STUART;
118 #endif /* CONFIG_CPU_MONAHANS */
119 
120 			STIER = 0;
121 			STFCR = 0;
122 
123 			/* set baud rate */
124 			STLCR = LCR_DLAB;
125 			STDLL = quot & 0xff;
126 			STDLH = quot >> 8;
127 			STLCR = LCR_WLS0 | LCR_WLS1;
128 
129 			STIER = IER_UUE;			/* Enable STUART */
130 			break;
131 
132 		default:
133 			hang();
134 	}
135 }
136 
137 
138 /*
139  * Initialise the serial port with the given baudrate. The settings
140  * are always 8 data bits, no parity, 1 stop bit, no start bits.
141  *
142  */
143 int pxa_init_dev (unsigned int uart_index)
144 {
145 	pxa_setbrg_dev (uart_index);
146 
147 	return (0);
148 }
149 
150 
151 /*
152  * Output a single byte to the serial port.
153  */
154 void pxa_putc_dev (unsigned int uart_index,const char c)
155 {
156 	switch (uart_index) {
157 		case FFUART_INDEX:
158 		/* wait for room in the tx FIFO on FFUART */
159 			while ((FFLSR & LSR_TEMT) == 0)
160 				WATCHDOG_RESET ();	/* Reset HW Watchdog, if needed */
161 			FFTHR = c;
162 			break;
163 
164 		case BTUART_INDEX:
165 			while ((BTLSR & LSR_TEMT ) == 0 )
166 				WATCHDOG_RESET ();	/* Reset HW Watchdog, if needed */
167 			BTTHR = c;
168 			break;
169 
170 		case STUART_INDEX:
171 			while ((STLSR & LSR_TEMT ) == 0 )
172 				WATCHDOG_RESET ();	/* Reset HW Watchdog, if needed */
173 			STTHR = c;
174 			break;
175 	}
176 
177 	/* If \n, also do \r */
178 	if (c == '\n')
179 		pxa_putc_dev (uart_index,'\r');
180 }
181 
182 /*
183  * Read a single byte from the serial port. Returns 1 on success, 0
184  * otherwise. When the function is succesfull, the character read is
185  * written into its argument c.
186  */
187 int pxa_tstc_dev (unsigned int uart_index)
188 {
189 	switch (uart_index) {
190 		case FFUART_INDEX:
191 			return FFLSR & LSR_DR;
192 		case BTUART_INDEX:
193 			return BTLSR & LSR_DR;
194 		case STUART_INDEX:
195 			return STLSR & LSR_DR;
196 	}
197 	return -1;
198 }
199 
200 /*
201  * Read a single byte from the serial port. Returns 1 on success, 0
202  * otherwise. When the function is succesfull, the character read is
203  * written into its argument c.
204  */
205 int pxa_getc_dev (unsigned int uart_index)
206 {
207 	switch (uart_index) {
208 		case FFUART_INDEX:
209 			while (!(FFLSR & LSR_DR))
210 			WATCHDOG_RESET ();	/* Reset HW Watchdog, if needed */
211 			return (char) FFRBR & 0xff;
212 
213 		case BTUART_INDEX:
214 			while (!(BTLSR & LSR_DR))
215 			WATCHDOG_RESET ();	/* Reset HW Watchdog, if needed */
216 			return (char) BTRBR & 0xff;
217 		case STUART_INDEX:
218 			while (!(STLSR & LSR_DR))
219 			WATCHDOG_RESET ();	/* Reset HW Watchdog, if needed */
220 			return (char) STRBR & 0xff;
221 	}
222 	return -1;
223 }
224 
225 void
226 pxa_puts_dev (unsigned int uart_index,const char *s)
227 {
228 	while (*s) {
229 		pxa_putc_dev (uart_index,*s++);
230 	}
231 }
232 
233 #if defined (CONFIG_FFUART)
234 static int ffuart_init(void)
235 {
236 	return pxa_init_dev(FFUART_INDEX);
237 }
238 
239 static void ffuart_setbrg(void)
240 {
241 	return pxa_setbrg_dev(FFUART_INDEX);
242 }
243 
244 static void ffuart_putc(const char c)
245 {
246 	return pxa_putc_dev(FFUART_INDEX,c);
247 }
248 
249 static void ffuart_puts(const char *s)
250 {
251 	return pxa_puts_dev(FFUART_INDEX,s);
252 }
253 
254 static int ffuart_getc(void)
255 {
256 	return pxa_getc_dev(FFUART_INDEX);
257 }
258 
259 static int ffuart_tstc(void)
260 {
261 	return pxa_tstc_dev(FFUART_INDEX);
262 }
263 
264 struct serial_device serial_ffuart_device =
265 {
266 	"serial_ffuart",
267 	"PXA",
268 	ffuart_init,
269 	ffuart_setbrg,
270 	ffuart_getc,
271 	ffuart_tstc,
272 	ffuart_putc,
273 	ffuart_puts,
274 };
275 #endif
276 
277 #if defined (CONFIG_BTUART)
278 static int btuart_init(void)
279 {
280 	return pxa_init_dev(BTUART_INDEX);
281 }
282 
283 static void btuart_setbrg(void)
284 {
285 	return pxa_setbrg_dev(BTUART_INDEX);
286 }
287 
288 static void btuart_putc(const char c)
289 {
290 	return pxa_putc_dev(BTUART_INDEX,c);
291 }
292 
293 static void btuart_puts(const char *s)
294 {
295 	return pxa_puts_dev(BTUART_INDEX,s);
296 }
297 
298 static int btuart_getc(void)
299 {
300 	return pxa_getc_dev(BTUART_INDEX);
301 }
302 
303 static int btuart_tstc(void)
304 {
305 	return pxa_tstc_dev(BTUART_INDEX);
306 }
307 
308 struct serial_device serial_btuart_device =
309 {
310 	"serial_btuart",
311 	"PXA",
312 	btuart_init,
313 	btuart_setbrg,
314 	btuart_getc,
315 	btuart_tstc,
316 	btuart_putc,
317 	btuart_puts,
318 };
319 #endif
320 
321 #if defined (CONFIG_STUART)
322 static int stuart_init(void)
323 {
324 	return pxa_init_dev(STUART_INDEX);
325 }
326 
327 static void stuart_setbrg(void)
328 {
329 	return pxa_setbrg_dev(STUART_INDEX);
330 }
331 
332 static void stuart_putc(const char c)
333 {
334 	return pxa_putc_dev(STUART_INDEX,c);
335 }
336 
337 static void stuart_puts(const char *s)
338 {
339 	return pxa_puts_dev(STUART_INDEX,s);
340 }
341 
342 static int stuart_getc(void)
343 {
344 	return pxa_getc_dev(STUART_INDEX);
345 }
346 
347 static int stuart_tstc(void)
348 {
349 	return pxa_tstc_dev(STUART_INDEX);
350 }
351 
352 struct serial_device serial_stuart_device =
353 {
354 	"serial_stuart",
355 	"PXA",
356 	stuart_init,
357 	stuart_setbrg,
358 	stuart_getc,
359 	stuart_tstc,
360 	stuart_putc,
361 	stuart_puts,
362 };
363 #endif
364 
365 
366 #ifndef CONFIG_SERIAL_MULTI
367 inline int serial_init(void) {
368 	return (pxa_init_dev(UART_INDEX));
369 }
370 void serial_setbrg(void) {
371 	pxa_setbrg_dev(UART_INDEX);
372 }
373 int serial_getc(void) {
374 	return(pxa_getc_dev(UART_INDEX));
375 }
376 int serial_tstc(void) {
377 	return(pxa_tstc_dev(UART_INDEX));
378 }
379 void serial_putc(const char c) {
380 	pxa_putc_dev(UART_INDEX,c);
381 }
382 void serial_puts(const char *s) {
383 	pxa_puts_dev(UART_INDEX,s);
384 }
385 #endif	/* CONFIG_SERIAL_MULTI */
386