ldso/ldso/metag/dl-sysdep.h

   1 /*
   2  * Meta can never use Elf32_Rel relocations.
   3  *
   4  * Copyright (C) 2013, Imagination Technologies Ltd.
   5  *
   6  * Licensed under LGPL v2.1 or later, see the file COPYING.LIB in this tarball.
   7  */
   8
   9 #define ELF_USES_RELOCA
  10
  11 #include <elf.h>
  12
  13 /* Initialization sequence for the GOT.  */
  14 #define INIT_GOT(GOT_BASE,MODULE)                               \
  15 {                                                               \
  16         GOT_BASE[1] = (unsigned long) MODULE;                   \
  17         GOT_BASE[2] = (unsigned long) _dl_linux_resolve;        \
  18 }
  19
  20 /* Maximum unsigned GOT [GS]ETD offset size, ie. 2^(11+2). */
  21 #define GOT_REG_OFFSET 0x2000
  22
  23 /* Defined some magic numbers that this ld.so should accept. */
  24 #define MAGIC1 EM_METAG
  25 #undef  MAGIC2
  26 #define ELF_TARGET "META"
  27
  28 /* Need bootstrap relocations */
  29 #define ARCH_NEEDS_BOOTSTRAP_RELOCS
  30
  31 struct elf_resolve;
  32 extern unsigned long _dl_linux_resolver(struct elf_resolve *tpnt, int reloc_entry);
  33
  34 /* ELF_RTYPE_CLASS_PLT iff TYPE describes relocation of a PLT entry or
  35    TLS variable, so undefined references should not be allowed to
  36    define the value.
  37
  38    ELF_RTYPE_CLASS_NOCOPY iff TYPE should not be allowed to resolve to one
  39    of the main executable's symbols, as for a COPY reloc.  */
  40 #define elf_machine_type_class(type)                                 \
  41   ((((type) == R_METAG_JMP_SLOT || (type) == R_METAG_TLS_DTPMOD      \
  42      || (type) == R_METAG_TLS_DTPOFF || (type) == R_METAG_TLS_TPOFF) \
  43      * ELF_RTYPE_CLASS_PLT)                                          \
  44      | (((type) == R_METAG_COPY) * ELF_RTYPE_CLASS_COPY))
  45
  46 static inline Elf32_Addr
  47 elf_machine_dynamic(Elf32_Ehdr *header)
  48 {
  49         Elf32_Addr *got;
  50
  51         __asm__ ("MOV %0,A1LbP" : "=r" (got));
  52
  53         if (header->e_ident[EI_ABIVERSION] >= 1) {
  54                 /* GOT register offset was introduced with ABI v1 */
  55                 got = (Elf32_Addr*)((void*)got - GOT_REG_OFFSET);
  56         }
  57         return *got;
  58 }
  59
  60 #define DL_BOOT_COMPUTE_GOT(GOT) \
  61     ((GOT) = elf_machine_dynamic(header))
  62
  63 static inline Elf32_Addr
  64 elf_machine_load_address(void)
  65 {
  66         Elf32_Addr addr;
  67         __asm__ ("MOV  D1Ar1,A1LbP\n"
  68                  "ADDT D1Ar1,D1Ar1,#HI(__dl_start@GOTOFF)\n"
  69                  "ADD  D1Ar1,D1Ar1,#LO(__dl_start@GOTOFF)\n"
  70                  "ADDT D0Ar2,D0Ar2,#HI(__dl_start_addr@GOTOFF)\n"
  71                  "ADD  D0Ar2,D0Ar2,#LO(__dl_start_addr@GOTOFF)\n"
  72                  "GETD D0Ar2,[D0Ar2]\n"
  73                  "SUB  %0,D1Ar1,D0Ar2\n"
  74                  ".section .data\n"
  75                  "__dl_start_addr: .long __dl_start\n"
  76                  ".previous\n"
  77                  : "=d" (addr) : : "D1Ar1", "D0Ar2");
  78         return addr;
  79 }
  80
  81 static inline void
  82 elf_machine_relative(Elf32_Addr load_off, const Elf32_Addr rel_addr,
  83                      Elf32_Word relative_count)
  84 {
  85         Elf32_Rela *rpnt = (void *)rel_addr;
  86
  87         --rpnt;
  88         do {
  89                 Elf32_Addr *const reloc_addr =
  90                         (void *)(load_off + (++rpnt)->r_offset);
  91
  92                 *reloc_addr =  load_off + rpnt->r_addend;
  93         } while (--relative_count);
  94 }
  95
  96 #define DL_MALLOC_ALIGN 8
  97
  98 #define HAVE_DL_INLINES_H
  99
 100 #define DL_IS_SPECIAL_SEGMENT(EPNT, PPNT) \
 101   __dl_is_special_segment(EPNT, PPNT)
 102 #define DL_MAP_SEGMENT(EPNT, PPNT, INFILE, FLAGS) \
 103   __dl_map_segment (EPNT, PPNT, INFILE, FLAGS)
 104
 105 #define DL_CHECK_LIB_TYPE(epnt, piclib, _dl_progname, libname) \
 106 do \
 107 { \
 108   ElfW(Phdr) *ppnt_; \
 109   char *header_ = (char *)epnt;                            \
 110   ppnt_ = (ElfW(Phdr) *)(intptr_t) & header_[epnt->e_phoff]; \
 111   if (ppnt_->p_vaddr >= 0x80000000 && \
 112       ppnt_->p_vaddr < 0x82060000) \
 113     (piclib) = 2; \
 114   if (ppnt_->p_vaddr >= 0xe0200000 && \
 115       ppnt_->p_vaddr < 0xe0260000) \
 116     (piclib) = 2; \
 117 } \
 118 while (0)
 119
 120 #define _DL_PREAD(FD, BUF, SIZE, OFFSET) \
 121   (_dl_pread((FD), (BUF), (SIZE), (OFFSET)))