mips: add mips-sf subarch support (soft-float)
[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 IS_COPY(x) ((x)==R_MIPS_COPY)
20 #define IS_PLT(x) 1
21
22 static inline void do_single_reloc(
23         struct dso *self, unsigned char *base_addr,
24         size_t *reloc_addr, int type, size_t addend,
25         Sym *sym, size_t sym_size,
26         struct symdef def, size_t sym_val)
27 {
28         switch(type) {
29         case R_MIPS_JUMP_SLOT:
30                 *reloc_addr = sym_val;
31                 break;
32         case R_MIPS_REL32:
33                 if (sym_val) *reloc_addr += sym_val;
34                 else *reloc_addr += (size_t)base_addr;
35                 break;
36         case R_MIPS_COPY:
37                 memcpy(reloc_addr, (void *)sym_val, sym_size);
38                 break;
39         case R_MIPS_TLS_DTPMOD32:
40                 *reloc_addr = def.dso ? def.dso->tls_id : self->tls_id;
41                 break;
42         case R_MIPS_TLS_DTPREL32:
43                 *reloc_addr += def.sym->st_value;
44                 break;
45         case R_MIPS_TLS_TPREL32:
46                 *reloc_addr += def.sym
47                         ? def.sym->st_value + def.dso->tls_offset - 0x7000
48                         : self->tls_offset - 0x7000;
49                 break;
50         }
51 }
52
53 void __reloc_self(int c, size_t *a, size_t *dynv, size_t *got)
54 {
55         char *base;
56         size_t t[20], n;
57         for (a+=c+1; *a; a++);
58         for (a++; *a; a+=2) if (*a<20) t[*a] = a[1];
59         base = (char *)t[AT_BASE];
60         if (!base) base = (char *)(t[AT_PHDR] & -t[AT_PAGESZ]);
61         for (a=dynv; *a; a+=2) if (*a-0x70000000UL<20) t[*a&31] = a[1];
62         n = t[DT_MIPS_LOCAL_GOTNO - 0x70000000];
63         for (a=got; n; a++, n--) *a += (size_t)base;
64 }
65
66 static void do_relocs(struct dso *dso, size_t *rel, size_t rel_size, size_t stride);
67
68 static void do_arch_relocs(struct dso *this, struct dso *head)
69 {
70         unsigned char *base = this->base;
71         size_t *dynv = this->dynv;
72         size_t dyn[20] = {0};
73         size_t i;
74         size_t rel[2], got=0;
75         Sym *sym;
76
77         for (i=0; dynv[i]; i+=2) {
78                 if (dynv[i]-0x70000000UL<20)
79                         dyn[dynv[i]&31] = dynv[i+1];
80                 else if (dynv[i] == DT_PLTGOT)
81                         got = dynv[i+1];
82         }
83         i = dyn[DT_MIPS_LOCAL_GOTNO-0x70000000];
84         if (this->shortname && !strcmp(this->shortname, "libc.so")) {
85                 got += sizeof(size_t) * i;
86         } else {
87                 for (; i; i--, got+=sizeof(size_t))
88                         *(size_t *)(base+got) += (size_t)base;
89         }
90         sym = this->syms + dyn[DT_MIPS_GOTSYM-0x70000000];
91         i = dyn[DT_MIPS_SYMTABNO-0x70000000] - dyn[DT_MIPS_GOTSYM-0x70000000];
92         for (; i; i--, got+=sizeof(size_t), sym++) {
93                 rel[0] = got;
94                 rel[1] = sym-this->syms << 8 | R_MIPS_JUMP_SLOT;
95                 *(size_t *)(base+got) = 0;
96                 do_relocs(this, rel, sizeof rel, 2);
97         }
98 }
99
100 #define NEED_ARCH_RELOCS 1
101 #define DYNAMIC_IS_RO 1