842c390469
Starting from binutils commit bd7ab16b4537788ad53521c45469a1bdae84ad4a: https://sourceware.org/git/?p=binutils-gdb.git;a=commit;h=bd7ab16b4537788ad53521c45469a1bdae84ad4a x86-64 assembler generates R_X86_64_PLT32, instead of R_X86_64_PC32, for 32-bit PC-relative branches. Grub2 should treat R_X86_64_PLT32 as R_X86_64_PC32. Signed-off-by: H.J. Lu <hjl.tools@gmail.com> Reviewed-by: Daniel Kiper <daniel.kiper@oracle.com>
2114 lines
66 KiB
C
2114 lines
66 KiB
C
/* grub-mkimage.c - make a bootable image */
|
|
/*
|
|
* GRUB -- GRand Unified Bootloader
|
|
* Copyright (C) 2002,2003,2004,2005,2006,2007,2008,2009,2010 Free Software Foundation, Inc.
|
|
*
|
|
* GRUB 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 3 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* GRUB 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 GRUB. If not, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
#include <config.h>
|
|
#include <grub/types.h>
|
|
#include <grub/elf.h>
|
|
#include <grub/aout.h>
|
|
#include <grub/i18n.h>
|
|
#include <grub/kernel.h>
|
|
#include <grub/disk.h>
|
|
#include <grub/emu/misc.h>
|
|
#include <grub/util/misc.h>
|
|
#include <grub/util/resolve.h>
|
|
#include <grub/misc.h>
|
|
#include <grub/offsets.h>
|
|
#include <grub/crypto.h>
|
|
#include <grub/dl.h>
|
|
#include <time.h>
|
|
#include <multiboot.h>
|
|
|
|
#include <stdio.h>
|
|
#include <unistd.h>
|
|
#include <string.h>
|
|
#include <stdlib.h>
|
|
#include <assert.h>
|
|
#include <grub/efi/pe32.h>
|
|
#include <grub/uboot/image.h>
|
|
#include <grub/arm/reloc.h>
|
|
#include <grub/arm64/reloc.h>
|
|
#include <grub/ia64/reloc.h>
|
|
#include <grub/osdep/hostfile.h>
|
|
#include <grub/util/install.h>
|
|
#include <grub/util/mkimage.h>
|
|
|
|
#pragma GCC diagnostic ignored "-Wcast-align"
|
|
|
|
/* These structures are defined according to the CHRP binding to IEEE1275,
|
|
"Client Program Format" section. */
|
|
|
|
struct grub_ieee1275_note_desc
|
|
{
|
|
grub_uint32_t real_mode;
|
|
grub_uint32_t real_base;
|
|
grub_uint32_t real_size;
|
|
grub_uint32_t virt_base;
|
|
grub_uint32_t virt_size;
|
|
grub_uint32_t load_base;
|
|
};
|
|
|
|
#define GRUB_IEEE1275_NOTE_NAME "PowerPC"
|
|
#define GRUB_IEEE1275_NOTE_TYPE 0x1275
|
|
|
|
struct grub_ieee1275_note
|
|
{
|
|
Elf32_Nhdr header;
|
|
char name[ALIGN_UP(sizeof (GRUB_IEEE1275_NOTE_NAME), 4)];
|
|
struct grub_ieee1275_note_desc descriptor;
|
|
};
|
|
|
|
#define GRUB_XEN_NOTE_NAME "Xen"
|
|
|
|
struct fixup_block_list
|
|
{
|
|
struct fixup_block_list *next;
|
|
int state;
|
|
struct grub_pe32_fixup_block b;
|
|
};
|
|
|
|
#define ALIGN_ADDR(x) (ALIGN_UP((x), image_target->voidp_sizeof))
|
|
|
|
static int
|
|
is_relocatable (const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
return image_target->id == IMAGE_EFI || image_target->id == IMAGE_UBOOT
|
|
|| (image_target->id == IMAGE_COREBOOT && image_target->elf_target == EM_ARM);
|
|
}
|
|
|
|
#ifdef MKIMAGE_ELF32
|
|
|
|
/*
|
|
* R_ARM_THM_CALL/THM_JUMP24
|
|
*
|
|
* Relocate Thumb (T32) instruction set relative branches:
|
|
* B.W, BL and BLX
|
|
*/
|
|
static grub_err_t
|
|
grub_arm_reloc_thm_call (grub_uint16_t *target, Elf32_Addr sym_addr)
|
|
{
|
|
grub_int32_t offset;
|
|
|
|
offset = grub_arm_thm_call_get_offset (target);
|
|
|
|
grub_dprintf ("dl", " sym_addr = 0x%08x", sym_addr);
|
|
|
|
offset += sym_addr;
|
|
|
|
grub_dprintf("dl", " BL*: target=%p, sym_addr=0x%08x, offset=%d\n",
|
|
target, sym_addr, offset);
|
|
|
|
/* Keep traditional (pre-Thumb2) limits on blx. In any case if the kernel
|
|
is bigger than 2M (currently under 150K) then we probably have a problem
|
|
somewhere else. */
|
|
if (offset < -0x200000 || offset >= 0x200000)
|
|
return grub_error (GRUB_ERR_BAD_MODULE,
|
|
"THM_CALL Relocation out of range.");
|
|
|
|
grub_dprintf ("dl", " relative destination = %p",
|
|
(char *) target + offset);
|
|
|
|
return grub_arm_thm_call_set_offset (target, offset);
|
|
}
|
|
|
|
/*
|
|
* R_ARM_THM_JUMP19
|
|
*
|
|
* Relocate conditional Thumb (T32) B<c>.W
|
|
*/
|
|
static grub_err_t
|
|
grub_arm_reloc_thm_jump19 (grub_uint16_t *target, Elf32_Addr sym_addr)
|
|
{
|
|
grub_int32_t offset;
|
|
|
|
if (!(sym_addr & 1))
|
|
return grub_error (GRUB_ERR_BAD_MODULE,
|
|
"Relocation targeting wrong execution state");
|
|
|
|
offset = grub_arm_thm_jump19_get_offset (target);
|
|
|
|
/* Adjust and re-truncate offset */
|
|
offset += sym_addr;
|
|
|
|
if (!grub_arm_thm_jump19_check_offset (offset))
|
|
return grub_error (GRUB_ERR_BAD_MODULE,
|
|
"THM_JUMP19 Relocation out of range.");
|
|
|
|
grub_arm_thm_jump19_set_offset (target, offset);
|
|
|
|
return GRUB_ERR_NONE;
|
|
}
|
|
|
|
/*
|
|
* R_ARM_JUMP24
|
|
*
|
|
* Relocate ARM (A32) B
|
|
*/
|
|
static grub_err_t
|
|
grub_arm_reloc_jump24 (grub_uint32_t *target, Elf32_Addr sym_addr)
|
|
{
|
|
grub_int32_t offset;
|
|
|
|
if (sym_addr & 1)
|
|
return grub_error (GRUB_ERR_BAD_MODULE,
|
|
"Relocation targeting wrong execution state");
|
|
|
|
offset = grub_arm_jump24_get_offset (target);
|
|
offset += sym_addr;
|
|
|
|
if (!grub_arm_jump24_check_offset (offset))
|
|
return grub_error (GRUB_ERR_BAD_MODULE,
|
|
"JUMP24 Relocation out of range.");
|
|
|
|
|
|
grub_arm_jump24_set_offset (target, offset);
|
|
|
|
return GRUB_ERR_NONE;
|
|
}
|
|
|
|
#endif
|
|
|
|
void
|
|
SUFFIX (grub_mkimage_generate_elf) (const struct grub_install_image_target_desc *image_target,
|
|
int note, char **core_img, size_t *core_size,
|
|
Elf_Addr target_addr,
|
|
struct grub_mkimage_layout *layout)
|
|
{
|
|
char *elf_img;
|
|
size_t program_size;
|
|
Elf_Ehdr *ehdr;
|
|
Elf_Phdr *phdr;
|
|
Elf_Shdr *shdr;
|
|
int header_size, footer_size = 0;
|
|
int phnum = 1;
|
|
int shnum = 4;
|
|
int string_size = sizeof (".text") + sizeof ("mods") + 1;
|
|
|
|
if (image_target->id != IMAGE_LOONGSON_ELF)
|
|
phnum += 2;
|
|
|
|
if (note)
|
|
{
|
|
phnum++;
|
|
footer_size += sizeof (struct grub_ieee1275_note);
|
|
}
|
|
if (image_target->id == IMAGE_XEN)
|
|
{
|
|
phnum++;
|
|
shnum++;
|
|
string_size += sizeof (".xen");
|
|
footer_size += XEN_NOTE_SIZE;
|
|
}
|
|
header_size = ALIGN_UP (sizeof (*ehdr) + phnum * sizeof (*phdr)
|
|
+ shnum * sizeof (*shdr) + string_size, layout->align);
|
|
|
|
program_size = ALIGN_ADDR (*core_size);
|
|
|
|
elf_img = xmalloc (program_size + header_size + footer_size);
|
|
memset (elf_img, 0, program_size + header_size + footer_size);
|
|
memcpy (elf_img + header_size, *core_img, *core_size);
|
|
ehdr = (void *) elf_img;
|
|
phdr = (void *) (elf_img + sizeof (*ehdr));
|
|
shdr = (void *) (elf_img + sizeof (*ehdr) + phnum * sizeof (*phdr));
|
|
memcpy (ehdr->e_ident, ELFMAG, SELFMAG);
|
|
ehdr->e_ident[EI_CLASS] = ELFCLASSXX;
|
|
if (!image_target->bigendian)
|
|
ehdr->e_ident[EI_DATA] = ELFDATA2LSB;
|
|
else
|
|
ehdr->e_ident[EI_DATA] = ELFDATA2MSB;
|
|
ehdr->e_ident[EI_VERSION] = EV_CURRENT;
|
|
ehdr->e_ident[EI_OSABI] = ELFOSABI_NONE;
|
|
ehdr->e_type = grub_host_to_target16 (ET_EXEC);
|
|
ehdr->e_machine = grub_host_to_target16 (image_target->elf_target);
|
|
ehdr->e_version = grub_host_to_target32 (EV_CURRENT);
|
|
|
|
ehdr->e_phoff = grub_host_to_target32 ((char *) phdr - (char *) ehdr);
|
|
ehdr->e_phentsize = grub_host_to_target16 (sizeof (*phdr));
|
|
ehdr->e_phnum = grub_host_to_target16 (phnum);
|
|
|
|
ehdr->e_shoff = grub_host_to_target32 ((grub_uint8_t *) shdr
|
|
- (grub_uint8_t *) ehdr);
|
|
if (image_target->id == IMAGE_LOONGSON_ELF)
|
|
ehdr->e_shentsize = grub_host_to_target16 (0);
|
|
else
|
|
ehdr->e_shentsize = grub_host_to_target16 (sizeof (Elf_Shdr));
|
|
ehdr->e_shnum = grub_host_to_target16 (shnum);
|
|
ehdr->e_shstrndx = grub_host_to_target16 (1);
|
|
|
|
ehdr->e_ehsize = grub_host_to_target16 (sizeof (*ehdr));
|
|
|
|
phdr->p_type = grub_host_to_target32 (PT_LOAD);
|
|
phdr->p_offset = grub_host_to_target32 (header_size);
|
|
phdr->p_flags = grub_host_to_target32 (PF_R | PF_W | PF_X);
|
|
|
|
ehdr->e_entry = grub_host_to_target32 (target_addr);
|
|
phdr->p_vaddr = grub_host_to_target32 (target_addr);
|
|
phdr->p_paddr = grub_host_to_target32 (target_addr);
|
|
phdr->p_align = grub_host_to_target32 (layout->align > image_target->link_align ?
|
|
layout->align : image_target->link_align);
|
|
if (image_target->id == IMAGE_LOONGSON_ELF)
|
|
ehdr->e_flags = grub_host_to_target32 (0x1000 | EF_MIPS_NOREORDER
|
|
| EF_MIPS_PIC | EF_MIPS_CPIC);
|
|
else
|
|
ehdr->e_flags = 0;
|
|
if (image_target->id == IMAGE_LOONGSON_ELF)
|
|
{
|
|
phdr->p_filesz = grub_host_to_target32 (*core_size);
|
|
phdr->p_memsz = grub_host_to_target32 (*core_size);
|
|
}
|
|
else
|
|
{
|
|
grub_uint32_t target_addr_mods;
|
|
phdr->p_filesz = grub_host_to_target32 (layout->kernel_size);
|
|
if (image_target->id == IMAGE_COREBOOT && image_target->elf_target == EM_ARM)
|
|
phdr->p_memsz = grub_host_to_target32 (layout->kernel_size);
|
|
else
|
|
phdr->p_memsz = grub_host_to_target32 (layout->kernel_size + layout->bss_size);
|
|
|
|
phdr++;
|
|
phdr->p_type = grub_host_to_target32 (PT_GNU_STACK);
|
|
phdr->p_offset = grub_host_to_target32 (header_size + layout->kernel_size);
|
|
phdr->p_paddr = phdr->p_vaddr = phdr->p_filesz = phdr->p_memsz = 0;
|
|
phdr->p_flags = grub_host_to_target32 (PF_R | PF_W | PF_X);
|
|
phdr->p_align = grub_host_to_target32 (image_target->link_align);
|
|
|
|
phdr++;
|
|
phdr->p_type = grub_host_to_target32 (PT_LOAD);
|
|
phdr->p_offset = grub_host_to_target32 (header_size + layout->kernel_size);
|
|
phdr->p_flags = grub_host_to_target32 (PF_R | PF_W | PF_X);
|
|
phdr->p_filesz = phdr->p_memsz
|
|
= grub_host_to_target32 (*core_size - layout->kernel_size);
|
|
|
|
if (image_target->id == IMAGE_COREBOOT && image_target->elf_target == EM_386)
|
|
target_addr_mods = GRUB_KERNEL_I386_COREBOOT_MODULES_ADDR;
|
|
else if (image_target->id == IMAGE_COREBOOT && image_target->elf_target == EM_ARM)
|
|
target_addr_mods = ALIGN_UP (target_addr + layout->end
|
|
+ image_target->mod_gap,
|
|
image_target->mod_align);
|
|
else
|
|
target_addr_mods = ALIGN_UP (target_addr + layout->kernel_size + layout->bss_size
|
|
+ image_target->mod_gap,
|
|
image_target->mod_align);
|
|
phdr->p_vaddr = grub_host_to_target_addr (target_addr_mods);
|
|
phdr->p_paddr = grub_host_to_target_addr (target_addr_mods);
|
|
phdr->p_align = grub_host_to_target32 (image_target->link_align);
|
|
}
|
|
|
|
if (image_target->id == IMAGE_XEN)
|
|
{
|
|
char *note_start = (elf_img + program_size + header_size);
|
|
Elf_Nhdr *note_ptr;
|
|
char *ptr = (char *) note_start;
|
|
|
|
grub_util_info ("adding XEN NOTE segment");
|
|
|
|
/* Guest OS. */
|
|
note_ptr = (Elf_Nhdr *) ptr;
|
|
note_ptr->n_namesz = grub_host_to_target32 (sizeof (GRUB_XEN_NOTE_NAME));
|
|
note_ptr->n_descsz = grub_host_to_target32 (sizeof (PACKAGE_NAME));
|
|
note_ptr->n_type = grub_host_to_target32 (6);
|
|
ptr += sizeof (Elf_Nhdr);
|
|
memcpy (ptr, GRUB_XEN_NOTE_NAME, sizeof (GRUB_XEN_NOTE_NAME));
|
|
ptr += ALIGN_UP (sizeof (GRUB_XEN_NOTE_NAME), 4);
|
|
memcpy (ptr, PACKAGE_NAME, sizeof (PACKAGE_NAME));
|
|
ptr += ALIGN_UP (sizeof (PACKAGE_NAME), 4);
|
|
|
|
/* Loader. */
|
|
note_ptr = (Elf_Nhdr *) ptr;
|
|
note_ptr->n_namesz = grub_host_to_target32 (sizeof (GRUB_XEN_NOTE_NAME));
|
|
note_ptr->n_descsz = grub_host_to_target32 (sizeof ("generic"));
|
|
note_ptr->n_type = grub_host_to_target32 (8);
|
|
ptr += sizeof (Elf_Nhdr);
|
|
memcpy (ptr, GRUB_XEN_NOTE_NAME, sizeof (GRUB_XEN_NOTE_NAME));
|
|
ptr += ALIGN_UP (sizeof (GRUB_XEN_NOTE_NAME), 4);
|
|
memcpy (ptr, "generic", sizeof ("generic"));
|
|
ptr += ALIGN_UP (sizeof ("generic"), 4);
|
|
|
|
/* Version. */
|
|
note_ptr = (Elf_Nhdr *) ptr;
|
|
note_ptr->n_namesz = grub_host_to_target32 (sizeof (GRUB_XEN_NOTE_NAME));
|
|
note_ptr->n_descsz = grub_host_to_target32 (sizeof ("xen-3.0"));
|
|
note_ptr->n_type = grub_host_to_target32 (5);
|
|
ptr += sizeof (Elf_Nhdr);
|
|
memcpy (ptr, GRUB_XEN_NOTE_NAME, sizeof (GRUB_XEN_NOTE_NAME));
|
|
ptr += ALIGN_UP (sizeof (GRUB_XEN_NOTE_NAME), 4);
|
|
memcpy (ptr, "xen-3.0", sizeof ("xen-3.0"));
|
|
ptr += ALIGN_UP (sizeof ("xen-3.0"), 4);
|
|
|
|
/* Entry. */
|
|
note_ptr = (Elf_Nhdr *) ptr;
|
|
note_ptr->n_namesz = grub_host_to_target32 (sizeof (GRUB_XEN_NOTE_NAME));
|
|
note_ptr->n_descsz = grub_host_to_target32 (image_target->voidp_sizeof);
|
|
note_ptr->n_type = grub_host_to_target32 (1);
|
|
ptr += sizeof (Elf_Nhdr);
|
|
memcpy (ptr, GRUB_XEN_NOTE_NAME, sizeof (GRUB_XEN_NOTE_NAME));
|
|
ptr += ALIGN_UP (sizeof (GRUB_XEN_NOTE_NAME), 4);
|
|
memset (ptr, 0, image_target->voidp_sizeof);
|
|
ptr += image_target->voidp_sizeof;
|
|
|
|
/* Virt base. */
|
|
note_ptr = (Elf_Nhdr *) ptr;
|
|
note_ptr->n_namesz = grub_host_to_target32 (sizeof (GRUB_XEN_NOTE_NAME));
|
|
note_ptr->n_descsz = grub_host_to_target32 (image_target->voidp_sizeof);
|
|
note_ptr->n_type = grub_host_to_target32 (3);
|
|
ptr += sizeof (Elf_Nhdr);
|
|
memcpy (ptr, GRUB_XEN_NOTE_NAME, sizeof (GRUB_XEN_NOTE_NAME));
|
|
ptr += ALIGN_UP (sizeof (GRUB_XEN_NOTE_NAME), 4);
|
|
memset (ptr, 0, image_target->voidp_sizeof);
|
|
ptr += image_target->voidp_sizeof;
|
|
|
|
/* PAE. */
|
|
if (image_target->elf_target == EM_386)
|
|
{
|
|
note_ptr = (Elf_Nhdr *) ptr;
|
|
note_ptr->n_namesz = grub_host_to_target32 (sizeof (GRUB_XEN_NOTE_NAME));
|
|
note_ptr->n_descsz = grub_host_to_target32 (sizeof ("yes,bimodal"));
|
|
note_ptr->n_type = grub_host_to_target32 (9);
|
|
ptr += sizeof (Elf_Nhdr);
|
|
memcpy (ptr, GRUB_XEN_NOTE_NAME, sizeof (GRUB_XEN_NOTE_NAME));
|
|
ptr += ALIGN_UP (sizeof (GRUB_XEN_NOTE_NAME), 4);
|
|
memcpy (ptr, "yes", sizeof ("yes"));
|
|
ptr += ALIGN_UP (sizeof ("yes"), 4);
|
|
}
|
|
|
|
assert (XEN_NOTE_SIZE == (ptr - note_start));
|
|
|
|
phdr++;
|
|
phdr->p_type = grub_host_to_target32 (PT_NOTE);
|
|
phdr->p_flags = grub_host_to_target32 (PF_R);
|
|
phdr->p_align = grub_host_to_target32 (image_target->voidp_sizeof);
|
|
phdr->p_vaddr = 0;
|
|
phdr->p_paddr = 0;
|
|
phdr->p_filesz = grub_host_to_target32 (XEN_NOTE_SIZE);
|
|
phdr->p_memsz = 0;
|
|
phdr->p_offset = grub_host_to_target32 (header_size + program_size);
|
|
}
|
|
|
|
if (note)
|
|
{
|
|
int note_size = sizeof (struct grub_ieee1275_note);
|
|
struct grub_ieee1275_note *note_ptr = (struct grub_ieee1275_note *)
|
|
(elf_img + program_size + header_size);
|
|
|
|
grub_util_info ("adding CHRP NOTE segment");
|
|
|
|
note_ptr->header.n_namesz = grub_host_to_target32 (sizeof (GRUB_IEEE1275_NOTE_NAME));
|
|
note_ptr->header.n_descsz = grub_host_to_target32 (note_size);
|
|
note_ptr->header.n_type = grub_host_to_target32 (GRUB_IEEE1275_NOTE_TYPE);
|
|
strcpy (note_ptr->name, GRUB_IEEE1275_NOTE_NAME);
|
|
note_ptr->descriptor.real_mode = grub_host_to_target32 (0xffffffff);
|
|
note_ptr->descriptor.real_base = grub_host_to_target32 (0x00c00000);
|
|
note_ptr->descriptor.real_size = grub_host_to_target32 (0xffffffff);
|
|
note_ptr->descriptor.virt_base = grub_host_to_target32 (0xffffffff);
|
|
note_ptr->descriptor.virt_size = grub_host_to_target32 (0xffffffff);
|
|
note_ptr->descriptor.load_base = grub_host_to_target32 (0x00004000);
|
|
|
|
phdr++;
|
|
phdr->p_type = grub_host_to_target32 (PT_NOTE);
|
|
phdr->p_flags = grub_host_to_target32 (PF_R);
|
|
phdr->p_align = grub_host_to_target32 (image_target->voidp_sizeof);
|
|
phdr->p_vaddr = 0;
|
|
phdr->p_paddr = 0;
|
|
phdr->p_filesz = grub_host_to_target32 (note_size);
|
|
phdr->p_memsz = 0;
|
|
phdr->p_offset = grub_host_to_target32 (header_size + program_size);
|
|
}
|
|
|
|
{
|
|
char *str_start = (elf_img + sizeof (*ehdr) + phnum * sizeof (*phdr)
|
|
+ shnum * sizeof (*shdr));
|
|
char *ptr = str_start + 1;
|
|
|
|
shdr++;
|
|
|
|
shdr->sh_name = grub_host_to_target32 (0);
|
|
shdr->sh_type = grub_host_to_target32 (SHT_STRTAB);
|
|
shdr->sh_addr = grub_host_to_target_addr (0);
|
|
shdr->sh_offset = grub_host_to_target_addr (str_start - elf_img);
|
|
shdr->sh_size = grub_host_to_target32 (string_size);
|
|
shdr->sh_link = grub_host_to_target32 (0);
|
|
shdr->sh_info = grub_host_to_target32 (0);
|
|
shdr->sh_addralign = grub_host_to_target32 (layout->align);
|
|
shdr->sh_entsize = grub_host_to_target32 (0);
|
|
shdr++;
|
|
|
|
memcpy (ptr, ".text", sizeof (".text"));
|
|
|
|
shdr->sh_name = grub_host_to_target32 (ptr - str_start);
|
|
ptr += sizeof (".text");
|
|
shdr->sh_type = grub_host_to_target32 (SHT_PROGBITS);
|
|
shdr->sh_addr = grub_host_to_target_addr (target_addr);
|
|
shdr->sh_offset = grub_host_to_target_addr (header_size);
|
|
shdr->sh_size = grub_host_to_target32 (layout->kernel_size);
|
|
shdr->sh_link = grub_host_to_target32 (0);
|
|
shdr->sh_info = grub_host_to_target32 (0);
|
|
shdr->sh_addralign = grub_host_to_target32 (layout->align);
|
|
shdr->sh_entsize = grub_host_to_target32 (0);
|
|
shdr++;
|
|
|
|
memcpy (ptr, "mods", sizeof ("mods"));
|
|
shdr->sh_name = grub_host_to_target32 (ptr - str_start);
|
|
ptr += sizeof ("mods");
|
|
shdr->sh_type = grub_host_to_target32 (SHT_PROGBITS);
|
|
shdr->sh_addr = grub_host_to_target_addr (target_addr + layout->kernel_size);
|
|
shdr->sh_offset = grub_host_to_target_addr (header_size + layout->kernel_size);
|
|
shdr->sh_size = grub_host_to_target32 (*core_size - layout->kernel_size);
|
|
shdr->sh_link = grub_host_to_target32 (0);
|
|
shdr->sh_info = grub_host_to_target32 (0);
|
|
shdr->sh_addralign = grub_host_to_target32 (image_target->voidp_sizeof);
|
|
shdr->sh_entsize = grub_host_to_target32 (0);
|
|
shdr++;
|
|
|
|
if (image_target->id == IMAGE_XEN)
|
|
{
|
|
memcpy (ptr, ".xen", sizeof (".xen"));
|
|
shdr->sh_name = grub_host_to_target32 (ptr - str_start);
|
|
ptr += sizeof (".xen");
|
|
shdr->sh_type = grub_host_to_target32 (SHT_PROGBITS);
|
|
shdr->sh_addr = grub_host_to_target_addr (target_addr + layout->kernel_size);
|
|
shdr->sh_offset = grub_host_to_target_addr (program_size + header_size);
|
|
shdr->sh_size = grub_host_to_target32 (XEN_NOTE_SIZE);
|
|
shdr->sh_link = grub_host_to_target32 (0);
|
|
shdr->sh_info = grub_host_to_target32 (0);
|
|
shdr->sh_addralign = grub_host_to_target32 (image_target->voidp_sizeof);
|
|
shdr->sh_entsize = grub_host_to_target32 (0);
|
|
shdr++;
|
|
}
|
|
}
|
|
|
|
free (*core_img);
|
|
*core_img = elf_img;
|
|
*core_size = program_size + header_size + footer_size;
|
|
}
|
|
|
|
/* Relocate symbols; note that this function overwrites the symbol table.
|
|
Return the address of a start symbol. */
|
|
static Elf_Addr
|
|
SUFFIX (relocate_symbols) (Elf_Ehdr *e, Elf_Shdr *sections,
|
|
Elf_Shdr *symtab_section, Elf_Addr *section_addresses,
|
|
Elf_Half section_entsize, Elf_Half num_sections,
|
|
void *jumpers, Elf_Addr jumpers_addr,
|
|
Elf_Addr bss_start, Elf_Addr end,
|
|
const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
Elf_Word symtab_size, sym_size, num_syms;
|
|
Elf_Off symtab_offset;
|
|
Elf_Addr start_address = (Elf_Addr) -1;
|
|
Elf_Sym *sym;
|
|
Elf_Word i;
|
|
Elf_Shdr *strtab_section;
|
|
const char *strtab;
|
|
grub_uint64_t *jptr = jumpers;
|
|
|
|
strtab_section
|
|
= (Elf_Shdr *) ((char *) sections
|
|
+ (grub_target_to_host32 (symtab_section->sh_link)
|
|
* section_entsize));
|
|
strtab = (char *) e + grub_target_to_host (strtab_section->sh_offset);
|
|
|
|
symtab_size = grub_target_to_host (symtab_section->sh_size);
|
|
sym_size = grub_target_to_host (symtab_section->sh_entsize);
|
|
symtab_offset = grub_target_to_host (symtab_section->sh_offset);
|
|
num_syms = symtab_size / sym_size;
|
|
|
|
for (i = 0, sym = (Elf_Sym *) ((char *) e + symtab_offset);
|
|
i < num_syms;
|
|
i++, sym = (Elf_Sym *) ((char *) sym + sym_size))
|
|
{
|
|
Elf_Section cur_index;
|
|
const char *name;
|
|
|
|
name = strtab + grub_target_to_host32 (sym->st_name);
|
|
|
|
cur_index = grub_target_to_host16 (sym->st_shndx);
|
|
if (cur_index == STN_ABS)
|
|
{
|
|
continue;
|
|
}
|
|
else if (cur_index == STN_UNDEF)
|
|
{
|
|
if (sym->st_name && grub_strcmp (name, "__bss_start") == 0)
|
|
sym->st_value = bss_start;
|
|
else if (sym->st_name && grub_strcmp (name, "_end") == 0)
|
|
sym->st_value = end;
|
|
else if (sym->st_name)
|
|
grub_util_error ("undefined symbol %s", name);
|
|
else
|
|
continue;
|
|
}
|
|
else if (cur_index >= num_sections)
|
|
grub_util_error ("section %d does not exist", cur_index);
|
|
else
|
|
{
|
|
sym->st_value = (grub_target_to_host (sym->st_value)
|
|
+ section_addresses[cur_index]);
|
|
}
|
|
|
|
if (image_target->elf_target == EM_IA_64 && ELF_ST_TYPE (sym->st_info)
|
|
== STT_FUNC)
|
|
{
|
|
*jptr = grub_host_to_target64 (sym->st_value);
|
|
sym->st_value = (char *) jptr - (char *) jumpers + jumpers_addr;
|
|
jptr++;
|
|
*jptr = 0;
|
|
jptr++;
|
|
}
|
|
grub_util_info ("locating %s at 0x%" GRUB_HOST_PRIxLONG_LONG
|
|
" (0x%" GRUB_HOST_PRIxLONG_LONG ")", name,
|
|
(unsigned long long) sym->st_value,
|
|
(unsigned long long) section_addresses[cur_index]);
|
|
|
|
if (start_address == (Elf_Addr)-1)
|
|
if (strcmp (name, "_start") == 0 || strcmp (name, "start") == 0)
|
|
start_address = sym->st_value;
|
|
}
|
|
|
|
return start_address;
|
|
}
|
|
|
|
/* Return the address of a symbol at the index I in the section S. */
|
|
static Elf_Addr
|
|
SUFFIX (get_symbol_address) (Elf_Ehdr *e, Elf_Shdr *s, Elf_Word i,
|
|
const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
Elf_Sym *sym;
|
|
|
|
sym = (Elf_Sym *) ((char *) e
|
|
+ grub_target_to_host (s->sh_offset)
|
|
+ i * grub_target_to_host (s->sh_entsize));
|
|
return sym->st_value;
|
|
}
|
|
|
|
/* Return the address of a modified value. */
|
|
static Elf_Addr *
|
|
SUFFIX (get_target_address) (Elf_Ehdr *e, Elf_Shdr *s, Elf_Addr offset,
|
|
const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
return (Elf_Addr *) ((char *) e + grub_target_to_host (s->sh_offset) + offset);
|
|
}
|
|
|
|
#ifdef MKIMAGE_ELF64
|
|
static Elf_Addr
|
|
SUFFIX (count_funcs) (Elf_Ehdr *e, Elf_Shdr *symtab_section,
|
|
const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
Elf_Word symtab_size, sym_size, num_syms;
|
|
Elf_Off symtab_offset;
|
|
Elf_Sym *sym;
|
|
Elf_Word i;
|
|
int ret = 0;
|
|
|
|
symtab_size = grub_target_to_host (symtab_section->sh_size);
|
|
sym_size = grub_target_to_host (symtab_section->sh_entsize);
|
|
symtab_offset = grub_target_to_host (symtab_section->sh_offset);
|
|
num_syms = symtab_size / sym_size;
|
|
|
|
for (i = 0, sym = (Elf_Sym *) ((char *) e + symtab_offset);
|
|
i < num_syms;
|
|
i++, sym = (Elf_Sym *) ((char *) sym + sym_size))
|
|
if (ELF_ST_TYPE (sym->st_info) == STT_FUNC)
|
|
ret++;
|
|
|
|
return ret;
|
|
}
|
|
#endif
|
|
|
|
#ifdef MKIMAGE_ELF32
|
|
/* Deal with relocation information. This function relocates addresses
|
|
within the virtual address space starting from 0. So only relative
|
|
addresses can be fully resolved. Absolute addresses must be relocated
|
|
again by a PE32 relocator when loaded. */
|
|
static grub_size_t
|
|
arm_get_trampoline_size (Elf_Ehdr *e,
|
|
Elf_Shdr *sections,
|
|
Elf_Half section_entsize,
|
|
Elf_Half num_sections,
|
|
const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
Elf_Half i;
|
|
Elf_Shdr *s;
|
|
grub_size_t ret = 0;
|
|
|
|
for (i = 0, s = sections;
|
|
i < num_sections;
|
|
i++, s = (Elf_Shdr *) ((char *) s + section_entsize))
|
|
if ((s->sh_type == grub_host_to_target32 (SHT_REL)) ||
|
|
(s->sh_type == grub_host_to_target32 (SHT_RELA)))
|
|
{
|
|
Elf_Rela *r;
|
|
Elf_Word rtab_size, r_size, num_rs;
|
|
Elf_Off rtab_offset;
|
|
Elf_Shdr *symtab_section;
|
|
Elf_Word j;
|
|
|
|
symtab_section = (Elf_Shdr *) ((char *) sections
|
|
+ (grub_target_to_host32 (s->sh_link)
|
|
* section_entsize));
|
|
|
|
rtab_size = grub_target_to_host (s->sh_size);
|
|
r_size = grub_target_to_host (s->sh_entsize);
|
|
rtab_offset = grub_target_to_host (s->sh_offset);
|
|
num_rs = rtab_size / r_size;
|
|
|
|
for (j = 0, r = (Elf_Rela *) ((char *) e + rtab_offset);
|
|
j < num_rs;
|
|
j++, r = (Elf_Rela *) ((char *) r + r_size))
|
|
{
|
|
Elf_Addr info;
|
|
Elf_Addr sym_addr;
|
|
|
|
info = grub_target_to_host (r->r_info);
|
|
sym_addr = SUFFIX (get_symbol_address) (e, symtab_section,
|
|
ELF_R_SYM (info), image_target);
|
|
|
|
sym_addr += (s->sh_type == grub_target_to_host32 (SHT_RELA)) ?
|
|
grub_target_to_host (r->r_addend) : 0;
|
|
|
|
switch (ELF_R_TYPE (info))
|
|
{
|
|
case R_ARM_ABS32:
|
|
case R_ARM_V4BX:
|
|
break;
|
|
case R_ARM_THM_CALL:
|
|
case R_ARM_THM_JUMP24:
|
|
case R_ARM_THM_JUMP19:
|
|
if (!(sym_addr & 1))
|
|
ret += 8;
|
|
break;
|
|
|
|
case R_ARM_CALL:
|
|
case R_ARM_JUMP24:
|
|
if (sym_addr & 1)
|
|
ret += 16;
|
|
break;
|
|
|
|
default:
|
|
grub_util_error (_("relocation 0x%x is not implemented yet"),
|
|
(unsigned int) ELF_R_TYPE (info));
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
return ret;
|
|
}
|
|
#endif
|
|
|
|
/* Deal with relocation information. This function relocates addresses
|
|
within the virtual address space starting from 0. So only relative
|
|
addresses can be fully resolved. Absolute addresses must be relocated
|
|
again by a PE32 relocator when loaded. */
|
|
static void
|
|
SUFFIX (relocate_addresses) (Elf_Ehdr *e, Elf_Shdr *sections,
|
|
Elf_Addr *section_addresses,
|
|
Elf_Half section_entsize, Elf_Half num_sections,
|
|
const char *strtab,
|
|
char *pe_target, Elf_Addr tramp_off,
|
|
Elf_Addr got_off,
|
|
const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
Elf_Half i;
|
|
Elf_Shdr *s;
|
|
#ifdef MKIMAGE_ELF64
|
|
struct grub_ia64_trampoline *tr = (void *) (pe_target + tramp_off);
|
|
grub_uint64_t *gpptr = (void *) (pe_target + got_off);
|
|
unsigned unmatched_adr_got_page = 0;
|
|
#define MASK19 ((1 << 19) - 1)
|
|
#else
|
|
grub_uint32_t *tr = (void *) (pe_target + tramp_off);
|
|
#endif
|
|
|
|
for (i = 0, s = sections;
|
|
i < num_sections;
|
|
i++, s = (Elf_Shdr *) ((char *) s + section_entsize))
|
|
if ((s->sh_type == grub_host_to_target32 (SHT_REL)) ||
|
|
(s->sh_type == grub_host_to_target32 (SHT_RELA)))
|
|
{
|
|
Elf_Rela *r;
|
|
Elf_Word rtab_size, r_size, num_rs;
|
|
Elf_Off rtab_offset;
|
|
Elf_Shdr *symtab_section;
|
|
Elf_Word target_section_index;
|
|
Elf_Addr target_section_addr;
|
|
Elf_Shdr *target_section;
|
|
Elf_Word j;
|
|
|
|
symtab_section = (Elf_Shdr *) ((char *) sections
|
|
+ (grub_target_to_host32 (s->sh_link)
|
|
* section_entsize));
|
|
target_section_index = grub_target_to_host32 (s->sh_info);
|
|
target_section_addr = section_addresses[target_section_index];
|
|
target_section = (Elf_Shdr *) ((char *) sections
|
|
+ (target_section_index
|
|
* section_entsize));
|
|
|
|
grub_util_info ("dealing with the relocation section %s for %s",
|
|
strtab + grub_target_to_host32 (s->sh_name),
|
|
strtab + grub_target_to_host32 (target_section->sh_name));
|
|
|
|
rtab_size = grub_target_to_host (s->sh_size);
|
|
r_size = grub_target_to_host (s->sh_entsize);
|
|
rtab_offset = grub_target_to_host (s->sh_offset);
|
|
num_rs = rtab_size / r_size;
|
|
|
|
for (j = 0, r = (Elf_Rela *) ((char *) e + rtab_offset);
|
|
j < num_rs;
|
|
j++, r = (Elf_Rela *) ((char *) r + r_size))
|
|
{
|
|
Elf_Addr info;
|
|
Elf_Addr offset;
|
|
Elf_Addr sym_addr;
|
|
Elf_Addr *target;
|
|
Elf_Addr addend;
|
|
|
|
offset = grub_target_to_host (r->r_offset);
|
|
target = SUFFIX (get_target_address) (e, target_section,
|
|
offset, image_target);
|
|
info = grub_target_to_host (r->r_info);
|
|
sym_addr = SUFFIX (get_symbol_address) (e, symtab_section,
|
|
ELF_R_SYM (info), image_target);
|
|
|
|
addend = (s->sh_type == grub_target_to_host32 (SHT_RELA)) ?
|
|
grub_target_to_host (r->r_addend) : 0;
|
|
|
|
switch (image_target->elf_target)
|
|
{
|
|
case EM_386:
|
|
switch (ELF_R_TYPE (info))
|
|
{
|
|
case R_386_NONE:
|
|
break;
|
|
|
|
case R_386_32:
|
|
/* This is absolute. */
|
|
*target = grub_host_to_target32 (grub_target_to_host32 (*target)
|
|
+ addend + sym_addr);
|
|
grub_util_info ("relocating an R_386_32 entry to 0x%"
|
|
GRUB_HOST_PRIxLONG_LONG " at the offset 0x%"
|
|
GRUB_HOST_PRIxLONG_LONG,
|
|
(unsigned long long) *target,
|
|
(unsigned long long) offset);
|
|
break;
|
|
|
|
case R_386_PC32:
|
|
/* This is relative. */
|
|
*target = grub_host_to_target32 (grub_target_to_host32 (*target)
|
|
+ addend + sym_addr
|
|
- target_section_addr - offset
|
|
- image_target->vaddr_offset);
|
|
grub_util_info ("relocating an R_386_PC32 entry to 0x%"
|
|
GRUB_HOST_PRIxLONG_LONG " at the offset 0x%"
|
|
GRUB_HOST_PRIxLONG_LONG,
|
|
(unsigned long long) *target,
|
|
(unsigned long long) offset);
|
|
break;
|
|
default:
|
|
grub_util_error (_("relocation 0x%x is not implemented yet"),
|
|
(unsigned int) ELF_R_TYPE (info));
|
|
break;
|
|
}
|
|
break;
|
|
#ifdef MKIMAGE_ELF64
|
|
case EM_X86_64:
|
|
switch (ELF_R_TYPE (info))
|
|
{
|
|
|
|
case R_X86_64_NONE:
|
|
break;
|
|
|
|
case R_X86_64_64:
|
|
*target = grub_host_to_target64 (grub_target_to_host64 (*target)
|
|
+ addend + sym_addr);
|
|
grub_util_info ("relocating an R_X86_64_64 entry to 0x%"
|
|
GRUB_HOST_PRIxLONG_LONG " at the offset 0x%"
|
|
GRUB_HOST_PRIxLONG_LONG,
|
|
(unsigned long long) *target,
|
|
(unsigned long long) offset);
|
|
break;
|
|
|
|
case R_X86_64_PC32:
|
|
case R_X86_64_PLT32:
|
|
{
|
|
grub_uint32_t *t32 = (grub_uint32_t *) target;
|
|
*t32 = grub_host_to_target64 (grub_target_to_host32 (*t32)
|
|
+ addend + sym_addr
|
|
- target_section_addr - offset
|
|
- image_target->vaddr_offset);
|
|
grub_util_info ("relocating an R_X86_64_PC32 entry to 0x%x at the offset 0x%"
|
|
GRUB_HOST_PRIxLONG_LONG,
|
|
*t32, (unsigned long long) offset);
|
|
break;
|
|
}
|
|
|
|
case R_X86_64_PC64:
|
|
{
|
|
*target = grub_host_to_target64 (grub_target_to_host64 (*target)
|
|
+ addend + sym_addr
|
|
- target_section_addr - offset
|
|
- image_target->vaddr_offset);
|
|
grub_util_info ("relocating an R_X86_64_PC64 entry to 0x%"
|
|
GRUB_HOST_PRIxLONG_LONG " at the offset 0x%"
|
|
GRUB_HOST_PRIxLONG_LONG,
|
|
(unsigned long long) *target,
|
|
(unsigned long long) offset);
|
|
break;
|
|
}
|
|
|
|
case R_X86_64_32:
|
|
case R_X86_64_32S:
|
|
{
|
|
grub_uint32_t *t32 = (grub_uint32_t *) target;
|
|
*t32 = grub_host_to_target64 (grub_target_to_host32 (*t32)
|
|
+ addend + sym_addr);
|
|
grub_util_info ("relocating an R_X86_64_32(S) entry to 0x%x at the offset 0x%"
|
|
GRUB_HOST_PRIxLONG_LONG,
|
|
*t32, (unsigned long long) offset);
|
|
break;
|
|
}
|
|
|
|
default:
|
|
grub_util_error (_("relocation 0x%x is not implemented yet"),
|
|
(unsigned int) ELF_R_TYPE (info));
|
|
break;
|
|
}
|
|
break;
|
|
case EM_IA_64:
|
|
switch (ELF_R_TYPE (info))
|
|
{
|
|
case R_IA64_PCREL21B:
|
|
{
|
|
grub_uint64_t noff;
|
|
grub_ia64_make_trampoline (tr, addend + sym_addr);
|
|
noff = ((char *) tr - (char *) pe_target
|
|
- target_section_addr - (offset & ~3)) >> 4;
|
|
tr++;
|
|
if (noff & ~MASK19)
|
|
grub_util_error ("trampoline offset too big (%"
|
|
GRUB_HOST_PRIxLONG_LONG ")",
|
|
(unsigned long long) noff);
|
|
grub_ia64_add_value_to_slot_20b ((grub_addr_t) target, noff);
|
|
}
|
|
break;
|
|
|
|
case R_IA64_LTOFF22X:
|
|
case R_IA64_LTOFF22:
|
|
{
|
|
Elf_Sym *sym;
|
|
|
|
sym = (Elf_Sym *) ((char *) e
|
|
+ grub_target_to_host (symtab_section->sh_offset)
|
|
+ ELF_R_SYM (info) * grub_target_to_host (symtab_section->sh_entsize));
|
|
if (ELF_ST_TYPE (sym->st_info) == STT_FUNC)
|
|
sym_addr = grub_target_to_host64 (*(grub_uint64_t *) (pe_target
|
|
+ sym->st_value
|
|
- image_target->vaddr_offset));
|
|
}
|
|
/* FALLTHROUGH */
|
|
case R_IA64_LTOFF_FPTR22:
|
|
*gpptr = grub_host_to_target64 (addend + sym_addr);
|
|
grub_ia64_add_value_to_slot_21 ((grub_addr_t) target,
|
|
(char *) gpptr - (char *) pe_target
|
|
+ image_target->vaddr_offset);
|
|
gpptr++;
|
|
break;
|
|
|
|
case R_IA64_GPREL22:
|
|
grub_ia64_add_value_to_slot_21 ((grub_addr_t) target,
|
|
addend + sym_addr);
|
|
break;
|
|
case R_IA64_GPREL64I:
|
|
grub_ia64_set_immu64 ((grub_addr_t) target,
|
|
addend + sym_addr);
|
|
break;
|
|
case R_IA64_PCREL64LSB:
|
|
*target = grub_host_to_target64 (grub_target_to_host64 (*target)
|
|
+ addend + sym_addr
|
|
- target_section_addr - offset
|
|
- image_target->vaddr_offset);
|
|
break;
|
|
|
|
case R_IA64_SEGREL64LSB:
|
|
*target = grub_host_to_target64 (grub_target_to_host64 (*target)
|
|
+ addend + sym_addr - target_section_addr);
|
|
break;
|
|
case R_IA64_DIR64LSB:
|
|
case R_IA64_FPTR64LSB:
|
|
*target = grub_host_to_target64 (grub_target_to_host64 (*target)
|
|
+ addend + sym_addr);
|
|
grub_util_info ("relocating a direct entry to 0x%"
|
|
GRUB_HOST_PRIxLONG_LONG " at the offset 0x%"
|
|
GRUB_HOST_PRIxLONG_LONG,
|
|
(unsigned long long)
|
|
grub_target_to_host64 (*target),
|
|
(unsigned long long) offset);
|
|
break;
|
|
|
|
/* We treat LTOFF22X as LTOFF22, so we can ignore LDXMOV. */
|
|
case R_IA64_LDXMOV:
|
|
break;
|
|
|
|
default:
|
|
grub_util_error (_("relocation 0x%x is not implemented yet"),
|
|
(unsigned int) ELF_R_TYPE (info));
|
|
break;
|
|
}
|
|
break;
|
|
case EM_AARCH64:
|
|
{
|
|
sym_addr += addend;
|
|
switch (ELF_R_TYPE (info))
|
|
{
|
|
case R_AARCH64_ABS64:
|
|
{
|
|
*target = grub_host_to_target64 (grub_target_to_host64 (*target) + sym_addr);
|
|
}
|
|
break;
|
|
case R_AARCH64_PREL32:
|
|
{
|
|
grub_uint32_t *t32 = (grub_uint32_t *) target;
|
|
*t32 = grub_host_to_target64 (grub_target_to_host32 (*t32)
|
|
+ sym_addr
|
|
- target_section_addr - offset
|
|
- image_target->vaddr_offset);
|
|
grub_util_info ("relocating an R_AARCH64_PREL32 entry to 0x%x at the offset 0x%"
|
|
GRUB_HOST_PRIxLONG_LONG,
|
|
*t32, (unsigned long long) offset);
|
|
break;
|
|
}
|
|
case R_AARCH64_ADD_ABS_LO12_NC:
|
|
grub_arm64_set_abs_lo12 ((grub_uint32_t *) target,
|
|
sym_addr);
|
|
break;
|
|
case R_AARCH64_LDST64_ABS_LO12_NC:
|
|
grub_arm64_set_abs_lo12_ldst64 ((grub_uint32_t *) target,
|
|
sym_addr);
|
|
break;
|
|
case R_AARCH64_JUMP26:
|
|
case R_AARCH64_CALL26:
|
|
{
|
|
sym_addr -= offset;
|
|
sym_addr -= target_section_addr + image_target->vaddr_offset;
|
|
if (!grub_arm_64_check_xxxx26_offset (sym_addr))
|
|
grub_util_error ("%s", "CALL26 Relocation out of range");
|
|
|
|
grub_arm64_set_xxxx26_offset((grub_uint32_t *)target,
|
|
sym_addr);
|
|
}
|
|
break;
|
|
case R_AARCH64_ADR_GOT_PAGE:
|
|
{
|
|
Elf64_Rela *rel2;
|
|
grub_int64_t gpoffset = (((char *) gpptr - (char *) pe_target + image_target->vaddr_offset) & ~0xfffULL)
|
|
- ((offset + target_section_addr + image_target->vaddr_offset) & ~0xfffULL);
|
|
unsigned k;
|
|
*gpptr = grub_host_to_target64 (sym_addr);
|
|
unmatched_adr_got_page++;
|
|
if (!grub_arm64_check_hi21_signed (gpoffset))
|
|
grub_util_error ("HI21 out of range");
|
|
grub_arm64_set_hi21((grub_uint32_t *)target,
|
|
gpoffset);
|
|
for (k = 0, rel2 = (Elf_Rela *) ((char *) r + r_size);
|
|
k < num_rs;
|
|
k++, rel2 = (Elf_Rela *) ((char *) rel2 + r_size))
|
|
if (ELF_R_SYM (rel2->r_info)
|
|
== ELF_R_SYM (r->r_info)
|
|
&& r->r_addend == rel2->r_addend
|
|
&& ELF_R_TYPE (rel2->r_info) == R_AARCH64_LD64_GOT_LO12_NC)
|
|
{
|
|
grub_arm64_set_abs_lo12_ldst64 ((grub_uint32_t *) SUFFIX (get_target_address) (e, target_section,
|
|
grub_target_to_host (rel2->r_offset), image_target),
|
|
((char *) gpptr - (char *) pe_target + image_target->vaddr_offset));
|
|
break;
|
|
}
|
|
if (k >= num_rs)
|
|
grub_util_error ("ADR_GOT_PAGE without matching LD64_GOT_LO12_NC");
|
|
gpptr++;
|
|
}
|
|
break;
|
|
case R_AARCH64_LD64_GOT_LO12_NC:
|
|
if (unmatched_adr_got_page == 0)
|
|
grub_util_error ("LD64_GOT_LO12_NC without matching ADR_GOT_PAGE");
|
|
unmatched_adr_got_page--;
|
|
break;
|
|
case R_AARCH64_ADR_PREL_PG_HI21:
|
|
{
|
|
sym_addr &= ~0xfffULL;
|
|
sym_addr -= (offset + target_section_addr + image_target->vaddr_offset) & ~0xfffULL;
|
|
if (!grub_arm64_check_hi21_signed (sym_addr))
|
|
grub_util_error ("%s", "CALL26 Relocation out of range");
|
|
|
|
grub_arm64_set_hi21((grub_uint32_t *)target,
|
|
sym_addr);
|
|
}
|
|
break;
|
|
default:
|
|
grub_util_error (_("relocation 0x%x is not implemented yet"),
|
|
(unsigned int) ELF_R_TYPE (info));
|
|
break;
|
|
}
|
|
break;
|
|
}
|
|
#endif
|
|
#if defined(MKIMAGE_ELF32)
|
|
case EM_ARM:
|
|
{
|
|
sym_addr += addend;
|
|
sym_addr -= image_target->vaddr_offset;
|
|
switch (ELF_R_TYPE (info))
|
|
{
|
|
case R_ARM_ABS32:
|
|
{
|
|
grub_util_info (" ABS32:\toffset=%d\t(0x%08x)",
|
|
(int) sym_addr, (int) sym_addr);
|
|
/* Data will be naturally aligned */
|
|
if (image_target->id == IMAGE_EFI)
|
|
sym_addr += 0x400;
|
|
*target = grub_host_to_target32 (grub_target_to_host32 (*target) + sym_addr);
|
|
}
|
|
break;
|
|
/* Happens when compiled with -march=armv4.
|
|
Since currently we need at least armv5, keep bx as-is.
|
|
*/
|
|
case R_ARM_V4BX:
|
|
break;
|
|
case R_ARM_THM_CALL:
|
|
case R_ARM_THM_JUMP24:
|
|
case R_ARM_THM_JUMP19:
|
|
{
|
|
grub_err_t err;
|
|
Elf_Sym *sym;
|
|
grub_util_info (" THM_JUMP24:\ttarget=0x%08lx\toffset=(0x%08x)",
|
|
(unsigned long) ((char *) target
|
|
- (char *) e),
|
|
sym_addr);
|
|
sym = (Elf_Sym *) ((char *) e
|
|
+ grub_target_to_host (symtab_section->sh_offset)
|
|
+ ELF_R_SYM (info) * grub_target_to_host (symtab_section->sh_entsize));
|
|
if (ELF_ST_TYPE (sym->st_info) != STT_FUNC)
|
|
sym_addr |= 1;
|
|
if (!(sym_addr & 1))
|
|
{
|
|
grub_uint32_t tr_addr;
|
|
grub_int32_t new_offset;
|
|
tr_addr = (char *) tr - (char *) pe_target
|
|
- target_section_addr;
|
|
new_offset = sym_addr - tr_addr - 12;
|
|
|
|
if (!grub_arm_jump24_check_offset (new_offset))
|
|
return grub_util_error ("jump24 relocation out of range");
|
|
|
|
tr[0] = grub_host_to_target32 (0x46c04778); /* bx pc; nop */
|
|
tr[1] = grub_host_to_target32 (((new_offset >> 2) & 0xffffff) | 0xea000000); /* b new_offset */
|
|
tr += 2;
|
|
sym_addr = tr_addr | 1;
|
|
}
|
|
sym_addr -= offset;
|
|
/* Thumb instructions can be 16-bit aligned */
|
|
if (ELF_R_TYPE (info) == R_ARM_THM_JUMP19)
|
|
err = grub_arm_reloc_thm_jump19 ((grub_uint16_t *) target, sym_addr);
|
|
else
|
|
err = grub_arm_reloc_thm_call ((grub_uint16_t *) target,
|
|
sym_addr);
|
|
if (err)
|
|
grub_util_error ("%s", grub_errmsg);
|
|
}
|
|
break;
|
|
|
|
case R_ARM_CALL:
|
|
case R_ARM_JUMP24:
|
|
{
|
|
grub_err_t err;
|
|
grub_util_info (" JUMP24:\ttarget=0x%08lx\toffset=(0x%08x)", (unsigned long) ((char *) target - (char *) e), sym_addr);
|
|
if (sym_addr & 1)
|
|
{
|
|
grub_uint32_t tr_addr;
|
|
grub_int32_t new_offset;
|
|
tr_addr = (char *) tr - (char *) pe_target
|
|
- target_section_addr;
|
|
new_offset = sym_addr - tr_addr - 12;
|
|
|
|
/* There is no immediate version of bx, only register one... */
|
|
tr[0] = grub_host_to_target32 (0xe59fc004); /* ldr ip, [pc, #4] */
|
|
tr[1] = grub_host_to_target32 (0xe08cc00f); /* add ip, ip, pc */
|
|
tr[2] = grub_host_to_target32 (0xe12fff1c); /* bx ip */
|
|
tr[3] = grub_host_to_target32 (new_offset | 1);
|
|
tr += 4;
|
|
sym_addr = tr_addr;
|
|
}
|
|
sym_addr -= offset;
|
|
err = grub_arm_reloc_jump24 (target,
|
|
sym_addr);
|
|
if (err)
|
|
grub_util_error ("%s", grub_errmsg);
|
|
}
|
|
break;
|
|
|
|
default:
|
|
grub_util_error (_("relocation 0x%x is not implemented yet"),
|
|
(unsigned int) ELF_R_TYPE (info));
|
|
break;
|
|
}
|
|
break;
|
|
}
|
|
#endif /* MKIMAGE_ELF32 */
|
|
default:
|
|
grub_util_error ("unknown architecture type %d",
|
|
image_target->elf_target);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
/* Add a PE32's fixup entry for a relocation. Return the resulting address
|
|
after having written to the file OUT. */
|
|
static Elf_Addr
|
|
add_fixup_entry (struct fixup_block_list **cblock, grub_uint16_t type,
|
|
Elf_Addr addr, int flush, Elf_Addr current_address,
|
|
const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
struct grub_pe32_fixup_block *b;
|
|
|
|
b = &((*cblock)->b);
|
|
|
|
/* First, check if it is necessary to write out the current block. */
|
|
if ((*cblock)->state)
|
|
{
|
|
if (flush || addr < b->page_rva || b->page_rva + 0x1000 <= addr)
|
|
{
|
|
grub_uint32_t size;
|
|
|
|
if (flush)
|
|
{
|
|
/* Add as much padding as necessary to align the address
|
|
with a section boundary. */
|
|
Elf_Addr next_address;
|
|
unsigned padding_size;
|
|
size_t cur_index;
|
|
|
|
next_address = current_address + b->block_size;
|
|
padding_size = ((ALIGN_UP (next_address, image_target->section_align)
|
|
- next_address)
|
|
>> 1);
|
|
cur_index = ((b->block_size - sizeof (*b)) >> 1);
|
|
grub_util_info ("adding %d padding fixup entries", padding_size);
|
|
while (padding_size--)
|
|
{
|
|
b->entries[cur_index++] = 0;
|
|
b->block_size += 2;
|
|
}
|
|
}
|
|
else while (b->block_size & (8 - 1))
|
|
{
|
|
/* If not aligned with a 32-bit boundary, add
|
|
a padding entry. */
|
|
size_t cur_index;
|
|
|
|
grub_util_info ("adding a padding fixup entry");
|
|
cur_index = ((b->block_size - sizeof (*b)) >> 1);
|
|
b->entries[cur_index] = 0;
|
|
b->block_size += 2;
|
|
}
|
|
|
|
/* Flush it. */
|
|
grub_util_info ("writing %d bytes of a fixup block starting at 0x%x",
|
|
b->block_size, b->page_rva);
|
|
size = b->block_size;
|
|
current_address += size;
|
|
b->page_rva = grub_host_to_target32 (b->page_rva);
|
|
b->block_size = grub_host_to_target32 (b->block_size);
|
|
(*cblock)->next = xmalloc (sizeof (**cblock) + 2 * 0x1000);
|
|
memset ((*cblock)->next, 0, sizeof (**cblock) + 2 * 0x1000);
|
|
*cblock = (*cblock)->next;
|
|
}
|
|
}
|
|
|
|
b = &((*cblock)->b);
|
|
|
|
if (! flush)
|
|
{
|
|
grub_uint16_t entry;
|
|
size_t cur_index;
|
|
|
|
/* If not allocated yet, allocate a block with enough entries. */
|
|
if (! (*cblock)->state)
|
|
{
|
|
(*cblock)->state = 1;
|
|
|
|
/* The spec does not mention the requirement of a Page RVA.
|
|
Here, align the address with a 4K boundary for safety. */
|
|
b->page_rva = (addr & ~(0x1000 - 1));
|
|
b->block_size = sizeof (*b);
|
|
}
|
|
|
|
/* Sanity check. */
|
|
if (b->block_size >= sizeof (*b) + 2 * 0x1000)
|
|
grub_util_error ("too many fixup entries");
|
|
|
|
/* Add a new entry. */
|
|
cur_index = ((b->block_size - sizeof (*b)) >> 1);
|
|
entry = GRUB_PE32_FIXUP_ENTRY (type, addr - b->page_rva);
|
|
b->entries[cur_index] = grub_host_to_target16 (entry);
|
|
b->block_size += 2;
|
|
}
|
|
|
|
return current_address;
|
|
}
|
|
|
|
struct raw_reloc
|
|
{
|
|
struct raw_reloc *next;
|
|
grub_uint32_t offset;
|
|
enum raw_reloc_type {
|
|
RAW_RELOC_NONE = -1,
|
|
RAW_RELOC_32 = 0,
|
|
RAW_RELOC_MAX = 1,
|
|
} type;
|
|
};
|
|
|
|
struct translate_context
|
|
{
|
|
/* PE */
|
|
struct fixup_block_list *lst, *lst0;
|
|
Elf_Addr current_address;
|
|
|
|
/* Raw */
|
|
struct raw_reloc *raw_relocs;
|
|
};
|
|
|
|
static void
|
|
translate_reloc_start (struct translate_context *ctx,
|
|
const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
grub_memset (ctx, 0, sizeof (*ctx));
|
|
if (image_target->id == IMAGE_EFI)
|
|
{
|
|
ctx->lst = ctx->lst0 = xmalloc (sizeof (*ctx->lst) + 2 * 0x1000);
|
|
memset (ctx->lst, 0, sizeof (*ctx->lst) + 2 * 0x1000);
|
|
ctx->current_address = 0;
|
|
}
|
|
}
|
|
|
|
static void
|
|
translate_relocation_pe (struct translate_context *ctx,
|
|
Elf_Addr addr,
|
|
Elf_Addr info,
|
|
const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
/* Necessary to relocate only absolute addresses. */
|
|
switch (image_target->elf_target)
|
|
{
|
|
case EM_386:
|
|
if (ELF_R_TYPE (info) == R_386_32)
|
|
{
|
|
grub_util_info ("adding a relocation entry for 0x%"
|
|
GRUB_HOST_PRIxLONG_LONG,
|
|
(unsigned long long) addr);
|
|
ctx->current_address
|
|
= add_fixup_entry (&ctx->lst,
|
|
GRUB_PE32_REL_BASED_HIGHLOW,
|
|
addr, 0, ctx->current_address,
|
|
image_target);
|
|
}
|
|
break;
|
|
case EM_X86_64:
|
|
if ((ELF_R_TYPE (info) == R_X86_64_32) ||
|
|
(ELF_R_TYPE (info) == R_X86_64_32S))
|
|
{
|
|
grub_util_error ("can\'t add fixup entry for R_X86_64_32(S)");
|
|
}
|
|
else if (ELF_R_TYPE (info) == R_X86_64_64)
|
|
{
|
|
grub_util_info ("adding a relocation entry for 0x%"
|
|
GRUB_HOST_PRIxLONG_LONG,
|
|
(unsigned long long) addr);
|
|
ctx->current_address
|
|
= add_fixup_entry (&ctx->lst,
|
|
GRUB_PE32_REL_BASED_DIR64,
|
|
addr,
|
|
0, ctx->current_address,
|
|
image_target);
|
|
}
|
|
break;
|
|
case EM_IA_64:
|
|
switch (ELF_R_TYPE (info))
|
|
{
|
|
case R_IA64_PCREL64LSB:
|
|
case R_IA64_LDXMOV:
|
|
case R_IA64_PCREL21B:
|
|
case R_IA64_LTOFF_FPTR22:
|
|
case R_IA64_LTOFF22X:
|
|
case R_IA64_LTOFF22:
|
|
case R_IA64_GPREL22:
|
|
case R_IA64_GPREL64I:
|
|
case R_IA64_SEGREL64LSB:
|
|
break;
|
|
|
|
case R_IA64_FPTR64LSB:
|
|
case R_IA64_DIR64LSB:
|
|
#if 1
|
|
{
|
|
grub_util_info ("adding a relocation entry for 0x%"
|
|
GRUB_HOST_PRIxLONG_LONG,
|
|
(unsigned long long) addr);
|
|
ctx->current_address
|
|
= add_fixup_entry (&ctx->lst,
|
|
GRUB_PE32_REL_BASED_DIR64,
|
|
addr,
|
|
0, ctx->current_address,
|
|
image_target);
|
|
}
|
|
#endif
|
|
break;
|
|
default:
|
|
grub_util_error (_("relocation 0x%x is not implemented yet"),
|
|
(unsigned int) ELF_R_TYPE (info));
|
|
break;
|
|
}
|
|
break;
|
|
case EM_AARCH64:
|
|
switch (ELF_R_TYPE (info))
|
|
{
|
|
case R_AARCH64_ABS64:
|
|
{
|
|
ctx->current_address
|
|
= add_fixup_entry (&ctx->lst,
|
|
GRUB_PE32_REL_BASED_DIR64,
|
|
addr, 0, ctx->current_address,
|
|
image_target);
|
|
}
|
|
break;
|
|
/* Relative relocations do not require fixup entries. */
|
|
case R_AARCH64_CALL26:
|
|
case R_AARCH64_JUMP26:
|
|
case R_AARCH64_PREL32:
|
|
break;
|
|
/* Page-relative relocations do not require fixup entries. */
|
|
case R_AARCH64_ADR_PREL_PG_HI21:
|
|
/* We page-align the whole kernel, so no need
|
|
for fixup entries.
|
|
*/
|
|
case R_AARCH64_ADD_ABS_LO12_NC:
|
|
case R_AARCH64_LDST64_ABS_LO12_NC:
|
|
break;
|
|
|
|
/* GOT is relocated separately. */
|
|
case R_AARCH64_ADR_GOT_PAGE:
|
|
case R_AARCH64_LD64_GOT_LO12_NC:
|
|
break;
|
|
|
|
default:
|
|
grub_util_error (_("relocation 0x%x is not implemented yet"),
|
|
(unsigned int) ELF_R_TYPE (info));
|
|
break;
|
|
}
|
|
break;
|
|
break;
|
|
#if defined(MKIMAGE_ELF32)
|
|
case EM_ARM:
|
|
switch (ELF_R_TYPE (info))
|
|
{
|
|
case R_ARM_V4BX:
|
|
/* Relative relocations do not require fixup entries. */
|
|
case R_ARM_JUMP24:
|
|
case R_ARM_THM_CALL:
|
|
case R_ARM_THM_JUMP19:
|
|
case R_ARM_THM_JUMP24:
|
|
case R_ARM_CALL:
|
|
{
|
|
grub_util_info (" %s: not adding fixup: 0x%08x : 0x%08x", __FUNCTION__, (unsigned int) addr, (unsigned int) ctx->current_address);
|
|
}
|
|
break;
|
|
/* Create fixup entry for PE/COFF loader */
|
|
case R_ARM_ABS32:
|
|
{
|
|
ctx->current_address
|
|
= add_fixup_entry (&ctx->lst,
|
|
GRUB_PE32_REL_BASED_HIGHLOW,
|
|
addr, 0, ctx->current_address,
|
|
image_target);
|
|
}
|
|
break;
|
|
default:
|
|
grub_util_error (_("relocation 0x%x is not implemented yet"),
|
|
(unsigned int) ELF_R_TYPE (info));
|
|
break;
|
|
}
|
|
break;
|
|
#endif /* defined(MKIMAGE_ELF32) */
|
|
default:
|
|
grub_util_error ("unknown machine type 0x%x", image_target->elf_target);
|
|
}
|
|
}
|
|
|
|
static enum raw_reloc_type
|
|
classify_raw_reloc (Elf_Addr info,
|
|
const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
/* Necessary to relocate only absolute addresses. */
|
|
switch (image_target->elf_target)
|
|
{
|
|
case EM_ARM:
|
|
switch (ELF_R_TYPE (info))
|
|
{
|
|
case R_ARM_V4BX:
|
|
case R_ARM_JUMP24:
|
|
case R_ARM_THM_CALL:
|
|
case R_ARM_THM_JUMP19:
|
|
case R_ARM_THM_JUMP24:
|
|
case R_ARM_CALL:
|
|
return RAW_RELOC_NONE;
|
|
case R_ARM_ABS32:
|
|
return RAW_RELOC_32;
|
|
default:
|
|
grub_util_error (_("relocation 0x%x is not implemented yet"),
|
|
(unsigned int) ELF_R_TYPE (info));
|
|
break;
|
|
}
|
|
break;
|
|
default:
|
|
grub_util_error ("unknown machine type 0x%x", image_target->elf_target);
|
|
}
|
|
}
|
|
|
|
static void
|
|
translate_relocation_raw (struct translate_context *ctx,
|
|
Elf_Addr addr,
|
|
Elf_Addr info,
|
|
const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
enum raw_reloc_type class = classify_raw_reloc (info, image_target);
|
|
struct raw_reloc *rel;
|
|
if (class == RAW_RELOC_NONE)
|
|
return;
|
|
rel = xmalloc (sizeof (*rel));
|
|
rel->next = ctx->raw_relocs;
|
|
rel->type = class;
|
|
rel->offset = addr;
|
|
ctx->raw_relocs = rel;
|
|
}
|
|
|
|
static void
|
|
translate_relocation (struct translate_context *ctx,
|
|
Elf_Addr addr,
|
|
Elf_Addr info,
|
|
const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
if (image_target->id == IMAGE_EFI)
|
|
translate_relocation_pe (ctx, addr, info, image_target);
|
|
else
|
|
translate_relocation_raw (ctx, addr, info, image_target);
|
|
}
|
|
|
|
static void
|
|
finish_reloc_translation_pe (struct translate_context *ctx, struct grub_mkimage_layout *layout,
|
|
const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
ctx->current_address = add_fixup_entry (&ctx->lst, 0, 0, 1, ctx->current_address, image_target);
|
|
|
|
{
|
|
grub_uint8_t *ptr;
|
|
layout->reloc_section = ptr = xmalloc (ctx->current_address);
|
|
for (ctx->lst = ctx->lst0; ctx->lst; ctx->lst = ctx->lst->next)
|
|
if (ctx->lst->state)
|
|
{
|
|
memcpy (ptr, &ctx->lst->b, grub_target_to_host32 (ctx->lst->b.block_size));
|
|
ptr += grub_target_to_host32 (ctx->lst->b.block_size);
|
|
}
|
|
assert ((ctx->current_address + (grub_uint8_t *) layout->reloc_section) == ptr);
|
|
}
|
|
|
|
for (ctx->lst = ctx->lst0; ctx->lst; )
|
|
{
|
|
struct fixup_block_list *next;
|
|
next = ctx->lst->next;
|
|
free (ctx->lst);
|
|
ctx->lst = next;
|
|
}
|
|
|
|
layout->reloc_size = ctx->current_address;
|
|
if (image_target->elf_target == EM_ARM && layout->reloc_size > GRUB_KERNEL_ARM_STACK_SIZE)
|
|
grub_util_error ("Reloc section (%d) is bigger than stack size (%d). "
|
|
"This breaks assembly assumptions. Please increase stack size",
|
|
(int) layout->reloc_size,
|
|
(int) GRUB_KERNEL_ARM_STACK_SIZE);
|
|
}
|
|
|
|
/*
|
|
Layout:
|
|
<type 0 relocations>
|
|
<fffffffe>
|
|
<type 1 relocations>
|
|
<fffffffe>
|
|
...
|
|
<type n relocations>
|
|
<ffffffff>
|
|
each relocation starts with 32-bit offset. Rest depends on relocation.
|
|
mkimage stops when it sees first unknown type or end marker.
|
|
This allows images to be created with mismatched mkimage and
|
|
kernel as long as no relocations are present in kernel that mkimage
|
|
isn't aware of (in which case mkimage aborts).
|
|
This also allows simple assembly to do the relocs.
|
|
*/
|
|
|
|
#define RAW_SEPARATOR 0xfffffffe
|
|
#define RAW_END_MARKER 0xffffffff
|
|
|
|
static void
|
|
finish_reloc_translation_raw (struct translate_context *ctx, struct grub_mkimage_layout *layout,
|
|
const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
size_t count = 0, sz;
|
|
enum raw_reloc_type highest = RAW_RELOC_NONE;
|
|
enum raw_reloc_type curtype;
|
|
struct raw_reloc *cur;
|
|
grub_uint32_t *p;
|
|
if (!ctx->raw_relocs)
|
|
{
|
|
layout->reloc_section = p = xmalloc (sizeof (grub_uint32_t));
|
|
p[0] = RAW_END_MARKER;
|
|
layout->reloc_size = sizeof (grub_uint32_t);
|
|
return;
|
|
}
|
|
for (cur = ctx->raw_relocs; cur; cur = cur->next)
|
|
{
|
|
count++;
|
|
if (cur->type > highest)
|
|
highest = cur->type;
|
|
}
|
|
/* highest separators, count relocations and one end marker. */
|
|
sz = (highest + count + 1) * sizeof (grub_uint32_t);
|
|
layout->reloc_section = p = xmalloc (sz);
|
|
for (curtype = 0; curtype <= highest; curtype++)
|
|
{
|
|
/* Support for special cases would go here. */
|
|
for (cur = ctx->raw_relocs; cur; cur = cur->next)
|
|
if (cur->type == curtype)
|
|
{
|
|
*p++ = cur->offset;
|
|
}
|
|
*p++ = RAW_SEPARATOR;
|
|
}
|
|
*--p = RAW_END_MARKER;
|
|
layout->reloc_size = sz;
|
|
}
|
|
|
|
static void
|
|
finish_reloc_translation (struct translate_context *ctx, struct grub_mkimage_layout *layout,
|
|
const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
if (image_target->id == IMAGE_EFI)
|
|
finish_reloc_translation_pe (ctx, layout, image_target);
|
|
else
|
|
finish_reloc_translation_raw (ctx, layout, image_target);
|
|
}
|
|
|
|
|
|
static void
|
|
create_u64_fixups (struct translate_context *ctx,
|
|
Elf_Addr jumpers, grub_size_t njumpers,
|
|
const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
unsigned i;
|
|
assert (image_target->id == IMAGE_EFI);
|
|
for (i = 0; i < njumpers; i++)
|
|
ctx->current_address = add_fixup_entry (&ctx->lst,
|
|
GRUB_PE32_REL_BASED_DIR64,
|
|
jumpers + 8 * i,
|
|
0, ctx->current_address,
|
|
image_target);
|
|
}
|
|
|
|
/* Make a .reloc section. */
|
|
static void
|
|
make_reloc_section (Elf_Ehdr *e, struct grub_mkimage_layout *layout,
|
|
Elf_Addr *section_addresses, Elf_Shdr *sections,
|
|
Elf_Half section_entsize, Elf_Half num_sections,
|
|
const char *strtab,
|
|
const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
unsigned i;
|
|
Elf_Shdr *s;
|
|
struct translate_context ctx;
|
|
|
|
translate_reloc_start (&ctx, image_target);
|
|
|
|
for (i = 0, s = sections; i < num_sections;
|
|
i++, s = (Elf_Shdr *) ((char *) s + section_entsize))
|
|
if ((grub_target_to_host32 (s->sh_type) == SHT_REL) ||
|
|
(grub_target_to_host32 (s->sh_type) == SHT_RELA))
|
|
{
|
|
Elf_Rel *r;
|
|
Elf_Word rtab_size, r_size, num_rs;
|
|
Elf_Off rtab_offset;
|
|
Elf_Addr section_address;
|
|
Elf_Word j;
|
|
|
|
grub_util_info ("translating the relocation section %s",
|
|
strtab + grub_le_to_cpu32 (s->sh_name));
|
|
|
|
rtab_size = grub_target_to_host (s->sh_size);
|
|
r_size = grub_target_to_host (s->sh_entsize);
|
|
rtab_offset = grub_target_to_host (s->sh_offset);
|
|
num_rs = rtab_size / r_size;
|
|
|
|
section_address = section_addresses[grub_le_to_cpu32 (s->sh_info)];
|
|
|
|
for (j = 0, r = (Elf_Rel *) ((char *) e + rtab_offset);
|
|
j < num_rs;
|
|
j++, r = (Elf_Rel *) ((char *) r + r_size))
|
|
{
|
|
Elf_Addr info;
|
|
Elf_Addr offset;
|
|
Elf_Addr addr;
|
|
|
|
offset = grub_target_to_host (r->r_offset);
|
|
info = grub_target_to_host (r->r_info);
|
|
|
|
addr = section_address + offset;
|
|
|
|
translate_relocation (&ctx, addr, info, image_target);
|
|
}
|
|
}
|
|
|
|
if (image_target->elf_target == EM_IA_64)
|
|
create_u64_fixups (&ctx,
|
|
layout->ia64jmp_off
|
|
+ image_target->vaddr_offset,
|
|
2 * layout->ia64jmpnum,
|
|
image_target);
|
|
if (image_target->elf_target == EM_IA_64 || image_target->elf_target == EM_AARCH64)
|
|
create_u64_fixups (&ctx,
|
|
layout->got_off
|
|
+ image_target->vaddr_offset,
|
|
(layout->got_size / 8),
|
|
image_target);
|
|
|
|
finish_reloc_translation (&ctx, layout, image_target);
|
|
}
|
|
|
|
/* Determine if this section is a text section. Return false if this
|
|
section is not allocated. */
|
|
static int
|
|
SUFFIX (is_text_section) (Elf_Shdr *s, const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
if (!is_relocatable (image_target)
|
|
&& grub_target_to_host32 (s->sh_type) != SHT_PROGBITS)
|
|
return 0;
|
|
return ((grub_target_to_host (s->sh_flags) & (SHF_EXECINSTR | SHF_ALLOC))
|
|
== (SHF_EXECINSTR | SHF_ALLOC));
|
|
}
|
|
|
|
/* Determine if this section is a data section. */
|
|
static int
|
|
SUFFIX (is_data_section) (Elf_Shdr *s, const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
if (!is_relocatable (image_target)
|
|
&& grub_target_to_host32 (s->sh_type) != SHT_PROGBITS)
|
|
return 0;
|
|
return ((grub_target_to_host (s->sh_flags) & (SHF_EXECINSTR | SHF_ALLOC))
|
|
== SHF_ALLOC) && !(grub_target_to_host32 (s->sh_type) == SHT_NOBITS);
|
|
}
|
|
|
|
static int
|
|
SUFFIX (is_bss_section) (Elf_Shdr *s, const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
if (!is_relocatable (image_target))
|
|
return 0;
|
|
return ((grub_target_to_host (s->sh_flags) & (SHF_EXECINSTR | SHF_ALLOC))
|
|
== SHF_ALLOC) && (grub_target_to_host32 (s->sh_type) == SHT_NOBITS);
|
|
}
|
|
|
|
/* Return if the ELF header is valid. */
|
|
static int
|
|
SUFFIX (check_elf_header) (Elf_Ehdr *e, size_t size, const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
if (size < sizeof (*e)
|
|
|| e->e_ident[EI_MAG0] != ELFMAG0
|
|
|| e->e_ident[EI_MAG1] != ELFMAG1
|
|
|| e->e_ident[EI_MAG2] != ELFMAG2
|
|
|| e->e_ident[EI_MAG3] != ELFMAG3
|
|
|| e->e_ident[EI_VERSION] != EV_CURRENT
|
|
|| e->e_ident[EI_CLASS] != ELFCLASSXX
|
|
|| e->e_version != grub_host_to_target32 (EV_CURRENT))
|
|
return 0;
|
|
|
|
return 1;
|
|
}
|
|
|
|
static Elf_Addr
|
|
SUFFIX (put_section) (Elf_Shdr *s, int i,
|
|
Elf_Addr current_address,
|
|
Elf_Addr *section_addresses,
|
|
const char *strtab,
|
|
const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
Elf_Word align = grub_host_to_target_addr (s->sh_addralign);
|
|
const char *name = strtab + grub_host_to_target32 (s->sh_name);
|
|
|
|
if (align)
|
|
current_address = ALIGN_UP (current_address + image_target->vaddr_offset,
|
|
align)
|
|
- image_target->vaddr_offset;
|
|
|
|
grub_util_info ("locating the section %s at 0x%"
|
|
GRUB_HOST_PRIxLONG_LONG,
|
|
name, (unsigned long long) current_address);
|
|
if (!is_relocatable (image_target))
|
|
current_address = grub_host_to_target_addr (s->sh_addr)
|
|
- image_target->link_addr;
|
|
section_addresses[i] = current_address;
|
|
current_address += grub_host_to_target_addr (s->sh_size);
|
|
return current_address;
|
|
}
|
|
|
|
/* Locate section addresses by merging code sections and data sections
|
|
into .text and .data, respectively. Return the array of section
|
|
addresses. */
|
|
static Elf_Addr *
|
|
SUFFIX (locate_sections) (Elf_Ehdr *e, const char *kernel_path,
|
|
Elf_Shdr *sections, Elf_Half section_entsize,
|
|
Elf_Half num_sections, const char *strtab,
|
|
struct grub_mkimage_layout *layout,
|
|
const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
int i;
|
|
Elf_Addr *section_addresses;
|
|
Elf_Shdr *s;
|
|
|
|
layout->align = 1;
|
|
/* Page-aligning simplifies relocation handling. */
|
|
if (image_target->elf_target == EM_AARCH64)
|
|
layout->align = 4096;
|
|
|
|
section_addresses = xmalloc (sizeof (*section_addresses) * num_sections);
|
|
memset (section_addresses, 0, sizeof (*section_addresses) * num_sections);
|
|
|
|
layout->kernel_size = 0;
|
|
|
|
for (i = 0, s = sections;
|
|
i < num_sections;
|
|
i++, s = (Elf_Shdr *) ((char *) s + section_entsize))
|
|
if ((grub_target_to_host (s->sh_flags) & SHF_ALLOC)
|
|
&& grub_host_to_target32 (s->sh_addralign) > layout->align)
|
|
layout->align = grub_host_to_target32 (s->sh_addralign);
|
|
|
|
|
|
/* .text */
|
|
for (i = 0, s = sections;
|
|
i < num_sections;
|
|
i++, s = (Elf_Shdr *) ((char *) s + section_entsize))
|
|
if (SUFFIX (is_text_section) (s, image_target))
|
|
{
|
|
layout->kernel_size = SUFFIX (put_section) (s, i,
|
|
layout->kernel_size,
|
|
section_addresses,
|
|
strtab,
|
|
image_target);
|
|
if (!is_relocatable (image_target) &&
|
|
grub_host_to_target_addr (s->sh_addr) != image_target->link_addr)
|
|
{
|
|
char *msg
|
|
= grub_xasprintf (_("`%s' is miscompiled: its start address is 0x%llx"
|
|
" instead of 0x%llx: ld.gold bug?"),
|
|
kernel_path,
|
|
(unsigned long long) grub_host_to_target_addr (s->sh_addr),
|
|
(unsigned long long) image_target->link_addr);
|
|
grub_util_error ("%s", msg);
|
|
}
|
|
}
|
|
|
|
layout->kernel_size = ALIGN_UP (layout->kernel_size + image_target->vaddr_offset,
|
|
image_target->section_align)
|
|
- image_target->vaddr_offset;
|
|
layout->exec_size = layout->kernel_size;
|
|
|
|
/* .data */
|
|
for (i = 0, s = sections;
|
|
i < num_sections;
|
|
i++, s = (Elf_Shdr *) ((char *) s + section_entsize))
|
|
if (SUFFIX (is_data_section) (s, image_target))
|
|
layout->kernel_size = SUFFIX (put_section) (s, i,
|
|
layout->kernel_size,
|
|
section_addresses,
|
|
strtab,
|
|
image_target);
|
|
|
|
#ifdef MKIMAGE_ELF32
|
|
if (image_target->elf_target == EM_ARM)
|
|
{
|
|
grub_size_t tramp;
|
|
layout->kernel_size = ALIGN_UP (layout->kernel_size + image_target->vaddr_offset,
|
|
image_target->section_align) - image_target->vaddr_offset;
|
|
|
|
layout->kernel_size = ALIGN_UP (layout->kernel_size, 16);
|
|
|
|
tramp = arm_get_trampoline_size (e, sections, section_entsize,
|
|
num_sections, image_target);
|
|
|
|
layout->tramp_off = layout->kernel_size;
|
|
layout->kernel_size += ALIGN_UP (tramp, 16);
|
|
}
|
|
#endif
|
|
|
|
layout->bss_start = layout->kernel_size;
|
|
layout->end = layout->kernel_size;
|
|
|
|
/* .bss */
|
|
for (i = 0, s = sections;
|
|
i < num_sections;
|
|
i++, s = (Elf_Shdr *) ((char *) s + section_entsize))
|
|
if (SUFFIX (is_bss_section) (s, image_target))
|
|
layout->end = SUFFIX (put_section) (s, i,
|
|
layout->end,
|
|
section_addresses,
|
|
strtab,
|
|
image_target);
|
|
|
|
layout->end = ALIGN_UP (layout->end + image_target->vaddr_offset,
|
|
image_target->section_align) - image_target->vaddr_offset;
|
|
/* Explicitly initialize BSS
|
|
when producing PE32 to avoid a bug in EFI implementations.
|
|
Platforms other than EFI and U-boot shouldn't have .bss in
|
|
their binaries as we build with -Wl,-Ttext.
|
|
*/
|
|
if (image_target->id == IMAGE_EFI || !is_relocatable (image_target))
|
|
layout->kernel_size = layout->end;
|
|
|
|
return section_addresses;
|
|
}
|
|
|
|
char *
|
|
SUFFIX (grub_mkimage_load_image) (const char *kernel_path,
|
|
size_t total_module_size,
|
|
struct grub_mkimage_layout *layout,
|
|
const struct grub_install_image_target_desc *image_target)
|
|
{
|
|
char *kernel_img, *out_img;
|
|
const char *strtab;
|
|
Elf_Ehdr *e;
|
|
Elf_Shdr *sections;
|
|
Elf_Addr *section_addresses;
|
|
Elf_Addr *section_vaddresses;
|
|
int i;
|
|
Elf_Shdr *s;
|
|
Elf_Half num_sections;
|
|
Elf_Off section_offset;
|
|
Elf_Half section_entsize;
|
|
grub_size_t kernel_size;
|
|
Elf_Shdr *symtab_section = 0;
|
|
|
|
grub_memset (layout, 0, sizeof (*layout));
|
|
|
|
layout->start_address = 0;
|
|
|
|
kernel_size = grub_util_get_image_size (kernel_path);
|
|
kernel_img = xmalloc (kernel_size);
|
|
grub_util_load_image (kernel_path, kernel_img);
|
|
|
|
e = (Elf_Ehdr *) kernel_img;
|
|
if (! SUFFIX (check_elf_header) (e, kernel_size, image_target))
|
|
grub_util_error ("invalid ELF header");
|
|
|
|
section_offset = grub_target_to_host (e->e_shoff);
|
|
section_entsize = grub_target_to_host16 (e->e_shentsize);
|
|
num_sections = grub_target_to_host16 (e->e_shnum);
|
|
|
|
if (kernel_size < section_offset + (grub_uint32_t) section_entsize * num_sections)
|
|
grub_util_error (_("premature end of file %s"), kernel_path);
|
|
|
|
sections = (Elf_Shdr *) (kernel_img + section_offset);
|
|
|
|
/* Relocate sections then symbols in the virtual address space. */
|
|
s = (Elf_Shdr *) ((char *) sections
|
|
+ grub_host_to_target16 (e->e_shstrndx) * section_entsize);
|
|
strtab = (char *) e + grub_host_to_target_addr (s->sh_offset);
|
|
|
|
section_addresses = SUFFIX (locate_sections) (e, kernel_path,
|
|
sections, section_entsize,
|
|
num_sections, strtab,
|
|
layout,
|
|
image_target);
|
|
|
|
section_vaddresses = xmalloc (sizeof (*section_addresses) * num_sections);
|
|
|
|
for (i = 0; i < num_sections; i++)
|
|
section_vaddresses[i] = section_addresses[i] + image_target->vaddr_offset;
|
|
|
|
if (!is_relocatable (image_target))
|
|
{
|
|
Elf_Addr current_address = layout->kernel_size;
|
|
|
|
for (i = 0, s = sections;
|
|
i < num_sections;
|
|
i++, s = (Elf_Shdr *) ((char *) s + section_entsize))
|
|
if (grub_target_to_host32 (s->sh_type) == SHT_NOBITS)
|
|
{
|
|
Elf_Word sec_align = grub_host_to_target_addr (s->sh_addralign);
|
|
const char *name = strtab + grub_host_to_target32 (s->sh_name);
|
|
|
|
if (sec_align)
|
|
current_address = ALIGN_UP (current_address
|
|
+ image_target->vaddr_offset,
|
|
sec_align)
|
|
- image_target->vaddr_offset;
|
|
|
|
grub_util_info ("locating the section %s at 0x%"
|
|
GRUB_HOST_PRIxLONG_LONG,
|
|
name, (unsigned long long) current_address);
|
|
if (!is_relocatable (image_target))
|
|
current_address = grub_host_to_target_addr (s->sh_addr)
|
|
- image_target->link_addr;
|
|
|
|
section_vaddresses[i] = current_address
|
|
+ image_target->vaddr_offset;
|
|
current_address += grub_host_to_target_addr (s->sh_size);
|
|
}
|
|
current_address = ALIGN_UP (current_address + image_target->vaddr_offset,
|
|
image_target->section_align)
|
|
- image_target->vaddr_offset;
|
|
layout->bss_size = current_address - layout->kernel_size;
|
|
}
|
|
else
|
|
layout->bss_size = 0;
|
|
|
|
if (image_target->id == IMAGE_SPARC64_AOUT
|
|
|| image_target->id == IMAGE_SPARC64_RAW
|
|
|| image_target->id == IMAGE_UBOOT
|
|
|| image_target->id == IMAGE_COREBOOT
|
|
|| image_target->id == IMAGE_SPARC64_CDCORE)
|
|
layout->kernel_size = ALIGN_UP (layout->kernel_size, image_target->mod_align);
|
|
|
|
if (is_relocatable (image_target))
|
|
{
|
|
symtab_section = NULL;
|
|
for (i = 0, s = sections;
|
|
i < num_sections;
|
|
i++, s = (Elf_Shdr *) ((char *) s + section_entsize))
|
|
if (s->sh_type == grub_host_to_target32 (SHT_SYMTAB))
|
|
{
|
|
symtab_section = s;
|
|
break;
|
|
}
|
|
if (! symtab_section)
|
|
grub_util_error ("%s", _("no symbol table"));
|
|
#ifdef MKIMAGE_ELF64
|
|
if (image_target->elf_target == EM_IA_64)
|
|
{
|
|
grub_size_t tramp;
|
|
|
|
layout->kernel_size = ALIGN_UP (layout->kernel_size, 16);
|
|
|
|
grub_ia64_dl_get_tramp_got_size (e, &tramp, &layout->got_size);
|
|
|
|
layout->tramp_off = layout->kernel_size;
|
|
layout->kernel_size += ALIGN_UP (tramp, 16);
|
|
|
|
layout->ia64jmp_off = layout->kernel_size;
|
|
layout->ia64jmpnum = SUFFIX (count_funcs) (e, symtab_section,
|
|
image_target);
|
|
layout->kernel_size += 16 * layout->ia64jmpnum;
|
|
|
|
layout->got_off = layout->kernel_size;
|
|
layout->kernel_size += ALIGN_UP (layout->got_size, 16);
|
|
}
|
|
if (image_target->elf_target == EM_AARCH64)
|
|
{
|
|
grub_size_t tramp;
|
|
|
|
layout->kernel_size = ALIGN_UP (layout->kernel_size, 16);
|
|
|
|
grub_arm64_dl_get_tramp_got_size (e, &tramp, &layout->got_size);
|
|
|
|
layout->got_off = layout->kernel_size;
|
|
layout->kernel_size += ALIGN_UP (layout->got_size, 16);
|
|
}
|
|
#endif
|
|
}
|
|
else
|
|
{
|
|
layout->reloc_size = 0;
|
|
layout->reloc_section = NULL;
|
|
}
|
|
|
|
out_img = xmalloc (layout->kernel_size + total_module_size);
|
|
memset (out_img, 0, layout->kernel_size + total_module_size);
|
|
|
|
if (is_relocatable (image_target))
|
|
{
|
|
layout->start_address = SUFFIX (relocate_symbols) (e, sections, symtab_section,
|
|
section_vaddresses, section_entsize,
|
|
num_sections,
|
|
(char *) out_img + layout->ia64jmp_off,
|
|
layout->ia64jmp_off
|
|
+ image_target->vaddr_offset,
|
|
layout->bss_start,
|
|
layout->end,
|
|
image_target);
|
|
if (layout->start_address == (Elf_Addr) -1)
|
|
grub_util_error ("start symbol is not defined");
|
|
|
|
/* Resolve addresses in the virtual address space. */
|
|
SUFFIX (relocate_addresses) (e, sections, section_addresses,
|
|
section_entsize,
|
|
num_sections, strtab,
|
|
out_img, layout->tramp_off,
|
|
layout->got_off,
|
|
image_target);
|
|
|
|
make_reloc_section (e, layout,
|
|
section_vaddresses, sections,
|
|
section_entsize, num_sections,
|
|
strtab,
|
|
image_target);
|
|
if (image_target->id != IMAGE_EFI)
|
|
{
|
|
out_img = xrealloc (out_img, layout->kernel_size + total_module_size
|
|
+ ALIGN_UP (layout->reloc_size, image_target->mod_align));
|
|
memcpy (out_img + layout->kernel_size, layout->reloc_section, layout->reloc_size);
|
|
memset (out_img + layout->kernel_size + layout->reloc_size, 0,
|
|
total_module_size + ALIGN_UP (layout->reloc_size, image_target->mod_align) - layout->reloc_size);
|
|
layout->kernel_size += ALIGN_UP (layout->reloc_size, image_target->mod_align);
|
|
}
|
|
}
|
|
|
|
for (i = 0, s = sections;
|
|
i < num_sections;
|
|
i++, s = (Elf_Shdr *) ((char *) s + section_entsize))
|
|
if (SUFFIX (is_data_section) (s, image_target)
|
|
/* Explicitly initialize BSS
|
|
when producing PE32 to avoid a bug in EFI implementations.
|
|
Platforms other than EFI and U-boot shouldn't have .bss in
|
|
their binaries as we build with -Wl,-Ttext.
|
|
*/
|
|
|| (SUFFIX (is_bss_section) (s, image_target) && (image_target->id == IMAGE_EFI || !is_relocatable (image_target)))
|
|
|| SUFFIX (is_text_section) (s, image_target))
|
|
{
|
|
if (grub_target_to_host32 (s->sh_type) == SHT_NOBITS)
|
|
memset (out_img + section_addresses[i], 0,
|
|
grub_host_to_target_addr (s->sh_size));
|
|
else
|
|
memcpy (out_img + section_addresses[i],
|
|
kernel_img + grub_host_to_target_addr (s->sh_offset),
|
|
grub_host_to_target_addr (s->sh_size));
|
|
}
|
|
free (kernel_img);
|
|
|
|
free (section_vaddresses);
|
|
free (section_addresses);
|
|
|
|
return out_img;
|
|
}
|