[J-u-boot.git] / arch / arm / lib / bootm.c

/* Copyright (C) 2011
 * Corscience GmbH & Co. KG - Simon Schwarz <[email protected]>
 *  - Added prep subcommand support
 *  - Reorganized source - modeled after powerpc version
 *
 * (C) Copyright 2002
 * Sysgo Real-Time Solutions, GmbH <www.elinos.com>
 * Marius Groeger <[email protected]>
 *
 * Copyright (C) 2001  Erik Mouw ([email protected])
 *
 * SPDX-License-Identifier:	GPL-2.0+
 */

#include <common.h>
#include <command.h>
#include <dm.h>
#include <dm/root.h>
#include <image.h>
#include <u-boot/zlib.h>
#include <asm/byteorder.h>
#include <libfdt.h>
#include <mapmem.h>
#include <fdt_support.h>
#include <asm/bootm.h>
#include <asm/secure.h>
#include <linux/compiler.h>
#include <bootm.h>
#include <vxworks.h>

#ifdef CONFIG_ARMV7_NONSEC
#include <asm/armv7.h>
#endif
#include <asm/setup.h>

DECLARE_GLOBAL_DATA_PTR;

static struct tag *params;

static ulong get_sp(void)
{
	ulong ret;

	asm("mov %0, sp" : "=r"(ret) : );
	return ret;
}

void arch_lmb_reserve(struct lmb *lmb)
{
	ulong sp;

	/*
	 * Booting a (Linux) kernel image
	 *
	 * Allocate space for command line and board info - the
	 * address should be as high as possible within the reach of
	 * the kernel (see CONFIG_SYS_BOOTMAPSZ settings), but in unused
	 * memory, which means far enough below the current stack
	 * pointer.
	 */
	sp = get_sp();
	debug("## Current stack ends at 0x%08lx ", sp);

	/* adjust sp by 4K to be safe */
	sp -= 4096;
	lmb_reserve(lmb, sp,
		    gd->bd->bi_dram[0].start + gd->bd->bi_dram[0].size - sp);
}

__weak void board_quiesce_devices(void)
{
}

/**
 * announce_and_cleanup() - Print message and prepare for kernel boot
 *
 * @fake: non-zero to do everything except actually boot
 */
static void announce_and_cleanup(int fake)
{
	printf("\nStarting kernel ...%s\n\n", fake ?
		"(fake run for tracing)" : "");
	bootstage_mark_name(BOOTSTAGE_ID_BOOTM_HANDOFF, "start_kernel");
#ifdef CONFIG_BOOTSTAGE_FDT
	bootstage_fdt_add_report();
#endif
#ifdef CONFIG_BOOTSTAGE_REPORT
	bootstage_report();
#endif

#ifdef CONFIG_USB_DEVICE
	udc_disconnect();
#endif

	board_quiesce_devices();

	/*
	 * Call remove function of all devices with a removal flag set.
	 * This may be useful for last-stage operations, like cancelling
	 * of DMA operation or releasing device internal buffers.
	 */
	dm_remove_devices_flags(DM_REMOVE_ACTIVE_ALL);

	cleanup_before_linux();
}

static void setup_start_tag (bd_t *bd)
{
	params = (struct tag *)bd->bi_boot_params;

	params->hdr.tag = ATAG_CORE;
	params->hdr.size = tag_size (tag_core);

	params->u.core.flags = 0;
	params->u.core.pagesize = 0;
	params->u.core.rootdev = 0;

	params = tag_next (params);
}

static void setup_memory_tags(bd_t *bd)
{
	int i;

	for (i = 0; i < CONFIG_NR_DRAM_BANKS; i++) {
		params->hdr.tag = ATAG_MEM;
		params->hdr.size = tag_size (tag_mem32);

		params->u.mem.start = bd->bi_dram[i].start;
		params->u.mem.size = bd->bi_dram[i].size;

		params = tag_next (params);
	}
}

static void setup_commandline_tag(bd_t *bd, char *commandline)
{
	char *p;

	if (!commandline)
		return;

	/* eat leading white space */
	for (p = commandline; *p == ' '; p++);

	/* skip non-existent command lines so the kernel will still
	 * use its default command line.
	 */
	if (*p == '\0')
		return;

	params->hdr.tag = ATAG_CMDLINE;
	params->hdr.size =
		(sizeof (struct tag_header) + strlen (p) + 1 + 4) >> 2;

	strcpy (params->u.cmdline.cmdline, p);

	params = tag_next (params);
}

static void setup_initrd_tag(bd_t *bd, ulong initrd_start, ulong initrd_end)
{
	/* an ATAG_INITRD node tells the kernel where the compressed
	 * ramdisk can be found. ATAG_RDIMG is a better name, actually.
	 */
	params->hdr.tag = ATAG_INITRD2;
	params->hdr.size = tag_size (tag_initrd);

	params->u.initrd.start = initrd_start;
	params->u.initrd.size = initrd_end - initrd_start;

	params = tag_next (params);
}

static void setup_serial_tag(struct tag **tmp)
{
	struct tag *params = *tmp;
	struct tag_serialnr serialnr;

	get_board_serial(&serialnr);
	params->hdr.tag = ATAG_SERIAL;
	params->hdr.size = tag_size (tag_serialnr);
	params->u.serialnr.low = serialnr.low;
	params->u.serialnr.high= serialnr.high;
	params = tag_next (params);
	*tmp = params;
}

static void setup_revision_tag(struct tag **in_params)
{
	u32 rev = 0;

	rev = get_board_rev();
	params->hdr.tag = ATAG_REVISION;
	params->hdr.size = tag_size (tag_revision);
	params->u.revision.rev = rev;
	params = tag_next (params);
}

static void setup_end_tag(bd_t *bd)
{
	params->hdr.tag = ATAG_NONE;
	params->hdr.size = 0;
}

__weak void setup_board_tags(struct tag **in_params) {}

#ifdef CONFIG_ARM64
static void do_nonsec_virt_switch(void)
{
	smp_kick_all_cpus();
	dcache_disable();	/* flush cache before swtiching to EL2 */
}
#endif

/* Subcommand: PREP */
static void boot_prep_linux(bootm_headers_t *images)
{
	char *commandline = getenv("bootargs");

	if (IMAGE_ENABLE_OF_LIBFDT && images->ft_len) {
#ifdef CONFIG_OF_LIBFDT
		debug("using: FDT\n");
		if (image_setup_linux(images)) {
			printf("FDT creation failed! hanging...");
			hang();
		}
#endif
	} else if (BOOTM_ENABLE_TAGS) {
		debug("using: ATAGS\n");
		setup_start_tag(gd->bd);
		if (BOOTM_ENABLE_SERIAL_TAG)
			setup_serial_tag(&params);
		if (BOOTM_ENABLE_CMDLINE_TAG)
			setup_commandline_tag(gd->bd, commandline);
		if (BOOTM_ENABLE_REVISION_TAG)
			setup_revision_tag(&params);
		if (BOOTM_ENABLE_MEMORY_TAGS)
			setup_memory_tags(gd->bd);
		if (BOOTM_ENABLE_INITRD_TAG) {
			/*
			 * In boot_ramdisk_high(), it may relocate ramdisk to
			 * a specified location. And set images->initrd_start &
			 * images->initrd_end to relocated ramdisk's start/end
			 * addresses. So use them instead of images->rd_start &
			 * images->rd_end when possible.
			 */
			if (images->initrd_start && images->initrd_end) {
				setup_initrd_tag(gd->bd, images->initrd_start,
						 images->initrd_end);
			} else if (images->rd_start && images->rd_end) {
				setup_initrd_tag(gd->bd, images->rd_start,
						 images->rd_end);
			}
		}
		setup_board_tags(&params);
		setup_end_tag(gd->bd);
	} else {
		printf("FDT and ATAGS support not compiled in - hanging\n");
		hang();
	}
}

__weak bool armv7_boot_nonsec_default(void)
{
#ifdef CONFIG_ARMV7_BOOT_SEC_DEFAULT
	return false;
#else
	return true;
#endif
}

#ifdef CONFIG_ARMV7_NONSEC
bool armv7_boot_nonsec(void)
{
	char *s = getenv("bootm_boot_mode");
	bool nonsec = armv7_boot_nonsec_default();

	if (s && !strcmp(s, "sec"))
		nonsec = false;

	if (s && !strcmp(s, "nonsec"))
		nonsec = true;

	return nonsec;
}
#endif

#ifdef CONFIG_ARM64
__weak void update_os_arch_secondary_cores(uint8_t os_arch)
{
}

#ifdef CONFIG_ARMV8_SWITCH_TO_EL1
static void switch_to_el1(void)
{
	if ((IH_ARCH_DEFAULT == IH_ARCH_ARM64) &&
	    (images.os.arch == IH_ARCH_ARM))
		armv8_switch_to_el1(0, (u64)gd->bd->bi_arch_number,
				    (u64)images.ft_addr, 0,
				    (u64)images.ep,
				    ES_TO_AARCH32);
	else
		armv8_switch_to_el1((u64)images.ft_addr, 0, 0, 0,
				    images.ep,
				    ES_TO_AARCH64);
}
#endif
#endif

/* Subcommand: GO */
static void boot_jump_linux(bootm_headers_t *images, int flag)
{
#ifdef CONFIG_ARM64
	void (*kernel_entry)(void *fdt_addr, void *res0, void *res1,
			void *res2);
	int fake = (flag & BOOTM_STATE_OS_FAKE_GO);

	kernel_entry = (void (*)(void *fdt_addr, void *res0, void *res1,
				void *res2))images->ep;

	debug("## Transferring control to Linux (at address %lx)...\n",
		(ulong) kernel_entry);
	bootstage_mark(BOOTSTAGE_ID_RUN_OS);

	announce_and_cleanup(fake);

	if (!fake) {
#ifdef CONFIG_ARMV8_PSCI
		armv8_setup_psci();
#endif
		do_nonsec_virt_switch();

		update_os_arch_secondary_cores(images->os.arch);

#ifdef CONFIG_ARMV8_SWITCH_TO_EL1
		armv8_switch_to_el2((u64)images->ft_addr, 0, 0, 0,
				    (u64)switch_to_el1, ES_TO_AARCH64);
#else
		if ((IH_ARCH_DEFAULT == IH_ARCH_ARM64) &&
		    (images->os.arch == IH_ARCH_ARM))
			armv8_switch_to_el2(0, (u64)gd->bd->bi_arch_number,
					    (u64)images->ft_addr, 0,
					    (u64)images->ep,
					    ES_TO_AARCH32);
		else
			armv8_switch_to_el2((u64)images->ft_addr, 0, 0, 0,
					    images->ep,
					    ES_TO_AARCH64);
#endif
	}
#else
	unsigned long machid = gd->bd->bi_arch_number;
	char *s;
	void (*kernel_entry)(int zero, int arch, uint params);
	unsigned long r2;
	int fake = (flag & BOOTM_STATE_OS_FAKE_GO);

	kernel_entry = (void (*)(int, int, uint))images->ep;
#ifdef CONFIG_CPU_V7M
	ulong addr = (ulong)kernel_entry | 1;
	kernel_entry = (void *)addr;
#endif
	s = getenv("machid");
	if (s) {
		if (strict_strtoul(s, 16, &machid) < 0) {
			debug("strict_strtoul failed!\n");
			return;
		}
		printf("Using machid 0x%lx from environment\n", machid);
	}

	debug("## Transferring control to Linux (at address %08lx)" \
		"...\n", (ulong) kernel_entry);
	bootstage_mark(BOOTSTAGE_ID_RUN_OS);
	announce_and_cleanup(fake);

	if (IMAGE_ENABLE_OF_LIBFDT && images->ft_len)
		r2 = (unsigned long)images->ft_addr;
	else
		r2 = gd->bd->bi_boot_params;

	if (!fake) {
#ifdef CONFIG_ARMV7_NONSEC
		if (armv7_boot_nonsec()) {
			armv7_init_nonsec();
			secure_ram_addr(_do_nonsec_entry)(kernel_entry,
							  0, machid, r2);
		} else
#endif
			kernel_entry(0, machid, r2);
	}
#endif
}

/* Main Entry point for arm bootm implementation
 *
 * Modeled after the powerpc implementation
 * DIFFERENCE: Instead of calling prep and go at the end
 * they are called if subcommand is equal 0.
 */
int do_bootm_linux(int flag, int argc, char * const argv[],
		   bootm_headers_t *images)
{
	/* No need for those on ARM */
	if (flag & BOOTM_STATE_OS_BD_T || flag & BOOTM_STATE_OS_CMDLINE)
		return -1;

	if (flag & BOOTM_STATE_OS_PREP) {
		boot_prep_linux(images);
		return 0;
	}

	if (flag & (BOOTM_STATE_OS_GO | BOOTM_STATE_OS_FAKE_GO)) {
		boot_jump_linux(images, flag);
		return 0;
	}

	boot_prep_linux(images);
	boot_jump_linux(images, flag);
	return 0;
}

#if defined(CONFIG_BOOTM_VXWORKS)
void boot_prep_vxworks(bootm_headers_t *images)
{
#if defined(CONFIG_OF_LIBFDT)
	int off;

	if (images->ft_addr) {
		off = fdt_path_offset(images->ft_addr, "/memory");
		if (off < 0) {
			if (arch_fixup_fdt(images->ft_addr))
				puts("## WARNING: fixup memory failed!\n");
		}
	}
#endif
	cleanup_before_linux();
}
void boot_jump_vxworks(bootm_headers_t *images)
{
	/* ARM VxWorks requires device tree physical address to be passed */
	((void (*)(void *))images->ep)(images->ft_addr);
}
#endif
Commit	Line	Data
0a672d49 SS	1	/* Copyright (C) 2011
	2	* Corscience GmbH & Co. KG - Simon Schwarz <[email protected]>
	3	* - Added prep subcommand support
	4	* - Reorganized source - modeled after powerpc version
	5	*
c609719b WD	6	* (C) Copyright 2002
	7	* Sysgo Real-Time Solutions, GmbH <www.elinos.com>
	8	* Marius Groeger <[email protected]>
	9	*
	10	* Copyright (C) 2001 Erik Mouw ([email protected])
	11	*
1a459660	12	* SPDX-License-Identifier: GPL-2.0+
c609719b WD	13	*/
	14
	15	#include <common.h>
	16	#include <command.h>
9d922450	17	#include <dm.h>
1b8220aa	18	#include <dm/root.h>
c609719b	19	#include <image.h>
a31e091a	20	#include <u-boot/zlib.h>
c609719b	21	#include <asm/byteorder.h>
2d1916e4	22	#include <libfdt.h>
0eb25b61	23	#include <mapmem.h>
2d1916e4	24	#include <fdt_support.h>
0a672d49	25	#include <asm/bootm.h>
f510aeae	26	#include <asm/secure.h>
89e6f138	27	#include <linux/compiler.h>
8d196e52 EN	28	#include <bootm.h>
8d196e52 EN	29	#include <vxworks.h>
c609719b	30
104d6fb6	31	#ifdef CONFIG_ARMV7_NONSEC
bb975455 AP	32	#include <asm/armv7.h>
bb975455 AP	33	#endif
c45300b0	34	#include <asm/setup.h>
bb975455	35
d87080b7 WD	36	DECLARE_GLOBAL_DATA_PTR;
d87080b7 WD	37
c609719b	38	static struct tag *params;
2d1916e4	39
0a672d49 SS	40	static ulong get_sp(void)
	41	{
	42	ulong ret;
	43
	44	asm("mov %0, sp" : "=r"(ret) : );
	45	return ret;
	46	}
	47
2d1916e4 JR	48	void arch_lmb_reserve(struct lmb *lmb)
	49	{
	50	ulong sp;
	51
	52	/*
	53	* Booting a (Linux) kernel image
	54	*
	55	* Allocate space for command line and board info - the
	56	* address should be as high as possible within the reach of
	57	* the kernel (see CONFIG_SYS_BOOTMAPSZ settings), but in unused
	58	* memory, which means far enough below the current stack
	59	* pointer.
	60	*/
	61	sp = get_sp();
	62	debug("## Current stack ends at 0x%08lx ", sp);
	63
fcfa696b RH	64	/* adjust sp by 4K to be safe */
fcfa696b RH	65	sp -= 4096;
2d1916e4 JR	66	lmb_reserve(lmb, sp,
	67	gd->bd->bi_dram[0].start + gd->bd->bi_dram[0].size - sp);
	68	}
	69
b7b8410a AG	70	__weak void board_quiesce_devices(void)
	71	{
	72	}
	73
bce1b92a SG	74	/**
	75	* announce_and_cleanup() - Print message and prepare for kernel boot
	76	*
	77	* @fake: non-zero to do everything except actually boot
	78	*/
	79	static void announce_and_cleanup(int fake)
2d1916e4	80	{
bce1b92a SG	81	printf("\nStarting kernel ...%s\n\n", fake ?
bce1b92a SG	82	"(fake run for tracing)" : "");
0a672d49	83	bootstage_mark_name(BOOTSTAGE_ID_BOOTM_HANDOFF, "start_kernel");
94fd1316	84	#ifdef CONFIG_BOOTSTAGE_FDT
91290cf7	85	bootstage_fdt_add_report();
94fd1316	86	#endif
0a672d49 SS	87	#ifdef CONFIG_BOOTSTAGE_REPORT
	88	bootstage_report();
	89	#endif
1055171e	90
0a672d49 SS	91	#ifdef CONFIG_USB_DEVICE
0a672d49 SS	92	udc_disconnect();
2d1916e4	93	#endif
b7b8410a AG	94
	95	board_quiesce_devices();
	96
1b8220aa SR	97	/*
	98	* Call remove function of all devices with a removal flag set.
	99	* This may be useful for last-stage operations, like cancelling
	100	* of DMA operation or releasing device internal buffers.
	101	*/
	102	dm_remove_devices_flags(DM_REMOVE_ACTIVE_ALL);
	103
0a672d49 SS	104	cleanup_before_linux();
0a672d49 SS	105	}
c609719b	106
5779d8d9	107	static void setup_start_tag (bd_t *bd)
c609719b	108	{
0a672d49	109	params = (struct tag *)bd->bi_boot_params;
c609719b	110
5779d8d9 WD	111	params->hdr.tag = ATAG_CORE;
5779d8d9 WD	112	params->hdr.size = tag_size (tag_core);
c609719b	113
5779d8d9 WD	114	params->u.core.flags = 0;
	115	params->u.core.pagesize = 0;
	116	params->u.core.rootdev = 0;
c609719b	117
5779d8d9	118	params = tag_next (params);
c609719b	119	}
c609719b	120
0a672d49	121	static void setup_memory_tags(bd_t *bd)
c609719b	122	{
5779d8d9	123	int i;
c609719b	124
5779d8d9 WD	125	for (i = 0; i < CONFIG_NR_DRAM_BANKS; i++) {
	126	params->hdr.tag = ATAG_MEM;
	127	params->hdr.size = tag_size (tag_mem32);
c609719b	128
5779d8d9 WD	129	params->u.mem.start = bd->bi_dram[i].start;
5779d8d9 WD	130	params->u.mem.size = bd->bi_dram[i].size;
c609719b	131
5779d8d9 WD	132	params = tag_next (params);
5779d8d9 WD	133	}
c609719b	134	}
c609719b	135
0a672d49	136	static void setup_commandline_tag(bd_t bd, char commandline)
c609719b	137	{
5779d8d9	138	char *p;
c609719b	139
109c0e3a WD	140	if (!commandline)
	141	return;
	142
5779d8d9 WD	143	/* eat leading white space */
5779d8d9 WD	144	for (p = commandline; *p == ' '; p++);
c609719b	145
5779d8d9 WD	146	/* skip non-existent command lines so the kernel will still
	147	* use its default command line.
	148	*/
	149	if (*p == '\0')
	150	return;
c609719b	151
5779d8d9 WD	152	params->hdr.tag = ATAG_CMDLINE;
	153	params->hdr.size =
	154	(sizeof (struct tag_header) + strlen (p) + 1 + 4) >> 2;
c609719b	155
5779d8d9	156	strcpy (params->u.cmdline.cmdline, p);
c609719b	157
5779d8d9	158	params = tag_next (params);
c609719b	159	}
c609719b	160
0a672d49	161	static void setup_initrd_tag(bd_t *bd, ulong initrd_start, ulong initrd_end)
c609719b	162	{
5779d8d9 WD	163	/* an ATAG_INITRD node tells the kernel where the compressed
	164	* ramdisk can be found. ATAG_RDIMG is a better name, actually.
	165	*/
498b8db7	166	params->hdr.tag = ATAG_INITRD2;
5779d8d9	167	params->hdr.size = tag_size (tag_initrd);
c609719b	168
5779d8d9 WD	169	params->u.initrd.start = initrd_start;
5779d8d9 WD	170	params->u.initrd.size = initrd_end - initrd_start;
c609719b	171
5779d8d9	172	params = tag_next (params);
c609719b WD	173	}
c609719b WD	174
c19d13b0	175	static void setup_serial_tag(struct tag **tmp)
3a574cbe WD	176	{
	177	struct tag params = tmp;
	178	struct tag_serialnr serialnr;
3a574cbe WD	179
	180	get_board_serial(&serialnr);
	181	params->hdr.tag = ATAG_SERIAL;
	182	params->hdr.size = tag_size (tag_serialnr);
	183	params->u.serialnr.low = serialnr.low;
	184	params->u.serialnr.high= serialnr.high;
	185	params = tag_next (params);
	186	*tmp = params;
	187	}
3a574cbe	188
c19d13b0	189	static void setup_revision_tag(struct tag **in_params)
289f932c WD	190	{
289f932c WD	191	u32 rev = 0;
289f932c WD	192
289f932c WD	193	rev = get_board_rev();
289f932c WD	194	params->hdr.tag = ATAG_REVISION;
	195	params->hdr.size = tag_size (tag_revision);
	196	params->u.revision.rev = rev;
	197	params = tag_next (params);
	198	}
289f932c	199
0a672d49	200	static void setup_end_tag(bd_t *bd)
c609719b	201	{
5779d8d9 WD	202	params->hdr.tag = ATAG_NONE;
5779d8d9 WD	203	params->hdr.size = 0;
c609719b WD	204	}
c609719b WD	205
89e6f138 T	206	__weak void setup_board_tags(struct tag **in_params) {}
89e6f138 T	207
f510aeae	208	#ifdef CONFIG_ARM64
bb975455 AP	209	static void do_nonsec_virt_switch(void)
bb975455 AP	210	{
0ae76531	211	smp_kick_all_cpus();
dcd468b8	212	dcache_disable(); /* flush cache before swtiching to EL2 */
bb975455	213	}
f510aeae	214	#endif
bb975455	215
0a672d49 SS	216	/* Subcommand: PREP */
	217	static void boot_prep_linux(bootm_headers_t *images)
	218	{
0a672d49	219	char *commandline = getenv("bootargs");
0a672d49	220
c19d13b0	221	if (IMAGE_ENABLE_OF_LIBFDT && images->ft_len) {
0a672d49	222	#ifdef CONFIG_OF_LIBFDT
0a672d49	223	debug("using: FDT\n");
6caa1956	224	if (image_setup_linux(images)) {
0a672d49 SS	225	printf("FDT creation failed! hanging...");
	226	hang();
	227	}
0a672d49	228	#endif
c19d13b0	229	} else if (BOOTM_ENABLE_TAGS) {
0a672d49 SS	230	debug("using: ATAGS\n");
0a672d49 SS	231	setup_start_tag(gd->bd);
c19d13b0 SG	232	if (BOOTM_ENABLE_SERIAL_TAG)
	233	setup_serial_tag(&params);
	234	if (BOOTM_ENABLE_CMDLINE_TAG)
	235	setup_commandline_tag(gd->bd, commandline);
	236	if (BOOTM_ENABLE_REVISION_TAG)
	237	setup_revision_tag(&params);
	238	if (BOOTM_ENABLE_MEMORY_TAGS)
	239	setup_memory_tags(gd->bd);
	240	if (BOOTM_ENABLE_INITRD_TAG) {
f7ee071a JC	241	/*
	242	* In boot_ramdisk_high(), it may relocate ramdisk to
	243	* a specified location. And set images->initrd_start &
	244	* images->initrd_end to relocated ramdisk's start/end
	245	* addresses. So use them instead of images->rd_start &
	246	* images->rd_end when possible.
	247	*/
	248	if (images->initrd_start && images->initrd_end) {
	249	setup_initrd_tag(gd->bd, images->initrd_start,
	250	images->initrd_end);
	251	} else if (images->rd_start && images->rd_end) {
c19d13b0 SG	252	setup_initrd_tag(gd->bd, images->rd_start,
	253	images->rd_end);
	254	}
	255	}
89e6f138	256	setup_board_tags(&params);
0a672d49	257	setup_end_tag(gd->bd);
c19d13b0	258	} else {
0a672d49 SS	259	printf("FDT and ATAGS support not compiled in - hanging\n");
0a672d49 SS	260	hang();
0a672d49 SS	261	}
	262	}
	263
f225d39d	264	__weak bool armv7_boot_nonsec_default(void)
8bc347e2	265	{
8bc347e2	266	#ifdef CONFIG_ARMV7_BOOT_SEC_DEFAULT
f225d39d	267	return false;
8bc347e2	268	#else
f225d39d	269	return true;
8bc347e2	270	#endif
f225d39d JMT	271	}
	272
	273	#ifdef CONFIG_ARMV7_NONSEC
	274	bool armv7_boot_nonsec(void)
	275	{
	276	char *s = getenv("bootm_boot_mode");
	277	bool nonsec = armv7_boot_nonsec_default();
8bc347e2 HG	278
	279	if (s && !strcmp(s, "sec"))
	280	nonsec = false;
	281
	282	if (s && !strcmp(s, "nonsec"))
	283	nonsec = true;
	284
	285	return nonsec;
	286	}
	287	#endif
	288
ec6617c3	289	#ifdef CONFIG_ARM64
e2c18e40 AW	290	__weak void update_os_arch_secondary_cores(uint8_t os_arch)
	291	{
	292	}
	293
ec6617c3 AW	294	#ifdef CONFIG_ARMV8_SWITCH_TO_EL1
	295	static void switch_to_el1(void)
	296	{
	297	if ((IH_ARCH_DEFAULT == IH_ARCH_ARM64) &&
	298	(images.os.arch == IH_ARCH_ARM))
	299	armv8_switch_to_el1(0, (u64)gd->bd->bi_arch_number,
7c5e1feb	300	(u64)images.ft_addr, 0,
ec6617c3 AW	301	(u64)images.ep,
	302	ES_TO_AARCH32);
	303	else
7c5e1feb	304	armv8_switch_to_el1((u64)images.ft_addr, 0, 0, 0,
ec6617c3 AW	305	images.ep,
	306	ES_TO_AARCH64);
	307	}
	308	#endif
	309	#endif
	310
0a672d49	311	/* Subcommand: GO */
bce1b92a	312	static void boot_jump_linux(bootm_headers_t *images, int flag)
0a672d49	313	{
0ae76531	314	#ifdef CONFIG_ARM64
3f1b6beb TR	315	void (kernel_entry)(void fdt_addr, void res0, void res1,
3f1b6beb TR	316	void *res2);
0ae76531 DF	317	int fake = (flag & BOOTM_STATE_OS_FAKE_GO);
0ae76531 DF	318
3f1b6beb TR	319	kernel_entry = (void ()(void fdt_addr, void res0, void res1,
3f1b6beb TR	320	void *res2))images->ep;
0ae76531 DF	321
	322	debug("## Transferring control to Linux (at address %lx)...\n",
	323	(ulong) kernel_entry);
	324	bootstage_mark(BOOTSTAGE_ID_RUN_OS);
	325
	326	announce_and_cleanup(fake);
	327
c19e0dd7	328	if (!fake) {
9a561753	329	#ifdef CONFIG_ARMV8_PSCI
	330	armv8_setup_psci();
	331	#endif
c19e0dd7	332	do_nonsec_virt_switch();
ec6617c3	333
e2c18e40 AW	334	update_os_arch_secondary_cores(images->os.arch);
e2c18e40 AW	335
ec6617c3	336	#ifdef CONFIG_ARMV8_SWITCH_TO_EL1
7c5e1feb	337	armv8_switch_to_el2((u64)images->ft_addr, 0, 0, 0,
ec6617c3 AW	338	(u64)switch_to_el1, ES_TO_AARCH64);
	339	#else
	340	if ((IH_ARCH_DEFAULT == IH_ARCH_ARM64) &&
	341	(images->os.arch == IH_ARCH_ARM))
	342	armv8_switch_to_el2(0, (u64)gd->bd->bi_arch_number,
7c5e1feb	343	(u64)images->ft_addr, 0,
ec6617c3 AW	344	(u64)images->ep,
	345	ES_TO_AARCH32);
	346	else
7c5e1feb	347	armv8_switch_to_el2((u64)images->ft_addr, 0, 0, 0,
ec6617c3 AW	348	images->ep,
	349	ES_TO_AARCH64);
	350	#endif
c19e0dd7	351	}
0ae76531	352	#else
0a672d49 SS	353	unsigned long machid = gd->bd->bi_arch_number;
	354	char *s;
	355	void (*kernel_entry)(int zero, int arch, uint params);
17239976	356	unsigned long r2;
bce1b92a	357	int fake = (flag & BOOTM_STATE_OS_FAKE_GO);
0a672d49 SS	358
0a672d49 SS	359	kernel_entry = (void (*)(int, int, uint))images->ep;
dc89c6fb PC	360	#ifdef CONFIG_CPU_V7M
	361	ulong addr = (ulong)kernel_entry \| 1;
	362	kernel_entry = (void *)addr;
	363	#endif
0a672d49 SS	364	s = getenv("machid");
0a672d49 SS	365	if (s) {
bc3c89b1 PF	366	if (strict_strtoul(s, 16, &machid) < 0) {
	367	debug("strict_strtoul failed!\n");
	368	return;
	369	}
0a672d49 SS	370	printf("Using machid 0x%lx from environment\n", machid);
	371	}
	372
	373	debug("## Transferring control to Linux (at address %08lx)" \
	374	"...\n", (ulong) kernel_entry);
	375	bootstage_mark(BOOTSTAGE_ID_RUN_OS);
bce1b92a	376	announce_and_cleanup(fake);
17239976	377
c19d13b0	378	if (IMAGE_ENABLE_OF_LIBFDT && images->ft_len)
17239976 SW	379	r2 = (unsigned long)images->ft_addr;
17239976 SW	380	else
17239976 SW	381	r2 = gd->bd->bi_boot_params;
17239976 SW	382
c19e0dd7	383	if (!fake) {
104d6fb6	384	#ifdef CONFIG_ARMV7_NONSEC
97a81964	385	if (armv7_boot_nonsec()) {
8bc347e2 HG	386	armv7_init_nonsec();
	387	secure_ram_addr(_do_nonsec_entry)(kernel_entry,
	388	0, machid, r2);
	389	} else
f510aeae	390	#endif
8bc347e2	391	kernel_entry(0, machid, r2);
c19e0dd7	392	}
0ae76531	393	#endif
0a672d49 SS	394	}
	395
	396	/* Main Entry point for arm bootm implementation
	397	*
	398	* Modeled after the powerpc implementation
	399	* DIFFERENCE: Instead of calling prep and go at the end
	400	* they are called if subcommand is equal 0.
	401	*/
8d196e52 EN	402	int do_bootm_linux(int flag, int argc, char * const argv[],
8d196e52 EN	403	bootm_headers_t *images)
0a672d49 SS	404	{
	405	/* No need for those on ARM */
	406	if (flag & BOOTM_STATE_OS_BD_T \|\| flag & BOOTM_STATE_OS_CMDLINE)
	407	return -1;
	408
	409	if (flag & BOOTM_STATE_OS_PREP) {
	410	boot_prep_linux(images);
	411	return 0;
	412	}
	413
bce1b92a SG	414	if (flag & (BOOTM_STATE_OS_GO \| BOOTM_STATE_OS_FAKE_GO)) {
bce1b92a SG	415	boot_jump_linux(images, flag);
0a672d49 SS	416	return 0;
	417	}
	418
	419	boot_prep_linux(images);
bce1b92a	420	boot_jump_linux(images, flag);
0a672d49	421	return 0;
2d1916e4	422	}
44f074c7	423
871a57bb MY	424	#if defined(CONFIG_BOOTM_VXWORKS)
	425	void boot_prep_vxworks(bootm_headers_t *images)
	426	{
	427	#if defined(CONFIG_OF_LIBFDT)
	428	int off;
	429
	430	if (images->ft_addr) {
	431	off = fdt_path_offset(images->ft_addr, "/memory");
	432	if (off < 0) {
e29607ed	433	if (arch_fixup_fdt(images->ft_addr))
871a57bb MY	434	puts("## WARNING: fixup memory failed!\n");
	435	}
	436	}
	437	#endif
	438	cleanup_before_linux();
	439	}
	440	void boot_jump_vxworks(bootm_headers_t *images)
	441	{
	442	/* ARM VxWorks requires device tree physical address to be passed */
	443	((void ()(void ))images->ep)(images->ft_addr);
	444	}
	445	#endif