1 /*
2  * (C) Copyright 2000
3  * Rob Taylor, Flying Pig Systems. robt@flyingpig.com.
4  *
5  * See file CREDITS for list of people who contributed to this
6  * project.
7  *
8  * This program is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU General Public License as
10  * published by the Free Software Foundation; either version 2 of
11  * the License, or (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
21  * MA 02111-1307 USA
22  */
23 
24 #include <common.h>
25 #include <linux/compiler.h>
26 
27 #include <ns16550.h>
28 #ifdef CONFIG_NS87308
29 #include <ns87308.h>
30 #endif
31 
32 #include <serial.h>
33 
34 DECLARE_GLOBAL_DATA_PTR;
35 
36 #if !defined(CONFIG_CONS_INDEX)
37 #elif (CONFIG_CONS_INDEX < 1) || (CONFIG_CONS_INDEX > 4)
38 #error	"Invalid console index value."
39 #endif
40 
41 #if CONFIG_CONS_INDEX == 1 && !defined(CONFIG_SYS_NS16550_COM1)
42 #error	"Console port 1 defined but not configured."
43 #elif CONFIG_CONS_INDEX == 2 && !defined(CONFIG_SYS_NS16550_COM2)
44 #error	"Console port 2 defined but not configured."
45 #elif CONFIG_CONS_INDEX == 3 && !defined(CONFIG_SYS_NS16550_COM3)
46 #error	"Console port 3 defined but not configured."
47 #elif CONFIG_CONS_INDEX == 4 && !defined(CONFIG_SYS_NS16550_COM4)
48 #error	"Console port 4 defined but not configured."
49 #endif
50 
51 /* Note: The port number specified in the functions is 1 based.
52  *	 the array is 0 based.
53  */
54 static NS16550_t serial_ports[4] = {
55 #ifdef CONFIG_SYS_NS16550_COM1
56 	(NS16550_t)CONFIG_SYS_NS16550_COM1,
57 #else
58 	NULL,
59 #endif
60 #ifdef CONFIG_SYS_NS16550_COM2
61 	(NS16550_t)CONFIG_SYS_NS16550_COM2,
62 #else
63 	NULL,
64 #endif
65 #ifdef CONFIG_SYS_NS16550_COM3
66 	(NS16550_t)CONFIG_SYS_NS16550_COM3,
67 #else
68 	NULL,
69 #endif
70 #ifdef CONFIG_SYS_NS16550_COM4
71 	(NS16550_t)CONFIG_SYS_NS16550_COM4
72 #else
73 	NULL
74 #endif
75 };
76 
77 #define PORT	serial_ports[port-1]
78 
79 /* Multi serial device functions */
80 #define DECLARE_ESERIAL_FUNCTIONS(port) \
81     int  eserial##port##_init (void) {\
82 	int clock_divisor; \
83 	clock_divisor = calc_divisor(serial_ports[port-1]); \
84 	NS16550_init(serial_ports[port-1], clock_divisor); \
85 	return(0);}\
86     void eserial##port##_setbrg (void) {\
87 	serial_setbrg_dev(port);}\
88     int  eserial##port##_getc (void) {\
89 	return serial_getc_dev(port);}\
90     int  eserial##port##_tstc (void) {\
91 	return serial_tstc_dev(port);}\
92     void eserial##port##_putc (const char c) {\
93 	serial_putc_dev(port, c);}\
94     void eserial##port##_puts (const char *s) {\
95 	serial_puts_dev(port, s);}
96 
97 /* Serial device descriptor */
98 #define INIT_ESERIAL_STRUCTURE(port, __name) {	\
99 	.name	= __name,			\
100 	.start	= eserial##port##_init,		\
101 	.stop	= NULL,				\
102 	.setbrg	= eserial##port##_setbrg,	\
103 	.getc	= eserial##port##_getc,		\
104 	.tstc	= eserial##port##_tstc,		\
105 	.putc	= eserial##port##_putc,		\
106 	.puts	= eserial##port##_puts,		\
107 }
108 
109 static int calc_divisor (NS16550_t port)
110 {
111 #ifdef CONFIG_OMAP1510
112 	/* If can't cleanly clock 115200 set div to 1 */
113 	if ((CONFIG_SYS_NS16550_CLK == 12000000) && (gd->baudrate == 115200)) {
114 		port->osc_12m_sel = OSC_12M_SEL;	/* enable 6.5 * divisor */
115 		return (1);				/* return 1 for base divisor */
116 	}
117 	port->osc_12m_sel = 0;			/* clear if previsouly set */
118 #endif
119 #ifdef CONFIG_OMAP1610
120 	/* If can't cleanly clock 115200 set div to 1 */
121 	if ((CONFIG_SYS_NS16550_CLK == 48000000) && (gd->baudrate == 115200)) {
122 		return (26);		/* return 26 for base divisor */
123 	}
124 #endif
125 
126 #ifdef CONFIG_APTIX
127 #define MODE_X_DIV 13
128 #else
129 #define MODE_X_DIV 16
130 #endif
131 
132 	/* Compute divisor value. Normally, we should simply return:
133 	 *   CONFIG_SYS_NS16550_CLK) / MODE_X_DIV / gd->baudrate
134 	 * but we need to round that value by adding 0.5.
135 	 * Rounding is especially important at high baud rates.
136 	 */
137 	return (CONFIG_SYS_NS16550_CLK + (gd->baudrate * (MODE_X_DIV / 2))) /
138 		(MODE_X_DIV * gd->baudrate);
139 }
140 
141 void
142 _serial_putc(const char c,const int port)
143 {
144 	if (c == '\n')
145 		NS16550_putc(PORT, '\r');
146 
147 	NS16550_putc(PORT, c);
148 }
149 
150 void
151 _serial_putc_raw(const char c,const int port)
152 {
153 	NS16550_putc(PORT, c);
154 }
155 
156 void
157 _serial_puts (const char *s,const int port)
158 {
159 	while (*s) {
160 		_serial_putc (*s++,port);
161 	}
162 }
163 
164 
165 int
166 _serial_getc(const int port)
167 {
168 	return NS16550_getc(PORT);
169 }
170 
171 int
172 _serial_tstc(const int port)
173 {
174 	return NS16550_tstc(PORT);
175 }
176 
177 void
178 _serial_setbrg (const int port)
179 {
180 	int clock_divisor;
181 
182 	clock_divisor = calc_divisor(PORT);
183 	NS16550_reinit(PORT, clock_divisor);
184 }
185 
186 static inline void
187 serial_putc_dev(unsigned int dev_index,const char c)
188 {
189 	_serial_putc(c,dev_index);
190 }
191 
192 static inline void
193 serial_putc_raw_dev(unsigned int dev_index,const char c)
194 {
195 	_serial_putc_raw(c,dev_index);
196 }
197 
198 static inline void
199 serial_puts_dev(unsigned int dev_index,const char *s)
200 {
201 	_serial_puts(s,dev_index);
202 }
203 
204 static inline int
205 serial_getc_dev(unsigned int dev_index)
206 {
207 	return _serial_getc(dev_index);
208 }
209 
210 static inline int
211 serial_tstc_dev(unsigned int dev_index)
212 {
213 	return _serial_tstc(dev_index);
214 }
215 
216 static inline void
217 serial_setbrg_dev(unsigned int dev_index)
218 {
219 	_serial_setbrg(dev_index);
220 }
221 
222 DECLARE_ESERIAL_FUNCTIONS(1);
223 struct serial_device eserial1_device =
224 	INIT_ESERIAL_STRUCTURE(1, "eserial0");
225 DECLARE_ESERIAL_FUNCTIONS(2);
226 struct serial_device eserial2_device =
227 	INIT_ESERIAL_STRUCTURE(2, "eserial1");
228 DECLARE_ESERIAL_FUNCTIONS(3);
229 struct serial_device eserial3_device =
230 	INIT_ESERIAL_STRUCTURE(3, "eserial2");
231 DECLARE_ESERIAL_FUNCTIONS(4);
232 struct serial_device eserial4_device =
233 	INIT_ESERIAL_STRUCTURE(4, "eserial3");
234 
235 __weak struct serial_device *default_serial_console(void)
236 {
237 #if CONFIG_CONS_INDEX == 1
238 	return &eserial1_device;
239 #elif CONFIG_CONS_INDEX == 2
240 	return &eserial2_device;
241 #elif CONFIG_CONS_INDEX == 3
242 	return &eserial3_device;
243 #elif CONFIG_CONS_INDEX == 4
244 	return &eserial4_device;
245 #else
246 #error "Bad CONFIG_CONS_INDEX."
247 #endif
248 }
249 
250 void ns16550_serial_initialize(void)
251 {
252 #if defined(CONFIG_SYS_NS16550_COM1)
253 	serial_register(&eserial1_device);
254 #endif
255 #if defined(CONFIG_SYS_NS16550_COM2)
256 	serial_register(&eserial2_device);
257 #endif
258 #if defined(CONFIG_SYS_NS16550_COM3)
259 	serial_register(&eserial3_device);
260 #endif
261 #if defined(CONFIG_SYS_NS16550_COM4)
262 	serial_register(&eserial4_device);
263 #endif
264 }
265