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