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