1 /* 2 * (C) Copyright 2008 Semihalf 3 * 4 * (C) Copyright 2000-2009 5 * DENX Software Engineering 6 * Wolfgang Denk, wd@denx.de 7 * 8 * SPDX-License-Identifier: GPL-2.0+ 9 */ 10 11 #include "mkimage.h" 12 #include <image.h> 13 #include <version.h> 14 15 static void copy_file(int, const char *, int); 16 static void usage(void); 17 18 /* parameters initialized by core will be used by the image type code */ 19 struct image_tool_params params = { 20 .os = IH_OS_LINUX, 21 .arch = IH_ARCH_PPC, 22 .type = IH_TYPE_KERNEL, 23 .comp = IH_COMP_GZIP, 24 .dtc = MKIMAGE_DEFAULT_DTC_OPTIONS, 25 .imagename = "", 26 .imagename2 = "", 27 }; 28 29 static int h_compare_image_name(const void *vtype1, const void *vtype2) 30 { 31 const int *type1 = vtype1; 32 const int *type2 = vtype2; 33 const char *name1 = genimg_get_type_short_name(*type1); 34 const char *name2 = genimg_get_type_short_name(*type2); 35 36 return strcmp(name1, name2); 37 } 38 39 /* Show all image types supported by mkimage */ 40 static void show_image_types(void) 41 { 42 struct image_type_params *tparams; 43 int order[IH_TYPE_COUNT]; 44 int count; 45 int type; 46 int i; 47 48 /* Sort the names in order of short name for easier reading */ 49 memset(order, '\0', sizeof(order)); 50 for (count = 0, type = 0; type < IH_TYPE_COUNT; type++) { 51 tparams = imagetool_get_type(type); 52 if (tparams) 53 order[count++] = type; 54 } 55 qsort(order, count, sizeof(int), h_compare_image_name); 56 57 fprintf(stderr, "\nInvalid image type. Supported image types:\n"); 58 for (i = 0; i < count; i++) { 59 type = order[i]; 60 tparams = imagetool_get_type(type); 61 if (tparams) { 62 fprintf(stderr, "\t%-15s %s\n", 63 genimg_get_type_short_name(type), 64 genimg_get_type_name(type)); 65 } 66 } 67 fprintf(stderr, "\n"); 68 } 69 70 int main(int argc, char **argv) 71 { 72 int ifd = -1; 73 struct stat sbuf; 74 char *ptr; 75 int retval = 0; 76 struct image_type_params *tparams = NULL; 77 int pad_len = 0; 78 int dfd; 79 80 params.cmdname = *argv; 81 params.addr = params.ep = 0; 82 83 while (--argc > 0 && **++argv == '-') { 84 while (*++*argv) { 85 switch (**argv) { 86 case 'l': 87 params.lflag = 1; 88 break; 89 case 'A': 90 if ((--argc <= 0) || 91 (params.arch = 92 genimg_get_arch_id (*++argv)) < 0) 93 usage (); 94 goto NXTARG; 95 case 'c': 96 if (--argc <= 0) 97 usage(); 98 params.comment = *++argv; 99 goto NXTARG; 100 case 'C': 101 if ((--argc <= 0) || 102 (params.comp = 103 genimg_get_comp_id (*++argv)) < 0) 104 usage (); 105 goto NXTARG; 106 case 'D': 107 if (--argc <= 0) 108 usage (); 109 params.dtc = *++argv; 110 goto NXTARG; 111 112 case 'O': 113 if ((--argc <= 0) || 114 (params.os = 115 genimg_get_os_id (*++argv)) < 0) 116 usage (); 117 goto NXTARG; 118 case 'T': 119 params.type = -1; 120 if (--argc >= 0 && argv[1]) { 121 params.type = 122 genimg_get_type_id(*++argv); 123 } 124 if (params.type < 0) { 125 show_image_types(); 126 usage(); 127 } 128 goto NXTARG; 129 case 'a': 130 if (--argc <= 0) 131 usage (); 132 params.addr = strtoul (*++argv, &ptr, 16); 133 if (*ptr) { 134 fprintf (stderr, 135 "%s: invalid load address %s\n", 136 params.cmdname, *argv); 137 exit (EXIT_FAILURE); 138 } 139 goto NXTARG; 140 case 'd': 141 if (--argc <= 0) 142 usage (); 143 params.datafile = *++argv; 144 params.dflag = 1; 145 goto NXTARG; 146 case 'e': 147 if (--argc <= 0) 148 usage (); 149 params.ep = strtoul (*++argv, &ptr, 16); 150 if (*ptr) { 151 fprintf (stderr, 152 "%s: invalid entry point %s\n", 153 params.cmdname, *argv); 154 exit (EXIT_FAILURE); 155 } 156 params.eflag = 1; 157 goto NXTARG; 158 case 'f': 159 if (--argc <= 0) 160 usage (); 161 params.datafile = *++argv; 162 /* no break */ 163 case 'F': 164 /* 165 * The flattened image tree (FIT) format 166 * requires a flattened device tree image type 167 */ 168 params.type = IH_TYPE_FLATDT; 169 params.fflag = 1; 170 goto NXTARG; 171 case 'k': 172 if (--argc <= 0) 173 usage(); 174 params.keydir = *++argv; 175 goto NXTARG; 176 case 'K': 177 if (--argc <= 0) 178 usage(); 179 params.keydest = *++argv; 180 goto NXTARG; 181 case 'n': 182 if (--argc <= 0) 183 usage (); 184 params.imagename = *++argv; 185 goto NXTARG; 186 case 'r': 187 params.require_keys = 1; 188 break; 189 case 'R': 190 if (--argc <= 0) 191 usage(); 192 /* 193 * This entry is for the second configuration 194 * file, if only one is not enough. 195 */ 196 params.imagename2 = *++argv; 197 goto NXTARG; 198 case 's': 199 params.skipcpy = 1; 200 break; 201 case 'v': 202 params.vflag++; 203 break; 204 case 'V': 205 printf("mkimage version %s\n", PLAIN_VERSION); 206 exit(EXIT_SUCCESS); 207 case 'x': 208 params.xflag++; 209 break; 210 default: 211 usage (); 212 } 213 } 214 NXTARG: ; 215 } 216 217 if (argc != 1) 218 usage (); 219 220 /* set tparams as per input type_id */ 221 tparams = imagetool_get_type(params.type); 222 if (tparams == NULL) { 223 fprintf (stderr, "%s: unsupported type %s\n", 224 params.cmdname, genimg_get_type_name(params.type)); 225 exit (EXIT_FAILURE); 226 } 227 228 /* 229 * check the passed arguments parameters meets the requirements 230 * as per image type to be generated/listed 231 */ 232 if (tparams->check_params) 233 if (tparams->check_params (¶ms)) 234 usage (); 235 236 if (!params.eflag) { 237 params.ep = params.addr; 238 /* If XIP, entry point must be after the U-Boot header */ 239 if (params.xflag) 240 params.ep += tparams->header_size; 241 } 242 243 params.imagefile = *argv; 244 245 if (params.fflag){ 246 if (tparams->fflag_handle) 247 /* 248 * in some cases, some additional processing needs 249 * to be done if fflag is defined 250 * 251 * For ex. fit_handle_file for Fit file support 252 */ 253 retval = tparams->fflag_handle(¶ms); 254 255 if (retval != EXIT_SUCCESS) 256 exit (retval); 257 } 258 259 if (params.lflag || params.fflag) { 260 ifd = open (params.imagefile, O_RDONLY|O_BINARY); 261 } else { 262 ifd = open (params.imagefile, 263 O_RDWR|O_CREAT|O_TRUNC|O_BINARY, 0666); 264 } 265 266 if (ifd < 0) { 267 fprintf (stderr, "%s: Can't open %s: %s\n", 268 params.cmdname, params.imagefile, 269 strerror(errno)); 270 exit (EXIT_FAILURE); 271 } 272 273 if (params.lflag || params.fflag) { 274 /* 275 * list header information of existing image 276 */ 277 if (fstat(ifd, &sbuf) < 0) { 278 fprintf (stderr, "%s: Can't stat %s: %s\n", 279 params.cmdname, params.imagefile, 280 strerror(errno)); 281 exit (EXIT_FAILURE); 282 } 283 284 if ((unsigned)sbuf.st_size < tparams->header_size) { 285 fprintf (stderr, 286 "%s: Bad size: \"%s\" is not valid image\n", 287 params.cmdname, params.imagefile); 288 exit (EXIT_FAILURE); 289 } 290 291 ptr = mmap(0, sbuf.st_size, PROT_READ, MAP_SHARED, ifd, 0); 292 if (ptr == MAP_FAILED) { 293 fprintf (stderr, "%s: Can't read %s: %s\n", 294 params.cmdname, params.imagefile, 295 strerror(errno)); 296 exit (EXIT_FAILURE); 297 } 298 299 /* 300 * scan through mkimage registry for all supported image types 301 * and verify the input image file header for match 302 * Print the image information for matched image type 303 * Returns the error code if not matched 304 */ 305 retval = imagetool_verify_print_header(ptr, &sbuf, 306 tparams, ¶ms); 307 308 (void) munmap((void *)ptr, sbuf.st_size); 309 (void) close (ifd); 310 311 exit (retval); 312 } 313 314 if ((params.type != IH_TYPE_MULTI) && (params.type != IH_TYPE_SCRIPT)) { 315 dfd = open(params.datafile, O_RDONLY | O_BINARY); 316 if (dfd < 0) { 317 fprintf(stderr, "%s: Can't open %s: %s\n", 318 params.cmdname, params.datafile, 319 strerror(errno)); 320 exit(EXIT_FAILURE); 321 } 322 323 if (fstat(dfd, &sbuf) < 0) { 324 fprintf(stderr, "%s: Can't stat %s: %s\n", 325 params.cmdname, params.datafile, 326 strerror(errno)); 327 exit(EXIT_FAILURE); 328 } 329 330 params.file_size = sbuf.st_size + tparams->header_size; 331 close(dfd); 332 } 333 334 /* 335 * In case there an header with a variable 336 * length will be added, the corresponding 337 * function is called. This is responsible to 338 * allocate memory for the header itself. 339 */ 340 if (tparams->vrec_header) 341 pad_len = tparams->vrec_header(¶ms, tparams); 342 else 343 memset(tparams->hdr, 0, tparams->header_size); 344 345 if (write(ifd, tparams->hdr, tparams->header_size) 346 != tparams->header_size) { 347 fprintf (stderr, "%s: Write error on %s: %s\n", 348 params.cmdname, params.imagefile, strerror(errno)); 349 exit (EXIT_FAILURE); 350 } 351 352 if (!params.skipcpy) { 353 if (params.type == IH_TYPE_MULTI || 354 params.type == IH_TYPE_SCRIPT) { 355 char *file = params.datafile; 356 uint32_t size; 357 358 for (;;) { 359 char *sep = NULL; 360 361 if (file) { 362 if ((sep = strchr(file, ':')) != NULL) { 363 *sep = '\0'; 364 } 365 366 if (stat (file, &sbuf) < 0) { 367 fprintf (stderr, "%s: Can't stat %s: %s\n", 368 params.cmdname, file, strerror(errno)); 369 exit (EXIT_FAILURE); 370 } 371 size = cpu_to_uimage (sbuf.st_size); 372 } else { 373 size = 0; 374 } 375 376 if (write(ifd, (char *)&size, sizeof(size)) != sizeof(size)) { 377 fprintf (stderr, "%s: Write error on %s: %s\n", 378 params.cmdname, params.imagefile, 379 strerror(errno)); 380 exit (EXIT_FAILURE); 381 } 382 383 if (!file) { 384 break; 385 } 386 387 if (sep) { 388 *sep = ':'; 389 file = sep + 1; 390 } else { 391 file = NULL; 392 } 393 } 394 395 file = params.datafile; 396 397 for (;;) { 398 char *sep = strchr(file, ':'); 399 if (sep) { 400 *sep = '\0'; 401 copy_file (ifd, file, 1); 402 *sep++ = ':'; 403 file = sep; 404 } else { 405 copy_file (ifd, file, 0); 406 break; 407 } 408 } 409 } else if (params.type == IH_TYPE_PBLIMAGE) { 410 /* PBL has special Image format, implements its' own */ 411 pbl_load_uboot(ifd, ¶ms); 412 } else { 413 copy_file(ifd, params.datafile, pad_len); 414 } 415 } 416 417 /* We're a bit of paranoid */ 418 #if defined(_POSIX_SYNCHRONIZED_IO) && \ 419 !defined(__sun__) && \ 420 !defined(__FreeBSD__) && \ 421 !defined(__OpenBSD__) && \ 422 !defined(__APPLE__) 423 (void) fdatasync (ifd); 424 #else 425 (void) fsync (ifd); 426 #endif 427 428 if (fstat(ifd, &sbuf) < 0) { 429 fprintf (stderr, "%s: Can't stat %s: %s\n", 430 params.cmdname, params.imagefile, strerror(errno)); 431 exit (EXIT_FAILURE); 432 } 433 params.file_size = sbuf.st_size; 434 435 ptr = mmap(0, sbuf.st_size, PROT_READ|PROT_WRITE, MAP_SHARED, ifd, 0); 436 if (ptr == MAP_FAILED) { 437 fprintf (stderr, "%s: Can't map %s: %s\n", 438 params.cmdname, params.imagefile, strerror(errno)); 439 exit (EXIT_FAILURE); 440 } 441 442 /* Setup the image header as per input image type*/ 443 if (tparams->set_header) 444 tparams->set_header (ptr, &sbuf, ifd, ¶ms); 445 else { 446 fprintf (stderr, "%s: Can't set header for %s: %s\n", 447 params.cmdname, tparams->name, strerror(errno)); 448 exit (EXIT_FAILURE); 449 } 450 451 /* Print the image information by processing image header */ 452 if (tparams->print_header) 453 tparams->print_header (ptr); 454 else { 455 fprintf (stderr, "%s: Can't print header for %s: %s\n", 456 params.cmdname, tparams->name, strerror(errno)); 457 exit (EXIT_FAILURE); 458 } 459 460 (void) munmap((void *)ptr, sbuf.st_size); 461 462 /* We're a bit of paranoid */ 463 #if defined(_POSIX_SYNCHRONIZED_IO) && \ 464 !defined(__sun__) && \ 465 !defined(__FreeBSD__) && \ 466 !defined(__OpenBSD__) && \ 467 !defined(__APPLE__) 468 (void) fdatasync (ifd); 469 #else 470 (void) fsync (ifd); 471 #endif 472 473 if (close(ifd)) { 474 fprintf (stderr, "%s: Write error on %s: %s\n", 475 params.cmdname, params.imagefile, strerror(errno)); 476 exit (EXIT_FAILURE); 477 } 478 479 exit (EXIT_SUCCESS); 480 } 481 482 static void 483 copy_file (int ifd, const char *datafile, int pad) 484 { 485 int dfd; 486 struct stat sbuf; 487 unsigned char *ptr; 488 int tail; 489 int zero = 0; 490 uint8_t zeros[4096]; 491 int offset = 0; 492 int size; 493 struct image_type_params *tparams = imagetool_get_type(params.type); 494 495 memset(zeros, 0, sizeof(zeros)); 496 497 if (params.vflag) { 498 fprintf (stderr, "Adding Image %s\n", datafile); 499 } 500 501 if ((dfd = open(datafile, O_RDONLY|O_BINARY)) < 0) { 502 fprintf (stderr, "%s: Can't open %s: %s\n", 503 params.cmdname, datafile, strerror(errno)); 504 exit (EXIT_FAILURE); 505 } 506 507 if (fstat(dfd, &sbuf) < 0) { 508 fprintf (stderr, "%s: Can't stat %s: %s\n", 509 params.cmdname, datafile, strerror(errno)); 510 exit (EXIT_FAILURE); 511 } 512 513 ptr = mmap(0, sbuf.st_size, PROT_READ, MAP_SHARED, dfd, 0); 514 if (ptr == MAP_FAILED) { 515 fprintf (stderr, "%s: Can't read %s: %s\n", 516 params.cmdname, datafile, strerror(errno)); 517 exit (EXIT_FAILURE); 518 } 519 520 if (params.xflag) { 521 unsigned char *p = NULL; 522 /* 523 * XIP: do not append the image_header_t at the 524 * beginning of the file, but consume the space 525 * reserved for it. 526 */ 527 528 if ((unsigned)sbuf.st_size < tparams->header_size) { 529 fprintf (stderr, 530 "%s: Bad size: \"%s\" is too small for XIP\n", 531 params.cmdname, datafile); 532 exit (EXIT_FAILURE); 533 } 534 535 for (p = ptr; p < ptr + tparams->header_size; p++) { 536 if ( *p != 0xff ) { 537 fprintf (stderr, 538 "%s: Bad file: \"%s\" has invalid buffer for XIP\n", 539 params.cmdname, datafile); 540 exit (EXIT_FAILURE); 541 } 542 } 543 544 offset = tparams->header_size; 545 } 546 547 size = sbuf.st_size - offset; 548 if (write(ifd, ptr + offset, size) != size) { 549 fprintf (stderr, "%s: Write error on %s: %s\n", 550 params.cmdname, params.imagefile, strerror(errno)); 551 exit (EXIT_FAILURE); 552 } 553 554 tail = size % 4; 555 if ((pad == 1) && (tail != 0)) { 556 557 if (write(ifd, (char *)&zero, 4-tail) != 4-tail) { 558 fprintf (stderr, "%s: Write error on %s: %s\n", 559 params.cmdname, params.imagefile, 560 strerror(errno)); 561 exit (EXIT_FAILURE); 562 } 563 } else if (pad > 1) { 564 while (pad > 0) { 565 int todo = sizeof(zeros); 566 567 if (todo > pad) 568 todo = pad; 569 if (write(ifd, (char *)&zeros, todo) != todo) { 570 fprintf(stderr, "%s: Write error on %s: %s\n", 571 params.cmdname, params.imagefile, 572 strerror(errno)); 573 exit(EXIT_FAILURE); 574 } 575 pad -= todo; 576 } 577 } 578 579 (void) munmap((void *)ptr, sbuf.st_size); 580 (void) close (dfd); 581 } 582 583 static void usage(void) 584 { 585 fprintf (stderr, "Usage: %s -l image\n" 586 " -l ==> list image header information\n", 587 params.cmdname); 588 fprintf (stderr, " %s [-x] -A arch -O os -T type -C comp " 589 "-a addr -e ep -n name -d data_file[:data_file...] image\n" 590 " -A ==> set architecture to 'arch'\n" 591 " -O ==> set operating system to 'os'\n" 592 " -T ==> set image type to 'type'\n" 593 " -C ==> set compression type 'comp'\n" 594 " -a ==> set load address to 'addr' (hex)\n" 595 " -e ==> set entry point to 'ep' (hex)\n" 596 " -n ==> set image name to 'name'\n" 597 " -d ==> use image data from 'datafile'\n" 598 " -x ==> set XIP (execute in place)\n", 599 params.cmdname); 600 fprintf(stderr, " %s [-D dtc_options] [-f fit-image.its|-F] fit-image\n", 601 params.cmdname); 602 fprintf(stderr, " -D => set all options for device tree compiler\n" 603 " -f => input filename for FIT source\n"); 604 #ifdef CONFIG_FIT_SIGNATURE 605 fprintf(stderr, "Signing / verified boot options: [-k keydir] [-K dtb] [ -c <comment>] [-r]\n" 606 " -k => set directory containing private keys\n" 607 " -K => write public keys to this .dtb file\n" 608 " -c => add comment in signature node\n" 609 " -F => re-sign existing FIT image\n" 610 " -r => mark keys used as 'required' in dtb\n"); 611 #else 612 fprintf(stderr, "Signing / verified boot not supported (CONFIG_FIT_SIGNATURE undefined)\n"); 613 #endif 614 fprintf (stderr, " %s -V ==> print version information and exit\n", 615 params.cmdname); 616 fprintf(stderr, "Use -T to see a list of available image types\n"); 617 618 exit (EXIT_FAILURE); 619 } 620