1 /* 2 * (C) Copyright 2000-2004 3 * DENX Software Engineering 4 * Wolfgang Denk, wd@denx.de 5 * All rights reserved. 6 * 7 * This program is free software; you can redistribute it and/or 8 * modify it under the terms of the GNU General Public License as 9 * published by the Free Software Foundation; either version 2 of 10 * the License, or (at your option) any later version. 11 * 12 * This program is distributed in the hope that it will be useful, 13 * but WITHOUT ANY WARRANTY; without even the implied warranty of 14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 15 * GNU General Public License for more details. 16 * 17 * You should have received a copy of the GNU General Public License 18 * along with this program; if not, write to the Free Software 19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, 20 * MA 02111-1307 USA 21 */ 22 23 #include <errno.h> 24 #include <fcntl.h> 25 #include <stdio.h> 26 #include <stdlib.h> 27 #include <string.h> 28 #ifndef __WIN32__ 29 #include <netinet/in.h> /* for host / network byte order conversions */ 30 #endif 31 #include <sys/mman.h> 32 #include <sys/stat.h> 33 #include <time.h> 34 #include <unistd.h> 35 36 #if defined(__BEOS__) || defined(__NetBSD__) || defined(__APPLE__) 37 #include <inttypes.h> 38 #endif 39 40 #ifdef __WIN32__ 41 typedef unsigned int __u32; 42 43 #define SWAP_LONG(x) \ 44 ((__u32)( \ 45 (((__u32)(x) & (__u32)0x000000ffUL) << 24) | \ 46 (((__u32)(x) & (__u32)0x0000ff00UL) << 8) | \ 47 (((__u32)(x) & (__u32)0x00ff0000UL) >> 8) | \ 48 (((__u32)(x) & (__u32)0xff000000UL) >> 24) )) 49 typedef unsigned char uint8_t; 50 typedef unsigned short uint16_t; 51 typedef unsigned int uint32_t; 52 53 #define ntohl(a) SWAP_LONG(a) 54 #define htonl(a) SWAP_LONG(a) 55 #endif /* __WIN32__ */ 56 57 #ifndef O_BINARY /* should be define'd on __WIN32__ */ 58 #define O_BINARY 0 59 #endif 60 61 #include <image.h> 62 63 extern int errno; 64 65 #ifndef MAP_FAILED 66 #define MAP_FAILED (-1) 67 #endif 68 69 char *cmdname; 70 71 extern unsigned long crc32 (unsigned long crc, const char *buf, unsigned int len); 72 73 typedef struct table_entry { 74 int val; /* as defined in image.h */ 75 char *sname; /* short (input) name */ 76 char *lname; /* long (output) name */ 77 } table_entry_t; 78 79 table_entry_t arch_name[] = { 80 { IH_CPU_INVALID, NULL, "Invalid CPU", }, 81 { IH_CPU_ALPHA, "alpha", "Alpha", }, 82 { IH_CPU_ARM, "arm", "ARM", }, 83 { IH_CPU_I386, "x86", "Intel x86", }, 84 { IH_CPU_IA64, "ia64", "IA64", }, 85 { IH_CPU_M68K, "m68k", "MC68000", }, 86 { IH_CPU_MICROBLAZE, "microblaze", "MicroBlaze", }, 87 { IH_CPU_MIPS, "mips", "MIPS", }, 88 { IH_CPU_MIPS64, "mips64", "MIPS 64 Bit", }, 89 { IH_CPU_NIOS, "nios", "NIOS", }, 90 { IH_CPU_NIOS2, "nios2", "NIOS II", }, 91 { IH_CPU_PPC, "ppc", "PowerPC", }, 92 { IH_CPU_S390, "s390", "IBM S390", }, 93 { IH_CPU_SH, "sh", "SuperH", }, 94 { IH_CPU_SPARC, "sparc", "SPARC", }, 95 { IH_CPU_SPARC64, "sparc64", "SPARC 64 Bit", }, 96 { IH_CPU_BLACKFIN, "blackfin", "Blackfin", }, 97 { -1, "", "", }, 98 }; 99 100 table_entry_t os_name[] = { 101 { IH_OS_INVALID, NULL, "Invalid OS", }, 102 { IH_OS_4_4BSD, "4_4bsd", "4_4BSD", }, 103 { IH_OS_ARTOS, "artos", "ARTOS", }, 104 { IH_OS_DELL, "dell", "Dell", }, 105 { IH_OS_ESIX, "esix", "Esix", }, 106 { IH_OS_FREEBSD, "freebsd", "FreeBSD", }, 107 { IH_OS_IRIX, "irix", "Irix", }, 108 { IH_OS_LINUX, "linux", "Linux", }, 109 { IH_OS_LYNXOS, "lynxos", "LynxOS", }, 110 { IH_OS_NCR, "ncr", "NCR", }, 111 { IH_OS_NETBSD, "netbsd", "NetBSD", }, 112 { IH_OS_OPENBSD, "openbsd", "OpenBSD", }, 113 { IH_OS_PSOS, "psos", "pSOS", }, 114 { IH_OS_QNX, "qnx", "QNX", }, 115 { IH_OS_RTEMS, "rtems", "RTEMS", }, 116 { IH_OS_SCO, "sco", "SCO", }, 117 { IH_OS_SOLARIS, "solaris", "Solaris", }, 118 { IH_OS_SVR4, "svr4", "SVR4", }, 119 { IH_OS_U_BOOT, "u-boot", "U-Boot", }, 120 { IH_OS_VXWORKS, "vxworks", "VxWorks", }, 121 { -1, "", "", }, 122 }; 123 124 table_entry_t type_name[] = { 125 { IH_TYPE_INVALID, NULL, "Invalid Image", }, 126 { IH_TYPE_FILESYSTEM, "filesystem", "Filesystem Image", }, 127 { IH_TYPE_FIRMWARE, "firmware", "Firmware", }, 128 { IH_TYPE_KERNEL, "kernel", "Kernel Image", }, 129 { IH_TYPE_MULTI, "multi", "Multi-File Image", }, 130 { IH_TYPE_RAMDISK, "ramdisk", "RAMDisk Image", }, 131 { IH_TYPE_SCRIPT, "script", "Script", }, 132 { IH_TYPE_STANDALONE, "standalone", "Standalone Program", }, 133 { IH_TYPE_FLATDT, "flat_dt", "Flat Device Tree", }, 134 { -1, "", "", }, 135 }; 136 137 table_entry_t comp_name[] = { 138 { IH_COMP_NONE, "none", "uncompressed", }, 139 { IH_COMP_BZIP2, "bzip2", "bzip2 compressed", }, 140 { IH_COMP_GZIP, "gzip", "gzip compressed", }, 141 { -1, "", "", }, 142 }; 143 144 static void copy_file (int, const char *, int); 145 static void usage (void); 146 static void print_header (image_header_t *); 147 static void print_type (image_header_t *); 148 static char *put_table_entry (table_entry_t *, char *, int); 149 static char *put_arch (int); 150 static char *put_type (int); 151 static char *put_os (int); 152 static char *put_comp (int); 153 static int get_table_entry (table_entry_t *, char *, char *); 154 static int get_arch(char *); 155 static int get_comp(char *); 156 static int get_os (char *); 157 static int get_type(char *); 158 159 160 char *datafile; 161 char *imagefile; 162 163 int dflag = 0; 164 int eflag = 0; 165 int lflag = 0; 166 int vflag = 0; 167 int xflag = 0; 168 int opt_os = IH_OS_LINUX; 169 int opt_arch = IH_CPU_PPC; 170 int opt_type = IH_TYPE_KERNEL; 171 int opt_comp = IH_COMP_GZIP; 172 173 image_header_t header; 174 image_header_t *hdr = &header; 175 176 int 177 main (int argc, char **argv) 178 { 179 int ifd; 180 uint32_t checksum; 181 uint32_t addr; 182 uint32_t ep; 183 struct stat sbuf; 184 unsigned char *ptr; 185 char *name = ""; 186 187 cmdname = *argv; 188 189 addr = ep = 0; 190 191 while (--argc > 0 && **++argv == '-') { 192 while (*++*argv) { 193 switch (**argv) { 194 case 'l': 195 lflag = 1; 196 break; 197 case 'A': 198 if ((--argc <= 0) || 199 (opt_arch = get_arch(*++argv)) < 0) 200 usage (); 201 goto NXTARG; 202 case 'C': 203 if ((--argc <= 0) || 204 (opt_comp = get_comp(*++argv)) < 0) 205 usage (); 206 goto NXTARG; 207 case 'O': 208 if ((--argc <= 0) || 209 (opt_os = get_os(*++argv)) < 0) 210 usage (); 211 goto NXTARG; 212 case 'T': 213 if ((--argc <= 0) || 214 (opt_type = get_type(*++argv)) < 0) 215 usage (); 216 goto NXTARG; 217 218 case 'a': 219 if (--argc <= 0) 220 usage (); 221 addr = strtoul (*++argv, (char **)&ptr, 16); 222 if (*ptr) { 223 fprintf (stderr, 224 "%s: invalid load address %s\n", 225 cmdname, *argv); 226 exit (EXIT_FAILURE); 227 } 228 goto NXTARG; 229 case 'd': 230 if (--argc <= 0) 231 usage (); 232 datafile = *++argv; 233 dflag = 1; 234 goto NXTARG; 235 case 'e': 236 if (--argc <= 0) 237 usage (); 238 ep = strtoul (*++argv, (char **)&ptr, 16); 239 if (*ptr) { 240 fprintf (stderr, 241 "%s: invalid entry point %s\n", 242 cmdname, *argv); 243 exit (EXIT_FAILURE); 244 } 245 eflag = 1; 246 goto NXTARG; 247 case 'n': 248 if (--argc <= 0) 249 usage (); 250 name = *++argv; 251 goto NXTARG; 252 case 'v': 253 vflag++; 254 break; 255 case 'x': 256 xflag++; 257 break; 258 default: 259 usage (); 260 } 261 } 262 NXTARG: ; 263 } 264 265 if ((argc != 1) || ((lflag ^ dflag) == 0)) 266 usage(); 267 268 if (!eflag) { 269 ep = addr; 270 /* If XIP, entry point must be after the U-Boot header */ 271 if (xflag) 272 ep += sizeof(image_header_t); 273 } 274 275 /* 276 * If XIP, ensure the entry point is equal to the load address plus 277 * the size of the U-Boot header. 278 */ 279 if (xflag) { 280 if (ep != addr + sizeof(image_header_t)) { 281 fprintf (stderr, 282 "%s: For XIP, the entry point must be the load addr + %lu\n", 283 cmdname, 284 (unsigned long)sizeof(image_header_t)); 285 exit (EXIT_FAILURE); 286 } 287 } 288 289 imagefile = *argv; 290 291 if (lflag) { 292 ifd = open(imagefile, O_RDONLY|O_BINARY); 293 } else { 294 ifd = open(imagefile, O_RDWR|O_CREAT|O_TRUNC|O_BINARY, 0666); 295 } 296 297 if (ifd < 0) { 298 fprintf (stderr, "%s: Can't open %s: %s\n", 299 cmdname, imagefile, strerror(errno)); 300 exit (EXIT_FAILURE); 301 } 302 303 if (lflag) { 304 int len; 305 char *data; 306 /* 307 * list header information of existing image 308 */ 309 if (fstat(ifd, &sbuf) < 0) { 310 fprintf (stderr, "%s: Can't stat %s: %s\n", 311 cmdname, imagefile, strerror(errno)); 312 exit (EXIT_FAILURE); 313 } 314 315 if ((unsigned)sbuf.st_size < sizeof(image_header_t)) { 316 fprintf (stderr, 317 "%s: Bad size: \"%s\" is no valid image\n", 318 cmdname, imagefile); 319 exit (EXIT_FAILURE); 320 } 321 322 ptr = (unsigned char *)mmap(0, sbuf.st_size, 323 PROT_READ, MAP_SHARED, ifd, 0); 324 if ((caddr_t)ptr == (caddr_t)-1) { 325 fprintf (stderr, "%s: Can't read %s: %s\n", 326 cmdname, imagefile, strerror(errno)); 327 exit (EXIT_FAILURE); 328 } 329 330 /* 331 * create copy of header so that we can blank out the 332 * checksum field for checking - this can't be done 333 * on the PROT_READ mapped data. 334 */ 335 memcpy (hdr, ptr, sizeof(image_header_t)); 336 337 if (ntohl(hdr->ih_magic) != IH_MAGIC) { 338 fprintf (stderr, 339 "%s: Bad Magic Number: \"%s\" is no valid image\n", 340 cmdname, imagefile); 341 exit (EXIT_FAILURE); 342 } 343 344 data = (char *)hdr; 345 len = sizeof(image_header_t); 346 347 checksum = ntohl(hdr->ih_hcrc); 348 hdr->ih_hcrc = htonl(0); /* clear for re-calculation */ 349 350 if (crc32 (0, data, len) != checksum) { 351 fprintf (stderr, 352 "%s: ERROR: \"%s\" has bad header checksum!\n", 353 cmdname, imagefile); 354 exit (EXIT_FAILURE); 355 } 356 357 data = (char *)(ptr + sizeof(image_header_t)); 358 len = sbuf.st_size - sizeof(image_header_t) ; 359 360 if (crc32 (0, data, len) != ntohl(hdr->ih_dcrc)) { 361 fprintf (stderr, 362 "%s: ERROR: \"%s\" has corrupted data!\n", 363 cmdname, imagefile); 364 exit (EXIT_FAILURE); 365 } 366 367 /* for multi-file images we need the data part, too */ 368 print_header ((image_header_t *)ptr); 369 370 (void) munmap((void *)ptr, sbuf.st_size); 371 (void) close (ifd); 372 373 exit (EXIT_SUCCESS); 374 } 375 376 /* 377 * Must be -w then: 378 * 379 * write dummy header, to be fixed later 380 */ 381 memset (hdr, 0, sizeof(image_header_t)); 382 383 if (write(ifd, hdr, sizeof(image_header_t)) != sizeof(image_header_t)) { 384 fprintf (stderr, "%s: Write error on %s: %s\n", 385 cmdname, imagefile, strerror(errno)); 386 exit (EXIT_FAILURE); 387 } 388 389 if (opt_type == IH_TYPE_MULTI || opt_type == IH_TYPE_SCRIPT) { 390 char *file = datafile; 391 uint32_t size; 392 393 for (;;) { 394 char *sep = NULL; 395 396 if (file) { 397 if ((sep = strchr(file, ':')) != NULL) { 398 *sep = '\0'; 399 } 400 401 if (stat (file, &sbuf) < 0) { 402 fprintf (stderr, "%s: Can't stat %s: %s\n", 403 cmdname, file, strerror(errno)); 404 exit (EXIT_FAILURE); 405 } 406 size = htonl(sbuf.st_size); 407 } else { 408 size = 0; 409 } 410 411 if (write(ifd, (char *)&size, sizeof(size)) != sizeof(size)) { 412 fprintf (stderr, "%s: Write error on %s: %s\n", 413 cmdname, imagefile, strerror(errno)); 414 exit (EXIT_FAILURE); 415 } 416 417 if (!file) { 418 break; 419 } 420 421 if (sep) { 422 *sep = ':'; 423 file = sep + 1; 424 } else { 425 file = NULL; 426 } 427 } 428 429 file = datafile; 430 431 for (;;) { 432 char *sep = strchr(file, ':'); 433 if (sep) { 434 *sep = '\0'; 435 copy_file (ifd, file, 1); 436 *sep++ = ':'; 437 file = sep; 438 } else { 439 copy_file (ifd, file, 0); 440 break; 441 } 442 } 443 } else { 444 copy_file (ifd, datafile, 0); 445 } 446 447 /* We're a bit of paranoid */ 448 #if defined(_POSIX_SYNCHRONIZED_IO) && !defined(__sun__) && !defined(__FreeBSD__) 449 (void) fdatasync (ifd); 450 #else 451 (void) fsync (ifd); 452 #endif 453 454 if (fstat(ifd, &sbuf) < 0) { 455 fprintf (stderr, "%s: Can't stat %s: %s\n", 456 cmdname, imagefile, strerror(errno)); 457 exit (EXIT_FAILURE); 458 } 459 460 ptr = (unsigned char *)mmap(0, sbuf.st_size, 461 PROT_READ|PROT_WRITE, MAP_SHARED, ifd, 0); 462 if (ptr == (unsigned char *)MAP_FAILED) { 463 fprintf (stderr, "%s: Can't map %s: %s\n", 464 cmdname, imagefile, strerror(errno)); 465 exit (EXIT_FAILURE); 466 } 467 468 hdr = (image_header_t *)ptr; 469 470 checksum = crc32 (0, 471 (const char *)(ptr + sizeof(image_header_t)), 472 sbuf.st_size - sizeof(image_header_t) 473 ); 474 475 /* Build new header */ 476 hdr->ih_magic = htonl(IH_MAGIC); 477 hdr->ih_time = htonl(sbuf.st_mtime); 478 hdr->ih_size = htonl(sbuf.st_size - sizeof(image_header_t)); 479 hdr->ih_load = htonl(addr); 480 hdr->ih_ep = htonl(ep); 481 hdr->ih_dcrc = htonl(checksum); 482 hdr->ih_os = opt_os; 483 hdr->ih_arch = opt_arch; 484 hdr->ih_type = opt_type; 485 hdr->ih_comp = opt_comp; 486 487 strncpy((char *)hdr->ih_name, name, IH_NMLEN); 488 489 checksum = crc32(0,(const char *)hdr,sizeof(image_header_t)); 490 491 hdr->ih_hcrc = htonl(checksum); 492 493 print_header (hdr); 494 495 (void) munmap((void *)ptr, sbuf.st_size); 496 497 /* We're a bit of paranoid */ 498 #if defined(_POSIX_SYNCHRONIZED_IO) && !defined(__sun__) && !defined(__FreeBSD__) 499 (void) fdatasync (ifd); 500 #else 501 (void) fsync (ifd); 502 #endif 503 504 if (close(ifd)) { 505 fprintf (stderr, "%s: Write error on %s: %s\n", 506 cmdname, imagefile, strerror(errno)); 507 exit (EXIT_FAILURE); 508 } 509 510 exit (EXIT_SUCCESS); 511 } 512 513 static void 514 copy_file (int ifd, const char *datafile, int pad) 515 { 516 int dfd; 517 struct stat sbuf; 518 unsigned char *ptr; 519 int tail; 520 int zero = 0; 521 int offset = 0; 522 int size; 523 524 if (vflag) { 525 fprintf (stderr, "Adding Image %s\n", datafile); 526 } 527 528 if ((dfd = open(datafile, O_RDONLY|O_BINARY)) < 0) { 529 fprintf (stderr, "%s: Can't open %s: %s\n", 530 cmdname, datafile, strerror(errno)); 531 exit (EXIT_FAILURE); 532 } 533 534 if (fstat(dfd, &sbuf) < 0) { 535 fprintf (stderr, "%s: Can't stat %s: %s\n", 536 cmdname, datafile, strerror(errno)); 537 exit (EXIT_FAILURE); 538 } 539 540 ptr = (unsigned char *)mmap(0, sbuf.st_size, 541 PROT_READ, MAP_SHARED, dfd, 0); 542 if (ptr == (unsigned char *)MAP_FAILED) { 543 fprintf (stderr, "%s: Can't read %s: %s\n", 544 cmdname, datafile, strerror(errno)); 545 exit (EXIT_FAILURE); 546 } 547 548 if (xflag) { 549 unsigned char *p = NULL; 550 /* 551 * XIP: do not append the image_header_t at the 552 * beginning of the file, but consume the space 553 * reserved for it. 554 */ 555 556 if ((unsigned)sbuf.st_size < sizeof(image_header_t)) { 557 fprintf (stderr, 558 "%s: Bad size: \"%s\" is too small for XIP\n", 559 cmdname, datafile); 560 exit (EXIT_FAILURE); 561 } 562 563 for (p=ptr; p < ptr+sizeof(image_header_t); p++) { 564 if ( *p != 0xff ) { 565 fprintf (stderr, 566 "%s: Bad file: \"%s\" has invalid buffer for XIP\n", 567 cmdname, datafile); 568 exit (EXIT_FAILURE); 569 } 570 } 571 572 offset = sizeof(image_header_t); 573 } 574 575 size = sbuf.st_size - offset; 576 if (write(ifd, ptr + offset, size) != size) { 577 fprintf (stderr, "%s: Write error on %s: %s\n", 578 cmdname, imagefile, strerror(errno)); 579 exit (EXIT_FAILURE); 580 } 581 582 if (pad && ((tail = size % 4) != 0)) { 583 584 if (write(ifd, (char *)&zero, 4-tail) != 4-tail) { 585 fprintf (stderr, "%s: Write error on %s: %s\n", 586 cmdname, imagefile, strerror(errno)); 587 exit (EXIT_FAILURE); 588 } 589 } 590 591 (void) munmap((void *)ptr, sbuf.st_size); 592 (void) close (dfd); 593 } 594 595 void 596 usage () 597 { 598 fprintf (stderr, "Usage: %s -l image\n" 599 " -l ==> list image header information\n" 600 " %s [-x] -A arch -O os -T type -C comp " 601 "-a addr -e ep -n name -d data_file[:data_file...] image\n", 602 cmdname, cmdname); 603 fprintf (stderr, " -A ==> set architecture to 'arch'\n" 604 " -O ==> set operating system to 'os'\n" 605 " -T ==> set image type to 'type'\n" 606 " -C ==> set compression type 'comp'\n" 607 " -a ==> set load address to 'addr' (hex)\n" 608 " -e ==> set entry point to 'ep' (hex)\n" 609 " -n ==> set image name to 'name'\n" 610 " -d ==> use image data from 'datafile'\n" 611 " -x ==> set XIP (execute in place)\n" 612 ); 613 exit (EXIT_FAILURE); 614 } 615 616 static void 617 print_header (image_header_t *hdr) 618 { 619 time_t timestamp; 620 uint32_t size; 621 622 timestamp = (time_t)ntohl(hdr->ih_time); 623 size = ntohl(hdr->ih_size); 624 625 printf ("Image Name: %.*s\n", IH_NMLEN, hdr->ih_name); 626 printf ("Created: %s", ctime(×tamp)); 627 printf ("Image Type: "); print_type(hdr); 628 printf ("Data Size: %d Bytes = %.2f kB = %.2f MB\n", 629 size, (double)size / 1.024e3, (double)size / 1.048576e6 ); 630 printf ("Load Address: 0x%08X\n", ntohl(hdr->ih_load)); 631 printf ("Entry Point: 0x%08X\n", ntohl(hdr->ih_ep)); 632 633 if (hdr->ih_type == IH_TYPE_MULTI || hdr->ih_type == IH_TYPE_SCRIPT) { 634 int i, ptrs; 635 uint32_t pos; 636 unsigned long *len_ptr = (unsigned long *) ( 637 (unsigned long)hdr + sizeof(image_header_t) 638 ); 639 640 /* determine number of images first (to calculate image offsets) */ 641 for (i=0; len_ptr[i]; ++i) /* null pointer terminates list */ 642 ; 643 ptrs = i; /* null pointer terminates list */ 644 645 pos = sizeof(image_header_t) + ptrs * sizeof(long); 646 printf ("Contents:\n"); 647 for (i=0; len_ptr[i]; ++i) { 648 size = ntohl(len_ptr[i]); 649 650 printf (" Image %d: %8d Bytes = %4d kB = %d MB\n", 651 i, size, size>>10, size>>20); 652 if (hdr->ih_type == IH_TYPE_SCRIPT && i > 0) { 653 /* 654 * the user may need to know offsets 655 * if planning to do something with 656 * multiple files 657 */ 658 printf (" Offset = %08X\n", pos); 659 } 660 /* copy_file() will pad the first files to even word align */ 661 size += 3; 662 size &= ~3; 663 pos += size; 664 } 665 } 666 } 667 668 669 static void 670 print_type (image_header_t *hdr) 671 { 672 printf ("%s %s %s (%s)\n", 673 put_arch (hdr->ih_arch), 674 put_os (hdr->ih_os ), 675 put_type (hdr->ih_type), 676 put_comp (hdr->ih_comp) 677 ); 678 } 679 680 static char *put_arch (int arch) 681 { 682 return (put_table_entry(arch_name, "Unknown Architecture", arch)); 683 } 684 685 static char *put_os (int os) 686 { 687 return (put_table_entry(os_name, "Unknown OS", os)); 688 } 689 690 static char *put_type (int type) 691 { 692 return (put_table_entry(type_name, "Unknown Image", type)); 693 } 694 695 static char *put_comp (int comp) 696 { 697 return (put_table_entry(comp_name, "Unknown Compression", comp)); 698 } 699 700 static char *put_table_entry (table_entry_t *table, char *msg, int type) 701 { 702 for (; table->val>=0; ++table) { 703 if (table->val == type) 704 return (table->lname); 705 } 706 return (msg); 707 } 708 709 static int get_arch(char *name) 710 { 711 return (get_table_entry(arch_name, "CPU", name)); 712 } 713 714 715 static int get_comp(char *name) 716 { 717 return (get_table_entry(comp_name, "Compression", name)); 718 } 719 720 721 static int get_os (char *name) 722 { 723 return (get_table_entry(os_name, "OS", name)); 724 } 725 726 727 static int get_type(char *name) 728 { 729 return (get_table_entry(type_name, "Image", name)); 730 } 731 732 static int get_table_entry (table_entry_t *table, char *msg, char *name) 733 { 734 table_entry_t *t; 735 int first = 1; 736 737 for (t=table; t->val>=0; ++t) { 738 if (t->sname && strcasecmp(t->sname, name)==0) 739 return (t->val); 740 } 741 fprintf (stderr, "\nInvalid %s Type - valid names are", msg); 742 for (t=table; t->val>=0; ++t) { 743 if (t->sname == NULL) 744 continue; 745 fprintf (stderr, "%c %s", (first) ? ':' : ',', t->sname); 746 first = 0; 747 } 748 fprintf (stderr, "\n"); 749 return (-1); 750 } 751