arch/x86/lib/bootm.c

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