tools/kwbimage.c

   1 /*
   2  * Image manipulator for Marvell SoCs
   3  *  supports Kirkwood, Dove, Armada 370, and Armada XP
   4  *
   5  * (C) Copyright 2013 Thomas Petazzoni
   6  * <thomas.petazzoni@free-electrons.com>
   7  *
   8  * SPDX-License-Identifier:     GPL-2.0+
   9  *
  10  * Not implemented: support for the register headers and secure
  11  * headers in v1 images
  12  */
  13
  14 #include "imagetool.h"
  15 #include <limits.h>
  16 #include <image.h>
  17 #include <stdint.h>
  18 #include "kwbimage.h"
  19
  20 static struct image_cfg_element *image_cfg;
  21 static int cfgn;
  22
  23 struct boot_mode {
  24         unsigned int id;
  25         const char *name;
  26 };
  27
  28 struct boot_mode boot_modes[] = {
  29         { 0x4D, "i2c"  },
  30         { 0x5A, "spi"  },
  31         { 0x8B, "nand" },
  32         { 0x78, "sata" },
  33         { 0x9C, "pex"  },
  34         { 0x69, "uart" },
  35         { 0xAE, "sdio" },
  36         {},
  37 };
  38
  39 struct nand_ecc_mode {
  40         unsigned int id;
  41         const char *name;
  42 };
  43
  44 struct nand_ecc_mode nand_ecc_modes[] = {
  45         { 0x00, "default" },
  46         { 0x01, "hamming" },
  47         { 0x02, "rs" },
  48         { 0x03, "disabled" },
  49         {},
  50 };
  51
  52 /* Used to identify an undefined execution or destination address */
  53 #define ADDR_INVALID ((uint32_t)-1)
  54
  55 #define BINARY_MAX_ARGS 8
  56
  57 /* In-memory representation of a line of the configuration file */
  58 struct image_cfg_element {
  59         enum {
  60                 IMAGE_CFG_VERSION = 0x1,
  61                 IMAGE_CFG_BOOT_FROM,
  62                 IMAGE_CFG_DEST_ADDR,
  63                 IMAGE_CFG_EXEC_ADDR,
  64                 IMAGE_CFG_NAND_BLKSZ,
  65                 IMAGE_CFG_NAND_BADBLK_LOCATION,
  66                 IMAGE_CFG_NAND_ECC_MODE,
  67                 IMAGE_CFG_NAND_PAGESZ,
  68                 IMAGE_CFG_BINARY,
  69                 IMAGE_CFG_PAYLOAD,
  70                 IMAGE_CFG_DATA,
  71         } type;
  72         union {
  73                 unsigned int version;
  74                 unsigned int bootfrom;
  75                 struct {
  76                         const char *file;
  77                         unsigned int args[BINARY_MAX_ARGS];
  78                         unsigned int nargs;
  79                 } binary;
  80                 const char *payload;
  81                 unsigned int dstaddr;
  82                 unsigned int execaddr;
  83                 unsigned int nandblksz;
  84                 unsigned int nandbadblklocation;
  85                 unsigned int nandeccmode;
  86                 unsigned int nandpagesz;
  87                 struct ext_hdr_v0_reg regdata;
  88         };
  89 };
  90
  91 #define IMAGE_CFG_ELEMENT_MAX 256
  92
  93 /*
  94  * Utility functions to manipulate boot mode and ecc modes (convert
  95  * them back and forth between description strings and the
  96  * corresponding numerical identifiers).
  97  */
  98
  99 static const char *image_boot_mode_name(unsigned int id)
 100 {
 101         int i;
 102         for (i = 0; boot_modes[i].name; i++)
 103                 if (boot_modes[i].id == id)
 104                         return boot_modes[i].name;
 105         return NULL;
 106 }
 107
 108 int image_boot_mode_id(const char *boot_mode_name)
 109 {
 110         int i;
 111         for (i = 0; boot_modes[i].name; i++)
 112                 if (!strcmp(boot_modes[i].name, boot_mode_name))
 113                         return boot_modes[i].id;
 114
 115         return -1;
 116 }
 117
 118 int image_nand_ecc_mode_id(const char *nand_ecc_mode_name)
 119 {
 120         int i;
 121         for (i = 0; nand_ecc_modes[i].name; i++)
 122                 if (!strcmp(nand_ecc_modes[i].name, nand_ecc_mode_name))
 123                         return nand_ecc_modes[i].id;
 124         return -1;
 125 }
 126
 127 static struct image_cfg_element *
 128 image_find_option(unsigned int optiontype)
 129 {
 130         int i;
 131
 132         for (i = 0; i < cfgn; i++) {
 133                 if (image_cfg[i].type == optiontype)
 134                         return &image_cfg[i];
 135         }
 136
 137         return NULL;
 138 }
 139
 140 static unsigned int
 141 image_count_options(unsigned int optiontype)
 142 {
 143         int i;
 144         unsigned int count = 0;
 145
 146         for (i = 0; i < cfgn; i++)
 147                 if (image_cfg[i].type == optiontype)
 148                         count++;
 149
 150         return count;
 151 }
 152
 153 /*
 154  * Compute a 8-bit checksum of a memory area. This algorithm follows
 155  * the requirements of the Marvell SoC BootROM specifications.
 156  */
 157 static uint8_t image_checksum8(void *start, uint32_t len)
 158 {
 159         uint8_t csum = 0;
 160         uint8_t *p = start;
 161
 162         /* check len and return zero checksum if invalid */
 163         if (!len)
 164                 return 0;
 165
 166         do {
 167                 csum += *p;
 168                 p++;
 169         } while (--len);
 170
 171         return csum;
 172 }
 173
 174 static uint32_t image_checksum32(void *start, uint32_t len)
 175 {
 176         uint32_t csum = 0;
 177         uint32_t *p = start;
 178
 179         /* check len and return zero checksum if invalid */
 180         if (!len)
 181                 return 0;
 182
 183         if (len % sizeof(uint32_t)) {
 184                 fprintf(stderr, "Length %d is not in multiple of %zu\n",
 185                         len, sizeof(uint32_t));
 186                 return 0;
 187         }
 188
 189         do {
 190                 csum += *p;
 191                 p++;
 192                 len -= sizeof(uint32_t);
 193         } while (len > 0);
 194
 195         return csum;
 196 }
 197
 198 static void *image_create_v0(size_t *imagesz, struct image_tool_params *params,
 199                              int payloadsz)
 200 {
 201         struct image_cfg_element *e;
 202         size_t headersz;
 203         struct main_hdr_v0 *main_hdr;
 204         struct ext_hdr_v0 *ext_hdr;
 205         void *image;
 206         int has_ext = 0;
 207
 208         /*
 209          * Calculate the size of the header and the size of the
 210          * payload
 211          */
 212         headersz  = sizeof(struct main_hdr_v0);
 213
 214         if (image_count_options(IMAGE_CFG_DATA) > 0) {
 215                 has_ext = 1;
 216                 headersz += sizeof(struct ext_hdr_v0);
 217         }
 218
 219         if (image_count_options(IMAGE_CFG_PAYLOAD) > 1) {
 220                 fprintf(stderr, "More than one payload, not possible\n");
 221                 return NULL;
 222         }
 223
 224         image = malloc(headersz);
 225         if (!image) {
 226                 fprintf(stderr, "Cannot allocate memory for image\n");
 227                 return NULL;
 228         }
 229
 230         memset(image, 0, headersz);
 231
 232         main_hdr = image;
 233
 234         /* Fill in the main header */
 235         main_hdr->blocksize = payloadsz + sizeof(uint32_t) - headersz;
 236         main_hdr->srcaddr   = headersz;
 237         main_hdr->ext       = has_ext;
 238         main_hdr->destaddr  = params->addr;
 239         main_hdr->execaddr  = params->ep;
 240
 241         e = image_find_option(IMAGE_CFG_BOOT_FROM);
 242         if (e)
 243                 main_hdr->blockid = e->bootfrom;
 244         e = image_find_option(IMAGE_CFG_NAND_ECC_MODE);
 245         if (e)
 246                 main_hdr->nandeccmode = e->nandeccmode;
 247         e = image_find_option(IMAGE_CFG_NAND_PAGESZ);
 248         if (e)
 249                 main_hdr->nandpagesize = e->nandpagesz;
 250         main_hdr->checksum = image_checksum8(image,
 251                                              sizeof(struct main_hdr_v0));
 252
 253         /* Generate the ext header */
 254         if (has_ext) {
 255                 int cfgi, datai;
 256
 257                 ext_hdr = image + sizeof(struct main_hdr_v0);
 258                 ext_hdr->offset = 0x40;
 259
 260                 for (cfgi = 0, datai = 0; cfgi < cfgn; cfgi++) {
 261                         e = &image_cfg[cfgi];
 262                         if (e->type != IMAGE_CFG_DATA)
 263                                 continue;
 264
 265                         ext_hdr->rcfg[datai].raddr = e->regdata.raddr;
 266                         ext_hdr->rcfg[datai].rdata = e->regdata.rdata;
 267                         datai++;
 268                 }
 269
 270                 ext_hdr->checksum = image_checksum8(ext_hdr,
 271                                                     sizeof(struct ext_hdr_v0));
 272         }
 273
 274         *imagesz = headersz;
 275         return image;
 276 }
 277
 278 static size_t image_headersz_v1(struct image_tool_params *params,
 279                                 int *hasext)
 280 {
 281         struct image_cfg_element *binarye;
 282         size_t headersz;
 283         int ret;
 284
 285         /*
 286          * Calculate the size of the header and the size of the
 287          * payload
 288          */
 289         headersz = sizeof(struct main_hdr_v1);
 290
 291         if (image_count_options(IMAGE_CFG_BINARY) > 1) {
 292                 fprintf(stderr, "More than one binary blob, not supported\n");
 293                 return 0;
 294         }
 295
 296         if (image_count_options(IMAGE_CFG_PAYLOAD) > 1) {
 297                 fprintf(stderr, "More than one payload, not possible\n");
 298                 return 0;
 299         }
 300
 301         binarye = image_find_option(IMAGE_CFG_BINARY);
 302         if (binarye) {
 303                 struct stat s;
 304
 305                 ret = stat(binarye->binary.file, &s);
 306                 if (ret < 0) {
 307                         char cwd[PATH_MAX];
 308                         char *dir = cwd;
 309
 310                         memset(cwd, 0, sizeof(cwd));
 311                         if (!getcwd(cwd, sizeof(cwd))) {
 312                                 dir = "current working directory";
 313                                 perror("getcwd() failed");
 314                         }
 315
 316                         fprintf(stderr,
 317                                 "Didn't find the file '%s' in '%s' which is mandatory to generate the image\n"
 318                                 "This file generally contains the DDR3 training code, and should be extracted from an existing bootable\n"
 319                                 "image for your board. See 'kwbimage -x' to extract it from an existing image.\n",
 320                                 binarye->binary.file, dir);
 321                         return 0;
 322                 }
 323
 324                 headersz += s.st_size +
 325                         binarye->binary.nargs * sizeof(unsigned int);
 326                 if (hasext)
 327                         *hasext = 1;
 328         }
 329
 330 #if defined(CONFIG_SYS_U_BOOT_OFFS)
 331         if (headersz > CONFIG_SYS_U_BOOT_OFFS) {
 332                 fprintf(stderr, "Error: Image header (incl. SPL image) too big!\n");
 333                 fprintf(stderr, "header=0x%x CONFIG_SYS_U_BOOT_OFFS=0x%x!\n",
 334                         (int)headersz, CONFIG_SYS_U_BOOT_OFFS);
 335                 fprintf(stderr, "Increase CONFIG_SYS_U_BOOT_OFFS!\n");
 336                 return 0;
 337         } else {
 338                 headersz = CONFIG_SYS_U_BOOT_OFFS;
 339         }
 340 #endif
 341
 342         /*
 343          * The payload should be aligned on some reasonable
 344          * boundary
 345          */
 346         return ALIGN_SUP(headersz, 4096);
 347 }
 348
 349 static void *image_create_v1(size_t *imagesz, struct image_tool_params *params,
 350                              int payloadsz)
 351 {
 352         struct image_cfg_element *e, *binarye;
 353         struct main_hdr_v1 *main_hdr;
 354         size_t headersz;
 355         void *image, *cur;
 356         int hasext = 0;
 357         int ret;
 358
 359         /*
 360          * Calculate the size of the header and the size of the
 361          * payload
 362          */
 363         headersz = image_headersz_v1(params, &hasext);
 364         if (headersz == 0)
 365                 return NULL;
 366
 367         image = malloc(headersz);
 368         if (!image) {
 369                 fprintf(stderr, "Cannot allocate memory for image\n");
 370                 return NULL;
 371         }
 372
 373         memset(image, 0, headersz);
 374
 375         cur = main_hdr = image;
 376         cur += sizeof(struct main_hdr_v1);
 377
 378         /* Fill the main header */
 379         main_hdr->blocksize    = payloadsz - headersz + sizeof(uint32_t);
 380         main_hdr->headersz_lsb = headersz & 0xFFFF;
 381         main_hdr->headersz_msb = (headersz & 0xFFFF0000) >> 16;
 382         main_hdr->destaddr     = params->addr;
 383         main_hdr->execaddr     = params->ep;
 384         main_hdr->srcaddr      = headersz;
 385         main_hdr->ext          = hasext;
 386         main_hdr->version      = 1;
 387         e = image_find_option(IMAGE_CFG_BOOT_FROM);
 388         if (e)
 389                 main_hdr->blockid = e->bootfrom;
 390         e = image_find_option(IMAGE_CFG_NAND_BLKSZ);
 391         if (e)
 392                 main_hdr->nandblocksize = e->nandblksz / (64 * 1024);
 393         e = image_find_option(IMAGE_CFG_NAND_BADBLK_LOCATION);
 394         if (e)
 395                 main_hdr->nandbadblklocation = e->nandbadblklocation;
 396
 397         binarye = image_find_option(IMAGE_CFG_BINARY);
 398         if (binarye) {
 399                 struct opt_hdr_v1 *hdr = cur;
 400                 unsigned int *args;
 401                 size_t binhdrsz;
 402                 struct stat s;
 403                 int argi;
 404                 FILE *bin;
 405
 406                 hdr->headertype = OPT_HDR_V1_BINARY_TYPE;
 407
 408                 bin = fopen(binarye->binary.file, "r");
 409                 if (!bin) {
 410                         fprintf(stderr, "Cannot open binary file %s\n",
 411                                 binarye->binary.file);
 412                         return NULL;
 413                 }
 414
 415                 fstat(fileno(bin), &s);
 416
 417                 binhdrsz = sizeof(struct opt_hdr_v1) +
 418                         (binarye->binary.nargs + 1) * sizeof(unsigned int) +
 419                         s.st_size;
 420                 binhdrsz = ALIGN_SUP(binhdrsz, 32);
 421                 hdr->headersz_lsb = binhdrsz & 0xFFFF;
 422                 hdr->headersz_msb = (binhdrsz & 0xFFFF0000) >> 16;
 423
 424                 cur += sizeof(struct opt_hdr_v1);
 425
 426                 args = cur;
 427                 *args = binarye->binary.nargs;
 428                 args++;
 429                 for (argi = 0; argi < binarye->binary.nargs; argi++)
 430                         args[argi] = binarye->binary.args[argi];
 431
 432                 cur += (binarye->binary.nargs + 1) * sizeof(unsigned int);
 433
 434                 ret = fread(cur, s.st_size, 1, bin);
 435                 if (ret != 1) {
 436                         fprintf(stderr,
 437                                 "Could not read binary image %s\n",
 438                                 binarye->binary.file);
 439                         return NULL;
 440                 }
 441
 442                 fclose(bin);
 443
 444                 cur += s.st_size;
 445
 446                 /*
 447                  * For now, we don't support more than one binary
 448                  * header, and no other header types are
 449                  * supported. So, the binary header is necessarily the
 450                  * last one
 451                  */
 452                 *((unsigned char *)cur) = 0;
 453
 454                 cur += sizeof(uint32_t);
 455         }
 456
 457         /* Calculate and set the header checksum */
 458         main_hdr->checksum = image_checksum8(main_hdr, headersz);
 459
 460         *imagesz = headersz;
 461         return image;
 462 }
 463
 464 static int image_create_config_parse_oneline(char *line,
 465                                              struct image_cfg_element *el)
 466 {
 467         char *keyword, *saveptr;
 468         char deliminiters[] = " \t";
 469
 470         keyword = strtok_r(line, deliminiters, &saveptr);
 471         if (!strcmp(keyword, "VERSION")) {
 472                 char *value = strtok_r(NULL, deliminiters, &saveptr);
 473                 el->type = IMAGE_CFG_VERSION;
 474                 el->version = atoi(value);
 475         } else if (!strcmp(keyword, "BOOT_FROM")) {
 476                 char *value = strtok_r(NULL, deliminiters, &saveptr);
 477                 int ret = image_boot_mode_id(value);
 478                 if (ret < 0) {
 479                         fprintf(stderr,
 480                                 "Invalid boot media '%s'\n", value);
 481                         return -1;
 482                 }
 483                 el->type = IMAGE_CFG_BOOT_FROM;
 484                 el->bootfrom = ret;
 485         } else if (!strcmp(keyword, "NAND_BLKSZ")) {
 486                 char *value = strtok_r(NULL, deliminiters, &saveptr);
 487                 el->type = IMAGE_CFG_NAND_BLKSZ;
 488                 el->nandblksz = strtoul(value, NULL, 16);
 489         } else if (!strcmp(keyword, "NAND_BADBLK_LOCATION")) {
 490                 char *value = strtok_r(NULL, deliminiters, &saveptr);
 491                 el->type = IMAGE_CFG_NAND_BADBLK_LOCATION;
 492                 el->nandbadblklocation =
 493                         strtoul(value, NULL, 16);
 494         } else if (!strcmp(keyword, "NAND_ECC_MODE")) {
 495                 char *value = strtok_r(NULL, deliminiters, &saveptr);
 496                 int ret = image_nand_ecc_mode_id(value);
 497                 if (ret < 0) {
 498                         fprintf(stderr,
 499                                 "Invalid NAND ECC mode '%s'\n", value);
 500                         return -1;
 501                 }
 502                 el->type = IMAGE_CFG_NAND_ECC_MODE;
 503                 el->nandeccmode = ret;
 504         } else if (!strcmp(keyword, "NAND_PAGE_SIZE")) {
 505                 char *value = strtok_r(NULL, deliminiters, &saveptr);
 506                 el->type = IMAGE_CFG_NAND_PAGESZ;
 507                 el->nandpagesz = strtoul(value, NULL, 16);
 508         } else if (!strcmp(keyword, "BINARY")) {
 509                 char *value = strtok_r(NULL, deliminiters, &saveptr);
 510                 int argi = 0;
 511
 512                 el->type = IMAGE_CFG_BINARY;
 513                 el->binary.file = strdup(value);
 514                 while (1) {
 515                         value = strtok_r(NULL, deliminiters, &saveptr);
 516                         if (!value)
 517                                 break;
 518                         el->binary.args[argi] = strtoul(value, NULL, 16);
 519                         argi++;
 520                         if (argi >= BINARY_MAX_ARGS) {
 521                                 fprintf(stderr,
 522                                         "Too many argument for binary\n");
 523                                 return -1;
 524                         }
 525                 }
 526                 el->binary.nargs = argi;
 527         } else if (!strcmp(keyword, "DATA")) {
 528                 char *value1 = strtok_r(NULL, deliminiters, &saveptr);
 529                 char *value2 = strtok_r(NULL, deliminiters, &saveptr);
 530
 531                 if (!value1 || !value2) {
 532                         fprintf(stderr,
 533                                 "Invalid number of arguments for DATA\n");
 534                         return -1;
 535                 }
 536
 537                 el->type = IMAGE_CFG_DATA;
 538                 el->regdata.raddr = strtoul(value1, NULL, 16);
 539                 el->regdata.rdata = strtoul(value2, NULL, 16);
 540         } else {
 541                 fprintf(stderr, "Ignoring unknown line '%s'\n", line);
 542         }
 543
 544         return 0;
 545 }
 546
 547 /*
 548  * Parse the configuration file 'fcfg' into the array of configuration
 549  * elements 'image_cfg', and return the number of configuration
 550  * elements in 'cfgn'.
 551  */
 552 static int image_create_config_parse(FILE *fcfg)
 553 {
 554         int ret;
 555         int cfgi = 0;
 556
 557         /* Parse the configuration file */
 558         while (!feof(fcfg)) {
 559                 char *line;
 560                 char buf[256];
 561
 562                 /* Read the current line */
 563                 memset(buf, 0, sizeof(buf));
 564                 line = fgets(buf, sizeof(buf), fcfg);
 565                 if (!line)
 566                         break;
 567
 568                 /* Ignore useless lines */
 569                 if (line[0] == '\n' || line[0] == '#')
 570                         continue;
 571
 572                 /* Strip final newline */
 573                 if (line[strlen(line) - 1] == '\n')
 574                         line[strlen(line) - 1] = 0;
 575
 576                 /* Parse the current line */
 577                 ret = image_create_config_parse_oneline(line,
 578                                                         &image_cfg[cfgi]);
 579                 if (ret)
 580                         return ret;
 581
 582                 cfgi++;
 583
 584                 if (cfgi >= IMAGE_CFG_ELEMENT_MAX) {
 585                         fprintf(stderr,
 586                                 "Too many configuration elements in .cfg file\n");
 587                         return -1;
 588                 }
 589         }
 590
 591         cfgn = cfgi;
 592         return 0;
 593 }
 594
 595 static int image_get_version(void)
 596 {
 597         struct image_cfg_element *e;
 598
 599         e = image_find_option(IMAGE_CFG_VERSION);
 600         if (!e)
 601                 return -1;
 602
 603         return e->version;
 604 }
 605
 606 static int image_version_file(const char *input)
 607 {
 608         FILE *fcfg;
 609         int version;
 610         int ret;
 611
 612         fcfg = fopen(input, "r");
 613         if (!fcfg) {
 614                 fprintf(stderr, "Could not open input file %s\n", input);
 615                 return -1;
 616         }
 617
 618         image_cfg = malloc(IMAGE_CFG_ELEMENT_MAX *
 619                            sizeof(struct image_cfg_element));
 620         if (!image_cfg) {
 621                 fprintf(stderr, "Cannot allocate memory\n");
 622                 fclose(fcfg);
 623                 return -1;
 624         }
 625
 626         memset(image_cfg, 0,
 627                IMAGE_CFG_ELEMENT_MAX * sizeof(struct image_cfg_element));
 628         rewind(fcfg);
 629
 630         ret = image_create_config_parse(fcfg);
 631         fclose(fcfg);
 632         if (ret) {
 633                 free(image_cfg);
 634                 return -1;
 635         }
 636
 637         version = image_get_version();
 638         /* Fallback to version 0 is no version is provided in the cfg file */
 639         if (version == -1)
 640                 version = 0;
 641
 642         free(image_cfg);
 643
 644         return version;
 645 }
 646
 647 static void kwbimage_set_header(void *ptr, struct stat *sbuf, int ifd,
 648                                 struct image_tool_params *params)
 649 {
 650         FILE *fcfg;
 651         void *image = NULL;
 652         int version;
 653         size_t headersz = 0;
 654         uint32_t checksum;
 655         int ret;
 656         int size;
 657
 658         fcfg = fopen(params->imagename, "r");
 659         if (!fcfg) {
 660                 fprintf(stderr, "Could not open input file %s\n",
 661                         params->imagename);
 662                 exit(EXIT_FAILURE);
 663         }
 664
 665         image_cfg = malloc(IMAGE_CFG_ELEMENT_MAX *
 666                            sizeof(struct image_cfg_element));
 667         if (!image_cfg) {
 668                 fprintf(stderr, "Cannot allocate memory\n");
 669                 fclose(fcfg);
 670                 exit(EXIT_FAILURE);
 671         }
 672
 673         memset(image_cfg, 0,
 674                IMAGE_CFG_ELEMENT_MAX * sizeof(struct image_cfg_element));
 675         rewind(fcfg);
 676
 677         ret = image_create_config_parse(fcfg);
 678         fclose(fcfg);
 679         if (ret) {
 680                 free(image_cfg);
 681                 exit(EXIT_FAILURE);
 682         }
 683
 684         /* The MVEBU BootROM does not allow non word aligned payloads */
 685         sbuf->st_size = ALIGN_SUP(sbuf->st_size, 4);
 686
 687         version = image_get_version();
 688         switch (version) {
 689                 /*
 690                  * Fallback to version 0 if no version is provided in the
 691                  * cfg file
 692                  */
 693         case -1:
 694         case 0:
 695                 image = image_create_v0(&headersz, params, sbuf->st_size);
 696                 break;
 697
 698         case 1:
 699                 image = image_create_v1(&headersz, params, sbuf->st_size);
 700                 break;
 701
 702         default:
 703                 fprintf(stderr, "Unsupported version %d\n", version);
 704                 free(image_cfg);
 705                 exit(EXIT_FAILURE);
 706         }
 707
 708         if (!image) {
 709                 fprintf(stderr, "Could not create image\n");
 710                 free(image_cfg);
 711                 exit(EXIT_FAILURE);
 712         }
 713
 714         free(image_cfg);
 715
 716         /* Build and add image checksum header */
 717         checksum = image_checksum32((uint32_t *)ptr, sbuf->st_size);
 718         size = write(ifd, &checksum, sizeof(uint32_t));
 719         if (size != sizeof(uint32_t)) {
 720                 fprintf(stderr, "Error:%s - Checksum write %d bytes %s\n",
 721                         params->cmdname, size, params->imagefile);
 722                 exit(EXIT_FAILURE);
 723         }
 724
 725         sbuf->st_size += sizeof(uint32_t);
 726
 727         /* Finally copy the header into the image area */
 728         memcpy(ptr, image, headersz);
 729
 730         free(image);
 731 }
 732
 733 static void kwbimage_print_header(const void *ptr)
 734 {
 735         struct main_hdr_v0 *mhdr = (struct main_hdr_v0 *)ptr;
 736
 737         printf("Image Type:   MVEBU Boot from %s Image\n",
 738                image_boot_mode_name(mhdr->blockid));
 739         printf("Image version:%d\n", image_version((void *)ptr));
 740         printf("Data Size:    ");
 741         genimg_print_size(mhdr->blocksize - sizeof(uint32_t));
 742         printf("Load Address: %08x\n", mhdr->destaddr);
 743         printf("Entry Point:  %08x\n", mhdr->execaddr);
 744 }
 745
 746 static int kwbimage_check_image_types(uint8_t type)
 747 {
 748         if (type == IH_TYPE_KWBIMAGE)
 749                 return EXIT_SUCCESS;
 750         else
 751                 return EXIT_FAILURE;
 752 }
 753
 754 static int kwbimage_verify_header(unsigned char *ptr, int image_size,
 755                                   struct image_tool_params *params)
 756 {
 757         struct main_hdr_v0 *main_hdr;
 758         struct ext_hdr_v0 *ext_hdr;
 759         uint8_t checksum;
 760
 761         main_hdr = (void *)ptr;
 762         checksum = image_checksum8(ptr,
 763                                    sizeof(struct main_hdr_v0)
 764                                    - sizeof(uint8_t));
 765         if (checksum != main_hdr->checksum)
 766                 return -FDT_ERR_BADSTRUCTURE;
 767
 768         /* Only version 0 extended header has checksum */
 769         if (image_version((void *)ptr) == 0) {
 770                 ext_hdr = (void *)ptr + sizeof(struct main_hdr_v0);
 771                 checksum = image_checksum8(ext_hdr,
 772                                            sizeof(struct ext_hdr_v0)
 773                                            - sizeof(uint8_t));
 774                 if (checksum != ext_hdr->checksum)
 775                         return -FDT_ERR_BADSTRUCTURE;
 776         }
 777
 778         return 0;
 779 }
 780
 781 static int kwbimage_generate(struct image_tool_params *params,
 782                              struct image_type_params *tparams)
 783 {
 784         int alloc_len;
 785         void *hdr;
 786         int version = 0;
 787
 788         version = image_version_file(params->imagename);
 789         if (version == 0) {
 790                 alloc_len = sizeof(struct main_hdr_v0) +
 791                         sizeof(struct ext_hdr_v0);
 792         } else {
 793                 alloc_len = image_headersz_v1(params, NULL);
 794         }
 795
 796         hdr = malloc(alloc_len);
 797         if (!hdr) {
 798                 fprintf(stderr, "%s: malloc return failure: %s\n",
 799                         params->cmdname, strerror(errno));
 800                 exit(EXIT_FAILURE);
 801         }
 802
 803         memset(hdr, 0, alloc_len);
 804         tparams->header_size = alloc_len;
 805         tparams->hdr = hdr;
 806
 807         return 0;
 808 }
 809
 810 /*
 811  * Report Error if xflag is set in addition to default
 812  */
 813 static int kwbimage_check_params(struct image_tool_params *params)
 814 {
 815         if (!strlen(params->imagename)) {
 816                 fprintf(stderr, "Error:%s - Configuration file not specified, "
 817                         "it is needed for kwbimage generation\n",
 818                         params->cmdname);
 819                 return CFG_INVALID;
 820         }
 821
 822         return (params->dflag && (params->fflag || params->lflag)) ||
 823                 (params->fflag && (params->dflag || params->lflag)) ||
 824                 (params->lflag && (params->dflag || params->fflag)) ||
 825                 (params->xflag) || !(strlen(params->imagename));
 826 }
 827
 828 /*
 829  * kwbimage type parameters definition
 830  */
 831 U_BOOT_IMAGE_TYPE(
 832         kwbimage,
 833         "Marvell MVEBU Boot Image support",
 834         0,
 835         NULL,
 836         kwbimage_check_params,
 837         kwbimage_verify_header,
 838         kwbimage_print_header,
 839         kwbimage_set_header,
 840         NULL,
 841         kwbimage_check_image_types,
 842         NULL,
 843         kwbimage_generate
 844 );