1 // SPDX-License-Identifier: GPL-2.0+
2 /*
3  * (C) Copyright 2002
4  * Sysgo Real-Time Solutions, GmbH <www.elinos.com>
5  * Marius Groeger <mgroeger@sysgo.de>
6  *
7  * Copyright (C) 2001  Erik Mouw (J.A.K.Mouw@its.tudelft.nl)
8  */
9 
10 #include <common.h>
11 #include <bootstage.h>
12 #include <command.h>
13 #include <hang.h>
14 #include <log.h>
15 #include <asm/global_data.h>
16 #include <dm/device.h>
17 #include <dm/root.h>
18 #include <errno.h>
19 #include <fdt_support.h>
20 #include <image.h>
21 #include <u-boot/zlib.h>
22 #include <asm/bootparam.h>
23 #include <asm/cpu.h>
24 #include <asm/byteorder.h>
25 #include <asm/zimage.h>
26 #ifdef CONFIG_SYS_COREBOOT
27 #include <asm/arch/timestamp.h>
28 #endif
29 
30 DECLARE_GLOBAL_DATA_PTR;
31 
32 #define COMMAND_LINE_OFFSET 0x9000
33 
bootm_announce_and_cleanup(void)34 void bootm_announce_and_cleanup(void)
35 {
36 	printf("\nStarting kernel ...\n\n");
37 
38 #ifdef CONFIG_SYS_COREBOOT
39 	timestamp_add_now(TS_U_BOOT_START_KERNEL);
40 #endif
41 	bootstage_mark_name(BOOTSTAGE_ID_BOOTM_HANDOFF, "start_kernel");
42 #if CONFIG_IS_ENABLED(BOOTSTAGE_REPORT)
43 	bootstage_report();
44 #endif
45 
46 	/*
47 	 * Call remove function of all devices with a removal flag set.
48 	 * This may be useful for last-stage operations, like cancelling
49 	 * of DMA operation or releasing device internal buffers.
50 	 */
51 	dm_remove_devices_flags(DM_REMOVE_ACTIVE_ALL);
52 }
53 
54 #if defined(CONFIG_OF_LIBFDT) && !defined(CONFIG_OF_NO_KERNEL)
arch_fixup_memory_node(void * blob)55 int arch_fixup_memory_node(void *blob)
56 {
57 	struct bd_info	*bd = gd->bd;
58 	int bank;
59 	u64 start[CONFIG_NR_DRAM_BANKS];
60 	u64 size[CONFIG_NR_DRAM_BANKS];
61 
62 	for (bank = 0; bank < CONFIG_NR_DRAM_BANKS; bank++) {
63 		start[bank] = bd->bi_dram[bank].start;
64 		size[bank] = bd->bi_dram[bank].size;
65 	}
66 
67 	return fdt_fixup_memory_banks(blob, start, size, CONFIG_NR_DRAM_BANKS);
68 }
69 #endif
70 
71 /* Subcommand: PREP */
boot_prep_linux(bootm_headers_t * images)72 static int boot_prep_linux(bootm_headers_t *images)
73 {
74 	char *cmd_line_dest = NULL;
75 	image_header_t *hdr;
76 	int is_zimage = 0;
77 	void *data = NULL;
78 	size_t len;
79 	int ret;
80 
81 #ifdef CONFIG_OF_LIBFDT
82 	if (images->ft_len) {
83 		debug("using: FDT\n");
84 		if (image_setup_linux(images)) {
85 			puts("FDT creation failed! hanging...");
86 			hang();
87 		}
88 	}
89 #endif
90 	if (images->legacy_hdr_valid) {
91 		hdr = images->legacy_hdr_os;
92 		if (image_check_type(hdr, IH_TYPE_MULTI)) {
93 			ulong os_data, os_len;
94 
95 			/* if multi-part image, we need to get first subimage */
96 			image_multi_getimg(hdr, 0, &os_data, &os_len);
97 			data = (void *)os_data;
98 			len = os_len;
99 		} else {
100 			/* otherwise get image data */
101 			data = (void *)image_get_data(hdr);
102 			len = image_get_data_size(hdr);
103 		}
104 		is_zimage = 1;
105 #if defined(CONFIG_FIT)
106 	} else if (images->fit_uname_os && is_zimage) {
107 		ret = fit_image_get_data(images->fit_hdr_os,
108 				images->fit_noffset_os,
109 				(const void **)&data, &len);
110 		if (ret) {
111 			puts("Can't get image data/size!\n");
112 			goto error;
113 		}
114 		is_zimage = 1;
115 #endif
116 	}
117 
118 	if (is_zimage) {
119 		ulong load_address;
120 		char *base_ptr;
121 
122 		base_ptr = (char *)load_zimage(data, len, &load_address);
123 		if (!base_ptr) {
124 			puts("## Kernel loading failed ...\n");
125 			goto error;
126 		}
127 		images->os.load = load_address;
128 		cmd_line_dest = base_ptr + COMMAND_LINE_OFFSET;
129 		images->ep = (ulong)base_ptr;
130 	} else if (images->ep) {
131 		cmd_line_dest = (void *)images->ep + COMMAND_LINE_OFFSET;
132 	} else {
133 		printf("## Kernel loading failed (missing x86 kernel setup) ...\n");
134 		goto error;
135 	}
136 
137 	printf("Setup at %#08lx\n", images->ep);
138 	ret = setup_zimage((void *)images->ep, cmd_line_dest,
139 			0, images->rd_start,
140 			images->rd_end - images->rd_start, 0);
141 
142 	if (ret) {
143 		printf("## Setting up boot parameters failed ...\n");
144 		return 1;
145 	}
146 
147 	return 0;
148 
149 error:
150 	return 1;
151 }
152 
boot_linux_kernel(ulong setup_base,ulong load_address,bool image_64bit)153 int boot_linux_kernel(ulong setup_base, ulong load_address, bool image_64bit)
154 {
155 	bootm_announce_and_cleanup();
156 
157 #ifdef CONFIG_SYS_COREBOOT
158 	timestamp_add_now(TS_U_BOOT_START_KERNEL);
159 #endif
160 	if (image_64bit) {
161 		if (!cpu_has_64bit()) {
162 			puts("Cannot boot 64-bit kernel on 32-bit machine\n");
163 			return -EFAULT;
164 		}
165 		/* At present 64-bit U-Boot does not support booting a
166 		 * kernel.
167 		 * TODO(sjg@chromium.org): Support booting both 32-bit and
168 		 * 64-bit kernels from 64-bit U-Boot.
169 		 */
170 #if !CONFIG_IS_ENABLED(X86_64)
171 		return cpu_jump_to_64bit(setup_base, load_address);
172 #endif
173 	} else {
174 		/*
175 		* Set %ebx, %ebp, and %edi to 0, %esi to point to the
176 		* boot_params structure, and then jump to the kernel. We
177 		* assume that %cs is 0x10, 4GB flat, and read/execute, and
178 		* the data segments are 0x18, 4GB flat, and read/write.
179 		* U-Boot is setting them up that way for itself in
180 		* arch/i386/cpu/cpu.c.
181 		*
182 		* Note that we cannot currently boot a kernel while running as
183 		* an EFI application. Please use the payload option for that.
184 		*/
185 #ifndef CONFIG_EFI_APP
186 		__asm__ __volatile__ (
187 		"movl $0, %%ebp\n"
188 		"cli\n"
189 		"jmp *%[kernel_entry]\n"
190 		:: [kernel_entry]"a"(load_address),
191 		[boot_params] "S"(setup_base),
192 		"b"(0), "D"(0)
193 		);
194 #endif
195 	}
196 
197 	/* We can't get to here */
198 	return -EFAULT;
199 }
200 
201 /* Subcommand: GO */
boot_jump_linux(bootm_headers_t * images)202 static int boot_jump_linux(bootm_headers_t *images)
203 {
204 	debug("## Transferring control to Linux (at address %08lx, kernel %08lx) ...\n",
205 	      images->ep, images->os.load);
206 
207 	return boot_linux_kernel(images->ep, images->os.load,
208 				 images->os.arch == IH_ARCH_X86_64);
209 }
210 
do_bootm_linux(int flag,int argc,char * const argv[],bootm_headers_t * images)211 int do_bootm_linux(int flag, int argc, char *const argv[],
212 		   bootm_headers_t *images)
213 {
214 	/* No need for those on x86 */
215 	if (flag & BOOTM_STATE_OS_BD_T || flag & BOOTM_STATE_OS_CMDLINE)
216 		return -1;
217 
218 	if (flag & BOOTM_STATE_OS_PREP)
219 		return boot_prep_linux(images);
220 
221 	if (flag & BOOTM_STATE_OS_GO)
222 		return boot_jump_linux(images);
223 
224 	return boot_jump_linux(images);
225 }
226