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 /* Variable page size. */
  35 #define ADDR_ALIGN (_dl_pagesize - 1)
  36 #define PAGE_ALIGN (~ADDR_ALIGN)
  37 #define OFFS_ALIGN (PAGE_ALIGN & ~(1ul << (sizeof(_dl_pagesize) * 8 - 1)))
  38
  39 /* The union of reloc-type-classes where the reloc TYPE is a member.
  40
  41    TYPE is in the class ELF_RTYPE_CLASS_NOCOPY if it should not be allowed
  42    to resolve to one of the main executable's symbols, as for a COPY
  43    reloc.  */
  44 #define elf_machine_type_class(type)                            \
  45   (((((type) == R_METAG_JMP_SLOT)) * ELF_RTYPE_CLASS_PLT)       \
  46    | (((type) == R_METAG_COPY) * ELF_RTYPE_CLASS_COPY))
  47
  48 static inline Elf32_Addr
  49 elf_machine_dynamic(Elf32_Ehdr *header)
  50 {
  51         Elf32_Addr *got;
  52
  53         __asm__ ("MOV %0,A1LbP" : "=r" (got));
  54
  55         if (header->e_ident[EI_ABIVERSION] >= 1) {
  56                 /* GOT register offset was introduced with ABI v1 */
  57                 got = (Elf32_Addr*)((void*)got - GOT_REG_OFFSET);
  58         }
  59         return *got;
  60 }
  61
  62 #define DL_BOOT_COMPUTE_GOT(GOT) \
  63     ((GOT) = elf_machine_dynamic(header))
  64
  65 static inline Elf32_Addr
  66 elf_machine_load_address(void)
  67 {
  68         Elf32_Addr addr;
  69         __asm__ ("MOV  D1Ar1,A1LbP\n"
  70                  "ADDT D1Ar1,D1Ar1,#HI(__dl_start@GOTOFF)\n"
  71                  "ADD  D1Ar1,D1Ar1,#LO(__dl_start@GOTOFF)\n"
  72                  "ADDT D0Ar2,D0Ar2,#HI(__dl_start_addr@GOTOFF)\n"
  73                  "ADD  D0Ar2,D0Ar2,#LO(__dl_start_addr@GOTOFF)\n"
  74                  "GETD D0Ar2,[D0Ar2]\n"
  75                  "SUB  %0,D1Ar1,D0Ar2\n"
  76                  ".section .data\n"
  77                  "__dl_start_addr: .long __dl_start\n"
  78                  ".previous\n"
  79                  : "=d" (addr) : : "D1Ar1", "D0Ar2");
  80         return addr;
  81 }
  82
  83 static inline void
  84 elf_machine_relative(Elf32_Addr load_off, const Elf32_Addr rel_addr,
  85                      Elf32_Word relative_count)
  86 {
  87         Elf32_Rela *rpnt = (void *)rel_addr;
  88
  89         --rpnt;
  90         do {
  91                 Elf32_Addr *const reloc_addr =
  92                         (void *)(load_off + (++rpnt)->r_offset);
  93
  94                 *reloc_addr =  load_off + rpnt->r_addend;
  95         } while (--relative_count);
  96 }
  97
  98 #define DL_MALLOC_ALIGN 8
  99
 100 #define HAVE_DL_INLINES_H
 101
 102 #define DL_IS_SPECIAL_SEGMENT(EPNT, PPNT) \
 103   __dl_is_special_segment(EPNT, PPNT)
 104 #define DL_MAP_SEGMENT(EPNT, PPNT, INFILE, FLAGS) \
 105   __dl_map_segment (EPNT, PPNT, INFILE, FLAGS)
 106
 107 #define DL_CHECK_LIB_TYPE(epnt, piclib, _dl_progname, libname) \
 108 do \
 109 { \
 110   ElfW(Phdr) *ppnt_; \
 111   char *header_ = (char *)epnt;                            \
 112   ppnt_ = (ElfW(Phdr) *)(intptr_t) & header_[epnt->e_phoff]; \
 113   if (ppnt_->p_vaddr >= 0x80000000 && \
 114       ppnt_->p_vaddr < 0x82060000) \
 115     (piclib) = 2; \
 116   if (ppnt_->p_vaddr >= 0xe0200000 && \
 117       ppnt_->p_vaddr < 0xe0260000) \
 118     (piclib) = 2; \
 119 } \
 120 while (0)
 121
 122 #define _DL_PREAD(FD, BUF, SIZE, OFFSET) \
 123   (_dl_pread((FD), (BUF), (SIZE), (OFFSET)))