Merge tag 'u-boot-stm32-20211012' of https://source.denx.de/u-boot/custodians/u-boot-stm
[platform/kernel/u-boot.git] / arch / x86 / lib / bootm.c
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
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_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)
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 */
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
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 */
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
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
227 static ulong get_sp(void)
228 {
229         ulong ret;
230
231 #if CONFIG_IS_ENABLED(X86_64)
232         ret = gd->start_addr_sp;
233 #else
234         asm("mov %%esp, %0" : "=r"(ret) : );
235 #endif
236
237         return ret;
238 }
239
240 void arch_lmb_reserve(struct lmb *lmb)
241 {
242         arch_lmb_reserve_generic(lmb, get_sp(), gd->ram_top, 4096);
243 }