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
|
#include <sys/cdefs.h>
#include <stdio.h>
#include <rtl.h>
#include <errno.h>
#include "rtl-elf.h"
#include "rtl-error.h"
#include <rtl-trace.h>
bool
rtems_rtl_elf_rel_resolve_sym (Elf_Word type)
{
return true;
}
static inline Elf_Addr
load_ptr(void *where)
{
Elf_Addr res;
memcpy(&res, where, sizeof(res));
return (res);
}
bool
rtems_rtl_elf_relocate_rela (const rtems_rtl_obj_t* obj,
const Elf_Rela* rela,
const rtems_rtl_obj_sect_t* sect,
const char* symname,
const Elf_Byte syminfo,
const Elf_Word symvalue)
{
Elf_Addr target = 0;
Elf_Addr *where;
Elf_Word tmp;
Elf_Word size; //byte
where = (Elf_Addr *)(sect->base + rela->r_offset);
if (rtems_rtl_trace (RTEMS_RTL_TRACE_RELOC)) {
printf("rela relocation type is %d relocated address 0x%08x",
ELF_R_TYPE(rela->r_info), where);
}
tmp = symvalue;
switch (ELF_R_TYPE(rela->r_info)) {
case R_TYPE(UNUSED0):
break;
case R_TYPE(HUIMM16):
tmp = symvalue >> 16;
case R_TYPE(LUIMM16):
case R_TYPE(RIMM16):
size = 2;
break;
case R_TYPE(BYTE4_DATA):
size = 4;
break;
case R_TYPE(PCREL24):
case R_TYPE(PCREL24_JU):
where = (Elf_Addr*)((Elf_Addr)where - 2); /* Back 2 bytes */
tmp = symvalue - (Elf_Addr)where;
tmp >>= 1;
if ((tmp & 0x20000000) == 0x20000000)
tmp |= 0xc0000000;
if ((tmp & 0xff000000) && (~tmp & 0xff800000)) {
printf("PCREL24/PCREL24_JU Overflow\n");
return false;
}
tmp = (load_ptr(where) & 0x0000ff00) | ((tmp & 0x0000ffff) << 16) |
((tmp & 0x00ff0000) >> 16);
size = 4;
break;
case R_TYPE(PCREL12_JUMP_S):
tmp = symvalue - (Elf_Addr)where;
tmp >>= 1;
if ((tmp & 0x20000000) == 0x20000000)
tmp |= 0xc0000000;
if ((tmp & 0xfffff000) && (~tmp & 0xfffff800)) {
printf("PCREL12_JUMP_S Overflow\n");
return false;
}
tmp = ((*(uint16_t *)where) & 0xf000) | (tmp & 0xfff);
size = 2;
break;
default:
printf("Unspported rela type\n");
return false;
}
memcpy((void*)where, &tmp, size);
return true;
}
bool
rtems_rtl_elf_relocate_rel (const rtems_rtl_obj_t* obj,
const Elf_Rel* rel,
const rtems_rtl_obj_sect_t* sect,
const char* symname,
const Elf_Byte syminfo,
const Elf_Word symvalue)
{
rtems_rtl_set_error (EINVAL, "rel type record not supported");
return false;
}
|
