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

   1 /*
   2  * (C) Copyright 2008 Semihalf
   3  *
   4  * (C) Copyright 2000-2006
   5  * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
   6  *
   7  * See file CREDITS for list of people who contributed to this
   8  * project.
   9  *
  10  * This program is free software; you can redistribute it and/or
  11  * modify it under the terms of the GNU General Public License as
  12  * published by the Free Software Foundation; either version 2 of
  13  * the License, or (at your option) any later version.
  14  *
  15  * This program is distributed in the hope that it will be useful,
  16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18  * GNU General Public License for more details.
  19  *
  20  * You should have received a copy of the GNU General Public License
  21  * along with this program; if not, write to the Free Software
  22  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  23  * MA 02111-1307 USA
  24  */
  25
  26 #define DEBUG
  27
  28 #ifndef USE_HOSTCC
  29 #include <common.h>
  30 #include <watchdog.h>
  31
  32 #ifdef CONFIG_SHOW_BOOT_PROGRESS
  33 #include <status_led.h>
  34 #endif
  35
  36 #ifdef CONFIG_HAS_DATAFLASH
  37 #include <dataflash.h>
  38 #endif
  39
  40 #ifdef CONFIG_LOGBUFFER
  41 #include <logbuff.h>
  42 #endif
  43
  44 #if defined(CONFIG_TIMESTAMP) || defined(CONFIG_CMD_DATE)
  45 #include <rtc.h>
  46 #endif
  47
  48 #if defined(CONFIG_FIT)
  49 #include <fdt.h>
  50 #include <libfdt.h>
  51 #include <fdt_support.h>
  52 #endif
  53
  54 extern int do_reset (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
  55
  56 #ifdef CONFIG_CMD_BDI
  57 extern int do_bdinfo(cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
  58 #endif
  59
  60 DECLARE_GLOBAL_DATA_PTR;
  61
  62 static image_header_t* image_get_ramdisk (cmd_tbl_t *cmdtp, int flag,
  63                 int argc, char *argv[],
  64                 ulong rd_addr, uint8_t arch, int verify);
  65 #else
  66 #include "mkimage.h"
  67 #endif /* USE_HOSTCC*/
  68
  69 #include <image.h>
  70
  71 unsigned long crc32 (unsigned long, const unsigned char *, unsigned int);
  72
  73 int image_check_hcrc (image_header_t *hdr)
  74 {
  75         ulong hcrc;
  76         ulong len = image_get_header_size ();
  77         image_header_t header;
  78
  79         /* Copy header so we can blank CRC field for re-calculation */
  80         memmove (&header, (char *)hdr, image_get_header_size ());
  81         image_set_hcrc (&header, 0);
  82
  83         hcrc = crc32 (0, (unsigned char *)&header, len);
  84
  85         return (hcrc == image_get_hcrc (hdr));
  86 }
  87
  88 int image_check_dcrc (image_header_t *hdr)
  89 {
  90         ulong data = image_get_data (hdr);
  91         ulong len = image_get_data_size (hdr);
  92         ulong dcrc = crc32 (0, (unsigned char *)data, len);
  93
  94         return (dcrc == image_get_dcrc (hdr));
  95 }
  96
  97 #ifndef USE_HOSTCC
  98 int image_check_dcrc_wd (image_header_t *hdr, ulong chunksz)
  99 {
 100         ulong dcrc = 0;
 101         ulong len = image_get_data_size (hdr);
 102         ulong data = image_get_data (hdr);
 103
 104 #if defined(CONFIG_HW_WATCHDOG) || defined(CONFIG_WATCHDOG)
 105         ulong cdata = data;
 106         ulong edata = cdata + len;
 107
 108         while (cdata < edata) {
 109                 ulong chunk = edata - cdata;
 110
 111                 if (chunk > chunksz)
 112                         chunk = chunksz;
 113                 dcrc = crc32 (dcrc, (unsigned char *)cdata, chunk);
 114                 cdata += chunk;
 115
 116                 WATCHDOG_RESET ();
 117         }
 118 #else
 119         dcrc = crc32 (0, (unsigned char *)data, len);
 120 #endif
 121
 122         return (dcrc == image_get_dcrc (hdr));
 123 }
 124
 125 int getenv_verify (void)
 126 {
 127         char *s = getenv ("verify");
 128         return (s && (*s == 'n')) ? 0 : 1;
 129 }
 130
 131 void memmove_wd (void *to, void *from, size_t len, ulong chunksz)
 132 {
 133 #if defined(CONFIG_HW_WATCHDOG) || defined(CONFIG_WATCHDOG)
 134         while (len > 0) {
 135                 size_t tail = (len > chunksz) ? chunksz : len;
 136                 WATCHDOG_RESET ();
 137                 memmove (to, from, tail);
 138                 to += tail;
 139                 from += tail;
 140                 len -= tail;
 141         }
 142 #else   /* !(CONFIG_HW_WATCHDOG || CONFIG_WATCHDOG) */
 143         memmove (to, from, len);
 144 #endif  /* CONFIG_HW_WATCHDOG || CONFIG_WATCHDOG */
 145 }
 146 #endif /* USE_HOSTCC */
 147
 148 /**
 149  * image_multi_count - get component (sub-image) count
 150  * @hdr: pointer to the header of the multi component image
 151  *
 152  * image_multi_count() returns number of components in a multi
 153  * component image.
 154  *
 155  * Note: no checking of the image type is done, caller must pass
 156  * a valid multi component image.
 157  *
 158  * returns:
 159  *     number of components
 160  */
 161 ulong image_multi_count (image_header_t *hdr)
 162 {
 163         ulong i, count = 0;
 164         ulong *size;
 165
 166         /* get start of the image payload, which in case of multi
 167          * component images that points to a table of component sizes */
 168         size = (ulong *)image_get_data (hdr);
 169
 170         /* count non empty slots */
 171         for (i = 0; size[i]; ++i)
 172                 count++;
 173
 174         return count;
 175 }
 176
 177 /**
 178  * image_multi_getimg - get component data address and size
 179  * @hdr: pointer to the header of the multi component image
 180  * @idx: index of the requested component
 181  * @data: pointer to a ulong variable, will hold component data address
 182  * @len: pointer to a ulong variable, will hold component size
 183  *
 184  * image_multi_getimg() returns size and data address for the requested
 185  * component in a multi component image.
 186  *
 187  * Note: no checking of the image type is done, caller must pass
 188  * a valid multi component image.
 189  *
 190  * returns:
 191  *     data address and size of the component, if idx is valid
 192  *     0 in data and len, if idx is out of range
 193  */
 194 void image_multi_getimg (image_header_t *hdr, ulong idx,
 195                         ulong *data, ulong *len)
 196 {
 197         int i;
 198         ulong *size;
 199         ulong offset, tail, count, img_data;
 200
 201         /* get number of component */
 202         count = image_multi_count (hdr);
 203
 204         /* get start of the image payload, which in case of multi
 205          * component images that points to a table of component sizes */
 206         size = (ulong *)image_get_data (hdr);
 207
 208         /* get address of the proper component data start, which means
 209          * skipping sizes table (add 1 for last, null entry) */
 210         img_data = image_get_data (hdr) + (count + 1) * sizeof (ulong);
 211
 212         if (idx < count) {
 213                 *len = size[idx];
 214                 offset = 0;
 215                 tail = 0;
 216
 217                 /* go over all indices preceding requested component idx */
 218                 for (i = 0; i < idx; i++) {
 219                         /* add up i-th component size */
 220                         offset += size[i];
 221
 222                         /* add up alignment for i-th component */
 223                         tail += (4 - size[i] % 4);
 224                 }
 225
 226                 /* calculate idx-th component data address */
 227                 *data = img_data + offset + tail;
 228         } else {
 229                 *len = 0;
 230                 *data = 0;
 231         }
 232 }
 233
 234 #ifndef USE_HOSTCC
 235 const char* image_get_os_name (uint8_t os)
 236 {
 237         const char *name;
 238
 239         switch (os) {
 240         case IH_OS_INVALID:     name = "Invalid OS";            break;
 241         case IH_OS_NETBSD:      name = "NetBSD";                break;
 242         case IH_OS_LINUX:       name = "Linux";                 break;
 243         case IH_OS_VXWORKS:     name = "VxWorks";               break;
 244         case IH_OS_QNX:         name = "QNX";                   break;
 245         case IH_OS_U_BOOT:      name = "U-Boot";                break;
 246         case IH_OS_RTEMS:       name = "RTEMS";                 break;
 247 #ifdef CONFIG_ARTOS
 248         case IH_OS_ARTOS:       name = "ARTOS";                 break;
 249 #endif
 250 #ifdef CONFIG_LYNXKDI
 251         case IH_OS_LYNXOS:      name = "LynxOS";                break;
 252 #endif
 253         default:                name = "Unknown OS";            break;
 254         }
 255
 256         return name;
 257 }
 258
 259 const char* image_get_arch_name (uint8_t arch)
 260 {
 261         const char *name;
 262
 263         switch (arch) {
 264         case IH_ARCH_INVALID:   name = "Invalid Architecture";  break;
 265         case IH_ARCH_ALPHA:     name = "Alpha";                 break;
 266         case IH_ARCH_ARM:       name = "ARM";                   break;
 267         case IH_ARCH_AVR32:     name = "AVR32";                 break;
 268         case IH_ARCH_BLACKFIN:  name = "Blackfin";              break;
 269         case IH_ARCH_I386:      name = "Intel x86";             break;
 270         case IH_ARCH_IA64:      name = "IA64";                  break;
 271         case IH_ARCH_M68K:      name = "M68K";                  break;
 272         case IH_ARCH_MICROBLAZE:name = "Microblaze";            break;
 273         case IH_ARCH_MIPS64:    name = "MIPS 64 Bit";           break;
 274         case IH_ARCH_MIPS:      name = "MIPS";                  break;
 275         case IH_ARCH_NIOS2:     name = "Nios-II";               break;
 276         case IH_ARCH_NIOS:      name = "Nios";                  break;
 277         case IH_ARCH_PPC:       name = "PowerPC";               break;
 278         case IH_ARCH_S390:      name = "IBM S390";              break;
 279         case IH_ARCH_SH:        name = "SuperH";                break;
 280         case IH_ARCH_SPARC64:   name = "SPARC 64 Bit";          break;
 281         case IH_ARCH_SPARC:     name = "SPARC";                 break;
 282         default:                name = "Unknown Architecture";  break;
 283         }
 284
 285         return name;
 286 }
 287
 288 const char* image_get_type_name (uint8_t type)
 289 {
 290         const char *name;
 291
 292         switch (type) {
 293         case IH_TYPE_INVALID:   name = "Invalid Image";         break;
 294         case IH_TYPE_STANDALONE:name = "Standalone Program";    break;
 295         case IH_TYPE_KERNEL:    name = "Kernel Image";          break;
 296         case IH_TYPE_RAMDISK:   name = "RAMDisk Image";         break;
 297         case IH_TYPE_MULTI:     name = "Multi-File Image";      break;
 298         case IH_TYPE_FIRMWARE:  name = "Firmware";              break;
 299         case IH_TYPE_SCRIPT:    name = "Script";                break;
 300         case IH_TYPE_FLATDT:    name = "Flat Device Tree";      break;
 301         default:                name = "Unknown Image";         break;
 302         }
 303
 304         return name;
 305 }
 306
 307 const char* image_get_comp_name (uint8_t comp)
 308 {
 309         const char *name;
 310
 311         switch (comp) {
 312         case IH_COMP_NONE:      name = "uncompressed";          break;
 313         case IH_COMP_GZIP:      name = "gzip compressed";       break;
 314         case IH_COMP_BZIP2:     name = "bzip2 compressed";      break;
 315         default:                name = "unknown compression";   break;
 316         }
 317
 318         return name;
 319 }
 320
 321 static void image_print_type (image_header_t *hdr)
 322 {
 323         const char *os, *arch, *type, *comp;
 324
 325         os = image_get_os_name (image_get_os (hdr));
 326         arch = image_get_arch_name (image_get_arch (hdr));
 327         type = image_get_type_name (image_get_type (hdr));
 328         comp = image_get_comp_name (image_get_comp (hdr));
 329
 330         printf ("%s %s %s (%s)", arch, os, type, comp);
 331 }
 332
 333 void image_print_contents (image_header_t *hdr)
 334 {
 335 #if defined(CONFIG_TIMESTAMP) || defined(CONFIG_CMD_DATE)
 336         time_t timestamp = (time_t)image_get_time (hdr);
 337         struct rtc_time tm;
 338 #endif
 339
 340         printf ("   Image Name:   %.*s\n", IH_NMLEN, image_get_name (hdr));
 341
 342 #if defined(CONFIG_TIMESTAMP) || defined(CONFIG_CMD_DATE)
 343         to_tm (timestamp, &tm);
 344         printf ("   Created:      %4d-%02d-%02d  %2d:%02d:%02d UTC\n",
 345                 tm.tm_year, tm.tm_mon, tm.tm_mday,
 346                 tm.tm_hour, tm.tm_min, tm.tm_sec);
 347 #endif
 348         puts ("   Image Type:   ");
 349         image_print_type (hdr);
 350
 351         printf ("\n   Data Size:    %d Bytes = ", image_get_data_size (hdr));
 352         print_size (image_get_data_size (hdr), "\n");
 353         printf ("   Load Address: %08x\n"
 354                 "   Entry Point:  %08x\n",
 355                  image_get_load (hdr), image_get_ep (hdr));
 356
 357         if (image_check_type (hdr, IH_TYPE_MULTI)) {
 358                 int i;
 359                 ulong data, len;
 360                 ulong count = image_multi_count (hdr);
 361
 362                 puts ("   Contents:\n");
 363                 for (i = 0; i < count; i++) {
 364                         image_multi_getimg (hdr, i, &data, &len);
 365                         printf ("   Image %d: %8ld Bytes = ", i, len);
 366                         print_size (len, "\n");
 367                 }
 368         }
 369 }
 370
 371 /**
 372  * gen_image_get_format - get image format type
 373  * @img_addr: image start address
 374  *
 375  * gen_image_get_format() checks whether provided address points to a valid
 376  * legacy or FIT image.
 377  *
 378  * returns:
 379  *     image format type or IMAGE_FORMAT_INVALID if no image is present
 380  */
 381 int gen_image_get_format (void *img_addr)
 382 {
 383         ulong           format = IMAGE_FORMAT_INVALID;
 384         image_header_t  *hdr;
 385 #if defined(CONFIG_FIT)
 386         char            *fit_hdr;
 387 #endif
 388
 389         hdr = (image_header_t *)img_addr;
 390         if (image_check_magic(hdr))
 391                 format = IMAGE_FORMAT_LEGACY;
 392 #if defined(CONFIG_FIT)
 393         else {
 394                 fit_hdr = (char *)img_addr;
 395                 if (fdt_check_header (fit_hdr) == 0)
 396                         format = IMAGE_FORMAT_FIT;
 397         }
 398 #endif
 399
 400         return format;
 401 }
 402
 403 /**
 404  * gen_get_image - get image from special storage (if necessary)
 405  * @img_addr: image start address
 406  *
 407  * gen_get_image() checks if provided image start adddress is located
 408  * in a dataflash storage. If so, image is moved to a system RAM memory.
 409  *
 410  * returns:
 411  *     image start address after possible relocation from special storage
 412  */
 413 ulong gen_get_image (ulong img_addr)
 414 {
 415         ulong ram_addr = img_addr;
 416
 417 #ifdef CONFIG_HAS_DATAFLASH
 418         ulong h_size, d_size;
 419
 420         if (addr_dataflash (img_addr)){
 421                 /* ger RAM address */
 422                 ram_addr = CFG_LOAD_ADDR;
 423
 424                 /* get header size */
 425                 h_size = image_get_header_size ();
 426 #if defined(CONFIG_FIT)
 427                 if (sizeof(struct fdt_header) > h_size)
 428                         h_size = sizeof(struct fdt_header);
 429 #endif
 430
 431                 /* read in header */
 432                 debug ("   Reading image header from dataflash address "
 433                         "%08lx to RAM address %08lx\n", img_addr, ram_addr);
 434
 435                 read_dataflash (img_addr, h_size, (char *)ram_addr);
 436
 437                 /* get data size */
 438                 switch (gen_image_get_format ((void *)ram_addr)) {
 439                 case IMAGE_FORMAT_LEGACY:
 440                         d_size = image_get_data_size ((image_header_t *)ram_addr);
 441                         debug ("   Legacy format image found at 0x%08lx, size 0x%08lx\n",
 442                                         ram_addr, d_size);
 443                         break;
 444 #if defined(CONFIG_FIT)
 445                 case IMAGE_FORMAT_FIT:
 446                         d_size = fdt_totalsize((void *)ram_addr) - h_size;
 447                         debug ("   FIT/FDT format image found at 0x%08lx, size 0x%08lx\n",
 448                                         ram_addr, d_size);
 449                         break;
 450 #endif
 451                 default:
 452                         printf ("   No valid image found at 0x%08lx\n", img_addr);
 453                         return ram_addr;
 454                 }
 455
 456                 /* read in image data */
 457                 debug ("   Reading image remaining data from dataflash address "
 458                         "%08lx to RAM address %08lx\n", img_addr + h_size,
 459                         ram_addr + h_size);
 460
 461                 read_dataflash (img_addr + h_size, d_size,
 462                                 (char *)(ram_addr + h_size));
 463
 464         }
 465 #endif /* CONFIG_HAS_DATAFLASH */
 466
 467         return ram_addr;
 468 }
 469
 470 /**
 471  * image_get_ramdisk - get and verify ramdisk image
 472  * @cmdtp: command table pointer
 473  * @flag: command flag
 474  * @argc: command argument count
 475  * @argv: command argument list
 476  * @rd_addr: ramdisk image start address
 477  * @arch: expected ramdisk architecture
 478  * @verify: checksum verification flag
 479  *
 480  * image_get_ramdisk() returns a pointer to the verified ramdisk image
 481  * header. Routine receives image start address and expected architecture
 482  * flag. Verification done covers data and header integrity and os/type/arch
 483  * fields checking.
 484  *
 485  * If dataflash support is enabled routine checks for dataflash addresses
 486  * and handles required dataflash reads.
 487  *
 488  * returns:
 489  *     pointer to a ramdisk image header, if image was found and valid
 490  *     otherwise, board is reset
 491  */
 492 static image_header_t* image_get_ramdisk (cmd_tbl_t *cmdtp, int flag,
 493                 int argc, char *argv[],
 494                 ulong rd_addr, uint8_t arch, int verify)
 495 {
 496         image_header_t *rd_hdr;
 497
 498         show_boot_progress (9);
 499         rd_hdr = (image_header_t *)rd_addr;
 500
 501         if (!image_check_magic (rd_hdr)) {
 502                 puts ("Bad Magic Number\n");
 503                 show_boot_progress (-10);
 504                 do_reset (cmdtp, flag, argc, argv);
 505         }
 506
 507         if (!image_check_hcrc (rd_hdr)) {
 508                 puts ("Bad Header Checksum\n");
 509                 show_boot_progress (-11);
 510                 do_reset (cmdtp, flag, argc, argv);
 511         }
 512
 513         show_boot_progress (10);
 514         image_print_contents (rd_hdr);
 515
 516         if (verify) {
 517                 puts("   Verifying Checksum ... ");
 518                 if (!image_check_dcrc_wd (rd_hdr, CHUNKSZ)) {
 519                         puts ("Bad Data CRC\n");
 520                         show_boot_progress (-12);
 521                         do_reset (cmdtp, flag, argc, argv);
 522                 }
 523                 puts("OK\n");
 524         }
 525
 526         show_boot_progress (11);
 527
 528         if (!image_check_os (rd_hdr, IH_OS_LINUX) ||
 529             !image_check_arch (rd_hdr, arch) ||
 530             !image_check_type (rd_hdr, IH_TYPE_RAMDISK)) {
 531                 printf ("No Linux %s Ramdisk Image\n",
 532                                 image_get_arch_name(arch));
 533                 show_boot_progress (-13);
 534                 do_reset (cmdtp, flag, argc, argv);
 535         }
 536
 537         return rd_hdr;
 538 }
 539
 540 /**
 541  * get_ramdisk - main ramdisk handling routine
 542  * @cmdtp: command table pointer
 543  * @flag: command flag
 544  * @argc: command argument count
 545  * @argv: command argument list
 546  * @images: pointer to the bootm images structure
 547  * @arch: expected ramdisk architecture
 548  * @rd_start: pointer to a ulong variable, will hold ramdisk start address
 549  * @rd_end: pointer to a ulong variable, will hold ramdisk end
 550  *
 551  * get_ramdisk() is responsible for finding a valid ramdisk image.
 552  * Curently supported are the following ramdisk sources:
 553  *      - multicomponent kernel/ramdisk image,
 554  *      - commandline provided address of decicated ramdisk image.
 555  *
 556  * returns:
 557  *     rd_start and rd_end are set to ramdisk start/end addresses if
 558  *     ramdisk image is found and valid
 559  *     rd_start and rd_end are set to 0 if no ramdisk exists
 560  *     board is reset if ramdisk image is found but corrupted
 561  */
 562 void get_ramdisk (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[],
 563                 bootm_headers_t *images, uint8_t arch,
 564                 ulong *rd_start, ulong *rd_end)
 565 {
 566         ulong rd_addr, rd_load;
 567         ulong rd_data, rd_len;
 568         image_header_t *rd_hdr;
 569 #if defined(CONFIG_FIT)
 570         void            *fit_hdr;
 571         const char      *fit_uname_config = NULL;
 572         const char      *fit_uname_ramdisk = NULL;
 573         ulong           default_addr;
 574 #endif
 575
 576         /*
 577          * Look for a '-' which indicates to ignore the
 578          * ramdisk argument
 579          */
 580         if ((argc >= 3) && (strcmp(argv[2], "-") ==  0)) {
 581                 debug ("## Skipping init Ramdisk\n");
 582                 rd_len = rd_data = 0;
 583         } else if (argc >= 3) {
 584 #if defined(CONFIG_FIT)
 585                 /*
 586                  * If the init ramdisk comes from the FIT image and the FIT image
 587                  * address is omitted in the command line argument, try to use
 588                  * os FIT image address or default load address.
 589                  */
 590                 if (images->fit_uname_os)
 591                         default_addr = (ulong)images->fit_hdr_os;
 592                 else
 593                         default_addr = load_addr;
 594
 595                 if (fit_parse_conf (argv[2], default_addr,
 596                                         &rd_addr, &fit_uname_config)) {
 597                         debug ("*  ramdisk: config '%s' from image at 0x%08lx\n",
 598                                         fit_uname_config, rd_addr);
 599                 } else if (fit_parse_subimage (argv[2], default_addr,
 600                                         &rd_addr, &fit_uname_ramdisk)) {
 601                         debug ("*  ramdisk: subimage '%s' from image at 0x%08lx\n",
 602                                         fit_uname_ramdisk, rd_addr);
 603                 } else
 604 #endif
 605                 {
 606                         rd_addr = simple_strtoul(argv[2], NULL, 16);
 607                         debug ("*  ramdisk: cmdline image address = 0x%08lx\n",
 608                                         rd_addr);
 609                 }
 610
 611                 /* copy from dataflash if needed */
 612                 printf ("## Loading init Ramdisk Image at %08lx ...\n",
 613                                 rd_addr);
 614                 rd_addr = gen_get_image (rd_addr);
 615
 616                 /*
 617                  * Check if there is an initrd image at the
 618                  * address provided in the second bootm argument
 619                  * check image type, for FIT images get FIT node.
 620                  */
 621                 switch (gen_image_get_format ((void *)rd_addr)) {
 622                 case IMAGE_FORMAT_LEGACY:
 623
 624                         debug ("*  ramdisk: legacy format image\n");
 625
 626                         rd_hdr = image_get_ramdisk (cmdtp, flag, argc, argv,
 627                                                 rd_addr, arch, images->verify);
 628
 629                         rd_data = image_get_data (rd_hdr);
 630                         rd_len = image_get_data_size (rd_hdr);
 631                         rd_load = image_get_load (rd_hdr);
 632                         break;
 633 #if defined(CONFIG_FIT)
 634                 case IMAGE_FORMAT_FIT:
 635                         fit_hdr = (void *)rd_addr;
 636                         debug ("*  ramdisk: FIT format image\n");
 637                         fit_unsupported_reset ("ramdisk");
 638                         do_reset (cmdtp, flag, argc, argv);
 639 #endif
 640                 default:
 641                         printf ("Wrong Image Format for %s command\n",
 642                                         cmdtp->name);
 643                         rd_data = rd_len = 0;
 644                 }
 645
 646 #if defined(CONFIG_B2) || defined(CONFIG_EVB4510) || defined(CONFIG_ARMADILLO)
 647                 /*
 648                  * We need to copy the ramdisk to SRAM to let Linux boot
 649                  */
 650                 if (rd_data) {
 651                         memmove ((void *)rd_load, (uchar *)rd_data, rd_len);
 652                         rd_data = rd_load;
 653                 }
 654 #endif /* CONFIG_B2 || CONFIG_EVB4510 || CONFIG_ARMADILLO */
 655
 656         } else if (images->legacy_hdr_valid &&
 657                         image_check_type (images->legacy_hdr_os, IH_TYPE_MULTI)) {
 658                 /*
 659                  * Now check if we have a legacy mult-component image,
 660                  * get second entry data start address and len.
 661                  */
 662                 show_boot_progress (13);
 663                 printf ("## Loading init Ramdisk from multi component "
 664                                 "Image at %08lx ...\n",
 665                                 (ulong)images->legacy_hdr_os);
 666
 667                 image_multi_getimg (images->legacy_hdr_os, 1, &rd_data, &rd_len);
 668         } else {
 669                 /*
 670                  * no initrd image
 671                  */
 672                 show_boot_progress (14);
 673                 rd_len = rd_data = 0;
 674         }
 675
 676         if (!rd_data) {
 677                 debug ("## No init Ramdisk\n");
 678                 *rd_start = 0;
 679                 *rd_end = 0;
 680         } else {
 681                 *rd_start = rd_data;
 682                 *rd_end = rd_data + rd_len;
 683         }
 684         debug ("   ramdisk start = 0x%08lx, ramdisk end = 0x%08lx\n",
 685                         *rd_start, *rd_end);
 686 }
 687
 688 #if defined(CONFIG_PPC) || defined(CONFIG_M68K)
 689 /**
 690  * ramdisk_high - relocate init ramdisk
 691  * @rd_data: ramdisk data start address
 692  * @rd_len: ramdisk data length
 693  * @kbd: kernel board info copy (within BOOTMAPSZ boundary)
 694  * @sp_limit: stack pointer limit (including BOOTMAPSZ)
 695  * @sp: current stack pointer
 696  * @initrd_start: pointer to a ulong variable, will hold final init ramdisk
 697  *      start address (after possible relocation)
 698  * @initrd_end: pointer to a ulong variable, will hold final init ramdisk
 699  *      end address (after possible relocation)
 700  *
 701  * ramdisk_high() takes a relocation hint from "initrd_high" environement
 702  * variable and if requested ramdisk data is moved to a specified location.
 703  *
 704  * returns:
 705  *     - initrd_start and initrd_end are set to final (after relocation) ramdisk
 706  *     start/end addresses if ramdisk image start and len were provided
 707  *     otherwise set initrd_start and initrd_end set to zeros
 708  *     - returns new allc_current, next free address below BOOTMAPSZ
 709  */
 710 ulong ramdisk_high (ulong alloc_current, ulong rd_data, ulong rd_len,
 711                 bd_t *kbd, ulong sp_limit, ulong sp,
 712                 ulong *initrd_start, ulong *initrd_end)
 713 {
 714         char    *s;
 715         ulong   initrd_high;
 716         int     initrd_copy_to_ram = 1;
 717         ulong   new_alloc_current = alloc_current;
 718
 719         if ((s = getenv ("initrd_high")) != NULL) {
 720                 /* a value of "no" or a similar string will act like 0,
 721                  * turning the "load high" feature off. This is intentional.
 722                  */
 723                 initrd_high = simple_strtoul (s, NULL, 16);
 724                 if (initrd_high == ~0)
 725                         initrd_copy_to_ram = 0;
 726         } else {
 727                 /* not set, no restrictions to load high */
 728                 initrd_high = ~0;
 729         }
 730
 731 #ifdef CONFIG_LOGBUFFER
 732         /* Prevent initrd from overwriting logbuffer */
 733         if (initrd_high < (kbd->bi_memsize - LOGBUFF_LEN - LOGBUFF_OVERHEAD))
 734                 initrd_high = kbd->bi_memsize - LOGBUFF_LEN - LOGBUFF_OVERHEAD;
 735         debug ("## Logbuffer at 0x%08lx ", kbd->bi_memsize - LOGBUFF_LEN);
 736 #endif
 737         debug ("## initrd_high = 0x%08lx, copy_to_ram = %d\n",
 738                         initrd_high, initrd_copy_to_ram);
 739
 740         if (rd_data) {
 741                 if (!initrd_copy_to_ram) {      /* zero-copy ramdisk support */
 742                         debug ("   in-place initrd\n");
 743                         *initrd_start = rd_data;
 744                         *initrd_end = rd_data + rd_len;
 745                 } else {
 746                         new_alloc_current = alloc_current - rd_len;
 747                         *initrd_start  = new_alloc_current;
 748                         *initrd_start &= ~(4096 - 1);   /* align on page */
 749
 750                         if (initrd_high) {
 751                                 ulong nsp;
 752
 753                                 /*
 754                                  * the inital ramdisk does not need to be within
 755                                  * CFG_BOOTMAPSZ as it is not accessed until after
 756                                  * the mm system is initialised.
 757                                  *
 758                                  * do the stack bottom calculation again and see if
 759                                  * the initrd will fit just below the monitor stack
 760                                  * bottom without overwriting the area allocated
 761                                  * for command line args and board info.
 762                                  */
 763                                 nsp = sp;
 764                                 nsp -= 2048;            /* just to be sure */
 765                                 nsp &= ~0xF;
 766
 767                                 if (nsp > initrd_high)  /* limit as specified */
 768                                         nsp = initrd_high;
 769
 770                                 nsp -= rd_len;
 771                                 nsp &= ~(4096 - 1);     /* align on page */
 772
 773                                 if (nsp >= sp_limit) {
 774                                         *initrd_start = nsp;
 775                                         new_alloc_current = alloc_current;
 776                                 }
 777                         }
 778
 779                         show_boot_progress (12);
 780
 781                         *initrd_end = *initrd_start + rd_len;
 782                         printf ("   Loading Ramdisk to %08lx, end %08lx ... ",
 783                                         *initrd_start, *initrd_end);
 784
 785                         memmove_wd((void *)*initrd_start,
 786                                         (void *)rd_data, rd_len, CHUNKSZ);
 787
 788                         puts ("OK\n");
 789                 }
 790         } else {
 791                 *initrd_start = 0;
 792                 *initrd_end = 0;
 793         }
 794         debug ("   ramdisk load start = 0x%08lx, ramdisk load end = 0x%08lx\n",
 795                         *initrd_start, *initrd_end);
 796
 797         return new_alloc_current;
 798 }
 799
 800 /**
 801  * get_boot_sp_limit - calculate stack pointer limit
 802  * @sp: current stack pointer
 803  *
 804  * get_boot_sp_limit() takes current stack pointer adrress and calculates
 805  * stack pointer limit, below which kernel boot data (cmdline, board info,
 806  * etc.) will be allocated.
 807  *
 808  * returns:
 809  *     stack pointer limit
 810  */
 811 ulong get_boot_sp_limit(ulong sp)
 812 {
 813         ulong sp_limit = sp;
 814
 815         sp_limit -= 2048;       /* just to be sure */
 816
 817         /* make sure sp_limit is within kernel mapped space */
 818         if (sp_limit > CFG_BOOTMAPSZ)
 819                 sp_limit = CFG_BOOTMAPSZ;
 820         sp_limit &= ~0xF;
 821
 822         return sp_limit;
 823 }
 824
 825 /**
 826  * get_boot_cmdline - allocate and initialize kernel cmdline
 827  * @alloc_current: current boot allocation address (counting down
 828  *      from sp_limit)
 829  * @cmd_start: pointer to a ulong variable, will hold cmdline start
 830  * @cmd_end: pointer to a ulong variable, will hold cmdline end
 831  *
 832  * get_boot_cmdline() allocates space for kernel command line below
 833  * provided alloc_current address. If "bootargs" U-boot environemnt
 834  * variable is present its contents is copied to allocated kernel
 835  * command line.
 836  *
 837  * returns:
 838  *     alloc_current after cmdline allocation
 839  */
 840 ulong get_boot_cmdline (ulong alloc_current, ulong *cmd_start, ulong *cmd_end)
 841 {
 842         char *cmdline;
 843         char *s;
 844
 845         cmdline = (char *)((alloc_current - CFG_BARGSIZE) & ~0xF);
 846
 847         if ((s = getenv("bootargs")) == NULL)
 848                 s = "";
 849
 850         strcpy(cmdline, s);
 851
 852         *cmd_start = (ulong) & cmdline[0];
 853         *cmd_end = *cmd_start + strlen(cmdline);
 854
 855         debug ("## cmdline at 0x%08lx ... 0x%08lx\n", *cmd_start, *cmd_end);
 856
 857         return (ulong)cmdline;
 858 }
 859
 860 /**
 861  * get_boot_kbd - allocate and initialize kernel copy of board info
 862  * @alloc_current: current boot allocation address (counting down
 863  *      from sp_limit)
 864  * @kbd: double pointer to board info data
 865  *
 866  * get_boot_kbd() - allocates space for kernel copy of board info data.
 867  * Space is allocated below provided alloc_current address and kernel
 868  * board info is initialized with the current u-boot board info data.
 869  *
 870  * returns:
 871  *     alloc_current after kbd allocation
 872  */
 873 ulong get_boot_kbd (ulong alloc_current, bd_t **kbd)
 874 {
 875         *kbd = (bd_t *) (((ulong)alloc_current - sizeof(bd_t)) & ~0xF);
 876         **kbd = *(gd->bd);
 877
 878         debug ("## kernel board info at 0x%08lx\n", (ulong)*kbd);
 879
 880 #if defined(DEBUG) && defined(CONFIG_CMD_BDI)
 881         do_bdinfo(NULL, 0, 0, NULL);
 882 #endif
 883
 884         return (ulong)*kbd;
 885 }
 886 #endif /* CONFIG_PPC || CONFIG_M68K */
 887
 888 #if defined(CONFIG_FIT)
 889 /*****************************************************************************/
 890 /* New uImage format routines */
 891 /*****************************************************************************/
 892 static int fit_parse_spec (const char *spec, char sepc, ulong addr_curr,
 893                 ulong *addr, const char **name)
 894 {
 895         const char *sep;
 896
 897         *addr = addr_curr;
 898         *name = NULL;
 899
 900         sep = strchr (spec, sepc);
 901         if (sep) {
 902                 if (sep - spec > 0)
 903                         *addr = simple_strtoul (spec, NULL, 16);
 904
 905                 *name = sep + 1;
 906                 return 1;
 907         }
 908
 909         return 0;
 910 }
 911
 912 /**
 913  * fit_parse_conf - parse FIT configuration spec
 914  * @spec: input string, containing configuration spec
 915  * @add_curr: current image address (to be used as a possible default)
 916  * @addr: pointer to a ulong variable, will hold FIT image address of a given
 917  * configuration
 918  * @conf_name double pointer to a char, will hold pointer to a configuration
 919  * unit name
 920  *
 921  * fit_parse_conf() expects configuration spec in the for of [<addr>]#<conf>,
 922  * where <addr> is a FIT image address that contains configuration
 923  * with a <conf> unit name.
 924  *
 925  * Address part is optional, and if omitted default add_curr will
 926  * be used instead.
 927  *
 928  * returns:
 929  *     1 if spec is a valid configuration string,
 930  *     addr and conf_name are set accordingly
 931  *     0 otherwise
 932  */
 933 inline int fit_parse_conf (const char *spec, ulong addr_curr,
 934                 ulong *addr, const char **conf_name)
 935 {
 936         return fit_parse_spec (spec, '#', addr_curr, addr, conf_name);
 937 }
 938
 939 /**
 940  * fit_parse_subimage - parse FIT subimage spec
 941  * @spec: input string, containing subimage spec
 942  * @add_curr: current image address (to be used as a possible default)
 943  * @addr: pointer to a ulong variable, will hold FIT image address of a given
 944  * subimage
 945  * @image_name: double pointer to a char, will hold pointer to a subimage name
 946  *
 947  * fit_parse_subimage() expects subimage spec in the for of
 948  * [<addr>]:<subimage>, where <addr> is a FIT image address that contains
 949  * subimage with a <subimg> unit name.
 950  *
 951  * Address part is optional, and if omitted default add_curr will
 952  * be used instead.
 953  *
 954  * returns:
 955  *     1 if spec is a valid subimage string,
 956  *     addr and image_name are set accordingly
 957  *     0 otherwise
 958  */
 959 inline int fit_parse_subimage (const char *spec, ulong addr_curr,
 960                 ulong *addr, const char **image_name)
 961 {
 962         return fit_parse_spec (spec, ':', addr_curr, addr, image_name);
 963 }
 964
 965 #endif /* CONFIG_FIT */
 966
 967 #endif /* USE_HOSTCC */