arch/all-pc/boot/grub2-aros/grub-core/loader/multiboot_elfxx.c

   1 /*
   2  *  GRUB  --  GRand Unified Bootloader
   3  *  Copyright (C) 1999,2000,2001,2002,2003,2004,2005,2007,2008,2009  Free Software Foundation, Inc.
   4  *
   5  *  GRUB is free software: you can redistribute it and/or modify
   6  *  it under the terms of the GNU General Public License as published by
   7  *  the Free Software Foundation, either version 3 of the License, or
   8  *  (at your option) any later version.
   9  *
  10  *  GRUB is distributed in the hope that it will be useful,
  11  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  *  GNU General Public License for more details.
  14  *
  15  *  You should have received a copy of the GNU General Public License
  16  *  along with GRUB.  If not, see <http://www.gnu.org/licenses/>.
  17  */
  18
  19 #if defined(MULTIBOOT_LOAD_ELF32)
  20 # define XX             32
  21 # define E_MACHINE      MULTIBOOT_ELF32_MACHINE
  22 # define ELFCLASSXX     ELFCLASS32
  23 # define Elf_Ehdr       Elf32_Ehdr
  24 # define Elf_Phdr       Elf32_Phdr
  25 # define Elf_Shdr       Elf32_Shdr
  26 #elif defined(MULTIBOOT_LOAD_ELF64)
  27 # define XX             64
  28 # define E_MACHINE      MULTIBOOT_ELF64_MACHINE
  29 # define ELFCLASSXX     ELFCLASS64
  30 # define Elf_Ehdr       Elf64_Ehdr
  31 # define Elf_Phdr       Elf64_Phdr
  32 # define Elf_Shdr       Elf64_Shdr
  33 #else
  34 #error "I'm confused"
  35 #endif
  36
  37 #include <grub/i386/relocator.h>
  38
  39 #define CONCAT(a,b)     CONCAT_(a, b)
  40 #define CONCAT_(a,b)    a ## b
  41
  42 #pragma GCC diagnostic ignored "-Wcast-align"
  43
  44 /* Check if BUFFER contains ELF32 (or ELF64).  */
  45 static int
  46 CONCAT(grub_multiboot_is_elf, XX) (void *buffer)
  47 {
  48   Elf_Ehdr *ehdr = (Elf_Ehdr *) buffer;
  49
  50   return ehdr->e_ident[EI_CLASS] == ELFCLASSXX;
  51 }
  52
  53 static grub_err_t
  54 CONCAT(grub_multiboot_load_elf, XX) (grub_file_t file, const char *filename, void *buffer)
  55 {
  56   Elf_Ehdr *ehdr = (Elf_Ehdr *) buffer;
  57   char *phdr_base;
  58   int i;
  59
  60   if (ehdr->e_ident[EI_MAG0] != ELFMAG0
  61       || ehdr->e_ident[EI_MAG1] != ELFMAG1
  62       || ehdr->e_ident[EI_MAG2] != ELFMAG2
  63       || ehdr->e_ident[EI_MAG3] != ELFMAG3
  64       || ehdr->e_ident[EI_DATA] != ELFDATA2LSB)
  65     return grub_error(GRUB_ERR_UNKNOWN_OS, N_("invalid arch-independent ELF magic"));
  66
  67   if (ehdr->e_ident[EI_CLASS] != ELFCLASSXX || ehdr->e_machine != E_MACHINE
  68       || ehdr->e_version != EV_CURRENT)
  69     return grub_error (GRUB_ERR_UNKNOWN_OS, N_("invalid arch-dependent ELF magic"));
  70
  71   if (ehdr->e_type != ET_EXEC && ehdr->e_type != ET_DYN)
  72     return grub_error (GRUB_ERR_UNKNOWN_OS, N_("this ELF file is not of the right type"));
  73
  74   /* FIXME: Should we support program headers at strange locations?  */
  75   if (ehdr->e_phoff + ehdr->e_phnum * ehdr->e_phentsize > MULTIBOOT_SEARCH)
  76     return grub_error (GRUB_ERR_BAD_OS, "program header at a too high offset");
  77
  78   phdr_base = (char *) buffer + ehdr->e_phoff;
  79 #define phdr(i)                 ((Elf_Phdr *) (phdr_base + (i) * ehdr->e_phentsize))
  80
  81   /* Load every loadable segment in memory.  */
  82   for (i = 0; i < ehdr->e_phnum; i++)
  83     {
  84       if (phdr(i)->p_type == PT_LOAD)
  85         {
  86           grub_err_t err;
  87           void *source;
  88
  89           if (phdr(i)->p_paddr + phdr(i)->p_memsz > highest_load)
  90             highest_load = phdr(i)->p_paddr + phdr(i)->p_memsz;
  91
  92           grub_dprintf ("multiboot_loader", "segment %d: paddr=0x%lx, memsz=0x%lx, vaddr=0x%lx\n",
  93                         i, (long) phdr(i)->p_paddr, (long) phdr(i)->p_memsz, (long) phdr(i)->p_vaddr);
  94
  95           {
  96             grub_relocator_chunk_t ch;
  97             err = grub_relocator_alloc_chunk_addr (grub_multiboot_relocator,
  98                                                    &ch, phdr(i)->p_paddr,
  99                                                    phdr(i)->p_memsz);
 100             if (err)
 101               {
 102                 grub_dprintf ("multiboot_loader", "Error loading phdr %d\n", i);
 103                 return err;
 104               }
 105             source = get_virtual_current_address (ch);
 106           }
 107
 108           if (phdr(i)->p_filesz != 0)
 109             {
 110               if (grub_file_seek (file, (grub_off_t) phdr(i)->p_offset)
 111                   == (grub_off_t) -1)
 112                 return grub_errno;
 113
 114               if (grub_file_read (file, source, phdr(i)->p_filesz)
 115                   != (grub_ssize_t) phdr(i)->p_filesz)
 116                 {
 117                   if (!grub_errno)
 118                     grub_error (GRUB_ERR_FILE_READ_ERROR, N_("premature end of file %s"),
 119                                 filename);
 120                   return grub_errno;
 121                 }
 122             }
 123
 124           if (phdr(i)->p_filesz < phdr(i)->p_memsz)
 125             grub_memset ((grub_uint8_t *) source + phdr(i)->p_filesz, 0,
 126                          phdr(i)->p_memsz - phdr(i)->p_filesz);
 127         }
 128     }
 129
 130   for (i = 0; i < ehdr->e_phnum; i++)
 131     if (phdr(i)->p_vaddr <= ehdr->e_entry
 132         && phdr(i)->p_vaddr + phdr(i)->p_memsz > ehdr->e_entry)
 133       {
 134         grub_multiboot_payload_eip = (ehdr->e_entry - phdr(i)->p_vaddr)
 135           + phdr(i)->p_paddr;
 136 #ifdef MULTIBOOT_LOAD_ELF64
 137 # ifdef __mips
 138   /* We still in 32-bit mode.  */
 139   if ((ehdr->e_entry - phdr(i)->p_vaddr)
 140       + phdr(i)->p_paddr < 0xffffffff80000000ULL)
 141     return grub_error (GRUB_ERR_BAD_OS, "invalid entry point for ELF64");
 142 # else
 143   /* We still in 32-bit mode.  */
 144   if ((ehdr->e_entry - phdr(i)->p_vaddr)
 145       + phdr(i)->p_paddr > 0xffffffff)
 146     return grub_error (GRUB_ERR_BAD_OS, "invalid entry point for ELF64");
 147 # endif
 148 #endif
 149         break;
 150       }
 151
 152   if (i == ehdr->e_phnum)
 153     return grub_error (GRUB_ERR_BAD_OS, "entry point isn't in a segment");
 154
 155 #if defined (__i386__) || defined (__x86_64__)
 156
 157 #elif defined (__mips)
 158   grub_multiboot_payload_eip |= 0x80000000;
 159 #else
 160 #error Please complete this
 161 #endif
 162
 163   if (ehdr->e_shnum)
 164     {
 165       grub_uint8_t *shdr, *shdrptr;
 166
 167       shdr = grub_malloc (ehdr->e_shnum * ehdr->e_shentsize);
 168       if (!shdr)
 169         return grub_errno;
 170
 171       if (grub_file_seek (file, ehdr->e_shoff) == (grub_off_t) -1)
 172         return grub_errno;
 173
 174       if (grub_file_read (file, shdr, ehdr->e_shnum * ehdr->e_shentsize)
 175               != (grub_ssize_t) ehdr->e_shnum * ehdr->e_shentsize)
 176         {
 177           if (!grub_errno)
 178             grub_error (GRUB_ERR_FILE_READ_ERROR, N_("premature end of file %s"),
 179                         filename);
 180           return grub_errno;
 181         }
 182
 183       for (shdrptr = shdr, i = 0; i < ehdr->e_shnum;
 184            shdrptr += ehdr->e_shentsize, i++)
 185         {
 186           Elf_Shdr *sh = (Elf_Shdr *) shdrptr;
 187           void *src;
 188           grub_addr_t target;
 189           grub_err_t err;
 190
 191           /* This section is a loaded section,
 192              so we don't care.  */
 193           if (sh->sh_addr != 0)
 194             continue;
 195
 196           /* This section is empty, so we don't care.  */
 197           if (sh->sh_size == 0)
 198             continue;
 199
 200           {
 201             grub_relocator_chunk_t ch;
 202             err = grub_relocator_alloc_chunk_align (grub_multiboot_relocator,
 203                                                     &ch, 0,
 204                                                     (0xffffffff - sh->sh_size)
 205                                                     + 1, sh->sh_size,
 206                                                     sh->sh_addralign,
 207                                                     GRUB_RELOCATOR_PREFERENCE_NONE,
 208                                                     0);
 209             if (err)
 210               {
 211                 grub_dprintf ("multiboot_loader", "Error loading shdr %d\n", i);
 212                 return err;
 213               }
 214             src = get_virtual_current_address (ch);
 215             target = get_physical_target_address (ch);
 216           }
 217
 218           if (grub_file_seek (file, sh->sh_offset) == (grub_off_t) -1)
 219             return grub_errno;
 220
 221           if (grub_file_read (file, src, sh->sh_size)
 222               != (grub_ssize_t) sh->sh_size)
 223             {
 224               if (!grub_errno)
 225                 grub_error (GRUB_ERR_FILE_READ_ERROR, N_("premature end of file %s"),
 226                             filename);
 227               return grub_errno;
 228             }
 229           sh->sh_addr = target;
 230         }
 231       grub_multiboot_add_elfsyms (ehdr->e_shnum, ehdr->e_shentsize,
 232                                   ehdr->e_shstrndx, shdr);
 233     }
 234
 235 #undef phdr
 236
 237   return grub_errno;
 238 }
 239
 240 #undef XX
 241 #undef E_MACHINE
 242 #undef ELFCLASSXX
 243 #undef Elf_Ehdr
 244 #undef Elf_Phdr
 245 #undef Elf_Shdr