2 * Copyright (c) 2013, Google Inc.
4 * (C) Copyright 2008 Semihalf
6 * (C) Copyright 2000-2006
7 * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
9 * SPDX-License-Identifier: GPL-2.0+
13 #include <fdt_support.h>
20 #ifndef CONFIG_SYS_FDT_PAD
21 #define CONFIG_SYS_FDT_PAD 0x3000
24 DECLARE_GLOBAL_DATA_PTR
;
26 static void fdt_error(const char *msg
)
30 puts(" - must RESET the board to recover.\n");
33 #if defined(CONFIG_IMAGE_FORMAT_LEGACY)
34 static const image_header_t
*image_get_fdt(ulong fdt_addr
)
36 const image_header_t
*fdt_hdr
= map_sysmem(fdt_addr
, 0);
38 image_print_contents(fdt_hdr
);
40 puts(" Verifying Checksum ... ");
41 if (!image_check_hcrc(fdt_hdr
)) {
42 fdt_error("fdt header checksum invalid");
46 if (!image_check_dcrc(fdt_hdr
)) {
47 fdt_error("fdt checksum invalid");
52 if (!image_check_type(fdt_hdr
, IH_TYPE_FLATDT
)) {
53 fdt_error("uImage is not a fdt");
56 if (image_get_comp(fdt_hdr
) != IH_COMP_NONE
) {
57 fdt_error("uImage is compressed");
60 if (fdt_check_header((void *)image_get_data(fdt_hdr
)) != 0) {
61 fdt_error("uImage data is not a fdt");
69 * boot_fdt_add_mem_rsv_regions - Mark the memreserve sections as unusable
70 * @lmb: pointer to lmb handle, will be used for memory mgmt
71 * @fdt_blob: pointer to fdt blob base address
73 * Adds the memreserve regions in the dtb to the lmb block. Adding the
74 * memreserve regions prevents u-boot from using them to store the initrd
77 void boot_fdt_add_mem_rsv_regions(struct lmb
*lmb
, void *fdt_blob
)
82 if (fdt_check_header(fdt_blob
) != 0)
85 total
= fdt_num_mem_rsv(fdt_blob
);
86 for (i
= 0; i
< total
; i
++) {
87 if (fdt_get_mem_rsv(fdt_blob
, i
, &addr
, &size
) != 0)
89 printf(" reserving fdt memory region: addr=%llx size=%llx\n",
90 (unsigned long long)addr
, (unsigned long long)size
);
91 lmb_reserve(lmb
, addr
, size
);
96 * boot_relocate_fdt - relocate flat device tree
97 * @lmb: pointer to lmb handle, will be used for memory mgmt
98 * @of_flat_tree: pointer to a char* variable, will hold fdt start address
99 * @of_size: pointer to a ulong variable, will hold fdt length
101 * boot_relocate_fdt() allocates a region of memory within the bootmap and
102 * relocates the of_flat_tree into that region, even if the fdt is already in
103 * the bootmap. It also expands the size of the fdt by CONFIG_SYS_FDT_PAD
106 * of_flat_tree and of_size are set to final (after relocation) values
112 int boot_relocate_fdt(struct lmb
*lmb
, char **of_flat_tree
, ulong
*of_size
)
114 void *fdt_blob
= *of_flat_tree
;
115 void *of_start
= NULL
;
119 int disable_relocation
= 0;
125 if (fdt_check_header(fdt_blob
) != 0) {
126 fdt_error("image is not a fdt");
130 /* position on a 4K boundary before the alloc_current */
131 /* Pad the FDT by a specified amount */
132 of_len
= *of_size
+ CONFIG_SYS_FDT_PAD
;
134 /* If fdt_high is set use it to select the relocation address */
135 fdt_high
= getenv("fdt_high");
137 void *desired_addr
= (void *)simple_strtoul(fdt_high
, NULL
, 16);
139 if (((ulong
) desired_addr
) == ~0UL) {
140 /* All ones means use fdt in place */
142 lmb_reserve(lmb
, (ulong
)of_start
, of_len
);
143 disable_relocation
= 1;
144 } else if (desired_addr
) {
146 (void *)(ulong
) lmb_alloc_base(lmb
, of_len
, 0x1000,
147 (ulong
)desired_addr
);
148 if (of_start
== NULL
) {
149 puts("Failed using fdt_high value for Device Tree");
154 (void *)(ulong
) lmb_alloc(lmb
, of_len
, 0x1000);
158 (void *)(ulong
) lmb_alloc_base(lmb
, of_len
, 0x1000,
159 getenv_bootm_mapsize()
160 + getenv_bootm_low());
163 if (of_start
== NULL
) {
164 puts("device tree - allocation error\n");
168 if (disable_relocation
) {
170 * We assume there is space after the existing fdt to use
173 fdt_set_totalsize(of_start
, of_len
);
174 printf(" Using Device Tree in place at %p, end %p\n",
175 of_start
, of_start
+ of_len
- 1);
177 debug("## device tree at %p ... %p (len=%ld [0x%lX])\n",
178 fdt_blob
, fdt_blob
+ *of_size
- 1, of_len
, of_len
);
180 printf(" Loading Device Tree to %p, end %p ... ",
181 of_start
, of_start
+ of_len
- 1);
183 err
= fdt_open_into(fdt_blob
, of_start
, of_len
);
185 fdt_error("fdt move failed");
191 *of_flat_tree
= of_start
;
194 set_working_fdt_addr((ulong
)*of_flat_tree
);
202 * boot_get_fdt - main fdt handling routine
203 * @argc: command argument count
204 * @argv: command argument list
205 * @arch: architecture (IH_ARCH_...)
206 * @images: pointer to the bootm images structure
207 * @of_flat_tree: pointer to a char* variable, will hold fdt start address
208 * @of_size: pointer to a ulong variable, will hold fdt length
210 * boot_get_fdt() is responsible for finding a valid flat device tree image.
211 * Curently supported are the following ramdisk sources:
212 * - multicomponent kernel/ramdisk image,
213 * - commandline provided address of decicated ramdisk image.
216 * 0, if fdt image was found and valid, or skipped
217 * of_flat_tree and of_size are set to fdt start address and length if
218 * fdt image is found and valid
220 * 1, if fdt image is found but corrupted
221 * of_flat_tree and of_size are set to 0 if no fdt exists
223 int boot_get_fdt(int flag
, int argc
, char * const argv
[], uint8_t arch
,
224 bootm_headers_t
*images
, char **of_flat_tree
, ulong
*of_size
)
226 #if defined(CONFIG_IMAGE_FORMAT_LEGACY)
227 const image_header_t
*fdt_hdr
;
228 ulong load
, load_end
;
229 ulong image_start
, image_data
, image_end
;
232 char *fdt_blob
= NULL
;
234 #if CONFIG_IS_ENABLED(FIT)
235 const char *fit_uname_config
= images
->fit_uname_cfg
;
236 const char *fit_uname_fdt
= NULL
;
240 const char *select
= NULL
;
243 *of_flat_tree
= NULL
;
248 if (select
|| genimg_has_config(images
)) {
249 #if CONFIG_IS_ENABLED(FIT)
252 * If the FDT blob comes from the FIT image and the
253 * FIT image address is omitted in the command line
254 * argument, try to use ramdisk or os FIT image
255 * address or default load address.
257 if (images
->fit_uname_rd
)
258 default_addr
= (ulong
)images
->fit_hdr_rd
;
259 else if (images
->fit_uname_os
)
260 default_addr
= (ulong
)images
->fit_hdr_os
;
262 default_addr
= load_addr
;
264 if (fit_parse_conf(select
, default_addr
,
265 &fdt_addr
, &fit_uname_config
)) {
266 debug("* fdt: config '%s' from image at 0x%08lx\n",
267 fit_uname_config
, fdt_addr
);
268 } else if (fit_parse_subimage(select
, default_addr
,
269 &fdt_addr
, &fit_uname_fdt
)) {
270 debug("* fdt: subimage '%s' from image at 0x%08lx\n",
271 fit_uname_fdt
, fdt_addr
);
275 fdt_addr
= simple_strtoul(select
, NULL
, 16);
276 debug("* fdt: cmdline image address = 0x%08lx\n",
279 #if CONFIG_IS_ENABLED(FIT)
281 /* use FIT configuration provided in first bootm
284 fdt_addr
= map_to_sysmem(images
->fit_hdr_os
);
285 fdt_noffset
= fit_get_node_from_config(images
,
288 if (fdt_noffset
== -ENOENT
)
290 else if (fdt_noffset
< 0)
294 debug("## Checking for 'FDT'/'FDT Image' at %08lx\n",
297 /* copy from dataflash if needed */
298 fdt_addr
= genimg_get_image(fdt_addr
);
301 * Check if there is an FDT image at the
302 * address provided in the second bootm argument
303 * check image type, for FIT images get a FIT node.
305 buf
= map_sysmem(fdt_addr
, 0);
306 switch (genimg_get_format(buf
)) {
307 #if defined(CONFIG_IMAGE_FORMAT_LEGACY)
308 case IMAGE_FORMAT_LEGACY
:
309 /* verify fdt_addr points to a valid image header */
310 printf("## Flattened Device Tree from Legacy Image at %08lx\n",
312 fdt_hdr
= image_get_fdt(fdt_addr
);
317 * move image data to the load address,
318 * make sure we don't overwrite initial image
320 image_start
= (ulong
)fdt_hdr
;
321 image_data
= (ulong
)image_get_data(fdt_hdr
);
322 image_end
= image_get_image_end(fdt_hdr
);
324 load
= image_get_load(fdt_hdr
);
325 load_end
= load
+ image_get_data_size(fdt_hdr
);
327 if (load
== image_start
||
328 load
== image_data
) {
333 if ((load
< image_end
) && (load_end
> image_start
)) {
334 fdt_error("fdt overwritten");
338 debug(" Loading FDT from 0x%08lx to 0x%08lx\n",
341 memmove((void *)load
,
343 image_get_data_size(fdt_hdr
));
348 case IMAGE_FORMAT_FIT
:
350 * This case will catch both: new uImage format
351 * (libfdt based) and raw FDT blob (also libfdt
354 #if CONFIG_IS_ENABLED(FIT)
355 /* check FDT blob vs FIT blob */
356 if (fit_check_format(buf
)) {
359 fdt_noffset
= fit_image_load(images
,
360 fdt_addr
, &fit_uname_fdt
,
362 arch
, IH_TYPE_FLATDT
,
363 BOOTSTAGE_ID_FIT_FDT_START
,
364 FIT_LOAD_OPTIONAL
, &load
, &len
);
366 images
->fit_hdr_fdt
= map_sysmem(fdt_addr
, 0);
367 images
->fit_uname_fdt
= fit_uname_fdt
;
368 images
->fit_noffset_fdt
= fdt_noffset
;
377 debug("* fdt: raw FDT blob\n");
378 printf("## Flattened Device Tree blob at %08lx\n",
383 puts("ERROR: Did not find a cmdline Flattened Device Tree\n");
387 printf(" Booting using the fdt blob at %#08lx\n", fdt_addr
);
388 fdt_blob
= map_sysmem(fdt_addr
, 0);
389 } else if (images
->legacy_hdr_valid
&&
390 image_check_type(&images
->legacy_hdr_os_copy
,
392 ulong fdt_data
, fdt_len
;
395 * Now check if we have a legacy multi-component image,
396 * get second entry data start address and len.
398 printf("## Flattened Device Tree from multi component Image at %08lX\n",
399 (ulong
)images
->legacy_hdr_os
);
401 image_multi_getimg(images
->legacy_hdr_os
, 2, &fdt_data
,
404 fdt_blob
= (char *)fdt_data
;
405 printf(" Booting using the fdt at 0x%p\n", fdt_blob
);
407 if (fdt_check_header(fdt_blob
) != 0) {
408 fdt_error("image is not a fdt");
412 if (fdt_totalsize(fdt_blob
) != fdt_len
) {
413 fdt_error("fdt size != image size");
417 debug("## No Flattened Device Tree\n");
421 debug("## No Flattened Device Tree\n");
425 *of_flat_tree
= fdt_blob
;
426 *of_size
= fdt_totalsize(fdt_blob
);
427 debug(" of_flat_tree at 0x%08lx size 0x%08lx\n",
428 (ulong
)*of_flat_tree
, *of_size
);
435 *of_flat_tree
= NULL
;
437 if (!select
&& ok_no_fdt
) {
438 debug("Continuing to boot without FDT\n");
445 * Verify the device tree.
447 * This function is called after all device tree fix-ups have been enacted,
448 * so that the final device tree can be verified. The definition of "verified"
449 * is up to the specific implementation. However, it generally means that the
450 * addresses of some of the devices in the device tree are compared with the
451 * actual addresses at which U-Boot has placed them.
453 * Returns 1 on success, 0 on failure. If 0 is returned, U-Boot will halt the
456 __weak
int ft_verify_fdt(void *fdt
)
461 int image_setup_libfdt(bootm_headers_t
*images
, void *blob
,
462 int of_size
, struct lmb
*lmb
)
464 ulong
*initrd_start
= &images
->initrd_start
;
465 ulong
*initrd_end
= &images
->initrd_end
;
469 if (fdt_root(blob
) < 0) {
470 printf("ERROR: root node setup failed\n");
473 if (fdt_chosen(blob
) < 0) {
474 printf("ERROR: /chosen node create failed\n");
477 if (arch_fixup_fdt(blob
) < 0) {
478 printf("ERROR: arch-specific fdt fixup failed\n");
481 /* Update ethernet nodes */
482 fdt_fixup_ethernet(blob
);
483 if (IMAGE_OF_BOARD_SETUP
) {
484 fdt_ret
= ft_board_setup(blob
, gd
->bd
);
486 printf("ERROR: board-specific fdt fixup failed: %s\n",
487 fdt_strerror(fdt_ret
));
491 if (IMAGE_OF_SYSTEM_SETUP
) {
492 fdt_ret
= ft_system_setup(blob
, gd
->bd
);
494 printf("ERROR: system-specific fdt fixup failed: %s\n",
495 fdt_strerror(fdt_ret
));
500 /* Delete the old LMB reservation */
502 lmb_free(lmb
, (phys_addr_t
)(u32
)(uintptr_t)blob
,
503 (phys_size_t
)fdt_totalsize(blob
));
505 ret
= fdt_shrink_to_minimum(blob
, 0);
510 if (*initrd_start
&& *initrd_end
) {
511 of_size
+= FDT_RAMDISK_OVERHEAD
;
512 fdt_set_totalsize(blob
, of_size
);
514 /* Create a new LMB reservation */
516 lmb_reserve(lmb
, (ulong
)blob
, of_size
);
518 fdt_initrd(blob
, *initrd_start
, *initrd_end
);
519 if (!ft_verify_fdt(blob
))
522 #if defined(CONFIG_SOC_KEYSTONE)
523 if (IMAGE_OF_BOARD_SETUP
)
524 ft_board_setup_ex(blob
, gd
->bd
);
529 printf(" - must RESET the board to recover.\n\n");