tools: imx8image: check lseek return value
[oweals/u-boot.git] / tools / imx8image.c
1 // SPDX-License-Identifier: GPL-2.0+
2 /*
3  * Copyright 2018 NXP
4  *
5  * Peng Fan <peng.fan@nxp.com>
6  */
7
8 #include "imx8image.h"
9
10 static int p_idx;
11 static int sector_size;
12 static soc_type_t soc;
13 static int container = -1;
14 static int32_t core_type = CFG_CORE_INVALID;
15 static bool emmc_fastboot;
16 static image_t param_stack[IMG_STACK_SIZE];
17 static uint8_t fuse_version;
18 static uint16_t sw_version;
19 static uint32_t custom_partition;
20 static uint32_t scfw_flags;
21
22 int imx8image_check_params(struct image_tool_params *params)
23 {
24         return 0;
25 }
26
27 static void imx8image_set_header(void *ptr, struct stat *sbuf, int ifd,
28                                  struct image_tool_params *params)
29 {
30 }
31
32 static void imx8image_print_header(const void *ptr)
33 {
34 }
35
36 static int imx8image_check_image_types(uint8_t type)
37 {
38         return (type == IH_TYPE_IMX8IMAGE) ? EXIT_SUCCESS : EXIT_FAILURE;
39 }
40
41 static table_entry_t imx8image_cmds[] = {
42         {CMD_BOOT_FROM,         "BOOT_FROM",            "boot command",       },
43         {CMD_FUSE_VERSION,      "FUSE_VERSION",         "fuse version",       },
44         {CMD_SW_VERSION,        "SW_VERSION",           "sw version",         },
45         {CMD_MSG_BLOCK,         "MSG_BLOCK",            "msg block",          },
46         {CMD_FILEOFF,           "FILEOFF",              "fileoff",            },
47         {CMD_FLAG,              "FLAG",                 "flag",       },
48         {CMD_APPEND,            "APPEND",               "append a container", },
49         {CMD_PARTITION,         "PARTITION",            "new partition",      },
50         {CMD_SOC_TYPE,          "SOC_TYPE",             "soc type",           },
51         {CMD_CONTAINER,         "CONTAINER",            "new container",      },
52         {CMD_IMAGE,             "IMAGE",                "new image",          },
53         {CMD_DATA,              "DATA",                 "new data",           },
54         {-1,                    "",                     "",                   },
55 };
56
57 static table_entry_t imx8image_core_entries[] = {
58         {CFG_SCU,       "SCU",                  "scu core",     },
59         {CFG_M40,       "M40",                  "M4 core 0",    },
60         {CFG_M41,       "M41",                  "M4 core 1",    },
61         {CFG_A35,       "A35",                  "A35 core",     },
62         {CFG_A53,       "A53",                  "A53 core",     },
63         {CFG_A72,       "A72",                  "A72 core",     },
64         {-1,            "",                     "",             },
65 };
66
67 static table_entry_t imx8image_sector_size[] = {
68         {0x400,         "sd",                   "sd/emmc",},
69         {0x400,         "emmc_fastboot",        "emmc fastboot",},
70         {0x400,         "fspi",                 "flexspi",      },
71         {0x1000,        "nand_4k",              "nand 4K",      },
72         {0x2000,        "nand_8k",              "nand 8K",      },
73         {0x4000,        "nand_16k",             "nand 16K",     },
74         {-1,            "",                     "Invalid",      },
75 };
76
77 static void parse_cfg_cmd(image_t *param_stack, int32_t cmd, char *token,
78                           char *name, int lineno)
79 {
80         switch (cmd) {
81         case CMD_BOOT_FROM:
82                 sector_size = get_table_entry_id(imx8image_sector_size,
83                                                  "imximage boot option",
84                                                  token);
85                 if (!strncmp("emmc_fastboot", token, 13))
86                         emmc_fastboot = true;
87                 break;
88         case CMD_FUSE_VERSION:
89                 fuse_version = (uint8_t)(strtoll(token, NULL, 0) & 0xFF);
90                 break;
91         case CMD_SW_VERSION:
92                 sw_version = (uint8_t)(strtoll(token, NULL, 0) & 0xFFFF);
93                 break;
94         case CMD_FILEOFF:
95                 param_stack[p_idx].option = FILEOFF;
96                 param_stack[p_idx++].dst = (uint32_t)strtoll(token, NULL, 0);
97                 break;
98         case CMD_MSG_BLOCK:
99                 param_stack[p_idx].option = MSG_BLOCK;
100                 param_stack[p_idx].filename = token;
101                 break;
102         case CMD_FLAG:
103                 param_stack[p_idx].option = FLAG;
104                 param_stack[p_idx++].entry = (uint32_t)strtoll(token, NULL, 0);
105                 break;
106         case CMD_APPEND:
107                 param_stack[p_idx].option = APPEND;
108                 param_stack[p_idx++].filename = token;
109                 break;
110         case CMD_PARTITION:
111                 param_stack[p_idx].option = PARTITION;
112                 param_stack[p_idx++].entry = (uint32_t)strtoll(token, NULL, 0);
113                 break;
114         case CMD_SOC_TYPE:
115                 if (!strncmp(token, "IMX8QX", 6)) {
116                         soc = QX;
117                 } else if (!strncmp(token, "IMX8QM", 6)) {
118                         soc = QM;
119                 } else {
120                         fprintf(stderr, "Unknown CMD_SOC_TYPE");
121                         exit(EXIT_FAILURE);
122                 }
123                 break;
124         case CMD_IMAGE:
125         case CMD_DATA:
126                 core_type = get_table_entry_id(imx8image_core_entries,
127                                                "imx8image core entries",
128                                                token);
129                 if (core_type < 0) {
130                         fprintf(stderr, "Wrong IMAGE core_type %s\n", token);
131                         exit(EXIT_FAILURE);
132                 }
133                 break;
134         default:
135                 break;
136         }
137 }
138
139 static void parse_cfg_fld(image_t *param_stack, int32_t *cmd, char *token,
140                           char *name, int lineno, int fld)
141 {
142         switch (fld) {
143         case CFG_COMMAND:
144                 *cmd = get_table_entry_id(imx8image_cmds, "imx8image cmds",
145                                           token);
146                 if (*cmd < 0) {
147                         fprintf(stderr, "Error: %s[%d] - Invalid command (%s)\n", name, lineno, token);
148                         exit(EXIT_FAILURE);
149                 }
150
151                 if (*cmd == CMD_CONTAINER) {
152                         fprintf(stdout, "New Container: \t%d\n", ++container);
153                         param_stack[p_idx++].option = NEW_CONTAINER;
154                 }
155                 break;
156         case CFG_CORE_TYPE:
157                 parse_cfg_cmd(param_stack, *cmd, token, name, lineno);
158                 break;
159         case CFG_IMAGE_NAME:
160                 if (*cmd == CMD_MSG_BLOCK) {
161                         if (!strncmp(token, "fuse", 4)) {
162                                 param_stack[p_idx].ext = SC_R_OTP;
163                         } else if (!strncmp(token, "debug", 5)) {
164                                 param_stack[p_idx].ext = SC_R_DEBUG;
165                         } else if (!strncmp(token, "field", 5)) {
166                                 param_stack[p_idx].ext = SC_R_ROM_0;
167                         } else {
168                                 fprintf(stderr, "MSG type not found %s\n", token);
169                                 exit(EXIT_FAILURE);
170                         }
171                         break;
172                 }
173                 switch (core_type) {
174                 case CFG_SCU:
175                         param_stack[p_idx].option = SCFW;
176                         param_stack[p_idx++].filename = token;
177                         break;
178                 case CFG_M40:
179                         param_stack[p_idx].option = M40;
180                         param_stack[p_idx].ext = 0;
181                         param_stack[p_idx].filename = token;
182                         break;
183                 case CFG_M41:
184                         param_stack[p_idx].option = M41;
185                         param_stack[p_idx].ext = 1;
186                         param_stack[p_idx].filename = token;
187                         break;
188                 case CFG_A35:
189                         param_stack[p_idx].ext = CORE_CA35;
190                         param_stack[p_idx].option =
191                                 (*cmd == CMD_DATA) ? DATA : AP;
192                         param_stack[p_idx].filename = token;
193                         break;
194                 case CFG_A53:
195                         param_stack[p_idx].ext = CORE_CA53;
196                         param_stack[p_idx].option =
197                                 (*cmd == CMD_DATA) ? DATA : AP;
198                         param_stack[p_idx].filename = token;
199                         break;
200                 case CFG_A72:
201                         param_stack[p_idx].ext = CORE_CA72;
202                         param_stack[p_idx].option =
203                                 (*cmd == CMD_DATA) ? DATA : AP;
204                         param_stack[p_idx].filename = token;
205                         break;
206                 }
207                 break;
208         case CFG_LOAD_ADDR:
209                 if (*cmd == CMD_MSG_BLOCK) {
210                         param_stack[p_idx++].entry =
211                                 (uint32_t)strtoll(token, NULL, 0);
212                         break;
213                 }
214                 switch (core_type) {
215                 case CFG_SCU:
216                         break;
217                 case CFG_M40:
218                 case CFG_M41:
219                 case CFG_A35:
220                 case CFG_A53:
221                 case CFG_A72:
222                         param_stack[p_idx++].entry =
223                                 (uint32_t)strtoll(token, NULL, 0);
224                         break;
225                 }
226         default:
227                 break;
228         }
229 }
230
231 static uint32_t parse_cfg_file(image_t *param_stack, char *name)
232 {
233         FILE *fd = NULL;
234         char *line = NULL;
235         char *token, *saveptr1, *saveptr2;
236         int lineno = 0;
237         int fld;
238         size_t len;
239         int32_t cmd;
240
241         fd = fopen(name, "r");
242         if (fd == 0) {
243                 fprintf(stderr, "Error: %s - Can't open cfg file\n", name);
244                 exit(EXIT_FAILURE);
245         }
246
247         /*
248          * Very simple parsing, line starting with # are comments
249          * and are dropped
250          */
251         while ((getline(&line, &len, fd)) > 0) {
252                 lineno++;
253
254                 token = strtok_r(line, "\r\n", &saveptr1);
255                 if (!token)
256                         continue;
257
258                 /* Check inside the single line */
259                 for (fld = CFG_COMMAND, cmd = CFG_INVALID,
260                      line = token; ; line = NULL, fld++) {
261                         token = strtok_r(line, " \t", &saveptr2);
262                         if (!token)
263                                 break;
264
265                         /* Drop all text starting with '#' as comments */
266                         if (token[0] == '#')
267                                 break;
268
269                         parse_cfg_fld(param_stack, &cmd, token, name, lineno,
270                                       fld);
271                 }
272         }
273
274         return 0;
275 }
276
277 static void check_file(struct stat *sbuf, char *filename)
278 {
279         int tmp_fd  = open(filename, O_RDONLY | O_BINARY);
280
281         if (tmp_fd < 0) {
282                 fprintf(stderr, "%s: Can't open: %s\n",
283                         filename, strerror(errno));
284                 exit(EXIT_FAILURE);
285         }
286
287         if (fstat(tmp_fd, sbuf) < 0) {
288                 fprintf(stderr, "%s: Can't stat: %s\n",
289                         filename, strerror(errno));
290                 exit(EXIT_FAILURE);
291         }
292
293         close(tmp_fd);
294 }
295
296 static void copy_file_aligned(int ifd, const char *datafile, int offset,
297                               int align)
298 {
299         int dfd;
300         struct stat sbuf;
301         unsigned char *ptr;
302         uint8_t zeros[0x4000];
303         int size;
304         int ret;
305
306         if (align > 0x4000) {
307                 fprintf(stderr, "Wrong alignment requested %d\n", align);
308                 exit(EXIT_FAILURE);
309         }
310
311         memset(zeros, 0, sizeof(zeros));
312
313         dfd = open(datafile, O_RDONLY | O_BINARY);
314         if (dfd < 0) {
315                 fprintf(stderr, "Can't open %s: %s\n",
316                         datafile, strerror(errno));
317                 exit(EXIT_FAILURE);
318         }
319
320         if (fstat(dfd, &sbuf) < 0) {
321                 fprintf(stderr, "Can't stat %s: %s\n",
322                         datafile, strerror(errno));
323                 exit(EXIT_FAILURE);
324         }
325
326         if (sbuf.st_size == 0)
327                 goto close;
328
329         ptr = mmap(0, sbuf.st_size, PROT_READ, MAP_SHARED, dfd, 0);
330         if (ptr == MAP_FAILED) {
331                 fprintf(stderr, "Can't read %s: %s\n",
332                         datafile, strerror(errno));
333                 exit(EXIT_FAILURE);
334         }
335
336         size = sbuf.st_size;
337         ret = lseek(ifd, offset, SEEK_SET);
338         if (ret < 0) {
339                 fprintf(stderr, "%s: lseek error %s\n",
340                         __func__, strerror(errno));
341                 exit(EXIT_FAILURE);
342         }
343
344         if (write(ifd, ptr, size) != size) {
345                 fprintf(stderr, "Write error %s\n", strerror(errno));
346                 exit(EXIT_FAILURE);
347         }
348
349         align = ALIGN(size, align) - size;
350
351         if (write(ifd, (char *)&zeros, align) != align) {
352                 fprintf(stderr, "Write error: %s\n", strerror(errno));
353                 exit(EXIT_FAILURE);
354         }
355
356         munmap((void *)ptr, sbuf.st_size);
357 close:
358         close(dfd);
359 }
360
361 static void copy_file (int ifd, const char *datafile, int pad, int offset)
362 {
363         int dfd;
364         struct stat sbuf;
365         unsigned char *ptr;
366         int tail;
367         int zero = 0;
368         uint8_t zeros[4096];
369         int size, ret;
370
371         memset(zeros, 0, sizeof(zeros));
372
373         dfd = open(datafile, O_RDONLY | O_BINARY);
374         if (dfd < 0) {
375                 fprintf(stderr, "Can't open %s: %s\n",
376                         datafile, strerror(errno));
377                 exit(EXIT_FAILURE);
378         }
379
380         if (fstat(dfd, &sbuf) < 0) {
381                 fprintf(stderr, "Can't stat %s: %s\n",
382                         datafile, strerror(errno));
383                 exit(EXIT_FAILURE);
384         }
385
386         if (sbuf.st_size == 0)
387                 goto close;
388
389         ptr = mmap(0, sbuf.st_size, PROT_READ, MAP_SHARED, dfd, 0);
390         if (ptr == MAP_FAILED) {
391                 fprintf(stderr, "Can't read %s: %s\n",
392                         datafile, strerror(errno));
393                 exit(EXIT_FAILURE);
394         }
395
396         size = sbuf.st_size;
397         ret = lseek(ifd, offset, SEEK_SET);
398         if (ret < 0) {
399                 fprintf(stderr, "%s: lseek error %s\n",
400                         __func__, strerror(errno));
401                 exit(EXIT_FAILURE);
402         }
403
404         if (write(ifd, ptr, size) != size) {
405                 fprintf(stderr, "Write error %s\n",
406                         strerror(errno));
407                 exit(EXIT_FAILURE);
408         }
409
410         tail = size % 4;
411         pad = pad - size;
412         if (pad == 1 && tail != 0) {
413                 if (write(ifd, (char *)&zero, 4 - tail) != 4 - tail) {
414                         fprintf(stderr, "Write error on %s\n",
415                                 strerror(errno));
416                         exit(EXIT_FAILURE);
417                 }
418         } else if (pad > 1) {
419                 while (pad > 0) {
420                         int todo = sizeof(zeros);
421
422                         if (todo > pad)
423                                 todo = pad;
424                         if (write(ifd, (char *)&zeros, todo) != todo) {
425                                 fprintf(stderr, "Write error: %s\n",
426                                         strerror(errno));
427                                 exit(EXIT_FAILURE);
428                         }
429                         pad -= todo;
430                 }
431         }
432
433         munmap((void *)ptr, sbuf.st_size);
434 close:
435         close(dfd);
436 }
437
438 uint64_t read_dcd_offset(char *filename)
439 {
440         int dfd;
441         struct stat sbuf;
442         uint8_t *ptr;
443         uint64_t offset = 0;
444
445         dfd = open(filename, O_RDONLY | O_BINARY);
446         if (dfd < 0) {
447                 fprintf(stderr, "Can't open %s: %s\n", filename, strerror(errno));
448                 exit(EXIT_FAILURE);
449         }
450
451         if (fstat(dfd, &sbuf) < 0) {
452                 fprintf(stderr, "Can't stat %s: %s\n", filename, strerror(errno));
453                 exit(EXIT_FAILURE);
454         }
455
456         ptr = mmap(0, sbuf.st_size, PROT_READ, MAP_SHARED, dfd, 0);
457         if (ptr == MAP_FAILED) {
458                 fprintf(stderr, "Can't read %s: %s\n", filename, strerror(errno));
459                 exit(EXIT_FAILURE);
460         }
461
462         offset = *(uint32_t *)(ptr + DCD_ENTRY_ADDR_IN_SCFW);
463
464         munmap((void *)ptr, sbuf.st_size);
465         close(dfd);
466
467         return offset;
468 }
469
470 static void set_image_hash(boot_img_t *img, char *filename, uint32_t hash_type)
471 {
472         FILE *fp = NULL;
473         char sha_command[512];
474         char hash[2 * HASH_MAX_LEN + 1];
475         int i, ret;
476
477         if (img->size == 0)
478                 sprintf(sha_command, "sha%dsum /dev/null", hash_type);
479         else
480                 sprintf(sha_command, "dd if=/dev/zero of=tmp_pad bs=%d count=1;\
481                         dd if=\'%s\' of=tmp_pad conv=notrunc;\
482                         sha%dsum tmp_pad; rm -f tmp_pad",
483                         img->size, filename, hash_type);
484
485         switch (hash_type) {
486         case HASH_TYPE_SHA_256:
487                 img->hab_flags |= IMG_FLAG_HASH_SHA256;
488                 break;
489         case HASH_TYPE_SHA_384:
490                 img->hab_flags |= IMG_FLAG_HASH_SHA384;
491                 break;
492         case HASH_TYPE_SHA_512:
493                 img->hab_flags |= IMG_FLAG_HASH_SHA512;
494                 break;
495         default:
496                 fprintf(stderr, "Wrong hash type selected (%d) !!!\n\n",
497                         hash_type);
498                 exit(EXIT_FAILURE);
499                 break;
500         }
501         memset(img->hash, 0, HASH_MAX_LEN);
502
503         fp = popen(sha_command, "r");
504         if (!fp) {
505                 fprintf(stderr, "Failed to run command hash\n");
506                 exit(EXIT_FAILURE);
507         }
508
509         if (!fgets(hash, hash_type / 4 + 1, fp)) {
510                 fprintf(stderr, "Failed to hash file: %s\n", filename);
511                 exit(EXIT_FAILURE);
512         }
513
514         for (i = 0; i < strlen(hash) / 2; i++) {
515                 ret = sscanf(hash + 2 * i, "%02hhx", &img->hash[i]);
516                 if (ret < 0) {
517                         fprintf(stderr, "Failed sscanf hash: %d\n", ret);
518                         exit(EXIT_FAILURE);
519                 }
520         }
521
522         pclose(fp);
523 }
524
525 static void set_image_array_entry(flash_header_v3_t *container,
526                                   soc_type_t soc, const image_t *image_stack,
527                                   uint32_t offset, uint32_t size,
528                                   char *tmp_filename, bool dcd_skip)
529 {
530         uint64_t entry = image_stack->entry;
531         uint64_t core = image_stack->ext;
532         uint32_t meta;
533         char *tmp_name = "";
534         option_type_t type = image_stack->option;
535         boot_img_t *img = &container->img[container->num_images];
536
537         img->offset = offset;  /* Is re-adjusted later */
538         img->size = size;
539
540         set_image_hash(img, tmp_filename, IMAGE_HASH_ALGO_DEFAULT);
541
542         switch (type) {
543         case SECO:
544                 img->hab_flags |= IMG_TYPE_SECO;
545                 img->hab_flags |= CORE_SECO << BOOT_IMG_FLAGS_CORE_SHIFT;
546                 tmp_name = "SECO";
547                 img->dst = 0x20C00000;
548                 img->entry = 0x20000000;
549                 break;
550         case AP:
551                 if (soc == QX && core == CORE_CA35) {
552                         meta = IMAGE_A35_DEFAULT_META(custom_partition);
553                 } else if (soc == QM && core == CORE_CA53) {
554                         meta = IMAGE_A53_DEFAULT_META(custom_partition);
555                 } else if (soc == QM && core == CORE_CA72) {
556                         meta = IMAGE_A72_DEFAULT_META(custom_partition);
557                 } else {
558                         fprintf(stderr, "Error: invalid AP core id: %lu\n",
559                                 core);
560                         exit(EXIT_FAILURE);
561                 }
562                 img->hab_flags |= IMG_TYPE_EXEC;
563                 /* On B0, only core id = 4 is valid */
564                 img->hab_flags |= CORE_CA53 << BOOT_IMG_FLAGS_CORE_SHIFT;
565                 tmp_name = "AP";
566                 img->dst = entry;
567                 img->entry = entry;
568                 img->meta = meta;
569                 custom_partition = 0;
570                 break;
571         case M40:
572         case M41:
573                 if (core == 0) {
574                         core = CORE_CM4_0;
575                         meta = IMAGE_M4_0_DEFAULT_META(custom_partition);
576                 } else if (core == 1) {
577                         core = CORE_CM4_1;
578                         meta = IMAGE_M4_1_DEFAULT_META(custom_partition);
579                 } else {
580                         fprintf(stderr, "Error: invalid m4 core id: %lu\n", core);
581                         exit(EXIT_FAILURE);
582                 }
583                 img->hab_flags |= IMG_TYPE_EXEC;
584                 img->hab_flags |= core << BOOT_IMG_FLAGS_CORE_SHIFT;
585                 tmp_name = "M4";
586                 if ((entry & 0x7) != 0) {
587                         fprintf(stderr, "\n\nWarning: M4 Destination address is not 8 byte aligned\n\n");
588                         exit(EXIT_FAILURE);
589                 }
590                 img->dst = entry;
591                 img->entry = entry;
592                 img->meta = meta;
593                 custom_partition = 0;
594                 break;
595         case DATA:
596                 img->hab_flags |= IMG_TYPE_DATA;
597                 img->hab_flags |= CORE_CA35 << BOOT_IMG_FLAGS_CORE_SHIFT;
598                 tmp_name = "DATA";
599                 img->dst = entry;
600                 break;
601         case MSG_BLOCK:
602                 img->hab_flags |= IMG_TYPE_DATA;
603                 img->hab_flags |= CORE_CA35 << BOOT_IMG_FLAGS_CORE_SHIFT;
604                 img->meta = core << BOOT_IMG_META_MU_RID_SHIFT;
605                 tmp_name = "MSG_BLOCK";
606                 img->dst = entry;
607                 break;
608         case SCFW:
609                 img->hab_flags |= scfw_flags & 0xFFFF0000;
610                 img->hab_flags |= IMG_TYPE_EXEC;
611                 img->hab_flags |= CORE_SC << BOOT_IMG_FLAGS_CORE_SHIFT;
612                 tmp_name = "SCFW";
613                 img->dst = 0x1FFE0000;
614                 img->entry = 0x1FFE0000;
615
616                 /* Lets add the DCD now */
617                 if (!dcd_skip) {
618                         container->num_images++;
619                         img = &container->img[container->num_images];
620                         img->hab_flags |= IMG_TYPE_DCD_DDR;
621                         img->hab_flags |= CORE_SC << BOOT_IMG_FLAGS_CORE_SHIFT;
622                         set_image_hash(img, "/dev/null",
623                                        IMAGE_HASH_ALGO_DEFAULT);
624                         img->offset = offset + img->size;
625                         img->entry = read_dcd_offset(tmp_filename);
626                         img->dst = img->entry - 1;
627                 }
628                 break;
629         default:
630                 fprintf(stderr, "unrecognized image type (%d)\n", type);
631                 exit(EXIT_FAILURE);
632         }
633
634         fprintf(stdout, "%s file_offset = 0x%x size = 0x%x\n", tmp_name, offset, size);
635
636         container->num_images++;
637 }
638
639 void set_container(flash_header_v3_t *container,  uint16_t sw_version,
640                    uint32_t alignment, uint32_t flags, uint16_t fuse_version)
641 {
642         container->sig_blk_hdr.tag = 0x90;
643         container->sig_blk_hdr.length = sizeof(sig_blk_hdr_t);
644         container->sw_version = sw_version;
645         container->padding = alignment;
646         container->fuse_version = fuse_version;
647         container->flags = flags;
648         fprintf(stdout, "container flags: 0x%x\n", container->flags);
649 }
650
651 static int get_container_image_start_pos(image_t *image_stack, uint32_t align)
652 {
653         image_t *img_sp = image_stack;
654         /*8K total container header*/
655         int file_off = CONTAINER_IMAGE_ARRAY_START_OFFSET;
656         FILE *fd = NULL;
657         flash_header_v3_t header;
658         int ret;
659
660         while (img_sp->option != NO_IMG) {
661                 if (img_sp->option == APPEND) {
662                         fd = fopen(img_sp->filename, "r");
663                         if (!fd) {
664                                 fprintf(stderr, "Fail open first container file %s\n", img_sp->filename);
665                                 exit(EXIT_FAILURE);
666                         }
667
668                         ret = fread(&header, sizeof(header), 1, fd);
669                         if (ret != 1)
670                                 printf("Failure Read header %d\n", ret);
671
672                         fclose(fd);
673
674                         if (header.tag != IVT_HEADER_TAG_B0) {
675                                 fprintf(stderr, "header tag missmatched \n");
676                                 exit(EXIT_FAILURE);
677                         } else {
678                                 file_off +=
679                                         header.img[header.num_images - 1].size;
680                                 file_off = ALIGN(file_off, align);
681                         }
682                 }
683
684                 img_sp++;
685         }
686
687         return file_off;
688 }
689
690 static void set_imx_hdr_v3(imx_header_v3_t *imxhdr, uint32_t cont_id)
691 {
692         flash_header_v3_t *fhdr_v3 = &imxhdr->fhdr[cont_id];
693
694         /* Set magic number, Only >= B0 supported */
695         fhdr_v3->tag = IVT_HEADER_TAG_B0;
696         fhdr_v3->version = IVT_VERSION_B0;
697 }
698
699 static uint8_t *flatten_container_header(imx_header_v3_t *imx_header,
700                                          uint8_t containers_count,
701                                          uint32_t *size_out,
702                                          uint32_t file_offset)
703 {
704         uint8_t *flat = NULL;
705         uint8_t *ptr = NULL;
706         uint16_t size = 0;
707         int i, j;
708
709         /* Compute size of all container headers */
710         for (i = 0; i < containers_count; i++) {
711                 flash_header_v3_t *container = &imx_header->fhdr[i];
712
713                 container->sig_blk_offset = HEADER_IMG_ARRAY_OFFSET +
714                         container->num_images * IMG_ARRAY_ENTRY_SIZE;
715
716                 container->length = HEADER_IMG_ARRAY_OFFSET +
717                         (IMG_ARRAY_ENTRY_SIZE * container->num_images) +
718                         sizeof(sig_blk_hdr_t);
719
720                 /* Print info needed by CST to sign the container header */
721                 fprintf(stdout, "CST: CONTAINER %d offset: 0x%x\n",
722                         i, file_offset + size);
723                 fprintf(stdout, "CST: CONTAINER %d: Signature Block: offset is at 0x%x\n", i,
724                         file_offset + size + container->length -
725                         SIGNATURE_BLOCK_HEADER_LENGTH);
726
727                 size += ALIGN(container->length, container->padding);
728         }
729
730         flat = calloc(size, sizeof(uint8_t));
731         if (!flat) {
732                 fprintf(stderr, "Failed to allocate memory (%d)\n", size);
733                 exit(EXIT_FAILURE);
734         }
735
736         ptr = flat;
737         *size_out = size;
738
739         for (i = 0; i < containers_count; i++) {
740                 flash_header_v3_t *container = &imx_header->fhdr[i];
741                 uint32_t container_start_offset = ptr - flat;
742
743                 /* Append container header */
744                 append(ptr, container, HEADER_IMG_ARRAY_OFFSET);
745
746                 /* Adjust images offset to start from container headers start */
747                 for (j = 0; j < container->num_images; j++) {
748                         container->img[j].offset -=
749                                 container_start_offset + file_offset;
750                 }
751                 /* Append each image array entry */
752                 for (j = 0; j < container->num_images; j++)
753                         append(ptr, &container->img[j], sizeof(boot_img_t));
754
755                 append(ptr, &container->sig_blk_hdr, sizeof(sig_blk_hdr_t));
756
757                 /* Padding for container (if necessary) */
758                 ptr += ALIGN(container->length, container->padding) -
759                         container->length;
760         }
761
762         return flat;
763 }
764
765 static int build_container(soc_type_t soc, uint32_t sector_size,
766                            bool emmc_fastboot, image_t *image_stack,
767                            bool dcd_skip, uint8_t fuse_version,
768                            uint16_t sw_version, int ofd)
769 {
770         static imx_header_v3_t imx_header;
771         image_t *img_sp = image_stack;
772         int file_off;
773         uint8_t *tmp;
774         struct stat sbuf;
775         char *tmp_filename = NULL;
776         uint32_t size = 0;
777         uint32_t file_padding = 0;
778         int ret;
779
780         int container = -1;
781         int cont_img_count = 0; /* indexes to arrange the container */
782
783         memset((char *)&imx_header, 0, sizeof(imx_header_v3_t));
784
785         if (!image_stack) {
786                 fprintf(stderr, "Empty image stack ");
787                 exit(EXIT_FAILURE);
788         }
789
790         if (soc == QX)
791                 fprintf(stdout, "Platform:\ti.MX8QXP B0\n");
792         else if (soc == QM)
793                 fprintf(stdout, "Platform:\ti.MX8QM B0\n");
794
795         set_imx_hdr_v3(&imx_header, 0);
796         set_imx_hdr_v3(&imx_header, 1);
797
798         file_off = get_container_image_start_pos(image_stack, sector_size);
799         fprintf(stdout, "container image offset (aligned):%x\n", file_off);
800
801         /* step through image stack and generate the header */
802         img_sp = image_stack;
803
804         /* stop once we reach null terminator */
805         while (img_sp->option != NO_IMG) {
806                 switch (img_sp->option) {
807                 case AP:
808                 case M40:
809                 case M41:
810                 case SCFW:
811                 case DATA:
812                 case MSG_BLOCK:
813                         check_file(&sbuf, img_sp->filename);
814                         tmp_filename = img_sp->filename;
815                         set_image_array_entry(&imx_header.fhdr[container],
816                                               soc, img_sp, file_off,
817                                               ALIGN(sbuf.st_size, sector_size),
818                                               tmp_filename, dcd_skip);
819                         img_sp->src = file_off;
820
821                         file_off += ALIGN(sbuf.st_size, sector_size);
822                         cont_img_count++;
823                         break;
824
825                 case SECO:
826                         check_file(&sbuf, img_sp->filename);
827                         tmp_filename = img_sp->filename;
828                         set_image_array_entry(&imx_header.fhdr[container],
829                                               soc,
830                                               img_sp,
831                                               file_off,
832                                               sbuf.st_size,
833                                               tmp_filename, dcd_skip);
834                         img_sp->src = file_off;
835
836                         file_off += sbuf.st_size;
837                         cont_img_count++;
838                         break;
839
840                 case NEW_CONTAINER:
841                         container++;
842                         set_container(&imx_header.fhdr[container], sw_version,
843                                       CONTAINER_ALIGNMENT,
844                                       CONTAINER_FLAGS_DEFAULT,
845                                       fuse_version);
846                         /* reset img count when moving to new container */
847                         cont_img_count = 0;
848                         scfw_flags = 0;
849                         break;
850
851                 case APPEND:
852                         /*
853                          * nothing to do here, the container is appended
854                          * in the output
855                          */
856                         break;
857                 case FLAG:
858                         /*
859                          * override the flags for scfw in current container
860                          * mask off bottom 16 bits.
861                          */
862                         scfw_flags = img_sp->entry & 0xFFFF0000;
863                         break;
864                 case FILEOFF:
865                         if (file_off > img_sp->dst) {
866                                 fprintf(stderr, "FILEOFF address less than current file offset!!!\n");
867                                 exit(EXIT_FAILURE);
868                         }
869                         if (img_sp->dst != ALIGN(img_sp->dst, sector_size)) {
870                                 fprintf(stderr, "FILEOFF address is not aligned to sector size!!!\n");
871                                 exit(EXIT_FAILURE);
872                         }
873                         file_off = img_sp->dst;
874                         break;
875                 case PARTITION:
876                         /*
877                          * keep custom partition until next executable image
878                          * use a global var for default behaviour
879                          */
880                         custom_partition = img_sp->entry;
881                         break;
882                 default:
883                         fprintf(stderr, "unrecognized option in input stack (%d)\n", img_sp->option);
884                         exit(EXIT_FAILURE);
885                 }
886                 img_sp++; /* advance index */
887         }
888
889         /* Append container (if specified) */
890         img_sp = image_stack;
891         do {
892                 if (img_sp->option == APPEND) {
893                         copy_file(ofd, img_sp->filename, 0, 0);
894                         file_padding += FIRST_CONTAINER_HEADER_LENGTH;
895                 }
896                 img_sp++;
897         } while (img_sp->option != NO_IMG);
898
899         /* Add padding or skip appended container */
900         ret = lseek(ofd, file_padding, SEEK_SET);
901         if (ret < 0) {
902                 fprintf(stderr, "%s: lseek error %s\n",
903                         __func__, strerror(errno));
904                 exit(EXIT_FAILURE);
905         }
906
907         /* Note: Image offset are not contained in the image */
908         tmp = flatten_container_header(&imx_header, container + 1, &size,
909                                        file_padding);
910         /* Write image header */
911         if (write(ofd, tmp, size) != size) {
912                 fprintf(stderr, "error writing image hdr\n");
913                 exit(EXIT_FAILURE);
914         }
915
916         /* Clean-up memory used by the headers */
917         free(tmp);
918
919         /*
920          * step through the image stack again this time copying
921          * images to final bin, stop once we reach null terminator.
922          */
923         img_sp = image_stack;
924         while (img_sp->option != NO_IMG) {
925                 if (img_sp->option == M40 || img_sp->option == M41 ||
926                     img_sp->option == AP || img_sp->option == DATA ||
927                     img_sp->option == SCD || img_sp->option == SCFW ||
928                     img_sp->option == SECO || img_sp->option == MSG_BLOCK) {
929                         copy_file_aligned(ofd, img_sp->filename, img_sp->src,
930                                           sector_size);
931                 }
932                 img_sp++;
933         }
934
935         return 0;
936 }
937
938 int imx8image_copy_image(int outfd, struct image_tool_params *mparams)
939 {
940         image_t *img_sp = param_stack;
941
942         /*
943          * SECO FW is a container image, this is to calculate the
944          * 2nd container offset.
945          */
946         fprintf(stdout, "parsing %s\n", mparams->imagename);
947         parse_cfg_file(img_sp, mparams->imagename);
948
949         if (sector_size == 0) {
950                 fprintf(stderr, "Wrong sector size\n");
951                 exit(EXIT_FAILURE);
952         }
953
954         fprintf(stdout, "CONTAINER Sector size:\t%08x\n", sector_size);
955         fprintf(stdout, "CONTAINER FUSE VERSION:\t0x%02x\n", fuse_version);
956         fprintf(stdout, "CONTAINER SW VERSION:\t0x%04x\n", sw_version);
957
958         build_container(soc, sector_size, emmc_fastboot,
959                         img_sp, false, fuse_version, sw_version, outfd);
960
961         return 0;
962 }
963
964 /*
965  * imx8image parameters
966  */
967 U_BOOT_IMAGE_TYPE(
968         imx8image,
969         "NXP i.MX8 Boot Image support",
970         0,
971         NULL,
972         imx8image_check_params,
973         NULL,
974         imx8image_print_header,
975         imx8image_set_header,
976         NULL,
977         imx8image_check_image_types,
978         NULL,
979         NULL
980 );