git.sur5r.net Git - u-boot/blob - common/cmd_bootm.c

   1 /*
   2  * (C) Copyright 2000-2009
   3  * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
   4  *
   5  * See file CREDITS for list of people who contributed to this
   6  * project.
   7  *
   8  * This program is free software; you can redistribute it and/or
   9  * modify it under the terms of the GNU General Public License as
  10  * published by the Free Software Foundation; either version 2 of
  11  * the License, or (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  21  * MA 02111-1307 USA
  22  */
  23
  24
  25 /*
  26  * Boot support
  27  */
  28 #include <common.h>
  29 #include <watchdog.h>
  30 #include <command.h>
  31 #include <image.h>
  32 #include <malloc.h>
  33 #include <u-boot/zlib.h>
  34 #include <bzlib.h>
  35 #include <environment.h>
  36 #include <lmb.h>
  37 #include <linux/ctype.h>
  38 #include <asm/byteorder.h>
  39
  40 #if defined(CONFIG_CMD_USB)
  41 #include <usb.h>
  42 #endif
  43
  44 #ifdef CONFIG_SYS_HUSH_PARSER
  45 #include <hush.h>
  46 #endif
  47
  48 #if defined(CONFIG_OF_LIBFDT)
  49 #include <fdt.h>
  50 #include <libfdt.h>
  51 #include <fdt_support.h>
  52 #endif
  53
  54 #ifdef CONFIG_LZMA
  55 #include <lzma/LzmaTypes.h>
  56 #include <lzma/LzmaDec.h>
  57 #include <lzma/LzmaTools.h>
  58 #endif /* CONFIG_LZMA */
  59
  60 #ifdef CONFIG_LZO
  61 #include <linux/lzo.h>
  62 #endif /* CONFIG_LZO */
  63
  64 DECLARE_GLOBAL_DATA_PTR;
  65
  66 #ifndef CONFIG_SYS_BOOTM_LEN
  67 #define CONFIG_SYS_BOOTM_LEN    0x800000        /* use 8MByte as default max gunzip size */
  68 #endif
  69
  70 #ifdef CONFIG_BZIP2
  71 extern void bz_internal_error(int);
  72 #endif
  73
  74 #if defined(CONFIG_CMD_IMI)
  75 static int image_info (unsigned long addr);
  76 #endif
  77
  78 #if defined(CONFIG_CMD_IMLS)
  79 #include <flash.h>
  80 extern flash_info_t flash_info[]; /* info for FLASH chips */
  81 static int do_imls (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
  82 #endif
  83
  84 #ifdef CONFIG_SILENT_CONSOLE
  85 static void fixup_silent_linux (void);
  86 #endif
  87
  88 static image_header_t *image_get_kernel (ulong img_addr, int verify);
  89 #if defined(CONFIG_FIT)
  90 static int fit_check_kernel (const void *fit, int os_noffset, int verify);
  91 #endif
  92
  93 static void *boot_get_kernel (cmd_tbl_t *cmdtp, int flag,int argc, char *argv[],
  94                 bootm_headers_t *images, ulong *os_data, ulong *os_len);
  95 extern int do_reset (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
  96
  97 /*
  98  *  Continue booting an OS image; caller already has:
  99  *  - copied image header to global variable `header'
 100  *  - checked header magic number, checksums (both header & image),
 101  *  - verified image architecture (PPC) and type (KERNEL or MULTI),
 102  *  - loaded (first part of) image to header load address,
 103  *  - disabled interrupts.
 104  */
 105 typedef int boot_os_fn (int flag, int argc, char *argv[],
 106                         bootm_headers_t *images); /* pointers to os/initrd/fdt */
 107
 108 #ifdef CONFIG_BOOTM_LINUX
 109 extern boot_os_fn do_bootm_linux;
 110 #endif
 111 #ifdef CONFIG_BOOTM_NETBSD
 112 static boot_os_fn do_bootm_netbsd;
 113 #endif
 114 #if defined(CONFIG_LYNXKDI)
 115 static boot_os_fn do_bootm_lynxkdi;
 116 extern void lynxkdi_boot (image_header_t *);
 117 #endif
 118 #ifdef CONFIG_BOOTM_RTEMS
 119 static boot_os_fn do_bootm_rtems;
 120 #endif
 121 #if defined(CONFIG_CMD_ELF)
 122 static boot_os_fn do_bootm_vxworks;
 123 static boot_os_fn do_bootm_qnxelf;
 124 int do_bootvx (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
 125 int do_bootelf (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
 126 #endif
 127 #if defined(CONFIG_INTEGRITY)
 128 static boot_os_fn do_bootm_integrity;
 129 #endif
 130
 131 static boot_os_fn *boot_os[] = {
 132 #ifdef CONFIG_BOOTM_LINUX
 133         [IH_OS_LINUX] = do_bootm_linux,
 134 #endif
 135 #ifdef CONFIG_BOOTM_NETBSD
 136         [IH_OS_NETBSD] = do_bootm_netbsd,
 137 #endif
 138 #ifdef CONFIG_LYNXKDI
 139         [IH_OS_LYNXOS] = do_bootm_lynxkdi,
 140 #endif
 141 #ifdef CONFIG_BOOTM_RTEMS
 142         [IH_OS_RTEMS] = do_bootm_rtems,
 143 #endif
 144 #if defined(CONFIG_CMD_ELF)
 145         [IH_OS_VXWORKS] = do_bootm_vxworks,
 146         [IH_OS_QNX] = do_bootm_qnxelf,
 147 #endif
 148 #ifdef CONFIG_INTEGRITY
 149         [IH_OS_INTEGRITY] = do_bootm_integrity,
 150 #endif
 151 };
 152
 153 ulong load_addr = CONFIG_SYS_LOAD_ADDR; /* Default Load Address */
 154 static bootm_headers_t images;          /* pointers to os/initrd/fdt images */
 155
 156 void __board_lmb_reserve(struct lmb *lmb)
 157 {
 158         /* please define platform specific board_lmb_reserve() */
 159 }
 160 void board_lmb_reserve(struct lmb *lmb) __attribute__((weak, alias("__board_lmb_reserve")));
 161
 162 void __arch_lmb_reserve(struct lmb *lmb)
 163 {
 164         /* please define platform specific arch_lmb_reserve() */
 165 }
 166 void arch_lmb_reserve(struct lmb *lmb) __attribute__((weak, alias("__arch_lmb_reserve")));
 167
 168 /* Allow for arch specific config before we boot */
 169 void __arch_preboot_os(void)
 170 {
 171         /* please define platform specific arch_preboot_os() */
 172 }
 173 void arch_preboot_os(void) __attribute__((weak, alias("__arch_preboot_os")));
 174
 175 #if defined(__ARM__)
 176   #define IH_INITRD_ARCH IH_ARCH_ARM
 177 #elif defined(__avr32__)
 178   #define IH_INITRD_ARCH IH_ARCH_AVR32
 179 #elif defined(__bfin__)
 180   #define IH_INITRD_ARCH IH_ARCH_BLACKFIN
 181 #elif defined(__I386__)
 182   #define IH_INITRD_ARCH IH_ARCH_I386
 183 #elif defined(__M68K__)
 184   #define IH_INITRD_ARCH IH_ARCH_M68K
 185 #elif defined(__microblaze__)
 186   #define IH_INITRD_ARCH IH_ARCH_MICROBLAZE
 187 #elif defined(__mips__)
 188   #define IH_INITRD_ARCH IH_ARCH_MIPS
 189 #elif defined(__nios__)
 190   #define IH_INITRD_ARCH IH_ARCH_NIOS
 191 #elif defined(__nios2__)
 192   #define IH_INITRD_ARCH IH_ARCH_NIOS2
 193 #elif defined(__PPC__)
 194   #define IH_INITRD_ARCH IH_ARCH_PPC
 195 #elif defined(__sh__)
 196   #define IH_INITRD_ARCH IH_ARCH_SH
 197 #elif defined(__sparc__)
 198   #define IH_INITRD_ARCH IH_ARCH_SPARC
 199 #else
 200 # error Unknown CPU type
 201 #endif
 202
 203 static int bootm_start(cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
 204 {
 205         ulong           mem_start;
 206         phys_size_t     mem_size;
 207         void            *os_hdr;
 208         int             ret;
 209
 210         memset ((void *)&images, 0, sizeof (images));
 211         images.verify = getenv_yesno ("verify");
 212
 213         lmb_init(&images.lmb);
 214
 215         mem_start = getenv_bootm_low();
 216         mem_size = getenv_bootm_size();
 217
 218         lmb_add(&images.lmb, (phys_addr_t)mem_start, mem_size);
 219
 220         arch_lmb_reserve(&images.lmb);
 221         board_lmb_reserve(&images.lmb);
 222
 223         /* get kernel image header, start address and length */
 224         os_hdr = boot_get_kernel (cmdtp, flag, argc, argv,
 225                         &images, &images.os.image_start, &images.os.image_len);
 226         if (images.os.image_len == 0) {
 227                 puts ("ERROR: can't get kernel image!\n");
 228                 return 1;
 229         }
 230
 231         /* get image parameters */
 232         switch (genimg_get_format (os_hdr)) {
 233         case IMAGE_FORMAT_LEGACY:
 234                 images.os.type = image_get_type (os_hdr);
 235                 images.os.comp = image_get_comp (os_hdr);
 236                 images.os.os = image_get_os (os_hdr);
 237
 238                 images.os.end = image_get_image_end (os_hdr);
 239                 images.os.load = image_get_load (os_hdr);
 240                 break;
 241 #if defined(CONFIG_FIT)
 242         case IMAGE_FORMAT_FIT:
 243                 if (fit_image_get_type (images.fit_hdr_os,
 244                                         images.fit_noffset_os, &images.os.type)) {
 245                         puts ("Can't get image type!\n");
 246                         show_boot_progress (-109);
 247                         return 1;
 248                 }
 249
 250                 if (fit_image_get_comp (images.fit_hdr_os,
 251                                         images.fit_noffset_os, &images.os.comp)) {
 252                         puts ("Can't get image compression!\n");
 253                         show_boot_progress (-110);
 254                         return 1;
 255                 }
 256
 257                 if (fit_image_get_os (images.fit_hdr_os,
 258                                         images.fit_noffset_os, &images.os.os)) {
 259                         puts ("Can't get image OS!\n");
 260                         show_boot_progress (-111);
 261                         return 1;
 262                 }
 263
 264                 images.os.end = fit_get_end (images.fit_hdr_os);
 265
 266                 if (fit_image_get_load (images.fit_hdr_os, images.fit_noffset_os,
 267                                         &images.os.load)) {
 268                         puts ("Can't get image load address!\n");
 269                         show_boot_progress (-112);
 270                         return 1;
 271                 }
 272                 break;
 273 #endif
 274         default:
 275                 puts ("ERROR: unknown image format type!\n");
 276                 return 1;
 277         }
 278
 279         /* find kernel entry point */
 280         if (images.legacy_hdr_valid) {
 281                 images.ep = image_get_ep (&images.legacy_hdr_os_copy);
 282 #if defined(CONFIG_FIT)
 283         } else if (images.fit_uname_os) {
 284                 ret = fit_image_get_entry (images.fit_hdr_os,
 285                                 images.fit_noffset_os, &images.ep);
 286                 if (ret) {
 287                         puts ("Can't get entry point property!\n");
 288                         return 1;
 289                 }
 290 #endif
 291         } else {
 292                 puts ("Could not find kernel entry point!\n");
 293                 return 1;
 294         }
 295
 296         if (images.os.os == IH_OS_LINUX) {
 297                 /* find ramdisk */
 298                 ret = boot_get_ramdisk (argc, argv, &images, IH_INITRD_ARCH,
 299                                 &images.rd_start, &images.rd_end);
 300                 if (ret) {
 301                         puts ("Ramdisk image is corrupt or invalid\n");
 302                         return 1;
 303                 }
 304
 305 #if defined(CONFIG_OF_LIBFDT)
 306 #if defined(CONFIG_PPC) || defined(CONFIG_M68K) || defined(CONFIG_SPARC)
 307                 /* find flattened device tree */
 308                 ret = boot_get_fdt (flag, argc, argv, &images,
 309                                     &images.ft_addr, &images.ft_len);
 310                 if (ret) {
 311                         puts ("Could not find a valid device tree\n");
 312                         return 1;
 313                 }
 314
 315                 set_working_fdt_addr(images.ft_addr);
 316 #endif
 317 #endif
 318         }
 319
 320         images.os.start = (ulong)os_hdr;
 321         images.state = BOOTM_STATE_START;
 322
 323         return 0;
 324 }
 325
 326 #define BOOTM_ERR_RESET         -1
 327 #define BOOTM_ERR_OVERLAP       -2
 328 #define BOOTM_ERR_UNIMPLEMENTED -3
 329 static int bootm_load_os(image_info_t os, ulong *load_end, int boot_progress)
 330 {
 331         uint8_t comp = os.comp;
 332         ulong load = os.load;
 333         ulong blob_start = os.start;
 334         ulong blob_end = os.end;
 335         ulong image_start = os.image_start;
 336         ulong image_len = os.image_len;
 337         uint unc_len = CONFIG_SYS_BOOTM_LEN;
 338
 339         const char *type_name = genimg_get_type_name (os.type);
 340
 341         switch (comp) {
 342         case IH_COMP_NONE:
 343                 if (load == blob_start) {
 344                         printf ("   XIP %s ... ", type_name);
 345                 } else {
 346                         printf ("   Loading %s ... ", type_name);
 347
 348                         if (load != image_start) {
 349                                 memmove_wd ((void *)load,
 350                                                 (void *)image_start, image_len, CHUNKSZ);
 351                         }
 352                 }
 353                 *load_end = load + image_len;
 354                 puts("OK\n");
 355                 break;
 356         case IH_COMP_GZIP:
 357                 printf ("   Uncompressing %s ... ", type_name);
 358                 if (gunzip ((void *)load, unc_len,
 359                                         (uchar *)image_start, &image_len) != 0) {
 360                         puts ("GUNZIP: uncompress, out-of-mem or overwrite error "
 361                                 "- must RESET board to recover\n");
 362                         if (boot_progress)
 363                                 show_boot_progress (-6);
 364                         return BOOTM_ERR_RESET;
 365                 }
 366
 367                 *load_end = load + image_len;
 368                 break;
 369 #ifdef CONFIG_BZIP2
 370         case IH_COMP_BZIP2:
 371                 printf ("   Uncompressing %s ... ", type_name);
 372                 /*
 373                  * If we've got less than 4 MB of malloc() space,
 374                  * use slower decompression algorithm which requires
 375                  * at most 2300 KB of memory.
 376                  */
 377                 int i = BZ2_bzBuffToBuffDecompress ((char*)load,
 378                                         &unc_len, (char *)image_start, image_len,
 379                                         CONFIG_SYS_MALLOC_LEN < (4096 * 1024), 0);
 380                 if (i != BZ_OK) {
 381                         printf ("BUNZIP2: uncompress or overwrite error %d "
 382                                 "- must RESET board to recover\n", i);
 383                         if (boot_progress)
 384                                 show_boot_progress (-6);
 385                         return BOOTM_ERR_RESET;
 386                 }
 387
 388                 *load_end = load + unc_len;
 389                 break;
 390 #endif /* CONFIG_BZIP2 */
 391 #ifdef CONFIG_LZMA
 392         case IH_COMP_LZMA:
 393                 printf ("   Uncompressing %s ... ", type_name);
 394
 395                 int ret = lzmaBuffToBuffDecompress(
 396                         (unsigned char *)load, &unc_len,
 397                         (unsigned char *)image_start, image_len);
 398                 if (ret != SZ_OK) {
 399                         printf ("LZMA: uncompress or overwrite error %d "
 400                                 "- must RESET board to recover\n", ret);
 401                         show_boot_progress (-6);
 402                         return BOOTM_ERR_RESET;
 403                 }
 404                 *load_end = load + unc_len;
 405                 break;
 406 #endif /* CONFIG_LZMA */
 407 #ifdef CONFIG_LZO
 408         case IH_COMP_LZO:
 409                 printf ("   Uncompressing %s ... ", type_name);
 410
 411                 int ret = lzop_decompress((const unsigned char *)image_start,
 412                                           image_len, (unsigned char *)load,
 413                                           &unc_len);
 414                 if (ret != LZO_E_OK) {
 415                         printf ("LZO: uncompress or overwrite error %d "
 416                               "- must RESET board to recover\n", ret);
 417                         if (boot_progress)
 418                                 show_boot_progress (-6);
 419                         return BOOTM_ERR_RESET;
 420                 }
 421
 422                 *load_end = load + unc_len;
 423                 break;
 424 #endif /* CONFIG_LZO */
 425         default:
 426                 printf ("Unimplemented compression type %d\n", comp);
 427                 return BOOTM_ERR_UNIMPLEMENTED;
 428         }
 429         puts ("OK\n");
 430         debug ("   kernel loaded at 0x%08lx, end = 0x%08lx\n", load, *load_end);
 431         if (boot_progress)
 432                 show_boot_progress (7);
 433
 434         if ((load < blob_end) && (*load_end > blob_start)) {
 435                 debug ("images.os.start = 0x%lX, images.os.end = 0x%lx\n", blob_start, blob_end);
 436                 debug ("images.os.load = 0x%lx, load_end = 0x%lx\n", load, *load_end);
 437
 438                 return BOOTM_ERR_OVERLAP;
 439         }
 440
 441         return 0;
 442 }
 443
 444 static int bootm_start_standalone(ulong iflag, int argc, char *argv[])
 445 {
 446         char  *s;
 447         int   (*appl)(int, char *[]);
 448
 449         /* Don't start if "autostart" is set to "no" */
 450         if (((s = getenv("autostart")) != NULL) && (strcmp(s, "no") == 0)) {
 451                 char buf[32];
 452                 sprintf(buf, "%lX", images.os.image_len);
 453                 setenv("filesize", buf);
 454                 return 0;
 455         }
 456         appl = (int (*)(int, char *[]))ntohl(images.ep);
 457         (*appl)(argc-1, &argv[1]);
 458
 459         return 0;
 460 }
 461
 462 /* we overload the cmd field with our state machine info instead of a
 463  * function pointer */
 464 cmd_tbl_t cmd_bootm_sub[] = {
 465         U_BOOT_CMD_MKENT(start, 0, 1, (void *)BOOTM_STATE_START, "", ""),
 466         U_BOOT_CMD_MKENT(loados, 0, 1, (void *)BOOTM_STATE_LOADOS, "", ""),
 467 #if defined(CONFIG_PPC) || defined(CONFIG_M68K) || defined(CONFIG_SPARC)
 468         U_BOOT_CMD_MKENT(ramdisk, 0, 1, (void *)BOOTM_STATE_RAMDISK, "", ""),
 469 #endif
 470 #ifdef CONFIG_OF_LIBFDT
 471         U_BOOT_CMD_MKENT(fdt, 0, 1, (void *)BOOTM_STATE_FDT, "", ""),
 472 #endif
 473         U_BOOT_CMD_MKENT(cmdline, 0, 1, (void *)BOOTM_STATE_OS_CMDLINE, "", ""),
 474         U_BOOT_CMD_MKENT(bdt, 0, 1, (void *)BOOTM_STATE_OS_BD_T, "", ""),
 475         U_BOOT_CMD_MKENT(prep, 0, 1, (void *)BOOTM_STATE_OS_PREP, "", ""),
 476         U_BOOT_CMD_MKENT(go, 0, 1, (void *)BOOTM_STATE_OS_GO, "", ""),
 477 };
 478
 479 int do_bootm_subcommand (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
 480 {
 481         int ret = 0;
 482         int state;
 483         cmd_tbl_t *c;
 484         boot_os_fn *boot_fn;
 485
 486         c = find_cmd_tbl(argv[1], &cmd_bootm_sub[0], ARRAY_SIZE(cmd_bootm_sub));
 487
 488         if (c) {
 489                 state = (int)c->cmd;
 490
 491                 /* treat start special since it resets the state machine */
 492                 if (state == BOOTM_STATE_START) {
 493                         argc--;
 494                         argv++;
 495                         return bootm_start(cmdtp, flag, argc, argv);
 496                 }
 497         }
 498         /* Unrecognized command */
 499         else {
 500                 cmd_usage(cmdtp);
 501                 return 1;
 502         }
 503
 504         if (images.state >= state) {
 505                 printf ("Trying to execute a command out of order\n");
 506                 cmd_usage(cmdtp);
 507                 return 1;
 508         }
 509
 510         images.state |= state;
 511         boot_fn = boot_os[images.os.os];
 512
 513         switch (state) {
 514                 ulong load_end;
 515                 case BOOTM_STATE_START:
 516                         /* should never occur */
 517                         break;
 518                 case BOOTM_STATE_LOADOS:
 519                         ret = bootm_load_os(images.os, &load_end, 0);
 520                         if (ret)
 521                                 return ret;
 522
 523                         lmb_reserve(&images.lmb, images.os.load,
 524                                         (load_end - images.os.load));
 525                         break;
 526 #if defined(CONFIG_PPC) || defined(CONFIG_M68K) || defined(CONFIG_SPARC)
 527                 case BOOTM_STATE_RAMDISK:
 528                 {
 529                         ulong rd_len = images.rd_end - images.rd_start;
 530                         char str[17];
 531
 532                         ret = boot_ramdisk_high(&images.lmb, images.rd_start,
 533                                 rd_len, &images.initrd_start, &images.initrd_end);
 534                         if (ret)
 535                                 return ret;
 536
 537                         sprintf(str, "%lx", images.initrd_start);
 538                         setenv("initrd_start", str);
 539                         sprintf(str, "%lx", images.initrd_end);
 540                         setenv("initrd_end", str);
 541                 }
 542                         break;
 543 #endif
 544 #if defined(CONFIG_OF_LIBFDT) && defined(CONFIG_SYS_BOOTMAPSZ)
 545                 case BOOTM_STATE_FDT:
 546                 {
 547                         ulong bootmap_base = getenv_bootm_low();
 548                         ret = boot_relocate_fdt(&images.lmb, bootmap_base,
 549                                 &images.ft_addr, &images.ft_len);
 550                         break;
 551                 }
 552 #endif
 553                 case BOOTM_STATE_OS_CMDLINE:
 554                         ret = boot_fn(BOOTM_STATE_OS_CMDLINE, argc, argv, &images);
 555                         if (ret)
 556                                 printf ("cmdline subcommand not supported\n");
 557                         break;
 558                 case BOOTM_STATE_OS_BD_T:
 559                         ret = boot_fn(BOOTM_STATE_OS_BD_T, argc, argv, &images);
 560                         if (ret)
 561                                 printf ("bdt subcommand not supported\n");
 562                         break;
 563                 case BOOTM_STATE_OS_PREP:
 564                         ret = boot_fn(BOOTM_STATE_OS_PREP, argc, argv, &images);
 565                         if (ret)
 566                                 printf ("prep subcommand not supported\n");
 567                         break;
 568                 case BOOTM_STATE_OS_GO:
 569                         disable_interrupts();
 570                         arch_preboot_os();
 571                         boot_fn(BOOTM_STATE_OS_GO, argc, argv, &images);
 572                         break;
 573         }
 574
 575         return ret;
 576 }
 577
 578 /*******************************************************************/
 579 /* bootm - boot application image from image in memory */
 580 /*******************************************************************/
 581
 582 int do_bootm (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
 583 {
 584         ulong           iflag;
 585         ulong           load_end = 0;
 586         int             ret;
 587         boot_os_fn      *boot_fn;
 588 #ifndef CONFIG_RELOC_FIXUP_WORKS
 589         static int relocated = 0;
 590
 591         /* relocate boot function table */
 592         if (!relocated) {
 593                 int i;
 594                 for (i = 0; i < ARRAY_SIZE(boot_os); i++)
 595                         if (boot_os[i] != NULL)
 596                                 boot_os[i] += gd->reloc_off;
 597                 relocated = 1;
 598         }
 599 #endif
 600
 601         /* determine if we have a sub command */
 602         if (argc > 1) {
 603                 char *endp;
 604
 605                 simple_strtoul(argv[1], &endp, 16);
 606                 /* endp pointing to NULL means that argv[1] was just a
 607                  * valid number, pass it along to the normal bootm processing
 608                  *
 609                  * If endp is ':' or '#' assume a FIT identifier so pass
 610                  * along for normal processing.
 611                  *
 612                  * Right now we assume the first arg should never be '-'
 613                  */
 614                 if ((*endp != 0) && (*endp != ':') && (*endp != '#'))
 615                         return do_bootm_subcommand(cmdtp, flag, argc, argv);
 616         }
 617
 618         if (bootm_start(cmdtp, flag, argc, argv))
 619                 return 1;
 620
 621         /*
 622          * We have reached the point of no return: we are going to
 623          * overwrite all exception vector code, so we cannot easily
 624          * recover from any failures any more...
 625          */
 626         iflag = disable_interrupts();
 627
 628 #if defined(CONFIG_CMD_USB)
 629         /*
 630          * turn off USB to prevent the host controller from writing to the
 631          * SDRAM while Linux is booting. This could happen (at least for OHCI
 632          * controller), because the HCCA (Host Controller Communication Area)
 633          * lies within the SDRAM and the host controller writes continously to
 634          * this area (as busmaster!). The HccaFrameNumber is for example
 635          * updated every 1 ms within the HCCA structure in SDRAM! For more
 636          * details see the OpenHCI specification.
 637          */
 638         usb_stop();
 639 #endif
 640
 641 #ifdef CONFIG_AMIGAONEG3SE
 642         /*
 643          * We've possible left the caches enabled during
 644          * bios emulation, so turn them off again
 645          */
 646         icache_disable();
 647         dcache_disable();
 648 #endif
 649
 650         ret = bootm_load_os(images.os, &load_end, 1);
 651
 652         if (ret < 0) {
 653                 if (ret == BOOTM_ERR_RESET)
 654                         do_reset (cmdtp, flag, argc, argv);
 655                 if (ret == BOOTM_ERR_OVERLAP) {
 656                         if (images.legacy_hdr_valid) {
 657                                 if (image_get_type (&images.legacy_hdr_os_copy) == IH_TYPE_MULTI)
 658                                         puts ("WARNING: legacy format multi component "
 659                                                 "image overwritten\n");
 660                         } else {
 661                                 puts ("ERROR: new format image overwritten - "
 662                                         "must RESET the board to recover\n");
 663                                 show_boot_progress (-113);
 664                                 do_reset (cmdtp, flag, argc, argv);
 665                         }
 666                 }
 667                 if (ret == BOOTM_ERR_UNIMPLEMENTED) {
 668                         if (iflag)
 669                                 enable_interrupts();
 670                         show_boot_progress (-7);
 671                         return 1;
 672                 }
 673         }
 674
 675         lmb_reserve(&images.lmb, images.os.load, (load_end - images.os.load));
 676
 677         if (images.os.type == IH_TYPE_STANDALONE) {
 678                 if (iflag)
 679                         enable_interrupts();
 680                 /* This may return when 'autostart' is 'no' */
 681                 bootm_start_standalone(iflag, argc, argv);
 682                 return 0;
 683         }
 684
 685         show_boot_progress (8);
 686
 687 #ifdef CONFIG_SILENT_CONSOLE
 688         if (images.os.os == IH_OS_LINUX)
 689                 fixup_silent_linux();
 690 #endif
 691
 692         boot_fn = boot_os[images.os.os];
 693
 694         if (boot_fn == NULL) {
 695                 if (iflag)
 696                         enable_interrupts();
 697                 printf ("ERROR: booting os '%s' (%d) is not supported\n",
 698                         genimg_get_os_name(images.os.os), images.os.os);
 699                 show_boot_progress (-8);
 700                 return 1;
 701         }
 702
 703         arch_preboot_os();
 704
 705         boot_fn(0, argc, argv, &images);
 706
 707         show_boot_progress (-9);
 708 #ifdef DEBUG
 709         puts ("\n## Control returned to monitor - resetting...\n");
 710 #endif
 711         do_reset (cmdtp, flag, argc, argv);
 712
 713         return 1;
 714 }
 715
 716 /**
 717  * image_get_kernel - verify legacy format kernel image
 718  * @img_addr: in RAM address of the legacy format image to be verified
 719  * @verify: data CRC verification flag
 720  *
 721  * image_get_kernel() verifies legacy image integrity and returns pointer to
 722  * legacy image header if image verification was completed successfully.
 723  *
 724  * returns:
 725  *     pointer to a legacy image header if valid image was found
 726  *     otherwise return NULL
 727  */
 728 static image_header_t *image_get_kernel (ulong img_addr, int verify)
 729 {
 730         image_header_t *hdr = (image_header_t *)img_addr;
 731
 732         if (!image_check_magic(hdr)) {
 733                 puts ("Bad Magic Number\n");
 734                 show_boot_progress (-1);
 735                 return NULL;
 736         }
 737         show_boot_progress (2);
 738
 739         if (!image_check_hcrc (hdr)) {
 740                 puts ("Bad Header Checksum\n");
 741                 show_boot_progress (-2);
 742                 return NULL;
 743         }
 744
 745         show_boot_progress (3);
 746         image_print_contents (hdr);
 747
 748         if (verify) {
 749                 puts ("   Verifying Checksum ... ");
 750                 if (!image_check_dcrc (hdr)) {
 751                         printf ("Bad Data CRC\n");
 752                         show_boot_progress (-3);
 753                         return NULL;
 754                 }
 755                 puts ("OK\n");
 756         }
 757         show_boot_progress (4);
 758
 759         if (!image_check_target_arch (hdr)) {
 760                 printf ("Unsupported Architecture 0x%x\n", image_get_arch (hdr));
 761                 show_boot_progress (-4);
 762                 return NULL;
 763         }
 764         return hdr;
 765 }
 766
 767 /**
 768  * fit_check_kernel - verify FIT format kernel subimage
 769  * @fit_hdr: pointer to the FIT image header
 770  * os_noffset: kernel subimage node offset within FIT image
 771  * @verify: data CRC verification flag
 772  *
 773  * fit_check_kernel() verifies integrity of the kernel subimage and from
 774  * specified FIT image.
 775  *
 776  * returns:
 777  *     1, on success
 778  *     0, on failure
 779  */
 780 #if defined (CONFIG_FIT)
 781 static int fit_check_kernel (const void *fit, int os_noffset, int verify)
 782 {
 783         fit_image_print (fit, os_noffset, "   ");
 784
 785         if (verify) {
 786                 puts ("   Verifying Hash Integrity ... ");
 787                 if (!fit_image_check_hashes (fit, os_noffset)) {
 788                         puts ("Bad Data Hash\n");
 789                         show_boot_progress (-104);
 790                         return 0;
 791                 }
 792                 puts ("OK\n");
 793         }
 794         show_boot_progress (105);
 795
 796         if (!fit_image_check_target_arch (fit, os_noffset)) {
 797                 puts ("Unsupported Architecture\n");
 798                 show_boot_progress (-105);
 799                 return 0;
 800         }
 801
 802         show_boot_progress (106);
 803         if (!fit_image_check_type (fit, os_noffset, IH_TYPE_KERNEL)) {
 804                 puts ("Not a kernel image\n");
 805                 show_boot_progress (-106);
 806                 return 0;
 807         }
 808
 809         show_boot_progress (107);
 810         return 1;
 811 }
 812 #endif /* CONFIG_FIT */
 813
 814 /**
 815  * boot_get_kernel - find kernel image
 816  * @os_data: pointer to a ulong variable, will hold os data start address
 817  * @os_len: pointer to a ulong variable, will hold os data length
 818  *
 819  * boot_get_kernel() tries to find a kernel image, verifies its integrity
 820  * and locates kernel data.
 821  *
 822  * returns:
 823  *     pointer to image header if valid image was found, plus kernel start
 824  *     address and length, otherwise NULL
 825  */
 826 static void *boot_get_kernel (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[],
 827                 bootm_headers_t *images, ulong *os_data, ulong *os_len)
 828 {
 829         image_header_t  *hdr;
 830         ulong           img_addr;
 831 #if defined(CONFIG_FIT)
 832         void            *fit_hdr;
 833         const char      *fit_uname_config = NULL;
 834         const char      *fit_uname_kernel = NULL;
 835         const void      *data;
 836         size_t          len;
 837         int             cfg_noffset;
 838         int             os_noffset;
 839 #endif
 840
 841         /* find out kernel image address */
 842         if (argc < 2) {
 843                 img_addr = load_addr;
 844                 debug ("*  kernel: default image load address = 0x%08lx\n",
 845                                 load_addr);
 846 #if defined(CONFIG_FIT)
 847         } else if (fit_parse_conf (argv[1], load_addr, &img_addr,
 848                                                         &fit_uname_config)) {
 849                 debug ("*  kernel: config '%s' from image at 0x%08lx\n",
 850                                 fit_uname_config, img_addr);
 851         } else if (fit_parse_subimage (argv[1], load_addr, &img_addr,
 852                                                         &fit_uname_kernel)) {
 853                 debug ("*  kernel: subimage '%s' from image at 0x%08lx\n",
 854                                 fit_uname_kernel, img_addr);
 855 #endif
 856         } else {
 857                 img_addr = simple_strtoul(argv[1], NULL, 16);
 858                 debug ("*  kernel: cmdline image address = 0x%08lx\n", img_addr);
 859         }
 860
 861         show_boot_progress (1);
 862
 863         /* copy from dataflash if needed */
 864         img_addr = genimg_get_image (img_addr);
 865
 866         /* check image type, for FIT images get FIT kernel node */
 867         *os_data = *os_len = 0;
 868         switch (genimg_get_format ((void *)img_addr)) {
 869         case IMAGE_FORMAT_LEGACY:
 870                 printf ("## Booting kernel from Legacy Image at %08lx ...\n",
 871                                 img_addr);
 872                 hdr = image_get_kernel (img_addr, images->verify);
 873                 if (!hdr)
 874                         return NULL;
 875                 show_boot_progress (5);
 876
 877                 /* get os_data and os_len */
 878                 switch (image_get_type (hdr)) {
 879                 case IH_TYPE_KERNEL:
 880                         *os_data = image_get_data (hdr);
 881                         *os_len = image_get_data_size (hdr);
 882                         break;
 883                 case IH_TYPE_MULTI:
 884                         image_multi_getimg (hdr, 0, os_data, os_len);
 885                         break;
 886                 case IH_TYPE_STANDALONE:
 887                         if (argc >2) {
 888                                 hdr->ih_load = htonl(simple_strtoul(argv[2], NULL, 16));
 889                         }
 890                         *os_data = image_get_data (hdr);
 891                         *os_len = image_get_data_size (hdr);
 892                         break;
 893                 default:
 894                         printf ("Wrong Image Type for %s command\n", cmdtp->name);
 895                         show_boot_progress (-5);
 896                         return NULL;
 897                 }
 898
 899                 /*
 900                  * copy image header to allow for image overwrites during kernel
 901                  * decompression.
 902                  */
 903                 memmove (&images->legacy_hdr_os_copy, hdr, sizeof(image_header_t));
 904
 905                 /* save pointer to image header */
 906                 images->legacy_hdr_os = hdr;
 907
 908                 images->legacy_hdr_valid = 1;
 909                 show_boot_progress (6);
 910                 break;
 911 #if defined(CONFIG_FIT)
 912         case IMAGE_FORMAT_FIT:
 913                 fit_hdr = (void *)img_addr;
 914                 printf ("## Booting kernel from FIT Image at %08lx ...\n",
 915                                 img_addr);
 916
 917                 if (!fit_check_format (fit_hdr)) {
 918                         puts ("Bad FIT kernel image format!\n");
 919                         show_boot_progress (-100);
 920                         return NULL;
 921                 }
 922                 show_boot_progress (100);
 923
 924                 if (!fit_uname_kernel) {
 925                         /*
 926                          * no kernel image node unit name, try to get config
 927                          * node first. If config unit node name is NULL
 928                          * fit_conf_get_node() will try to find default config node
 929                          */
 930                         show_boot_progress (101);
 931                         cfg_noffset = fit_conf_get_node (fit_hdr, fit_uname_config);
 932                         if (cfg_noffset < 0) {
 933                                 show_boot_progress (-101);
 934                                 return NULL;
 935                         }
 936                         /* save configuration uname provided in the first
 937                          * bootm argument
 938                          */
 939                         images->fit_uname_cfg = fdt_get_name (fit_hdr, cfg_noffset, NULL);
 940                         printf ("   Using '%s' configuration\n", images->fit_uname_cfg);
 941                         show_boot_progress (103);
 942
 943                         os_noffset = fit_conf_get_kernel_node (fit_hdr, cfg_noffset);
 944                         fit_uname_kernel = fit_get_name (fit_hdr, os_noffset, NULL);
 945                 } else {
 946                         /* get kernel component image node offset */
 947                         show_boot_progress (102);
 948                         os_noffset = fit_image_get_node (fit_hdr, fit_uname_kernel);
 949                 }
 950                 if (os_noffset < 0) {
 951                         show_boot_progress (-103);
 952                         return NULL;
 953                 }
 954
 955                 printf ("   Trying '%s' kernel subimage\n", fit_uname_kernel);
 956
 957                 show_boot_progress (104);
 958                 if (!fit_check_kernel (fit_hdr, os_noffset, images->verify))
 959                         return NULL;
 960
 961                 /* get kernel image data address and length */
 962                 if (fit_image_get_data (fit_hdr, os_noffset, &data, &len)) {
 963                         puts ("Could not find kernel subimage data!\n");
 964                         show_boot_progress (-107);
 965                         return NULL;
 966                 }
 967                 show_boot_progress (108);
 968
 969                 *os_len = len;
 970                 *os_data = (ulong)data;
 971                 images->fit_hdr_os = fit_hdr;
 972                 images->fit_uname_os = fit_uname_kernel;
 973                 images->fit_noffset_os = os_noffset;
 974                 break;
 975 #endif
 976         default:
 977                 printf ("Wrong Image Format for %s command\n", cmdtp->name);
 978                 show_boot_progress (-108);
 979                 return NULL;
 980         }
 981
 982         debug ("   kernel data at 0x%08lx, len = 0x%08lx (%ld)\n",
 983                         *os_data, *os_len, *os_len);
 984
 985         return (void *)img_addr;
 986 }
 987
 988 U_BOOT_CMD(
 989         bootm,  CONFIG_SYS_MAXARGS,     1,      do_bootm,
 990         "boot application image from memory",
 991         "[addr [arg ...]]\n    - boot application image stored in memory\n"
 992         "\tpassing arguments 'arg ...'; when booting a Linux kernel,\n"
 993         "\t'arg' can be the address of an initrd image\n"
 994 #if defined(CONFIG_OF_LIBFDT)
 995         "\tWhen booting a Linux kernel which requires a flat device-tree\n"
 996         "\ta third argument is required which is the address of the\n"
 997         "\tdevice-tree blob. To boot that kernel without an initrd image,\n"
 998         "\tuse a '-' for the second argument. If you do not pass a third\n"
 999         "\ta bd_info struct will be passed instead\n"
1000 #endif
1001 #if defined(CONFIG_FIT)
1002         "\t\nFor the new multi component uImage format (FIT) addresses\n"
1003         "\tmust be extened to include component or configuration unit name:\n"
1004         "\taddr:<subimg_uname> - direct component image specification\n"
1005         "\taddr#<conf_uname>   - configuration specification\n"
1006         "\tUse iminfo command to get the list of existing component\n"
1007         "\timages and configurations.\n"
1008 #endif
1009         "\nSub-commands to do part of the bootm sequence.  The sub-commands "
1010         "must be\n"
1011         "issued in the order below (it's ok to not issue all sub-commands):\n"
1012         "\tstart [addr [arg ...]]\n"
1013         "\tloados  - load OS image\n"
1014 #if defined(CONFIG_PPC) || defined(CONFIG_M68K) || defined(CONFIG_SPARC)
1015         "\tramdisk - relocate initrd, set env initrd_start/initrd_end\n"
1016 #endif
1017 #if defined(CONFIG_OF_LIBFDT)
1018         "\tfdt     - relocate flat device tree\n"
1019 #endif
1020         "\tcmdline - OS specific command line processing/setup\n"
1021         "\tbdt     - OS specific bd_t processing\n"
1022         "\tprep    - OS specific prep before relocation or go\n"
1023         "\tgo      - start OS"
1024 );
1025
1026 /*******************************************************************/
1027 /* bootd - boot default image */
1028 /*******************************************************************/
1029 #if defined(CONFIG_CMD_BOOTD)
1030 int do_bootd (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
1031 {
1032         int rcode = 0;
1033
1034 #ifndef CONFIG_SYS_HUSH_PARSER
1035         if (run_command (getenv ("bootcmd"), flag) < 0)
1036                 rcode = 1;
1037 #else
1038         if (parse_string_outer (getenv ("bootcmd"),
1039                         FLAG_PARSE_SEMICOLON | FLAG_EXIT_FROM_LOOP) != 0)
1040                 rcode = 1;
1041 #endif
1042         return rcode;
1043 }
1044
1045 U_BOOT_CMD(
1046         boot,   1,      1,      do_bootd,
1047         "boot default, i.e., run 'bootcmd'",
1048         ""
1049 );
1050
1051 /* keep old command name "bootd" for backward compatibility */
1052 U_BOOT_CMD(
1053         bootd, 1,       1,      do_bootd,
1054         "boot default, i.e., run 'bootcmd'",
1055         ""
1056 );
1057
1058 #endif
1059
1060
1061 /*******************************************************************/
1062 /* iminfo - print header info for a requested image */
1063 /*******************************************************************/
1064 #if defined(CONFIG_CMD_IMI)
1065 int do_iminfo (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
1066 {
1067         int     arg;
1068         ulong   addr;
1069         int     rcode = 0;
1070
1071         if (argc < 2) {
1072                 return image_info (load_addr);
1073         }
1074
1075         for (arg = 1; arg < argc; ++arg) {
1076                 addr = simple_strtoul (argv[arg], NULL, 16);
1077                 if (image_info (addr) != 0)
1078                         rcode = 1;
1079         }
1080         return rcode;
1081 }
1082
1083 static int image_info (ulong addr)
1084 {
1085         void *hdr = (void *)addr;
1086
1087         printf ("\n## Checking Image at %08lx ...\n", addr);
1088
1089         switch (genimg_get_format (hdr)) {
1090         case IMAGE_FORMAT_LEGACY:
1091                 puts ("   Legacy image found\n");
1092                 if (!image_check_magic (hdr)) {
1093                         puts ("   Bad Magic Number\n");
1094                         return 1;
1095                 }
1096
1097                 if (!image_check_hcrc (hdr)) {
1098                         puts ("   Bad Header Checksum\n");
1099                         return 1;
1100                 }
1101
1102                 image_print_contents (hdr);
1103
1104                 puts ("   Verifying Checksum ... ");
1105                 if (!image_check_dcrc (hdr)) {
1106                         puts ("   Bad Data CRC\n");
1107                         return 1;
1108                 }
1109                 puts ("OK\n");
1110                 return 0;
1111 #if defined(CONFIG_FIT)
1112         case IMAGE_FORMAT_FIT:
1113                 puts ("   FIT image found\n");
1114
1115                 if (!fit_check_format (hdr)) {
1116                         puts ("Bad FIT image format!\n");
1117                         return 1;
1118                 }
1119
1120                 fit_print_contents (hdr);
1121
1122                 if (!fit_all_image_check_hashes (hdr)) {
1123                         puts ("Bad hash in FIT image!\n");
1124                         return 1;
1125                 }
1126
1127                 return 0;
1128 #endif
1129         default:
1130                 puts ("Unknown image format!\n");
1131                 break;
1132         }
1133
1134         return 1;
1135 }
1136
1137 U_BOOT_CMD(
1138         iminfo, CONFIG_SYS_MAXARGS,     1,      do_iminfo,
1139         "print header information for application image",
1140         "addr [addr ...]\n"
1141         "    - print header information for application image starting at\n"
1142         "      address 'addr' in memory; this includes verification of the\n"
1143         "      image contents (magic number, header and payload checksums)"
1144 );
1145 #endif
1146
1147
1148 /*******************************************************************/
1149 /* imls - list all images found in flash */
1150 /*******************************************************************/
1151 #if defined(CONFIG_CMD_IMLS)
1152 int do_imls (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
1153 {
1154         flash_info_t *info;
1155         int i, j;
1156         void *hdr;
1157
1158         for (i = 0, info = &flash_info[0];
1159                 i < CONFIG_SYS_MAX_FLASH_BANKS; ++i, ++info) {
1160
1161                 if (info->flash_id == FLASH_UNKNOWN)
1162                         goto next_bank;
1163                 for (j = 0; j < info->sector_count; ++j) {
1164
1165                         hdr = (void *)info->start[j];
1166                         if (!hdr)
1167                                 goto next_sector;
1168
1169                         switch (genimg_get_format (hdr)) {
1170                         case IMAGE_FORMAT_LEGACY:
1171                                 if (!image_check_hcrc (hdr))
1172                                         goto next_sector;
1173
1174                                 printf ("Legacy Image at %08lX:\n", (ulong)hdr);
1175                                 image_print_contents (hdr);
1176
1177                                 puts ("   Verifying Checksum ... ");
1178                                 if (!image_check_dcrc (hdr)) {
1179                                         puts ("Bad Data CRC\n");
1180                                 } else {
1181                                         puts ("OK\n");
1182                                 }
1183                                 break;
1184 #if defined(CONFIG_FIT)
1185                         case IMAGE_FORMAT_FIT:
1186                                 if (!fit_check_format (hdr))
1187                                         goto next_sector;
1188
1189                                 printf ("FIT Image at %08lX:\n", (ulong)hdr);
1190                                 fit_print_contents (hdr);
1191                                 break;
1192 #endif
1193                         default:
1194                                 goto next_sector;
1195                         }
1196
1197 next_sector:            ;
1198                 }
1199 next_bank:      ;
1200         }
1201
1202         return (0);
1203 }
1204
1205 U_BOOT_CMD(
1206         imls,   1,              1,      do_imls,
1207         "list all images found in flash",
1208         "\n"
1209         "    - Prints information about all images found at sector\n"
1210         "      boundaries in flash."
1211 );
1212 #endif
1213
1214 /*******************************************************************/
1215 /* helper routines */
1216 /*******************************************************************/
1217 #ifdef CONFIG_SILENT_CONSOLE
1218 static void fixup_silent_linux ()
1219 {
1220         char buf[256], *start, *end;
1221         char *cmdline = getenv ("bootargs");
1222
1223         /* Only fix cmdline when requested */
1224         if (!(gd->flags & GD_FLG_SILENT))
1225                 return;
1226
1227         debug ("before silent fix-up: %s\n", cmdline);
1228         if (cmdline) {
1229                 if ((start = strstr (cmdline, "console=")) != NULL) {
1230                         end = strchr (start, ' ');
1231                         strncpy (buf, cmdline, (start - cmdline + 8));
1232                         if (end)
1233                                 strcpy (buf + (start - cmdline + 8), end);
1234                         else
1235                                 buf[start - cmdline + 8] = '\0';
1236                 } else {
1237                         strcpy (buf, cmdline);
1238                         strcat (buf, " console=");
1239                 }
1240         } else {
1241                 strcpy (buf, "console=");
1242         }
1243
1244         setenv ("bootargs", buf);
1245         debug ("after silent fix-up: %s\n", buf);
1246 }
1247 #endif /* CONFIG_SILENT_CONSOLE */
1248
1249
1250 /*******************************************************************/
1251 /* OS booting routines */
1252 /*******************************************************************/
1253
1254 #ifdef CONFIG_BOOTM_NETBSD
1255 static int do_bootm_netbsd (int flag, int argc, char *argv[],
1256                             bootm_headers_t *images)
1257 {
1258         void (*loader)(bd_t *, image_header_t *, char *, char *);
1259         image_header_t *os_hdr, *hdr;
1260         ulong kernel_data, kernel_len;
1261         char *consdev;
1262         char *cmdline;
1263
1264         if ((flag != 0) && (flag != BOOTM_STATE_OS_GO))
1265                 return 1;
1266
1267 #if defined(CONFIG_FIT)
1268         if (!images->legacy_hdr_valid) {
1269                 fit_unsupported_reset ("NetBSD");
1270                 return 1;
1271         }
1272 #endif
1273         hdr = images->legacy_hdr_os;
1274
1275         /*
1276          * Booting a (NetBSD) kernel image
1277          *
1278          * This process is pretty similar to a standalone application:
1279          * The (first part of an multi-) image must be a stage-2 loader,
1280          * which in turn is responsible for loading & invoking the actual
1281          * kernel.  The only differences are the parameters being passed:
1282          * besides the board info strucure, the loader expects a command
1283          * line, the name of the console device, and (optionally) the
1284          * address of the original image header.
1285          */
1286         os_hdr = NULL;
1287         if (image_check_type (&images->legacy_hdr_os_copy, IH_TYPE_MULTI)) {
1288                 image_multi_getimg (hdr, 1, &kernel_data, &kernel_len);
1289                 if (kernel_len)
1290                         os_hdr = hdr;
1291         }
1292
1293         consdev = "";
1294 #if   defined (CONFIG_8xx_CONS_SMC1)
1295         consdev = "smc1";
1296 #elif defined (CONFIG_8xx_CONS_SMC2)
1297         consdev = "smc2";
1298 #elif defined (CONFIG_8xx_CONS_SCC2)
1299         consdev = "scc2";
1300 #elif defined (CONFIG_8xx_CONS_SCC3)
1301         consdev = "scc3";
1302 #endif
1303
1304         if (argc > 2) {
1305                 ulong len;
1306                 int   i;
1307
1308                 for (i = 2, len = 0; i < argc; i += 1)
1309                         len += strlen (argv[i]) + 1;
1310                 cmdline = malloc (len);
1311
1312                 for (i = 2, len = 0; i < argc; i += 1) {
1313                         if (i > 2)
1314                                 cmdline[len++] = ' ';
1315                         strcpy (&cmdline[len], argv[i]);
1316                         len += strlen (argv[i]);
1317                 }
1318         } else if ((cmdline = getenv ("bootargs")) == NULL) {
1319                 cmdline = "";
1320         }
1321
1322         loader = (void (*)(bd_t *, image_header_t *, char *, char *))images->ep;
1323
1324         printf ("## Transferring control to NetBSD stage-2 loader (at address %08lx) ...\n",
1325                 (ulong)loader);
1326
1327         show_boot_progress (15);
1328
1329         /*
1330          * NetBSD Stage-2 Loader Parameters:
1331          *   r3: ptr to board info data
1332          *   r4: image address
1333          *   r5: console device
1334          *   r6: boot args string
1335          */
1336         (*loader) (gd->bd, os_hdr, consdev, cmdline);
1337
1338         return 1;
1339 }
1340 #endif /* CONFIG_BOOTM_NETBSD*/
1341
1342 #ifdef CONFIG_LYNXKDI
1343 static int do_bootm_lynxkdi (int flag, int argc, char *argv[],
1344                              bootm_headers_t *images)
1345 {
1346         image_header_t *hdr = &images->legacy_hdr_os_copy;
1347
1348         if ((flag != 0) && (flag != BOOTM_STATE_OS_GO))
1349                 return 1;
1350
1351 #if defined(CONFIG_FIT)
1352         if (!images->legacy_hdr_valid) {
1353                 fit_unsupported_reset ("Lynx");
1354                 return 1;
1355         }
1356 #endif
1357
1358         lynxkdi_boot ((image_header_t *)hdr);
1359
1360         return 1;
1361 }
1362 #endif /* CONFIG_LYNXKDI */
1363
1364 #ifdef CONFIG_BOOTM_RTEMS
1365 static int do_bootm_rtems (int flag, int argc, char *argv[],
1366                            bootm_headers_t *images)
1367 {
1368         void (*entry_point)(bd_t *);
1369
1370         if ((flag != 0) && (flag != BOOTM_STATE_OS_GO))
1371                 return 1;
1372
1373 #if defined(CONFIG_FIT)
1374         if (!images->legacy_hdr_valid) {
1375                 fit_unsupported_reset ("RTEMS");
1376                 return 1;
1377         }
1378 #endif
1379
1380         entry_point = (void (*)(bd_t *))images->ep;
1381
1382         printf ("## Transferring control to RTEMS (at address %08lx) ...\n",
1383                 (ulong)entry_point);
1384
1385         show_boot_progress (15);
1386
1387         /*
1388          * RTEMS Parameters:
1389          *   r3: ptr to board info data
1390          */
1391         (*entry_point)(gd->bd);
1392
1393         return 1;
1394 }
1395 #endif /* CONFIG_BOOTM_RTEMS */
1396
1397 #if defined(CONFIG_CMD_ELF)
1398 static int do_bootm_vxworks (int flag, int argc, char *argv[],
1399                              bootm_headers_t *images)
1400 {
1401         char str[80];
1402
1403         if ((flag != 0) && (flag != BOOTM_STATE_OS_GO))
1404                 return 1;
1405
1406 #if defined(CONFIG_FIT)
1407         if (!images->legacy_hdr_valid) {
1408                 fit_unsupported_reset ("VxWorks");
1409                 return 1;
1410         }
1411 #endif
1412
1413         sprintf(str, "%lx", images->ep); /* write entry-point into string */
1414         setenv("loadaddr", str);
1415         do_bootvx(NULL, 0, 0, NULL);
1416
1417         return 1;
1418 }
1419
1420 static int do_bootm_qnxelf(int flag, int argc, char *argv[],
1421                             bootm_headers_t *images)
1422 {
1423         char *local_args[2];
1424         char str[16];
1425
1426         if ((flag != 0) && (flag != BOOTM_STATE_OS_GO))
1427                 return 1;
1428
1429 #if defined(CONFIG_FIT)
1430         if (!images->legacy_hdr_valid) {
1431                 fit_unsupported_reset ("QNX");
1432                 return 1;
1433         }
1434 #endif
1435
1436         sprintf(str, "%lx", images->ep); /* write entry-point into string */
1437         local_args[0] = argv[0];
1438         local_args[1] = str;    /* and provide it via the arguments */
1439         do_bootelf(NULL, 0, 2, local_args);
1440
1441         return 1;
1442 }
1443 #endif
1444
1445 #ifdef CONFIG_INTEGRITY
1446 static int do_bootm_integrity (int flag, int argc, char *argv[],
1447                            bootm_headers_t *images)
1448 {
1449         void (*entry_point)(void);
1450
1451         if ((flag != 0) && (flag != BOOTM_STATE_OS_GO))
1452                 return 1;
1453
1454 #if defined(CONFIG_FIT)
1455         if (!images->legacy_hdr_valid) {
1456                 fit_unsupported_reset ("INTEGRITY");
1457                 return 1;
1458         }
1459 #endif
1460
1461         entry_point = (void (*)(void))images->ep;
1462
1463         printf ("## Transferring control to INTEGRITY (at address %08lx) ...\n",
1464                 (ulong)entry_point);
1465
1466         show_boot_progress (15);
1467
1468         /*
1469          * INTEGRITY Parameters:
1470          *   None
1471          */
1472         (*entry_point)();
1473
1474         return 1;
1475 }
1476 #endif