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
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
|
/* vi: set sw=4 ts=4: */
/*
* Various assmbly language/system dependent hacks that are required
* so that we can minimize the amount of platform specific code.
*/
/*
* Define this if the system uses RELOCA.
*/
#undef ELF_USES_RELOCA
/*
* Get a pointer to the argv array. On many platforms this can be just
* the address if the first argument, on other platforms we need to
* do something a little more subtle here.
*/
#define GET_ARGV(ARGVP, ARGS) ARGVP = ((unsigned long *) ARGS)
/*
* Initialization sequence for the application or library GOT.
*/
#define INIT_GOT(GOT_BASE,MODULE) \
do { \
Elf32_Sym *sym; \
char *strtab; \
unsigned long i; \
\
/* Check if this is the dynamic linker itself */ \
if (MODULE->libtype == program_interpreter) \
continue; \
\
/* Fill in first two GOT entries according to the ABI */ \
GOT_BASE[0] = (unsigned long) _dl_linux_resolve; \
GOT_BASE[1] = (unsigned long) MODULE; \
\
/* Add load address displacement to all local GOT entries */ \
i = 2; \
while (i < MODULE->mips_local_gotno) \
GOT_BASE[i++] += (unsigned long) MODULE->loadaddr; \
\
/* Handle global GOT entries */ \
GOT_BASE += MODULE->mips_local_gotno; \
sym = (Elf32_Sym *) (MODULE->dynamic_info[DT_SYMTAB] + \
(unsigned long) MODULE->loadaddr) + MODULE->mips_gotsym; \
strtab = (char *) (MODULE->dynamic_info[DT_STRTAB] + \
(unsigned long) MODULE->loadaddr); \
i = MODULE->mips_symtabno - MODULE->mips_gotsym; \
while (i--) { \
if (sym->st_shndx == SHN_UNDEF) { \
if (ELF32_ST_TYPE(sym->st_info) == STT_FUNC && \
sym->st_value) \
*GOT_BASE = sym->st_value + \
(unsigned long) MODULE->loadaddr; \
else { \
*GOT_BASE = (unsigned long) _dl_find_hash(strtab + \
sym->st_name, MODULE->symbol_scope, NULL, 1); \
} \
} \
else if (sym->st_shndx == SHN_COMMON) { \
*GOT_BASE = (unsigned long) _dl_find_hash(strtab + \
sym->st_name, MODULE->symbol_scope, NULL, 1); \
} \
else if (ELF32_ST_TYPE(sym->st_info) == STT_FUNC && \
*GOT_BASE != sym->st_value) \
*GOT_BASE += (unsigned long) MODULE->loadaddr; \
else if (ELF32_ST_TYPE(sym->st_info) == STT_SECTION) { \
if (sym->st_other == 0) \
*GOT_BASE += (unsigned long) MODULE->loadaddr; \
} \
else { \
*GOT_BASE = (unsigned long) _dl_find_hash(strtab + \
sym->st_name, MODULE->symbol_scope, NULL, 1); \
} \
\
++GOT_BASE; \
++sym; \
} \
} while (0)
/*
* Here is a macro to perform the GOT relocation. This is only
* used when bootstrapping the dynamic loader.
*/
#define PERFORM_BOOTSTRAP_GOT(got) \
do { \
Elf32_Sym *sym; \
unsigned long i; \
\
/* Add load address displacement to all local GOT entries */ \
i = 2; \
while (i < tpnt->mips_local_gotno) \
got[i++] += load_addr; \
\
/* Handle global GOT entries */ \
got += tpnt->mips_local_gotno; \
sym = (Elf32_Sym *) (tpnt->dynamic_info[DT_SYMTAB] + \
load_addr) + tpnt->mips_gotsym; \
i = tpnt->mips_symtabno - tpnt->mips_gotsym; \
\
while (i--) { \
if (sym->st_shndx == SHN_UNDEF || \
sym->st_shndx == SHN_COMMON) \
*got = load_addr + sym->st_value; \
else if (ELF32_ST_TYPE(sym->st_info) == STT_FUNC && \
*got != sym->st_value) \
*got += load_addr; \
else if (ELF32_ST_TYPE(sym->st_info) == STT_SECTION) { \
if (sym->st_other == 0) \
*got += load_addr; \
} \
else \
*got = load_addr + sym->st_value; \
\
got++; \
sym++; \
} \
} while (0)
/*
* Here is a macro to perform a relocation. This is only used when
* bootstrapping the dynamic loader.
*/
#define PERFORM_BOOTSTRAP_RELOC(RELP,REL,SYMBOL,LOAD) \
switch(ELF32_R_TYPE((RELP)->r_info)) { \
case R_MIPS_REL32: \
if (symtab_index) { \
if (symtab_index < tpnt->mips_gotsym) \
*REL += SYMBOL; \
} \
else { \
*REL += LOAD; \
} \
break; \
case R_MIPS_NONE: \
break; \
default: \
SEND_STDERR("Aiieeee!"); \
_dl_exit(1); \
}
/*
* Transfer control to the user's application, once the dynamic loader
* is done. This routine has to exit the current function, then
* call the _dl_elf_main function. For MIPS, we do it in assembly
* because the stack doesn't get properly restored otherwise. Got look
* at boot1_arch.h
*/
#define START()
/* Here we define the magic numbers that this dynamic loader should accept */
#define MAGIC1 EM_MIPS
#define MAGIC2 EM_MIPS_RS3_LE
/* Used for error messages */
#define ELF_TARGET "MIPS"
unsigned long _dl_linux_resolver(unsigned long sym_index,
unsigned long old_gpreg);
#define do_rem(result, n, base) result = (n % base)
|
