1 #ifdef TARGET_DEFS_ONLY
3 #define EM_TCC_TARGET EM_AARCH64
5 #define R_DATA_32 R_AARCH64_ABS32
6 #define R_DATA_PTR R_AARCH64_ABS64
7 #define R_JMP_SLOT R_AARCH64_JUMP_SLOT
8 #define R_GLOB_DAT R_AARCH64_GLOB_DAT
9 #define R_COPY R_AARCH64_COPY
11 #define R_NUM R_AARCH64_NUM
13 #define ELF_START_ADDR 0x00400000
14 #define ELF_PAGE_SIZE 0x1000
16 #define HAVE_SECTION_RELOC
17 #define PCRELATIVE_DLLPLT 1
19 #else /* !TARGET_DEFS_ONLY */
23 /* Returns 1 for a code relocation, 0 for a data relocation. For unknown
24 relocations, returns -1. */
25 int code_reloc (int reloc_type
)
30 case R_AARCH64_MOVW_UABS_G0_NC
:
31 case R_AARCH64_MOVW_UABS_G1_NC
:
32 case R_AARCH64_MOVW_UABS_G2_NC
:
33 case R_AARCH64_MOVW_UABS_G3
:
34 case R_AARCH64_ADR_PREL_PG_HI21
:
35 case R_AARCH64_ADD_ABS_LO12_NC
:
36 case R_AARCH64_ADR_GOT_PAGE
:
37 case R_AARCH64_LD64_GOT_LO12_NC
:
38 case R_AARCH64_GLOB_DAT
:
42 case R_AARCH64_JUMP26
:
43 case R_AARCH64_CALL26
:
44 case R_AARCH64_JUMP_SLOT
:
48 tcc_error ("Unknown relocation type: %d", reloc_type
);
52 /* Returns an enumerator to describe wether and when the relocation needs a
53 GOT and/or PLT entry to be created. See tcc.h for a description of the
55 int gotplt_entry_type (int reloc_type
)
60 case R_AARCH64_MOVW_UABS_G0_NC
:
61 case R_AARCH64_MOVW_UABS_G1_NC
:
62 case R_AARCH64_MOVW_UABS_G2_NC
:
63 case R_AARCH64_MOVW_UABS_G3
:
64 case R_AARCH64_ADR_PREL_PG_HI21
:
65 case R_AARCH64_ADD_ABS_LO12_NC
:
66 case R_AARCH64_GLOB_DAT
:
67 case R_AARCH64_JUMP_SLOT
:
69 return NO_GOTPLT_ENTRY
;
71 case R_AARCH64_JUMP26
:
72 case R_AARCH64_CALL26
:
73 return AUTO_GOTPLT_ENTRY
;
75 case R_AARCH64_ADR_GOT_PAGE
:
76 case R_AARCH64_LD64_GOT_LO12_NC
:
77 return ALWAYS_GOTPLT_ENTRY
;
80 tcc_error ("Unknown relocation type: %d", reloc_type
);
84 void relocate_init(Section
*sr
) {}
86 void relocate(TCCState
*s1
, ElfW_Rel
*rel
, int type
, char *ptr
, addr_t addr
, addr_t val
)
88 int sym_index
= ELFW(R_SYM
)(rel
->r_info
);
90 ElfW(Sym
) *sym
= &((ElfW(Sym
) *)symtab_section
->data
)[sym_index
];
100 case R_AARCH64_MOVW_UABS_G0_NC
:
101 write32le(ptr
, ((read32le(ptr
) & 0xffe0001f) |
102 (val
& 0xffff) << 5));
104 case R_AARCH64_MOVW_UABS_G1_NC
:
105 write32le(ptr
, ((read32le(ptr
) & 0xffe0001f) |
106 (val
>> 16 & 0xffff) << 5));
108 case R_AARCH64_MOVW_UABS_G2_NC
:
109 write32le(ptr
, ((read32le(ptr
) & 0xffe0001f) |
110 (val
>> 32 & 0xffff) << 5));
112 case R_AARCH64_MOVW_UABS_G3
:
113 write32le(ptr
, ((read32le(ptr
) & 0xffe0001f) |
114 (val
>> 48 & 0xffff) << 5));
116 case R_AARCH64_ADR_PREL_PG_HI21
: {
117 uint64_t off
= (val
>> 12) - (addr
>> 12);
118 if ((off
+ ((uint64_t)1 << 20)) >> 21)
119 tcc_error("R_AARCH64_ADR_PREL_PG_HI21 relocation failed");
120 write32le(ptr
, ((read32le(ptr
) & 0x9f00001f) |
121 (off
& 0x1ffffc) << 3 | (off
& 3) << 29));
124 case R_AARCH64_ADD_ABS_LO12_NC
:
125 write32le(ptr
, ((read32le(ptr
) & 0xffc003ff) |
126 (val
& 0xfff) << 10));
128 case R_AARCH64_JUMP26
:
129 case R_AARCH64_CALL26
:
131 printf ("reloc %d @ 0x%lx: val=0x%lx name=%s\n", type
, addr
, val
,
132 (char *) symtab_section
->link
->data
+ sym
->st_name
);
134 if (((val
- addr
) + ((uint64_t)1 << 27)) & ~(uint64_t)0xffffffc)
135 tcc_error("R_AARCH64_(JUMP|CALL)26 relocation failed"
136 " (val=%lx, addr=%lx)", val
, addr
);
137 write32le(ptr
, (0x14000000 |
138 (uint32_t)(type
== R_AARCH64_CALL26
) << 31 |
139 ((val
- addr
) >> 2 & 0x3ffffff)));
141 case R_AARCH64_ADR_GOT_PAGE
: {
143 (((s1
->got
->sh_addr
+
144 s1
->sym_attrs
[sym_index
].got_offset
) >> 12) - (addr
>> 12));
145 if ((off
+ ((uint64_t)1 << 20)) >> 21)
146 tcc_error("R_AARCH64_ADR_GOT_PAGE relocation failed");
147 write32le(ptr
, ((read32le(ptr
) & 0x9f00001f) |
148 (off
& 0x1ffffc) << 3 | (off
& 3) << 29));
151 case R_AARCH64_LD64_GOT_LO12_NC
:
153 ((read32le(ptr
) & 0xfff803ff) |
155 s1
->sym_attrs
[sym_index
].got_offset
) & 0xff8) << 7));
159 case R_AARCH64_GLOB_DAT
:
160 case R_AARCH64_JUMP_SLOT
:
161 /* They don't need addend */
163 printf ("reloc %d @ 0x%lx: val=0x%lx name=%s\n", type
, addr
,
165 (char *) symtab_section
->link
->data
+ sym
->st_name
);
167 write64le(ptr
, val
- rel
->r_addend
);
170 fprintf(stderr
, "FIXME: handle reloc type %x at %x [%p] to %x\n",
171 type
, (unsigned)addr
, ptr
, (unsigned)val
);
176 #endif /* !TARGET_DEFS_ONLY */