]> git.sur5r.net Git - u-boot/blob - tools/mkimage.c
Gracefully handle 64-bit signed-extended 32-bit Load addresses
[u-boot] / tools / mkimage.c
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 = strtoull(*++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 = strtoull(*++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 (&params))
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(&params);
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, &params);
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(&params, 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, &params);
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, &params);
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 }