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
|
/*
* 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 a GOT.
*/
#define INIT_GOT(GOT_BASE,MODULE) \
{ \
GOT_BASE[2] = (unsigned long) _dl_linux_resolve; \
GOT_BASE[1] = (unsigned long) MODULE; \
}
/*
* Here is a macro to perform a relocation. This is only used when
* bootstrapping the dynamic loader. RELP is the relocation that we
* are performing, REL is the pointer to the address we are relocating.
* SYMBOL is the symbol involved in the relocation, and LOAD is the
* load address.
*/
#define PERFORM_BOOTSTRAP_RELOC(RELP,REL,SYMBOL,LOAD) \
switch(ELF32_R_TYPE((RELP)->r_info)){ \
case R_ARM_ABS32: \
*REL += SYMBOL; \
break; \
case R_ARM_PC24: \
{ \
unsigned long newval, topbits; \
long addend=*REL & 0x00ffffff; \
if(addend & 0x00800000) \
addend|=0xff000000; \
newval=SYMBOL- ((unsigned long)REL) + (addend<<2); \
topbits=newval & 0xfe000000; \
if (topbits != 0xfe000000 && topbits != 0x00000000) {/* \
newval=fix_bad_pc24(REL,value) - \
((unsigned long)REL) + (addend << 2); \
topbits=newval & 0xfe000000; \
if(topbits != 0xfe000000 && topbits != 0x00000000)*/ \
_dl_exit(1); \
} \
newval>>=2; \
SYMBOL= (*REL & 0xff000000)|(newval & 0x00ffffff); \
*REL=SYMBOL; \
} \
break; \
case R_ARM_GLOB_DAT: \
case R_ARM_JUMP_SLOT: \
*REL = SYMBOL; \
break; \
case R_ARM_RELATIVE: \
*REL += (unsigned long) LOAD; \
break; \
case R_ARM_NONE: \
break; \
default: \
_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.
*/
#define START() return _dl_elf_main;
/* Here we define the magic numbers that this dynamic loader should accept */
#define MAGIC1 EM_ARM
#undef MAGIC2
/* Used for error messages */
#define ELF_TARGET "ARM"
struct elf_resolve;
extern unsigned long _dl_linux_resolver(struct elf_resolve * tpnt, int reloc_entry);
static inline unsigned long arm_modulus(unsigned long m, unsigned long p) {
unsigned long i,t,inc;
i=p; t=0;
while(!(i&(1<<31))) {
i<<=1;
t++;
}
t--;
for(inc=t;inc>2;inc--) {
i=p<<inc;
if(i&(1<<31))
break;
while(m>=i) {
m-=i;
i<<=1;
if(i&(1<<31))
break;
if(i<p)
break;
}
}
while(m>=p) {
m-=p;
}
return m;
}
#define do_rem(result, n, base) result=arm_modulus(n,base);
|
