blob: 1acbd865c3aa87e19de0834744fe82760cb5956a (
plain)
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
|
#include <stdio.h>
#include <elf.h>
#include "../../kexec.h"
#include "../../kexec-elf.h"
int machine_verify_elf_rel(struct mem_ehdr *ehdr)
{
if (ehdr->ei_data != ELFDATA2MSB) {
return 0;
}
if (ehdr->ei_class != ELFCLASS32) {
return 0;
}
if (ehdr->e_machine != EM_PPC) {
return 0;
}
return 1;
}
void machine_apply_elf_rel(struct mem_ehdr *UNUSED(ehdr),
struct mem_sym *UNUSED(sym), unsigned long r_type, void *location,
unsigned long address, unsigned long value)
{
switch(r_type) {
case R_PPC_ADDR32:
/* Simply set it */
*(uint32_t *)location = value;
break;
case R_PPC_ADDR16_LO:
/* Low half of the symbol */
*(uint16_t *)location = value;
break;
case R_PPC_ADDR16_HI:
*(uint16_t *)location = (value>>16) & 0xffff;
break;
case R_PPC_ADDR16_HA:
/* Sign-adjusted lower 16 bits: PPC ELF ABI says:
(((x >> 16) + ((x & 0x8000) ? 1 : 0))) & 0xFFFF.
This is the same, only sane.
*/
*(uint16_t *)location = (value + 0x8000) >> 16;
break;
case R_PPC_REL24:
if ((int)(value - address) < -0x02000000
|| (int)(value - address) >= 0x02000000)
{
die("Symbol more than 16MiB away");
}
/* Only replace bits 2 through 26 */
*(uint32_t *)location
= (*(uint32_t *)location & ~0x03fffffc)
| ((value - address)
& 0x03fffffc);
break;
case R_PPC_REL32:
/* 32-bit relative jump. */
*(uint32_t *)location = value - address;
break;
default:
die("Unknown rela relocation: %lu\n", r_type);
break;
}
return;
}
|
