fix regression in mips dynamic linker
[musl] / arch / mips / reloc.h
1 #include <string.h>
2 #include <elf.h>
3 #include <endian.h>
4
5 #if __BYTE_ORDER == __LITTLE_ENDIAN
6 #define ENDIAN_SUFFIX "el"
7 #else
8 #define ENDIAN_SUFFIX ""
9 #endif
10
11 #ifdef __mips_soft_float
12 #define FP_SUFFIX "-sf"
13 #else
14 #define FP_SUFFIX ""
15 #endif
16
17 #define LDSO_ARCH "mips" ENDIAN_SUFFIX FP_SUFFIX
18
19 #define TPOFF_K (-0x7000)
20
21 static int remap_rel(int type)
22 {
23         switch(type) {
24         case R_MIPS_REL32:
25                 return REL_SYM_OR_REL;
26         case R_MIPS_JUMP_SLOT:
27                 return REL_PLT;
28         case R_MIPS_COPY:
29                 return REL_COPY;
30         case R_MIPS_TLS_DTPMOD32:
31                 return REL_DTPMOD;
32         case R_MIPS_TLS_DTPREL32:
33                 return REL_DTPOFF;
34         case R_MIPS_TLS_TPREL32:
35                 return REL_TPOFF;
36         }
37         return 0;
38 }
39
40 void __reloc_self(int c, size_t *a, size_t *dynv, size_t *got)
41 {
42         char *base;
43         size_t t[20], n;
44         for (a+=c+1; *a; a++);
45         for (a++; *a; a+=2) if (*a<20) t[*a] = a[1];
46         base = (char *)t[AT_BASE];
47         if (!base) base = (char *)(t[AT_PHDR] & -t[AT_PAGESZ]);
48         for (a=dynv; *a; a+=2) if (*a-0x70000000UL<20) t[*a&31] = a[1];
49         n = t[DT_MIPS_LOCAL_GOTNO - 0x70000000];
50         for (a=got; n; a++, n--) *a += (size_t)base;
51 }
52
53 static void do_relocs(struct dso *dso, size_t *rel, size_t rel_size, size_t stride);
54
55 static void do_arch_relocs(struct dso *this, struct dso *head)
56 {
57         unsigned char *base = this->base;
58         size_t *dynv = this->dynv;
59         size_t dyn[20] = {0};
60         size_t i;
61         size_t rel[2], got=0;
62         Sym *sym;
63
64         for (i=0; dynv[i]; i+=2) {
65                 if (dynv[i]-0x70000000UL<20)
66                         dyn[dynv[i]&31] = dynv[i+1];
67                 else if (dynv[i] == DT_PLTGOT)
68                         got = dynv[i+1];
69         }
70         i = dyn[DT_MIPS_LOCAL_GOTNO-0x70000000];
71         if (this->shortname && !strcmp(this->shortname, "libc.so")) {
72                 got += sizeof(size_t) * i;
73         } else {
74                 for (; i; i--, got+=sizeof(size_t))
75                         *(size_t *)(base+got) += (size_t)base;
76         }
77         sym = this->syms + dyn[DT_MIPS_GOTSYM-0x70000000];
78         i = dyn[DT_MIPS_SYMTABNO-0x70000000] - dyn[DT_MIPS_GOTSYM-0x70000000];
79         for (; i; i--, got+=sizeof(size_t), sym++) {
80                 rel[0] = got;
81                 rel[1] = sym-this->syms << 8 | R_MIPS_JUMP_SLOT;
82                 *(size_t *)(base+got) = 0;
83                 do_relocs(this, rel, sizeof rel, 2);
84         }
85 }
86
87 #define NEED_ARCH_RELOCS 1
88 #define DYNAMIC_IS_RO 1
89 #define ARCH_SYM_REJECT_UND(s) (!((s)->st_other & STO_MIPS_PLT))