Merge branch 'u-boot-samsung/master' into 'u-boot-arm/master'
[platform/kernel/u-boot.git] / common / cmd_bootm.c
1 /*
2  * (C) Copyright 2000-2009
3  * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
4  *
5  * See file CREDITS for list of people who contributed to this
6  * project.
7  *
8  * This program is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU General Public License as
10  * published by the Free Software Foundation; either version 2 of
11  * the License, or (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
21  * MA 02111-1307 USA
22  */
23
24
25 /*
26  * Boot support
27  */
28 #include <common.h>
29 #include <watchdog.h>
30 #include <command.h>
31 #include <image.h>
32 #include <malloc.h>
33 #include <u-boot/zlib.h>
34 #include <bzlib.h>
35 #include <environment.h>
36 #include <lmb.h>
37 #include <linux/ctype.h>
38 #include <asm/byteorder.h>
39 #include <linux/compiler.h>
40
41 #if defined(CONFIG_CMD_USB)
42 #include <usb.h>
43 #endif
44
45 #ifdef CONFIG_SYS_HUSH_PARSER
46 #include <hush.h>
47 #endif
48
49 #if defined(CONFIG_OF_LIBFDT)
50 #include <fdt.h>
51 #include <libfdt.h>
52 #include <fdt_support.h>
53 #endif
54
55 #ifdef CONFIG_LZMA
56 #include <lzma/LzmaTypes.h>
57 #include <lzma/LzmaDec.h>
58 #include <lzma/LzmaTools.h>
59 #endif /* CONFIG_LZMA */
60
61 #ifdef CONFIG_LZO
62 #include <linux/lzo.h>
63 #endif /* CONFIG_LZO */
64
65 DECLARE_GLOBAL_DATA_PTR;
66
67 #ifndef CONFIG_SYS_BOOTM_LEN
68 #define CONFIG_SYS_BOOTM_LEN    0x800000        /* use 8MByte as default max gunzip size */
69 #endif
70
71 #ifdef CONFIG_BZIP2
72 extern void bz_internal_error(int);
73 #endif
74
75 #if defined(CONFIG_CMD_IMI)
76 static int image_info(unsigned long addr);
77 #endif
78
79 #if defined(CONFIG_CMD_IMLS)
80 #include <flash.h>
81 #include <mtd/cfi_flash.h>
82 extern flash_info_t flash_info[]; /* info for FLASH chips */
83 static int do_imls(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]);
84 #endif
85
86 #ifdef CONFIG_SILENT_CONSOLE
87 static void fixup_silent_linux(void);
88 #endif
89
90 static image_header_t *image_get_kernel(ulong img_addr, int verify);
91 #if defined(CONFIG_FIT)
92 static int fit_check_kernel(const void *fit, int os_noffset, int verify);
93 #endif
94
95 static void *boot_get_kernel(cmd_tbl_t *cmdtp, int flag, int argc,
96                                 char * const argv[], bootm_headers_t *images,
97                                 ulong *os_data, ulong *os_len);
98
99 /*
100  *  Continue booting an OS image; caller already has:
101  *  - copied image header to global variable `header'
102  *  - checked header magic number, checksums (both header & image),
103  *  - verified image architecture (PPC) and type (KERNEL or MULTI),
104  *  - loaded (first part of) image to header load address,
105  *  - disabled interrupts.
106  */
107 typedef int boot_os_fn(int flag, int argc, char * const argv[],
108                         bootm_headers_t *images); /* pointers to os/initrd/fdt */
109
110 #ifdef CONFIG_BOOTM_LINUX
111 extern boot_os_fn do_bootm_linux;
112 #endif
113 #ifdef CONFIG_BOOTM_NETBSD
114 static boot_os_fn do_bootm_netbsd;
115 #endif
116 #if defined(CONFIG_LYNXKDI)
117 static boot_os_fn do_bootm_lynxkdi;
118 extern void lynxkdi_boot(image_header_t *);
119 #endif
120 #ifdef CONFIG_BOOTM_RTEMS
121 static boot_os_fn do_bootm_rtems;
122 #endif
123 #if defined(CONFIG_BOOTM_OSE)
124 static boot_os_fn do_bootm_ose;
125 #endif
126 #if defined(CONFIG_CMD_ELF)
127 static boot_os_fn do_bootm_vxworks;
128 static boot_os_fn do_bootm_qnxelf;
129 int do_bootvx(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]);
130 int do_bootelf(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]);
131 #endif
132 #if defined(CONFIG_INTEGRITY)
133 static boot_os_fn do_bootm_integrity;
134 #endif
135
136 static boot_os_fn *boot_os[] = {
137 #ifdef CONFIG_BOOTM_LINUX
138         [IH_OS_LINUX] = do_bootm_linux,
139 #endif
140 #ifdef CONFIG_BOOTM_NETBSD
141         [IH_OS_NETBSD] = do_bootm_netbsd,
142 #endif
143 #ifdef CONFIG_LYNXKDI
144         [IH_OS_LYNXOS] = do_bootm_lynxkdi,
145 #endif
146 #ifdef CONFIG_BOOTM_RTEMS
147         [IH_OS_RTEMS] = do_bootm_rtems,
148 #endif
149 #if defined(CONFIG_BOOTM_OSE)
150         [IH_OS_OSE] = do_bootm_ose,
151 #endif
152 #if defined(CONFIG_CMD_ELF)
153         [IH_OS_VXWORKS] = do_bootm_vxworks,
154         [IH_OS_QNX] = do_bootm_qnxelf,
155 #endif
156 #ifdef CONFIG_INTEGRITY
157         [IH_OS_INTEGRITY] = do_bootm_integrity,
158 #endif
159 };
160
161 bootm_headers_t images;         /* pointers to os/initrd/fdt images */
162
163 /* Allow for arch specific config before we boot */
164 static void __arch_preboot_os(void)
165 {
166         /* please define platform specific arch_preboot_os() */
167 }
168 void arch_preboot_os(void) __attribute__((weak, alias("__arch_preboot_os")));
169
170 #define IH_INITRD_ARCH IH_ARCH_DEFAULT
171
172 #ifdef CONFIG_LMB
173 static void boot_start_lmb(bootm_headers_t *images)
174 {
175         ulong           mem_start;
176         phys_size_t     mem_size;
177
178         lmb_init(&images->lmb);
179
180         mem_start = getenv_bootm_low();
181         mem_size = getenv_bootm_size();
182
183         lmb_add(&images->lmb, (phys_addr_t)mem_start, mem_size);
184
185         arch_lmb_reserve(&images->lmb);
186         board_lmb_reserve(&images->lmb);
187 }
188 #else
189 #define lmb_reserve(lmb, base, size)
190 static inline void boot_start_lmb(bootm_headers_t *images) { }
191 #endif
192
193 static int bootm_start(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
194 {
195         void            *os_hdr;
196         int             ret;
197
198         memset((void *)&images, 0, sizeof(images));
199         images.verify = getenv_yesno("verify");
200
201         boot_start_lmb(&images);
202
203         bootstage_mark_name(BOOTSTAGE_ID_BOOTM_START, "bootm_start");
204
205         /* get kernel image header, start address and length */
206         os_hdr = boot_get_kernel(cmdtp, flag, argc, argv,
207                         &images, &images.os.image_start, &images.os.image_len);
208         if (images.os.image_len == 0) {
209                 puts("ERROR: can't get kernel image!\n");
210                 return 1;
211         }
212
213         /* get image parameters */
214         switch (genimg_get_format(os_hdr)) {
215         case IMAGE_FORMAT_LEGACY:
216                 images.os.type = image_get_type(os_hdr);
217                 images.os.comp = image_get_comp(os_hdr);
218                 images.os.os = image_get_os(os_hdr);
219
220                 images.os.end = image_get_image_end(os_hdr);
221                 images.os.load = image_get_load(os_hdr);
222                 break;
223 #if defined(CONFIG_FIT)
224         case IMAGE_FORMAT_FIT:
225                 if (fit_image_get_type(images.fit_hdr_os,
226                                         images.fit_noffset_os, &images.os.type)) {
227                         puts("Can't get image type!\n");
228                         bootstage_error(BOOTSTAGE_ID_FIT_TYPE);
229                         return 1;
230                 }
231
232                 if (fit_image_get_comp(images.fit_hdr_os,
233                                         images.fit_noffset_os, &images.os.comp)) {
234                         puts("Can't get image compression!\n");
235                         bootstage_error(BOOTSTAGE_ID_FIT_COMPRESSION);
236                         return 1;
237                 }
238
239                 if (fit_image_get_os(images.fit_hdr_os,
240                                         images.fit_noffset_os, &images.os.os)) {
241                         puts("Can't get image OS!\n");
242                         bootstage_error(BOOTSTAGE_ID_FIT_OS);
243                         return 1;
244                 }
245
246                 images.os.end = fit_get_end(images.fit_hdr_os);
247
248                 if (fit_image_get_load(images.fit_hdr_os, images.fit_noffset_os,
249                                         &images.os.load)) {
250                         puts("Can't get image load address!\n");
251                         bootstage_error(BOOTSTAGE_ID_FIT_LOADADDR);
252                         return 1;
253                 }
254                 break;
255 #endif
256         default:
257                 puts("ERROR: unknown image format type!\n");
258                 return 1;
259         }
260
261         /* find kernel entry point */
262         if (images.legacy_hdr_valid) {
263                 images.ep = image_get_ep(&images.legacy_hdr_os_copy);
264 #if defined(CONFIG_FIT)
265         } else if (images.fit_uname_os) {
266                 ret = fit_image_get_entry(images.fit_hdr_os,
267                                 images.fit_noffset_os, &images.ep);
268                 if (ret) {
269                         puts("Can't get entry point property!\n");
270                         return 1;
271                 }
272 #endif
273         } else {
274                 puts("Could not find kernel entry point!\n");
275                 return 1;
276         }
277
278         if (images.os.type == IH_TYPE_KERNEL_NOLOAD) {
279                 images.os.load = images.os.image_start;
280                 images.ep += images.os.load;
281         }
282
283         if (((images.os.type == IH_TYPE_KERNEL) ||
284              (images.os.type == IH_TYPE_KERNEL_NOLOAD) ||
285              (images.os.type == IH_TYPE_MULTI)) &&
286             (images.os.os == IH_OS_LINUX)) {
287                 /* find ramdisk */
288                 ret = boot_get_ramdisk(argc, argv, &images, IH_INITRD_ARCH,
289                                 &images.rd_start, &images.rd_end);
290                 if (ret) {
291                         puts("Ramdisk image is corrupt or invalid\n");
292                         return 1;
293                 }
294
295 #if defined(CONFIG_OF_LIBFDT)
296                 /* find flattened device tree */
297                 ret = boot_get_fdt(flag, argc, argv, &images,
298                                    &images.ft_addr, &images.ft_len);
299                 if (ret) {
300                         puts("Could not find a valid device tree\n");
301                         return 1;
302                 }
303
304                 set_working_fdt_addr(images.ft_addr);
305 #endif
306         }
307
308         images.os.start = (ulong)os_hdr;
309         images.state = BOOTM_STATE_START;
310
311         return 0;
312 }
313
314 #define BOOTM_ERR_RESET         -1
315 #define BOOTM_ERR_OVERLAP       -2
316 #define BOOTM_ERR_UNIMPLEMENTED -3
317 static int bootm_load_os(image_info_t os, ulong *load_end, int boot_progress)
318 {
319         uint8_t comp = os.comp;
320         ulong load = os.load;
321         ulong blob_start = os.start;
322         ulong blob_end = os.end;
323         ulong image_start = os.image_start;
324         ulong image_len = os.image_len;
325         __maybe_unused uint unc_len = CONFIG_SYS_BOOTM_LEN;
326         int no_overlap = 0;
327 #if defined(CONFIG_LZMA) || defined(CONFIG_LZO)
328         int ret;
329 #endif /* defined(CONFIG_LZMA) || defined(CONFIG_LZO) */
330
331         const char *type_name = genimg_get_type_name(os.type);
332
333         switch (comp) {
334         case IH_COMP_NONE:
335                 if (load == blob_start || load == image_start) {
336                         printf("   XIP %s ... ", type_name);
337                         no_overlap = 1;
338                 } else {
339                         printf("   Loading %s ... ", type_name);
340                         memmove_wd((void *)load, (void *)image_start,
341                                         image_len, CHUNKSZ);
342                 }
343                 *load_end = load + image_len;
344                 puts("OK\n");
345                 break;
346 #ifdef CONFIG_GZIP
347         case IH_COMP_GZIP:
348                 printf("   Uncompressing %s ... ", type_name);
349                 if (gunzip((void *)load, unc_len,
350                                 (uchar *)image_start, &image_len) != 0) {
351                         puts("GUNZIP: uncompress, out-of-mem or overwrite "
352                                 "error - must RESET board to recover\n");
353                         if (boot_progress)
354                                 bootstage_error(BOOTSTAGE_ID_DECOMP_IMAGE);
355                         return BOOTM_ERR_RESET;
356                 }
357
358                 *load_end = load + image_len;
359                 break;
360 #endif /* CONFIG_GZIP */
361 #ifdef CONFIG_BZIP2
362         case IH_COMP_BZIP2:
363                 printf("   Uncompressing %s ... ", type_name);
364                 /*
365                  * If we've got less than 4 MB of malloc() space,
366                  * use slower decompression algorithm which requires
367                  * at most 2300 KB of memory.
368                  */
369                 int i = BZ2_bzBuffToBuffDecompress((char *)load,
370                                         &unc_len, (char *)image_start, image_len,
371                                         CONFIG_SYS_MALLOC_LEN < (4096 * 1024), 0);
372                 if (i != BZ_OK) {
373                         printf("BUNZIP2: uncompress or overwrite error %d "
374                                 "- must RESET board to recover\n", i);
375                         if (boot_progress)
376                                 bootstage_error(BOOTSTAGE_ID_DECOMP_IMAGE);
377                         return BOOTM_ERR_RESET;
378                 }
379
380                 *load_end = load + unc_len;
381                 break;
382 #endif /* CONFIG_BZIP2 */
383 #ifdef CONFIG_LZMA
384         case IH_COMP_LZMA: {
385                 SizeT lzma_len = unc_len;
386                 printf("   Uncompressing %s ... ", type_name);
387
388                 ret = lzmaBuffToBuffDecompress(
389                         (unsigned char *)load, &lzma_len,
390                         (unsigned char *)image_start, image_len);
391                 unc_len = lzma_len;
392                 if (ret != SZ_OK) {
393                         printf("LZMA: uncompress or overwrite error %d "
394                                 "- must RESET board to recover\n", ret);
395                         bootstage_error(BOOTSTAGE_ID_DECOMP_IMAGE);
396                         return BOOTM_ERR_RESET;
397                 }
398                 *load_end = load + unc_len;
399                 break;
400         }
401 #endif /* CONFIG_LZMA */
402 #ifdef CONFIG_LZO
403         case IH_COMP_LZO:
404                 printf("   Uncompressing %s ... ", type_name);
405
406                 ret = lzop_decompress((const unsigned char *)image_start,
407                                           image_len, (unsigned char *)load,
408                                           &unc_len);
409                 if (ret != LZO_E_OK) {
410                         printf("LZO: uncompress or overwrite error %d "
411                               "- must RESET board to recover\n", ret);
412                         if (boot_progress)
413                                 bootstage_error(BOOTSTAGE_ID_DECOMP_IMAGE);
414                         return BOOTM_ERR_RESET;
415                 }
416
417                 *load_end = load + unc_len;
418                 break;
419 #endif /* CONFIG_LZO */
420         default:
421                 printf("Unimplemented compression type %d\n", comp);
422                 return BOOTM_ERR_UNIMPLEMENTED;
423         }
424
425         flush_cache(load, (*load_end - load) * sizeof(ulong));
426
427         puts("OK\n");
428         debug("   kernel loaded at 0x%08lx, end = 0x%08lx\n", load, *load_end);
429         bootstage_mark(BOOTSTAGE_ID_KERNEL_LOADED);
430
431         if (!no_overlap && (load < blob_end) && (*load_end > blob_start)) {
432                 debug("images.os.start = 0x%lX, images.os.end = 0x%lx\n",
433                         blob_start, blob_end);
434                 debug("images.os.load = 0x%lx, load_end = 0x%lx\n", load,
435                         *load_end);
436
437                 return BOOTM_ERR_OVERLAP;
438         }
439
440         return 0;
441 }
442
443 static int bootm_start_standalone(ulong iflag, int argc, char * const argv[])
444 {
445         char  *s;
446         int   (*appl)(int, char * const []);
447
448         /* Don't start if "autostart" is set to "no" */
449         if (((s = getenv("autostart")) != NULL) && (strcmp(s, "no") == 0)) {
450                 char buf[32];
451                 sprintf(buf, "%lX", images.os.image_len);
452                 setenv("filesize", buf);
453                 return 0;
454         }
455         appl = (int (*)(int, char * const []))(ulong)ntohl(images.ep);
456         (*appl)(argc-1, &argv[1]);
457         return 0;
458 }
459
460 /* we overload the cmd field with our state machine info instead of a
461  * function pointer */
462 static cmd_tbl_t cmd_bootm_sub[] = {
463         U_BOOT_CMD_MKENT(start, 0, 1, (void *)BOOTM_STATE_START, "", ""),
464         U_BOOT_CMD_MKENT(loados, 0, 1, (void *)BOOTM_STATE_LOADOS, "", ""),
465 #ifdef CONFIG_SYS_BOOT_RAMDISK_HIGH
466         U_BOOT_CMD_MKENT(ramdisk, 0, 1, (void *)BOOTM_STATE_RAMDISK, "", ""),
467 #endif
468 #ifdef CONFIG_OF_LIBFDT
469         U_BOOT_CMD_MKENT(fdt, 0, 1, (void *)BOOTM_STATE_FDT, "", ""),
470 #endif
471         U_BOOT_CMD_MKENT(cmdline, 0, 1, (void *)BOOTM_STATE_OS_CMDLINE, "", ""),
472         U_BOOT_CMD_MKENT(bdt, 0, 1, (void *)BOOTM_STATE_OS_BD_T, "", ""),
473         U_BOOT_CMD_MKENT(prep, 0, 1, (void *)BOOTM_STATE_OS_PREP, "", ""),
474         U_BOOT_CMD_MKENT(go, 0, 1, (void *)BOOTM_STATE_OS_GO, "", ""),
475 };
476
477 static int do_bootm_subcommand(cmd_tbl_t *cmdtp, int flag, int argc,
478                         char * const argv[])
479 {
480         int ret = 0;
481         long state;
482         cmd_tbl_t *c;
483         boot_os_fn *boot_fn;
484
485         c = find_cmd_tbl(argv[1], &cmd_bootm_sub[0], ARRAY_SIZE(cmd_bootm_sub));
486
487         if (c) {
488                 state = (long)c->cmd;
489
490                 /* treat start special since it resets the state machine */
491                 if (state == BOOTM_STATE_START) {
492                         argc--;
493                         argv++;
494                         return bootm_start(cmdtp, flag, argc, argv);
495                 }
496         } else {
497                 /* Unrecognized command */
498                 return CMD_RET_USAGE;
499         }
500
501         if (images.state >= state) {
502                 printf("Trying to execute a command out of order\n");
503                 return CMD_RET_USAGE;
504         }
505
506         images.state |= state;
507         boot_fn = boot_os[images.os.os];
508
509         switch (state) {
510                 ulong load_end;
511                 case BOOTM_STATE_START:
512                         /* should never occur */
513                         break;
514                 case BOOTM_STATE_LOADOS:
515                         ret = bootm_load_os(images.os, &load_end, 0);
516                         if (ret)
517                                 return ret;
518
519                         lmb_reserve(&images.lmb, images.os.load,
520                                         (load_end - images.os.load));
521                         break;
522 #ifdef CONFIG_SYS_BOOT_RAMDISK_HIGH
523                 case BOOTM_STATE_RAMDISK:
524                 {
525                         ulong rd_len = images.rd_end - images.rd_start;
526                         char str[17];
527
528                         ret = boot_ramdisk_high(&images.lmb, images.rd_start,
529                                 rd_len, &images.initrd_start, &images.initrd_end);
530                         if (ret)
531                                 return ret;
532
533                         sprintf(str, "%lx", images.initrd_start);
534                         setenv("initrd_start", str);
535                         sprintf(str, "%lx", images.initrd_end);
536                         setenv("initrd_end", str);
537                 }
538                         break;
539 #endif
540 #if defined(CONFIG_OF_LIBFDT) && defined(CONFIG_LMB)
541                 case BOOTM_STATE_FDT:
542                 {
543                         boot_fdt_add_mem_rsv_regions(&images.lmb,
544                                                      images.ft_addr);
545                         ret = boot_relocate_fdt(&images.lmb,
546                                 &images.ft_addr, &images.ft_len);
547                         break;
548                 }
549 #endif
550                 case BOOTM_STATE_OS_CMDLINE:
551                         ret = boot_fn(BOOTM_STATE_OS_CMDLINE, argc, argv, &images);
552                         if (ret)
553                                 printf("cmdline subcommand not supported\n");
554                         break;
555                 case BOOTM_STATE_OS_BD_T:
556                         ret = boot_fn(BOOTM_STATE_OS_BD_T, argc, argv, &images);
557                         if (ret)
558                                 printf("bdt subcommand not supported\n");
559                         break;
560                 case BOOTM_STATE_OS_PREP:
561                         ret = boot_fn(BOOTM_STATE_OS_PREP, argc, argv, &images);
562                         if (ret)
563                                 printf("prep subcommand not supported\n");
564                         break;
565                 case BOOTM_STATE_OS_GO:
566                         disable_interrupts();
567 #ifdef CONFIG_NETCONSOLE
568                         /*
569                          * Stop the ethernet stack if NetConsole could have
570                          * left it up
571                          */
572                         eth_halt();
573 #endif
574                         arch_preboot_os();
575                         boot_fn(BOOTM_STATE_OS_GO, argc, argv, &images);
576                         break;
577         }
578
579         return ret;
580 }
581
582 /*******************************************************************/
583 /* bootm - boot application image from image in memory */
584 /*******************************************************************/
585
586 int do_bootm(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
587 {
588         ulong           iflag;
589         ulong           load_end = 0;
590         int             ret;
591         boot_os_fn      *boot_fn;
592 #ifdef CONFIG_NEEDS_MANUAL_RELOC
593         static int relocated = 0;
594
595         if (!relocated) {
596                 int i;
597
598                 /* relocate boot function table */
599                 for (i = 0; i < ARRAY_SIZE(boot_os); i++)
600                         if (boot_os[i] != NULL)
601                                 boot_os[i] += gd->reloc_off;
602
603                 /* relocate names of sub-command table */
604                 for (i = 0; i < ARRAY_SIZE(cmd_bootm_sub); i++)
605                         cmd_bootm_sub[i].name += gd->reloc_off;
606
607                 relocated = 1;
608         }
609 #endif
610
611         /* determine if we have a sub command */
612         if (argc > 1) {
613                 char *endp;
614
615                 simple_strtoul(argv[1], &endp, 16);
616                 /* endp pointing to NULL means that argv[1] was just a
617                  * valid number, pass it along to the normal bootm processing
618                  *
619                  * If endp is ':' or '#' assume a FIT identifier so pass
620                  * along for normal processing.
621                  *
622                  * Right now we assume the first arg should never be '-'
623                  */
624                 if ((*endp != 0) && (*endp != ':') && (*endp != '#'))
625                         return do_bootm_subcommand(cmdtp, flag, argc, argv);
626         }
627
628         if (bootm_start(cmdtp, flag, argc, argv))
629                 return 1;
630
631         /*
632          * We have reached the point of no return: we are going to
633          * overwrite all exception vector code, so we cannot easily
634          * recover from any failures any more...
635          */
636         iflag = disable_interrupts();
637
638 #ifdef CONFIG_NETCONSOLE
639         /* Stop the ethernet stack if NetConsole could have left it up */
640         eth_halt();
641 #endif
642
643 #if defined(CONFIG_CMD_USB)
644         /*
645          * turn off USB to prevent the host controller from writing to the
646          * SDRAM while Linux is booting. This could happen (at least for OHCI
647          * controller), because the HCCA (Host Controller Communication Area)
648          * lies within the SDRAM and the host controller writes continously to
649          * this area (as busmaster!). The HccaFrameNumber is for example
650          * updated every 1 ms within the HCCA structure in SDRAM! For more
651          * details see the OpenHCI specification.
652          */
653         usb_stop();
654 #endif
655
656         ret = bootm_load_os(images.os, &load_end, 1);
657
658         if (ret < 0) {
659                 if (ret == BOOTM_ERR_RESET)
660                         do_reset(cmdtp, flag, argc, argv);
661                 if (ret == BOOTM_ERR_OVERLAP) {
662                         if (images.legacy_hdr_valid) {
663                                 image_header_t *hdr;
664                                 hdr = &images.legacy_hdr_os_copy;
665                                 if (image_get_type(hdr) == IH_TYPE_MULTI)
666                                         puts("WARNING: legacy format multi "
667                                                 "component image "
668                                                 "overwritten\n");
669                         } else {
670                                 puts("ERROR: new format image overwritten - "
671                                         "must RESET the board to recover\n");
672                                 bootstage_error(BOOTSTAGE_ID_OVERWRITTEN);
673                                 do_reset(cmdtp, flag, argc, argv);
674                         }
675                 }
676                 if (ret == BOOTM_ERR_UNIMPLEMENTED) {
677                         if (iflag)
678                                 enable_interrupts();
679                         bootstage_error(BOOTSTAGE_ID_DECOMP_UNIMPL);
680                         return 1;
681                 }
682         }
683
684         lmb_reserve(&images.lmb, images.os.load, (load_end - images.os.load));
685
686         if (images.os.type == IH_TYPE_STANDALONE) {
687                 if (iflag)
688                         enable_interrupts();
689                 /* This may return when 'autostart' is 'no' */
690                 bootm_start_standalone(iflag, argc, argv);
691                 return 0;
692         }
693
694         bootstage_mark(BOOTSTAGE_ID_CHECK_BOOT_OS);
695
696 #ifdef CONFIG_SILENT_CONSOLE
697         if (images.os.os == IH_OS_LINUX)
698                 fixup_silent_linux();
699 #endif
700
701         boot_fn = boot_os[images.os.os];
702
703         if (boot_fn == NULL) {
704                 if (iflag)
705                         enable_interrupts();
706                 printf("ERROR: booting os '%s' (%d) is not supported\n",
707                         genimg_get_os_name(images.os.os), images.os.os);
708                 bootstage_error(BOOTSTAGE_ID_CHECK_BOOT_OS);
709                 return 1;
710         }
711
712         arch_preboot_os();
713
714         boot_fn(0, argc, argv, &images);
715
716         bootstage_error(BOOTSTAGE_ID_BOOT_OS_RETURNED);
717 #ifdef DEBUG
718         puts("\n## Control returned to monitor - resetting...\n");
719 #endif
720         do_reset(cmdtp, flag, argc, argv);
721
722         return 1;
723 }
724
725 int bootm_maybe_autostart(cmd_tbl_t *cmdtp, const char *cmd)
726 {
727         const char *ep = getenv("autostart");
728
729         if (ep && !strcmp(ep, "yes")) {
730                 char *local_args[2];
731                 local_args[0] = (char *)cmd;
732                 local_args[1] = NULL;
733                 printf("Automatic boot of image at addr 0x%08lX ...\n", load_addr);
734                 return do_bootm(cmdtp, 0, 1, local_args);
735         }
736
737         return 0;
738 }
739
740 /**
741  * image_get_kernel - verify legacy format kernel image
742  * @img_addr: in RAM address of the legacy format image to be verified
743  * @verify: data CRC verification flag
744  *
745  * image_get_kernel() verifies legacy image integrity and returns pointer to
746  * legacy image header if image verification was completed successfully.
747  *
748  * returns:
749  *     pointer to a legacy image header if valid image was found
750  *     otherwise return NULL
751  */
752 static image_header_t *image_get_kernel(ulong img_addr, int verify)
753 {
754         image_header_t *hdr = (image_header_t *)img_addr;
755
756         if (!image_check_magic(hdr)) {
757                 puts("Bad Magic Number\n");
758                 bootstage_error(BOOTSTAGE_ID_CHECK_MAGIC);
759                 return NULL;
760         }
761         bootstage_mark(BOOTSTAGE_ID_CHECK_HEADER);
762
763         if (!image_check_hcrc(hdr)) {
764                 puts("Bad Header Checksum\n");
765                 bootstage_error(BOOTSTAGE_ID_CHECK_HEADER);
766                 return NULL;
767         }
768
769         bootstage_mark(BOOTSTAGE_ID_CHECK_CHECKSUM);
770         image_print_contents(hdr);
771
772         if (verify) {
773                 puts("   Verifying Checksum ... ");
774                 if (!image_check_dcrc(hdr)) {
775                         printf("Bad Data CRC\n");
776                         bootstage_error(BOOTSTAGE_ID_CHECK_CHECKSUM);
777                         return NULL;
778                 }
779                 puts("OK\n");
780         }
781         bootstage_mark(BOOTSTAGE_ID_CHECK_ARCH);
782
783         if (!image_check_target_arch(hdr)) {
784                 printf("Unsupported Architecture 0x%x\n", image_get_arch(hdr));
785                 bootstage_error(BOOTSTAGE_ID_CHECK_ARCH);
786                 return NULL;
787         }
788         return hdr;
789 }
790
791 /**
792  * fit_check_kernel - verify FIT format kernel subimage
793  * @fit_hdr: pointer to the FIT image header
794  * os_noffset: kernel subimage node offset within FIT image
795  * @verify: data CRC verification flag
796  *
797  * fit_check_kernel() verifies integrity of the kernel subimage and from
798  * specified FIT image.
799  *
800  * returns:
801  *     1, on success
802  *     0, on failure
803  */
804 #if defined(CONFIG_FIT)
805 static int fit_check_kernel(const void *fit, int os_noffset, int verify)
806 {
807         fit_image_print(fit, os_noffset, "   ");
808
809         if (verify) {
810                 puts("   Verifying Hash Integrity ... ");
811                 if (!fit_image_check_hashes(fit, os_noffset)) {
812                         puts("Bad Data Hash\n");
813                         bootstage_error(BOOTSTAGE_ID_FIT_CHECK_HASH);
814                         return 0;
815                 }
816                 puts("OK\n");
817         }
818         bootstage_mark(BOOTSTAGE_ID_FIT_CHECK_ARCH);
819
820         if (!fit_image_check_target_arch(fit, os_noffset)) {
821                 puts("Unsupported Architecture\n");
822                 bootstage_error(BOOTSTAGE_ID_FIT_CHECK_ARCH);
823                 return 0;
824         }
825
826         bootstage_mark(BOOTSTAGE_ID_FIT_CHECK_KERNEL);
827         if (!fit_image_check_type(fit, os_noffset, IH_TYPE_KERNEL) &&
828             !fit_image_check_type(fit, os_noffset, IH_TYPE_KERNEL_NOLOAD)) {
829                 puts("Not a kernel image\n");
830                 bootstage_error(BOOTSTAGE_ID_FIT_CHECK_KERNEL);
831                 return 0;
832         }
833
834         bootstage_mark(BOOTSTAGE_ID_FIT_CHECKED);
835         return 1;
836 }
837 #endif /* CONFIG_FIT */
838
839 /**
840  * boot_get_kernel - find kernel image
841  * @os_data: pointer to a ulong variable, will hold os data start address
842  * @os_len: pointer to a ulong variable, will hold os data length
843  *
844  * boot_get_kernel() tries to find a kernel image, verifies its integrity
845  * and locates kernel data.
846  *
847  * returns:
848  *     pointer to image header if valid image was found, plus kernel start
849  *     address and length, otherwise NULL
850  */
851 static void *boot_get_kernel(cmd_tbl_t *cmdtp, int flag, int argc,
852                 char * const argv[], bootm_headers_t *images, ulong *os_data,
853                 ulong *os_len)
854 {
855         image_header_t  *hdr;
856         ulong           img_addr;
857 #if defined(CONFIG_FIT)
858         void            *fit_hdr;
859         const char      *fit_uname_config = NULL;
860         const char      *fit_uname_kernel = NULL;
861         const void      *data;
862         size_t          len;
863         int             cfg_noffset;
864         int             os_noffset;
865 #endif
866
867         /* find out kernel image address */
868         if (argc < 2) {
869                 img_addr = load_addr;
870                 debug("*  kernel: default image load address = 0x%08lx\n",
871                                 load_addr);
872 #if defined(CONFIG_FIT)
873         } else if (fit_parse_conf(argv[1], load_addr, &img_addr,
874                                                         &fit_uname_config)) {
875                 debug("*  kernel: config '%s' from image at 0x%08lx\n",
876                                 fit_uname_config, img_addr);
877         } else if (fit_parse_subimage(argv[1], load_addr, &img_addr,
878                                                         &fit_uname_kernel)) {
879                 debug("*  kernel: subimage '%s' from image at 0x%08lx\n",
880                                 fit_uname_kernel, img_addr);
881 #endif
882         } else {
883                 img_addr = simple_strtoul(argv[1], NULL, 16);
884                 debug("*  kernel: cmdline image address = 0x%08lx\n", img_addr);
885         }
886
887         bootstage_mark(BOOTSTAGE_ID_CHECK_MAGIC);
888
889         /* copy from dataflash if needed */
890         img_addr = genimg_get_image(img_addr);
891
892         /* check image type, for FIT images get FIT kernel node */
893         *os_data = *os_len = 0;
894         switch (genimg_get_format((void *)img_addr)) {
895         case IMAGE_FORMAT_LEGACY:
896                 printf("## Booting kernel from Legacy Image at %08lx ...\n",
897                                 img_addr);
898                 hdr = image_get_kernel(img_addr, images->verify);
899                 if (!hdr)
900                         return NULL;
901                 bootstage_mark(BOOTSTAGE_ID_CHECK_IMAGETYPE);
902
903                 /* get os_data and os_len */
904                 switch (image_get_type(hdr)) {
905                 case IH_TYPE_KERNEL:
906                 case IH_TYPE_KERNEL_NOLOAD:
907                         *os_data = image_get_data(hdr);
908                         *os_len = image_get_data_size(hdr);
909                         break;
910                 case IH_TYPE_MULTI:
911                         image_multi_getimg(hdr, 0, os_data, os_len);
912                         break;
913                 case IH_TYPE_STANDALONE:
914                         *os_data = image_get_data(hdr);
915                         *os_len = image_get_data_size(hdr);
916                         break;
917                 default:
918                         printf("Wrong Image Type for %s command\n",
919                                 cmdtp->name);
920                         bootstage_error(BOOTSTAGE_ID_CHECK_IMAGETYPE);
921                         return NULL;
922                 }
923
924                 /*
925                  * copy image header to allow for image overwrites during
926                  * kernel decompression.
927                  */
928                 memmove(&images->legacy_hdr_os_copy, hdr,
929                         sizeof(image_header_t));
930
931                 /* save pointer to image header */
932                 images->legacy_hdr_os = hdr;
933
934                 images->legacy_hdr_valid = 1;
935                 bootstage_mark(BOOTSTAGE_ID_DECOMP_IMAGE);
936                 break;
937 #if defined(CONFIG_FIT)
938         case IMAGE_FORMAT_FIT:
939                 fit_hdr = (void *)img_addr;
940                 printf("## Booting kernel from FIT Image at %08lx ...\n",
941                                 img_addr);
942
943                 if (!fit_check_format(fit_hdr)) {
944                         puts("Bad FIT kernel image format!\n");
945                         bootstage_error(BOOTSTAGE_ID_FIT_FORMAT);
946                         return NULL;
947                 }
948                 bootstage_mark(BOOTSTAGE_ID_FIT_FORMAT);
949
950                 if (!fit_uname_kernel) {
951                         /*
952                          * no kernel image node unit name, try to get config
953                          * node first. If config unit node name is NULL
954                          * fit_conf_get_node() will try to find default config
955                          * node
956                          */
957                         bootstage_mark(BOOTSTAGE_ID_FIT_NO_UNIT_NAME);
958 #ifdef CONFIG_FIT_BEST_MATCH
959                         if (fit_uname_config)
960                                 cfg_noffset =
961                                         fit_conf_get_node(fit_hdr,
962                                                           fit_uname_config);
963                         else
964                                 cfg_noffset =
965                                         fit_conf_find_compat(fit_hdr,
966                                                              gd->fdt_blob);
967 #else
968                         cfg_noffset = fit_conf_get_node(fit_hdr,
969                                                         fit_uname_config);
970 #endif
971                         if (cfg_noffset < 0) {
972                                 bootstage_error(BOOTSTAGE_ID_FIT_NO_UNIT_NAME);
973                                 return NULL;
974                         }
975                         /* save configuration uname provided in the first
976                          * bootm argument
977                          */
978                         images->fit_uname_cfg = fdt_get_name(fit_hdr,
979                                                                 cfg_noffset,
980                                                                 NULL);
981                         printf("   Using '%s' configuration\n",
982                                 images->fit_uname_cfg);
983                         bootstage_mark(BOOTSTAGE_ID_FIT_CONFIG);
984
985                         os_noffset = fit_conf_get_kernel_node(fit_hdr,
986                                                                 cfg_noffset);
987                         fit_uname_kernel = fit_get_name(fit_hdr, os_noffset,
988                                                         NULL);
989                 } else {
990                         /* get kernel component image node offset */
991                         bootstage_mark(BOOTSTAGE_ID_FIT_UNIT_NAME);
992                         os_noffset = fit_image_get_node(fit_hdr,
993                                                         fit_uname_kernel);
994                 }
995                 if (os_noffset < 0) {
996                         bootstage_error(BOOTSTAGE_ID_FIT_CONFIG);
997                         return NULL;
998                 }
999
1000                 printf("   Trying '%s' kernel subimage\n", fit_uname_kernel);
1001
1002                 bootstage_mark(BOOTSTAGE_ID_FIT_CHECK_SUBIMAGE);
1003                 if (!fit_check_kernel(fit_hdr, os_noffset, images->verify))
1004                         return NULL;
1005
1006                 /* get kernel image data address and length */
1007                 if (fit_image_get_data(fit_hdr, os_noffset, &data, &len)) {
1008                         puts("Could not find kernel subimage data!\n");
1009                         bootstage_error(BOOTSTAGE_ID_FIT_KERNEL_INFO_ERR);
1010                         return NULL;
1011                 }
1012                 bootstage_mark(BOOTSTAGE_ID_FIT_KERNEL_INFO);
1013
1014                 *os_len = len;
1015                 *os_data = (ulong)data;
1016                 images->fit_hdr_os = fit_hdr;
1017                 images->fit_uname_os = fit_uname_kernel;
1018                 images->fit_noffset_os = os_noffset;
1019                 break;
1020 #endif
1021         default:
1022                 printf("Wrong Image Format for %s command\n", cmdtp->name);
1023                 bootstage_error(BOOTSTAGE_ID_FIT_KERNEL_INFO);
1024                 return NULL;
1025         }
1026
1027         debug("   kernel data at 0x%08lx, len = 0x%08lx (%ld)\n",
1028                         *os_data, *os_len, *os_len);
1029
1030         return (void *)img_addr;
1031 }
1032
1033 #ifdef CONFIG_SYS_LONGHELP
1034 static char bootm_help_text[] =
1035         "[addr [arg ...]]\n    - boot application image stored in memory\n"
1036         "\tpassing arguments 'arg ...'; when booting a Linux kernel,\n"
1037         "\t'arg' can be the address of an initrd image\n"
1038 #if defined(CONFIG_OF_LIBFDT)
1039         "\tWhen booting a Linux kernel which requires a flat device-tree\n"
1040         "\ta third argument is required which is the address of the\n"
1041         "\tdevice-tree blob. To boot that kernel without an initrd image,\n"
1042         "\tuse a '-' for the second argument. If you do not pass a third\n"
1043         "\ta bd_info struct will be passed instead\n"
1044 #endif
1045 #if defined(CONFIG_FIT)
1046         "\t\nFor the new multi component uImage format (FIT) addresses\n"
1047         "\tmust be extened to include component or configuration unit name:\n"
1048         "\taddr:<subimg_uname> - direct component image specification\n"
1049         "\taddr#<conf_uname>   - configuration specification\n"
1050         "\tUse iminfo command to get the list of existing component\n"
1051         "\timages and configurations.\n"
1052 #endif
1053         "\nSub-commands to do part of the bootm sequence.  The sub-commands "
1054         "must be\n"
1055         "issued in the order below (it's ok to not issue all sub-commands):\n"
1056         "\tstart [addr [arg ...]]\n"
1057         "\tloados  - load OS image\n"
1058 #if defined(CONFIG_PPC) || defined(CONFIG_M68K) || defined(CONFIG_SPARC)
1059         "\tramdisk - relocate initrd, set env initrd_start/initrd_end\n"
1060 #endif
1061 #if defined(CONFIG_OF_LIBFDT)
1062         "\tfdt     - relocate flat device tree\n"
1063 #endif
1064         "\tcmdline - OS specific command line processing/setup\n"
1065         "\tbdt     - OS specific bd_t processing\n"
1066         "\tprep    - OS specific prep before relocation or go\n"
1067         "\tgo      - start OS";
1068 #endif
1069
1070 U_BOOT_CMD(
1071         bootm,  CONFIG_SYS_MAXARGS,     1,      do_bootm,
1072         "boot application image from memory", bootm_help_text
1073 );
1074
1075 /*******************************************************************/
1076 /* bootd - boot default image */
1077 /*******************************************************************/
1078 #if defined(CONFIG_CMD_BOOTD)
1079 int do_bootd(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
1080 {
1081         int rcode = 0;
1082
1083         if (run_command(getenv("bootcmd"), flag) < 0)
1084                 rcode = 1;
1085         return rcode;
1086 }
1087
1088 U_BOOT_CMD(
1089         boot,   1,      1,      do_bootd,
1090         "boot default, i.e., run 'bootcmd'",
1091         ""
1092 );
1093
1094 /* keep old command name "bootd" for backward compatibility */
1095 U_BOOT_CMD(
1096         bootd, 1,       1,      do_bootd,
1097         "boot default, i.e., run 'bootcmd'",
1098         ""
1099 );
1100
1101 #endif
1102
1103
1104 /*******************************************************************/
1105 /* iminfo - print header info for a requested image */
1106 /*******************************************************************/
1107 #if defined(CONFIG_CMD_IMI)
1108 static int do_iminfo(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
1109 {
1110         int     arg;
1111         ulong   addr;
1112         int     rcode = 0;
1113
1114         if (argc < 2) {
1115                 return image_info(load_addr);
1116         }
1117
1118         for (arg = 1; arg < argc; ++arg) {
1119                 addr = simple_strtoul(argv[arg], NULL, 16);
1120                 if (image_info(addr) != 0)
1121                         rcode = 1;
1122         }
1123         return rcode;
1124 }
1125
1126 static int image_info(ulong addr)
1127 {
1128         void *hdr = (void *)addr;
1129
1130         printf("\n## Checking Image at %08lx ...\n", addr);
1131
1132         switch (genimg_get_format(hdr)) {
1133         case IMAGE_FORMAT_LEGACY:
1134                 puts("   Legacy image found\n");
1135                 if (!image_check_magic(hdr)) {
1136                         puts("   Bad Magic Number\n");
1137                         return 1;
1138                 }
1139
1140                 if (!image_check_hcrc(hdr)) {
1141                         puts("   Bad Header Checksum\n");
1142                         return 1;
1143                 }
1144
1145                 image_print_contents(hdr);
1146
1147                 puts("   Verifying Checksum ... ");
1148                 if (!image_check_dcrc(hdr)) {
1149                         puts("   Bad Data CRC\n");
1150                         return 1;
1151                 }
1152                 puts("OK\n");
1153                 return 0;
1154 #if defined(CONFIG_FIT)
1155         case IMAGE_FORMAT_FIT:
1156                 puts("   FIT image found\n");
1157
1158                 if (!fit_check_format(hdr)) {
1159                         puts("Bad FIT image format!\n");
1160                         return 1;
1161                 }
1162
1163                 fit_print_contents(hdr);
1164
1165                 if (!fit_all_image_check_hashes(hdr)) {
1166                         puts("Bad hash in FIT image!\n");
1167                         return 1;
1168                 }
1169
1170                 return 0;
1171 #endif
1172         default:
1173                 puts("Unknown image format!\n");
1174                 break;
1175         }
1176
1177         return 1;
1178 }
1179
1180 U_BOOT_CMD(
1181         iminfo, CONFIG_SYS_MAXARGS,     1,      do_iminfo,
1182         "print header information for application image",
1183         "addr [addr ...]\n"
1184         "    - print header information for application image starting at\n"
1185         "      address 'addr' in memory; this includes verification of the\n"
1186         "      image contents (magic number, header and payload checksums)"
1187 );
1188 #endif
1189
1190
1191 /*******************************************************************/
1192 /* imls - list all images found in flash */
1193 /*******************************************************************/
1194 #if defined(CONFIG_CMD_IMLS)
1195 static int do_imls(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
1196 {
1197         flash_info_t *info;
1198         int i, j;
1199         void *hdr;
1200
1201         for (i = 0, info = &flash_info[0];
1202                 i < CONFIG_SYS_MAX_FLASH_BANKS; ++i, ++info) {
1203
1204                 if (info->flash_id == FLASH_UNKNOWN)
1205                         goto next_bank;
1206                 for (j = 0; j < info->sector_count; ++j) {
1207
1208                         hdr = (void *)info->start[j];
1209                         if (!hdr)
1210                                 goto next_sector;
1211
1212                         switch (genimg_get_format(hdr)) {
1213                         case IMAGE_FORMAT_LEGACY:
1214                                 if (!image_check_hcrc(hdr))
1215                                         goto next_sector;
1216
1217                                 printf("Legacy Image at %08lX:\n", (ulong)hdr);
1218                                 image_print_contents(hdr);
1219
1220                                 puts("   Verifying Checksum ... ");
1221                                 if (!image_check_dcrc(hdr)) {
1222                                         puts("Bad Data CRC\n");
1223                                 } else {
1224                                         puts("OK\n");
1225                                 }
1226                                 break;
1227 #if defined(CONFIG_FIT)
1228                         case IMAGE_FORMAT_FIT:
1229                                 if (!fit_check_format(hdr))
1230                                         goto next_sector;
1231
1232                                 printf("FIT Image at %08lX:\n", (ulong)hdr);
1233                                 fit_print_contents(hdr);
1234                                 break;
1235 #endif
1236                         default:
1237                                 goto next_sector;
1238                         }
1239
1240 next_sector:            ;
1241                 }
1242 next_bank:      ;
1243         }
1244
1245         return (0);
1246 }
1247
1248 U_BOOT_CMD(
1249         imls,   1,              1,      do_imls,
1250         "list all images found in flash",
1251         "\n"
1252         "    - Prints information about all images found at sector\n"
1253         "      boundaries in flash."
1254 );
1255 #endif
1256
1257 /*******************************************************************/
1258 /* helper routines */
1259 /*******************************************************************/
1260 #ifdef CONFIG_SILENT_CONSOLE
1261 static void fixup_silent_linux(void)
1262 {
1263         char buf[256], *start, *end;
1264         char *cmdline = getenv("bootargs");
1265
1266         /* Only fix cmdline when requested */
1267         if (!(gd->flags & GD_FLG_SILENT))
1268                 return;
1269
1270         debug("before silent fix-up: %s\n", cmdline);
1271         if (cmdline) {
1272                 start = strstr(cmdline, "console=");
1273                 if (start) {
1274                         end = strchr(start, ' ');
1275                         strncpy(buf, cmdline, (start - cmdline + 8));
1276                         if (end)
1277                                 strcpy(buf + (start - cmdline + 8), end);
1278                         else
1279                                 buf[start - cmdline + 8] = '\0';
1280                 } else {
1281                         strcpy(buf, cmdline);
1282                         strcat(buf, " console=");
1283                 }
1284         } else {
1285                 strcpy(buf, "console=");
1286         }
1287
1288         setenv("bootargs", buf);
1289         debug("after silent fix-up: %s\n", buf);
1290 }
1291 #endif /* CONFIG_SILENT_CONSOLE */
1292
1293
1294 /*******************************************************************/
1295 /* OS booting routines */
1296 /*******************************************************************/
1297
1298 #ifdef CONFIG_BOOTM_NETBSD
1299 static int do_bootm_netbsd(int flag, int argc, char * const argv[],
1300                             bootm_headers_t *images)
1301 {
1302         void (*loader)(bd_t *, image_header_t *, char *, char *);
1303         image_header_t *os_hdr, *hdr;
1304         ulong kernel_data, kernel_len;
1305         char *consdev;
1306         char *cmdline;
1307
1308         if ((flag != 0) && (flag != BOOTM_STATE_OS_GO))
1309                 return 1;
1310
1311 #if defined(CONFIG_FIT)
1312         if (!images->legacy_hdr_valid) {
1313                 fit_unsupported_reset("NetBSD");
1314                 return 1;
1315         }
1316 #endif
1317         hdr = images->legacy_hdr_os;
1318
1319         /*
1320          * Booting a (NetBSD) kernel image
1321          *
1322          * This process is pretty similar to a standalone application:
1323          * The (first part of an multi-) image must be a stage-2 loader,
1324          * which in turn is responsible for loading & invoking the actual
1325          * kernel.  The only differences are the parameters being passed:
1326          * besides the board info strucure, the loader expects a command
1327          * line, the name of the console device, and (optionally) the
1328          * address of the original image header.
1329          */
1330         os_hdr = NULL;
1331         if (image_check_type(&images->legacy_hdr_os_copy, IH_TYPE_MULTI)) {
1332                 image_multi_getimg(hdr, 1, &kernel_data, &kernel_len);
1333                 if (kernel_len)
1334                         os_hdr = hdr;
1335         }
1336
1337         consdev = "";
1338 #if   defined(CONFIG_8xx_CONS_SMC1)
1339         consdev = "smc1";
1340 #elif defined(CONFIG_8xx_CONS_SMC2)
1341         consdev = "smc2";
1342 #elif defined(CONFIG_8xx_CONS_SCC2)
1343         consdev = "scc2";
1344 #elif defined(CONFIG_8xx_CONS_SCC3)
1345         consdev = "scc3";
1346 #endif
1347
1348         if (argc > 2) {
1349                 ulong len;
1350                 int   i;
1351
1352                 for (i = 2, len = 0; i < argc; i += 1)
1353                         len += strlen(argv[i]) + 1;
1354                 cmdline = malloc(len);
1355
1356                 for (i = 2, len = 0; i < argc; i += 1) {
1357                         if (i > 2)
1358                                 cmdline[len++] = ' ';
1359                         strcpy(&cmdline[len], argv[i]);
1360                         len += strlen(argv[i]);
1361                 }
1362         } else if ((cmdline = getenv("bootargs")) == NULL) {
1363                 cmdline = "";
1364         }
1365
1366         loader = (void (*)(bd_t *, image_header_t *, char *, char *))images->ep;
1367
1368         printf("## Transferring control to NetBSD stage-2 loader "
1369                 "(at address %08lx) ...\n",
1370                 (ulong)loader);
1371
1372         bootstage_mark(BOOTSTAGE_ID_RUN_OS);
1373
1374         /*
1375          * NetBSD Stage-2 Loader Parameters:
1376          *   r3: ptr to board info data
1377          *   r4: image address
1378          *   r5: console device
1379          *   r6: boot args string
1380          */
1381         (*loader)(gd->bd, os_hdr, consdev, cmdline);
1382
1383         return 1;
1384 }
1385 #endif /* CONFIG_BOOTM_NETBSD*/
1386
1387 #ifdef CONFIG_LYNXKDI
1388 static int do_bootm_lynxkdi(int flag, int argc, char * const argv[],
1389                              bootm_headers_t *images)
1390 {
1391         image_header_t *hdr = &images->legacy_hdr_os_copy;
1392
1393         if ((flag != 0) && (flag != BOOTM_STATE_OS_GO))
1394                 return 1;
1395
1396 #if defined(CONFIG_FIT)
1397         if (!images->legacy_hdr_valid) {
1398                 fit_unsupported_reset("Lynx");
1399                 return 1;
1400         }
1401 #endif
1402
1403         lynxkdi_boot((image_header_t *)hdr);
1404
1405         return 1;
1406 }
1407 #endif /* CONFIG_LYNXKDI */
1408
1409 #ifdef CONFIG_BOOTM_RTEMS
1410 static int do_bootm_rtems(int flag, int argc, char * const argv[],
1411                            bootm_headers_t *images)
1412 {
1413         void (*entry_point)(bd_t *);
1414
1415         if ((flag != 0) && (flag != BOOTM_STATE_OS_GO))
1416                 return 1;
1417
1418 #if defined(CONFIG_FIT)
1419         if (!images->legacy_hdr_valid) {
1420                 fit_unsupported_reset("RTEMS");
1421                 return 1;
1422         }
1423 #endif
1424
1425         entry_point = (void (*)(bd_t *))images->ep;
1426
1427         printf("## Transferring control to RTEMS (at address %08lx) ...\n",
1428                 (ulong)entry_point);
1429
1430         bootstage_mark(BOOTSTAGE_ID_RUN_OS);
1431
1432         /*
1433          * RTEMS Parameters:
1434          *   r3: ptr to board info data
1435          */
1436         (*entry_point)(gd->bd);
1437
1438         return 1;
1439 }
1440 #endif /* CONFIG_BOOTM_RTEMS */
1441
1442 #if defined(CONFIG_BOOTM_OSE)
1443 static int do_bootm_ose(int flag, int argc, char * const argv[],
1444                            bootm_headers_t *images)
1445 {
1446         void (*entry_point)(void);
1447
1448         if ((flag != 0) && (flag != BOOTM_STATE_OS_GO))
1449                 return 1;
1450
1451 #if defined(CONFIG_FIT)
1452         if (!images->legacy_hdr_valid) {
1453                 fit_unsupported_reset("OSE");
1454                 return 1;
1455         }
1456 #endif
1457
1458         entry_point = (void (*)(void))images->ep;
1459
1460         printf("## Transferring control to OSE (at address %08lx) ...\n",
1461                 (ulong)entry_point);
1462
1463         bootstage_mark(BOOTSTAGE_ID_RUN_OS);
1464
1465         /*
1466          * OSE Parameters:
1467          *   None
1468          */
1469         (*entry_point)();
1470
1471         return 1;
1472 }
1473 #endif /* CONFIG_BOOTM_OSE */
1474
1475 #if defined(CONFIG_CMD_ELF)
1476 static int do_bootm_vxworks(int flag, int argc, char * const argv[],
1477                              bootm_headers_t *images)
1478 {
1479         char str[80];
1480
1481         if ((flag != 0) && (flag != BOOTM_STATE_OS_GO))
1482                 return 1;
1483
1484 #if defined(CONFIG_FIT)
1485         if (!images->legacy_hdr_valid) {
1486                 fit_unsupported_reset("VxWorks");
1487                 return 1;
1488         }
1489 #endif
1490
1491         sprintf(str, "%lx", images->ep); /* write entry-point into string */
1492         setenv("loadaddr", str);
1493         do_bootvx(NULL, 0, 0, NULL);
1494
1495         return 1;
1496 }
1497
1498 static int do_bootm_qnxelf(int flag, int argc, char * const argv[],
1499                             bootm_headers_t *images)
1500 {
1501         char *local_args[2];
1502         char str[16];
1503
1504         if ((flag != 0) && (flag != BOOTM_STATE_OS_GO))
1505                 return 1;
1506
1507 #if defined(CONFIG_FIT)
1508         if (!images->legacy_hdr_valid) {
1509                 fit_unsupported_reset("QNX");
1510                 return 1;
1511         }
1512 #endif
1513
1514         sprintf(str, "%lx", images->ep); /* write entry-point into string */
1515         local_args[0] = argv[0];
1516         local_args[1] = str;    /* and provide it via the arguments */
1517         do_bootelf(NULL, 0, 2, local_args);
1518
1519         return 1;
1520 }
1521 #endif
1522
1523 #ifdef CONFIG_INTEGRITY
1524 static int do_bootm_integrity(int flag, int argc, char * const argv[],
1525                            bootm_headers_t *images)
1526 {
1527         void (*entry_point)(void);
1528
1529         if ((flag != 0) && (flag != BOOTM_STATE_OS_GO))
1530                 return 1;
1531
1532 #if defined(CONFIG_FIT)
1533         if (!images->legacy_hdr_valid) {
1534                 fit_unsupported_reset("INTEGRITY");
1535                 return 1;
1536         }
1537 #endif
1538
1539         entry_point = (void (*)(void))images->ep;
1540
1541         printf("## Transferring control to INTEGRITY (at address %08lx) ...\n",
1542                 (ulong)entry_point);
1543
1544         bootstage_mark(BOOTSTAGE_ID_RUN_OS);
1545
1546         /*
1547          * INTEGRITY Parameters:
1548          *   None
1549          */
1550         (*entry_point)();
1551
1552         return 1;
1553 }
1554 #endif
1555
1556 #ifdef CONFIG_CMD_BOOTZ
1557
1558 static int __bootz_setup(void *image, void **start, void **end)
1559 {
1560         /* Please define bootz_setup() for your platform */
1561
1562         puts("Your platform's zImage format isn't supported yet!\n");
1563         return -1;
1564 }
1565 int bootz_setup(void *image, void **start, void **end)
1566         __attribute__((weak, alias("__bootz_setup")));
1567
1568 /*
1569  * zImage booting support
1570  */
1571 static int bootz_start(cmd_tbl_t *cmdtp, int flag, int argc,
1572                         char * const argv[], bootm_headers_t *images)
1573 {
1574         int ret;
1575         void *zi_start, *zi_end;
1576
1577         memset(images, 0, sizeof(bootm_headers_t));
1578
1579         boot_start_lmb(images);
1580
1581         /* Setup Linux kernel zImage entry point */
1582         if (argc < 2) {
1583                 images->ep = load_addr;
1584                 debug("*  kernel: default image load address = 0x%08lx\n",
1585                                 load_addr);
1586         } else {
1587                 images->ep = simple_strtoul(argv[1], NULL, 16);
1588                 debug("*  kernel: cmdline image address = 0x%08lx\n",
1589                         images->ep);
1590         }
1591
1592         ret = bootz_setup((void *)images->ep, &zi_start, &zi_end);
1593         if (ret != 0)
1594                 return 1;
1595
1596         lmb_reserve(&images->lmb, images->ep, zi_end - zi_start);
1597
1598         /* Find ramdisk */
1599         ret = boot_get_ramdisk(argc, argv, images, IH_INITRD_ARCH,
1600                         &images->rd_start, &images->rd_end);
1601         if (ret) {
1602                 puts("Ramdisk image is corrupt or invalid\n");
1603                 return 1;
1604         }
1605
1606 #if defined(CONFIG_OF_LIBFDT)
1607         /* find flattened device tree */
1608         ret = boot_get_fdt(flag, argc, argv, images,
1609                            &images->ft_addr, &images->ft_len);
1610         if (ret) {
1611                 puts("Could not find a valid device tree\n");
1612                 return 1;
1613         }
1614
1615         set_working_fdt_addr(images->ft_addr);
1616 #endif
1617
1618         return 0;
1619 }
1620
1621 static int do_bootz(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
1622 {
1623         bootm_headers_t images;
1624
1625         if (bootz_start(cmdtp, flag, argc, argv, &images))
1626                 return 1;
1627
1628         /*
1629          * We have reached the point of no return: we are going to
1630          * overwrite all exception vector code, so we cannot easily
1631          * recover from any failures any more...
1632          */
1633         disable_interrupts();
1634
1635 #ifdef CONFIG_NETCONSOLE
1636         /* Stop the ethernet stack if NetConsole could have left it up */
1637         eth_halt();
1638 #endif
1639
1640 #if defined(CONFIG_CMD_USB)
1641         /*
1642          * turn off USB to prevent the host controller from writing to the
1643          * SDRAM while Linux is booting. This could happen (at least for OHCI
1644          * controller), because the HCCA (Host Controller Communication Area)
1645          * lies within the SDRAM and the host controller writes continously to
1646          * this area (as busmaster!). The HccaFrameNumber is for example
1647          * updated every 1 ms within the HCCA structure in SDRAM! For more
1648          * details see the OpenHCI specification.
1649          */
1650         usb_stop();
1651 #endif
1652
1653 #ifdef CONFIG_SILENT_CONSOLE
1654         fixup_silent_linux();
1655 #endif
1656         arch_preboot_os();
1657
1658         do_bootm_linux(0, argc, argv, &images);
1659 #ifdef DEBUG
1660         puts("\n## Control returned to monitor - resetting...\n");
1661 #endif
1662         do_reset(cmdtp, flag, argc, argv);
1663
1664         return 1;
1665 }
1666
1667 #ifdef CONFIG_SYS_LONGHELP
1668 static char bootz_help_text[] =
1669         "[addr [initrd[:size]] [fdt]]\n"
1670         "    - boot Linux zImage stored in memory\n"
1671         "\tThe argument 'initrd' is optional and specifies the address\n"
1672         "\tof the initrd in memory. The optional argument ':size' allows\n"
1673         "\tspecifying the size of RAW initrd.\n"
1674 #if defined(CONFIG_OF_LIBFDT)
1675         "\tWhen booting a Linux kernel which requires a flat device-tree\n"
1676         "\ta third argument is required which is the address of the\n"
1677         "\tdevice-tree blob. To boot that kernel without an initrd image,\n"
1678         "\tuse a '-' for the second argument. If you do not pass a third\n"
1679         "\ta bd_info struct will be passed instead\n"
1680 #endif
1681         "";
1682 #endif
1683
1684 U_BOOT_CMD(
1685         bootz,  CONFIG_SYS_MAXARGS,     1,      do_bootz,
1686         "boot Linux zImage image from memory", bootz_help_text
1687 );
1688 #endif  /* CONFIG_CMD_BOOTZ */