xref: /openbmc/u-boot/arch/powerpc/cpu/mpc8xxx/fdt.c (revision a2ac1b3a)
1 /*
2  * Copyright 2009-2012 Freescale Semiconductor, Inc.
3  *
4  * This file is derived from arch/powerpc/cpu/mpc85xx/cpu.c and
5  * arch/powerpc/cpu/mpc86xx/cpu.c. Basically this file contains
6  * cpu specific common code for 85xx/86xx processors.
7  * See file CREDITS for list of people who contributed to this
8  * project.
9  *
10  * This program is free software; you can redistribute it and/or
11  * modify it under the terms of the GNU General Public License as
12  * published by the Free Software Foundation; either version 2 of
13  * the License, or (at your option) any later version.
14  *
15  * This program is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18  * GNU General Public License for more details.
19  *
20  * You should have received a copy of the GNU General Public License
21  * along with this program; if not, write to the Free Software
22  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
23  * MA 02111-1307 USA
24  */
25 
26 #include <common.h>
27 #include <libfdt.h>
28 #include <fdt_support.h>
29 #include <asm/mp.h>
30 #include <asm/fsl_serdes.h>
31 #include <phy.h>
32 #include <hwconfig.h>
33 
34 #define FSL_MAX_NUM_USB_CTRLS	2
35 
36 #if defined(CONFIG_MP) && (defined(CONFIG_MPC85xx) || defined(CONFIG_MPC86xx))
37 static int ft_del_cpuhandle(void *blob, int cpuhandle)
38 {
39 	int off, ret = -FDT_ERR_NOTFOUND;
40 
41 	/* if we find a match, we'll delete at it which point the offsets are
42 	 * invalid so we start over from the beginning
43 	 */
44 	off = fdt_node_offset_by_prop_value(blob, -1, "cpu-handle",
45 						&cpuhandle, 4);
46 	while (off != -FDT_ERR_NOTFOUND) {
47 		fdt_delprop(blob, off, "cpu-handle");
48 		ret = 1;
49 		off = fdt_node_offset_by_prop_value(blob, -1, "cpu-handle",
50 				&cpuhandle, 4);
51 	}
52 
53 	return ret;
54 }
55 
56 void ft_fixup_num_cores(void *blob) {
57 	int off, num_cores, del_cores;
58 
59 	del_cores = 0;
60 	num_cores = cpu_numcores();
61 
62 	off = fdt_node_offset_by_prop_value(blob, -1, "device_type", "cpu", 4);
63 	while (off != -FDT_ERR_NOTFOUND) {
64 		u32 *reg = (u32 *)fdt_getprop(blob, off, "reg", 0);
65 		u32 phys_cpu_id = thread_to_core(*reg);
66 
67 		if (!is_core_valid(phys_cpu_id) || is_core_disabled(phys_cpu_id)) {
68 			int ph = fdt_get_phandle(blob, off);
69 
70 			/* Delete the cpu node once there are no cpu handles */
71 			if (-FDT_ERR_NOTFOUND == ft_del_cpuhandle(blob, ph)) {
72 				fdt_del_node(blob, off);
73 				del_cores++;
74 			}
75 			/* either we deleted some cpu handles or the cpu node
76 			 * so we reset the offset back to the start since we
77 			 * can't trust the offsets anymore
78 			 */
79 			off = -1;
80 		}
81 		off = fdt_node_offset_by_prop_value(blob, off,
82 				"device_type", "cpu", 4);
83 	}
84 	debug ("%x core system found\n", num_cores);
85 	debug ("deleted %d extra core entry entries from device tree\n",
86 								del_cores);
87 }
88 #endif /* defined(CONFIG_MPC85xx) || defined(CONFIG_MPC86xx) */
89 
90 #if defined(CONFIG_HAS_FSL_DR_USB) || defined(CONFIG_HAS_FSL_MPH_USB)
91 static int fdt_fixup_usb_mode_phy_type(void *blob, const char *mode,
92 				const char *phy_type, int start_offset)
93 {
94 	const char *compat_dr = "fsl-usb2-dr";
95 	const char *compat_mph = "fsl-usb2-mph";
96 	const char *prop_mode = "dr_mode";
97 	const char *prop_type = "phy_type";
98 	const char *node_type = NULL;
99 	int node_offset;
100 	int err;
101 
102 	node_offset = fdt_node_offset_by_compatible(blob,
103 			start_offset, compat_mph);
104 	if (node_offset < 0) {
105 		node_offset = fdt_node_offset_by_compatible(blob,
106 			start_offset, compat_dr);
107 		if (node_offset < 0) {
108 			printf("WARNING: could not find compatible"
109 				" node %s or %s: %s.\n", compat_mph,
110 				compat_dr, fdt_strerror(node_offset));
111 			return -1;
112 		} else
113 			node_type = compat_dr;
114 	} else
115 		node_type = compat_mph;
116 
117 	if (mode) {
118 		err = fdt_setprop(blob, node_offset, prop_mode, mode,
119 				  strlen(mode) + 1);
120 		if (err < 0)
121 			printf("WARNING: could not set %s for %s: %s.\n",
122 			       prop_mode, node_type, fdt_strerror(err));
123 	}
124 
125 	if (phy_type) {
126 		err = fdt_setprop(blob, node_offset, prop_type, phy_type,
127 				  strlen(phy_type) + 1);
128 		if (err < 0)
129 			printf("WARNING: could not set %s for %s: %s.\n",
130 			       prop_type, node_type, fdt_strerror(err));
131 	}
132 
133 	return node_offset;
134 }
135 
136 void fdt_fixup_dr_usb(void *blob, bd_t *bd)
137 {
138 	const char *modes[] = { "host", "peripheral", "otg" };
139 	const char *phys[] = { "ulpi", "utmi" };
140 	const char *mode = NULL;
141 	const char *phy_type = NULL;
142 	char usb1_defined = 0;
143 	int usb_mode_off = -1;
144 	int usb_phy_off = -1;
145 	char str[5];
146 	int i, j;
147 
148 	for (i = 1; i <= FSL_MAX_NUM_USB_CTRLS; i++) {
149 		int mode_idx = -1, phy_idx = -1;
150 		snprintf(str, 5, "%s%d", "usb", i);
151 		if (hwconfig(str)) {
152 			for (j = 0; j < ARRAY_SIZE(modes); j++) {
153 				if (hwconfig_subarg_cmp(str, "dr_mode",
154 						modes[j])) {
155 					mode_idx = j;
156 					break;
157 				}
158 			}
159 			for (j = 0; j < ARRAY_SIZE(phys); j++) {
160 				if (hwconfig_subarg_cmp(str, "phy_type",
161 						phys[j])) {
162 					phy_idx = j;
163 					break;
164 				}
165 			}
166 			if (mode_idx >= 0) {
167 				usb_mode_off = fdt_fixup_usb_mode_phy_type(blob,
168 					modes[mode_idx], NULL, usb_mode_off);
169 				if (usb_mode_off < 0)
170 					return;
171 			}
172 			if (phy_idx >= 0) {
173 				usb_phy_off = fdt_fixup_usb_mode_phy_type(blob,
174 					NULL, phys[phy_idx], usb_phy_off);
175 				if (usb_phy_off < 0)
176 					return;
177 			}
178 			if (!strcmp(str, "usb1"))
179 				usb1_defined = 1;
180 			if (mode_idx < 0 && phy_idx < 0)
181 				printf("WARNING: invalid phy or mode\n");
182 		}
183 	}
184 	if (!usb1_defined) {
185 		int usb_off = -1;
186 		mode = getenv("usb_dr_mode");
187 		phy_type = getenv("usb_phy_type");
188 		if (!mode && !phy_type)
189 			return;
190 		fdt_fixup_usb_mode_phy_type(blob, mode, phy_type, usb_off);
191 	}
192 }
193 #endif /* defined(CONFIG_HAS_FSL_DR_USB) || defined(CONFIG_HAS_FSL_MPH_USB) */
194 
195 /*
196  * update crypto node properties to a specified revision of the SEC
197  * called with sec_rev == 0 if not on an E processor
198  */
199 #if CONFIG_SYS_FSL_SEC_COMPAT == 2 /* SEC 2.x/3.x */
200 void fdt_fixup_crypto_node(void *blob, int sec_rev)
201 {
202 	const struct sec_rev_prop {
203 		u32 sec_rev;
204 		u32 num_channels;
205 		u32 channel_fifo_len;
206 		u32 exec_units_mask;
207 		u32 descriptor_types_mask;
208 	} sec_rev_prop_list [] = {
209 		{ 0x0200, 4, 24, 0x07e, 0x01010ebf }, /* SEC 2.0 */
210 		{ 0x0201, 4, 24, 0x0fe, 0x012b0ebf }, /* SEC 2.1 */
211 		{ 0x0202, 1, 24, 0x04c, 0x0122003f }, /* SEC 2.2 */
212 		{ 0x0204, 4, 24, 0x07e, 0x012b0ebf }, /* SEC 2.4 */
213 		{ 0x0300, 4, 24, 0x9fe, 0x03ab0ebf }, /* SEC 3.0 */
214 		{ 0x0301, 4, 24, 0xbfe, 0x03ab0ebf }, /* SEC 3.1 */
215 		{ 0x0303, 4, 24, 0x97c, 0x03a30abf }, /* SEC 3.3 */
216 	};
217 	char compat_strlist[ARRAY_SIZE(sec_rev_prop_list) *
218 			    sizeof("fsl,secX.Y")];
219 	int crypto_node, sec_idx, err;
220 	char *p;
221 	u32 val;
222 
223 	/* locate crypto node based on lowest common compatible */
224 	crypto_node = fdt_node_offset_by_compatible(blob, -1, "fsl,sec2.0");
225 	if (crypto_node == -FDT_ERR_NOTFOUND)
226 		return;
227 
228 	/* delete it if not on an E-processor */
229 	if (crypto_node > 0 && !sec_rev) {
230 		fdt_del_node(blob, crypto_node);
231 		return;
232 	}
233 
234 	/* else we got called for possible uprev */
235 	for (sec_idx = 0; sec_idx < ARRAY_SIZE(sec_rev_prop_list); sec_idx++)
236 		if (sec_rev_prop_list[sec_idx].sec_rev == sec_rev)
237 			break;
238 
239 	if (sec_idx == ARRAY_SIZE(sec_rev_prop_list)) {
240 		puts("warning: unknown SEC revision number\n");
241 		return;
242 	}
243 
244 	val = cpu_to_fdt32(sec_rev_prop_list[sec_idx].num_channels);
245 	err = fdt_setprop(blob, crypto_node, "fsl,num-channels", &val, 4);
246 	if (err < 0)
247 		printf("WARNING: could not set crypto property: %s\n",
248 		       fdt_strerror(err));
249 
250 	val = cpu_to_fdt32(sec_rev_prop_list[sec_idx].descriptor_types_mask);
251 	err = fdt_setprop(blob, crypto_node, "fsl,descriptor-types-mask", &val, 4);
252 	if (err < 0)
253 		printf("WARNING: could not set crypto property: %s\n",
254 		       fdt_strerror(err));
255 
256 	val = cpu_to_fdt32(sec_rev_prop_list[sec_idx].exec_units_mask);
257 	err = fdt_setprop(blob, crypto_node, "fsl,exec-units-mask", &val, 4);
258 	if (err < 0)
259 		printf("WARNING: could not set crypto property: %s\n",
260 		       fdt_strerror(err));
261 
262 	val = cpu_to_fdt32(sec_rev_prop_list[sec_idx].channel_fifo_len);
263 	err = fdt_setprop(blob, crypto_node, "fsl,channel-fifo-len", &val, 4);
264 	if (err < 0)
265 		printf("WARNING: could not set crypto property: %s\n",
266 		       fdt_strerror(err));
267 
268 	val = 0;
269 	while (sec_idx >= 0) {
270 		p = compat_strlist + val;
271 		val += sprintf(p, "fsl,sec%d.%d",
272 			(sec_rev_prop_list[sec_idx].sec_rev & 0xff00) >> 8,
273 			sec_rev_prop_list[sec_idx].sec_rev & 0x00ff) + 1;
274 		sec_idx--;
275 	}
276 	err = fdt_setprop(blob, crypto_node, "compatible", &compat_strlist, val);
277 	if (err < 0)
278 		printf("WARNING: could not set crypto property: %s\n",
279 		       fdt_strerror(err));
280 }
281 #elif CONFIG_SYS_FSL_SEC_COMPAT >= 4  /* SEC4 */
282 void fdt_fixup_crypto_node(void *blob, int sec_rev)
283 {
284 	if (!sec_rev)
285 		fdt_del_node_and_alias(blob, "crypto");
286 }
287 #endif
288 
289 int fdt_fixup_phy_connection(void *blob, int offset, phy_interface_t phyc)
290 {
291 	return fdt_setprop_string(blob, offset, "phy-connection-type",
292 					 phy_string_for_interface(phyc));
293 }
294 
295 #ifdef CONFIG_SYS_SRIO
296 static inline void ft_disable_srio_port(void *blob, int srio_off, int port)
297 {
298 	int off = fdt_node_offset_by_prop_value(blob, srio_off,
299 			"cell-index", &port, 4);
300 	if (off >= 0) {
301 		off = fdt_setprop_string(blob, off, "status", "disabled");
302 		if (off > 0)
303 			printf("WARNING unable to set status for fsl,srio "
304 				"port %d: %s\n", port, fdt_strerror(off));
305 	}
306 }
307 
308 static inline void ft_disable_rman(void *blob)
309 {
310 	int off = fdt_node_offset_by_compatible(blob, -1, "fsl,rman");
311 	if (off >= 0) {
312 		off = fdt_setprop_string(blob, off, "status", "disabled");
313 		if (off > 0)
314 			printf("WARNING unable to set status for fsl,rman %s\n",
315 				fdt_strerror(off));
316 	}
317 }
318 
319 static inline void ft_disable_rmu(void *blob)
320 {
321 	int off = fdt_node_offset_by_compatible(blob, -1, "fsl,srio-rmu");
322 	if (off >= 0) {
323 		off = fdt_setprop_string(blob, off, "status", "disabled");
324 		if (off > 0)
325 			printf("WARNING unable to set status for "
326 				"fsl,srio-rmu %s\n", fdt_strerror(off));
327 	}
328 }
329 
330 void ft_srio_setup(void *blob)
331 {
332 	int srio1_used = 0, srio2_used = 0;
333 	int srio_off;
334 
335 	/* search for srio node, if doesn't exist just return - nothing todo */
336 	srio_off = fdt_node_offset_by_compatible(blob, -1, "fsl,srio");
337 	if (srio_off < 0)
338 		return ;
339 
340 #ifdef CONFIG_SRIO1
341 	if (is_serdes_configured(SRIO1))
342 		srio1_used = 1;
343 #endif
344 #ifdef CONFIG_SRIO2
345 	if (is_serdes_configured(SRIO2))
346 		srio2_used = 1;
347 #endif
348 
349 	/* mark port1 disabled */
350 	if (!srio1_used)
351 		ft_disable_srio_port(blob, srio_off, 1);
352 
353 	/* mark port2 disabled */
354 	if (!srio2_used)
355 		ft_disable_srio_port(blob, srio_off, 2);
356 
357 	/* if both ports not used, disable controller, rmu and rman */
358 	if (!srio1_used && !srio2_used) {
359 		fdt_setprop_string(blob, srio_off, "status", "disabled");
360 
361 		ft_disable_rman(blob);
362 		ft_disable_rmu(blob);
363 	}
364 }
365 #endif
366