]>
Commit | Line | Data |
---|---|---|
781e09ee GVB |
1 | /* |
2 | * (C) Copyright 2007 | |
3 | * Gerald Van Baren, Custom IDEAS, vanbaren@cideas.com | |
4 | * Based on code written by: | |
5 | * Pantelis Antoniou <pantelis.antoniou@gmail.com> and | |
6 | * Matthew McClintock <msm@freescale.com> | |
7 | * | |
8 | * See file CREDITS for list of people who contributed to this | |
9 | * project. | |
10 | * | |
11 | * This program is free software; you can redistribute it and/or | |
12 | * modify it under the terms of the GNU General Public License as | |
13 | * published by the Free Software Foundation; either version 2 of | |
14 | * the License, or (at your option) any later version. | |
15 | * | |
16 | * This program is distributed in the hope that it will be useful, | |
17 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
18 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
19 | * GNU General Public License for more details. | |
20 | * | |
21 | * You should have received a copy of the GNU General Public License | |
22 | * along with this program; if not, write to the Free Software | |
23 | * Foundation, Inc., 59 Temple Place, Suite 330, Boston, | |
24 | * MA 02111-1307 USA | |
25 | */ | |
26 | ||
27 | #include <common.h> | |
28 | #include <command.h> | |
29 | #include <linux/ctype.h> | |
30 | #include <linux/types.h> | |
781e09ee | 31 | #include <asm/global_data.h> |
781e09ee | 32 | #include <libfdt.h> |
64dbbd40 | 33 | #include <fdt_support.h> |
a92fd657 | 34 | #include <asm/io.h> |
781e09ee GVB |
35 | |
36 | #define MAX_LEVEL 32 /* how deeply nested we will go */ | |
fd61e55d | 37 | #define SCRATCHPAD 1024 /* bytes of scratchpad memory */ |
f0a29d43 JH |
38 | #ifndef CONFIG_CMD_FDT_MAX_DUMP |
39 | #define CONFIG_CMD_FDT_MAX_DUMP 64 | |
40 | #endif | |
781e09ee GVB |
41 | |
42 | /* | |
43 | * Global data (for the gd->bd) | |
44 | */ | |
45 | DECLARE_GLOBAL_DATA_PTR; | |
46 | ||
d14da913 | 47 | static int fdt_valid(struct fdt_header **blobp); |
54841ab5 | 48 | static int fdt_parse_prop(char *const*newval, int count, char *data, int *len); |
dbaf07ce | 49 | static int fdt_print(const char *pathp, char *prop, int depth); |
bc80295b | 50 | static int is_printable_string(const void *data, int len); |
781e09ee | 51 | |
ae9e97fa GVB |
52 | /* |
53 | * The working_fdt points to our working flattened device tree. | |
54 | */ | |
55 | struct fdt_header *working_fdt; | |
56 | ||
54f9c866 KG |
57 | void set_working_fdt_addr(void *addr) |
58 | { | |
a92fd657 SG |
59 | void *buf; |
60 | ||
61 | buf = map_sysmem((ulong)addr, 0); | |
62 | working_fdt = buf; | |
bfc59966 | 63 | setenv_addr("fdtaddr", addr); |
54f9c866 KG |
64 | } |
65 | ||
bc80295b JH |
66 | /* |
67 | * Get a value from the fdt and format it to be set in the environment | |
68 | */ | |
69 | static int fdt_value_setenv(const void *nodep, int len, const char *var) | |
70 | { | |
71 | if (is_printable_string(nodep, len)) | |
72 | setenv(var, (void *)nodep); | |
73 | else if (len == 4) { | |
74 | char buf[11]; | |
75 | ||
76 | sprintf(buf, "0x%08X", *(uint32_t *)nodep); | |
77 | setenv(var, buf); | |
78 | } else if (len%4 == 0 && len <= 20) { | |
79 | /* Needed to print things like sha1 hashes. */ | |
80 | char buf[41]; | |
81 | int i; | |
82 | ||
83 | for (i = 0; i < len; i += sizeof(unsigned int)) | |
84 | sprintf(buf + (i * 2), "%08x", | |
85 | *(unsigned int *)(nodep + i)); | |
86 | setenv(var, buf); | |
87 | } else { | |
88 | printf("error: unprintable value\n"); | |
89 | return 1; | |
90 | } | |
91 | return 0; | |
92 | } | |
93 | ||
781e09ee GVB |
94 | /* |
95 | * Flattened Device Tree command, see the help for parameter definitions. | |
96 | */ | |
088f1b19 | 97 | static int do_fdt(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]) |
781e09ee | 98 | { |
47e26b1b | 99 | if (argc < 2) |
4c12eeb8 | 100 | return CMD_RET_USAGE; |
781e09ee | 101 | |
47e26b1b | 102 | /* |
781e09ee | 103 | * Set the address of the fdt |
47e26b1b | 104 | */ |
25114033 | 105 | if (argv[1][0] == 'a') { |
54f9c866 | 106 | unsigned long addr; |
4b578655 SG |
107 | int control = 0; |
108 | struct fdt_header *blob; | |
781e09ee GVB |
109 | /* |
110 | * Set the address [and length] of the fdt. | |
111 | */ | |
4b578655 SG |
112 | argc -= 2; |
113 | argv += 2; | |
114 | /* Temporary #ifdef - some archs don't have fdt_blob yet */ | |
115 | #ifdef CONFIG_OF_CONTROL | |
116 | if (argc && !strcmp(*argv, "-c")) { | |
117 | control = 1; | |
118 | argc--; | |
119 | argv++; | |
120 | } | |
121 | #endif | |
122 | if (argc == 0) { | |
123 | if (control) | |
124 | blob = (struct fdt_header *)gd->fdt_blob; | |
125 | else | |
126 | blob = working_fdt; | |
127 | if (!blob || !fdt_valid(&blob)) | |
7dbc38ad | 128 | return 1; |
4b578655 SG |
129 | printf("The address of the fdt is %#08lx\n", |
130 | control ? (ulong)blob : | |
131 | getenv_hex("fdtaddr", 0)); | |
7dbc38ad KG |
132 | return 0; |
133 | } | |
134 | ||
4b578655 | 135 | addr = simple_strtoul(argv[0], NULL, 16); |
a92fd657 | 136 | blob = map_sysmem(addr, 0); |
4b578655 | 137 | if (!fdt_valid(&blob)) |
781e09ee | 138 | return 1; |
4b578655 SG |
139 | if (control) |
140 | gd->fdt_blob = blob; | |
141 | else | |
a92fd657 | 142 | set_working_fdt_addr(blob); |
781e09ee | 143 | |
4b578655 | 144 | if (argc >= 2) { |
781e09ee GVB |
145 | int len; |
146 | int err; | |
147 | /* | |
148 | * Optional new length | |
149 | */ | |
4b578655 SG |
150 | len = simple_strtoul(argv[1], NULL, 16); |
151 | if (len < fdt_totalsize(blob)) { | |
addd8ce8 GVB |
152 | printf ("New length %d < existing length %d, " |
153 | "ignoring.\n", | |
4b578655 | 154 | len, fdt_totalsize(blob)); |
781e09ee GVB |
155 | } else { |
156 | /* | |
157 | * Open in place with a new length. | |
158 | */ | |
4b578655 | 159 | err = fdt_open_into(blob, blob, len); |
781e09ee | 160 | if (err != 0) { |
addd8ce8 GVB |
161 | printf ("libfdt fdt_open_into(): %s\n", |
162 | fdt_strerror(err)); | |
781e09ee GVB |
163 | } |
164 | } | |
165 | } | |
166 | ||
e02c9458 MV |
167 | return CMD_RET_SUCCESS; |
168 | } | |
169 | ||
170 | if (!working_fdt) { | |
171 | puts( | |
172 | "No FDT memory address configured. Please configure\n" | |
173 | "the FDT address via \"fdt addr <address>\" command.\n" | |
174 | "Aborting!\n"); | |
175 | return CMD_RET_FAILURE; | |
176 | } | |
177 | ||
47e26b1b | 178 | /* |
e489b9c0 | 179 | * Move the working_fdt |
47e26b1b | 180 | */ |
e02c9458 | 181 | if (strncmp(argv[1], "mo", 2) == 0) { |
781e09ee GVB |
182 | struct fdt_header *newaddr; |
183 | int len; | |
184 | int err; | |
185 | ||
47e26b1b | 186 | if (argc < 4) |
4c12eeb8 | 187 | return CMD_RET_USAGE; |
781e09ee GVB |
188 | |
189 | /* | |
190 | * Set the address and length of the fdt. | |
191 | */ | |
e489b9c0 | 192 | working_fdt = (struct fdt_header *)simple_strtoul(argv[2], NULL, 16); |
d14da913 | 193 | if (!fdt_valid(&working_fdt)) |
781e09ee | 194 | return 1; |
781e09ee | 195 | |
addd8ce8 | 196 | newaddr = (struct fdt_header *)simple_strtoul(argv[3],NULL,16); |
6be07cc1 GVB |
197 | |
198 | /* | |
199 | * If the user specifies a length, use that. Otherwise use the | |
200 | * current length. | |
201 | */ | |
202 | if (argc <= 4) { | |
e489b9c0 | 203 | len = fdt_totalsize(working_fdt); |
6be07cc1 GVB |
204 | } else { |
205 | len = simple_strtoul(argv[4], NULL, 16); | |
e489b9c0 | 206 | if (len < fdt_totalsize(working_fdt)) { |
addd8ce8 GVB |
207 | printf ("New length 0x%X < existing length " |
208 | "0x%X, aborting.\n", | |
e489b9c0 | 209 | len, fdt_totalsize(working_fdt)); |
6be07cc1 GVB |
210 | return 1; |
211 | } | |
781e09ee GVB |
212 | } |
213 | ||
214 | /* | |
215 | * Copy to the new location. | |
216 | */ | |
e489b9c0 | 217 | err = fdt_open_into(working_fdt, newaddr, len); |
781e09ee | 218 | if (err != 0) { |
addd8ce8 GVB |
219 | printf ("libfdt fdt_open_into(): %s\n", |
220 | fdt_strerror(err)); | |
781e09ee GVB |
221 | return 1; |
222 | } | |
e489b9c0 | 223 | working_fdt = newaddr; |
781e09ee | 224 | |
47e26b1b | 225 | /* |
25114033 | 226 | * Make a new node |
47e26b1b | 227 | */ |
2fb698bf | 228 | } else if (strncmp(argv[1], "mk", 2) == 0) { |
25114033 GVB |
229 | char *pathp; /* path */ |
230 | char *nodep; /* new node to add */ | |
231 | int nodeoffset; /* node offset from libfdt */ | |
232 | int err; | |
233 | ||
234 | /* | |
235 | * Parameters: Node path, new node to be appended to the path. | |
236 | */ | |
47e26b1b | 237 | if (argc < 4) |
4c12eeb8 | 238 | return CMD_RET_USAGE; |
25114033 GVB |
239 | |
240 | pathp = argv[2]; | |
241 | nodep = argv[3]; | |
242 | ||
e489b9c0 | 243 | nodeoffset = fdt_path_offset (working_fdt, pathp); |
25114033 GVB |
244 | if (nodeoffset < 0) { |
245 | /* | |
246 | * Not found or something else bad happened. | |
247 | */ | |
8d04f02f | 248 | printf ("libfdt fdt_path_offset() returned %s\n", |
06e19a07 | 249 | fdt_strerror(nodeoffset)); |
25114033 GVB |
250 | return 1; |
251 | } | |
e489b9c0 | 252 | err = fdt_add_subnode(working_fdt, nodeoffset, nodep); |
25114033 | 253 | if (err < 0) { |
addd8ce8 GVB |
254 | printf ("libfdt fdt_add_subnode(): %s\n", |
255 | fdt_strerror(err)); | |
25114033 GVB |
256 | return 1; |
257 | } | |
258 | ||
47e26b1b | 259 | /* |
e489b9c0 | 260 | * Set the value of a property in the working_fdt. |
47e26b1b | 261 | */ |
25114033 | 262 | } else if (argv[1][0] == 's') { |
781e09ee | 263 | char *pathp; /* path */ |
addd8ce8 | 264 | char *prop; /* property */ |
781e09ee | 265 | int nodeoffset; /* node offset from libfdt */ |
addd8ce8 GVB |
266 | static char data[SCRATCHPAD]; /* storage for the property */ |
267 | int len; /* new length of the property */ | |
268 | int ret; /* return value */ | |
781e09ee GVB |
269 | |
270 | /* | |
ea6d8be1 | 271 | * Parameters: Node path, property, optional value. |
781e09ee | 272 | */ |
47e26b1b | 273 | if (argc < 4) |
4c12eeb8 | 274 | return CMD_RET_USAGE; |
781e09ee GVB |
275 | |
276 | pathp = argv[2]; | |
277 | prop = argv[3]; | |
ea6d8be1 GVB |
278 | if (argc == 4) { |
279 | len = 0; | |
280 | } else { | |
4abd844d | 281 | ret = fdt_parse_prop(&argv[4], argc - 4, data, &len); |
ea6d8be1 GVB |
282 | if (ret != 0) |
283 | return ret; | |
284 | } | |
781e09ee | 285 | |
e489b9c0 | 286 | nodeoffset = fdt_path_offset (working_fdt, pathp); |
25114033 | 287 | if (nodeoffset < 0) { |
781e09ee | 288 | /* |
25114033 | 289 | * Not found or something else bad happened. |
781e09ee | 290 | */ |
8d04f02f | 291 | printf ("libfdt fdt_path_offset() returned %s\n", |
06e19a07 | 292 | fdt_strerror(nodeoffset)); |
781e09ee | 293 | return 1; |
25114033 | 294 | } |
25114033 | 295 | |
e489b9c0 | 296 | ret = fdt_setprop(working_fdt, nodeoffset, prop, data, len); |
25114033 GVB |
297 | if (ret < 0) { |
298 | printf ("libfdt fdt_setprop(): %s\n", fdt_strerror(ret)); | |
299 | return 1; | |
781e09ee GVB |
300 | } |
301 | ||
bc80295b JH |
302 | /******************************************************************** |
303 | * Get the value of a property in the working_fdt. | |
304 | ********************************************************************/ | |
305 | } else if (argv[1][0] == 'g') { | |
306 | char *subcmd; /* sub-command */ | |
307 | char *pathp; /* path */ | |
308 | char *prop; /* property */ | |
309 | char *var; /* variable to store result */ | |
310 | int nodeoffset; /* node offset from libfdt */ | |
311 | const void *nodep; /* property node pointer */ | |
312 | int len = 0; /* new length of the property */ | |
313 | ||
314 | /* | |
315 | * Parameters: Node path, property, optional value. | |
316 | */ | |
317 | if (argc < 5) | |
318 | return CMD_RET_USAGE; | |
319 | ||
320 | subcmd = argv[2]; | |
321 | ||
322 | if (argc < 6 && subcmd[0] != 's') | |
323 | return CMD_RET_USAGE; | |
324 | ||
325 | var = argv[3]; | |
326 | pathp = argv[4]; | |
327 | prop = argv[5]; | |
328 | ||
329 | nodeoffset = fdt_path_offset(working_fdt, pathp); | |
330 | if (nodeoffset < 0) { | |
331 | /* | |
332 | * Not found or something else bad happened. | |
333 | */ | |
334 | printf("libfdt fdt_path_offset() returned %s\n", | |
335 | fdt_strerror(nodeoffset)); | |
336 | return 1; | |
337 | } | |
338 | ||
339 | if (subcmd[0] == 'n' || (subcmd[0] == 's' && argc == 5)) { | |
340 | int reqIndex = -1; | |
341 | int startDepth = fdt_node_depth( | |
342 | working_fdt, nodeoffset); | |
343 | int curDepth = startDepth; | |
344 | int curIndex = -1; | |
345 | int nextNodeOffset = fdt_next_node( | |
346 | working_fdt, nodeoffset, &curDepth); | |
347 | ||
348 | if (subcmd[0] == 'n') | |
349 | reqIndex = simple_strtoul(argv[5], NULL, 16); | |
350 | ||
351 | while (curDepth > startDepth) { | |
352 | if (curDepth == startDepth + 1) | |
353 | curIndex++; | |
354 | if (subcmd[0] == 'n' && curIndex == reqIndex) { | |
355 | const char *nodeName = fdt_get_name( | |
356 | working_fdt, nextNodeOffset, NULL); | |
357 | ||
358 | setenv(var, (char *)nodeName); | |
359 | return 0; | |
360 | } | |
361 | nextNodeOffset = fdt_next_node( | |
362 | working_fdt, nextNodeOffset, &curDepth); | |
363 | if (nextNodeOffset < 0) | |
364 | break; | |
365 | } | |
366 | if (subcmd[0] == 's') { | |
367 | /* get the num nodes at this level */ | |
bfc59966 | 368 | setenv_ulong(var, curIndex + 1); |
bc80295b JH |
369 | } else { |
370 | /* node index not found */ | |
371 | printf("libfdt node not found\n"); | |
372 | return 1; | |
373 | } | |
374 | } else { | |
375 | nodep = fdt_getprop( | |
376 | working_fdt, nodeoffset, prop, &len); | |
377 | if (len == 0) { | |
378 | /* no property value */ | |
379 | setenv(var, ""); | |
380 | return 0; | |
381 | } else if (len > 0) { | |
382 | if (subcmd[0] == 'v') { | |
383 | int ret; | |
384 | ||
385 | ret = fdt_value_setenv(nodep, len, var); | |
386 | if (ret != 0) | |
387 | return ret; | |
388 | } else if (subcmd[0] == 'a') { | |
389 | /* Get address */ | |
390 | char buf[11]; | |
391 | ||
085b9c3a | 392 | sprintf(buf, "0x%p", nodep); |
bc80295b JH |
393 | setenv(var, buf); |
394 | } else if (subcmd[0] == 's') { | |
395 | /* Get size */ | |
396 | char buf[11]; | |
397 | ||
398 | sprintf(buf, "0x%08X", len); | |
399 | setenv(var, buf); | |
400 | } else | |
401 | return CMD_RET_USAGE; | |
402 | return 0; | |
403 | } else { | |
404 | printf("libfdt fdt_getprop(): %s\n", | |
405 | fdt_strerror(len)); | |
406 | return 1; | |
407 | } | |
408 | } | |
409 | ||
47e26b1b | 410 | /* |
781e09ee | 411 | * Print (recursive) / List (single level) |
47e26b1b | 412 | */ |
25114033 | 413 | } else if ((argv[1][0] == 'p') || (argv[1][0] == 'l')) { |
781e09ee GVB |
414 | int depth = MAX_LEVEL; /* how deep to print */ |
415 | char *pathp; /* path */ | |
addd8ce8 GVB |
416 | char *prop; /* property */ |
417 | int ret; /* return value */ | |
f738b4a7 | 418 | static char root[2] = "/"; |
781e09ee GVB |
419 | |
420 | /* | |
421 | * list is an alias for print, but limited to 1 level | |
422 | */ | |
25114033 | 423 | if (argv[1][0] == 'l') { |
781e09ee GVB |
424 | depth = 1; |
425 | } | |
426 | ||
427 | /* | |
428 | * Get the starting path. The root node is an oddball, | |
429 | * the offset is zero and has no name. | |
430 | */ | |
f738b4a7 KG |
431 | if (argc == 2) |
432 | pathp = root; | |
433 | else | |
434 | pathp = argv[2]; | |
781e09ee GVB |
435 | if (argc > 3) |
436 | prop = argv[3]; | |
437 | else | |
438 | prop = NULL; | |
439 | ||
addd8ce8 GVB |
440 | ret = fdt_print(pathp, prop, depth); |
441 | if (ret != 0) | |
442 | return ret; | |
781e09ee | 443 | |
47e26b1b | 444 | /* |
781e09ee | 445 | * Remove a property/node |
47e26b1b | 446 | */ |
2fb698bf | 447 | } else if (strncmp(argv[1], "rm", 2) == 0) { |
781e09ee GVB |
448 | int nodeoffset; /* node offset from libfdt */ |
449 | int err; | |
450 | ||
451 | /* | |
452 | * Get the path. The root node is an oddball, the offset | |
453 | * is zero and has no name. | |
454 | */ | |
e489b9c0 | 455 | nodeoffset = fdt_path_offset (working_fdt, argv[2]); |
25114033 GVB |
456 | if (nodeoffset < 0) { |
457 | /* | |
458 | * Not found or something else bad happened. | |
459 | */ | |
8d04f02f | 460 | printf ("libfdt fdt_path_offset() returned %s\n", |
06e19a07 | 461 | fdt_strerror(nodeoffset)); |
25114033 | 462 | return 1; |
781e09ee GVB |
463 | } |
464 | /* | |
465 | * Do the delete. A fourth parameter means delete a property, | |
466 | * otherwise delete the node. | |
467 | */ | |
468 | if (argc > 3) { | |
e489b9c0 | 469 | err = fdt_delprop(working_fdt, nodeoffset, argv[3]); |
781e09ee | 470 | if (err < 0) { |
addd8ce8 GVB |
471 | printf("libfdt fdt_delprop(): %s\n", |
472 | fdt_strerror(err)); | |
781e09ee GVB |
473 | return err; |
474 | } | |
475 | } else { | |
e489b9c0 | 476 | err = fdt_del_node(working_fdt, nodeoffset); |
781e09ee | 477 | if (err < 0) { |
addd8ce8 GVB |
478 | printf("libfdt fdt_del_node(): %s\n", |
479 | fdt_strerror(err)); | |
781e09ee GVB |
480 | return err; |
481 | } | |
482 | } | |
804887e6 | 483 | |
47e26b1b | 484 | /* |
804887e6 | 485 | * Display header info |
47e26b1b | 486 | */ |
804887e6 | 487 | } else if (argv[1][0] == 'h') { |
e489b9c0 KP |
488 | u32 version = fdt_version(working_fdt); |
489 | printf("magic:\t\t\t0x%x\n", fdt_magic(working_fdt)); | |
490 | printf("totalsize:\t\t0x%x (%d)\n", fdt_totalsize(working_fdt), | |
491 | fdt_totalsize(working_fdt)); | |
492 | printf("off_dt_struct:\t\t0x%x\n", | |
493 | fdt_off_dt_struct(working_fdt)); | |
494 | printf("off_dt_strings:\t\t0x%x\n", | |
495 | fdt_off_dt_strings(working_fdt)); | |
496 | printf("off_mem_rsvmap:\t\t0x%x\n", | |
497 | fdt_off_mem_rsvmap(working_fdt)); | |
804887e6 | 498 | printf("version:\t\t%d\n", version); |
e489b9c0 KP |
499 | printf("last_comp_version:\t%d\n", |
500 | fdt_last_comp_version(working_fdt)); | |
804887e6 KG |
501 | if (version >= 2) |
502 | printf("boot_cpuid_phys:\t0x%x\n", | |
e489b9c0 | 503 | fdt_boot_cpuid_phys(working_fdt)); |
804887e6 KG |
504 | if (version >= 3) |
505 | printf("size_dt_strings:\t0x%x\n", | |
e489b9c0 | 506 | fdt_size_dt_strings(working_fdt)); |
804887e6 KG |
507 | if (version >= 17) |
508 | printf("size_dt_struct:\t\t0x%x\n", | |
e489b9c0 KP |
509 | fdt_size_dt_struct(working_fdt)); |
510 | printf("number mem_rsv:\t\t0x%x\n", | |
511 | fdt_num_mem_rsv(working_fdt)); | |
804887e6 KG |
512 | printf("\n"); |
513 | ||
47e26b1b | 514 | /* |
804887e6 | 515 | * Set boot cpu id |
47e26b1b | 516 | */ |
2fb698bf | 517 | } else if (strncmp(argv[1], "boo", 3) == 0) { |
804887e6 | 518 | unsigned long tmp = simple_strtoul(argv[2], NULL, 16); |
e489b9c0 | 519 | fdt_set_boot_cpuid_phys(working_fdt, tmp); |
804887e6 | 520 | |
47e26b1b | 521 | /* |
804887e6 | 522 | * memory command |
47e26b1b | 523 | */ |
2fb698bf | 524 | } else if (strncmp(argv[1], "me", 2) == 0) { |
804887e6 KG |
525 | uint64_t addr, size; |
526 | int err; | |
4b142feb HS |
527 | addr = simple_strtoull(argv[2], NULL, 16); |
528 | size = simple_strtoull(argv[3], NULL, 16); | |
e489b9c0 | 529 | err = fdt_fixup_memory(working_fdt, addr, size); |
804887e6 KG |
530 | if (err < 0) |
531 | return err; | |
532 | ||
47e26b1b | 533 | /* |
804887e6 | 534 | * mem reserve commands |
47e26b1b | 535 | */ |
2fb698bf | 536 | } else if (strncmp(argv[1], "rs", 2) == 0) { |
804887e6 KG |
537 | if (argv[2][0] == 'p') { |
538 | uint64_t addr, size; | |
e489b9c0 | 539 | int total = fdt_num_mem_rsv(working_fdt); |
804887e6 KG |
540 | int j, err; |
541 | printf("index\t\t start\t\t size\n"); | |
542 | printf("-------------------------------" | |
543 | "-----------------\n"); | |
544 | for (j = 0; j < total; j++) { | |
e489b9c0 | 545 | err = fdt_get_mem_rsv(working_fdt, j, &addr, &size); |
804887e6 KG |
546 | if (err < 0) { |
547 | printf("libfdt fdt_get_mem_rsv(): %s\n", | |
548 | fdt_strerror(err)); | |
549 | return err; | |
550 | } | |
551 | printf(" %x\t%08x%08x\t%08x%08x\n", j, | |
552 | (u32)(addr >> 32), | |
553 | (u32)(addr & 0xffffffff), | |
554 | (u32)(size >> 32), | |
555 | (u32)(size & 0xffffffff)); | |
556 | } | |
557 | } else if (argv[2][0] == 'a') { | |
558 | uint64_t addr, size; | |
559 | int err; | |
804887e6 KG |
560 | addr = simple_strtoull(argv[3], NULL, 16); |
561 | size = simple_strtoull(argv[4], NULL, 16); | |
e489b9c0 | 562 | err = fdt_add_mem_rsv(working_fdt, addr, size); |
804887e6 KG |
563 | |
564 | if (err < 0) { | |
565 | printf("libfdt fdt_add_mem_rsv(): %s\n", | |
566 | fdt_strerror(err)); | |
567 | return err; | |
568 | } | |
569 | } else if (argv[2][0] == 'd') { | |
570 | unsigned long idx = simple_strtoul(argv[3], NULL, 16); | |
e489b9c0 | 571 | int err = fdt_del_mem_rsv(working_fdt, idx); |
804887e6 KG |
572 | |
573 | if (err < 0) { | |
574 | printf("libfdt fdt_del_mem_rsv(): %s\n", | |
575 | fdt_strerror(err)); | |
576 | return err; | |
577 | } | |
578 | } else { | |
579 | /* Unrecognized command */ | |
4c12eeb8 | 580 | return CMD_RET_USAGE; |
804887e6 | 581 | } |
99dffca3 | 582 | } |
fd61e55d | 583 | #ifdef CONFIG_OF_BOARD_SETUP |
99dffca3 | 584 | /* Call the board-specific fixup routine */ |
2fb698bf | 585 | else if (strncmp(argv[1], "boa", 3) == 0) |
e489b9c0 | 586 | ft_board_setup(working_fdt, gd->bd); |
fd61e55d | 587 | #endif |
99dffca3 | 588 | /* Create a chosen node */ |
f953d99f KG |
589 | else if (argv[1][0] == 'c') { |
590 | unsigned long initrd_start = 0, initrd_end = 0; | |
591 | ||
47e26b1b | 592 | if ((argc != 2) && (argc != 4)) |
4c12eeb8 | 593 | return CMD_RET_USAGE; |
f953d99f KG |
594 | |
595 | if (argc == 4) { | |
596 | initrd_start = simple_strtoul(argv[2], NULL, 16); | |
597 | initrd_end = simple_strtoul(argv[3], NULL, 16); | |
598 | } | |
599 | ||
56844a22 HS |
600 | fdt_chosen(working_fdt, 1); |
601 | fdt_initrd(working_fdt, initrd_start, initrd_end, 1); | |
40afac22 KG |
602 | } |
603 | /* resize the fdt */ | |
604 | else if (strncmp(argv[1], "re", 2) == 0) { | |
605 | fdt_resize(working_fdt); | |
606 | } | |
607 | else { | |
99dffca3 | 608 | /* Unrecognized command */ |
4c12eeb8 | 609 | return CMD_RET_USAGE; |
781e09ee GVB |
610 | } |
611 | ||
612 | return 0; | |
613 | } | |
614 | ||
addd8ce8 | 615 | /****************************************************************************/ |
781e09ee | 616 | |
d14da913 SG |
617 | /** |
618 | * fdt_valid() - Check if an FDT is valid. If not, change it to NULL | |
619 | * | |
620 | * @blobp: Pointer to FDT pointer | |
621 | * @return 1 if OK, 0 if bad (in which case *blobp is set to NULL) | |
622 | */ | |
623 | static int fdt_valid(struct fdt_header **blobp) | |
781e09ee | 624 | { |
d14da913 SG |
625 | const void *blob = *blobp; |
626 | int err; | |
64dbbd40 | 627 | |
d14da913 | 628 | if (blob == NULL) { |
64dbbd40 | 629 | printf ("The address of the fdt is invalid (NULL).\n"); |
781e09ee GVB |
630 | return 0; |
631 | } | |
64dbbd40 | 632 | |
d14da913 | 633 | err = fdt_check_header(blob); |
64dbbd40 GVB |
634 | if (err == 0) |
635 | return 1; /* valid */ | |
636 | ||
637 | if (err < 0) { | |
25114033 | 638 | printf("libfdt fdt_check_header(): %s", fdt_strerror(err)); |
64dbbd40 GVB |
639 | /* |
640 | * Be more informative on bad version. | |
641 | */ | |
642 | if (err == -FDT_ERR_BADVERSION) { | |
d14da913 | 643 | if (fdt_version(blob) < |
e489b9c0 | 644 | FDT_FIRST_SUPPORTED_VERSION) { |
dc4b0b38 | 645 | printf (" - too old, fdt %d < %d", |
d14da913 | 646 | fdt_version(blob), |
addd8ce8 | 647 | FDT_FIRST_SUPPORTED_VERSION); |
64dbbd40 | 648 | } |
d14da913 | 649 | if (fdt_last_comp_version(blob) > |
e489b9c0 | 650 | FDT_LAST_SUPPORTED_VERSION) { |
dc4b0b38 | 651 | printf (" - too new, fdt %d > %d", |
d14da913 | 652 | fdt_version(blob), |
addd8ce8 | 653 | FDT_LAST_SUPPORTED_VERSION); |
64dbbd40 | 654 | } |
64dbbd40 GVB |
655 | } |
656 | printf("\n"); | |
d14da913 | 657 | *blobp = NULL; |
781e09ee GVB |
658 | return 0; |
659 | } | |
660 | return 1; | |
661 | } | |
662 | ||
addd8ce8 | 663 | /****************************************************************************/ |
781e09ee GVB |
664 | |
665 | /* | |
addd8ce8 | 666 | * Parse the user's input, partially heuristic. Valid formats: |
4abd844d | 667 | * <0x00112233 4 05> - an array of cells. Numbers follow standard |
53677ef1 | 668 | * C conventions. |
addd8ce8 GVB |
669 | * [00 11 22 .. nn] - byte stream |
670 | * "string" - If the the value doesn't start with "<" or "[", it is | |
671 | * treated as a string. Note that the quotes are | |
672 | * stripped by the parser before we get the string. | |
4abd844d | 673 | * newval: An array of strings containing the new property as specified |
53677ef1 | 674 | * on the command line |
4abd844d AF |
675 | * count: The number of strings in the array |
676 | * data: A bytestream to be placed in the property | |
677 | * len: The length of the resulting bytestream | |
addd8ce8 | 678 | */ |
54841ab5 | 679 | static int fdt_parse_prop(char * const *newval, int count, char *data, int *len) |
addd8ce8 GVB |
680 | { |
681 | char *cp; /* temporary char pointer */ | |
4abd844d | 682 | char *newp; /* temporary newval char pointer */ |
addd8ce8 | 683 | unsigned long tmp; /* holds converted values */ |
4abd844d | 684 | int stridx = 0; |
addd8ce8 | 685 | |
4abd844d AF |
686 | *len = 0; |
687 | newp = newval[0]; | |
688 | ||
689 | /* An array of cells */ | |
690 | if (*newp == '<') { | |
691 | newp++; | |
692 | while ((*newp != '>') && (stridx < count)) { | |
693 | /* | |
694 | * Keep searching until we find that last ">" | |
695 | * That way users don't have to escape the spaces | |
696 | */ | |
697 | if (*newp == '\0') { | |
698 | newp = newval[++stridx]; | |
699 | continue; | |
700 | } | |
701 | ||
702 | cp = newp; | |
703 | tmp = simple_strtoul(cp, &newp, 0); | |
088f1b19 | 704 | *(__be32 *)data = __cpu_to_be32(tmp); |
4abd844d AF |
705 | data += 4; |
706 | *len += 4; | |
707 | ||
708 | /* If the ptr didn't advance, something went wrong */ | |
709 | if ((newp - cp) <= 0) { | |
addd8ce8 GVB |
710 | printf("Sorry, I could not convert \"%s\"\n", |
711 | cp); | |
712 | return 1; | |
713 | } | |
4abd844d AF |
714 | |
715 | while (*newp == ' ') | |
716 | newp++; | |
addd8ce8 | 717 | } |
4abd844d AF |
718 | |
719 | if (*newp != '>') { | |
720 | printf("Unexpected character '%c'\n", *newp); | |
addd8ce8 GVB |
721 | return 1; |
722 | } | |
4abd844d | 723 | } else if (*newp == '[') { |
addd8ce8 GVB |
724 | /* |
725 | * Byte stream. Convert the values. | |
726 | */ | |
4abd844d | 727 | newp++; |
6e748ea0 | 728 | while ((stridx < count) && (*newp != ']')) { |
4abd844d AF |
729 | while (*newp == ' ') |
730 | newp++; | |
6e748ea0 | 731 | if (*newp == '\0') { |
4abd844d | 732 | newp = newval[++stridx]; |
6e748ea0 KM |
733 | continue; |
734 | } | |
735 | if (!isxdigit(*newp)) | |
736 | break; | |
737 | tmp = simple_strtoul(newp, &newp, 16); | |
738 | *data++ = tmp & 0xFF; | |
739 | *len = *len + 1; | |
addd8ce8 | 740 | } |
4abd844d | 741 | if (*newp != ']') { |
dc4b0b38 | 742 | printf("Unexpected character '%c'\n", *newp); |
addd8ce8 GVB |
743 | return 1; |
744 | } | |
745 | } else { | |
746 | /* | |
6e748ea0 KM |
747 | * Assume it is one or more strings. Copy it into our |
748 | * data area for convenience (including the | |
749 | * terminating '\0's). | |
addd8ce8 | 750 | */ |
4abd844d | 751 | while (stridx < count) { |
6e748ea0 | 752 | size_t length = strlen(newp) + 1; |
4abd844d | 753 | strcpy(data, newp); |
6e748ea0 KM |
754 | data += length; |
755 | *len += length; | |
4abd844d AF |
756 | newp = newval[++stridx]; |
757 | } | |
addd8ce8 GVB |
758 | } |
759 | return 0; | |
760 | } | |
761 | ||
762 | /****************************************************************************/ | |
763 | ||
764 | /* | |
765 | * Heuristic to guess if this is a string or concatenated strings. | |
781e09ee GVB |
766 | */ |
767 | ||
768 | static int is_printable_string(const void *data, int len) | |
769 | { | |
770 | const char *s = data; | |
771 | ||
772 | /* zero length is not */ | |
773 | if (len == 0) | |
774 | return 0; | |
775 | ||
8805beec JH |
776 | /* must terminate with zero or '\n' */ |
777 | if (s[len - 1] != '\0' && s[len - 1] != '\n') | |
781e09ee GVB |
778 | return 0; |
779 | ||
780 | /* printable or a null byte (concatenated strings) */ | |
8805beec | 781 | while (((*s == '\0') || isprint(*s) || isspace(*s)) && (len > 0)) { |
781e09ee GVB |
782 | /* |
783 | * If we see a null, there are three possibilities: | |
784 | * 1) If len == 1, it is the end of the string, printable | |
785 | * 2) Next character also a null, not printable. | |
786 | * 3) Next character not a null, continue to check. | |
787 | */ | |
788 | if (s[0] == '\0') { | |
789 | if (len == 1) | |
790 | return 1; | |
791 | if (s[1] == '\0') | |
792 | return 0; | |
793 | } | |
794 | s++; | |
795 | len--; | |
796 | } | |
797 | ||
798 | /* Not the null termination, or not done yet: not printable */ | |
799 | if (*s != '\0' || (len != 0)) | |
800 | return 0; | |
801 | ||
802 | return 1; | |
803 | } | |
804 | ||
addd8ce8 GVB |
805 | |
806 | /* | |
807 | * Print the property in the best format, a heuristic guess. Print as | |
808 | * a string, concatenated strings, a byte, word, double word, or (if all | |
809 | * else fails) it is printed as a stream of bytes. | |
810 | */ | |
781e09ee GVB |
811 | static void print_data(const void *data, int len) |
812 | { | |
813 | int j; | |
781e09ee GVB |
814 | |
815 | /* no data, don't print */ | |
816 | if (len == 0) | |
817 | return; | |
818 | ||
819 | /* | |
820 | * It is a string, but it may have multiple strings (embedded '\0's). | |
821 | */ | |
822 | if (is_printable_string(data, len)) { | |
823 | puts("\""); | |
824 | j = 0; | |
825 | while (j < len) { | |
826 | if (j > 0) | |
827 | puts("\", \""); | |
828 | puts(data); | |
829 | j += strlen(data) + 1; | |
830 | data += strlen(data) + 1; | |
831 | } | |
832 | puts("\""); | |
833 | return; | |
834 | } | |
835 | ||
4abd844d | 836 | if ((len %4) == 0) { |
f0a29d43 | 837 | if (len > CONFIG_CMD_FDT_MAX_DUMP) |
085b9c3a | 838 | printf("* 0x%p [0x%08x]", data, len); |
f0a29d43 | 839 | else { |
088f1b19 | 840 | const __be32 *p; |
f0a29d43 JH |
841 | |
842 | printf("<"); | |
843 | for (j = 0, p = data; j < len/4; j++) | |
844 | printf("0x%08x%s", fdt32_to_cpu(p[j]), | |
845 | j < (len/4 - 1) ? " " : ""); | |
846 | printf(">"); | |
847 | } | |
4abd844d | 848 | } else { /* anything else... hexdump */ |
f0a29d43 | 849 | if (len > CONFIG_CMD_FDT_MAX_DUMP) |
085b9c3a | 850 | printf("* 0x%p [0x%08x]", data, len); |
f0a29d43 JH |
851 | else { |
852 | const u8 *s; | |
853 | ||
854 | printf("["); | |
855 | for (j = 0, s = data; j < len; j++) | |
856 | printf("%02x%s", s[j], j < len - 1 ? " " : ""); | |
857 | printf("]"); | |
858 | } | |
781e09ee GVB |
859 | } |
860 | } | |
861 | ||
addd8ce8 GVB |
862 | /****************************************************************************/ |
863 | ||
864 | /* | |
e489b9c0 | 865 | * Recursively print (a portion of) the working_fdt. The depth parameter |
addd8ce8 GVB |
866 | * determines how deeply nested the fdt is printed. |
867 | */ | |
dbaf07ce | 868 | static int fdt_print(const char *pathp, char *prop, int depth) |
addd8ce8 | 869 | { |
addd8ce8 GVB |
870 | static char tabs[MAX_LEVEL+1] = |
871 | "\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t" | |
872 | "\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t"; | |
dbaf07ce | 873 | const void *nodep; /* property node pointer */ |
addd8ce8 GVB |
874 | int nodeoffset; /* node offset from libfdt */ |
875 | int nextoffset; /* next node offset from libfdt */ | |
876 | uint32_t tag; /* tag */ | |
877 | int len; /* length of the property */ | |
878 | int level = 0; /* keep track of nesting level */ | |
91623528 | 879 | const struct fdt_property *fdt_prop; |
addd8ce8 | 880 | |
e489b9c0 | 881 | nodeoffset = fdt_path_offset (working_fdt, pathp); |
addd8ce8 GVB |
882 | if (nodeoffset < 0) { |
883 | /* | |
884 | * Not found or something else bad happened. | |
885 | */ | |
8d04f02f | 886 | printf ("libfdt fdt_path_offset() returned %s\n", |
06e19a07 | 887 | fdt_strerror(nodeoffset)); |
addd8ce8 GVB |
888 | return 1; |
889 | } | |
890 | /* | |
891 | * The user passed in a property as well as node path. | |
892 | * Print only the given property and then return. | |
893 | */ | |
894 | if (prop) { | |
e489b9c0 | 895 | nodep = fdt_getprop (working_fdt, nodeoffset, prop, &len); |
addd8ce8 GVB |
896 | if (len == 0) { |
897 | /* no property value */ | |
898 | printf("%s %s\n", pathp, prop); | |
899 | return 0; | |
900 | } else if (len > 0) { | |
28f384b1 | 901 | printf("%s = ", prop); |
addd8ce8 GVB |
902 | print_data (nodep, len); |
903 | printf("\n"); | |
904 | return 0; | |
905 | } else { | |
906 | printf ("libfdt fdt_getprop(): %s\n", | |
907 | fdt_strerror(len)); | |
908 | return 1; | |
909 | } | |
910 | } | |
911 | ||
912 | /* | |
913 | * The user passed in a node path and no property, | |
914 | * print the node and all subnodes. | |
915 | */ | |
addd8ce8 | 916 | while(level >= 0) { |
e489b9c0 | 917 | tag = fdt_next_tag(working_fdt, nodeoffset, &nextoffset); |
addd8ce8 GVB |
918 | switch(tag) { |
919 | case FDT_BEGIN_NODE: | |
e489b9c0 | 920 | pathp = fdt_get_name(working_fdt, nodeoffset, NULL); |
91623528 GVB |
921 | if (level <= depth) { |
922 | if (pathp == NULL) | |
923 | pathp = "/* NULL pointer error */"; | |
924 | if (*pathp == '\0') | |
925 | pathp = "/"; /* root is nameless */ | |
addd8ce8 GVB |
926 | printf("%s%s {\n", |
927 | &tabs[MAX_LEVEL - level], pathp); | |
91623528 | 928 | } |
addd8ce8 | 929 | level++; |
addd8ce8 | 930 | if (level >= MAX_LEVEL) { |
91623528 | 931 | printf("Nested too deep, aborting.\n"); |
addd8ce8 GVB |
932 | return 1; |
933 | } | |
934 | break; | |
935 | case FDT_END_NODE: | |
936 | level--; | |
91623528 | 937 | if (level <= depth) |
addd8ce8 GVB |
938 | printf("%s};\n", &tabs[MAX_LEVEL - level]); |
939 | if (level == 0) { | |
940 | level = -1; /* exit the loop */ | |
941 | } | |
942 | break; | |
943 | case FDT_PROP: | |
e489b9c0 | 944 | fdt_prop = fdt_offset_ptr(working_fdt, nodeoffset, |
91623528 | 945 | sizeof(*fdt_prop)); |
e489b9c0 | 946 | pathp = fdt_string(working_fdt, |
91623528 GVB |
947 | fdt32_to_cpu(fdt_prop->nameoff)); |
948 | len = fdt32_to_cpu(fdt_prop->len); | |
949 | nodep = fdt_prop->data; | |
addd8ce8 GVB |
950 | if (len < 0) { |
951 | printf ("libfdt fdt_getprop(): %s\n", | |
952 | fdt_strerror(len)); | |
953 | return 1; | |
954 | } else if (len == 0) { | |
955 | /* the property has no value */ | |
91623528 | 956 | if (level <= depth) |
addd8ce8 GVB |
957 | printf("%s%s;\n", |
958 | &tabs[MAX_LEVEL - level], | |
959 | pathp); | |
960 | } else { | |
91623528 | 961 | if (level <= depth) { |
28f384b1 | 962 | printf("%s%s = ", |
addd8ce8 GVB |
963 | &tabs[MAX_LEVEL - level], |
964 | pathp); | |
965 | print_data (nodep, len); | |
966 | printf(";\n"); | |
967 | } | |
968 | } | |
969 | break; | |
970 | case FDT_NOP: | |
dc4b0b38 | 971 | printf("%s/* NOP */\n", &tabs[MAX_LEVEL - level]); |
addd8ce8 GVB |
972 | break; |
973 | case FDT_END: | |
974 | return 1; | |
975 | default: | |
91623528 | 976 | if (level <= depth) |
addd8ce8 GVB |
977 | printf("Unknown tag 0x%08X\n", tag); |
978 | return 1; | |
979 | } | |
980 | nodeoffset = nextoffset; | |
981 | } | |
982 | return 0; | |
983 | } | |
984 | ||
781e09ee | 985 | /********************************************************************/ |
088f1b19 KP |
986 | #ifdef CONFIG_SYS_LONGHELP |
987 | static char fdt_help_text[] = | |
4b578655 | 988 | "addr [-c] <addr> [<length>] - Set the [control] fdt location to <addr>\n" |
fd61e55d GVB |
989 | #ifdef CONFIG_OF_BOARD_SETUP |
990 | "fdt boardsetup - Do board-specific set up\n" | |
991 | #endif | |
238cb7a4 | 992 | "fdt move <fdt> <newaddr> <length> - Copy the fdt to <addr> and make it active\n" |
40afac22 | 993 | "fdt resize - Resize fdt to size + padding to 4k addr\n" |
781e09ee GVB |
994 | "fdt print <path> [<prop>] - Recursive print starting at <path>\n" |
995 | "fdt list <path> [<prop>] - Print one level starting at <path>\n" | |
bc80295b JH |
996 | "fdt get value <var> <path> <prop> - Get <property> and store in <var>\n" |
997 | "fdt get name <var> <path> <index> - Get name of node <index> and store in <var>\n" | |
998 | "fdt get addr <var> <path> <prop> - Get start address of <property> and store in <var>\n" | |
999 | "fdt get size <var> <path> [<prop>] - Get size of [<property>] or num nodes and store in <var>\n" | |
781e09ee GVB |
1000 | "fdt set <path> <prop> [<val>] - Set <property> [to <val>]\n" |
1001 | "fdt mknode <path> <node> - Create a new node after <path>\n" | |
1002 | "fdt rm <path> [<prop>] - Delete the node or <property>\n" | |
804887e6 KG |
1003 | "fdt header - Display header info\n" |
1004 | "fdt bootcpu <id> - Set boot cpuid\n" | |
1005 | "fdt memory <addr> <size> - Add/Update memory node\n" | |
1006 | "fdt rsvmem print - Show current mem reserves\n" | |
1007 | "fdt rsvmem add <addr> <size> - Add a mem reserve\n" | |
1008 | "fdt rsvmem delete <index> - Delete a mem reserves\n" | |
f953d99f KG |
1009 | "fdt chosen [<start> <end>] - Add/update the /chosen branch in the tree\n" |
1010 | " <start>/<end> - initrd start/end addr\n" | |
109c30fb | 1011 | "NOTE: Dereference aliases by omiting the leading '/', " |
088f1b19 KP |
1012 | "e.g. fdt print ethernet0."; |
1013 | #endif | |
1014 | ||
1015 | U_BOOT_CMD( | |
1016 | fdt, 255, 0, do_fdt, | |
1017 | "flattened device tree utility commands", fdt_help_text | |
781e09ee | 1018 | ); |