common/cmd_bootm.c

   1 /*
   2  * (C) Copyright 2000-2006
   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 <zlib.h>
  34 #include <bzlib.h>
  35 #include <environment.h>
  36 #include <lmb.h>
  37 #include <asm/byteorder.h>
  38
  39 #if defined(CONFIG_CMD_USB)
  40 #include <usb.h>
  41 #endif
  42
  43 #ifdef CFG_HUSH_PARSER
  44 #include <hush.h>
  45 #endif
  46
  47 #if defined(CONFIG_OF_LIBFDT)
  48 #include <fdt.h>
  49 #include <libfdt.h>
  50 #include <fdt_support.h>
  51 #endif
  52
  53 #ifdef CONFIG_LZMA
  54 #define _7ZIP_BYTE_DEFINED /* Byte already defined by zlib */
  55 #include <lzma/LzmaTypes.h>
  56 #include <lzma/LzmaDecode.h>
  57 #include <lzma/LzmaTools.h>
  58 #endif /* CONFIG_LZMA */
  59
  60 DECLARE_GLOBAL_DATA_PTR;
  61
  62 extern int gunzip (void *dst, int dstlen, unsigned char *src, unsigned long *lenp);
  63 #ifndef CFG_BOOTM_LEN
  64 #define CFG_BOOTM_LEN   0x800000        /* use 8MByte as default max gunzip size */
  65 #endif
  66
  67 #ifdef CONFIG_BZIP2
  68 extern void bz_internal_error(int);
  69 #endif
  70
  71 #if defined(CONFIG_CMD_IMI)
  72 static int image_info (unsigned long addr);
  73 #endif
  74
  75 #if defined(CONFIG_CMD_IMLS)
  76 #include <flash.h>
  77 extern flash_info_t flash_info[]; /* info for FLASH chips */
  78 static int do_imls (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
  79 #endif
  80
  81 #ifdef CONFIG_SILENT_CONSOLE
  82 static void fixup_silent_linux (void);
  83 #endif
  84
  85 static image_header_t *image_get_kernel (ulong img_addr, int verify);
  86 #if defined(CONFIG_FIT)
  87 static int fit_check_kernel (const void *fit, int os_noffset, int verify);
  88 #endif
  89
  90 static void *boot_get_kernel (cmd_tbl_t *cmdtp, int flag,int argc, char *argv[],
  91                 bootm_headers_t *images, ulong *os_data, ulong *os_len);
  92 extern int do_reset (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
  93
  94 /*
  95  *  Continue booting an OS image; caller already has:
  96  *  - copied image header to global variable `header'
  97  *  - checked header magic number, checksums (both header & image),
  98  *  - verified image architecture (PPC) and type (KERNEL or MULTI),
  99  *  - loaded (first part of) image to header load address,
 100  *  - disabled interrupts.
 101  */
 102 typedef int boot_os_fn (int flag, int argc, char *argv[],
 103                         bootm_headers_t *images); /* pointers to os/initrd/fdt */
 104
 105 extern boot_os_fn do_bootm_linux;
 106 static boot_os_fn do_bootm_netbsd;
 107 #if defined(CONFIG_LYNXKDI)
 108 static boot_os_fn do_bootm_lynxkdi;
 109 extern void lynxkdi_boot (image_header_t *);
 110 #endif
 111 static boot_os_fn do_bootm_rtems;
 112 #if defined(CONFIG_CMD_ELF)
 113 static boot_os_fn do_bootm_vxworks;
 114 static boot_os_fn do_bootm_qnxelf;
 115 int do_bootvx (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
 116 int do_bootelf (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
 117 #endif
 118 #if defined(CONFIG_INTEGRITY)
 119 static boot_os_fn do_bootm_integrity;
 120 #endif
 121
 122 ulong load_addr = CFG_LOAD_ADDR;        /* Default Load Address */
 123 static bootm_headers_t images;          /* pointers to os/initrd/fdt images */
 124
 125 void __board_lmb_reserve(struct lmb *lmb)
 126 {
 127         /* please define platform specific board_lmb_reserve() */
 128 }
 129 void board_lmb_reserve(struct lmb *lmb) __attribute__((weak, alias("__board_lmb_reserve")));
 130
 131 #if defined(__ARM__)
 132   #define IH_INITRD_ARCH IH_ARCH_ARM
 133 #elif defined(__avr32__)
 134   #define IH_INITRD_ARCH IH_ARCH_AVR32
 135 #elif defined(__bfin__)
 136   #define IH_INITRD_ARCH IH_ARCH_BLACKFIN
 137 #elif defined(__I386__)
 138   #define IH_INITRD_ARCH IH_ARCH_I386
 139 #elif defined(__M68K__)
 140   #define IH_INITRD_ARCH IH_ARCH_M68K
 141 #elif defined(__microblaze__)
 142   #define IH_INITRD_ARCH IH_ARCH_MICROBLAZE
 143 #elif defined(__mips__)
 144   #define IH_INITRD_ARCH IH_ARCH_MIPS
 145 #elif defined(__nios__)
 146   #define IH_INITRD_ARCH IH_ARCH_NIOS
 147 #elif defined(__nios2__)
 148   #define IH_INITRD_ARCH IH_ARCH_NIOS2
 149 #elif defined(__PPC__)
 150   #define IH_INITRD_ARCH IH_ARCH_PPC
 151 #elif defined(__sh__)
 152   #define IH_INITRD_ARCH IH_ARCH_SH
 153 #elif defined(__sparc__)
 154   #define IH_INITRD_ARCH IH_ARCH_SPARC
 155 #else
 156 # error Unknown CPU type
 157 #endif
 158
 159 static int bootm_start(cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
 160 {
 161         ulong           mem_start;
 162         phys_size_t     mem_size;
 163         void            *os_hdr;
 164         int             ret;
 165
 166         memset ((void *)&images, 0, sizeof (images));
 167         images.verify = getenv_yesno ("verify");
 168
 169         lmb_init(&images.lmb);
 170
 171         mem_start = getenv_bootm_low();
 172         mem_size = getenv_bootm_size();
 173
 174         lmb_add(&images.lmb, (phys_addr_t)mem_start, mem_size);
 175
 176         board_lmb_reserve(&images.lmb);
 177
 178         /* get kernel image header, start address and length */
 179         os_hdr = boot_get_kernel (cmdtp, flag, argc, argv,
 180                         &images, &images.os.image_start, &images.os.image_len);
 181         if (images.os.image_len == 0) {
 182                 puts ("ERROR: can't get kernel image!\n");
 183                 return 1;
 184         }
 185
 186         /* get image parameters */
 187         switch (genimg_get_format (os_hdr)) {
 188         case IMAGE_FORMAT_LEGACY:
 189                 images.os.type = image_get_type (os_hdr);
 190                 images.os.comp = image_get_comp (os_hdr);
 191                 images.os.os = image_get_os (os_hdr);
 192
 193                 images.os.end = image_get_image_end (os_hdr);
 194                 images.os.load = image_get_load (os_hdr);
 195                 break;
 196 #if defined(CONFIG_FIT)
 197         case IMAGE_FORMAT_FIT:
 198                 if (fit_image_get_type (images.fit_hdr_os,
 199                                         images.fit_noffset_os, &images.os.type)) {
 200                         puts ("Can't get image type!\n");
 201                         show_boot_progress (-109);
 202                         return 1;
 203                 }
 204
 205                 if (fit_image_get_comp (images.fit_hdr_os,
 206                                         images.fit_noffset_os, &images.os.comp)) {
 207                         puts ("Can't get image compression!\n");
 208                         show_boot_progress (-110);
 209                         return 1;
 210                 }
 211
 212                 if (fit_image_get_os (images.fit_hdr_os,
 213                                         images.fit_noffset_os, &images.os.os)) {
 214                         puts ("Can't get image OS!\n");
 215                         show_boot_progress (-111);
 216                         return 1;
 217                 }
 218
 219                 images.os.end = fit_get_end (images.fit_hdr_os);
 220
 221                 if (fit_image_get_load (images.fit_hdr_os, images.fit_noffset_os,
 222                                         &images.os.load)) {
 223                         puts ("Can't get image load address!\n");
 224                         show_boot_progress (-112);
 225                         return 1;
 226                 }
 227                 break;
 228 #endif
 229         default:
 230                 puts ("ERROR: unknown image format type!\n");
 231                 return 1;
 232         }
 233
 234         /* find kernel entry point */
 235         if (images.legacy_hdr_valid) {
 236                 images.ep = image_get_ep (&images.legacy_hdr_os_copy);
 237 #if defined(CONFIG_FIT)
 238         } else if (images.fit_uname_os) {
 239                 ret = fit_image_get_entry (images.fit_hdr_os,
 240                                 images.fit_noffset_os, &images.ep);
 241                 if (ret) {
 242                         puts ("Can't get entry point property!\n");
 243                         return 1;
 244                 }
 245 #endif
 246         } else {
 247                 puts ("Could not find kernel entry point!\n");
 248                 return 1;
 249         }
 250
 251         if (images.os.os == IH_OS_LINUX) {
 252                 /* find ramdisk */
 253                 ret = boot_get_ramdisk (argc, argv, &images, IH_INITRD_ARCH,
 254                                 &images.rd_start, &images.rd_end);
 255                 if (ret) {
 256                         puts ("Ramdisk image is corrupt or invalid\n");
 257                         return 1;
 258                 }
 259
 260 #if defined(CONFIG_OF_LIBFDT)
 261 #if defined(CONFIG_PPC) || defined(CONFIG_M68K) || defined(CONFIG_SPARC)
 262                 /* find flattened device tree */
 263                 ret = boot_get_fdt (flag, argc, argv, &images,
 264                                     &images.ft_addr, &images.ft_len);
 265                 if (ret) {
 266                         puts ("Could not find a valid device tree\n");
 267                         return 1;
 268                 }
 269
 270                 set_working_fdt_addr(images.ft_addr);
 271 #endif
 272 #endif
 273         }
 274
 275         images.os.start = (ulong)os_hdr;
 276         images.valid = 1;
 277
 278         return 0;
 279 }
 280
 281 #define BOOTM_ERR_RESET         -1
 282 #define BOOTM_ERR_OVERLAP       -2
 283 #define BOOTM_ERR_UNIMPLEMENTED -3
 284 static int bootm_load_os(image_info_t os, ulong *load_end, int boot_progress)
 285 {
 286         uint8_t comp = os.comp;
 287         ulong load = os.load;
 288         ulong blob_start = os.start;
 289         ulong blob_end = os.end;
 290         ulong image_start = os.image_start;
 291         ulong image_len = os.image_len;
 292         uint unc_len = CFG_BOOTM_LEN;
 293
 294         const char *type_name = genimg_get_type_name (os.type);
 295
 296         switch (comp) {
 297         case IH_COMP_NONE:
 298                 if (load == blob_start) {
 299                         printf ("   XIP %s ... ", type_name);
 300                 } else {
 301                         printf ("   Loading %s ... ", type_name);
 302
 303                         memmove_wd ((void *)load,
 304                                    (void *)image_start, image_len, CHUNKSZ);
 305                 }
 306                 *load_end = load + image_len;
 307                 puts("OK\n");
 308                 break;
 309         case IH_COMP_GZIP:
 310                 printf ("   Uncompressing %s ... ", type_name);
 311                 if (gunzip ((void *)load, unc_len,
 312                                         (uchar *)image_start, &image_len) != 0) {
 313                         puts ("GUNZIP: uncompress or overwrite error "
 314                                 "- must RESET board to recover\n");
 315                         if (boot_progress)
 316                                 show_boot_progress (-6);
 317                         return BOOTM_ERR_RESET;
 318                 }
 319
 320                 *load_end = load + image_len;
 321                 break;
 322 #ifdef CONFIG_BZIP2
 323         case IH_COMP_BZIP2:
 324                 printf ("   Uncompressing %s ... ", type_name);
 325                 /*
 326                  * If we've got less than 4 MB of malloc() space,
 327                  * use slower decompression algorithm which requires
 328                  * at most 2300 KB of memory.
 329                  */
 330                 int i = BZ2_bzBuffToBuffDecompress ((char*)load,
 331                                         &unc_len, (char *)image_start, image_len,
 332                                         CFG_MALLOC_LEN < (4096 * 1024), 0);
 333                 if (i != BZ_OK) {
 334                         printf ("BUNZIP2: uncompress or overwrite error %d "
 335                                 "- must RESET board to recover\n", i);
 336                         if (boot_progress)
 337                                 show_boot_progress (-6);
 338                         return BOOTM_ERR_RESET;
 339                 }
 340
 341                 *load_end = load + unc_len;
 342                 break;
 343 #endif /* CONFIG_BZIP2 */
 344 #ifdef CONFIG_LZMA
 345         case IH_COMP_LZMA:
 346                 printf ("   Uncompressing %s ... ", type_name);
 347
 348                 int ret = lzmaBuffToBuffDecompress(
 349                         (unsigned char *)load, &unc_len,
 350                         (unsigned char *)image_start, image_len);
 351                 if (ret != LZMA_RESULT_OK) {
 352                         printf ("LZMA: uncompress or overwrite error %d "
 353                                 "- must RESET board to recover\n", ret);
 354                         show_boot_progress (-6);
 355                         return BOOTM_ERR_RESET;
 356                 }
 357                 *load_end = load + unc_len;
 358                 break;
 359 #endif /* CONFIG_LZMA */
 360         default:
 361                 printf ("Unimplemented compression type %d\n", comp);
 362                 return BOOTM_ERR_UNIMPLEMENTED;
 363         }
 364         puts ("OK\n");
 365         debug ("   kernel loaded at 0x%08lx, end = 0x%08lx\n", load, *load_end);
 366         if (boot_progress)
 367                 show_boot_progress (7);
 368
 369         if ((load < blob_end) && (*load_end > blob_start)) {
 370                 debug ("images.os.start = 0x%lX, images.os.end = 0x%lx\n", blob_start, blob_end);
 371                 debug ("images.os.load = 0x%lx, load_end = 0x%lx\n", load, *load_end);
 372
 373                 return BOOTM_ERR_OVERLAP;
 374         }
 375
 376         return 0;
 377 }
 378
 379 /*******************************************************************/
 380 /* bootm - boot application image from image in memory */
 381 /*******************************************************************/
 382 int do_bootm (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
 383 {
 384
 385         ulong           iflag;
 386         ulong           load_end = 0;
 387         int             ret;
 388
 389         if (bootm_start(cmdtp, flag, argc, argv))
 390                 return 1;
 391
 392         /*
 393          * We have reached the point of no return: we are going to
 394          * overwrite all exception vector code, so we cannot easily
 395          * recover from any failures any more...
 396          */
 397         iflag = disable_interrupts();
 398
 399 #if defined(CONFIG_CMD_USB)
 400         /*
 401          * turn off USB to prevent the host controller from writing to the
 402          * SDRAM while Linux is booting. This could happen (at least for OHCI
 403          * controller), because the HCCA (Host Controller Communication Area)
 404          * lies within the SDRAM and the host controller writes continously to
 405          * this area (as busmaster!). The HccaFrameNumber is for example
 406          * updated every 1 ms within the HCCA structure in SDRAM! For more
 407          * details see the OpenHCI specification.
 408          */
 409         usb_stop();
 410 #endif
 411
 412 #ifdef CONFIG_AMIGAONEG3SE
 413         /*
 414          * We've possible left the caches enabled during
 415          * bios emulation, so turn them off again
 416          */
 417         icache_disable();
 418         dcache_disable();
 419 #endif
 420
 421         ret = bootm_load_os(images.os, &load_end, 1);
 422
 423         if (ret < 0) {
 424                 if (ret == BOOTM_ERR_RESET)
 425                         do_reset (cmdtp, flag, argc, argv);
 426                 if (ret == BOOTM_ERR_OVERLAP) {
 427                         if (images.legacy_hdr_valid) {
 428                                 if (image_get_type (&images.legacy_hdr_os_copy) == IH_TYPE_MULTI)
 429                                         puts ("WARNING: legacy format multi component "
 430                                                 "image overwritten\n");
 431                         } else {
 432                                 puts ("ERROR: new format image overwritten - "
 433                                         "must RESET the board to recover\n");
 434                                 show_boot_progress (-113);
 435                                 do_reset (cmdtp, flag, argc, argv);
 436                         }
 437                 }
 438                 if (ret == BOOTM_ERR_UNIMPLEMENTED) {
 439                         if (iflag)
 440                                 enable_interrupts();
 441                         show_boot_progress (-7);
 442                         return 1;
 443                 }
 444         }
 445
 446         lmb_reserve(&images.lmb, images.os.load, (load_end - images.os.load));
 447
 448         show_boot_progress (8);
 449
 450         switch (images.os.os) {
 451         default:                        /* handled by (original) Linux case */
 452         case IH_OS_LINUX:
 453 #ifdef CONFIG_SILENT_CONSOLE
 454             fixup_silent_linux();
 455 #endif
 456             do_bootm_linux (0, argc, argv, &images);
 457             break;
 458
 459         case IH_OS_NETBSD:
 460             do_bootm_netbsd (0, argc, argv, &images);
 461             break;
 462
 463 #ifdef CONFIG_LYNXKDI
 464         case IH_OS_LYNXOS:
 465             do_bootm_lynxkdi (0, argc, argv, &images);
 466             break;
 467 #endif
 468
 469         case IH_OS_RTEMS:
 470             do_bootm_rtems (0, argc, argv, &images);
 471             break;
 472
 473 #if defined(CONFIG_CMD_ELF)
 474         case IH_OS_VXWORKS:
 475             do_bootm_vxworks (0, argc, argv, &images);
 476             break;
 477
 478         case IH_OS_QNX:
 479             do_bootm_qnxelf (0, argc, argv, &images);
 480             break;
 481 #endif
 482
 483 #ifdef CONFIG_INTEGRITY
 484         case IH_OS_INTEGRITY:
 485             do_bootm_integrity (0, argc, argv, &images);
 486             break;
 487 #endif
 488         }
 489
 490         show_boot_progress (-9);
 491 #ifdef DEBUG
 492         puts ("\n## Control returned to monitor - resetting...\n");
 493 #endif
 494         do_reset (cmdtp, flag, argc, argv);
 495
 496         return 1;
 497 }
 498
 499 /**
 500  * image_get_kernel - verify legacy format kernel image
 501  * @img_addr: in RAM address of the legacy format image to be verified
 502  * @verify: data CRC verification flag
 503  *
 504  * image_get_kernel() verifies legacy image integrity and returns pointer to
 505  * legacy image header if image verification was completed successfully.
 506  *
 507  * returns:
 508  *     pointer to a legacy image header if valid image was found
 509  *     otherwise return NULL
 510  */
 511 static image_header_t *image_get_kernel (ulong img_addr, int verify)
 512 {
 513         image_header_t *hdr = (image_header_t *)img_addr;
 514
 515         if (!image_check_magic(hdr)) {
 516                 puts ("Bad Magic Number\n");
 517                 show_boot_progress (-1);
 518                 return NULL;
 519         }
 520         show_boot_progress (2);
 521
 522         if (!image_check_hcrc (hdr)) {
 523                 puts ("Bad Header Checksum\n");
 524                 show_boot_progress (-2);
 525                 return NULL;
 526         }
 527
 528         show_boot_progress (3);
 529         image_print_contents (hdr);
 530
 531         if (verify) {
 532                 puts ("   Verifying Checksum ... ");
 533                 if (!image_check_dcrc (hdr)) {
 534                         printf ("Bad Data CRC\n");
 535                         show_boot_progress (-3);
 536                         return NULL;
 537                 }
 538                 puts ("OK\n");
 539         }
 540         show_boot_progress (4);
 541
 542         if (!image_check_target_arch (hdr)) {
 543                 printf ("Unsupported Architecture 0x%x\n", image_get_arch (hdr));
 544                 show_boot_progress (-4);
 545                 return NULL;
 546         }
 547         return hdr;
 548 }
 549
 550 /**
 551  * fit_check_kernel - verify FIT format kernel subimage
 552  * @fit_hdr: pointer to the FIT image header
 553  * os_noffset: kernel subimage node offset within FIT image
 554  * @verify: data CRC verification flag
 555  *
 556  * fit_check_kernel() verifies integrity of the kernel subimage and from
 557  * specified FIT image.
 558  *
 559  * returns:
 560  *     1, on success
 561  *     0, on failure
 562  */
 563 #if defined (CONFIG_FIT)
 564 static int fit_check_kernel (const void *fit, int os_noffset, int verify)
 565 {
 566         fit_image_print (fit, os_noffset, "   ");
 567
 568         if (verify) {
 569                 puts ("   Verifying Hash Integrity ... ");
 570                 if (!fit_image_check_hashes (fit, os_noffset)) {
 571                         puts ("Bad Data Hash\n");
 572                         show_boot_progress (-104);
 573                         return 0;
 574                 }
 575                 puts ("OK\n");
 576         }
 577         show_boot_progress (105);
 578
 579         if (!fit_image_check_target_arch (fit, os_noffset)) {
 580                 puts ("Unsupported Architecture\n");
 581                 show_boot_progress (-105);
 582                 return 0;
 583         }
 584
 585         show_boot_progress (106);
 586         if (!fit_image_check_type (fit, os_noffset, IH_TYPE_KERNEL)) {
 587                 puts ("Not a kernel image\n");
 588                 show_boot_progress (-106);
 589                 return 0;
 590         }
 591
 592         show_boot_progress (107);
 593         return 1;
 594 }
 595 #endif /* CONFIG_FIT */
 596
 597 /**
 598  * boot_get_kernel - find kernel image
 599  * @os_data: pointer to a ulong variable, will hold os data start address
 600  * @os_len: pointer to a ulong variable, will hold os data length
 601  *
 602  * boot_get_kernel() tries to find a kernel image, verifies its integrity
 603  * and locates kernel data.
 604  *
 605  * returns:
 606  *     pointer to image header if valid image was found, plus kernel start
 607  *     address and length, otherwise NULL
 608  */
 609 static void *boot_get_kernel (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[],
 610                 bootm_headers_t *images, ulong *os_data, ulong *os_len)
 611 {
 612         image_header_t  *hdr;
 613         ulong           img_addr;
 614 #if defined(CONFIG_FIT)
 615         void            *fit_hdr;
 616         const char      *fit_uname_config = NULL;
 617         const char      *fit_uname_kernel = NULL;
 618         const void      *data;
 619         size_t          len;
 620         int             cfg_noffset;
 621         int             os_noffset;
 622 #endif
 623
 624         /* find out kernel image address */
 625         if (argc < 2) {
 626                 img_addr = load_addr;
 627                 debug ("*  kernel: default image load address = 0x%08lx\n",
 628                                 load_addr);
 629 #if defined(CONFIG_FIT)
 630         } else if (fit_parse_conf (argv[1], load_addr, &img_addr,
 631                                                         &fit_uname_config)) {
 632                 debug ("*  kernel: config '%s' from image at 0x%08lx\n",
 633                                 fit_uname_config, img_addr);
 634         } else if (fit_parse_subimage (argv[1], load_addr, &img_addr,
 635                                                         &fit_uname_kernel)) {
 636                 debug ("*  kernel: subimage '%s' from image at 0x%08lx\n",
 637                                 fit_uname_kernel, img_addr);
 638 #endif
 639         } else {
 640                 img_addr = simple_strtoul(argv[1], NULL, 16);
 641                 debug ("*  kernel: cmdline image address = 0x%08lx\n", img_addr);
 642         }
 643
 644         show_boot_progress (1);
 645
 646         /* copy from dataflash if needed */
 647         img_addr = genimg_get_image (img_addr);
 648
 649         /* check image type, for FIT images get FIT kernel node */
 650         *os_data = *os_len = 0;
 651         switch (genimg_get_format ((void *)img_addr)) {
 652         case IMAGE_FORMAT_LEGACY:
 653                 printf ("## Booting kernel from Legacy Image at %08lx ...\n",
 654                                 img_addr);
 655                 hdr = image_get_kernel (img_addr, images->verify);
 656                 if (!hdr)
 657                         return NULL;
 658                 show_boot_progress (5);
 659
 660                 /* get os_data and os_len */
 661                 switch (image_get_type (hdr)) {
 662                 case IH_TYPE_KERNEL:
 663                         *os_data = image_get_data (hdr);
 664                         *os_len = image_get_data_size (hdr);
 665                         break;
 666                 case IH_TYPE_MULTI:
 667                         image_multi_getimg (hdr, 0, os_data, os_len);
 668                         break;
 669                 default:
 670                         printf ("Wrong Image Type for %s command\n", cmdtp->name);
 671                         show_boot_progress (-5);
 672                         return NULL;
 673                 }
 674
 675                 /*
 676                  * copy image header to allow for image overwrites during kernel
 677                  * decompression.
 678                  */
 679                 memmove (&images->legacy_hdr_os_copy, hdr, sizeof(image_header_t));
 680
 681                 /* save pointer to image header */
 682                 images->legacy_hdr_os = hdr;
 683
 684                 images->legacy_hdr_valid = 1;
 685                 show_boot_progress (6);
 686                 break;
 687 #if defined(CONFIG_FIT)
 688         case IMAGE_FORMAT_FIT:
 689                 fit_hdr = (void *)img_addr;
 690                 printf ("## Booting kernel from FIT Image at %08lx ...\n",
 691                                 img_addr);
 692
 693                 if (!fit_check_format (fit_hdr)) {
 694                         puts ("Bad FIT kernel image format!\n");
 695                         show_boot_progress (-100);
 696                         return NULL;
 697                 }
 698                 show_boot_progress (100);
 699
 700                 if (!fit_uname_kernel) {
 701                         /*
 702                          * no kernel image node unit name, try to get config
 703                          * node first. If config unit node name is NULL
 704                          * fit_conf_get_node() will try to find default config node
 705                          */
 706                         show_boot_progress (101);
 707                         cfg_noffset = fit_conf_get_node (fit_hdr, fit_uname_config);
 708                         if (cfg_noffset < 0) {
 709                                 show_boot_progress (-101);
 710                                 return NULL;
 711                         }
 712                         /* save configuration uname provided in the first
 713                          * bootm argument
 714                          */
 715                         images->fit_uname_cfg = fdt_get_name (fit_hdr, cfg_noffset, NULL);
 716                         printf ("   Using '%s' configuration\n", images->fit_uname_cfg);
 717                         show_boot_progress (103);
 718
 719                         os_noffset = fit_conf_get_kernel_node (fit_hdr, cfg_noffset);
 720                         fit_uname_kernel = fit_get_name (fit_hdr, os_noffset, NULL);
 721                 } else {
 722                         /* get kernel component image node offset */
 723                         show_boot_progress (102);
 724                         os_noffset = fit_image_get_node (fit_hdr, fit_uname_kernel);
 725                 }
 726                 if (os_noffset < 0) {
 727                         show_boot_progress (-103);
 728                         return NULL;
 729                 }
 730
 731                 printf ("   Trying '%s' kernel subimage\n", fit_uname_kernel);
 732
 733                 show_boot_progress (104);
 734                 if (!fit_check_kernel (fit_hdr, os_noffset, images->verify))
 735                         return NULL;
 736
 737                 /* get kernel image data address and length */
 738                 if (fit_image_get_data (fit_hdr, os_noffset, &data, &len)) {
 739                         puts ("Could not find kernel subimage data!\n");
 740                         show_boot_progress (-107);
 741                         return NULL;
 742                 }
 743                 show_boot_progress (108);
 744
 745                 *os_len = len;
 746                 *os_data = (ulong)data;
 747                 images->fit_hdr_os = fit_hdr;
 748                 images->fit_uname_os = fit_uname_kernel;
 749                 images->fit_noffset_os = os_noffset;
 750                 break;
 751 #endif
 752         default:
 753                 printf ("Wrong Image Format for %s command\n", cmdtp->name);
 754                 show_boot_progress (-108);
 755                 return NULL;
 756         }
 757
 758         debug ("   kernel data at 0x%08lx, len = 0x%08lx (%ld)\n",
 759                         *os_data, *os_len, *os_len);
 760
 761         return (void *)img_addr;
 762 }
 763
 764 U_BOOT_CMD(
 765         bootm,  CFG_MAXARGS,    1,      do_bootm,
 766         "bootm   - boot application image from memory\n",
 767         "[addr [arg ...]]\n    - boot application image stored in memory\n"
 768         "\tpassing arguments 'arg ...'; when booting a Linux kernel,\n"
 769         "\t'arg' can be the address of an initrd image\n"
 770 #if defined(CONFIG_OF_LIBFDT)
 771         "\tWhen booting a Linux kernel which requires a flat device-tree\n"
 772         "\ta third argument is required which is the address of the\n"
 773         "\tdevice-tree blob. To boot that kernel without an initrd image,\n"
 774         "\tuse a '-' for the second argument. If you do not pass a third\n"
 775         "\ta bd_info struct will be passed instead\n"
 776 #endif
 777 #if defined(CONFIG_FIT)
 778         "\t\nFor the new multi component uImage format (FIT) addresses\n"
 779         "\tmust be extened to include component or configuration unit name:\n"
 780         "\taddr:<subimg_uname> - direct component image specification\n"
 781         "\taddr#<conf_uname>   - configuration specification\n"
 782         "\tUse iminfo command to get the list of existing component\n"
 783         "\timages and configurations.\n"
 784 #endif
 785 );
 786
 787 /*******************************************************************/
 788 /* bootd - boot default image */
 789 /*******************************************************************/
 790 #if defined(CONFIG_CMD_BOOTD)
 791 int do_bootd (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
 792 {
 793         int rcode = 0;
 794
 795 #ifndef CFG_HUSH_PARSER
 796         if (run_command (getenv ("bootcmd"), flag) < 0)
 797                 rcode = 1;
 798 #else
 799         if (parse_string_outer (getenv ("bootcmd"),
 800                         FLAG_PARSE_SEMICOLON | FLAG_EXIT_FROM_LOOP) != 0)
 801                 rcode = 1;
 802 #endif
 803         return rcode;
 804 }
 805
 806 U_BOOT_CMD(
 807         boot,   1,      1,      do_bootd,
 808         "boot    - boot default, i.e., run 'bootcmd'\n",
 809         NULL
 810 );
 811
 812 /* keep old command name "bootd" for backward compatibility */
 813 U_BOOT_CMD(
 814         bootd, 1,       1,      do_bootd,
 815         "bootd   - boot default, i.e., run 'bootcmd'\n",
 816         NULL
 817 );
 818
 819 #endif
 820
 821
 822 /*******************************************************************/
 823 /* iminfo - print header info for a requested image */
 824 /*******************************************************************/
 825 #if defined(CONFIG_CMD_IMI)
 826 int do_iminfo (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
 827 {
 828         int     arg;
 829         ulong   addr;
 830         int     rcode = 0;
 831
 832         if (argc < 2) {
 833                 return image_info (load_addr);
 834         }
 835
 836         for (arg = 1; arg < argc; ++arg) {
 837                 addr = simple_strtoul (argv[arg], NULL, 16);
 838                 if (image_info (addr) != 0)
 839                         rcode = 1;
 840         }
 841         return rcode;
 842 }
 843
 844 static int image_info (ulong addr)
 845 {
 846         void *hdr = (void *)addr;
 847
 848         printf ("\n## Checking Image at %08lx ...\n", addr);
 849
 850         switch (genimg_get_format (hdr)) {
 851         case IMAGE_FORMAT_LEGACY:
 852                 puts ("   Legacy image found\n");
 853                 if (!image_check_magic (hdr)) {
 854                         puts ("   Bad Magic Number\n");
 855                         return 1;
 856                 }
 857
 858                 if (!image_check_hcrc (hdr)) {
 859                         puts ("   Bad Header Checksum\n");
 860                         return 1;
 861                 }
 862
 863                 image_print_contents (hdr);
 864
 865                 puts ("   Verifying Checksum ... ");
 866                 if (!image_check_dcrc (hdr)) {
 867                         puts ("   Bad Data CRC\n");
 868                         return 1;
 869                 }
 870                 puts ("OK\n");
 871                 return 0;
 872 #if defined(CONFIG_FIT)
 873         case IMAGE_FORMAT_FIT:
 874                 puts ("   FIT image found\n");
 875
 876                 if (!fit_check_format (hdr)) {
 877                         puts ("Bad FIT image format!\n");
 878                         return 1;
 879                 }
 880
 881                 fit_print_contents (hdr);
 882
 883                 if (!fit_all_image_check_hashes (hdr)) {
 884                         puts ("Bad hash in FIT image!\n");
 885                         return 1;
 886                 }
 887
 888                 return 0;
 889 #endif
 890         default:
 891                 puts ("Unknown image format!\n");
 892                 break;
 893         }
 894
 895         return 1;
 896 }
 897
 898 U_BOOT_CMD(
 899         iminfo, CFG_MAXARGS,    1,      do_iminfo,
 900         "iminfo  - print header information for application image\n",
 901         "addr [addr ...]\n"
 902         "    - print header information for application image starting at\n"
 903         "      address 'addr' in memory; this includes verification of the\n"
 904         "      image contents (magic number, header and payload checksums)\n"
 905 );
 906 #endif
 907
 908
 909 /*******************************************************************/
 910 /* imls - list all images found in flash */
 911 /*******************************************************************/
 912 #if defined(CONFIG_CMD_IMLS)
 913 int do_imls (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
 914 {
 915         flash_info_t *info;
 916         int i, j;
 917         void *hdr;
 918
 919         for (i = 0, info = &flash_info[0];
 920                 i < CFG_MAX_FLASH_BANKS; ++i, ++info) {
 921
 922                 if (info->flash_id == FLASH_UNKNOWN)
 923                         goto next_bank;
 924                 for (j = 0; j < info->sector_count; ++j) {
 925
 926                         hdr = (void *)info->start[j];
 927                         if (!hdr)
 928                                 goto next_sector;
 929
 930                         switch (genimg_get_format (hdr)) {
 931                         case IMAGE_FORMAT_LEGACY:
 932                                 if (!image_check_hcrc (hdr))
 933                                         goto next_sector;
 934
 935                                 printf ("Legacy Image at %08lX:\n", (ulong)hdr);
 936                                 image_print_contents (hdr);
 937
 938                                 puts ("   Verifying Checksum ... ");
 939                                 if (!image_check_dcrc (hdr)) {
 940                                         puts ("Bad Data CRC\n");
 941                                 } else {
 942                                         puts ("OK\n");
 943                                 }
 944                                 break;
 945 #if defined(CONFIG_FIT)
 946                         case IMAGE_FORMAT_FIT:
 947                                 if (!fit_check_format (hdr))
 948                                         goto next_sector;
 949
 950                                 printf ("FIT Image at %08lX:\n", (ulong)hdr);
 951                                 fit_print_contents (hdr);
 952                                 break;
 953 #endif
 954                         default:
 955                                 goto next_sector;
 956                         }
 957
 958 next_sector:            ;
 959                 }
 960 next_bank:      ;
 961         }
 962
 963         return (0);
 964 }
 965
 966 U_BOOT_CMD(
 967         imls,   1,              1,      do_imls,
 968         "imls    - list all images found in flash\n",
 969         "\n"
 970         "    - Prints information about all images found at sector\n"
 971         "      boundaries in flash.\n"
 972 );
 973 #endif
 974
 975 /*******************************************************************/
 976 /* helper routines */
 977 /*******************************************************************/
 978 #ifdef CONFIG_SILENT_CONSOLE
 979 static void fixup_silent_linux ()
 980 {
 981         char buf[256], *start, *end;
 982         char *cmdline = getenv ("bootargs");
 983
 984         /* Only fix cmdline when requested */
 985         if (!(gd->flags & GD_FLG_SILENT))
 986                 return;
 987
 988         debug ("before silent fix-up: %s\n", cmdline);
 989         if (cmdline) {
 990                 if ((start = strstr (cmdline, "console=")) != NULL) {
 991                         end = strchr (start, ' ');
 992                         strncpy (buf, cmdline, (start - cmdline + 8));
 993                         if (end)
 994                                 strcpy (buf + (start - cmdline + 8), end);
 995                         else
 996                                 buf[start - cmdline + 8] = '\0';
 997                 } else {
 998                         strcpy (buf, cmdline);
 999                         strcat (buf, " console=");
1000                 }
1001         } else {
1002                 strcpy (buf, "console=");
1003         }
1004
1005         setenv ("bootargs", buf);
1006         debug ("after silent fix-up: %s\n", buf);
1007 }
1008 #endif /* CONFIG_SILENT_CONSOLE */
1009
1010
1011 /*******************************************************************/
1012 /* OS booting routines */
1013 /*******************************************************************/
1014
1015 static int do_bootm_netbsd (int flag, int argc, char *argv[],
1016                             bootm_headers_t *images)
1017 {
1018         void (*loader)(bd_t *, image_header_t *, char *, char *);
1019         image_header_t *os_hdr, *hdr;
1020         ulong kernel_data, kernel_len;
1021         char *consdev;
1022         char *cmdline;
1023
1024 #if defined(CONFIG_FIT)
1025         if (!images->legacy_hdr_valid) {
1026                 fit_unsupported_reset ("NetBSD");
1027                 return 1;
1028         }
1029 #endif
1030         hdr = images->legacy_hdr_os;
1031
1032         /*
1033          * Booting a (NetBSD) kernel image
1034          *
1035          * This process is pretty similar to a standalone application:
1036          * The (first part of an multi-) image must be a stage-2 loader,
1037          * which in turn is responsible for loading & invoking the actual
1038          * kernel.  The only differences are the parameters being passed:
1039          * besides the board info strucure, the loader expects a command
1040          * line, the name of the console device, and (optionally) the
1041          * address of the original image header.
1042          */
1043         os_hdr = NULL;
1044         if (image_check_type (&images->legacy_hdr_os_copy, IH_TYPE_MULTI)) {
1045                 image_multi_getimg (hdr, 1, &kernel_data, &kernel_len);
1046                 if (kernel_len)
1047                         os_hdr = hdr;
1048         }
1049
1050         consdev = "";
1051 #if   defined (CONFIG_8xx_CONS_SMC1)
1052         consdev = "smc1";
1053 #elif defined (CONFIG_8xx_CONS_SMC2)
1054         consdev = "smc2";
1055 #elif defined (CONFIG_8xx_CONS_SCC2)
1056         consdev = "scc2";
1057 #elif defined (CONFIG_8xx_CONS_SCC3)
1058         consdev = "scc3";
1059 #endif
1060
1061         if (argc > 2) {
1062                 ulong len;
1063                 int   i;
1064
1065                 for (i = 2, len = 0; i < argc; i += 1)
1066                         len += strlen (argv[i]) + 1;
1067                 cmdline = malloc (len);
1068
1069                 for (i = 2, len = 0; i < argc; i += 1) {
1070                         if (i > 2)
1071                                 cmdline[len++] = ' ';
1072                         strcpy (&cmdline[len], argv[i]);
1073                         len += strlen (argv[i]);
1074                 }
1075         } else if ((cmdline = getenv ("bootargs")) == NULL) {
1076                 cmdline = "";
1077         }
1078
1079         loader = (void (*)(bd_t *, image_header_t *, char *, char *))images->ep;
1080
1081         printf ("## Transferring control to NetBSD stage-2 loader (at address %08lx) ...\n",
1082                 (ulong)loader);
1083
1084         show_boot_progress (15);
1085
1086         /*
1087          * NetBSD Stage-2 Loader Parameters:
1088          *   r3: ptr to board info data
1089          *   r4: image address
1090          *   r5: console device
1091          *   r6: boot args string
1092          */
1093         (*loader) (gd->bd, os_hdr, consdev, cmdline);
1094
1095         return 1;
1096 }
1097
1098 #ifdef CONFIG_LYNXKDI
1099 static int do_bootm_lynxkdi (int flag, int argc, char *argv[],
1100                              bootm_headers_t *images)
1101 {
1102         image_header_t *hdr = &images->legacy_hdr_os_copy;
1103
1104 #if defined(CONFIG_FIT)
1105         if (!images->legacy_hdr_valid) {
1106                 fit_unsupported_reset ("Lynx");
1107                 return 1;
1108         }
1109 #endif
1110
1111         lynxkdi_boot ((image_header_t *)hdr);
1112
1113         return 1;
1114 }
1115 #endif /* CONFIG_LYNXKDI */
1116
1117 static int do_bootm_rtems (int flag, int argc, char *argv[],
1118                            bootm_headers_t *images)
1119 {
1120         void (*entry_point)(bd_t *);
1121
1122 #if defined(CONFIG_FIT)
1123         if (!images->legacy_hdr_valid) {
1124                 fit_unsupported_reset ("RTEMS");
1125                 return 1;
1126         }
1127 #endif
1128
1129         entry_point = (void (*)(bd_t *))images->ep;
1130
1131         printf ("## Transferring control to RTEMS (at address %08lx) ...\n",
1132                 (ulong)entry_point);
1133
1134         show_boot_progress (15);
1135
1136         /*
1137          * RTEMS Parameters:
1138          *   r3: ptr to board info data
1139          */
1140         (*entry_point)(gd->bd);
1141
1142         return 1;
1143 }
1144
1145 #if defined(CONFIG_CMD_ELF)
1146 static int do_bootm_vxworks (int flag, int argc, char *argv[],
1147                              bootm_headers_t *images)
1148 {
1149         char str[80];
1150
1151 #if defined(CONFIG_FIT)
1152         if (!images->legacy_hdr_valid) {
1153                 fit_unsupported_reset ("VxWorks");
1154                 return 1;
1155         }
1156 #endif
1157
1158         sprintf(str, "%lx", images->ep); /* write entry-point into string */
1159         setenv("loadaddr", str);
1160         do_bootvx(NULL, 0, 0, NULL);
1161
1162         return 1;
1163 }
1164
1165 static int do_bootm_qnxelf(int flag, int argc, char *argv[],
1166                             bootm_headers_t *images)
1167 {
1168         char *local_args[2];
1169         char str[16];
1170
1171 #if defined(CONFIG_FIT)
1172         if (!images->legacy_hdr_valid) {
1173                 fit_unsupported_reset ("QNX");
1174                 return 1;
1175         }
1176 #endif
1177
1178         sprintf(str, "%lx", images->ep); /* write entry-point into string */
1179         local_args[0] = argv[0];
1180         local_args[1] = str;    /* and provide it via the arguments */
1181         do_bootelf(NULL, 0, 2, local_args);
1182
1183         return 1;
1184 }
1185 #endif
1186
1187 #ifdef CONFIG_INTEGRITY
1188 static int do_bootm_integrity (int flag, int argc, char *argv[],
1189                            bootm_headers_t *images)
1190 {
1191         void (*entry_point)(void);
1192
1193 #if defined(CONFIG_FIT)
1194         if (!images->legacy_hdr_valid) {
1195                 fit_unsupported_reset ("INTEGRITY");
1196                 return 1;
1197         }
1198 #endif
1199
1200         entry_point = (void (*)(void))images->ep;
1201
1202         printf ("## Transferring control to INTEGRITY (at address %08lx) ...\n",
1203                 (ulong)entry_point);
1204
1205         show_boot_progress (15);
1206
1207         /*
1208          * INTEGRITY Parameters:
1209          *   None
1210          */
1211         (*entry_point)();
1212
1213         return 1;
1214 }
1215 #endif