]> git.sur5r.net Git - u-boot/blob - cmd/bootefi.c
545cfecc12b0e52ad8e2fd0852e6d01e3806e64a
[u-boot] / cmd / bootefi.c
1 /*
2  *  EFI application loader
3  *
4  *  Copyright (c) 2016 Alexander Graf
5  *
6  *  SPDX-License-Identifier:     GPL-2.0+
7  */
8
9 #include <charset.h>
10 #include <common.h>
11 #include <command.h>
12 #include <dm.h>
13 #include <efi_loader.h>
14 #include <efi_selftest.h>
15 #include <errno.h>
16 #include <libfdt.h>
17 #include <libfdt_env.h>
18 #include <memalign.h>
19 #include <asm/global_data.h>
20 #include <asm-generic/sections.h>
21 #include <linux/linkage.h>
22
23 DECLARE_GLOBAL_DATA_PTR;
24
25 static uint8_t efi_obj_list_initalized;
26
27 static struct efi_device_path *bootefi_image_path;
28 static struct efi_device_path *bootefi_device_path;
29
30 /* Initialize and populate EFI object list */
31 static void efi_init_obj_list(void)
32 {
33         efi_obj_list_initalized = 1;
34
35         /* Initialize EFI driver uclass */
36         efi_driver_init();
37
38         efi_console_register();
39 #ifdef CONFIG_PARTITIONS
40         efi_disk_register();
41 #endif
42 #if defined(CONFIG_LCD) || defined(CONFIG_DM_VIDEO)
43         efi_gop_register();
44 #endif
45 #ifdef CONFIG_NET
46         efi_net_register();
47 #endif
48 #ifdef CONFIG_GENERATE_SMBIOS_TABLE
49         efi_smbios_register();
50 #endif
51         efi_watchdog_register();
52
53         /* Initialize EFI runtime services */
54         efi_reset_system_init();
55         efi_get_time_init();
56 }
57
58 /*
59  * Set the load options of an image from an environment variable.
60  *
61  * @loaded_image_info:  the image
62  * @env_var:            name of the environment variable
63  */
64 static void set_load_options(struct efi_loaded_image *loaded_image_info,
65                              const char *env_var)
66 {
67         size_t size;
68         const char *env = env_get(env_var);
69
70         loaded_image_info->load_options = NULL;
71         loaded_image_info->load_options_size = 0;
72         if (!env)
73                 return;
74         size = strlen(env) + 1;
75         loaded_image_info->load_options = calloc(size, sizeof(u16));
76         if (!loaded_image_info->load_options) {
77                 printf("ERROR: Out of memory\n");
78                 return;
79         }
80         utf8_to_utf16(loaded_image_info->load_options, (u8 *)env, size);
81         loaded_image_info->load_options_size = size * 2;
82 }
83
84 static void *copy_fdt(void *fdt)
85 {
86         u64 fdt_size = fdt_totalsize(fdt);
87         unsigned long fdt_ram_start = -1L, fdt_pages;
88         u64 new_fdt_addr;
89         void *new_fdt;
90         int i;
91
92         for (i = 0; i < CONFIG_NR_DRAM_BANKS; i++) {
93                 u64 ram_start = gd->bd->bi_dram[i].start;
94                 u64 ram_size = gd->bd->bi_dram[i].size;
95
96                 if (!ram_size)
97                         continue;
98
99                 if (ram_start < fdt_ram_start)
100                         fdt_ram_start = ram_start;
101         }
102
103         /* Give us at least 4kb breathing room */
104         fdt_size = ALIGN(fdt_size + 4096, EFI_PAGE_SIZE);
105         fdt_pages = fdt_size >> EFI_PAGE_SHIFT;
106
107         /* Safe fdt location is at 128MB */
108         new_fdt_addr = fdt_ram_start + (128 * 1024 * 1024) + fdt_size;
109         if (efi_allocate_pages(1, EFI_RUNTIME_SERVICES_DATA, fdt_pages,
110                                &new_fdt_addr) != EFI_SUCCESS) {
111                 /* If we can't put it there, put it somewhere */
112                 new_fdt_addr = (ulong)memalign(EFI_PAGE_SIZE, fdt_size);
113                 if (efi_allocate_pages(1, EFI_RUNTIME_SERVICES_DATA, fdt_pages,
114                                        &new_fdt_addr) != EFI_SUCCESS) {
115                         printf("ERROR: Failed to reserve space for FDT\n");
116                         return NULL;
117                 }
118         }
119
120         new_fdt = (void*)(ulong)new_fdt_addr;
121         memcpy(new_fdt, fdt, fdt_totalsize(fdt));
122         fdt_set_totalsize(new_fdt, fdt_size);
123
124         return new_fdt;
125 }
126
127 static efi_status_t efi_do_enter(
128                         efi_handle_t image_handle, struct efi_system_table *st,
129                         EFIAPI efi_status_t (*entry)(
130                                 efi_handle_t image_handle,
131                                 struct efi_system_table *st))
132 {
133         efi_status_t ret = EFI_LOAD_ERROR;
134
135         if (entry)
136                 ret = entry(image_handle, st);
137         st->boottime->exit(image_handle, ret, 0, NULL);
138         return ret;
139 }
140
141 #ifdef CONFIG_ARM64
142 static efi_status_t efi_run_in_el2(EFIAPI efi_status_t (*entry)(
143                         efi_handle_t image_handle, struct efi_system_table *st),
144                         efi_handle_t image_handle, struct efi_system_table *st)
145 {
146         /* Enable caches again */
147         dcache_enable();
148
149         return efi_do_enter(image_handle, st, entry);
150 }
151 #endif
152
153 /*
154  * Load an EFI payload into a newly allocated piece of memory, register all
155  * EFI objects it would want to access and jump to it.
156  */
157 static efi_status_t do_bootefi_exec(void *efi, void *fdt,
158                                     struct efi_device_path *device_path,
159                                     struct efi_device_path *image_path)
160 {
161         struct efi_loaded_image loaded_image_info = {};
162         struct efi_object loaded_image_info_obj = {};
163         struct efi_device_path *memdp = NULL;
164         ulong ret;
165
166         EFIAPI efi_status_t (*entry)(efi_handle_t image_handle,
167                                      struct efi_system_table *st);
168         ulong fdt_pages, fdt_size, fdt_start, fdt_end;
169         const efi_guid_t fdt_guid = EFI_FDT_GUID;
170         bootm_headers_t img = { 0 };
171
172         /*
173          * Special case for efi payload not loaded from disk, such as
174          * 'bootefi hello' or for example payload loaded directly into
175          * memory via jtag/etc:
176          */
177         if (!device_path && !image_path) {
178                 printf("WARNING: using memory device/image path, this may confuse some payloads!\n");
179                 /* actual addresses filled in after efi_load_pe() */
180                 memdp = efi_dp_from_mem(0, 0, 0);
181                 device_path = image_path = memdp;
182         } else {
183                 assert(device_path && image_path);
184         }
185
186         /* Initialize and populate EFI object list */
187         if (!efi_obj_list_initalized)
188                 efi_init_obj_list();
189
190         efi_setup_loaded_image(&loaded_image_info, &loaded_image_info_obj,
191                                device_path, image_path);
192
193         /*
194          * gd lives in a fixed register which may get clobbered while we execute
195          * the payload. So save it here and restore it on every callback entry
196          */
197         efi_save_gd();
198
199         if (fdt && !fdt_check_header(fdt)) {
200                 /* Prepare fdt for payload */
201                 fdt = copy_fdt(fdt);
202
203                 if (image_setup_libfdt(&img, fdt, 0, NULL)) {
204                         printf("ERROR: Failed to process device tree\n");
205                         return -EINVAL;
206                 }
207
208                 /* Link to it in the efi tables */
209                 efi_install_configuration_table(&fdt_guid, fdt);
210
211                 /* And reserve the space in the memory map */
212                 fdt_start = ((ulong)fdt) & ~EFI_PAGE_MASK;
213                 fdt_end = ((ulong)fdt) + fdt_totalsize(fdt);
214                 fdt_size = (fdt_end - fdt_start) + EFI_PAGE_MASK;
215                 fdt_pages = fdt_size >> EFI_PAGE_SHIFT;
216                 /* Give a bootloader the chance to modify the device tree */
217                 fdt_pages += 2;
218                 efi_add_memory_map(fdt_start, fdt_pages,
219                                    EFI_BOOT_SERVICES_DATA, true);
220         } else {
221                 printf("WARNING: Invalid device tree, expect boot to fail\n");
222                 efi_install_configuration_table(&fdt_guid, NULL);
223         }
224
225         /* Transfer environment variable bootargs as load options */
226         set_load_options(&loaded_image_info, "bootargs");
227         /* Load the EFI payload */
228         entry = efi_load_pe(efi, &loaded_image_info);
229         if (!entry) {
230                 ret = -ENOENT;
231                 goto exit;
232         }
233
234         if (memdp) {
235                 struct efi_device_path_memory *mdp = (void *)memdp;
236                 mdp->memory_type = loaded_image_info.image_code_type;
237                 mdp->start_address = (uintptr_t)loaded_image_info.image_base;
238                 mdp->end_address = mdp->start_address +
239                                 loaded_image_info.image_size;
240         }
241
242         /* we don't support much: */
243         env_set("efi_8be4df61-93ca-11d2-aa0d-00e098032b8c_OsIndicationsSupported",
244                 "{ro,boot}(blob)0000000000000000");
245
246         /* Call our payload! */
247         debug("%s:%d Jumping to 0x%lx\n", __func__, __LINE__, (long)entry);
248
249         if (setjmp(&loaded_image_info.exit_jmp)) {
250                 ret = loaded_image_info.exit_status;
251                 goto exit;
252         }
253
254 #ifdef CONFIG_ARM64
255         /* On AArch64 we need to make sure we call our payload in < EL3 */
256         if (current_el() == 3) {
257                 smp_kick_all_cpus();
258                 dcache_disable();       /* flush cache before switch to EL2 */
259
260                 /* Move into EL2 and keep running there */
261                 armv8_switch_to_el2((ulong)entry,
262                                     (ulong)&loaded_image_info_obj.handle,
263                                     (ulong)&systab, 0, (ulong)efi_run_in_el2,
264                                     ES_TO_AARCH64);
265
266                 /* Should never reach here, efi exits with longjmp */
267                 while (1) { }
268         }
269 #endif
270
271         ret = efi_do_enter(loaded_image_info_obj.handle, &systab, entry);
272
273 exit:
274         /* image has returned, loaded-image obj goes *poof*: */
275         list_del(&loaded_image_info_obj.link);
276
277         return ret;
278 }
279
280 static int do_bootefi_bootmgr_exec(unsigned long fdt_addr)
281 {
282         struct efi_device_path *device_path, *file_path;
283         void *addr;
284         efi_status_t r;
285
286         /* Initialize and populate EFI object list */
287         if (!efi_obj_list_initalized)
288                 efi_init_obj_list();
289
290         /*
291          * gd lives in a fixed register which may get clobbered while we execute
292          * the payload. So save it here and restore it on every callback entry
293          */
294         efi_save_gd();
295
296         addr = efi_bootmgr_load(&device_path, &file_path);
297         if (!addr)
298                 return 1;
299
300         printf("## Starting EFI application at %p ...\n", addr);
301         r = do_bootefi_exec(addr, (void *)fdt_addr, device_path, file_path);
302         printf("## Application terminated, r = %lu\n",
303                r & ~EFI_ERROR_MASK);
304
305         if (r != EFI_SUCCESS)
306                 return 1;
307
308         return 0;
309 }
310
311 /* Interpreter command to boot an arbitrary EFI image from memory */
312 static int do_bootefi(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
313 {
314         char *saddr, *sfdt;
315         unsigned long addr, fdt_addr = 0;
316         efi_status_t r;
317
318         if (argc < 2)
319                 return CMD_RET_USAGE;
320 #ifdef CONFIG_CMD_BOOTEFI_HELLO
321         if (!strcmp(argv[1], "hello")) {
322                 ulong size = __efi_helloworld_end - __efi_helloworld_begin;
323
324                 saddr = env_get("loadaddr");
325                 if (saddr)
326                         addr = simple_strtoul(saddr, NULL, 16);
327                 else
328                         addr = CONFIG_SYS_LOAD_ADDR;
329                 memcpy((char *)addr, __efi_helloworld_begin, size);
330         } else
331 #endif
332 #ifdef CONFIG_CMD_BOOTEFI_SELFTEST
333         if (!strcmp(argv[1], "selftest")) {
334                 struct efi_loaded_image loaded_image_info = {};
335                 struct efi_object loaded_image_info_obj = {};
336
337                 /* Construct a dummy device path. */
338                 bootefi_device_path = efi_dp_from_mem(EFI_RESERVED_MEMORY_TYPE,
339                                                       (uintptr_t)&efi_selftest,
340                                                       (uintptr_t)&efi_selftest);
341                 bootefi_image_path = efi_dp_from_file(NULL, 0, "\\selftest");
342
343                 efi_setup_loaded_image(&loaded_image_info,
344                                        &loaded_image_info_obj,
345                                        bootefi_device_path, bootefi_image_path);
346                 /*
347                  * gd lives in a fixed register which may get clobbered while we
348                  * execute the payload. So save it here and restore it on every
349                  * callback entry
350                  */
351                 efi_save_gd();
352                 /* Initialize and populate EFI object list */
353                 if (!efi_obj_list_initalized)
354                         efi_init_obj_list();
355                 /* Transfer environment variable efi_selftest as load options */
356                 set_load_options(&loaded_image_info, "efi_selftest");
357                 /* Execute the test */
358                 r = efi_selftest(loaded_image_info_obj.handle, &systab);
359                 efi_restore_gd();
360                 free(loaded_image_info.load_options);
361                 list_del(&loaded_image_info_obj.link);
362                 return r != EFI_SUCCESS;
363         } else
364 #endif
365         if (!strcmp(argv[1], "bootmgr")) {
366                 unsigned long fdt_addr = 0;
367
368                 if (argc > 2)
369                         fdt_addr = simple_strtoul(argv[2], NULL, 16);
370
371                 return do_bootefi_bootmgr_exec(fdt_addr);
372         } else {
373                 saddr = argv[1];
374
375                 addr = simple_strtoul(saddr, NULL, 16);
376
377                 if (argc > 2) {
378                         sfdt = argv[2];
379                         fdt_addr = simple_strtoul(sfdt, NULL, 16);
380                 }
381         }
382
383         printf("## Starting EFI application at %08lx ...\n", addr);
384         r = do_bootefi_exec((void *)addr, (void *)fdt_addr,
385                             bootefi_device_path, bootefi_image_path);
386         printf("## Application terminated, r = %lu\n",
387                r & ~EFI_ERROR_MASK);
388
389         if (r != EFI_SUCCESS)
390                 return 1;
391         else
392                 return 0;
393 }
394
395 #ifdef CONFIG_SYS_LONGHELP
396 static char bootefi_help_text[] =
397         "<image address> [fdt address]\n"
398         "  - boot EFI payload stored at address <image address>.\n"
399         "    If specified, the device tree located at <fdt address> gets\n"
400         "    exposed as EFI configuration table.\n"
401 #ifdef CONFIG_CMD_BOOTEFI_HELLO
402         "bootefi hello\n"
403         "  - boot a sample Hello World application stored within U-Boot\n"
404 #endif
405 #ifdef CONFIG_CMD_BOOTEFI_SELFTEST
406         "bootefi selftest\n"
407         "  - boot an EFI selftest application stored within U-Boot\n"
408         "    Use environment variable efi_selftest to select a single test.\n"
409         "    Use 'setenv efi_selftest list' to enumerate all tests.\n"
410 #endif
411         "bootmgr [fdt addr]\n"
412         "  - load and boot EFI payload based on BootOrder/BootXXXX variables.\n"
413         "\n"
414         "    If specified, the device tree located at <fdt address> gets\n"
415         "    exposed as EFI configuration table.\n";
416 #endif
417
418 U_BOOT_CMD(
419         bootefi, 3, 0, do_bootefi,
420         "Boots an EFI payload from memory",
421         bootefi_help_text
422 );
423
424 static int parse_partnum(const char *devnr)
425 {
426         const char *str = strchr(devnr, ':');
427         if (str) {
428                 str++;
429                 return simple_strtoul(str, NULL, 16);
430         }
431         return 0;
432 }
433
434 void efi_set_bootdev(const char *dev, const char *devnr, const char *path)
435 {
436         char filename[32] = { 0 }; /* dp->str is u16[32] long */
437         char *s;
438
439         if (strcmp(dev, "Net")) {
440                 struct blk_desc *desc;
441                 int part;
442
443                 desc = blk_get_dev(dev, simple_strtol(devnr, NULL, 10));
444                 if (!desc)
445                         return;
446                 part = parse_partnum(devnr);
447
448                 bootefi_device_path = efi_dp_from_part(desc, part);
449         } else {
450 #ifdef CONFIG_NET
451                 bootefi_device_path = efi_dp_from_eth();
452 #endif
453         }
454
455         if (!path)
456                 return;
457
458         if (strcmp(dev, "Net")) {
459                 /* Add leading / to fs paths, because they're absolute */
460                 snprintf(filename, sizeof(filename), "/%s", path);
461         } else {
462                 snprintf(filename, sizeof(filename), "%s", path);
463         }
464         /* DOS style file path: */
465         s = filename;
466         while ((s = strchr(s, '/')))
467                 *s++ = '\\';
468         bootefi_image_path = efi_dp_from_file(NULL, 0, filename);
469 }