common/cmd_ximg.c

   1 /*
   2  * (C) Copyright 2000-2004
   3  * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
   4  *
   5  * (C) Copyright 2003
   6  * Kai-Uwe Bloem, Auerswald GmbH & Co KG, <linux-development@auerswald.de>
   7  *
   8  * See file CREDITS for list of people who contributed to this
   9  * project.
  10  *
  11  * This program is free software; you can redistribute it and/or
  12  * modify it under the terms of the GNU General Public License as
  13  * published by the Free Software Foundation; either version 2 of
  14  * the License, or (at your option) any later version.
  15  *
  16  * This program is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19  * GNU General Public License for more details.
  20  *
  21  * You should have received a copy of the GNU General Public License
  22  * along with this program; if not, write to the Free Software
  23  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  24  * MA 02111-1307 USA
  25  */
  26
  27
  28 /*
  29  * Multi Image extract
  30  */
  31 #include <common.h>
  32 #include <command.h>
  33 #include <image.h>
  34 #include <watchdog.h>
  35 #if defined(CONFIG_BZIP2)
  36 #include <bzlib.h>
  37 #endif
  38 #include <asm/byteorder.h>
  39
  40 #ifndef CONFIG_SYS_XIMG_LEN
  41 /* use 8MByte as default max gunzip size */
  42 #define CONFIG_SYS_XIMG_LEN     0x800000
  43 #endif
  44
  45 int
  46 do_imgextract(cmd_tbl_t * cmdtp, int flag, int argc, char *argv[])
  47 {
  48         ulong           addr = load_addr;
  49         ulong           dest = 0;
  50         ulong           data, len, count;
  51         int             verify;
  52         int             part = 0;
  53         char            pbuf[10];
  54         image_header_t  *hdr;
  55 #if defined(CONFIG_FIT)
  56         const char      *uname = NULL;
  57         const void*     fit_hdr;
  58         int             noffset;
  59         const void      *fit_data;
  60         size_t          fit_len;
  61 #endif
  62         uint            unc_len = CONFIG_SYS_XIMG_LEN;
  63         uint8_t         comp;
  64
  65         verify = getenv_yesno ("verify");
  66
  67         if (argc > 1) {
  68                 addr = simple_strtoul(argv[1], NULL, 16);
  69         }
  70         if (argc > 2) {
  71                 part = simple_strtoul(argv[2], NULL, 16);
  72 #if defined(CONFIG_FIT)
  73                 uname = argv[2];
  74 #endif
  75         }
  76         if (argc > 3) {
  77                 dest = simple_strtoul(argv[3], NULL, 16);
  78         }
  79
  80         switch (genimg_get_format ((void *)addr)) {
  81         case IMAGE_FORMAT_LEGACY:
  82
  83                 printf("## Copying part %d from legacy image "
  84                         "at %08lx ...\n", part, addr);
  85
  86                 hdr = (image_header_t *)addr;
  87                 if (!image_check_magic (hdr)) {
  88                         printf("Bad Magic Number\n");
  89                         return 1;
  90                 }
  91
  92                 if (!image_check_hcrc (hdr)) {
  93                         printf("Bad Header Checksum\n");
  94                         return 1;
  95                 }
  96 #ifdef DEBUG
  97                 image_print_contents (hdr);
  98 #endif
  99
 100                 if (!image_check_type (hdr, IH_TYPE_MULTI)) {
 101                         printf("Wrong Image Type for %s command\n",
 102                                         cmdtp->name);
 103                         return 1;
 104                 }
 105
 106                 comp = image_get_comp (hdr);
 107                 if ((comp != IH_COMP_NONE) && (argc < 4)) {
 108                         printf("Must specify load address for %s command "
 109                                         "with compressed image\n",
 110                                         cmdtp->name);
 111                         return 1;
 112                 }
 113
 114                 if (verify) {
 115                         printf("   Verifying Checksum ... ");
 116                         if (!image_check_dcrc (hdr)) {
 117                                 printf("Bad Data CRC\n");
 118                                 return 1;
 119                         }
 120                         printf("OK\n");
 121                 }
 122
 123                 count = image_multi_count (hdr);
 124                 if (part >= count) {
 125                         printf("Bad Image Part\n");
 126                         return 1;
 127                 }
 128
 129                 image_multi_getimg (hdr, part, &data, &len);
 130                 break;
 131 #if defined(CONFIG_FIT)
 132         case IMAGE_FORMAT_FIT:
 133                 if (uname == NULL) {
 134                         puts ("No FIT subimage unit name\n");
 135                         return 1;
 136                 }
 137
 138                 printf("## Copying '%s' subimage from FIT image "
 139                         "at %08lx ...\n", uname, addr);
 140
 141                 fit_hdr = (const void *)addr;
 142                 if (!fit_check_format (fit_hdr)) {
 143                         puts ("Bad FIT image format\n");
 144                         return 1;
 145                 }
 146
 147                 /* get subimage node offset */
 148                 noffset = fit_image_get_node (fit_hdr, uname);
 149                 if (noffset < 0) {
 150                         printf ("Can't find '%s' FIT subimage\n", uname);
 151                         return 1;
 152                 }
 153
 154                 if (fit_image_check_comp (fit_hdr, noffset, IH_COMP_NONE)
 155                     && (argc < 4)) {
 156                         printf("Must specify load address for %s command "
 157                                 "with compressed image\n",
 158                                 cmdtp->name);
 159                         return 1;
 160                 }
 161
 162                 /* verify integrity */
 163                 if (verify) {
 164                         if (!fit_image_check_hashes (fit_hdr, noffset)) {
 165                                 puts ("Bad Data Hash\n");
 166                                 return 1;
 167                         }
 168                 }
 169
 170                 /* get subimage data address and length */
 171                 if (fit_image_get_data (fit_hdr, noffset,
 172                                         &fit_data, &fit_len)) {
 173                         puts ("Could not find script subimage data\n");
 174                         return 1;
 175                 }
 176
 177                 if (fit_image_get_comp (fit_hdr, noffset, &comp)) {
 178                         puts ("Could not find script subimage "
 179                                 "compression type\n");
 180                         return 1;
 181                 }
 182
 183                 data = (ulong)fit_data;
 184                 len = (ulong)fit_len;
 185                 break;
 186 #endif
 187         default:
 188                 puts ("Invalid image type for imxtract\n");
 189                 return 1;
 190         }
 191
 192         if (argc > 3) {
 193                 switch (comp) {
 194                 case IH_COMP_NONE:
 195 #if defined(CONFIG_HW_WATCHDOG) || defined(CONFIG_WATCHDOG)
 196                         {
 197                                 size_t l = len;
 198                                 size_t tail;
 199                                 void *to = (void *) dest;
 200                                 void *from = (void *)data;
 201
 202                                 printf ("   Loading part %d ... ", part);
 203
 204                                 while (l > 0) {
 205                                         tail = (l > CHUNKSZ) ? CHUNKSZ : l;
 206                                         WATCHDOG_RESET();
 207                                         memmove (to, from, tail);
 208                                         to += tail;
 209                                         from += tail;
 210                                         l -= tail;
 211                                 }
 212                         }
 213 #else   /* !(CONFIG_HW_WATCHDOG || CONFIG_WATCHDOG) */
 214                         printf ("   Loading part %d ... ", part);
 215                         memmove ((char *) dest, (char *)data, len);
 216 #endif  /* CONFIG_HW_WATCHDOG || CONFIG_WATCHDOG */
 217                         break;
 218                 case IH_COMP_GZIP:
 219                         printf ("   Uncompressing part %d ... ", part);
 220                         if (gunzip ((void *) dest, unc_len,
 221                                     (uchar *) data, &len) != 0) {
 222                                 puts ("GUNZIP ERROR - image not loaded\n");
 223                                 return 1;
 224                         }
 225                         break;
 226 #if defined(CONFIG_BZIP2)
 227                 case IH_COMP_BZIP2:
 228                         printf ("   Uncompressing part %d ... ", part);
 229                         /*
 230                          * If we've got less than 4 MB of malloc() space,
 231                          * use slower decompression algorithm which requires
 232                          * at most 2300 KB of memory.
 233                          */
 234                         i = BZ2_bzBuffToBuffDecompress
 235                                 ((char*)ntohl(hdr->ih_load),
 236                                  &unc_len, (char *)data, len,
 237                                  CONFIG_SYS_MALLOC_LEN < (4096 * 1024), 0);
 238                         if (i != BZ_OK) {
 239                                 printf ("BUNZIP2 ERROR %d - "
 240                                         "image not loaded\n", i);
 241                                 return 1;
 242                         }
 243                         break;
 244 #endif /* CONFIG_BZIP2 */
 245                 default:
 246                         printf ("Unimplemented compression type %d\n", comp);
 247                         return 1;
 248                 }
 249                 puts ("OK\n");
 250         }
 251
 252         sprintf(pbuf, "%8lx", data);
 253         setenv("fileaddr", pbuf);
 254         sprintf(pbuf, "%8lx", len);
 255         setenv("filesize", pbuf);
 256
 257         return 0;
 258 }
 259
 260 U_BOOT_CMD(imxtract, 4, 1, do_imgextract,
 261         "extract a part of a multi-image",
 262         "addr part [dest]\n"
 263         "    - extract <part> from legacy image at <addr> and copy to <dest>"
 264 #if defined(CONFIG_FIT)
 265         "\n"
 266         "addr uname [dest]\n"
 267         "    - extract <uname> subimage from FIT image at <addr> and copy to <dest>"
 268 #endif
 269 );