SPDX: Convert all of our single license tags to Linux Kernel style
[oweals/u-boot.git] / arch / x86 / lib / relocate.c
index badb5f84f1740d9ed63f6c500214f3d6ee7299a8..050f9d07c2f0c34afbf4d8c3c8c781c46ec6cc05 100644 (file)
@@ -1,3 +1,4 @@
+// SPDX-License-Identifier: GPL-2.0+
 /*
  * (C) Copyright 2008-2011
  * Graeme Russ, <graeme.russ@gmail.com>
  * (C) Copyright 2002
  * Sysgo Real-Time Solutions, GmbH <www.elinos.com>
  * Marius Groeger <mgroeger@sysgo.de>
- *
- * See file CREDITS for list of people who contributed to this
- * project.
- *
- * This program is free software; you can redistribute it and/or
- * modify it under the terms of the GNU General Public License as
- * published by the Free Software Foundation; either version 2 of
- * the License, or (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
- * MA 02111-1307 USA
  */
 
 #include <common.h>
-#include <malloc.h>
+#include <inttypes.h>
+#include <relocate.h>
 #include <asm/u-boot-x86.h>
+#include <asm/sections.h>
 #include <elf.h>
 
-static int copy_uboot_to_ram(void);
-static int clear_bss(void);
-static int do_elf_reloc_fixups(void);
+DECLARE_GLOBAL_DATA_PTR;
 
-static int copy_uboot_to_ram(void)
+int copy_uboot_to_ram(void)
 {
-       size_t len = (size_t)&__data_end - (size_t)&__text_start;
+       size_t len = (uintptr_t)&__data_end - (uintptr_t)&__text_start;
 
+       if (gd->flags & GD_FLG_SKIP_RELOC)
+               return 0;
        memcpy((void *)gd->relocaddr, (void *)&__text_start, len);
 
        return 0;
 }
 
-static int clear_bss(void)
+int clear_bss(void)
 {
        ulong dst_addr = (ulong)&__bss_start + gd->reloc_off;
-       size_t len = (size_t)&__bss_end - (size_t)&__bss_start;
+       size_t len = (uintptr_t)&__bss_end - (uintptr_t)&__bss_start;
 
+       if (gd->flags & GD_FLG_SKIP_RELOC)
+               return 0;
        memset((void *)dst_addr, 0x00, len);
 
        return 0;
 }
 
-static int do_elf_reloc_fixups(void)
+#if CONFIG_IS_ENABLED(X86_64)
+static void do_elf_reloc_fixups64(unsigned int text_base, uintptr_t size,
+                                 Elf64_Rela *re_src, Elf64_Rela *re_end)
 {
-       Elf32_Rel *re_src = (Elf32_Rel *)(&__rel_dyn_start);
-       Elf32_Rel *re_end = (Elf32_Rel *)(&__rel_dyn_end);
+       Elf64_Addr *offset_ptr_rom, *last_offset = NULL;
+       Elf64_Addr *offset_ptr_ram;
 
-       Elf32_Addr *offset_ptr_rom;
-       Elf32_Addr *offset_ptr_ram;
+       do {
+               /* Get the location from the relocation entry */
+               offset_ptr_rom = (Elf64_Addr *)(uintptr_t)re_src->r_offset;
 
-       /* The size of the region of u-boot that runs out of RAM. */
-       uintptr_t size = (uintptr_t)&__bss_end - (uintptr_t)&__text_start;
+               /* Check that the location of the relocation is in .text */
+               if (offset_ptr_rom >= (Elf64_Addr *)(uintptr_t)text_base &&
+                   offset_ptr_rom > last_offset) {
+                       /* Switch to the in-RAM version */
+                       offset_ptr_ram = (Elf64_Addr *)((ulong)offset_ptr_rom +
+                                                       gd->reloc_off);
+
+                       /* Check that the target points into .text */
+                       if (*offset_ptr_ram >= text_base &&
+                           *offset_ptr_ram <= text_base + size) {
+                               *offset_ptr_ram = gd->reloc_off +
+                                                       re_src->r_addend;
+                       } else {
+                               debug("   %p: %lx: rom reloc %lx, ram %p, value %lx, limit %"
+                                     PRIXPTR "\n",
+                                     re_src, (ulong)re_src->r_info,
+                                     (ulong)re_src->r_offset, offset_ptr_ram,
+                                     (ulong)*offset_ptr_ram, text_base + size);
+                       }
+               } else {
+                       debug("   %p: %lx: rom reloc %lx, last %p\n", re_src,
+                             (ulong)re_src->r_info, (ulong)re_src->r_offset,
+                             last_offset);
+               }
+               last_offset = offset_ptr_rom;
+
+       } while (++re_src < re_end);
+}
+#else
+static void do_elf_reloc_fixups32(unsigned int text_base, uintptr_t size,
+                                 Elf32_Rel *re_src, Elf32_Rel *re_end)
+{
+       Elf32_Addr *offset_ptr_rom, *last_offset = NULL;
+       Elf32_Addr *offset_ptr_ram;
 
        do {
                /* Get the location from the relocation entry */
-               offset_ptr_rom = (Elf32_Addr *)re_src->r_offset;
+               offset_ptr_rom = (Elf32_Addr *)(uintptr_t)re_src->r_offset;
 
                /* Check that the location of the relocation is in .text */
-               if (offset_ptr_rom >= (Elf32_Addr *)CONFIG_SYS_TEXT_BASE) {
+               if (offset_ptr_rom >= (Elf32_Addr *)(uintptr_t)text_base &&
+                   offset_ptr_rom > last_offset) {
 
                        /* Switch to the in-RAM version */
                        offset_ptr_ram = (Elf32_Addr *)((ulong)offset_ptr_rom +
                                                        gd->reloc_off);
 
                        /* Check that the target points into .text */
-                       if (*offset_ptr_ram >= CONFIG_SYS_TEXT_BASE &&
-                                       *offset_ptr_ram <
-                                       (CONFIG_SYS_TEXT_BASE + size)) {
+                       if (*offset_ptr_ram >= text_base &&
+                           *offset_ptr_ram <= text_base + size) {
                                *offset_ptr_ram += gd->reloc_off;
+                       } else {
+                               debug("   %p: rom reloc %x, ram %p, value %x,"
+                                       " limit %" PRIXPTR "\n", re_src,
+                                       re_src->r_offset, offset_ptr_ram,
+                                       *offset_ptr_ram,
+                                       text_base + size);
                        }
+               } else {
+                       debug("   %p: rom reloc %x, last %p\n", re_src,
+                              re_src->r_offset, last_offset);
                }
-       } while (re_src++ < re_end);
+               last_offset = offset_ptr_rom;
 
-       return 0;
+       } while (++re_src < re_end);
 }
+#endif
 
-void relocate_code(ulong dummy_1, gd_t *id, ulong dummy_2)
+/*
+ * This function has more error checking than you might expect. Please see
+ * this commit message for more information:
+ *    62f7970a x86: Add error checking to x86 relocation code
+ */
+int do_elf_reloc_fixups(void)
 {
-       /*
-        * Copy U-Boot into RAM, clear the BSS and perform relocation
-        * adjustments
-        */
-       copy_uboot_to_ram();
-       clear_bss();
-       do_elf_reloc_fixups();
-
-       /*
-        * Transfer execution from Flash to RAM by calculating the address
-        * of the in-RAM copy of board_init_r() and calling it
-        */
-       (board_init_r + gd->reloc_off)(gd, gd->relocaddr);
-
-       /* NOTREACHED - board_init_r() does not return */
-       while (1)
-               ;
+       void *re_src = (void *)(&__rel_dyn_start);
+       void *re_end = (void *)(&__rel_dyn_end);
+       uint text_base;
+
+       /* The size of the region of u-boot that runs out of RAM. */
+       uintptr_t size = (uintptr_t)&__bss_end - (uintptr_t)&__text_start;
+
+       if (gd->flags & GD_FLG_SKIP_RELOC)
+               return 0;
+       if (re_src == re_end)
+               panic("No relocation data");
+
+#ifdef CONFIG_SYS_TEXT_BASE
+       text_base = CONFIG_SYS_TEXT_BASE;
+#else
+       panic("No CONFIG_SYS_TEXT_BASE");
+#endif
+#if CONFIG_IS_ENABLED(X86_64)
+       do_elf_reloc_fixups64(text_base, size, re_src, re_end);
+#else
+       do_elf_reloc_fixups32(text_base, size, re_src, re_end);
+#endif
+
+       return 0;
 }