common/spl/spl.c

   1 // SPDX-License-Identifier: GPL-2.0+
   2 /*
   3  * (C) Copyright 2010
   4  * Texas Instruments, <www.ti.com>
   5  *
   6  * Aneesh V <[email protected]>
   7  */
   8
   9 #include <common.h>
  10 #include <bloblist.h>
  11 #include <binman_sym.h>
  12 #include <dm.h>
  13 #include <handoff.h>
  14 #include <hang.h>
  15 #include <irq_func.h>
  16 #include <serial.h>
  17 #include <spl.h>
  18 #include <asm/u-boot.h>
  19 #include <nand.h>
  20 #include <fat.h>
  21 #include <u-boot/crc.h>
  22 #include <version.h>
  23 #include <image.h>
  24 #include <malloc.h>
  25 #include <mapmem.h>
  26 #include <dm/root.h>
  27 #include <linux/compiler.h>
  28 #include <fdt_support.h>
  29 #include <bootcount.h>
  30 #include <wdt.h>
  31
  32 DECLARE_GLOBAL_DATA_PTR;
  33
  34 #ifndef CONFIG_SYS_UBOOT_START
  35 #define CONFIG_SYS_UBOOT_START  CONFIG_SYS_TEXT_BASE
  36 #endif
  37 #ifndef CONFIG_SYS_MONITOR_LEN
  38 /* Unknown U-Boot size, let's assume it will not be more than 200 KB */
  39 #define CONFIG_SYS_MONITOR_LEN  (200 * 1024)
  40 #endif
  41
  42 u32 *boot_params_ptr = NULL;
  43
  44 /* See spl.h for information about this */
  45 binman_sym_declare(ulong, u_boot_any, image_pos);
  46 binman_sym_declare(ulong, u_boot_any, size);
  47
  48 #ifdef CONFIG_TPL
  49 binman_sym_declare(ulong, spl, image_pos);
  50 binman_sym_declare(ulong, spl, size);
  51 #endif
  52
  53 /* Define board data structure */
  54 static bd_t bdata __attribute__ ((section(".data")));
  55
  56 /*
  57  * Board-specific Platform code can reimplement show_boot_progress () if needed
  58  */
  59 __weak void show_boot_progress(int val) {}
  60
  61 #if defined(CONFIG_SPL_OS_BOOT) || CONFIG_IS_ENABLED(HANDOFF)
  62 /* weak, default platform-specific function to initialize dram banks */
  63 __weak int dram_init_banksize(void)
  64 {
  65         return 0;
  66 }
  67 #endif
  68
  69 /*
  70  * Default function to determine if u-boot or the OS should
  71  * be started. This implementation always returns 1.
  72  *
  73  * Please implement your own board specific funcion to do this.
  74  *
  75  * RETURN
  76  * 0 to not start u-boot
  77  * positive if u-boot should start
  78  */
  79 #ifdef CONFIG_SPL_OS_BOOT
  80 __weak int spl_start_uboot(void)
  81 {
  82         puts(SPL_TPL_PROMPT
  83              "Please implement spl_start_uboot() for your board\n");
  84         puts(SPL_TPL_PROMPT "Direct Linux boot not active!\n");
  85         return 1;
  86 }
  87
  88 /*
  89  * Weak default function for arch specific zImage check. Return zero
  90  * and fill start and end address if image is recognized.
  91  */
  92 int __weak bootz_setup(ulong image, ulong *start, ulong *end)
  93 {
  94          return 1;
  95 }
  96 #endif
  97
  98 /* Weak default function for arch/board-specific fixups to the spl_image_info */
  99 void __weak spl_perform_fixups(struct spl_image_info *spl_image)
 100 {
 101 }
 102
 103 void spl_fixup_fdt(void)
 104 {
 105 #if defined(CONFIG_SPL_OF_LIBFDT) && defined(CONFIG_SYS_SPL_ARGS_ADDR)
 106         void *fdt_blob = (void *)CONFIG_SYS_SPL_ARGS_ADDR;
 107         int err;
 108
 109         err = fdt_check_header(fdt_blob);
 110         if (err < 0) {
 111                 printf("fdt_root: %s\n", fdt_strerror(err));
 112                 return;
 113         }
 114
 115         /* fixup the memory dt node */
 116         err = fdt_shrink_to_minimum(fdt_blob, 0);
 117         if (err == 0) {
 118                 printf(SPL_TPL_PROMPT "fdt_shrink_to_minimum err - %d\n", err);
 119                 return;
 120         }
 121
 122         err = arch_fixup_fdt(fdt_blob);
 123         if (err) {
 124                 printf(SPL_TPL_PROMPT "arch_fixup_fdt err - %d\n", err);
 125                 return;
 126         }
 127 #endif
 128 }
 129
 130 ulong spl_get_image_pos(void)
 131 {
 132         return spl_phase() == PHASE_TPL ?
 133                 binman_sym(ulong, spl, image_pos) :
 134                 binman_sym(ulong, u_boot_any, image_pos);
 135 }
 136
 137 ulong spl_get_image_size(void)
 138 {
 139         return spl_phase() == PHASE_TPL ?
 140                 binman_sym(ulong, spl, size) :
 141                 binman_sym(ulong, u_boot_any, size);
 142 }
 143
 144 /*
 145  * Weak default function for board specific cleanup/preparation before
 146  * Linux boot. Some boards/platforms might not need it, so just provide
 147  * an empty stub here.
 148  */
 149 __weak void spl_board_prepare_for_linux(void)
 150 {
 151         /* Nothing to do! */
 152 }
 153
 154 __weak void spl_board_prepare_for_boot(void)
 155 {
 156         /* Nothing to do! */
 157 }
 158
 159 __weak struct image_header *spl_get_load_buffer(ssize_t offset, size_t size)
 160 {
 161         return (struct image_header *)(CONFIG_SYS_TEXT_BASE + offset);
 162 }
 163
 164 void spl_set_header_raw_uboot(struct spl_image_info *spl_image)
 165 {
 166         ulong u_boot_pos = binman_sym(ulong, u_boot_any, image_pos);
 167
 168         spl_image->size = CONFIG_SYS_MONITOR_LEN;
 169
 170         /*
 171          * Binman error cases: address of the end of the previous region or the
 172          * start of the image's entry area (usually 0) if there is no previous
 173          * region.
 174          */
 175         if (u_boot_pos && u_boot_pos != BINMAN_SYM_MISSING) {
 176                 /* Binman does not support separated entry addresses */
 177                 spl_image->entry_point = u_boot_pos;
 178                 spl_image->load_addr = u_boot_pos;
 179         } else {
 180                 spl_image->entry_point = CONFIG_SYS_UBOOT_START;
 181                 spl_image->load_addr = CONFIG_SYS_TEXT_BASE;
 182         }
 183         spl_image->os = IH_OS_U_BOOT;
 184         spl_image->name = "U-Boot";
 185 }
 186
 187 #ifdef CONFIG_SPL_LOAD_FIT_FULL
 188 /* Parse and load full fitImage in SPL */
 189 static int spl_load_fit_image(struct spl_image_info *spl_image,
 190                               const struct image_header *header)
 191 {
 192         bootm_headers_t images;
 193         const char *fit_uname_config = NULL;
 194         const char *fit_uname_fdt = FIT_FDT_PROP;
 195         const char *uname;
 196         ulong fw_data = 0, dt_data = 0, img_data = 0;
 197         ulong fw_len = 0, dt_len = 0, img_len = 0;
 198         int idx, conf_noffset;
 199         int ret;
 200
 201 #ifdef CONFIG_SPL_FIT_SIGNATURE
 202         images.verify = 1;
 203 #endif
 204         ret = fit_image_load(&images, (ulong)header,
 205                              NULL, &fit_uname_config,
 206                              IH_ARCH_DEFAULT, IH_TYPE_STANDALONE, -1,
 207                              FIT_LOAD_REQUIRED, &fw_data, &fw_len);
 208         if (ret < 0)
 209                 return ret;
 210
 211         spl_image->size = fw_len;
 212         spl_image->entry_point = fw_data;
 213         spl_image->load_addr = fw_data;
 214         spl_image->os = IH_OS_U_BOOT;
 215         spl_image->name = "U-Boot";
 216
 217         debug(SPL_TPL_PROMPT "payload image: %32s load addr: 0x%lx size: %d\n",
 218               spl_image->name, spl_image->load_addr, spl_image->size);
 219
 220 #ifdef CONFIG_SPL_FIT_SIGNATURE
 221         images.verify = 1;
 222 #endif
 223         ret = fit_image_load(&images, (ulong)header,
 224                        &fit_uname_fdt, &fit_uname_config,
 225                        IH_ARCH_DEFAULT, IH_TYPE_FLATDT, -1,
 226                        FIT_LOAD_OPTIONAL, &dt_data, &dt_len);
 227         if (ret >= 0)
 228                 spl_image->fdt_addr = (void *)dt_data;
 229
 230         conf_noffset = fit_conf_get_node((const void *)header,
 231                                          fit_uname_config);
 232         if (conf_noffset <= 0)
 233                 return 0;
 234
 235         for (idx = 0;
 236              uname = fdt_stringlist_get((const void *)header, conf_noffset,
 237                                         FIT_LOADABLE_PROP, idx,
 238                                 NULL), uname;
 239              idx++)
 240         {
 241 #ifdef CONFIG_SPL_FIT_SIGNATURE
 242                 images.verify = 1;
 243 #endif
 244                 ret = fit_image_load(&images, (ulong)header,
 245                                      &uname, &fit_uname_config,
 246                                      IH_ARCH_DEFAULT, IH_TYPE_LOADABLE, -1,
 247                                      FIT_LOAD_OPTIONAL_NON_ZERO,
 248                                      &img_data, &img_len);
 249                 if (ret < 0)
 250                         return ret;
 251         }
 252
 253         return 0;
 254 }
 255 #endif
 256
 257 int spl_parse_image_header(struct spl_image_info *spl_image,
 258                            const struct image_header *header)
 259 {
 260 #ifdef CONFIG_SPL_LOAD_FIT_FULL
 261         int ret = spl_load_fit_image(spl_image, header);
 262
 263         if (!ret)
 264                 return ret;
 265 #endif
 266         if (image_get_magic(header) == IH_MAGIC) {
 267 #ifdef CONFIG_SPL_LEGACY_IMAGE_SUPPORT
 268                 u32 header_size = sizeof(struct image_header);
 269
 270 #ifdef CONFIG_SPL_LEGACY_IMAGE_CRC_CHECK
 271                 /* check uImage header CRC */
 272                 if (!image_check_hcrc(header)) {
 273                         puts("SPL: Image header CRC check failed!\n");
 274                         return -EINVAL;
 275                 }
 276 #endif
 277
 278                 if (spl_image->flags & SPL_COPY_PAYLOAD_ONLY) {
 279                         /*
 280                          * On some system (e.g. powerpc), the load-address and
 281                          * entry-point is located at address 0. We can't load
 282                          * to 0-0x40. So skip header in this case.
 283                          */
 284                         spl_image->load_addr = image_get_load(header);
 285                         spl_image->entry_point = image_get_ep(header);
 286                         spl_image->size = image_get_data_size(header);
 287                 } else {
 288                         spl_image->entry_point = image_get_ep(header);
 289                         /* Load including the header */
 290                         spl_image->load_addr = image_get_load(header) -
 291                                 header_size;
 292                         spl_image->size = image_get_data_size(header) +
 293                                 header_size;
 294                 }
 295 #ifdef CONFIG_SPL_LEGACY_IMAGE_CRC_CHECK
 296                 /* store uImage data length and CRC to check later */
 297                 spl_image->dcrc_data = image_get_load(header);
 298                 spl_image->dcrc_length = image_get_data_size(header);
 299                 spl_image->dcrc = image_get_dcrc(header);
 300 #endif
 301
 302                 spl_image->os = image_get_os(header);
 303                 spl_image->name = image_get_name(header);
 304                 debug(SPL_TPL_PROMPT
 305                       "payload image: %32s load addr: 0x%lx size: %d\n",
 306                       spl_image->name, spl_image->load_addr, spl_image->size);
 307 #else
 308                 /* LEGACY image not supported */
 309                 debug("Legacy boot image support not enabled, proceeding to other boot methods\n");
 310                 return -EINVAL;
 311 #endif
 312         } else {
 313 #ifdef CONFIG_SPL_PANIC_ON_RAW_IMAGE
 314                 /*
 315                  * CONFIG_SPL_PANIC_ON_RAW_IMAGE is defined when the
 316                  * code which loads images in SPL cannot guarantee that
 317                  * absolutely all read errors will be reported.
 318                  * An example is the LPC32XX MLC NAND driver, which
 319                  * will consider that a completely unreadable NAND block
 320                  * is bad, and thus should be skipped silently.
 321                  */
 322                 panic("** no mkimage signature but raw image not supported");
 323 #endif
 324
 325 #ifdef CONFIG_SPL_OS_BOOT
 326                 ulong start, end;
 327
 328                 if (!bootz_setup((ulong)header, &start, &end)) {
 329                         spl_image->name = "Linux";
 330                         spl_image->os = IH_OS_LINUX;
 331                         spl_image->load_addr = CONFIG_SYS_LOAD_ADDR;
 332                         spl_image->entry_point = CONFIG_SYS_LOAD_ADDR;
 333                         spl_image->size = end - start;
 334                         debug(SPL_TPL_PROMPT
 335                               "payload zImage, load addr: 0x%lx size: %d\n",
 336                               spl_image->load_addr, spl_image->size);
 337                         return 0;
 338                 }
 339 #endif
 340
 341 #ifdef CONFIG_SPL_RAW_IMAGE_SUPPORT
 342                 /* Signature not found - assume u-boot.bin */
 343                 debug("mkimage signature not found - ih_magic = %x\n",
 344                         header->ih_magic);
 345                 spl_set_header_raw_uboot(spl_image);
 346 #else
 347                 /* RAW image not supported, proceed to other boot methods. */
 348                 debug("Raw boot image support not enabled, proceeding to other boot methods\n");
 349                 return -EINVAL;
 350 #endif
 351         }
 352
 353         return 0;
 354 }
 355
 356 __weak void __noreturn jump_to_image_no_args(struct spl_image_info *spl_image)
 357 {
 358         typedef void __noreturn (*image_entry_noargs_t)(void);
 359
 360         image_entry_noargs_t image_entry =
 361                 (image_entry_noargs_t)spl_image->entry_point;
 362
 363         debug("image entry point: 0x%lx\n", spl_image->entry_point);
 364         image_entry();
 365 }
 366
 367 #if CONFIG_IS_ENABLED(HANDOFF)
 368 /**
 369  * Set up the SPL hand-off information
 370  *
 371  * This is initially empty (zero) but can be written by
 372  */
 373 static int setup_spl_handoff(void)
 374 {
 375         struct spl_handoff *ho;
 376
 377         ho = bloblist_ensure(BLOBLISTT_SPL_HANDOFF, sizeof(struct spl_handoff));
 378         if (!ho)
 379                 return -ENOENT;
 380
 381         return 0;
 382 }
 383
 384 __weak int handoff_arch_save(struct spl_handoff *ho)
 385 {
 386         return 0;
 387 }
 388
 389 static int write_spl_handoff(void)
 390 {
 391         struct spl_handoff *ho;
 392         int ret;
 393
 394         ho = bloblist_find(BLOBLISTT_SPL_HANDOFF, sizeof(struct spl_handoff));
 395         if (!ho)
 396                 return -ENOENT;
 397         handoff_save_dram(ho);
 398         ret = handoff_arch_save(ho);
 399         if (ret)
 400                 return ret;
 401         debug(SPL_TPL_PROMPT "Wrote SPL handoff\n");
 402
 403         return 0;
 404 }
 405 #else
 406 static inline int setup_spl_handoff(void) { return 0; }
 407 static inline int write_spl_handoff(void) { return 0; }
 408
 409 #endif /* HANDOFF */
 410
 411 static int spl_common_init(bool setup_malloc)
 412 {
 413         int ret;
 414
 415 #if CONFIG_VAL(SYS_MALLOC_F_LEN)
 416         if (setup_malloc) {
 417 #ifdef CONFIG_MALLOC_F_ADDR
 418                 gd->malloc_base = CONFIG_MALLOC_F_ADDR;
 419 #endif
 420                 gd->malloc_limit = CONFIG_VAL(SYS_MALLOC_F_LEN);
 421                 gd->malloc_ptr = 0;
 422         }
 423 #endif
 424         ret = bootstage_init(u_boot_first_phase());
 425         if (ret) {
 426                 debug("%s: Failed to set up bootstage: ret=%d\n", __func__,
 427                       ret);
 428                 return ret;
 429         }
 430 #ifdef CONFIG_BOOTSTAGE_STASH
 431         if (!u_boot_first_phase()) {
 432                 const void *stash = map_sysmem(CONFIG_BOOTSTAGE_STASH_ADDR,
 433                                                CONFIG_BOOTSTAGE_STASH_SIZE);
 434
 435                 ret = bootstage_unstash(stash, CONFIG_BOOTSTAGE_STASH_SIZE);
 436                 if (ret)
 437                         debug("%s: Failed to unstash bootstage: ret=%d\n",
 438                               __func__, ret);
 439         }
 440 #endif /* CONFIG_BOOTSTAGE_STASH */
 441         bootstage_mark_name(spl_phase() == PHASE_TPL ? BOOTSTAGE_ID_START_TPL :
 442                             BOOTSTAGE_ID_START_SPL, SPL_TPL_NAME);
 443 #if CONFIG_IS_ENABLED(LOG)
 444         ret = log_init();
 445         if (ret) {
 446                 debug("%s: Failed to set up logging\n", __func__);
 447                 return ret;
 448         }
 449 #endif
 450         if (CONFIG_IS_ENABLED(OF_CONTROL) && !CONFIG_IS_ENABLED(OF_PLATDATA)) {
 451                 ret = fdtdec_setup();
 452                 if (ret) {
 453                         debug("fdtdec_setup() returned error %d\n", ret);
 454                         return ret;
 455                 }
 456         }
 457         if (CONFIG_IS_ENABLED(DM)) {
 458                 bootstage_start(BOOTSTATE_ID_ACCUM_DM_SPL,
 459                                 spl_phase() == PHASE_TPL ? "dm tpl" : "dm_spl");
 460                 /* With CONFIG_SPL_OF_PLATDATA, bring in all devices */
 461                 ret = dm_init_and_scan(!CONFIG_IS_ENABLED(OF_PLATDATA));
 462                 bootstage_accum(BOOTSTATE_ID_ACCUM_DM_SPL);
 463                 if (ret) {
 464                         debug("dm_init_and_scan() returned error %d\n", ret);
 465                         return ret;
 466                 }
 467         }
 468
 469         return 0;
 470 }
 471
 472 void spl_set_bd(void)
 473 {
 474         /*
 475          * NOTE: On some platforms (e.g. x86) bdata may be in flash and not
 476          * writeable.
 477          */
 478         if (!gd->bd)
 479                 gd->bd = &bdata;
 480 }
 481
 482 int spl_early_init(void)
 483 {
 484         int ret;
 485
 486         debug("%s\n", __func__);
 487
 488         ret = spl_common_init(true);
 489         if (ret)
 490                 return ret;
 491         gd->flags |= GD_FLG_SPL_EARLY_INIT;
 492
 493         return 0;
 494 }
 495
 496 int spl_init(void)
 497 {
 498         int ret;
 499         bool setup_malloc = !(IS_ENABLED(CONFIG_SPL_STACK_R) &&
 500                         IS_ENABLED(CONFIG_SPL_SYS_MALLOC_SIMPLE));
 501
 502         debug("%s\n", __func__);
 503
 504         if (!(gd->flags & GD_FLG_SPL_EARLY_INIT)) {
 505                 ret = spl_common_init(setup_malloc);
 506                 if (ret)
 507                         return ret;
 508         }
 509         gd->flags |= GD_FLG_SPL_INIT;
 510
 511         return 0;
 512 }
 513
 514 #ifndef BOOT_DEVICE_NONE
 515 #define BOOT_DEVICE_NONE 0xdeadbeef
 516 #endif
 517
 518 __weak void board_boot_order(u32 *spl_boot_list)
 519 {
 520         spl_boot_list[0] = spl_boot_device();
 521 }
 522
 523 static struct spl_image_loader *spl_ll_find_loader(uint boot_device)
 524 {
 525         struct spl_image_loader *drv =
 526                 ll_entry_start(struct spl_image_loader, spl_image_loader);
 527         const int n_ents =
 528                 ll_entry_count(struct spl_image_loader, spl_image_loader);
 529         struct spl_image_loader *entry;
 530
 531         for (entry = drv; entry != drv + n_ents; entry++) {
 532                 if (boot_device == entry->boot_device)
 533                         return entry;
 534         }
 535
 536         /* Not found */
 537         return NULL;
 538 }
 539
 540 static int spl_load_image(struct spl_image_info *spl_image,
 541                           struct spl_image_loader *loader)
 542 {
 543         int ret;
 544         struct spl_boot_device bootdev;
 545
 546         bootdev.boot_device = loader->boot_device;
 547         bootdev.boot_device_name = NULL;
 548
 549         ret = loader->load_image(spl_image, &bootdev);
 550 #ifdef CONFIG_SPL_LEGACY_IMAGE_CRC_CHECK
 551         if (!ret && spl_image->dcrc_length) {
 552                 /* check data crc */
 553                 ulong dcrc = crc32_wd(0, (unsigned char *)spl_image->dcrc_data,
 554                                       spl_image->dcrc_length, CHUNKSZ_CRC32);
 555                 if (dcrc != spl_image->dcrc) {
 556                         puts("SPL: Image data CRC check failed!\n");
 557                         ret = -EINVAL;
 558                 }
 559         }
 560 #endif
 561         return ret;
 562 }
 563
 564 /**
 565  * boot_from_devices() - Try loading a booting U-Boot from a list of devices
 566  *
 567  * @spl_image: Place to put the image details if successful
 568  * @spl_boot_list: List of boot devices to try
 569  * @count: Number of elements in spl_boot_list
 570  * @return 0 if OK, -ve on error
 571  */
 572 static int boot_from_devices(struct spl_image_info *spl_image,
 573                              u32 spl_boot_list[], int count)
 574 {
 575         int i;
 576
 577         for (i = 0; i < count && spl_boot_list[i] != BOOT_DEVICE_NONE; i++) {
 578                 struct spl_image_loader *loader;
 579
 580                 loader = spl_ll_find_loader(spl_boot_list[i]);
 581 #if defined(CONFIG_SPL_SERIAL_SUPPORT) && defined(CONFIG_SPL_LIBCOMMON_SUPPORT)
 582                 if (loader)
 583                         printf("Trying to boot from %s\n", loader->name);
 584                 else
 585                         puts(SPL_TPL_PROMPT "Unsupported Boot Device!\n");
 586 #endif
 587                 if (loader && !spl_load_image(spl_image, loader)) {
 588                         spl_image->boot_device = spl_boot_list[i];
 589                         return 0;
 590                 }
 591         }
 592
 593         return -ENODEV;
 594 }
 595
 596 #if defined(CONFIG_SPL_FRAMEWORK_BOARD_INIT_F)
 597 void board_init_f(ulong dummy)
 598 {
 599         if (CONFIG_IS_ENABLED(OF_CONTROL)) {
 600                 int ret;
 601
 602                 ret = spl_early_init();
 603                 if (ret) {
 604                         debug("spl_early_init() failed: %d\n", ret);
 605                         hang();
 606                 }
 607         }
 608
 609         if (CONFIG_IS_ENABLED(SERIAL_SUPPORT))
 610                 preloader_console_init();
 611 }
 612 #endif
 613
 614 void board_init_r(gd_t *dummy1, ulong dummy2)
 615 {
 616         u32 spl_boot_list[] = {
 617                 BOOT_DEVICE_NONE,
 618                 BOOT_DEVICE_NONE,
 619                 BOOT_DEVICE_NONE,
 620                 BOOT_DEVICE_NONE,
 621                 BOOT_DEVICE_NONE,
 622         };
 623         struct spl_image_info spl_image;
 624         int ret;
 625
 626         debug(">>" SPL_TPL_PROMPT "board_init_r()\n");
 627
 628         spl_set_bd();
 629
 630 #if defined(CONFIG_SYS_SPL_MALLOC_START)
 631         mem_malloc_init(CONFIG_SYS_SPL_MALLOC_START,
 632                         CONFIG_SYS_SPL_MALLOC_SIZE);
 633         gd->flags |= GD_FLG_FULL_MALLOC_INIT;
 634 #endif
 635         if (!(gd->flags & GD_FLG_SPL_INIT)) {
 636                 if (spl_init())
 637                         hang();
 638         }
 639 #if !defined(CONFIG_PPC) && !defined(CONFIG_ARCH_MX6)
 640         /*
 641          * timer_init() does not exist on PPC systems. The timer is initialized
 642          * and enabled (decrementer) in interrupt_init() here.
 643          */
 644         timer_init();
 645 #endif
 646         if (CONFIG_IS_ENABLED(BLOBLIST)) {
 647                 ret = bloblist_init();
 648                 if (ret) {
 649                         debug("%s: Failed to set up bloblist: ret=%d\n",
 650                               __func__, ret);
 651                         puts(SPL_TPL_PROMPT "Cannot set up bloblist\n");
 652                         hang();
 653                 }
 654         }
 655         if (CONFIG_IS_ENABLED(HANDOFF)) {
 656                 int ret;
 657
 658                 ret = setup_spl_handoff();
 659                 if (ret) {
 660                         puts(SPL_TPL_PROMPT "Cannot set up SPL handoff\n");
 661                         hang();
 662                 }
 663         }
 664
 665 #if CONFIG_IS_ENABLED(BOARD_INIT)
 666         spl_board_init();
 667 #endif
 668
 669 #if defined(CONFIG_SPL_WATCHDOG_SUPPORT) && CONFIG_IS_ENABLED(WDT)
 670         initr_watchdog();
 671 #endif
 672
 673         if (IS_ENABLED(CONFIG_SPL_OS_BOOT) || CONFIG_IS_ENABLED(HANDOFF))
 674                 dram_init_banksize();
 675
 676         bootcount_inc();
 677
 678         memset(&spl_image, '\0', sizeof(spl_image));
 679 #ifdef CONFIG_SYS_SPL_ARGS_ADDR
 680         spl_image.arg = (void *)CONFIG_SYS_SPL_ARGS_ADDR;
 681 #endif
 682         spl_image.boot_device = BOOT_DEVICE_NONE;
 683         board_boot_order(spl_boot_list);
 684
 685         if (boot_from_devices(&spl_image, spl_boot_list,
 686                               ARRAY_SIZE(spl_boot_list))) {
 687                 puts(SPL_TPL_PROMPT "failed to boot from all boot devices\n");
 688                 hang();
 689         }
 690
 691         spl_perform_fixups(&spl_image);
 692         if (CONFIG_IS_ENABLED(HANDOFF)) {
 693                 ret = write_spl_handoff();
 694                 if (ret)
 695                         printf(SPL_TPL_PROMPT
 696                                "SPL hand-off write failed (err=%d)\n", ret);
 697         }
 698         if (CONFIG_IS_ENABLED(BLOBLIST)) {
 699                 ret = bloblist_finish();
 700                 if (ret)
 701                         printf("Warning: Failed to finish bloblist (ret=%d)\n",
 702                                ret);
 703         }
 704
 705 #ifdef CONFIG_CPU_V7M
 706         spl_image.entry_point |= 0x1;
 707 #endif
 708         switch (spl_image.os) {
 709         case IH_OS_U_BOOT:
 710                 debug("Jumping to U-Boot\n");
 711                 break;
 712 #if CONFIG_IS_ENABLED(ATF)
 713         case IH_OS_ARM_TRUSTED_FIRMWARE:
 714                 debug("Jumping to U-Boot via ARM Trusted Firmware\n");
 715                 spl_invoke_atf(&spl_image);
 716                 break;
 717 #endif
 718 #if CONFIG_IS_ENABLED(OPTEE)
 719         case IH_OS_TEE:
 720                 debug("Jumping to U-Boot via OP-TEE\n");
 721                 spl_optee_entry(NULL, NULL, spl_image.fdt_addr,
 722                                 (void *)spl_image.entry_point);
 723                 break;
 724 #endif
 725 #if CONFIG_IS_ENABLED(OPENSBI)
 726         case IH_OS_OPENSBI:
 727                 debug("Jumping to U-Boot via RISC-V OpenSBI\n");
 728                 spl_invoke_opensbi(&spl_image);
 729                 break;
 730 #endif
 731 #ifdef CONFIG_SPL_OS_BOOT
 732         case IH_OS_LINUX:
 733                 debug("Jumping to Linux\n");
 734                 spl_fixup_fdt();
 735                 spl_board_prepare_for_linux();
 736                 jump_to_image_linux(&spl_image);
 737 #endif
 738         default:
 739                 debug("Unsupported OS image.. Jumping nevertheless..\n");
 740         }
 741 #if CONFIG_VAL(SYS_MALLOC_F_LEN) && !defined(CONFIG_SYS_SPL_MALLOC_SIZE)
 742         debug("SPL malloc() used 0x%lx bytes (%ld KB)\n", gd->malloc_ptr,
 743               gd->malloc_ptr / 1024);
 744 #endif
 745         bootstage_mark_name(spl_phase() == PHASE_TPL ? BOOTSTAGE_ID_END_TPL :
 746                             BOOTSTAGE_ID_END_SPL, "end " SPL_TPL_NAME);
 747 #ifdef CONFIG_BOOTSTAGE_STASH
 748         ret = bootstage_stash((void *)CONFIG_BOOTSTAGE_STASH_ADDR,
 749                               CONFIG_BOOTSTAGE_STASH_SIZE);
 750         if (ret)
 751                 debug("Failed to stash bootstage: err=%d\n", ret);
 752 #endif
 753
 754         debug("loaded - jumping to U-Boot...\n");
 755         spl_board_prepare_for_boot();
 756         jump_to_image_no_args(&spl_image);
 757 }
 758
 759 #ifdef CONFIG_SPL_SERIAL_SUPPORT
 760 /*
 761  * This requires UART clocks to be enabled.  In order for this to work the
 762  * caller must ensure that the gd pointer is valid.
 763  */
 764 void preloader_console_init(void)
 765 {
 766         gd->baudrate = CONFIG_BAUDRATE;
 767
 768         serial_init();          /* serial communications setup */
 769
 770         gd->have_console = 1;
 771
 772 #if CONFIG_IS_ENABLED(BANNER_PRINT)
 773         puts("\nU-Boot " SPL_TPL_NAME " " PLAIN_VERSION " (" U_BOOT_DATE " - "
 774              U_BOOT_TIME " " U_BOOT_TZ ")\n");
 775 #endif
 776 #ifdef CONFIG_SPL_DISPLAY_PRINT
 777         spl_display_print();
 778 #endif
 779 }
 780 #endif
 781
 782 /**
 783  * This function is called before the stack is changed from initial stack to
 784  * relocated stack. It tries to dump the stack size used
 785  */
 786 __weak void spl_relocate_stack_check(void)
 787 {
 788 #if CONFIG_IS_ENABLED(SYS_REPORT_STACK_F_USAGE)
 789         ulong init_sp = gd->start_addr_sp;
 790         ulong stack_bottom = init_sp - CONFIG_VAL(SIZE_LIMIT_PROVIDE_STACK);
 791         u8 *ptr = (u8 *)stack_bottom;
 792         ulong i;
 793
 794         for (i = 0; i < CONFIG_VAL(SIZE_LIMIT_PROVIDE_STACK); i++) {
 795                 if (*ptr != CONFIG_VAL(SYS_STACK_F_CHECK_BYTE))
 796                         break;
 797                 ptr++;
 798         }
 799         printf("SPL initial stack usage: %lu bytes\n",
 800                CONFIG_VAL(SIZE_LIMIT_PROVIDE_STACK) - i);
 801 #endif
 802 }
 803
 804 /**
 805  * spl_relocate_stack_gd() - Relocate stack ready for board_init_r() execution
 806  *
 807  * Sometimes board_init_f() runs with a stack in SRAM but we want to use SDRAM
 808  * for the main board_init_r() execution. This is typically because we need
 809  * more stack space for things like the MMC sub-system.
 810  *
 811  * This function calculates the stack position, copies the global_data into
 812  * place, sets the new gd (except for ARM, for which setting GD within a C
 813  * function may not always work) and returns the new stack position. The
 814  * caller is responsible for setting up the sp register and, in the case
 815  * of ARM, setting up gd.
 816  *
 817  * All of this is done using the same layout and alignments as done in
 818  * board_init_f_init_reserve() / board_init_f_alloc_reserve().
 819  *
 820  * @return new stack location, or 0 to use the same stack
 821  */
 822 ulong spl_relocate_stack_gd(void)
 823 {
 824 #ifdef CONFIG_SPL_STACK_R
 825         gd_t *new_gd;
 826         ulong ptr = CONFIG_SPL_STACK_R_ADDR;
 827
 828         if (CONFIG_IS_ENABLED(SYS_REPORT_STACK_F_USAGE))
 829                 spl_relocate_stack_check();
 830
 831 #if defined(CONFIG_SPL_SYS_MALLOC_SIMPLE) && CONFIG_VAL(SYS_MALLOC_F_LEN)
 832         if (CONFIG_SPL_STACK_R_MALLOC_SIMPLE_LEN) {
 833                 debug("SPL malloc() before relocation used 0x%lx bytes (%ld KB)\n",
 834                       gd->malloc_ptr, gd->malloc_ptr / 1024);
 835                 ptr -= CONFIG_SPL_STACK_R_MALLOC_SIMPLE_LEN;
 836                 gd->malloc_base = ptr;
 837                 gd->malloc_limit = CONFIG_SPL_STACK_R_MALLOC_SIMPLE_LEN;
 838                 gd->malloc_ptr = 0;
 839         }
 840 #endif
 841         /* Get stack position: use 8-byte alignment for ABI compliance */
 842         ptr = CONFIG_SPL_STACK_R_ADDR - roundup(sizeof(gd_t),16);
 843         new_gd = (gd_t *)ptr;
 844         memcpy(new_gd, (void *)gd, sizeof(gd_t));
 845 #if CONFIG_IS_ENABLED(DM)
 846         dm_fixup_for_gd_move(new_gd);
 847 #endif
 848 #if !defined(CONFIG_ARM) && !defined(CONFIG_RISCV)
 849         gd = new_gd;
 850 #endif
 851         return ptr;
 852 #else
 853         return 0;
 854 #endif
 855 }
 856
 857 #if defined(CONFIG_BOOTCOUNT_LIMIT) && !defined(CONFIG_SPL_BOOTCOUNT_LIMIT)
 858 void bootcount_store(ulong a)
 859 {
 860 }
 861
 862 ulong bootcount_load(void)
 863 {
 864         return 0;
 865 }
 866 #endif