]> git.kernelconcepts.de Git - karo-tx-uboot.git/blob - common/cmd_bootm.c
Merge branch 'master' of git://www.denx.de/git/u-boot-microblaze
[karo-tx-uboot.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 < BOOTM_STATE_START ||
502             images.state >= state) {
503                 printf("Trying to execute a command out of order\n");
504                 return CMD_RET_USAGE;
505         }
506
507         images.state |= state;
508         boot_fn = boot_os[images.os.os];
509
510         switch (state) {
511                 ulong load_end;
512                 case BOOTM_STATE_START:
513                         /* should never occur */
514                         break;
515                 case BOOTM_STATE_LOADOS:
516                         ret = bootm_load_os(images.os, &load_end, 0);
517                         if (ret)
518                                 return ret;
519
520                         lmb_reserve(&images.lmb, images.os.load,
521                                         (load_end - images.os.load));
522                         break;
523 #ifdef CONFIG_SYS_BOOT_RAMDISK_HIGH
524                 case BOOTM_STATE_RAMDISK:
525                 {
526                         ulong rd_len = images.rd_end - images.rd_start;
527                         char str[17];
528
529                         ret = boot_ramdisk_high(&images.lmb, images.rd_start,
530                                 rd_len, &images.initrd_start, &images.initrd_end);
531                         if (ret)
532                                 return ret;
533
534                         sprintf(str, "%lx", images.initrd_start);
535                         setenv("initrd_start", str);
536                         sprintf(str, "%lx", images.initrd_end);
537                         setenv("initrd_end", str);
538                 }
539                         break;
540 #endif
541 #if defined(CONFIG_OF_LIBFDT) && defined(CONFIG_LMB)
542                 case BOOTM_STATE_FDT:
543                 {
544                         boot_fdt_add_mem_rsv_regions(&images.lmb,
545                                                      images.ft_addr);
546                         ret = boot_relocate_fdt(&images.lmb,
547                                 &images.ft_addr, &images.ft_len);
548                         break;
549                 }
550 #endif
551                 case BOOTM_STATE_OS_CMDLINE:
552                         ret = boot_fn(BOOTM_STATE_OS_CMDLINE, argc, argv, &images);
553                         if (ret)
554                                 printf("cmdline subcommand not supported\n");
555                         break;
556                 case BOOTM_STATE_OS_BD_T:
557                         ret = boot_fn(BOOTM_STATE_OS_BD_T, argc, argv, &images);
558                         if (ret)
559                                 printf("bdt subcommand not supported\n");
560                         break;
561                 case BOOTM_STATE_OS_PREP:
562                         ret = boot_fn(BOOTM_STATE_OS_PREP, argc, argv, &images);
563                         if (ret)
564                                 printf("prep subcommand not supported\n");
565                         break;
566                 case BOOTM_STATE_OS_GO:
567                         disable_interrupts();
568 #ifdef CONFIG_NETCONSOLE
569                         /*
570                          * Stop the ethernet stack if NetConsole could have
571                          * left it up
572                          */
573                         eth_halt();
574 #endif
575                         arch_preboot_os();
576                         boot_fn(BOOTM_STATE_OS_GO, argc, argv, &images);
577                         break;
578         }
579
580         return ret;
581 }
582
583 /*******************************************************************/
584 /* bootm - boot application image from image in memory */
585 /*******************************************************************/
586
587 int do_bootm(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
588 {
589         ulong           iflag;
590         ulong           load_end = 0;
591         int             ret;
592         boot_os_fn      *boot_fn;
593 #ifdef CONFIG_NEEDS_MANUAL_RELOC
594         static int relocated = 0;
595
596         if (!relocated) {
597                 int i;
598
599                 /* relocate boot function table */
600                 for (i = 0; i < ARRAY_SIZE(boot_os); i++)
601                         if (boot_os[i] != NULL)
602                                 boot_os[i] += gd->reloc_off;
603
604                 /* relocate names of sub-command table */
605                 for (i = 0; i < ARRAY_SIZE(cmd_bootm_sub); i++)
606                         cmd_bootm_sub[i].name += gd->reloc_off;
607
608                 relocated = 1;
609         }
610 #endif
611
612         /* determine if we have a sub command */
613         if (argc > 1) {
614                 char *endp;
615
616                 simple_strtoul(argv[1], &endp, 16);
617                 /* endp pointing to NULL means that argv[1] was just a
618                  * valid number, pass it along to the normal bootm processing
619                  *
620                  * If endp is ':' or '#' assume a FIT identifier so pass
621                  * along for normal processing.
622                  *
623                  * Right now we assume the first arg should never be '-'
624                  */
625                 if ((*endp != 0) && (*endp != ':') && (*endp != '#'))
626                         return do_bootm_subcommand(cmdtp, flag, argc, argv);
627         }
628
629         if (bootm_start(cmdtp, flag, argc, argv))
630                 return 1;
631
632         /*
633          * We have reached the point of no return: we are going to
634          * overwrite all exception vector code, so we cannot easily
635          * recover from any failures any more...
636          */
637         iflag = disable_interrupts();
638
639 #ifdef CONFIG_NETCONSOLE
640         /* Stop the ethernet stack if NetConsole could have left it up */
641         eth_halt();
642 #endif
643
644 #if defined(CONFIG_CMD_USB)
645         /*
646          * turn off USB to prevent the host controller from writing to the
647          * SDRAM while Linux is booting. This could happen (at least for OHCI
648          * controller), because the HCCA (Host Controller Communication Area)
649          * lies within the SDRAM and the host controller writes continously to
650          * this area (as busmaster!). The HccaFrameNumber is for example
651          * updated every 1 ms within the HCCA structure in SDRAM! For more
652          * details see the OpenHCI specification.
653          */
654         usb_stop();
655 #endif
656
657         ret = bootm_load_os(images.os, &load_end, 1);
658
659         if (ret < 0) {
660                 if (ret == BOOTM_ERR_RESET)
661                         do_reset(cmdtp, flag, argc, argv);
662                 if (ret == BOOTM_ERR_OVERLAP) {
663                         if (images.legacy_hdr_valid) {
664                                 image_header_t *hdr;
665                                 hdr = &images.legacy_hdr_os_copy;
666                                 if (image_get_type(hdr) == IH_TYPE_MULTI)
667                                         puts("WARNING: legacy format multi "
668                                                 "component image "
669                                                 "overwritten\n");
670                         } else {
671                                 puts("ERROR: new format image overwritten - "
672                                         "must RESET the board to recover\n");
673                                 bootstage_error(BOOTSTAGE_ID_OVERWRITTEN);
674                                 do_reset(cmdtp, flag, argc, argv);
675                         }
676                 }
677                 if (ret == BOOTM_ERR_UNIMPLEMENTED) {
678                         if (iflag)
679                                 enable_interrupts();
680                         bootstage_error(BOOTSTAGE_ID_DECOMP_UNIMPL);
681                         return 1;
682                 }
683         }
684
685         lmb_reserve(&images.lmb, images.os.load, (load_end - images.os.load));
686
687         if (images.os.type == IH_TYPE_STANDALONE) {
688                 if (iflag)
689                         enable_interrupts();
690                 /* This may return when 'autostart' is 'no' */
691                 bootm_start_standalone(iflag, argc, argv);
692                 return 0;
693         }
694
695         bootstage_mark(BOOTSTAGE_ID_CHECK_BOOT_OS);
696
697 #ifdef CONFIG_SILENT_CONSOLE
698         if (images.os.os == IH_OS_LINUX)
699                 fixup_silent_linux();
700 #endif
701
702         boot_fn = boot_os[images.os.os];
703
704         if (boot_fn == NULL) {
705                 if (iflag)
706                         enable_interrupts();
707                 printf("ERROR: booting os '%s' (%d) is not supported\n",
708                         genimg_get_os_name(images.os.os), images.os.os);
709                 bootstage_error(BOOTSTAGE_ID_CHECK_BOOT_OS);
710                 return 1;
711         }
712
713         arch_preboot_os();
714
715         boot_fn(0, argc, argv, &images);
716
717         bootstage_error(BOOTSTAGE_ID_BOOT_OS_RETURNED);
718 #ifdef DEBUG
719         puts("\n## Control returned to monitor - resetting...\n");
720 #endif
721         do_reset(cmdtp, flag, argc, argv);
722
723         return 1;
724 }
725
726 int bootm_maybe_autostart(cmd_tbl_t *cmdtp, const char *cmd)
727 {
728         const char *ep = getenv("autostart");
729
730         if (ep && !strcmp(ep, "yes")) {
731                 char *local_args[2];
732                 local_args[0] = (char *)cmd;
733                 local_args[1] = NULL;
734                 printf("Automatic boot of image at addr 0x%08lX ...\n", load_addr);
735                 return do_bootm(cmdtp, 0, 1, local_args);
736         }
737
738         return 0;
739 }
740
741 /**
742  * image_get_kernel - verify legacy format kernel image
743  * @img_addr: in RAM address of the legacy format image to be verified
744  * @verify: data CRC verification flag
745  *
746  * image_get_kernel() verifies legacy image integrity and returns pointer to
747  * legacy image header if image verification was completed successfully.
748  *
749  * returns:
750  *     pointer to a legacy image header if valid image was found
751  *     otherwise return NULL
752  */
753 static image_header_t *image_get_kernel(ulong img_addr, int verify)
754 {
755         image_header_t *hdr = (image_header_t *)img_addr;
756
757         if (!image_check_magic(hdr)) {
758                 puts("Bad Magic Number\n");
759                 bootstage_error(BOOTSTAGE_ID_CHECK_MAGIC);
760                 return NULL;
761         }
762         bootstage_mark(BOOTSTAGE_ID_CHECK_HEADER);
763
764         if (!image_check_hcrc(hdr)) {
765                 puts("Bad Header Checksum\n");
766                 bootstage_error(BOOTSTAGE_ID_CHECK_HEADER);
767                 return NULL;
768         }
769
770         bootstage_mark(BOOTSTAGE_ID_CHECK_CHECKSUM);
771         image_print_contents(hdr);
772
773         if (verify) {
774                 puts("   Verifying Checksum ... ");
775                 if (!image_check_dcrc(hdr)) {
776                         printf("Bad Data CRC\n");
777                         bootstage_error(BOOTSTAGE_ID_CHECK_CHECKSUM);
778                         return NULL;
779                 }
780                 puts("OK\n");
781         }
782         bootstage_mark(BOOTSTAGE_ID_CHECK_ARCH);
783
784         if (!image_check_target_arch(hdr)) {
785                 printf("Unsupported Architecture 0x%x\n", image_get_arch(hdr));
786                 bootstage_error(BOOTSTAGE_ID_CHECK_ARCH);
787                 return NULL;
788         }
789         return hdr;
790 }
791
792 /**
793  * fit_check_kernel - verify FIT format kernel subimage
794  * @fit_hdr: pointer to the FIT image header
795  * os_noffset: kernel subimage node offset within FIT image
796  * @verify: data CRC verification flag
797  *
798  * fit_check_kernel() verifies integrity of the kernel subimage and from
799  * specified FIT image.
800  *
801  * returns:
802  *     1, on success
803  *     0, on failure
804  */
805 #if defined(CONFIG_FIT)
806 static int fit_check_kernel(const void *fit, int os_noffset, int verify)
807 {
808         fit_image_print(fit, os_noffset, "   ");
809
810         if (verify) {
811                 puts("   Verifying Hash Integrity ... ");
812                 if (!fit_image_check_hashes(fit, os_noffset)) {
813                         puts("Bad Data Hash\n");
814                         bootstage_error(BOOTSTAGE_ID_FIT_CHECK_HASH);
815                         return 0;
816                 }
817                 puts("OK\n");
818         }
819         bootstage_mark(BOOTSTAGE_ID_FIT_CHECK_ARCH);
820
821         if (!fit_image_check_target_arch(fit, os_noffset)) {
822                 puts("Unsupported Architecture\n");
823                 bootstage_error(BOOTSTAGE_ID_FIT_CHECK_ARCH);
824                 return 0;
825         }
826
827         bootstage_mark(BOOTSTAGE_ID_FIT_CHECK_KERNEL);
828         if (!fit_image_check_type(fit, os_noffset, IH_TYPE_KERNEL) &&
829             !fit_image_check_type(fit, os_noffset, IH_TYPE_KERNEL_NOLOAD)) {
830                 puts("Not a kernel image\n");
831                 bootstage_error(BOOTSTAGE_ID_FIT_CHECK_KERNEL);
832                 return 0;
833         }
834
835         bootstage_mark(BOOTSTAGE_ID_FIT_CHECKED);
836         return 1;
837 }
838 #endif /* CONFIG_FIT */
839
840 /**
841  * boot_get_kernel - find kernel image
842  * @os_data: pointer to a ulong variable, will hold os data start address
843  * @os_len: pointer to a ulong variable, will hold os data length
844  *
845  * boot_get_kernel() tries to find a kernel image, verifies its integrity
846  * and locates kernel data.
847  *
848  * returns:
849  *     pointer to image header if valid image was found, plus kernel start
850  *     address and length, otherwise NULL
851  */
852 static void *boot_get_kernel(cmd_tbl_t *cmdtp, int flag, int argc,
853                 char * const argv[], bootm_headers_t *images, ulong *os_data,
854                 ulong *os_len)
855 {
856         image_header_t  *hdr;
857         ulong           img_addr;
858 #if defined(CONFIG_FIT)
859         void            *fit_hdr;
860         const char      *fit_uname_config = NULL;
861         const char      *fit_uname_kernel = NULL;
862         const void      *data;
863         size_t          len;
864         int             cfg_noffset;
865         int             os_noffset;
866 #endif
867
868         /* find out kernel image address */
869         if (argc < 2) {
870                 img_addr = load_addr;
871                 debug("*  kernel: default image load address = 0x%08lx\n",
872                                 load_addr);
873 #if defined(CONFIG_FIT)
874         } else if (fit_parse_conf(argv[1], load_addr, &img_addr,
875                                                         &fit_uname_config)) {
876                 debug("*  kernel: config '%s' from image at 0x%08lx\n",
877                                 fit_uname_config, img_addr);
878         } else if (fit_parse_subimage(argv[1], load_addr, &img_addr,
879                                                         &fit_uname_kernel)) {
880                 debug("*  kernel: subimage '%s' from image at 0x%08lx\n",
881                                 fit_uname_kernel, img_addr);
882 #endif
883         } else {
884                 img_addr = simple_strtoul(argv[1], NULL, 16);
885                 debug("*  kernel: cmdline image address = 0x%08lx\n", img_addr);
886         }
887
888         bootstage_mark(BOOTSTAGE_ID_CHECK_MAGIC);
889
890         /* copy from dataflash if needed */
891         img_addr = genimg_get_image(img_addr);
892
893         /* check image type, for FIT images get FIT kernel node */
894         *os_data = *os_len = 0;
895         switch (genimg_get_format((void *)img_addr)) {
896         case IMAGE_FORMAT_LEGACY:
897                 printf("## Booting kernel from Legacy Image at %08lx ...\n",
898                                 img_addr);
899                 hdr = image_get_kernel(img_addr, images->verify);
900                 if (!hdr)
901                         return NULL;
902                 bootstage_mark(BOOTSTAGE_ID_CHECK_IMAGETYPE);
903
904                 /* get os_data and os_len */
905                 switch (image_get_type(hdr)) {
906                 case IH_TYPE_KERNEL:
907                 case IH_TYPE_KERNEL_NOLOAD:
908                         *os_data = image_get_data(hdr);
909                         *os_len = image_get_data_size(hdr);
910                         break;
911                 case IH_TYPE_MULTI:
912                         image_multi_getimg(hdr, 0, os_data, os_len);
913                         break;
914                 case IH_TYPE_STANDALONE:
915                         *os_data = image_get_data(hdr);
916                         *os_len = image_get_data_size(hdr);
917                         break;
918                 default:
919                         printf("Wrong Image Type for %s command\n",
920                                 cmdtp->name);
921                         bootstage_error(BOOTSTAGE_ID_CHECK_IMAGETYPE);
922                         return NULL;
923                 }
924
925                 /*
926                  * copy image header to allow for image overwrites during
927                  * kernel decompression.
928                  */
929                 memmove(&images->legacy_hdr_os_copy, hdr,
930                         sizeof(image_header_t));
931
932                 /* save pointer to image header */
933                 images->legacy_hdr_os = hdr;
934
935                 images->legacy_hdr_valid = 1;
936                 bootstage_mark(BOOTSTAGE_ID_DECOMP_IMAGE);
937                 break;
938 #if defined(CONFIG_FIT)
939         case IMAGE_FORMAT_FIT:
940                 fit_hdr = (void *)img_addr;
941                 printf("## Booting kernel from FIT Image at %08lx ...\n",
942                                 img_addr);
943
944                 if (!fit_check_format(fit_hdr)) {
945                         puts("Bad FIT kernel image format!\n");
946                         bootstage_error(BOOTSTAGE_ID_FIT_FORMAT);
947                         return NULL;
948                 }
949                 bootstage_mark(BOOTSTAGE_ID_FIT_FORMAT);
950
951                 if (!fit_uname_kernel) {
952                         /*
953                          * no kernel image node unit name, try to get config
954                          * node first. If config unit node name is NULL
955                          * fit_conf_get_node() will try to find default config
956                          * node
957                          */
958                         bootstage_mark(BOOTSTAGE_ID_FIT_NO_UNIT_NAME);
959 #ifdef CONFIG_FIT_BEST_MATCH
960                         if (fit_uname_config)
961                                 cfg_noffset =
962                                         fit_conf_get_node(fit_hdr,
963                                                           fit_uname_config);
964                         else
965                                 cfg_noffset =
966                                         fit_conf_find_compat(fit_hdr,
967                                                              gd->fdt_blob);
968 #else
969                         cfg_noffset = fit_conf_get_node(fit_hdr,
970                                                         fit_uname_config);
971 #endif
972                         if (cfg_noffset < 0) {
973                                 bootstage_error(BOOTSTAGE_ID_FIT_NO_UNIT_NAME);
974                                 return NULL;
975                         }
976                         /* save configuration uname provided in the first
977                          * bootm argument
978                          */
979                         images->fit_uname_cfg = fdt_get_name(fit_hdr,
980                                                                 cfg_noffset,
981                                                                 NULL);
982                         printf("   Using '%s' configuration\n",
983                                 images->fit_uname_cfg);
984                         bootstage_mark(BOOTSTAGE_ID_FIT_CONFIG);
985
986                         os_noffset = fit_conf_get_kernel_node(fit_hdr,
987                                                                 cfg_noffset);
988                         fit_uname_kernel = fit_get_name(fit_hdr, os_noffset,
989                                                         NULL);
990                 } else {
991                         /* get kernel component image node offset */
992                         bootstage_mark(BOOTSTAGE_ID_FIT_UNIT_NAME);
993                         os_noffset = fit_image_get_node(fit_hdr,
994                                                         fit_uname_kernel);
995                 }
996                 if (os_noffset < 0) {
997                         bootstage_error(BOOTSTAGE_ID_FIT_CONFIG);
998                         return NULL;
999                 }
1000
1001                 printf("   Trying '%s' kernel subimage\n", fit_uname_kernel);
1002
1003                 bootstage_mark(BOOTSTAGE_ID_FIT_CHECK_SUBIMAGE);
1004                 if (!fit_check_kernel(fit_hdr, os_noffset, images->verify))
1005                         return NULL;
1006
1007                 /* get kernel image data address and length */
1008                 if (fit_image_get_data(fit_hdr, os_noffset, &data, &len)) {
1009                         puts("Could not find kernel subimage data!\n");
1010                         bootstage_error(BOOTSTAGE_ID_FIT_KERNEL_INFO_ERR);
1011                         return NULL;
1012                 }
1013                 bootstage_mark(BOOTSTAGE_ID_FIT_KERNEL_INFO);
1014
1015                 *os_len = len;
1016                 *os_data = (ulong)data;
1017                 images->fit_hdr_os = fit_hdr;
1018                 images->fit_uname_os = fit_uname_kernel;
1019                 images->fit_noffset_os = os_noffset;
1020                 break;
1021 #endif
1022         default:
1023                 printf("Wrong Image Format for %s command\n", cmdtp->name);
1024                 bootstage_error(BOOTSTAGE_ID_FIT_KERNEL_INFO);
1025                 return NULL;
1026         }
1027
1028         debug("   kernel data at 0x%08lx, len = 0x%08lx (%ld)\n",
1029                         *os_data, *os_len, *os_len);
1030
1031         return (void *)img_addr;
1032 }
1033
1034 #ifdef CONFIG_SYS_LONGHELP
1035 static char bootm_help_text[] =
1036         "[addr [arg ...]]\n    - boot application image stored in memory\n"
1037         "\tpassing arguments 'arg ...'; when booting a Linux kernel,\n"
1038         "\t'arg' can be the address of an initrd image\n"
1039 #if defined(CONFIG_OF_LIBFDT)
1040         "\tWhen booting a Linux kernel which requires a flat device-tree\n"
1041         "\ta third argument is required which is the address of the\n"
1042         "\tdevice-tree blob. To boot that kernel without an initrd image,\n"
1043         "\tuse a '-' for the second argument. If you do not pass a third\n"
1044         "\ta bd_info struct will be passed instead\n"
1045 #endif
1046 #if defined(CONFIG_FIT)
1047         "\t\nFor the new multi component uImage format (FIT) addresses\n"
1048         "\tmust be extened to include component or configuration unit name:\n"
1049         "\taddr:<subimg_uname> - direct component image specification\n"
1050         "\taddr#<conf_uname>   - configuration specification\n"
1051         "\tUse iminfo command to get the list of existing component\n"
1052         "\timages and configurations.\n"
1053 #endif
1054         "\nSub-commands to do part of the bootm sequence.  The sub-commands "
1055         "must be\n"
1056         "issued in the order below (it's ok to not issue all sub-commands):\n"
1057         "\tstart [addr [arg ...]]\n"
1058         "\tloados  - load OS image\n"
1059 #if defined(CONFIG_PPC) || defined(CONFIG_M68K) || defined(CONFIG_SPARC)
1060         "\tramdisk - relocate initrd, set env initrd_start/initrd_end\n"
1061 #endif
1062 #if defined(CONFIG_OF_LIBFDT)
1063         "\tfdt     - relocate flat device tree\n"
1064 #endif
1065         "\tcmdline - OS specific command line processing/setup\n"
1066         "\tbdt     - OS specific bd_t processing\n"
1067         "\tprep    - OS specific prep before relocation or go\n"
1068         "\tgo      - start OS";
1069 #endif
1070
1071 U_BOOT_CMD(
1072         bootm,  CONFIG_SYS_MAXARGS,     1,      do_bootm,
1073         "boot application image from memory", bootm_help_text
1074 );
1075
1076 /*******************************************************************/
1077 /* bootd - boot default image */
1078 /*******************************************************************/
1079 #if defined(CONFIG_CMD_BOOTD)
1080 int do_bootd(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
1081 {
1082         int rcode = 0;
1083
1084         if (run_command(getenv("bootcmd"), flag) < 0)
1085                 rcode = 1;
1086         return rcode;
1087 }
1088
1089 U_BOOT_CMD(
1090         boot,   1,      1,      do_bootd,
1091         "boot default, i.e., run 'bootcmd'",
1092         ""
1093 );
1094
1095 /* keep old command name "bootd" for backward compatibility */
1096 U_BOOT_CMD(
1097         bootd, 1,       1,      do_bootd,
1098         "boot default, i.e., run 'bootcmd'",
1099         ""
1100 );
1101
1102 #endif
1103
1104
1105 /*******************************************************************/
1106 /* iminfo - print header info for a requested image */
1107 /*******************************************************************/
1108 #if defined(CONFIG_CMD_IMI)
1109 static int do_iminfo(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
1110 {
1111         int     arg;
1112         ulong   addr;
1113         int     rcode = 0;
1114
1115         if (argc < 2) {
1116                 return image_info(load_addr);
1117         }
1118
1119         for (arg = 1; arg < argc; ++arg) {
1120                 addr = simple_strtoul(argv[arg], NULL, 16);
1121                 if (image_info(addr) != 0)
1122                         rcode = 1;
1123         }
1124         return rcode;
1125 }
1126
1127 static int image_info(ulong addr)
1128 {
1129         void *hdr = (void *)addr;
1130
1131         printf("\n## Checking Image at %08lx ...\n", addr);
1132
1133         switch (genimg_get_format(hdr)) {
1134         case IMAGE_FORMAT_LEGACY:
1135                 puts("   Legacy image found\n");
1136                 if (!image_check_magic(hdr)) {
1137                         puts("   Bad Magic Number\n");
1138                         return 1;
1139                 }
1140
1141                 if (!image_check_hcrc(hdr)) {
1142                         puts("   Bad Header Checksum\n");
1143                         return 1;
1144                 }
1145
1146                 image_print_contents(hdr);
1147
1148                 puts("   Verifying Checksum ... ");
1149                 if (!image_check_dcrc(hdr)) {
1150                         puts("   Bad Data CRC\n");
1151                         return 1;
1152                 }
1153                 puts("OK\n");
1154                 return 0;
1155 #if defined(CONFIG_FIT)
1156         case IMAGE_FORMAT_FIT:
1157                 puts("   FIT image found\n");
1158
1159                 if (!fit_check_format(hdr)) {
1160                         puts("Bad FIT image format!\n");
1161                         return 1;
1162                 }
1163
1164                 fit_print_contents(hdr);
1165
1166                 if (!fit_all_image_check_hashes(hdr)) {
1167                         puts("Bad hash in FIT image!\n");
1168                         return 1;
1169                 }
1170
1171                 return 0;
1172 #endif
1173         default:
1174                 puts("Unknown image format!\n");
1175                 break;
1176         }
1177
1178         return 1;
1179 }
1180
1181 U_BOOT_CMD(
1182         iminfo, CONFIG_SYS_MAXARGS,     1,      do_iminfo,
1183         "print header information for application image",
1184         "addr [addr ...]\n"
1185         "    - print header information for application image starting at\n"
1186         "      address 'addr' in memory; this includes verification of the\n"
1187         "      image contents (magic number, header and payload checksums)"
1188 );
1189 #endif
1190
1191
1192 /*******************************************************************/
1193 /* imls - list all images found in flash */
1194 /*******************************************************************/
1195 #if defined(CONFIG_CMD_IMLS)
1196 static int do_imls(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
1197 {
1198         flash_info_t *info;
1199         int i, j;
1200         void *hdr;
1201
1202         for (i = 0, info = &flash_info[0];
1203                 i < CONFIG_SYS_MAX_FLASH_BANKS; ++i, ++info) {
1204
1205                 if (info->flash_id == FLASH_UNKNOWN)
1206                         goto next_bank;
1207                 for (j = 0; j < info->sector_count; ++j) {
1208
1209                         hdr = (void *)info->start[j];
1210                         if (!hdr)
1211                                 goto next_sector;
1212
1213                         switch (genimg_get_format(hdr)) {
1214                         case IMAGE_FORMAT_LEGACY:
1215                                 if (!image_check_hcrc(hdr))
1216                                         goto next_sector;
1217
1218                                 printf("Legacy Image at %08lX:\n", (ulong)hdr);
1219                                 image_print_contents(hdr);
1220
1221                                 puts("   Verifying Checksum ... ");
1222                                 if (!image_check_dcrc(hdr)) {
1223                                         puts("Bad Data CRC\n");
1224                                 } else {
1225                                         puts("OK\n");
1226                                 }
1227                                 break;
1228 #if defined(CONFIG_FIT)
1229                         case IMAGE_FORMAT_FIT:
1230                                 if (!fit_check_format(hdr))
1231                                         goto next_sector;
1232
1233                                 printf("FIT Image at %08lX:\n", (ulong)hdr);
1234                                 fit_print_contents(hdr);
1235                                 break;
1236 #endif
1237                         default:
1238                                 goto next_sector;
1239                         }
1240
1241 next_sector:            ;
1242                 }
1243 next_bank:      ;
1244         }
1245
1246         return (0);
1247 }
1248
1249 U_BOOT_CMD(
1250         imls,   1,              1,      do_imls,
1251         "list all images found in flash",
1252         "\n"
1253         "    - Prints information about all images found at sector\n"
1254         "      boundaries in flash."
1255 );
1256 #endif
1257
1258 /*******************************************************************/
1259 /* helper routines */
1260 /*******************************************************************/
1261 #ifdef CONFIG_SILENT_CONSOLE
1262 static void fixup_silent_linux(void)
1263 {
1264         char buf[256], *start, *end;
1265         char *cmdline = getenv("bootargs");
1266
1267         /* Only fix cmdline when requested */
1268         if (!(gd->flags & GD_FLG_SILENT))
1269                 return;
1270
1271         debug("before silent fix-up: %s\n", cmdline);
1272         if (cmdline) {
1273                 start = strstr(cmdline, "console=");
1274                 if (start) {
1275                         end = strchr(start, ' ');
1276                         strncpy(buf, cmdline, (start - cmdline + 8));
1277                         if (end)
1278                                 strcpy(buf + (start - cmdline + 8), end);
1279                         else
1280                                 buf[start - cmdline + 8] = '\0';
1281                 } else {
1282                         strcpy(buf, cmdline);
1283                         strcat(buf, " console=");
1284                 }
1285         } else {
1286                 strcpy(buf, "console=");
1287         }
1288
1289         setenv("bootargs", buf);
1290         debug("after silent fix-up: %s\n", buf);
1291 }
1292 #endif /* CONFIG_SILENT_CONSOLE */
1293
1294
1295 /*******************************************************************/
1296 /* OS booting routines */
1297 /*******************************************************************/
1298
1299 #ifdef CONFIG_BOOTM_NETBSD
1300 static int do_bootm_netbsd(int flag, int argc, char * const argv[],
1301                             bootm_headers_t *images)
1302 {
1303         void (*loader)(bd_t *, image_header_t *, char *, char *);
1304         image_header_t *os_hdr, *hdr;
1305         ulong kernel_data, kernel_len;
1306         char *consdev;
1307         char *cmdline;
1308
1309         if ((flag != 0) && (flag != BOOTM_STATE_OS_GO))
1310                 return 1;
1311
1312 #if defined(CONFIG_FIT)
1313         if (!images->legacy_hdr_valid) {
1314                 fit_unsupported_reset("NetBSD");
1315                 return 1;
1316         }
1317 #endif
1318         hdr = images->legacy_hdr_os;
1319
1320         /*
1321          * Booting a (NetBSD) kernel image
1322          *
1323          * This process is pretty similar to a standalone application:
1324          * The (first part of an multi-) image must be a stage-2 loader,
1325          * which in turn is responsible for loading & invoking the actual
1326          * kernel.  The only differences are the parameters being passed:
1327          * besides the board info strucure, the loader expects a command
1328          * line, the name of the console device, and (optionally) the
1329          * address of the original image header.
1330          */
1331         os_hdr = NULL;
1332         if (image_check_type(&images->legacy_hdr_os_copy, IH_TYPE_MULTI)) {
1333                 image_multi_getimg(hdr, 1, &kernel_data, &kernel_len);
1334                 if (kernel_len)
1335                         os_hdr = hdr;
1336         }
1337
1338         consdev = "";
1339 #if   defined(CONFIG_8xx_CONS_SMC1)
1340         consdev = "smc1";
1341 #elif defined(CONFIG_8xx_CONS_SMC2)
1342         consdev = "smc2";
1343 #elif defined(CONFIG_8xx_CONS_SCC2)
1344         consdev = "scc2";
1345 #elif defined(CONFIG_8xx_CONS_SCC3)
1346         consdev = "scc3";
1347 #endif
1348
1349         if (argc > 2) {
1350                 ulong len;
1351                 int   i;
1352
1353                 for (i = 2, len = 0; i < argc; i += 1)
1354                         len += strlen(argv[i]) + 1;
1355                 cmdline = malloc(len);
1356
1357                 for (i = 2, len = 0; i < argc; i += 1) {
1358                         if (i > 2)
1359                                 cmdline[len++] = ' ';
1360                         strcpy(&cmdline[len], argv[i]);
1361                         len += strlen(argv[i]);
1362                 }
1363         } else if ((cmdline = getenv("bootargs")) == NULL) {
1364                 cmdline = "";
1365         }
1366
1367         loader = (void (*)(bd_t *, image_header_t *, char *, char *))images->ep;
1368
1369         printf("## Transferring control to NetBSD stage-2 loader "
1370                 "(at address %08lx) ...\n",
1371                 (ulong)loader);
1372
1373         bootstage_mark(BOOTSTAGE_ID_RUN_OS);
1374
1375         /*
1376          * NetBSD Stage-2 Loader Parameters:
1377          *   r3: ptr to board info data
1378          *   r4: image address
1379          *   r5: console device
1380          *   r6: boot args string
1381          */
1382         (*loader)(gd->bd, os_hdr, consdev, cmdline);
1383
1384         return 1;
1385 }
1386 #endif /* CONFIG_BOOTM_NETBSD*/
1387
1388 #ifdef CONFIG_LYNXKDI
1389 static int do_bootm_lynxkdi(int flag, int argc, char * const argv[],
1390                              bootm_headers_t *images)
1391 {
1392         image_header_t *hdr = &images->legacy_hdr_os_copy;
1393
1394         if ((flag != 0) && (flag != BOOTM_STATE_OS_GO))
1395                 return 1;
1396
1397 #if defined(CONFIG_FIT)
1398         if (!images->legacy_hdr_valid) {
1399                 fit_unsupported_reset("Lynx");
1400                 return 1;
1401         }
1402 #endif
1403
1404         lynxkdi_boot((image_header_t *)hdr);
1405
1406         return 1;
1407 }
1408 #endif /* CONFIG_LYNXKDI */
1409
1410 #ifdef CONFIG_BOOTM_RTEMS
1411 static int do_bootm_rtems(int flag, int argc, char * const argv[],
1412                            bootm_headers_t *images)
1413 {
1414         void (*entry_point)(bd_t *);
1415
1416         if ((flag != 0) && (flag != BOOTM_STATE_OS_GO))
1417                 return 1;
1418
1419 #if defined(CONFIG_FIT)
1420         if (!images->legacy_hdr_valid) {
1421                 fit_unsupported_reset("RTEMS");
1422                 return 1;
1423         }
1424 #endif
1425
1426         entry_point = (void (*)(bd_t *))images->ep;
1427
1428         printf("## Transferring control to RTEMS (at address %08lx) ...\n",
1429                 (ulong)entry_point);
1430
1431         bootstage_mark(BOOTSTAGE_ID_RUN_OS);
1432
1433         /*
1434          * RTEMS Parameters:
1435          *   r3: ptr to board info data
1436          */
1437         (*entry_point)(gd->bd);
1438
1439         return 1;
1440 }
1441 #endif /* CONFIG_BOOTM_RTEMS */
1442
1443 #if defined(CONFIG_BOOTM_OSE)
1444 static int do_bootm_ose(int flag, int argc, char * const argv[],
1445                            bootm_headers_t *images)
1446 {
1447         void (*entry_point)(void);
1448
1449         if ((flag != 0) && (flag != BOOTM_STATE_OS_GO))
1450                 return 1;
1451
1452 #if defined(CONFIG_FIT)
1453         if (!images->legacy_hdr_valid) {
1454                 fit_unsupported_reset("OSE");
1455                 return 1;
1456         }
1457 #endif
1458
1459         entry_point = (void (*)(void))images->ep;
1460
1461         printf("## Transferring control to OSE (at address %08lx) ...\n",
1462                 (ulong)entry_point);
1463
1464         bootstage_mark(BOOTSTAGE_ID_RUN_OS);
1465
1466         /*
1467          * OSE Parameters:
1468          *   None
1469          */
1470         (*entry_point)();
1471
1472         return 1;
1473 }
1474 #endif /* CONFIG_BOOTM_OSE */
1475
1476 #if defined(CONFIG_CMD_ELF)
1477 static int do_bootm_vxworks(int flag, int argc, char * const argv[],
1478                              bootm_headers_t *images)
1479 {
1480         char str[80];
1481
1482         if ((flag != 0) && (flag != BOOTM_STATE_OS_GO))
1483                 return 1;
1484
1485 #if defined(CONFIG_FIT)
1486         if (!images->legacy_hdr_valid) {
1487                 fit_unsupported_reset("VxWorks");
1488                 return 1;
1489         }
1490 #endif
1491
1492         sprintf(str, "%lx", images->ep); /* write entry-point into string */
1493         setenv("loadaddr", str);
1494         do_bootvx(NULL, 0, 0, NULL);
1495
1496         return 1;
1497 }
1498
1499 static int do_bootm_qnxelf(int flag, int argc, char * const argv[],
1500                             bootm_headers_t *images)
1501 {
1502         char *local_args[2];
1503         char str[16];
1504
1505         if ((flag != 0) && (flag != BOOTM_STATE_OS_GO))
1506                 return 1;
1507
1508 #if defined(CONFIG_FIT)
1509         if (!images->legacy_hdr_valid) {
1510                 fit_unsupported_reset("QNX");
1511                 return 1;
1512         }
1513 #endif
1514
1515         sprintf(str, "%lx", images->ep); /* write entry-point into string */
1516         local_args[0] = argv[0];
1517         local_args[1] = str;    /* and provide it via the arguments */
1518         do_bootelf(NULL, 0, 2, local_args);
1519
1520         return 1;
1521 }
1522 #endif
1523
1524 #ifdef CONFIG_INTEGRITY
1525 static int do_bootm_integrity(int flag, int argc, char * const argv[],
1526                            bootm_headers_t *images)
1527 {
1528         void (*entry_point)(void);
1529
1530         if ((flag != 0) && (flag != BOOTM_STATE_OS_GO))
1531                 return 1;
1532
1533 #if defined(CONFIG_FIT)
1534         if (!images->legacy_hdr_valid) {
1535                 fit_unsupported_reset("INTEGRITY");
1536                 return 1;
1537         }
1538 #endif
1539
1540         entry_point = (void (*)(void))images->ep;
1541
1542         printf("## Transferring control to INTEGRITY (at address %08lx) ...\n",
1543                 (ulong)entry_point);
1544
1545         bootstage_mark(BOOTSTAGE_ID_RUN_OS);
1546
1547         /*
1548          * INTEGRITY Parameters:
1549          *   None
1550          */
1551         (*entry_point)();
1552
1553         return 1;
1554 }
1555 #endif
1556
1557 #ifdef CONFIG_CMD_BOOTZ
1558
1559 static int __bootz_setup(void *image, void **start, void **end)
1560 {
1561         /* Please define bootz_setup() for your platform */
1562
1563         puts("Your platform's zImage format isn't supported yet!\n");
1564         return -1;
1565 }
1566 int bootz_setup(void *image, void **start, void **end)
1567         __attribute__((weak, alias("__bootz_setup")));
1568
1569 /*
1570  * zImage booting support
1571  */
1572 static int bootz_start(cmd_tbl_t *cmdtp, int flag, int argc,
1573                         char * const argv[], bootm_headers_t *images)
1574 {
1575         int ret;
1576         void *zi_start, *zi_end;
1577
1578         memset(images, 0, sizeof(bootm_headers_t));
1579
1580         boot_start_lmb(images);
1581
1582         /* Setup Linux kernel zImage entry point */
1583         if (argc < 2) {
1584                 images->ep = load_addr;
1585                 debug("*  kernel: default image load address = 0x%08lx\n",
1586                                 load_addr);
1587         } else {
1588                 images->ep = simple_strtoul(argv[1], NULL, 16);
1589                 debug("*  kernel: cmdline image address = 0x%08lx\n",
1590                         images->ep);
1591         }
1592
1593         ret = bootz_setup((void *)images->ep, &zi_start, &zi_end);
1594         if (ret != 0)
1595                 return 1;
1596
1597         lmb_reserve(&images->lmb, images->ep, zi_end - zi_start);
1598
1599         /* Find ramdisk */
1600         ret = boot_get_ramdisk(argc, argv, images, IH_INITRD_ARCH,
1601                         &images->rd_start, &images->rd_end);
1602         if (ret) {
1603                 puts("Ramdisk image is corrupt or invalid\n");
1604                 return 1;
1605         }
1606
1607 #if defined(CONFIG_OF_LIBFDT)
1608         /* find flattened device tree */
1609         ret = boot_get_fdt(flag, argc, argv, images,
1610                            &images->ft_addr, &images->ft_len);
1611         if (ret) {
1612                 puts("Could not find a valid device tree\n");
1613                 return 1;
1614         }
1615
1616         set_working_fdt_addr(images->ft_addr);
1617 #endif
1618
1619         return 0;
1620 }
1621
1622 static int do_bootz(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
1623 {
1624         bootm_headers_t images;
1625
1626         if (bootz_start(cmdtp, flag, argc, argv, &images))
1627                 return 1;
1628
1629         /*
1630          * We have reached the point of no return: we are going to
1631          * overwrite all exception vector code, so we cannot easily
1632          * recover from any failures any more...
1633          */
1634         disable_interrupts();
1635
1636 #ifdef CONFIG_NETCONSOLE
1637         /* Stop the ethernet stack if NetConsole could have left it up */
1638         eth_halt();
1639 #endif
1640
1641 #if defined(CONFIG_CMD_USB)
1642         /*
1643          * turn off USB to prevent the host controller from writing to the
1644          * SDRAM while Linux is booting. This could happen (at least for OHCI
1645          * controller), because the HCCA (Host Controller Communication Area)
1646          * lies within the SDRAM and the host controller writes continously to
1647          * this area (as busmaster!). The HccaFrameNumber is for example
1648          * updated every 1 ms within the HCCA structure in SDRAM! For more
1649          * details see the OpenHCI specification.
1650          */
1651         usb_stop();
1652 #endif
1653
1654 #ifdef CONFIG_SILENT_CONSOLE
1655         fixup_silent_linux();
1656 #endif
1657         arch_preboot_os();
1658
1659         do_bootm_linux(0, argc, argv, &images);
1660 #ifdef DEBUG
1661         puts("\n## Control returned to monitor - resetting...\n");
1662 #endif
1663         do_reset(cmdtp, flag, argc, argv);
1664
1665         return 1;
1666 }
1667
1668 #ifdef CONFIG_SYS_LONGHELP
1669 static char bootz_help_text[] =
1670         "[addr [initrd[:size]] [fdt]]\n"
1671         "    - boot Linux zImage stored in memory\n"
1672         "\tThe argument 'initrd' is optional and specifies the address\n"
1673         "\tof the initrd in memory. The optional argument ':size' allows\n"
1674         "\tspecifying the size of RAW initrd.\n"
1675 #if defined(CONFIG_OF_LIBFDT)
1676         "\tWhen booting a Linux kernel which requires a flat device-tree\n"
1677         "\ta third argument is required which is the address of the\n"
1678         "\tdevice-tree blob. To boot that kernel without an initrd image,\n"
1679         "\tuse a '-' for the second argument. If you do not pass a third\n"
1680         "\ta bd_info struct will be passed instead\n"
1681 #endif
1682         "";
1683 #endif
1684
1685 U_BOOT_CMD(
1686         bootz,  CONFIG_SYS_MAXARGS,     1,      do_bootz,
1687         "boot Linux zImage image from memory", bootz_help_text
1688 );
1689 #endif  /* CONFIG_CMD_BOOTZ */