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 #include <image.h>
  49
  50 #if defined(CONFIG_FIT) || defined (CONFIG_OF_LIBFDT)
  51 #include <fdt.h>
  52 #include <libfdt.h>
  53 #include <fdt_support.h>
  54 #endif
  55
  56 #if defined(CONFIG_FIT)
  57 #include <sha1.h>
  58
  59 static int fit_check_ramdisk (const void *fit, int os_noffset,
  60                 uint8_t arch, int verify);
  61 #endif
  62
  63 #ifdef CONFIG_CMD_BDI
  64 extern int do_bdinfo(cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
  65 #endif
  66
  67 DECLARE_GLOBAL_DATA_PTR;
  68
  69 static image_header_t* image_get_ramdisk (ulong rd_addr, uint8_t arch,
  70                                                 int verify);
  71 #else
  72 #include "mkimage.h"
  73 #include <time.h>
  74 #include <image.h>
  75 #endif /* !USE_HOSTCC*/
  76
  77 typedef struct table_entry {
  78         int     id;             /* as defined in image.h        */
  79         char    *sname;         /* short (input) name           */
  80         char    *lname;         /* long (output) name           */
  81 } table_entry_t;
  82
  83 static table_entry_t uimage_arch[] = {
  84         {       IH_ARCH_INVALID,        NULL,           "Invalid ARCH", },
  85         {       IH_ARCH_ALPHA,          "alpha",        "Alpha",        },
  86         {       IH_ARCH_ARM,            "arm",          "ARM",          },
  87         {       IH_ARCH_I386,           "x86",          "Intel x86",    },
  88         {       IH_ARCH_IA64,           "ia64",         "IA64",         },
  89         {       IH_ARCH_M68K,           "m68k",         "M68K",         },
  90         {       IH_ARCH_MICROBLAZE,     "microblaze",   "MicroBlaze",   },
  91         {       IH_ARCH_MIPS,           "mips",         "MIPS",         },
  92         {       IH_ARCH_MIPS64,         "mips64",       "MIPS 64 Bit",  },
  93         {       IH_ARCH_NIOS,           "nios",         "NIOS",         },
  94         {       IH_ARCH_NIOS2,          "nios2",        "NIOS II",      },
  95         {       IH_ARCH_PPC,            "ppc",          "PowerPC",      },
  96         {       IH_ARCH_S390,           "s390",         "IBM S390",     },
  97         {       IH_ARCH_SH,             "sh",           "SuperH",       },
  98         {       IH_ARCH_SPARC,          "sparc",        "SPARC",        },
  99         {       IH_ARCH_SPARC64,        "sparc64",      "SPARC 64 Bit", },
 100         {       IH_ARCH_BLACKFIN,       "blackfin",     "Blackfin",     },
 101         {       IH_ARCH_AVR32,          "avr32",        "AVR32",        },
 102         {       -1,                     "",             "",             },
 103 };
 104
 105 static table_entry_t uimage_os[] = {
 106         {       IH_OS_INVALID,  NULL,           "Invalid OS",           },
 107 #if defined(CONFIG_ARTOS) || defined(USE_HOSTCC)
 108         {       IH_OS_ARTOS,    "artos",        "ARTOS",                },
 109 #endif
 110         {       IH_OS_LINUX,    "linux",        "Linux",                },
 111 #if defined(CONFIG_LYNXKDI) || defined(USE_HOSTCC)
 112         {       IH_OS_LYNXOS,   "lynxos",       "LynxOS",               },
 113 #endif
 114         {       IH_OS_NETBSD,   "netbsd",       "NetBSD",               },
 115         {       IH_OS_RTEMS,    "rtems",        "RTEMS",                },
 116         {       IH_OS_U_BOOT,   "u-boot",       "U-Boot",               },
 117 #if defined(CONFIG_CMD_ELF) || defined(USE_HOSTCC)
 118         {       IH_OS_QNX,      "qnx",          "QNX",                  },
 119         {       IH_OS_VXWORKS,  "vxworks",      "VxWorks",              },
 120 #endif
 121 #ifdef USE_HOSTCC
 122         {       IH_OS_4_4BSD,   "4_4bsd",       "4_4BSD",               },
 123         {       IH_OS_DELL,     "dell",         "Dell",                 },
 124         {       IH_OS_ESIX,     "esix",         "Esix",                 },
 125         {       IH_OS_FREEBSD,  "freebsd",      "FreeBSD",              },
 126         {       IH_OS_IRIX,     "irix",         "Irix",                 },
 127         {       IH_OS_NCR,      "ncr",          "NCR",                  },
 128         {       IH_OS_OPENBSD,  "openbsd",      "OpenBSD",              },
 129         {       IH_OS_PSOS,     "psos",         "pSOS",                 },
 130         {       IH_OS_SCO,      "sco",          "SCO",                  },
 131         {       IH_OS_SOLARIS,  "solaris",      "Solaris",              },
 132         {       IH_OS_SVR4,     "svr4",         "SVR4",                 },
 133 #endif
 134         {       -1,             "",             "",                     },
 135 };
 136
 137 static table_entry_t uimage_type[] = {
 138         {       IH_TYPE_INVALID,    NULL,         "Invalid Image",      },
 139         {       IH_TYPE_FILESYSTEM, "filesystem", "Filesystem Image",   },
 140         {       IH_TYPE_FIRMWARE,   "firmware",   "Firmware",           },
 141         {       IH_TYPE_KERNEL,     "kernel",     "Kernel Image",       },
 142         {       IH_TYPE_MULTI,      "multi",      "Multi-File Image",   },
 143         {       IH_TYPE_RAMDISK,    "ramdisk",    "RAMDisk Image",      },
 144         {       IH_TYPE_SCRIPT,     "script",     "Script",             },
 145         {       IH_TYPE_STANDALONE, "standalone", "Standalone Program", },
 146         {       IH_TYPE_FLATDT,     "flat_dt",    "Flat Device Tree",   },
 147         {       -1,                 "",           "",                   },
 148 };
 149
 150 static table_entry_t uimage_comp[] = {
 151         {       IH_COMP_NONE,   "none",         "uncompressed",         },
 152         {       IH_COMP_BZIP2,  "bzip2",        "bzip2 compressed",     },
 153         {       IH_COMP_GZIP,   "gzip",         "gzip compressed",      },
 154         {       -1,             "",             "",                     },
 155 };
 156
 157 unsigned long crc32 (unsigned long, const unsigned char *, unsigned int);
 158 static void genimg_print_size (uint32_t size);
 159 #if defined(CONFIG_TIMESTAMP) || defined(CONFIG_CMD_DATE) || defined(USE_HOSTCC)
 160 static void genimg_print_time (time_t timestamp);
 161 #endif
 162
 163 /*****************************************************************************/
 164 /* Legacy format routines */
 165 /*****************************************************************************/
 166 int image_check_hcrc (image_header_t *hdr)
 167 {
 168         ulong hcrc;
 169         ulong len = image_get_header_size ();
 170         image_header_t header;
 171
 172         /* Copy header so we can blank CRC field for re-calculation */
 173         memmove (&header, (char *)hdr, image_get_header_size ());
 174         image_set_hcrc (&header, 0);
 175
 176         hcrc = crc32 (0, (unsigned char *)&header, len);
 177
 178         return (hcrc == image_get_hcrc (hdr));
 179 }
 180
 181 int image_check_dcrc (image_header_t *hdr)
 182 {
 183         ulong data = image_get_data (hdr);
 184         ulong len = image_get_data_size (hdr);
 185         ulong dcrc = crc32 (0, (unsigned char *)data, len);
 186
 187         return (dcrc == image_get_dcrc (hdr));
 188 }
 189
 190 #ifndef USE_HOSTCC
 191 int image_check_dcrc_wd (image_header_t *hdr, ulong chunksz)
 192 {
 193         ulong dcrc = 0;
 194         ulong len = image_get_data_size (hdr);
 195         ulong data = image_get_data (hdr);
 196
 197 #if defined(CONFIG_HW_WATCHDOG) || defined(CONFIG_WATCHDOG)
 198         ulong cdata = data;
 199         ulong edata = cdata + len;
 200
 201         while (cdata < edata) {
 202                 ulong chunk = edata - cdata;
 203
 204                 if (chunk > chunksz)
 205                         chunk = chunksz;
 206                 dcrc = crc32 (dcrc, (unsigned char *)cdata, chunk);
 207                 cdata += chunk;
 208
 209                 WATCHDOG_RESET ();
 210         }
 211 #else
 212         dcrc = crc32 (0, (unsigned char *)data, len);
 213 #endif
 214
 215         return (dcrc == image_get_dcrc (hdr));
 216 }
 217 #endif /* !USE_HOSTCC */
 218
 219 /**
 220  * image_multi_count - get component (sub-image) count
 221  * @hdr: pointer to the header of the multi component image
 222  *
 223  * image_multi_count() returns number of components in a multi
 224  * component image.
 225  *
 226  * Note: no checking of the image type is done, caller must pass
 227  * a valid multi component image.
 228  *
 229  * returns:
 230  *     number of components
 231  */
 232 ulong image_multi_count (image_header_t *hdr)
 233 {
 234         ulong i, count = 0;
 235         uint32_t *size;
 236
 237         /* get start of the image payload, which in case of multi
 238          * component images that points to a table of component sizes */
 239         size = (uint32_t *)image_get_data (hdr);
 240
 241         /* count non empty slots */
 242         for (i = 0; size[i]; ++i)
 243                 count++;
 244
 245         return count;
 246 }
 247
 248 /**
 249  * image_multi_getimg - get component data address and size
 250  * @hdr: pointer to the header of the multi component image
 251  * @idx: index of the requested component
 252  * @data: pointer to a ulong variable, will hold component data address
 253  * @len: pointer to a ulong variable, will hold component size
 254  *
 255  * image_multi_getimg() returns size and data address for the requested
 256  * component in a multi component image.
 257  *
 258  * Note: no checking of the image type is done, caller must pass
 259  * a valid multi component image.
 260  *
 261  * returns:
 262  *     data address and size of the component, if idx is valid
 263  *     0 in data and len, if idx is out of range
 264  */
 265 void image_multi_getimg (image_header_t *hdr, ulong idx,
 266                         ulong *data, ulong *len)
 267 {
 268         int i;
 269         uint32_t *size;
 270         ulong offset, tail, count, img_data;
 271
 272         /* get number of component */
 273         count = image_multi_count (hdr);
 274
 275         /* get start of the image payload, which in case of multi
 276          * component images that points to a table of component sizes */
 277         size = (uint32_t *)image_get_data (hdr);
 278
 279         /* get address of the proper component data start, which means
 280          * skipping sizes table (add 1 for last, null entry) */
 281         img_data = image_get_data (hdr) + (count + 1) * sizeof (uint32_t);
 282
 283         if (idx < count) {
 284                 *len = uimage_to_cpu (size[idx]);
 285                 offset = 0;
 286                 tail = 0;
 287
 288                 /* go over all indices preceding requested component idx */
 289                 for (i = 0; i < idx; i++) {
 290                         /* add up i-th component size */
 291                         offset += uimage_to_cpu (size[i]);
 292
 293                         /* add up alignment for i-th component */
 294                         tail += (4 - uimage_to_cpu (size[i]) % 4);
 295                 }
 296
 297                 /* calculate idx-th component data address */
 298                 *data = img_data + offset + tail;
 299         } else {
 300                 *len = 0;
 301                 *data = 0;
 302         }
 303 }
 304
 305 static void image_print_type (image_header_t *hdr)
 306 {
 307         const char *os, *arch, *type, *comp;
 308
 309         os = genimg_get_os_name (image_get_os (hdr));
 310         arch = genimg_get_arch_name (image_get_arch (hdr));
 311         type = genimg_get_type_name (image_get_type (hdr));
 312         comp = genimg_get_comp_name (image_get_comp (hdr));
 313
 314         printf ("%s %s %s (%s)\n", arch, os, type, comp);
 315 }
 316
 317 /**
 318  * __image_print_contents - prints out the contents of the legacy format image
 319  * @hdr: pointer to the legacy format image header
 320  * @p: pointer to prefix string
 321  *
 322  * __image_print_contents() formats a multi line legacy image contents description.
 323  * The routine prints out all header fields followed by the size/offset data
 324  * for MULTI/SCRIPT images.
 325  *
 326  * returns:
 327  *     no returned results
 328  */
 329 static void __image_print_contents (image_header_t *hdr, const char *p)
 330 {
 331         printf ("%sImage Name:   %.*s\n", p, IH_NMLEN, image_get_name (hdr));
 332 #if defined(CONFIG_TIMESTAMP) || defined(CONFIG_CMD_DATE) || defined(USE_HOSTCC)
 333         printf ("%sCreated:      ", p);
 334         genimg_print_time ((time_t)image_get_time (hdr));
 335 #endif
 336         printf ("%sImage Type:   ", p);
 337         image_print_type (hdr);
 338         printf ("%sData Size:    ", p);
 339         genimg_print_size (image_get_data_size (hdr));
 340         printf ("%sLoad Address: %08x\n", p, image_get_load (hdr));
 341         printf ("%sEntry Point:  %08x\n", p, image_get_ep (hdr));
 342
 343         if (image_check_type (hdr, IH_TYPE_MULTI) ||
 344                         image_check_type (hdr, IH_TYPE_SCRIPT)) {
 345                 int i;
 346                 ulong data, len;
 347                 ulong count = image_multi_count (hdr);
 348
 349                 printf ("%sContents:\n", p);
 350                 for (i = 0; i < count; i++) {
 351                         image_multi_getimg (hdr, i, &data, &len);
 352
 353                         printf ("%s   Image %d: ", p, i);
 354                         genimg_print_size (len);
 355
 356                         if (image_check_type (hdr, IH_TYPE_SCRIPT) && i > 0) {
 357                                 /*
 358                                  * the user may need to know offsets
 359                                  * if planning to do something with
 360                                  * multiple files
 361                                  */
 362                                 printf ("%s    Offset = 0x%08lx\n", p, data);
 363                         }
 364                 }
 365         }
 366 }
 367
 368 inline void image_print_contents (image_header_t *hdr)
 369 {
 370         __image_print_contents (hdr, "   ");
 371 }
 372
 373 inline void image_print_contents_noindent (image_header_t *hdr)
 374 {
 375         __image_print_contents (hdr, "");
 376 }
 377
 378 #ifndef USE_HOSTCC
 379 /**
 380  * image_get_ramdisk - get and verify ramdisk image
 381  * @rd_addr: ramdisk image start address
 382  * @arch: expected ramdisk architecture
 383  * @verify: checksum verification flag
 384  *
 385  * image_get_ramdisk() returns a pointer to the verified ramdisk image
 386  * header. Routine receives image start address and expected architecture
 387  * flag. Verification done covers data and header integrity and os/type/arch
 388  * fields checking.
 389  *
 390  * If dataflash support is enabled routine checks for dataflash addresses
 391  * and handles required dataflash reads.
 392  *
 393  * returns:
 394  *     pointer to a ramdisk image header, if image was found and valid
 395  *     otherwise, return NULL
 396  */
 397 static image_header_t* image_get_ramdisk (ulong rd_addr, uint8_t arch,
 398                                                 int verify)
 399 {
 400         image_header_t *rd_hdr;
 401
 402         show_boot_progress (9);
 403         rd_hdr = (image_header_t *)rd_addr;
 404
 405         if (!image_check_magic (rd_hdr)) {
 406                 puts ("Bad Magic Number\n");
 407                 show_boot_progress (-10);
 408                 return NULL;
 409         }
 410
 411         if (!image_check_hcrc (rd_hdr)) {
 412                 puts ("Bad Header Checksum\n");
 413                 show_boot_progress (-11);
 414                 return NULL;
 415         }
 416
 417         show_boot_progress (10);
 418         image_print_contents (rd_hdr);
 419
 420         if (verify) {
 421                 puts("   Verifying Checksum ... ");
 422                 if (!image_check_dcrc_wd (rd_hdr, CHUNKSZ)) {
 423                         puts ("Bad Data CRC\n");
 424                         show_boot_progress (-12);
 425                         return NULL;
 426                 }
 427                 puts("OK\n");
 428         }
 429
 430         show_boot_progress (11);
 431
 432         if (!image_check_os (rd_hdr, IH_OS_LINUX) ||
 433             !image_check_arch (rd_hdr, arch) ||
 434             !image_check_type (rd_hdr, IH_TYPE_RAMDISK)) {
 435                 printf ("No Linux %s Ramdisk Image\n",
 436                                 genimg_get_arch_name(arch));
 437                 show_boot_progress (-13);
 438                 return NULL;
 439         }
 440
 441         return rd_hdr;
 442 }
 443 #endif /* !USE_HOSTCC */
 444
 445 /*****************************************************************************/
 446 /* Shared dual-format routines */
 447 /*****************************************************************************/
 448 #ifndef USE_HOSTCC
 449 int getenv_verify (void)
 450 {
 451         char *s = getenv ("verify");
 452         return (s && (*s == 'n')) ? 0 : 1;
 453 }
 454
 455 int getenv_autostart (void)
 456 {
 457         char *s = getenv ("autostart");
 458         return (s && (*s == 'n')) ? 0 : 1;
 459 }
 460
 461 ulong getenv_bootm_low(void)
 462 {
 463         char *s = getenv ("bootm_low");
 464         if (s) {
 465                 ulong tmp = simple_strtoul (s, NULL, 16);
 466                 return tmp;
 467         }
 468
 469 #ifdef CFG_SDRAM_BASE
 470         return CFG_SDRAM_BASE;
 471 #else
 472         return 0;
 473 #endif
 474 }
 475
 476 ulong getenv_bootm_size(void)
 477 {
 478         char *s = getenv ("bootm_size");
 479         if (s) {
 480                 ulong tmp = simple_strtoul (s, NULL, 16);
 481                 return tmp;
 482         }
 483
 484         return gd->bd->bi_memsize;
 485 }
 486
 487 void memmove_wd (void *to, void *from, size_t len, ulong chunksz)
 488 {
 489 #if defined(CONFIG_HW_WATCHDOG) || defined(CONFIG_WATCHDOG)
 490         while (len > 0) {
 491                 size_t tail = (len > chunksz) ? chunksz : len;
 492                 WATCHDOG_RESET ();
 493                 memmove (to, from, tail);
 494                 to += tail;
 495                 from += tail;
 496                 len -= tail;
 497         }
 498 #else   /* !(CONFIG_HW_WATCHDOG || CONFIG_WATCHDOG) */
 499         memmove (to, from, len);
 500 #endif  /* CONFIG_HW_WATCHDOG || CONFIG_WATCHDOG */
 501 }
 502 #endif /* !USE_HOSTCC */
 503
 504 static void genimg_print_size (uint32_t size)
 505 {
 506 #ifndef USE_HOSTCC
 507         printf ("%d Bytes = ", size);
 508         print_size (size, "\n");
 509 #else
 510         printf ("%d Bytes = %.2f kB = %.2f MB\n",
 511                         size, (double)size / 1.024e3,
 512                         (double)size / 1.048576e6);
 513 #endif
 514 }
 515
 516 #if defined(CONFIG_TIMESTAMP) || defined(CONFIG_CMD_DATE) || defined(USE_HOSTCC)
 517 static void genimg_print_time (time_t timestamp)
 518 {
 519 #ifndef USE_HOSTCC
 520         struct rtc_time tm;
 521
 522         to_tm (timestamp, &tm);
 523         printf ("%4d-%02d-%02d  %2d:%02d:%02d UTC\n",
 524                         tm.tm_year, tm.tm_mon, tm.tm_mday,
 525                         tm.tm_hour, tm.tm_min, tm.tm_sec);
 526 #else
 527         printf ("%s", ctime(&timestamp));
 528 #endif
 529 }
 530 #endif /* CONFIG_TIMESTAMP || CONFIG_CMD_DATE || USE_HOSTCC */
 531
 532 /**
 533  * get_table_entry_name - translate entry id to long name
 534  * @table: pointer to a translation table for entries of a specific type
 535  * @msg: message to be returned when translation fails
 536  * @id: entry id to be translated
 537  *
 538  * get_table_entry_name() will go over translation table trying to find
 539  * entry that matches given id. If matching entry is found, its long
 540  * name is returned to the caller.
 541  *
 542  * returns:
 543  *     long entry name if translation succeeds
 544  *     msg otherwise
 545  */
 546 static char *get_table_entry_name (table_entry_t *table, char *msg, int id)
 547 {
 548         for (; table->id >= 0; ++table) {
 549                 if (table->id == id)
 550                         return (table->lname);
 551         }
 552         return (msg);
 553 }
 554
 555 const char *genimg_get_os_name (uint8_t os)
 556 {
 557         return (get_table_entry_name (uimage_os, "Unknown OS", os));
 558 }
 559
 560 const char *genimg_get_arch_name (uint8_t arch)
 561 {
 562         return (get_table_entry_name (uimage_arch, "Unknown Architecture", arch));
 563 }
 564
 565 const char *genimg_get_type_name (uint8_t type)
 566 {
 567         return (get_table_entry_name (uimage_type, "Unknown Image", type));
 568 }
 569
 570 const char *genimg_get_comp_name (uint8_t comp)
 571 {
 572         return (get_table_entry_name (uimage_comp, "Unknown Compression", comp));
 573 }
 574
 575 /**
 576  * get_table_entry_id - translate short entry name to id
 577  * @table: pointer to a translation table for entries of a specific type
 578  * @table_name: to be used in case of error
 579  * @name: entry short name to be translated
 580  *
 581  * get_table_entry_id() will go over translation table trying to find
 582  * entry that matches given short name. If matching entry is found,
 583  * its id returned to the caller.
 584  *
 585  * returns:
 586  *     entry id if translation succeeds
 587  *     -1 otherwise
 588  */
 589 static int get_table_entry_id (table_entry_t *table,
 590                 const char *table_name, const char *name)
 591 {
 592         table_entry_t *t;
 593 #ifdef USE_HOSTCC
 594         int first = 1;
 595
 596         for (t = table; t->id >= 0; ++t) {
 597                 if (t->sname && strcasecmp(t->sname, name) == 0)
 598                         return (t->id);
 599         }
 600
 601         fprintf (stderr, "\nInvalid %s Type - valid names are", table_name);
 602         for (t = table; t->id >= 0; ++t) {
 603                 if (t->sname == NULL)
 604                         continue;
 605                 fprintf (stderr, "%c %s", (first) ? ':' : ',', t->sname);
 606                 first = 0;
 607         }
 608         fprintf (stderr, "\n");
 609 #else
 610         for (t = table; t->id >= 0; ++t) {
 611                 if (t->sname && strcmp(t->sname, name) == 0)
 612                         return (t->id);
 613         }
 614         debug ("Invalid %s Type: %s\n", table_name, name);
 615 #endif /* USE_HOSTCC */
 616         return (-1);
 617 }
 618
 619 int genimg_get_os_id (const char *name)
 620 {
 621         return (get_table_entry_id (uimage_os, "OS", name));
 622 }
 623
 624 int genimg_get_arch_id (const char *name)
 625 {
 626         return (get_table_entry_id (uimage_arch, "CPU", name));
 627 }
 628
 629 int genimg_get_type_id (const char *name)
 630 {
 631         return (get_table_entry_id (uimage_type, "Image", name));
 632 }
 633
 634 int genimg_get_comp_id (const char *name)
 635 {
 636         return (get_table_entry_id (uimage_comp, "Compression", name));
 637 }
 638
 639 #ifndef USE_HOSTCC
 640 /**
 641  * genimg_get_format - get image format type
 642  * @img_addr: image start address
 643  *
 644  * genimg_get_format() checks whether provided address points to a valid
 645  * legacy or FIT image.
 646  *
 647  * New uImage format and FDT blob are based on a libfdt. FDT blob
 648  * may be passed directly or embedded in a FIT image. In both situations
 649  * genimg_get_format() must be able to dectect libfdt header.
 650  *
 651  * returns:
 652  *     image format type or IMAGE_FORMAT_INVALID if no image is present
 653  */
 654 int genimg_get_format (void *img_addr)
 655 {
 656         ulong           format = IMAGE_FORMAT_INVALID;
 657         image_header_t  *hdr;
 658 #if defined(CONFIG_FIT) || defined(CONFIG_OF_LIBFDT)
 659         char            *fit_hdr;
 660 #endif
 661
 662         hdr = (image_header_t *)img_addr;
 663         if (image_check_magic(hdr))
 664                 format = IMAGE_FORMAT_LEGACY;
 665 #if defined(CONFIG_FIT) || defined(CONFIG_OF_LIBFDT)
 666         else {
 667                 fit_hdr = (char *)img_addr;
 668                 if (fdt_check_header (fit_hdr) == 0)
 669                         format = IMAGE_FORMAT_FIT;
 670         }
 671 #endif
 672
 673         return format;
 674 }
 675
 676 /**
 677  * genimg_get_image - get image from special storage (if necessary)
 678  * @img_addr: image start address
 679  *
 680  * genimg_get_image() checks if provided image start adddress is located
 681  * in a dataflash storage. If so, image is moved to a system RAM memory.
 682  *
 683  * returns:
 684  *     image start address after possible relocation from special storage
 685  */
 686 ulong genimg_get_image (ulong img_addr)
 687 {
 688         ulong ram_addr = img_addr;
 689
 690 #ifdef CONFIG_HAS_DATAFLASH
 691         ulong h_size, d_size;
 692
 693         if (addr_dataflash (img_addr)){
 694                 /* ger RAM address */
 695                 ram_addr = CFG_LOAD_ADDR;
 696
 697                 /* get header size */
 698                 h_size = image_get_header_size ();
 699 #if defined(CONFIG_FIT)
 700                 if (sizeof(struct fdt_header) > h_size)
 701                         h_size = sizeof(struct fdt_header);
 702 #endif
 703
 704                 /* read in header */
 705                 debug ("   Reading image header from dataflash address "
 706                         "%08lx to RAM address %08lx\n", img_addr, ram_addr);
 707
 708                 read_dataflash (img_addr, h_size, (char *)ram_addr);
 709
 710                 /* get data size */
 711                 switch (genimg_get_format ((void *)ram_addr)) {
 712                 case IMAGE_FORMAT_LEGACY:
 713                         d_size = image_get_data_size ((image_header_t *)ram_addr);
 714                         debug ("   Legacy format image found at 0x%08lx, size 0x%08lx\n",
 715                                         ram_addr, d_size);
 716                         break;
 717 #if defined(CONFIG_FIT)
 718                 case IMAGE_FORMAT_FIT:
 719                         d_size = fit_get_size ((const void *)ram_addr) - h_size;
 720                         debug ("   FIT/FDT format image found at 0x%08lx, size 0x%08lx\n",
 721                                         ram_addr, d_size);
 722                         break;
 723 #endif
 724                 default:
 725                         printf ("   No valid image found at 0x%08lx\n", img_addr);
 726                         return ram_addr;
 727                 }
 728
 729                 /* read in image data */
 730                 debug ("   Reading image remaining data from dataflash address "
 731                         "%08lx to RAM address %08lx\n", img_addr + h_size,
 732                         ram_addr + h_size);
 733
 734                 read_dataflash (img_addr + h_size, d_size,
 735                                 (char *)(ram_addr + h_size));
 736
 737         }
 738 #endif /* CONFIG_HAS_DATAFLASH */
 739
 740         return ram_addr;
 741 }
 742
 743 /**
 744  * boot_get_ramdisk - main ramdisk handling routine
 745  * @argc: command argument count
 746  * @argv: command argument list
 747  * @images: pointer to the bootm images structure
 748  * @arch: expected ramdisk architecture
 749  * @rd_start: pointer to a ulong variable, will hold ramdisk start address
 750  * @rd_end: pointer to a ulong variable, will hold ramdisk end
 751  *
 752  * boot_get_ramdisk() is responsible for finding a valid ramdisk image.
 753  * Curently supported are the following ramdisk sources:
 754  *      - multicomponent kernel/ramdisk image,
 755  *      - commandline provided address of decicated ramdisk image.
 756  *
 757  * returns:
 758  *     0, if ramdisk image was found and valid, or skiped
 759  *     rd_start and rd_end are set to ramdisk start/end addresses if
 760  *     ramdisk image is found and valid
 761  *
 762  *     1, if ramdisk image is found but corrupted
 763  *     rd_start and rd_end are set to 0 if no ramdisk exists
 764  */
 765 int boot_get_ramdisk (int argc, char *argv[], bootm_headers_t *images,
 766                 uint8_t arch, ulong *rd_start, ulong *rd_end)
 767 {
 768         ulong rd_addr, rd_load;
 769         ulong rd_data, rd_len;
 770         image_header_t *rd_hdr;
 771 #if defined(CONFIG_FIT)
 772         void            *fit_hdr;
 773         const char      *fit_uname_config = NULL;
 774         const char      *fit_uname_ramdisk = NULL;
 775         ulong           default_addr;
 776         int             rd_noffset;
 777         int             conf_noffset;
 778         const void      *data;
 779         size_t          size;
 780 #endif
 781
 782         *rd_start = 0;
 783         *rd_end = 0;
 784
 785         /*
 786          * Look for a '-' which indicates to ignore the
 787          * ramdisk argument
 788          */
 789         if ((argc >= 3) && (strcmp(argv[2], "-") ==  0)) {
 790                 debug ("## Skipping init Ramdisk\n");
 791                 rd_len = rd_data = 0;
 792         } else if (argc >= 3) {
 793 #if defined(CONFIG_FIT)
 794                 /*
 795                  * If the init ramdisk comes from the FIT image and the FIT image
 796                  * address is omitted in the command line argument, try to use
 797                  * os FIT image address or default load address.
 798                  */
 799                 if (images->fit_uname_os)
 800                         default_addr = (ulong)images->fit_hdr_os;
 801                 else
 802                         default_addr = load_addr;
 803
 804                 if (fit_parse_conf (argv[2], default_addr,
 805                                         &rd_addr, &fit_uname_config)) {
 806                         debug ("*  ramdisk: config '%s' from image at 0x%08lx\n",
 807                                         fit_uname_config, rd_addr);
 808                 } else if (fit_parse_subimage (argv[2], default_addr,
 809                                         &rd_addr, &fit_uname_ramdisk)) {
 810                         debug ("*  ramdisk: subimage '%s' from image at 0x%08lx\n",
 811                                         fit_uname_ramdisk, rd_addr);
 812                 } else
 813 #endif
 814                 {
 815                         rd_addr = simple_strtoul(argv[2], NULL, 16);
 816                         debug ("*  ramdisk: cmdline image address = 0x%08lx\n",
 817                                         rd_addr);
 818                 }
 819
 820                 /* copy from dataflash if needed */
 821                 rd_addr = genimg_get_image (rd_addr);
 822
 823                 /*
 824                  * Check if there is an initrd image at the
 825                  * address provided in the second bootm argument
 826                  * check image type, for FIT images get FIT node.
 827                  */
 828                 switch (genimg_get_format ((void *)rd_addr)) {
 829                 case IMAGE_FORMAT_LEGACY:
 830                         printf ("## Loading init Ramdisk from Legacy "
 831                                         "Image at %08lx ...\n", rd_addr);
 832
 833                         rd_hdr = image_get_ramdisk (rd_addr, arch,
 834                                                         images->verify);
 835
 836                         if (rd_hdr == NULL)
 837                                 return 1;
 838
 839                         rd_data = image_get_data (rd_hdr);
 840                         rd_len = image_get_data_size (rd_hdr);
 841                         rd_load = image_get_load (rd_hdr);
 842                         break;
 843 #if defined(CONFIG_FIT)
 844                 case IMAGE_FORMAT_FIT:
 845                         fit_hdr = (void *)rd_addr;
 846                         printf ("## Loading init Ramdisk from FIT "
 847                                         "Image at %08lx ...\n", rd_addr);
 848
 849                         if (!fit_check_format (fit_hdr)) {
 850                                 puts ("Bad FIT ramdisk image format!\n");
 851                                 return 0;
 852                         }
 853
 854                         if (!fit_uname_ramdisk) {
 855                                 /*
 856                                  * no ramdisk image node unit name, try to get config
 857                                  * node first. If config unit node name is NULL
 858                                  * fit_conf_get_node() will try to find default config node
 859                                  */
 860                                 conf_noffset = fit_conf_get_node (fit_hdr, fit_uname_config);
 861                                 if (conf_noffset < 0)
 862                                         return 0;
 863
 864                                 rd_noffset = fit_conf_get_ramdisk_node (fit_hdr, conf_noffset);
 865                                 fit_uname_ramdisk = fit_get_name (fit_hdr, rd_noffset, NULL);
 866                         } else {
 867                                 /* get ramdisk component image node offset */
 868                                 rd_noffset = fit_image_get_node (fit_hdr, fit_uname_ramdisk);
 869                         }
 870                         if (rd_noffset < 0)
 871                                 return 0;
 872
 873                         printf ("   Trying '%s' ramdisk subimage\n", fit_uname_ramdisk);
 874
 875                         if (!fit_check_ramdisk (fit_hdr, rd_noffset, arch, images->verify))
 876                                 return 0;
 877
 878                         /* get ramdisk image data address and length */
 879                         if (fit_image_get_data (fit_hdr, rd_noffset, &data, &size)) {
 880                                 puts ("Could not find ramdisk subimage data!\n");
 881                                 return 0;
 882                         }
 883
 884                         rd_data = (ulong)data;
 885                         rd_len = size;
 886
 887                         if (fit_image_get_load (fit_hdr, rd_noffset, &rd_load)) {
 888                                 puts ("Can't get ramdisk subimage load address!\n");
 889                                 return 0;
 890                         }
 891
 892                         images->fit_hdr_rd = fit_hdr;
 893                         images->fit_uname_rd = fit_uname_ramdisk;
 894                         images->fit_noffset_rd = rd_noffset;
 895                         break;
 896 #endif
 897                 default:
 898                         puts ("Wrong Ramdisk Image Format\n");
 899                         rd_data = rd_len = rd_load = 0;
 900                 }
 901
 902 #if defined(CONFIG_B2) || defined(CONFIG_EVB4510) || defined(CONFIG_ARMADILLO)
 903                 /*
 904                  * We need to copy the ramdisk to SRAM to let Linux boot
 905                  */
 906                 if (rd_data) {
 907                         memmove ((void *)rd_load, (uchar *)rd_data, rd_len);
 908                         rd_data = rd_load;
 909                 }
 910 #endif /* CONFIG_B2 || CONFIG_EVB4510 || CONFIG_ARMADILLO */
 911
 912         } else if (images->legacy_hdr_valid &&
 913                         image_check_type (images->legacy_hdr_os, IH_TYPE_MULTI)) {
 914                 /*
 915                  * Now check if we have a legacy mult-component image,
 916                  * get second entry data start address and len.
 917                  */
 918                 show_boot_progress (13);
 919                 printf ("## Loading init Ramdisk from multi component "
 920                                 "Legacy Image at %08lx ...\n",
 921                                 (ulong)images->legacy_hdr_os);
 922
 923                 image_multi_getimg (images->legacy_hdr_os, 1, &rd_data, &rd_len);
 924         } else {
 925                 /*
 926                  * no initrd image
 927                  */
 928                 show_boot_progress (14);
 929                 rd_len = rd_data = 0;
 930         }
 931
 932         if (!rd_data) {
 933                 debug ("## No init Ramdisk\n");
 934         } else {
 935                 *rd_start = rd_data;
 936                 *rd_end = rd_data + rd_len;
 937         }
 938         debug ("   ramdisk start = 0x%08lx, ramdisk end = 0x%08lx\n",
 939                         *rd_start, *rd_end);
 940
 941         return 0;
 942 }
 943
 944 #if defined(CONFIG_PPC) || defined(CONFIG_M68K)
 945 /**
 946  * boot_ramdisk_high - relocate init ramdisk
 947  * @lmb: pointer to lmb handle, will be used for memory mgmt
 948  * @rd_data: ramdisk data start address
 949  * @rd_len: ramdisk data length
 950  * @initrd_start: pointer to a ulong variable, will hold final init ramdisk
 951  *      start address (after possible relocation)
 952  * @initrd_end: pointer to a ulong variable, will hold final init ramdisk
 953  *      end address (after possible relocation)
 954  *
 955  * boot_ramdisk_high() takes a relocation hint from "initrd_high" environement
 956  * variable and if requested ramdisk data is moved to a specified location.
 957  *
 958  * Initrd_start and initrd_end are set to final (after relocation) ramdisk
 959  * start/end addresses if ramdisk image start and len were provided,
 960  * otherwise set initrd_start and initrd_end set to zeros.
 961  *
 962  * returns:
 963  *      0 - success
 964  *     -1 - failure
 965  */
 966 int boot_ramdisk_high (struct lmb *lmb, ulong rd_data, ulong rd_len,
 967                   ulong *initrd_start, ulong *initrd_end)
 968 {
 969         char    *s;
 970         ulong   initrd_high;
 971         int     initrd_copy_to_ram = 1;
 972
 973         if ((s = getenv ("initrd_high")) != NULL) {
 974                 /* a value of "no" or a similar string will act like 0,
 975                  * turning the "load high" feature off. This is intentional.
 976                  */
 977                 initrd_high = simple_strtoul (s, NULL, 16);
 978                 if (initrd_high == ~0)
 979                         initrd_copy_to_ram = 0;
 980         } else {
 981                 /* not set, no restrictions to load high */
 982                 initrd_high = ~0;
 983         }
 984
 985         debug ("## initrd_high = 0x%08lx, copy_to_ram = %d\n",
 986                         initrd_high, initrd_copy_to_ram);
 987
 988         if (rd_data) {
 989                 if (!initrd_copy_to_ram) {      /* zero-copy ramdisk support */
 990                         debug ("   in-place initrd\n");
 991                         *initrd_start = rd_data;
 992                         *initrd_end = rd_data + rd_len;
 993                         lmb_reserve(lmb, rd_data, rd_len);
 994                 } else {
 995                         if (initrd_high)
 996                                 *initrd_start = lmb_alloc_base (lmb, rd_len, 0x1000, initrd_high);
 997                         else
 998                                 *initrd_start = lmb_alloc (lmb, rd_len, 0x1000);
 999
1000                         if (*initrd_start == 0) {
1001                                 puts ("ramdisk - allocation error\n");
1002                                 goto error;
1003                         }
1004                         show_boot_progress (12);
1005
1006                         *initrd_end = *initrd_start + rd_len;
1007                         printf ("   Loading Ramdisk to %08lx, end %08lx ... ",
1008                                         *initrd_start, *initrd_end);
1009
1010                         memmove_wd ((void *)*initrd_start,
1011                                         (void *)rd_data, rd_len, CHUNKSZ);
1012
1013                         puts ("OK\n");
1014                 }
1015         } else {
1016                 *initrd_start = 0;
1017                 *initrd_end = 0;
1018         }
1019         debug ("   ramdisk load start = 0x%08lx, ramdisk load end = 0x%08lx\n",
1020                         *initrd_start, *initrd_end);
1021
1022         return 0;
1023
1024 error:
1025         return -1;
1026 }
1027
1028 /**
1029  * boot_get_cmdline - allocate and initialize kernel cmdline
1030  * @lmb: pointer to lmb handle, will be used for memory mgmt
1031  * @cmd_start: pointer to a ulong variable, will hold cmdline start
1032  * @cmd_end: pointer to a ulong variable, will hold cmdline end
1033  * @bootmap_base: ulong variable, holds offset in physical memory to
1034  * base of bootmap
1035  *
1036  * boot_get_cmdline() allocates space for kernel command line below
1037  * BOOTMAPSZ + bootmap_base address. If "bootargs" U-boot environemnt
1038  * variable is present its contents is copied to allocated kernel
1039  * command line.
1040  *
1041  * returns:
1042  *      0 - success
1043  *     -1 - failure
1044  */
1045 int boot_get_cmdline (struct lmb *lmb, ulong *cmd_start, ulong *cmd_end,
1046                         ulong bootmap_base)
1047 {
1048         char *cmdline;
1049         char *s;
1050
1051         cmdline = (char *)lmb_alloc_base(lmb, CFG_BARGSIZE, 0xf,
1052                                          CFG_BOOTMAPSZ + bootmap_base);
1053
1054         if (cmdline == NULL)
1055                 return -1;
1056
1057         if ((s = getenv("bootargs")) == NULL)
1058                 s = "";
1059
1060         strcpy(cmdline, s);
1061
1062         *cmd_start = (ulong) & cmdline[0];
1063         *cmd_end = *cmd_start + strlen(cmdline);
1064
1065         debug ("## cmdline at 0x%08lx ... 0x%08lx\n", *cmd_start, *cmd_end);
1066
1067         return 0;
1068 }
1069
1070 /**
1071  * boot_get_kbd - allocate and initialize kernel copy of board info
1072  * @lmb: pointer to lmb handle, will be used for memory mgmt
1073  * @kbd: double pointer to board info data
1074  * @bootmap_base: ulong variable, holds offset in physical memory to
1075  * base of bootmap
1076  *
1077  * boot_get_kbd() allocates space for kernel copy of board info data below
1078  * BOOTMAPSZ + bootmap_base address and kernel board info is initialized with
1079  * the current u-boot board info data.
1080  *
1081  * returns:
1082  *      0 - success
1083  *     -1 - failure
1084  */
1085 int boot_get_kbd (struct lmb *lmb, bd_t **kbd, ulong bootmap_base)
1086 {
1087         *kbd = (bd_t *)lmb_alloc_base(lmb, sizeof(bd_t), 0xf,
1088                                       CFG_BOOTMAPSZ + bootmap_base);
1089         if (*kbd == NULL)
1090                 return -1;
1091
1092         **kbd = *(gd->bd);
1093
1094         debug ("## kernel board info at 0x%08lx\n", (ulong)*kbd);
1095
1096 #if defined(DEBUG) && defined(CONFIG_CMD_BDI)
1097         do_bdinfo(NULL, 0, 0, NULL);
1098 #endif
1099
1100         return 0;
1101 }
1102 #endif /* CONFIG_PPC || CONFIG_M68K */
1103 #endif /* !USE_HOSTCC */
1104
1105 #if defined(CONFIG_FIT)
1106 /*****************************************************************************/
1107 /* New uImage format routines */
1108 /*****************************************************************************/
1109 #ifndef USE_HOSTCC
1110 static int fit_parse_spec (const char *spec, char sepc, ulong addr_curr,
1111                 ulong *addr, const char **name)
1112 {
1113         const char *sep;
1114
1115         *addr = addr_curr;
1116         *name = NULL;
1117
1118         sep = strchr (spec, sepc);
1119         if (sep) {
1120                 if (sep - spec > 0)
1121                         *addr = simple_strtoul (spec, NULL, 16);
1122
1123                 *name = sep + 1;
1124                 return 1;
1125         }
1126
1127         return 0;
1128 }
1129
1130 /**
1131  * fit_parse_conf - parse FIT configuration spec
1132  * @spec: input string, containing configuration spec
1133  * @add_curr: current image address (to be used as a possible default)
1134  * @addr: pointer to a ulong variable, will hold FIT image address of a given
1135  * configuration
1136  * @conf_name double pointer to a char, will hold pointer to a configuration
1137  * unit name
1138  *
1139  * fit_parse_conf() expects configuration spec in the for of [<addr>]#<conf>,
1140  * where <addr> is a FIT image address that contains configuration
1141  * with a <conf> unit name.
1142  *
1143  * Address part is optional, and if omitted default add_curr will
1144  * be used instead.
1145  *
1146  * returns:
1147  *     1 if spec is a valid configuration string,
1148  *     addr and conf_name are set accordingly
1149  *     0 otherwise
1150  */
1151 inline int fit_parse_conf (const char *spec, ulong addr_curr,
1152                 ulong *addr, const char **conf_name)
1153 {
1154         return fit_parse_spec (spec, '#', addr_curr, addr, conf_name);
1155 }
1156
1157 /**
1158  * fit_parse_subimage - parse FIT subimage spec
1159  * @spec: input string, containing subimage spec
1160  * @add_curr: current image address (to be used as a possible default)
1161  * @addr: pointer to a ulong variable, will hold FIT image address of a given
1162  * subimage
1163  * @image_name: double pointer to a char, will hold pointer to a subimage name
1164  *
1165  * fit_parse_subimage() expects subimage spec in the for of
1166  * [<addr>]:<subimage>, where <addr> is a FIT image address that contains
1167  * subimage with a <subimg> unit name.
1168  *
1169  * Address part is optional, and if omitted default add_curr will
1170  * be used instead.
1171  *
1172  * returns:
1173  *     1 if spec is a valid subimage string,
1174  *     addr and image_name are set accordingly
1175  *     0 otherwise
1176  */
1177 inline int fit_parse_subimage (const char *spec, ulong addr_curr,
1178                 ulong *addr, const char **image_name)
1179 {
1180         return fit_parse_spec (spec, ':', addr_curr, addr, image_name);
1181 }
1182 #endif /* !USE_HOSTCC */
1183
1184 static void fit_get_debug (const void *fit, int noffset,
1185                 char *prop_name, int err)
1186 {
1187         debug ("Can't get '%s' property from FIT 0x%08lx, "
1188                 "node: offset %d, name %s (%s)\n",
1189                 prop_name, (ulong)fit, noffset,
1190                 fit_get_name (fit, noffset, NULL),
1191                 fdt_strerror (err));
1192 }
1193
1194 /**
1195  * __fit_print_contents - prints out the contents of the FIT format image
1196  * @fit: pointer to the FIT format image header
1197  * @p: pointer to prefix string
1198  *
1199  * __fit_print_contents() formats a multi line FIT image contents description.
1200  * The routine prints out FIT image properties (root node level) follwed by
1201  * the details of each component image.
1202  *
1203  * returns:
1204  *     no returned results
1205  */
1206 static void __fit_print_contents (const void *fit, const char *p)
1207 {
1208         char *desc;
1209         char *uname;
1210         int images_noffset;
1211         int confs_noffset;
1212         int noffset;
1213         int ndepth;
1214         int count = 0;
1215         int ret;
1216 #if defined(CONFIG_TIMESTAMP) || defined(CONFIG_CMD_DATE) || defined(USE_HOSTCC)
1217         time_t timestamp;
1218 #endif
1219
1220         /* Root node properties */
1221         ret = fit_get_desc (fit, 0, &desc);
1222         printf ("%sFIT description: ", p);
1223         if (ret)
1224                 printf ("unavailable\n");
1225         else
1226                 printf ("%s\n", desc);
1227
1228 #if defined(CONFIG_TIMESTAMP) || defined(CONFIG_CMD_DATE) || defined(USE_HOSTCC)
1229         ret = fit_get_timestamp (fit, 0, &timestamp);
1230         printf ("%sCreated:         ", p);
1231         if (ret)
1232                 printf ("unavailable\n");
1233         else
1234                 genimg_print_time (timestamp);
1235 #endif
1236
1237         /* Find images parent node offset */
1238         images_noffset = fdt_path_offset (fit, FIT_IMAGES_PATH);
1239         if (images_noffset < 0) {
1240                 printf ("Can't find images parent node '%s' (%s)\n",
1241                         FIT_IMAGES_PATH, fdt_strerror (images_noffset));
1242                 return;
1243         }
1244
1245         /* Process its subnodes, print out component images details */
1246         for (ndepth = 0, count = 0, noffset = fdt_next_node (fit, images_noffset, &ndepth);
1247              (noffset >= 0) && (ndepth > 0);
1248              noffset = fdt_next_node (fit, noffset, &ndepth)) {
1249                 if (ndepth == 1) {
1250                         /*
1251                          * Direct child node of the images parent node,
1252                          * i.e. component image node.
1253                          */
1254                         printf ("%s Image %u (%s)\n", p, count++,
1255                                         fit_get_name(fit, noffset, NULL));
1256
1257                         fit_image_print (fit, noffset, p);
1258                 }
1259         }
1260
1261         /* Find configurations parent node offset */
1262         confs_noffset = fdt_path_offset (fit, FIT_CONFS_PATH);
1263         if (confs_noffset < 0) {
1264                 debug ("Can't get configurations parent node '%s' (%s)\n",
1265                         FIT_CONFS_PATH, fdt_strerror (confs_noffset));
1266                 return;
1267         }
1268
1269         /* get default configuration unit name from default property */
1270         uname = (char *)fdt_getprop (fit, noffset, FIT_DEFAULT_PROP, NULL);
1271         if (uname)
1272                 printf ("%s Default Configuration: '%s'\n", p, uname);
1273
1274         /* Process its subnodes, print out configurations details */
1275         for (ndepth = 0, count = 0, noffset = fdt_next_node (fit, confs_noffset, &ndepth);
1276              (noffset >= 0) && (ndepth > 0);
1277              noffset = fdt_next_node (fit, noffset, &ndepth)) {
1278                 if (ndepth == 1) {
1279                         /*
1280                          * Direct child node of the configurations parent node,
1281                          * i.e. configuration node.
1282                          */
1283                         printf ("%s Configuration %u (%s)\n", p, count++,
1284                                         fit_get_name(fit, noffset, NULL));
1285
1286                         fit_conf_print (fit, noffset, p);
1287                 }
1288         }
1289 }
1290
1291 inline void fit_print_contents (const void *fit)
1292 {
1293         __fit_print_contents (fit, "   ");
1294 }
1295
1296 inline void fit_print_contents_noindent (const void *fit)
1297 {
1298         __fit_print_contents (fit, "");
1299 }
1300
1301 /**
1302  * fit_image_print - prints out the FIT component image details
1303  * @fit: pointer to the FIT format image header
1304  * @image_noffset: offset of the component image node
1305  * @p: pointer to prefix string
1306  *
1307  * fit_image_print() lists all mandatory properies for the processed component
1308  * image. If present, hash nodes are printed out as well.
1309  *
1310  * returns:
1311  *     no returned results
1312  */
1313 void fit_image_print (const void *fit, int image_noffset, const char *p)
1314 {
1315         char *desc;
1316         uint8_t type, arch, os, comp;
1317         size_t size;
1318         ulong load, entry;
1319         const void *data;
1320         int noffset;
1321         int ndepth;
1322         int ret;
1323
1324         /* Mandatory properties */
1325         ret = fit_get_desc (fit, image_noffset, &desc);
1326         printf ("%s  Description:  ", p);
1327         if (ret)
1328                 printf ("unavailable\n");
1329         else
1330                 printf ("%s\n", desc);
1331
1332         fit_image_get_type (fit, image_noffset, &type);
1333         printf ("%s  Type:         %s\n", p, genimg_get_type_name (type));
1334
1335         fit_image_get_comp (fit, image_noffset, &comp);
1336         printf ("%s  Compression:  %s\n", p, genimg_get_comp_name (comp));
1337
1338         ret = fit_image_get_data (fit, image_noffset, &data, &size);
1339
1340 #ifndef USE_HOSTCC
1341         printf ("%s  Data Start:   ", p);
1342         if (ret)
1343                 printf ("unavailable\n");
1344         else
1345                 printf ("0x%08lx\n", (ulong)data);
1346 #endif
1347
1348         printf ("%s  Data Size:    ", p);
1349         if (ret)
1350                 printf ("unavailable\n");
1351         else
1352                 genimg_print_size (size);
1353
1354         /* Remaining, type dependent properties */
1355         if ((type == IH_TYPE_KERNEL) || (type == IH_TYPE_STANDALONE) ||
1356             (type == IH_TYPE_RAMDISK) || (type == IH_TYPE_FIRMWARE) ||
1357             (type == IH_TYPE_FLATDT)) {
1358                 fit_image_get_arch (fit, image_noffset, &arch);
1359                 printf ("%s  Architecture: %s\n", p, genimg_get_arch_name (arch));
1360         }
1361
1362         if (type == IH_TYPE_KERNEL) {
1363                 fit_image_get_os (fit, image_noffset, &os);
1364                 printf ("%s  OS:           %s\n", p, genimg_get_os_name (os));
1365         }
1366
1367         if ((type == IH_TYPE_KERNEL) || (type == IH_TYPE_STANDALONE)) {
1368                 ret = fit_image_get_load (fit, image_noffset, &load);
1369                 printf ("%s  Load Address: ", p);
1370                 if (ret)
1371                         printf ("unavailable\n");
1372                 else
1373                         printf ("0x%08lx\n", load);
1374
1375                 fit_image_get_entry (fit, image_noffset, &entry);
1376                 printf ("%s  Entry Point:  ", p);
1377                 if (ret)
1378                         printf ("unavailable\n");
1379                 else
1380                         printf ("0x%08lx\n", entry);
1381         }
1382
1383         /* Process all hash subnodes of the component image node */
1384         for (ndepth = 0, noffset = fdt_next_node (fit, image_noffset, &ndepth);
1385              (noffset >= 0) && (ndepth > 0);
1386              noffset = fdt_next_node (fit, noffset, &ndepth)) {
1387                 if (ndepth == 1) {
1388                         /* Direct child node of the component image node */
1389                         fit_image_print_hash (fit, noffset, p);
1390                 }
1391         }
1392 }
1393
1394 /**
1395  * fit_image_print_hash - prints out the hash node details
1396  * @fit: pointer to the FIT format image header
1397  * @noffset: offset of the hash node
1398  * @p: pointer to prefix string
1399  *
1400  * fit_image_print_hash() lists properies for the processed hash node
1401  *
1402  * returns:
1403  *     no returned results
1404  */
1405 void fit_image_print_hash (const void *fit, int noffset, const char *p)
1406 {
1407         char *algo;
1408         uint8_t *value;
1409         int value_len;
1410         int i, ret;
1411
1412         /*
1413          * Check subnode name, must be equal to "hash".
1414          * Multiple hash nodes require unique unit node
1415          * names, e.g. hash@1, hash@2, etc.
1416          */
1417         if (strncmp (fit_get_name(fit, noffset, NULL),
1418                         FIT_HASH_NODENAME,
1419                         strlen(FIT_HASH_NODENAME)) != 0)
1420                 return;
1421
1422         debug ("%s  Hash node:    '%s'\n", p,
1423                         fit_get_name (fit, noffset, NULL));
1424
1425         printf ("%s  Hash algo:    ", p);
1426         if (fit_image_hash_get_algo (fit, noffset, &algo)) {
1427                 printf ("invalid/unsupported\n");
1428                 return;
1429         }
1430         printf ("%s\n", algo);
1431
1432         ret = fit_image_hash_get_value (fit, noffset, &value,
1433                                         &value_len);
1434         printf ("%s  Hash value:   ", p);
1435         if (ret) {
1436                 printf ("unavailable\n");
1437         } else {
1438                 for (i = 0; i < value_len; i++)
1439                         printf ("%02x", value[i]);
1440                 printf ("\n");
1441         }
1442
1443         debug  ("%s  Hash len:     %d\n", p, value_len);
1444 }
1445
1446 /**
1447  * fit_get_desc - get node description property
1448  * @fit: pointer to the FIT format image header
1449  * @noffset: node offset
1450  * @desc: double pointer to the char, will hold pointer to the descrption
1451  *
1452  * fit_get_desc() reads description property from a given node, if
1453  * description is found pointer to it is returened in third call argument.
1454  *
1455  * returns:
1456  *     0, on success
1457  *     -1, on failure
1458  */
1459 int fit_get_desc (const void *fit, int noffset, char **desc)
1460 {
1461         int len;
1462
1463         *desc = (char *)fdt_getprop (fit, noffset, FIT_DESC_PROP, &len);
1464         if (*desc == NULL) {
1465                 fit_get_debug (fit, noffset, FIT_DESC_PROP, len);
1466                 return -1;
1467         }
1468
1469         return 0;
1470 }
1471
1472 /**
1473  * fit_get_timestamp - get node timestamp property
1474  * @fit: pointer to the FIT format image header
1475  * @noffset: node offset
1476  * @timestamp: pointer to the time_t, will hold read timestamp
1477  *
1478  * fit_get_timestamp() reads timestamp poperty from given node, if timestamp
1479  * is found and has a correct size its value is retured in third call
1480  * argument.
1481  *
1482  * returns:
1483  *     0, on success
1484  *     -1, on property read failure
1485  *     -2, on wrong timestamp size
1486  */
1487 int fit_get_timestamp (const void *fit, int noffset, time_t *timestamp)
1488 {
1489         int len;
1490         const void *data;
1491
1492         data = fdt_getprop (fit, noffset, FIT_TIMESTAMP_PROP, &len);
1493         if (data == NULL) {
1494                 fit_get_debug (fit, noffset, FIT_TIMESTAMP_PROP, len);
1495                 return -1;
1496         }
1497         if (len != sizeof (uint32_t)) {
1498                 debug ("FIT timestamp with incorrect size of (%u)\n", len);
1499                 return -2;
1500         }
1501
1502         *timestamp = uimage_to_cpu (*((uint32_t *)data));
1503         return 0;
1504 }
1505
1506 /**
1507  * fit_image_get_node - get node offset for component image of a given unit name
1508  * @fit: pointer to the FIT format image header
1509  * @image_uname: component image node unit name
1510  *
1511  * fit_image_get_node() finds a component image (withing the '/images'
1512  * node) of a provided unit name. If image is found its node offset is
1513  * returned to the caller.
1514  *
1515  * returns:
1516  *     image node offset when found (>=0)
1517  *     negative number on failure (FDT_ERR_* code)
1518  */
1519 int fit_image_get_node (const void *fit, const char *image_uname)
1520 {
1521         int noffset, images_noffset;
1522
1523         images_noffset = fdt_path_offset (fit, FIT_IMAGES_PATH);
1524         if (images_noffset < 0) {
1525                 debug ("Can't find images parent node '%s' (%s)\n",
1526                         FIT_IMAGES_PATH, fdt_strerror (images_noffset));
1527                 return images_noffset;
1528         }
1529
1530         noffset = fdt_subnode_offset (fit, images_noffset, image_uname);
1531         if (noffset < 0) {
1532                 debug ("Can't get node offset for image unit name: '%s' (%s)\n",
1533                         image_uname, fdt_strerror (noffset));
1534         }
1535
1536         return noffset;
1537 }
1538
1539 /**
1540  * fit_image_get_os - get os id for a given component image node
1541  * @fit: pointer to the FIT format image header
1542  * @noffset: component image node offset
1543  * @os: pointer to the uint8_t, will hold os numeric id
1544  *
1545  * fit_image_get_os() finds os property in a given component image node.
1546  * If the property is found, its (string) value is translated to the numeric
1547  * id which is returned to the caller.
1548  *
1549  * returns:
1550  *     0, on success
1551  *     -1, on failure
1552  */
1553 int fit_image_get_os (const void *fit, int noffset, uint8_t *os)
1554 {
1555         int len;
1556         const void *data;
1557
1558         /* Get OS name from property data */
1559         data = fdt_getprop (fit, noffset, FIT_OS_PROP, &len);
1560         if (data == NULL) {
1561                 fit_get_debug (fit, noffset, FIT_OS_PROP, len);
1562                 *os = -1;
1563                 return -1;
1564         }
1565
1566         /* Translate OS name to id */
1567         *os = genimg_get_os_id (data);
1568         return 0;
1569 }
1570
1571 /**
1572  * fit_image_get_arch - get arch id for a given component image node
1573  * @fit: pointer to the FIT format image header
1574  * @noffset: component image node offset
1575  * @arch: pointer to the uint8_t, will hold arch numeric id
1576  *
1577  * fit_image_get_arch() finds arch property in a given component image node.
1578  * If the property is found, its (string) value is translated to the numeric
1579  * id which is returned to the caller.
1580  *
1581  * returns:
1582  *     0, on success
1583  *     -1, on failure
1584  */
1585 int fit_image_get_arch (const void *fit, int noffset, uint8_t *arch)
1586 {
1587         int len;
1588         const void *data;
1589
1590         /* Get architecture name from property data */
1591         data = fdt_getprop (fit, noffset, FIT_ARCH_PROP, &len);
1592         if (data == NULL) {
1593                 fit_get_debug (fit, noffset, FIT_ARCH_PROP, len);
1594                 *arch = -1;
1595                 return -1;
1596         }
1597
1598         /* Translate architecture name to id */
1599         *arch = genimg_get_arch_id (data);
1600         return 0;
1601 }
1602
1603 /**
1604  * fit_image_get_type - get type id for a given component image node
1605  * @fit: pointer to the FIT format image header
1606  * @noffset: component image node offset
1607  * @type: pointer to the uint8_t, will hold type numeric id
1608  *
1609  * fit_image_get_type() finds type property in a given component image node.
1610  * If the property is found, its (string) value is translated to the numeric
1611  * id which is returned to the caller.
1612  *
1613  * returns:
1614  *     0, on success
1615  *     -1, on failure
1616  */
1617 int fit_image_get_type (const void *fit, int noffset, uint8_t *type)
1618 {
1619         int len;
1620         const void *data;
1621
1622         /* Get image type name from property data */
1623         data = fdt_getprop (fit, noffset, FIT_TYPE_PROP, &len);
1624         if (data == NULL) {
1625                 fit_get_debug (fit, noffset, FIT_TYPE_PROP, len);
1626                 *type = -1;
1627                 return -1;
1628         }
1629
1630         /* Translate image type name to id */
1631         *type = genimg_get_type_id (data);
1632         return 0;
1633 }
1634
1635 /**
1636  * fit_image_get_comp - get comp id for a given component image node
1637  * @fit: pointer to the FIT format image header
1638  * @noffset: component image node offset
1639  * @comp: pointer to the uint8_t, will hold comp numeric id
1640  *
1641  * fit_image_get_comp() finds comp property in a given component image node.
1642  * If the property is found, its (string) value is translated to the numeric
1643  * id which is returned to the caller.
1644  *
1645  * returns:
1646  *     0, on success
1647  *     -1, on failure
1648  */
1649 int fit_image_get_comp (const void *fit, int noffset, uint8_t *comp)
1650 {
1651         int len;
1652         const void *data;
1653
1654         /* Get compression name from property data */
1655         data = fdt_getprop (fit, noffset, FIT_COMP_PROP, &len);
1656         if (data == NULL) {
1657                 fit_get_debug (fit, noffset, FIT_COMP_PROP, len);
1658                 *comp = -1;
1659                 return -1;
1660         }
1661
1662         /* Translate compression name to id */
1663         *comp = genimg_get_comp_id (data);
1664         return 0;
1665 }
1666
1667 /**
1668  * fit_image_get_load - get load address property for a given component image node
1669  * @fit: pointer to the FIT format image header
1670  * @noffset: component image node offset
1671  * @load: pointer to the uint32_t, will hold load address
1672  *
1673  * fit_image_get_load() finds load address property in a given component image node.
1674  * If the property is found, its value is returned to the caller.
1675  *
1676  * returns:
1677  *     0, on success
1678  *     -1, on failure
1679  */
1680 int fit_image_get_load (const void *fit, int noffset, ulong *load)
1681 {
1682         int len;
1683         const uint32_t *data;
1684
1685         data = fdt_getprop (fit, noffset, FIT_LOAD_PROP, &len);
1686         if (data == NULL) {
1687                 fit_get_debug (fit, noffset, FIT_LOAD_PROP, len);
1688                 return -1;
1689         }
1690
1691         *load = uimage_to_cpu (*data);
1692         return 0;
1693 }
1694
1695 /**
1696  * fit_image_get_entry - get entry point address property for a given component image node
1697  * @fit: pointer to the FIT format image header
1698  * @noffset: component image node offset
1699  * @entry: pointer to the uint32_t, will hold entry point address
1700  *
1701  * fit_image_get_entry() finds entry point address property in a given component image node.
1702  * If the property is found, its value is returned to the caller.
1703  *
1704  * returns:
1705  *     0, on success
1706  *     -1, on failure
1707  */
1708 int fit_image_get_entry (const void *fit, int noffset, ulong *entry)
1709 {
1710         int len;
1711         const uint32_t *data;
1712
1713         data = fdt_getprop (fit, noffset, FIT_ENTRY_PROP, &len);
1714         if (data == NULL) {
1715                 fit_get_debug (fit, noffset, FIT_ENTRY_PROP, len);
1716                 return -1;
1717         }
1718
1719         *entry = uimage_to_cpu (*data);
1720         return 0;
1721 }
1722
1723 /**
1724  * fit_image_get_data - get data property and its size for a given component image node
1725  * @fit: pointer to the FIT format image header
1726  * @noffset: component image node offset
1727  * @data: double pointer to void, will hold data property's data address
1728  * @size: pointer to size_t, will hold data property's data size
1729  *
1730  * fit_image_get_data() finds data property in a given component image node.
1731  * If the property is found its data start address and size are returned to
1732  * the caller.
1733  *
1734  * returns:
1735  *     0, on success
1736  *     -1, on failure
1737  */
1738 int fit_image_get_data (const void *fit, int noffset,
1739                 const void **data, size_t *size)
1740 {
1741         int len;
1742
1743         *data = fdt_getprop (fit, noffset, FIT_DATA_PROP, &len);
1744         if (*data == NULL) {
1745                 fit_get_debug (fit, noffset, FIT_DATA_PROP, len);
1746                 *size = 0;
1747                 return -1;
1748         }
1749
1750         *size = len;
1751         return 0;
1752 }
1753
1754 /**
1755  * fit_image_hash_get_algo - get hash algorithm name
1756  * @fit: pointer to the FIT format image header
1757  * @noffset: hash node offset
1758  * @algo: double pointer to char, will hold pointer to the algorithm name
1759  *
1760  * fit_image_hash_get_algo() finds hash algorithm property in a given hash node.
1761  * If the property is found its data start address is returned to the caller.
1762  *
1763  * returns:
1764  *     0, on success
1765  *     -1, on failure
1766  */
1767 int fit_image_hash_get_algo (const void *fit, int noffset, char **algo)
1768 {
1769         int len;
1770
1771         *algo = (char *)fdt_getprop (fit, noffset, FIT_ALGO_PROP, &len);
1772         if (*algo == NULL) {
1773                 fit_get_debug (fit, noffset, FIT_ALGO_PROP, len);
1774                 return -1;
1775         }
1776
1777         return 0;
1778 }
1779
1780 /**
1781  * fit_image_hash_get_value - get hash value and length
1782  * @fit: pointer to the FIT format image header
1783  * @noffset: hash node offset
1784  * @value: double pointer to uint8_t, will hold address of a hash value data
1785  * @value_len: pointer to an int, will hold hash data length
1786  *
1787  * fit_image_hash_get_value() finds hash value property in a given hash node.
1788  * If the property is found its data start address and size are returned to
1789  * the caller.
1790  *
1791  * returns:
1792  *     0, on success
1793  *     -1, on failure
1794  */
1795 int fit_image_hash_get_value (const void *fit, int noffset, uint8_t **value,
1796                                 int *value_len)
1797 {
1798         int len;
1799
1800         *value = (uint8_t *)fdt_getprop (fit, noffset, FIT_VALUE_PROP, &len);
1801         if (*value == NULL) {
1802                 fit_get_debug (fit, noffset, FIT_VALUE_PROP, len);
1803                 *value_len = 0;
1804                 return -1;
1805         }
1806
1807         *value_len = len;
1808         return 0;
1809 }
1810
1811 /**
1812  * fit_set_timestamp - set node timestamp property
1813  * @fit: pointer to the FIT format image header
1814  * @noffset: node offset
1815  * @timestamp: timestamp value to be set
1816  *
1817  * fit_set_timestamp() attempts to set timestamp property in the requested
1818  * node and returns operation status to the caller.
1819  *
1820  * returns:
1821  *     0, on success
1822  *     -1, on property read failure
1823  */
1824 int fit_set_timestamp (void *fit, int noffset, time_t timestamp)
1825 {
1826         uint32_t t;
1827         int ret;
1828
1829         t = cpu_to_uimage (timestamp);
1830         ret = fdt_setprop (fit, noffset, FIT_TIMESTAMP_PROP, &t,
1831                                 sizeof (uint32_t));
1832         if (ret) {
1833                 printf ("Can't set '%s' property for '%s' node (%s)\n",
1834                         FIT_TIMESTAMP_PROP, fit_get_name (fit, noffset, NULL),
1835                         fdt_strerror (ret));
1836                 return -1;
1837         }
1838
1839         return 0;
1840 }
1841
1842 /**
1843  * calculate_hash - calculate and return hash for provided input data
1844  * @data: pointer to the input data
1845  * @data_len: data length
1846  * @algo: requested hash algorithm
1847  * @value: pointer to the char, will hold hash value data (caller must
1848  * allocate enough free space)
1849  * value_len: length of the calculated hash
1850  *
1851  * calculate_hash() computes input data hash according to the requested algorithm.
1852  * Resulting hash value is placed in caller provided 'value' buffer, length
1853  * of the calculated hash is returned via value_len pointer argument.
1854  *
1855  * returns:
1856  *     0, on success
1857  *    -1, when algo is unsupported
1858  */
1859 static int calculate_hash (const void *data, int data_len, const char *algo,
1860                         uint8_t *value, int *value_len)
1861 {
1862         if (strcmp (algo, "crc32") == 0 ) {
1863                 *((uint32_t *)value) = crc32 (0, data, data_len);
1864                 *((uint32_t *)value) = cpu_to_uimage (*((uint32_t *)value));
1865                 *value_len = 4;
1866         } else if (strcmp (algo, "sha1") == 0 ) {
1867                 sha1_csum ((unsigned char *) data, data_len,
1868                                 (unsigned char *) value);
1869                 *value_len = 20;
1870         } else if (strcmp (algo, "md5") == 0 ) {
1871                 printf ("MD5 not supported\n");
1872                 *value_len = 0;
1873         } else {
1874                 debug ("Unsupported hash alogrithm\n");
1875                 return -1;
1876         }
1877         return 0;
1878 }
1879
1880 #ifdef USE_HOSTCC
1881 /**
1882  * fit_set_hashes - process FIT component image nodes and calculate hashes
1883  * @fit: pointer to the FIT format image header
1884  *
1885  * fit_set_hashes() adds hash values for all component images in the FIT blob.
1886  * Hashes are calculated for all component images which have hash subnodes
1887  * with algorithm property set to one of the supported hash algorithms.
1888  *
1889  * returns
1890  *     0, on success
1891  *     libfdt error code, on failure
1892  */
1893 int fit_set_hashes (void *fit)
1894 {
1895         int images_noffset;
1896         int noffset;
1897         int ndepth;
1898         int ret;
1899
1900         /* Find images parent node offset */
1901         images_noffset = fdt_path_offset (fit, FIT_IMAGES_PATH);
1902         if (images_noffset < 0) {
1903                 printf ("Can't find images parent node '%s' (%s)\n",
1904                         FIT_IMAGES_PATH, fdt_strerror (images_noffset));
1905                 return images_noffset;
1906         }
1907
1908         /* Process its subnodes, print out component images details */
1909         for (ndepth = 0, noffset = fdt_next_node (fit, images_noffset, &ndepth);
1910              (noffset >= 0) && (ndepth > 0);
1911              noffset = fdt_next_node (fit, noffset, &ndepth)) {
1912                 if (ndepth == 1) {
1913                         /*
1914                          * Direct child node of the images parent node,
1915                          * i.e. component image node.
1916                          */
1917                         ret = fit_image_set_hashes (fit, noffset);
1918                         if (ret)
1919                                 return ret;
1920                 }
1921         }
1922
1923         return 0;
1924 }
1925
1926 /**
1927  * fit_image_set_hashes - calculate/set hashes for given component image node
1928  * @fit: pointer to the FIT format image header
1929  * @image_noffset: requested component image node
1930  *
1931  * fit_image_set_hashes() adds hash values for an component image node. All
1932  * existing hash subnodes are checked, if algorithm property is set to one of
1933  * the supported hash algorithms, hash value is computed and corresponding
1934  * hash node property is set, for example:
1935  *
1936  * Input component image node structure:
1937  *
1938  * o image@1 (at image_noffset)
1939  *   | - data = [binary data]
1940  *   o hash@1
1941  *     |- algo = "sha1"
1942  *
1943  * Output component image node structure:
1944  *
1945  * o image@1 (at image_noffset)
1946  *   | - data = [binary data]
1947  *   o hash@1
1948  *     |- algo = "sha1"
1949  *     |- value = sha1(data)
1950  *
1951  * returns:
1952  *     0 on sucess
1953  *    <0 on failure
1954  */
1955 int fit_image_set_hashes (void *fit, int image_noffset)
1956 {
1957         const void *data;
1958         size_t size;
1959         char *algo;
1960         uint8_t value[FIT_MAX_HASH_LEN];
1961         int value_len;
1962         int noffset;
1963         int ndepth;
1964
1965         /* Get image data and data length */
1966         if (fit_image_get_data (fit, image_noffset, &data, &size)) {
1967                 printf ("Can't get image data/size\n");
1968                 return -1;
1969         }
1970
1971         /* Process all hash subnodes of the component image node */
1972         for (ndepth = 0, noffset = fdt_next_node (fit, image_noffset, &ndepth);
1973              (noffset >= 0) && (ndepth > 0);
1974              noffset = fdt_next_node (fit, noffset, &ndepth)) {
1975                 if (ndepth == 1) {
1976                         /* Direct child node of the component image node */
1977
1978                         /*
1979                          * Check subnode name, must be equal to "hash".
1980                          * Multiple hash nodes require unique unit node
1981                          * names, e.g. hash@1, hash@2, etc.
1982                          */
1983                         if (strncmp (fit_get_name(fit, noffset, NULL),
1984                                                 FIT_HASH_NODENAME,
1985                                                 strlen(FIT_HASH_NODENAME)) != 0) {
1986                                 /* Not a hash subnode, skip it */
1987                                 continue;
1988                         }
1989
1990                         if (fit_image_hash_get_algo (fit, noffset, &algo)) {
1991                                 printf ("Can't get hash algo property for "
1992                                         "'%s' hash node in '%s' image node\n",
1993                                         fit_get_name (fit, noffset, NULL),
1994                                         fit_get_name (fit, image_noffset, NULL));
1995                                 return -1;
1996                         }
1997
1998                         if (calculate_hash (data, size, algo, value, &value_len)) {
1999                                 printf ("Unsupported hash algorithm (%s) for "
2000                                         "'%s' hash node in '%s' image node\n",
2001                                         algo, fit_get_name (fit, noffset, NULL),
2002                                         fit_get_name (fit, image_noffset, NULL));
2003                                 return -1;
2004                         }
2005
2006                         if (fit_image_hash_set_value (fit, noffset, value,
2007                                                         value_len)) {
2008                                 printf ("Can't set hash value for "
2009                                         "'%s' hash node in '%s' image node\n",
2010                                         fit_get_name (fit, noffset, NULL),
2011                                         fit_get_name (fit, image_noffset, NULL));
2012                                 return -1;
2013                         }
2014                 }
2015         }
2016
2017         return 0;
2018 }
2019
2020 /**
2021  * fit_image_hash_set_value - set hash value in requested has node
2022  * @fit: pointer to the FIT format image header
2023  * @noffset: hash node offset
2024  * @value: hash value to be set
2025  * @value_len: hash value length
2026  *
2027  * fit_image_hash_set_value() attempts to set hash value in a node at offset
2028  * given and returns operation status to the caller.
2029  *
2030  * returns
2031  *     0, on success
2032  *     -1, on failure
2033  */
2034 int fit_image_hash_set_value (void *fit, int noffset, uint8_t *value,
2035                                 int value_len)
2036 {
2037         int ret;
2038
2039         ret = fdt_setprop (fit, noffset, FIT_VALUE_PROP, value, value_len);
2040         if (ret) {
2041                 printf ("Can't set hash '%s' property for '%s' node (%s)\n",
2042                         FIT_VALUE_PROP, fit_get_name (fit, noffset, NULL),
2043                         fdt_strerror (ret));
2044                 return -1;
2045         }
2046
2047         return 0;
2048 }
2049 #endif /* USE_HOSTCC */
2050
2051 /**
2052  * fit_image_check_hashes - verify data intergity
2053  * @fit: pointer to the FIT format image header
2054  * @image_noffset: component image node offset
2055  *
2056  * fit_image_check_hashes() goes over component image hash nodes,
2057  * re-calculates each data hash and compares with the value stored in hash
2058  * node.
2059  *
2060  * returns:
2061  *     1, if all hashes are valid
2062  *     0, otherwise (or on error)
2063  */
2064 int fit_image_check_hashes (const void *fit, int image_noffset)
2065 {
2066         const void      *data;
2067         size_t          size;
2068         char            *algo;
2069         uint8_t         *fit_value;
2070         int             fit_value_len;
2071         uint8_t         value[FIT_MAX_HASH_LEN];
2072         int             value_len;
2073         int             noffset;
2074         int             ndepth;
2075         char            *err_msg = "";
2076
2077         /* Get image data and data length */
2078         if (fit_image_get_data (fit, image_noffset, &data, &size)) {
2079                 printf ("Can't get image data/size\n");
2080                 return 0;
2081         }
2082
2083         /* Process all hash subnodes of the component image node */
2084         for (ndepth = 0, noffset = fdt_next_node (fit, image_noffset, &ndepth);
2085              (noffset >= 0) && (ndepth > 0);
2086              noffset = fdt_next_node (fit, noffset, &ndepth)) {
2087                 if (ndepth == 1) {
2088                         /* Direct child node of the component image node */
2089
2090                         /*
2091                          * Check subnode name, must be equal to "hash".
2092                          * Multiple hash nodes require unique unit node
2093                          * names, e.g. hash@1, hash@2, etc.
2094                          */
2095                         if (strncmp (fit_get_name(fit, noffset, NULL),
2096                                         FIT_HASH_NODENAME,
2097                                         strlen(FIT_HASH_NODENAME)) != 0)
2098                                 continue;
2099
2100                         if (fit_image_hash_get_algo (fit, noffset, &algo)) {
2101                                 err_msg = "Can't get hash algo property";
2102                                 goto error;
2103                         }
2104                         printf ("%s", algo);
2105
2106                         if (fit_image_hash_get_value (fit, noffset, &fit_value,
2107                                                         &fit_value_len)) {
2108                                 err_msg = "Can't get hash value property";
2109                                 goto error;
2110                         }
2111
2112                         if (calculate_hash (data, size, algo, value, &value_len)) {
2113                                 err_msg = "Unsupported hash algorithm";
2114                                 goto error;
2115                         }
2116
2117                         if (value_len != fit_value_len) {
2118                                 err_msg = "Bad hash value len";
2119                                 goto error;
2120                         } else if (memcmp (value, fit_value, value_len) != 0) {
2121                                 err_msg = "Bad hash value";
2122                                 goto error;
2123                         }
2124                         printf ("+ ");
2125                 }
2126         }
2127
2128         return 1;
2129
2130 error:
2131         printf ("%s for '%s' hash node in '%s' image node\n",
2132                         err_msg, fit_get_name (fit, noffset, NULL),
2133                         fit_get_name (fit, image_noffset, NULL));
2134         return 0;
2135 }
2136
2137 /**
2138  * fit_image_check_os - check whether image node is of a given os type
2139  * @fit: pointer to the FIT format image header
2140  * @noffset: component image node offset
2141  * @os: requested image os
2142  *
2143  * fit_image_check_os() reads image os property and compares its numeric
2144  * id with the requested os. Comparison result is returned to the caller.
2145  *
2146  * returns:
2147  *     1 if image is of given os type
2148  *     0 otherwise (or on error)
2149  */
2150 int fit_image_check_os (const void *fit, int noffset, uint8_t os)
2151 {
2152         uint8_t image_os;
2153
2154         if (fit_image_get_os (fit, noffset, &image_os))
2155                 return 0;
2156         return (os == image_os);
2157 }
2158
2159 /**
2160  * fit_image_check_arch - check whether image node is of a given arch
2161  * @fit: pointer to the FIT format image header
2162  * @noffset: component image node offset
2163  * @arch: requested imagearch
2164  *
2165  * fit_image_check_arch() reads image arch property and compares its numeric
2166  * id with the requested arch. Comparison result is returned to the caller.
2167  *
2168  * returns:
2169  *     1 if image is of given arch
2170  *     0 otherwise (or on error)
2171  */
2172 int fit_image_check_arch (const void *fit, int noffset, uint8_t arch)
2173 {
2174         uint8_t image_arch;
2175
2176         if (fit_image_get_arch (fit, noffset, &image_arch))
2177                 return 0;
2178         return (arch == image_arch);
2179 }
2180
2181 /**
2182  * fit_image_check_type - check whether image node is of a given type
2183  * @fit: pointer to the FIT format image header
2184  * @noffset: component image node offset
2185  * @type: requested image type
2186  *
2187  * fit_image_check_type() reads image type property and compares its numeric
2188  * id with the requested type. Comparison result is returned to the caller.
2189  *
2190  * returns:
2191  *     1 if image is of given type
2192  *     0 otherwise (or on error)
2193  */
2194 int fit_image_check_type (const void *fit, int noffset, uint8_t type)
2195 {
2196         uint8_t image_type;
2197
2198         if (fit_image_get_type (fit, noffset, &image_type))
2199                 return 0;
2200         return (type == image_type);
2201 }
2202
2203 /**
2204  * fit_image_check_comp - check whether image node uses given compression
2205  * @fit: pointer to the FIT format image header
2206  * @noffset: component image node offset
2207  * @comp: requested image compression type
2208  *
2209  * fit_image_check_comp() reads image compression property and compares its
2210  * numeric id with the requested compression type. Comparison result is
2211  * returned to the caller.
2212  *
2213  * returns:
2214  *     1 if image uses requested compression
2215  *     0 otherwise (or on error)
2216  */
2217 int fit_image_check_comp (const void *fit, int noffset, uint8_t comp)
2218 {
2219         uint8_t image_comp;
2220
2221         if (fit_image_get_comp (fit, noffset, &image_comp))
2222                 return 0;
2223         return (comp == image_comp);
2224 }
2225
2226 /**
2227  * fit_check_format - sanity check FIT image format
2228  * @fit: pointer to the FIT format image header
2229  *
2230  * fit_check_format() runs a basic sanity FIT image verification.
2231  * Routine checks for mandatory properties, nodes, etc.
2232  *
2233  * returns:
2234  *     1, on success
2235  *     0, on failure
2236  */
2237 int fit_check_format (const void *fit)
2238 {
2239         /* mandatory / node 'description' property */
2240         if (fdt_getprop (fit, 0, FIT_DESC_PROP, NULL) == NULL) {
2241                 debug ("Wrong FIT format: no description\n");
2242                 return 0;
2243         }
2244
2245 #if defined(CONFIG_TIMESTAMP) || defined(CONFIG_CMD_DATE) || defined(USE_HOSTCC)
2246         /* mandatory / node 'timestamp' property */
2247         if (fdt_getprop (fit, 0, FIT_TIMESTAMP_PROP, NULL) == NULL) {
2248                 debug ("Wrong FIT format: no description\n");
2249                 return 0;
2250         }
2251 #endif
2252
2253         /* mandatory subimages parent '/images' node */
2254         if (fdt_path_offset (fit, FIT_IMAGES_PATH) < 0) {
2255                 debug ("Wrong FIT format: no images parent node\n");
2256                 return 0;
2257         }
2258
2259         return 1;
2260 }
2261
2262 /**
2263  * fit_conf_get_node - get node offset for configuration of a given unit name
2264  * @fit: pointer to the FIT format image header
2265  * @conf_uname: configuration node unit name
2266  *
2267  * fit_conf_get_node() finds a configuration (withing the '/configurations'
2268  * parant node) of a provided unit name. If configuration is found its node offset
2269  * is returned to the caller.
2270  *
2271  * When NULL is provided in second argument fit_conf_get_node() will search
2272  * for a default configuration node instead. Default configuration node unit name
2273  * is retrived from FIT_DEFAULT_PROP property of the '/configurations' node.
2274  *
2275  * returns:
2276  *     configuration node offset when found (>=0)
2277  *     negative number on failure (FDT_ERR_* code)
2278  */
2279 int fit_conf_get_node (const void *fit, const char *conf_uname)
2280 {
2281         int noffset, confs_noffset;
2282         int len;
2283
2284         confs_noffset = fdt_path_offset (fit, FIT_CONFS_PATH);
2285         if (confs_noffset < 0) {
2286                 debug ("Can't find configurations parent node '%s' (%s)\n",
2287                         FIT_CONFS_PATH, fdt_strerror (confs_noffset));
2288                 return confs_noffset;
2289         }
2290
2291         if (conf_uname == NULL) {
2292                 /* get configuration unit name from the default property */
2293                 debug ("No configuration specified, trying default...\n");
2294                 conf_uname = (char *)fdt_getprop (fit, confs_noffset, FIT_DEFAULT_PROP, &len);
2295                 if (conf_uname == NULL) {
2296                         fit_get_debug (fit, confs_noffset, FIT_DEFAULT_PROP, len);
2297                         return len;
2298                 }
2299                 debug ("Found default configuration: '%s'\n", conf_uname);
2300         }
2301
2302         noffset = fdt_subnode_offset (fit, confs_noffset, conf_uname);
2303         if (noffset < 0) {
2304                 debug ("Can't get node offset for configuration unit name: '%s' (%s)\n",
2305                         conf_uname, fdt_strerror (noffset));
2306         }
2307
2308         return noffset;
2309 }
2310
2311 static int __fit_conf_get_prop_node (const void *fit, int noffset,
2312                 const char *prop_name)
2313 {
2314         char *uname;
2315         int len;
2316
2317         /* get kernel image unit name from configuration kernel property */
2318         uname = (char *)fdt_getprop (fit, noffset, prop_name, &len);
2319         if (uname == NULL)
2320                 return len;
2321
2322         return fit_image_get_node (fit, uname);
2323 }
2324
2325 /**
2326  * fit_conf_get_kernel_node - get kernel image node offset that corresponds to
2327  * a given configuration
2328  * @fit: pointer to the FIT format image header
2329  * @noffset: configuration node offset
2330  *
2331  * fit_conf_get_kernel_node() retrives kernel image node unit name from
2332  * configuration FIT_KERNEL_PROP property and translates it to the node
2333  * offset.
2334  *
2335  * returns:
2336  *     image node offset when found (>=0)
2337  *     negative number on failure (FDT_ERR_* code)
2338  */
2339 int fit_conf_get_kernel_node (const void *fit, int noffset)
2340 {
2341         return __fit_conf_get_prop_node (fit, noffset, FIT_KERNEL_PROP);
2342 }
2343
2344 /**
2345  * fit_conf_get_ramdisk_node - get ramdisk image node offset that corresponds to
2346  * a given configuration
2347  * @fit: pointer to the FIT format image header
2348  * @noffset: configuration node offset
2349  *
2350  * fit_conf_get_ramdisk_node() retrives ramdisk image node unit name from
2351  * configuration FIT_KERNEL_PROP property and translates it to the node
2352  * offset.
2353  *
2354  * returns:
2355  *     image node offset when found (>=0)
2356  *     negative number on failure (FDT_ERR_* code)
2357  */
2358 int fit_conf_get_ramdisk_node (const void *fit, int noffset)
2359 {
2360         return __fit_conf_get_prop_node (fit, noffset, FIT_RAMDISK_PROP);
2361 }
2362
2363 /**
2364  * fit_conf_get_fdt_node - get fdt image node offset that corresponds to
2365  * a given configuration
2366  * @fit: pointer to the FIT format image header
2367  * @noffset: configuration node offset
2368  *
2369  * fit_conf_get_fdt_node() retrives fdt image node unit name from
2370  * configuration FIT_KERNEL_PROP property and translates it to the node
2371  * offset.
2372  *
2373  * returns:
2374  *     image node offset when found (>=0)
2375  *     negative number on failure (FDT_ERR_* code)
2376  */
2377 int fit_conf_get_fdt_node (const void *fit, int noffset)
2378 {
2379         return __fit_conf_get_prop_node (fit, noffset, FIT_FDT_PROP);
2380 }
2381
2382 /**
2383  * fit_conf_print - prints out the FIT configuration details
2384  * @fit: pointer to the FIT format image header
2385  * @conf_noffset: offset of the configuration node
2386  * @p: pointer to prefix string
2387  *
2388  * fit_conf_print() lists all mandatory properies for the processed
2389  * configuration node.
2390  *
2391  * returns:
2392  *     no returned results
2393  */
2394 void fit_conf_print (const void *fit, int noffset, const char *p)
2395 {
2396         char *desc;
2397         char *uname;
2398         int ret;
2399
2400         /* Mandatory properties */
2401         ret = fit_get_desc (fit, noffset, &desc);
2402         printf ("%s  Description:  ", p);
2403         if (ret)
2404                 printf ("unavailable\n");
2405         else
2406                 printf ("%s\n", desc);
2407
2408         uname = (char *)fdt_getprop (fit, noffset, FIT_KERNEL_PROP, NULL);
2409         printf ("%s  Kernel:       ", p);
2410         if (uname == NULL)
2411                 printf ("unavailable\n");
2412         else
2413                 printf ("%s\n", uname);
2414
2415         /* Optional properties */
2416         uname = (char *)fdt_getprop (fit, noffset, FIT_RAMDISK_PROP, NULL);
2417         if (uname)
2418                 printf ("%s  Init Ramdisk: %s\n", p, uname);
2419
2420         uname = (char *)fdt_getprop (fit, noffset, FIT_FDT_PROP, NULL);
2421         if (uname)
2422                 printf ("%s  FDT:          %s\n", p, uname);
2423 }
2424
2425 /**
2426  * fit_check_ramdisk - verify FIT format ramdisk subimage
2427  * @fit_hdr: pointer to the FIT ramdisk header
2428  * @rd_noffset: ramdisk subimage node offset within FIT image
2429  * @arch: requested ramdisk image architecture type
2430  * @verify: data CRC verification flag
2431  *
2432  * fit_check_ramdisk() verifies integrity of the ramdisk subimage and from
2433  * specified FIT image.
2434  *
2435  * returns:
2436  *     1, on success
2437  *     0, on failure
2438  */
2439 #ifndef USE_HOSTCC
2440 static int fit_check_ramdisk (const void *fit, int rd_noffset, uint8_t arch, int verify)
2441 {
2442         fit_image_print (fit, rd_noffset, "   ");
2443
2444         if (verify) {
2445                 puts ("   Verifying Hash Integrity ... ");
2446                 if (!fit_image_check_hashes (fit, rd_noffset)) {
2447                         puts ("Bad Data Hash\n");
2448                         return 0;
2449                 }
2450                 puts ("OK\n");
2451         }
2452
2453         if (!fit_image_check_os (fit, rd_noffset, IH_OS_LINUX) ||
2454             !fit_image_check_arch (fit, rd_noffset, arch) ||
2455             !fit_image_check_type (fit, rd_noffset, IH_TYPE_RAMDISK)) {
2456                 printf ("No Linux %s Ramdisk Image\n",
2457                                 genimg_get_arch_name(arch));
2458                 return 0;
2459         }
2460
2461         return 1;
2462 }
2463 #endif /* USE_HOSTCC */
2464 #endif /* CONFIG_FIT */