1 | /* CRIS-specific support for 32-bit ELF.
|
---|
2 | Copyright 2000, 2001, 2002, 2003 Free Software Foundation, Inc.
|
---|
3 | Contributed by Axis Communications AB.
|
---|
4 | Written by Hans-Peter Nilsson, based on elf32-fr30.c
|
---|
5 | PIC and shlib bits based primarily on elf32-m68k.c and elf32-i386.c.
|
---|
6 |
|
---|
7 | This file is part of BFD, the Binary File Descriptor library.
|
---|
8 |
|
---|
9 | This program is free software; you can redistribute it and/or modify
|
---|
10 | it under the terms of the GNU General Public License as published by
|
---|
11 | the Free Software Foundation; either version 2 of the License, or
|
---|
12 | (at your option) any later version.
|
---|
13 |
|
---|
14 | This program is distributed in the hope that it will be useful,
|
---|
15 | but WITHOUT ANY WARRANTY; without even the implied warranty of
|
---|
16 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
---|
17 | GNU General Public License for more details.
|
---|
18 |
|
---|
19 | You should have received a copy of the GNU General Public License
|
---|
20 | along with this program; if not, write to the Free Software
|
---|
21 | Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
---|
22 |
|
---|
23 | #include "bfd.h"
|
---|
24 | #include "sysdep.h"
|
---|
25 | #include "libbfd.h"
|
---|
26 | #include "elf-bfd.h"
|
---|
27 | #include "elf/cris.h"
|
---|
28 |
|
---|
29 | /* Forward declarations. */
|
---|
30 | static reloc_howto_type * cris_reloc_type_lookup
|
---|
31 | PARAMS ((bfd *abfd, bfd_reloc_code_real_type code));
|
---|
32 |
|
---|
33 | static void cris_info_to_howto_rela
|
---|
34 | PARAMS ((bfd *, arelent *, Elf_Internal_Rela *));
|
---|
35 |
|
---|
36 | static bfd_boolean cris_elf_grok_prstatus
|
---|
37 | PARAMS ((bfd *abfd, Elf_Internal_Note *note));
|
---|
38 |
|
---|
39 | static bfd_boolean cris_elf_grok_psinfo
|
---|
40 | PARAMS ((bfd *abfd, Elf_Internal_Note *note));
|
---|
41 |
|
---|
42 | static bfd_boolean cris_elf_relocate_section
|
---|
43 | PARAMS ((bfd *, struct bfd_link_info *, bfd *, asection *, bfd_byte *,
|
---|
44 | Elf_Internal_Rela *, Elf_Internal_Sym *, asection **));
|
---|
45 |
|
---|
46 | static bfd_reloc_status_type cris_final_link_relocate
|
---|
47 | PARAMS ((reloc_howto_type *, bfd *, asection *, bfd_byte *,
|
---|
48 | Elf_Internal_Rela *, bfd_vma));
|
---|
49 |
|
---|
50 | static bfd_boolean cris_elf_gc_sweep_hook
|
---|
51 | PARAMS ((bfd *, struct bfd_link_info *, asection *,
|
---|
52 | const Elf_Internal_Rela *));
|
---|
53 |
|
---|
54 | static asection * cris_elf_gc_mark_hook
|
---|
55 | PARAMS ((asection *, struct bfd_link_info *, Elf_Internal_Rela *,
|
---|
56 | struct elf_link_hash_entry *, Elf_Internal_Sym *));
|
---|
57 |
|
---|
58 | static bfd_boolean cris_elf_object_p PARAMS ((bfd *));
|
---|
59 |
|
---|
60 | static void cris_elf_final_write_processing PARAMS ((bfd *, bfd_boolean));
|
---|
61 |
|
---|
62 | static bfd_boolean cris_elf_print_private_bfd_data PARAMS ((bfd *, PTR));
|
---|
63 |
|
---|
64 | static bfd_boolean cris_elf_merge_private_bfd_data PARAMS ((bfd *, bfd *));
|
---|
65 |
|
---|
66 | struct elf_cris_link_hash_entry;
|
---|
67 | static bfd_boolean elf_cris_discard_excess_dso_dynamics
|
---|
68 | PARAMS ((struct elf_cris_link_hash_entry *, PTR));
|
---|
69 | static bfd_boolean elf_cris_discard_excess_program_dynamics
|
---|
70 | PARAMS ((struct elf_cris_link_hash_entry *, PTR));
|
---|
71 | static bfd_boolean elf_cris_adjust_gotplt_to_got
|
---|
72 | PARAMS ((struct elf_cris_link_hash_entry *, PTR));
|
---|
73 | static bfd_boolean elf_cris_try_fold_plt_to_got
|
---|
74 | PARAMS ((struct elf_cris_link_hash_entry *, PTR));
|
---|
75 | static struct bfd_hash_entry *elf_cris_link_hash_newfunc
|
---|
76 | PARAMS ((struct bfd_hash_entry *, struct bfd_hash_table *, const char *));
|
---|
77 | static struct bfd_link_hash_table *elf_cris_link_hash_table_create
|
---|
78 | PARAMS ((bfd *));
|
---|
79 | static bfd_boolean elf_cris_adjust_dynamic_symbol
|
---|
80 | PARAMS ((struct bfd_link_info *, struct elf_link_hash_entry *));
|
---|
81 | static bfd_boolean cris_elf_check_relocs
|
---|
82 | PARAMS ((bfd *, struct bfd_link_info *, asection *,
|
---|
83 | const Elf_Internal_Rela *));
|
---|
84 |
|
---|
85 | static bfd_boolean elf_cris_size_dynamic_sections
|
---|
86 | PARAMS ((bfd *, struct bfd_link_info *));
|
---|
87 | static bfd_boolean elf_cris_finish_dynamic_symbol
|
---|
88 | PARAMS ((bfd *, struct bfd_link_info *, struct elf_link_hash_entry *,
|
---|
89 | Elf_Internal_Sym *));
|
---|
90 | static bfd_boolean elf_cris_finish_dynamic_sections
|
---|
91 | PARAMS ((bfd *, struct bfd_link_info *));
|
---|
92 | static void elf_cris_hide_symbol
|
---|
93 | PARAMS ((struct bfd_link_info *, struct elf_link_hash_entry *, bfd_boolean));
|
---|
94 | static enum elf_reloc_type_class elf_cris_reloc_type_class
|
---|
95 | PARAMS ((const Elf_Internal_Rela *));
|
---|
96 |
|
---|
97 | static reloc_howto_type cris_elf_howto_table [] =
|
---|
98 | {
|
---|
99 | /* This reloc does nothing. */
|
---|
100 | HOWTO (R_CRIS_NONE, /* type */
|
---|
101 | 0, /* rightshift */
|
---|
102 | 2, /* size (0 = byte, 1 = short, 2 = long) */
|
---|
103 | 32, /* bitsize */
|
---|
104 | FALSE, /* pc_relative */
|
---|
105 | 0, /* bitpos */
|
---|
106 | complain_overflow_bitfield, /* complain_on_overflow */
|
---|
107 | bfd_elf_generic_reloc, /* special_function */
|
---|
108 | "R_CRIS_NONE", /* name */
|
---|
109 | FALSE, /* partial_inplace */
|
---|
110 | 0, /* src_mask */
|
---|
111 | 0, /* dst_mask */
|
---|
112 | FALSE), /* pcrel_offset */
|
---|
113 |
|
---|
114 | /* An 8 bit absolute relocation. */
|
---|
115 | HOWTO (R_CRIS_8, /* type */
|
---|
116 | 0, /* rightshift */
|
---|
117 | 0, /* size (0 = byte, 1 = short, 2 = long) */
|
---|
118 | 8, /* bitsize */
|
---|
119 | FALSE, /* pc_relative */
|
---|
120 | 0, /* bitpos */
|
---|
121 | complain_overflow_bitfield, /* complain_on_overflow */
|
---|
122 | bfd_elf_generic_reloc, /* special_function */
|
---|
123 | "R_CRIS_8", /* name */
|
---|
124 | FALSE, /* partial_inplace */
|
---|
125 | 0x0000, /* src_mask */
|
---|
126 | 0x00ff, /* dst_mask */
|
---|
127 | FALSE), /* pcrel_offset */
|
---|
128 |
|
---|
129 | /* A 16 bit absolute relocation. */
|
---|
130 | HOWTO (R_CRIS_16, /* type */
|
---|
131 | 0, /* rightshift */
|
---|
132 | 1, /* size (0 = byte, 1 = short, 2 = long) */
|
---|
133 | 16, /* bitsize */
|
---|
134 | FALSE, /* pc_relative */
|
---|
135 | 0, /* bitpos */
|
---|
136 | complain_overflow_bitfield, /* complain_on_overflow */
|
---|
137 | bfd_elf_generic_reloc, /* special_function */
|
---|
138 | "R_CRIS_16", /* name */
|
---|
139 | FALSE, /* partial_inplace */
|
---|
140 | 0x00000000, /* src_mask */
|
---|
141 | 0x0000ffff, /* dst_mask */
|
---|
142 | FALSE), /* pcrel_offset */
|
---|
143 |
|
---|
144 | /* A 32 bit absolute relocation. */
|
---|
145 | HOWTO (R_CRIS_32, /* type */
|
---|
146 | 0, /* rightshift */
|
---|
147 | 2, /* size (0 = byte, 1 = short, 2 = long) */
|
---|
148 | 32, /* bitsize */
|
---|
149 | FALSE, /* pc_relative */
|
---|
150 | 0, /* bitpos */
|
---|
151 | complain_overflow_bitfield, /* complain_on_overflow */
|
---|
152 | bfd_elf_generic_reloc, /* special_function */
|
---|
153 | "R_CRIS_32", /* name */
|
---|
154 | FALSE, /* partial_inplace */
|
---|
155 | 0x00000000, /* src_mask */
|
---|
156 | 0xffffffff, /* dst_mask */
|
---|
157 | FALSE), /* pcrel_offset */
|
---|
158 |
|
---|
159 | /* An 8 bit PC-relative relocation. */
|
---|
160 | HOWTO (R_CRIS_8_PCREL, /* type */
|
---|
161 | 0, /* rightshift */
|
---|
162 | 0, /* size (0 = byte, 1 = short, 2 = long) */
|
---|
163 | 8, /* bitsize */
|
---|
164 | TRUE, /* pc_relative */
|
---|
165 | 0, /* bitpos */
|
---|
166 | complain_overflow_bitfield, /* complain_on_overflow */
|
---|
167 | bfd_elf_generic_reloc, /* special_function */
|
---|
168 | "R_CRIS_8_PCREL", /* name */
|
---|
169 | FALSE, /* partial_inplace */
|
---|
170 | 0x0000, /* src_mask */
|
---|
171 | 0x00ff, /* dst_mask */
|
---|
172 | TRUE), /* pcrel_offset */
|
---|
173 |
|
---|
174 | /* A 16 bit PC-relative relocation. */
|
---|
175 | HOWTO (R_CRIS_16_PCREL, /* type */
|
---|
176 | 0, /* rightshift */
|
---|
177 | 1, /* size (0 = byte, 1 = short, 2 = long) */
|
---|
178 | 16, /* bitsize */
|
---|
179 | TRUE, /* pc_relative */
|
---|
180 | 0, /* bitpos */
|
---|
181 | complain_overflow_bitfield, /* complain_on_overflow */
|
---|
182 | bfd_elf_generic_reloc, /* special_function */
|
---|
183 | "R_CRIS_16_PCREL", /* name */
|
---|
184 | FALSE, /* partial_inplace */
|
---|
185 | 0x00000000, /* src_mask */
|
---|
186 | 0x0000ffff, /* dst_mask */
|
---|
187 | TRUE), /* pcrel_offset */
|
---|
188 |
|
---|
189 | /* A 32 bit PC-relative relocation. */
|
---|
190 | HOWTO (R_CRIS_32_PCREL, /* type */
|
---|
191 | 0, /* rightshift */
|
---|
192 | 2, /* size (0 = byte, 1 = short, 2 = long) */
|
---|
193 | 32, /* bitsize */
|
---|
194 | TRUE, /* pc_relative */
|
---|
195 | 0, /* bitpos */
|
---|
196 | complain_overflow_bitfield, /* complain_on_overflow */
|
---|
197 | bfd_elf_generic_reloc, /* special_function */
|
---|
198 | "R_CRIS_32_PCREL", /* name */
|
---|
199 | FALSE, /* partial_inplace */
|
---|
200 | 0x00000000, /* src_mask */
|
---|
201 | 0xffffffff, /* dst_mask */
|
---|
202 | TRUE), /* pcrel_offset */
|
---|
203 |
|
---|
204 | /* GNU extension to record C++ vtable hierarchy. */
|
---|
205 | HOWTO (R_CRIS_GNU_VTINHERIT, /* type */
|
---|
206 | 0, /* rightshift */
|
---|
207 | 2, /* size (0 = byte, 1 = short, 2 = long) */
|
---|
208 | 0, /* bitsize */
|
---|
209 | FALSE, /* pc_relative */
|
---|
210 | 0, /* bitpos */
|
---|
211 | complain_overflow_dont, /* complain_on_overflow */
|
---|
212 | NULL, /* special_function */
|
---|
213 | "R_CRIS_GNU_VTINHERIT", /* name */
|
---|
214 | FALSE, /* partial_inplace */
|
---|
215 | 0, /* src_mask */
|
---|
216 | 0, /* dst_mask */
|
---|
217 | FALSE), /* pcrel_offset */
|
---|
218 |
|
---|
219 | /* GNU extension to record C++ vtable member usage. */
|
---|
220 | HOWTO (R_CRIS_GNU_VTENTRY, /* type */
|
---|
221 | 0, /* rightshift */
|
---|
222 | 2, /* size (0 = byte, 1 = short, 2 = long) */
|
---|
223 | 0, /* bitsize */
|
---|
224 | FALSE, /* pc_relative */
|
---|
225 | 0, /* bitpos */
|
---|
226 | complain_overflow_dont, /* complain_on_overflow */
|
---|
227 | _bfd_elf_rel_vtable_reloc_fn, /* special_function */
|
---|
228 | "R_CRIS_GNU_VTENTRY", /* name */
|
---|
229 | FALSE, /* partial_inplace */
|
---|
230 | 0, /* src_mask */
|
---|
231 | 0, /* dst_mask */
|
---|
232 | FALSE), /* pcrel_offset */
|
---|
233 |
|
---|
234 | /* This is used only by the dynamic linker. The symbol should exist
|
---|
235 | both in the object being run and in some shared library. The
|
---|
236 | dynamic linker copies the data addressed by the symbol from the
|
---|
237 | shared library into the object, because the object being
|
---|
238 | run has to have the data at some particular address. */
|
---|
239 | HOWTO (R_CRIS_COPY, /* type */
|
---|
240 | 0, /* rightshift */
|
---|
241 | 2, /* size (0 = byte, 1 = short, 2 = long) */
|
---|
242 | 32, /* bitsize */
|
---|
243 | FALSE, /* pc_relative */
|
---|
244 | 0, /* bitpos */
|
---|
245 | complain_overflow_bitfield, /* complain_on_overflow */
|
---|
246 | bfd_elf_generic_reloc, /* special_function */
|
---|
247 | "R_CRIS_COPY", /* name */
|
---|
248 | FALSE, /* partial_inplace */
|
---|
249 | 0, /* src_mask */
|
---|
250 | 0, /* dst_mask */
|
---|
251 | FALSE), /* pcrel_offset */
|
---|
252 |
|
---|
253 | /* Like R_CRIS_32, but used when setting global offset table entries. */
|
---|
254 | HOWTO (R_CRIS_GLOB_DAT, /* type */
|
---|
255 | 0, /* rightshift */
|
---|
256 | 2, /* size (0 = byte, 1 = short, 2 = long) */
|
---|
257 | 32, /* bitsize */
|
---|
258 | FALSE, /* pc_relative */
|
---|
259 | 0, /* bitpos */
|
---|
260 | complain_overflow_bitfield, /* complain_on_overflow */
|
---|
261 | bfd_elf_generic_reloc, /* special_function */
|
---|
262 | "R_CRIS_GLOB_DAT", /* name */
|
---|
263 | FALSE, /* partial_inplace */
|
---|
264 | 0, /* src_mask */
|
---|
265 | 0xffffffff, /* dst_mask */
|
---|
266 | FALSE), /* pcrel_offset */
|
---|
267 |
|
---|
268 | /* Marks a procedure linkage table entry for a symbol. */
|
---|
269 | HOWTO (R_CRIS_JUMP_SLOT, /* type */
|
---|
270 | 0, /* rightshift */
|
---|
271 | 2, /* size (0 = byte, 1 = short, 2 = long) */
|
---|
272 | 32, /* bitsize */
|
---|
273 | FALSE, /* pc_relative */
|
---|
274 | 0, /* bitpos */
|
---|
275 | complain_overflow_bitfield, /* complain_on_overflow */
|
---|
276 | bfd_elf_generic_reloc, /* special_function */
|
---|
277 | "R_CRIS_JUMP_SLOT", /* name */
|
---|
278 | FALSE, /* partial_inplace */
|
---|
279 | 0, /* src_mask */
|
---|
280 | 0, /* dst_mask */
|
---|
281 | FALSE), /* pcrel_offset */
|
---|
282 |
|
---|
283 | /* Used only by the dynamic linker. When the object is run, this
|
---|
284 | longword is set to the load address of the object, plus the
|
---|
285 | addend. */
|
---|
286 | HOWTO (R_CRIS_RELATIVE, /* type */
|
---|
287 | 0, /* rightshift */
|
---|
288 | 2, /* size (0 = byte, 1 = short, 2 = long) */
|
---|
289 | 32, /* bitsize */
|
---|
290 | FALSE, /* pc_relative */
|
---|
291 | 0, /* bitpos */
|
---|
292 | complain_overflow_bitfield, /* complain_on_overflow */
|
---|
293 | bfd_elf_generic_reloc, /* special_function */
|
---|
294 | "R_CRIS_RELATIVE", /* name */
|
---|
295 | FALSE, /* partial_inplace */
|
---|
296 | 0, /* src_mask */
|
---|
297 | 0xffffffff, /* dst_mask */
|
---|
298 | FALSE), /* pcrel_offset */
|
---|
299 |
|
---|
300 | /* Like R_CRIS_32, but referring to the GOT table entry for the symbol. */
|
---|
301 | HOWTO (R_CRIS_16_GOT, /* type */
|
---|
302 | 0, /* rightshift */
|
---|
303 | 1, /* size (0 = byte, 1 = short, 2 = long) */
|
---|
304 | 16, /* bitsize */
|
---|
305 | FALSE, /* pc_relative */
|
---|
306 | 0, /* bitpos */
|
---|
307 | complain_overflow_bitfield, /* complain_on_overflow */
|
---|
308 | bfd_elf_generic_reloc, /* special_function */
|
---|
309 | "R_CRIS_16_GOT", /* name */
|
---|
310 | FALSE, /* partial_inplace */
|
---|
311 | 0, /* src_mask */
|
---|
312 | 0xffff, /* dst_mask */
|
---|
313 | FALSE), /* pcrel_offset */
|
---|
314 |
|
---|
315 | HOWTO (R_CRIS_32_GOT, /* type */
|
---|
316 | 0, /* rightshift */
|
---|
317 | 2, /* size (0 = byte, 1 = short, 2 = long) */
|
---|
318 | 32, /* bitsize */
|
---|
319 | FALSE, /* pc_relative */
|
---|
320 | 0, /* bitpos */
|
---|
321 | complain_overflow_bitfield, /* complain_on_overflow */
|
---|
322 | bfd_elf_generic_reloc, /* special_function */
|
---|
323 | "R_CRIS_32_GOT", /* name */
|
---|
324 | FALSE, /* partial_inplace */
|
---|
325 | 0, /* src_mask */
|
---|
326 | 0xffffffff, /* dst_mask */
|
---|
327 | FALSE), /* pcrel_offset */
|
---|
328 |
|
---|
329 | /* Like R_CRIS_32_GOT, but referring to (and requesting a) PLT part of
|
---|
330 | the GOT table for the symbol. */
|
---|
331 | HOWTO (R_CRIS_16_GOTPLT, /* type */
|
---|
332 | 0, /* rightshift */
|
---|
333 | 1, /* size (0 = byte, 1 = short, 2 = long) */
|
---|
334 | 16, /* bitsize */
|
---|
335 | FALSE, /* pc_relative */
|
---|
336 | 0, /* bitpos */
|
---|
337 | complain_overflow_bitfield, /* complain_on_overflow */
|
---|
338 | bfd_elf_generic_reloc, /* special_function */
|
---|
339 | "R_CRIS_16_GOTPLT", /* name */
|
---|
340 | FALSE, /* partial_inplace */
|
---|
341 | 0, /* src_mask */
|
---|
342 | 0xffff, /* dst_mask */
|
---|
343 | FALSE), /* pcrel_offset */
|
---|
344 |
|
---|
345 | HOWTO (R_CRIS_32_GOTPLT, /* type */
|
---|
346 | 0, /* rightshift */
|
---|
347 | 2, /* size (0 = byte, 1 = short, 2 = long) */
|
---|
348 | 32, /* bitsize */
|
---|
349 | FALSE, /* pc_relative */
|
---|
350 | 0, /* bitpos */
|
---|
351 | complain_overflow_bitfield, /* complain_on_overflow */
|
---|
352 | bfd_elf_generic_reloc, /* special_function */
|
---|
353 | "R_CRIS_32_GOTPLT", /* name */
|
---|
354 | FALSE, /* partial_inplace */
|
---|
355 | 0, /* src_mask */
|
---|
356 | 0xffffffff, /* dst_mask */
|
---|
357 | FALSE), /* pcrel_offset */
|
---|
358 |
|
---|
359 | /* A 32-bit offset from GOT to (local const) symbol: no GOT entry should
|
---|
360 | be necessary. */
|
---|
361 | HOWTO (R_CRIS_32_GOTREL, /* type */
|
---|
362 | 0, /* rightshift */
|
---|
363 | 2, /* size (0 = byte, 1 = short, 2 = long) */
|
---|
364 | 32, /* bitsize */
|
---|
365 | FALSE, /* pc_relative */
|
---|
366 | 0, /* bitpos */
|
---|
367 | complain_overflow_bitfield, /* complain_on_overflow */
|
---|
368 | bfd_elf_generic_reloc, /* special_function */
|
---|
369 | "R_CRIS_32_GOTREL", /* name */
|
---|
370 | FALSE, /* partial_inplace */
|
---|
371 | 0, /* src_mask */
|
---|
372 | 0xffffffff, /* dst_mask */
|
---|
373 | FALSE), /* pcrel_offset */
|
---|
374 |
|
---|
375 | /* A 32-bit offset from GOT to entry for this symbol in PLT and request
|
---|
376 | to create PLT entry for symbol. */
|
---|
377 | HOWTO (R_CRIS_32_PLT_GOTREL, /* type */
|
---|
378 | 0, /* rightshift */
|
---|
379 | 2, /* size (0 = byte, 1 = short, 2 = long) */
|
---|
380 | 32, /* bitsize */
|
---|
381 | FALSE, /* pc_relative */
|
---|
382 | 0, /* bitpos */
|
---|
383 | complain_overflow_bitfield, /* complain_on_overflow */
|
---|
384 | bfd_elf_generic_reloc, /* special_function */
|
---|
385 | "R_CRIS_32_PLT_GOTREL", /* name */
|
---|
386 | FALSE, /* partial_inplace */
|
---|
387 | 0, /* src_mask */
|
---|
388 | 0xffffffff, /* dst_mask */
|
---|
389 | FALSE), /* pcrel_offset */
|
---|
390 |
|
---|
391 | /* A 32-bit offset from PC (location after the relocation) + addend to
|
---|
392 | entry for this symbol in PLT and request to create PLT entry for
|
---|
393 | symbol. */
|
---|
394 | HOWTO (R_CRIS_32_PLT_PCREL, /* type */
|
---|
395 | 0, /* rightshift */
|
---|
396 | 2, /* size (0 = byte, 1 = short, 2 = long) */
|
---|
397 | 32, /* bitsize */
|
---|
398 | TRUE, /* pc_relative */
|
---|
399 | 0, /* bitpos */
|
---|
400 | complain_overflow_bitfield, /* complain_on_overflow */
|
---|
401 | bfd_elf_generic_reloc, /* special_function */
|
---|
402 | "R_CRIS_32_PLT_PCREL", /* name */
|
---|
403 | FALSE, /* partial_inplace */
|
---|
404 | 0, /* src_mask */
|
---|
405 | 0xffffffff, /* dst_mask */
|
---|
406 | TRUE) /* pcrel_offset */
|
---|
407 | };
|
---|
408 | |
---|
409 |
|
---|
410 | /* Map BFD reloc types to CRIS ELF reloc types. */
|
---|
411 |
|
---|
412 | struct cris_reloc_map
|
---|
413 | {
|
---|
414 | bfd_reloc_code_real_type bfd_reloc_val;
|
---|
415 | unsigned int cris_reloc_val;
|
---|
416 | };
|
---|
417 |
|
---|
418 | static const struct cris_reloc_map cris_reloc_map [] =
|
---|
419 | {
|
---|
420 | { BFD_RELOC_NONE, R_CRIS_NONE },
|
---|
421 | { BFD_RELOC_8, R_CRIS_8 },
|
---|
422 | { BFD_RELOC_16, R_CRIS_16 },
|
---|
423 | { BFD_RELOC_32, R_CRIS_32 },
|
---|
424 | { BFD_RELOC_8_PCREL, R_CRIS_8_PCREL },
|
---|
425 | { BFD_RELOC_16_PCREL, R_CRIS_16_PCREL },
|
---|
426 | { BFD_RELOC_32_PCREL, R_CRIS_32_PCREL },
|
---|
427 | { BFD_RELOC_VTABLE_INHERIT, R_CRIS_GNU_VTINHERIT },
|
---|
428 | { BFD_RELOC_VTABLE_ENTRY, R_CRIS_GNU_VTENTRY },
|
---|
429 | { BFD_RELOC_CRIS_COPY, R_CRIS_COPY },
|
---|
430 | { BFD_RELOC_CRIS_GLOB_DAT, R_CRIS_GLOB_DAT },
|
---|
431 | { BFD_RELOC_CRIS_JUMP_SLOT, R_CRIS_JUMP_SLOT },
|
---|
432 | { BFD_RELOC_CRIS_RELATIVE, R_CRIS_RELATIVE },
|
---|
433 | { BFD_RELOC_CRIS_16_GOT, R_CRIS_16_GOT },
|
---|
434 | { BFD_RELOC_CRIS_32_GOT, R_CRIS_32_GOT },
|
---|
435 | { BFD_RELOC_CRIS_16_GOTPLT, R_CRIS_16_GOTPLT },
|
---|
436 | { BFD_RELOC_CRIS_32_GOTPLT, R_CRIS_32_GOTPLT },
|
---|
437 | { BFD_RELOC_CRIS_32_GOTREL, R_CRIS_32_GOTREL },
|
---|
438 | { BFD_RELOC_CRIS_32_PLT_GOTREL, R_CRIS_32_PLT_GOTREL },
|
---|
439 | { BFD_RELOC_CRIS_32_PLT_PCREL, R_CRIS_32_PLT_PCREL }
|
---|
440 | };
|
---|
441 |
|
---|
442 | static reloc_howto_type *
|
---|
443 | cris_reloc_type_lookup (abfd, code)
|
---|
444 | bfd * abfd ATTRIBUTE_UNUSED;
|
---|
445 | bfd_reloc_code_real_type code;
|
---|
446 | {
|
---|
447 | unsigned int i;
|
---|
448 |
|
---|
449 | for (i = 0; i < sizeof (cris_reloc_map) / sizeof (cris_reloc_map[0]); i++)
|
---|
450 | if (cris_reloc_map [i].bfd_reloc_val == code)
|
---|
451 | return & cris_elf_howto_table [cris_reloc_map[i].cris_reloc_val];
|
---|
452 |
|
---|
453 | return NULL;
|
---|
454 | }
|
---|
455 |
|
---|
456 | /* Set the howto pointer for an CRIS ELF reloc. */
|
---|
457 |
|
---|
458 | static void
|
---|
459 | cris_info_to_howto_rela (abfd, cache_ptr, dst)
|
---|
460 | bfd * abfd ATTRIBUTE_UNUSED;
|
---|
461 | arelent * cache_ptr;
|
---|
462 | Elf_Internal_Rela * dst;
|
---|
463 | {
|
---|
464 | unsigned int r_type;
|
---|
465 |
|
---|
466 | r_type = ELF32_R_TYPE (dst->r_info);
|
---|
467 | BFD_ASSERT (r_type < (unsigned int) R_CRIS_max);
|
---|
468 | cache_ptr->howto = & cris_elf_howto_table [r_type];
|
---|
469 | }
|
---|
470 | |
---|
471 |
|
---|
472 | /* Support for core dump NOTE sections. */
|
---|
473 |
|
---|
474 | static bfd_boolean
|
---|
475 | cris_elf_grok_prstatus (abfd, note)
|
---|
476 | bfd *abfd;
|
---|
477 | Elf_Internal_Note *note;
|
---|
478 | {
|
---|
479 | int offset;
|
---|
480 | size_t raw_size;
|
---|
481 |
|
---|
482 | switch (note->descsz)
|
---|
483 | {
|
---|
484 | default:
|
---|
485 | return FALSE;
|
---|
486 |
|
---|
487 | case 214: /* Linux/CRIS */
|
---|
488 | /* pr_cursig */
|
---|
489 | elf_tdata (abfd)->core_signal = bfd_get_16 (abfd, note->descdata + 12);
|
---|
490 |
|
---|
491 | /* pr_pid */
|
---|
492 | elf_tdata (abfd)->core_pid = bfd_get_32 (abfd, note->descdata + 22);
|
---|
493 |
|
---|
494 | /* pr_reg */
|
---|
495 | offset = 70;
|
---|
496 | raw_size = 140;
|
---|
497 |
|
---|
498 | break;
|
---|
499 | }
|
---|
500 |
|
---|
501 | /* Make a ".reg/999" section. */
|
---|
502 | return _bfd_elfcore_make_pseudosection (abfd, ".reg",
|
---|
503 | raw_size, note->descpos + offset);
|
---|
504 | }
|
---|
505 |
|
---|
506 | static bfd_boolean
|
---|
507 | cris_elf_grok_psinfo (abfd, note)
|
---|
508 | bfd *abfd;
|
---|
509 | Elf_Internal_Note *note;
|
---|
510 | {
|
---|
511 | switch (note->descsz)
|
---|
512 | {
|
---|
513 | default:
|
---|
514 | return FALSE;
|
---|
515 |
|
---|
516 | case 124: /* Linux/CRIS elf_prpsinfo */
|
---|
517 | elf_tdata (abfd)->core_program
|
---|
518 | = _bfd_elfcore_strndup (abfd, note->descdata + 28, 16);
|
---|
519 | elf_tdata (abfd)->core_command
|
---|
520 | = _bfd_elfcore_strndup (abfd, note->descdata + 44, 80);
|
---|
521 | }
|
---|
522 |
|
---|
523 | /* Note that for some reason, a spurious space is tacked
|
---|
524 | onto the end of the args in some (at least one anyway)
|
---|
525 | implementations, so strip it off if it exists. */
|
---|
526 |
|
---|
527 | {
|
---|
528 | char *command = elf_tdata (abfd)->core_command;
|
---|
529 | int n = strlen (command);
|
---|
530 |
|
---|
531 | if (0 < n && command[n - 1] == ' ')
|
---|
532 | command[n - 1] = '\0';
|
---|
533 | }
|
---|
534 |
|
---|
535 | return TRUE;
|
---|
536 | }
|
---|
537 | |
---|
538 |
|
---|
539 | /* The name of the dynamic interpreter. This is put in the .interp
|
---|
540 | section. */
|
---|
541 |
|
---|
542 | #define ELF_DYNAMIC_INTERPRETER "/lib/ld.so.1"
|
---|
543 |
|
---|
544 | /* The size in bytes of an entry in the procedure linkage table. */
|
---|
545 |
|
---|
546 | #define PLT_ENTRY_SIZE 20
|
---|
547 |
|
---|
548 | /* The first entry in an absolute procedure linkage table looks like this. */
|
---|
549 |
|
---|
550 | static const bfd_byte elf_cris_plt0_entry[PLT_ENTRY_SIZE] =
|
---|
551 | {
|
---|
552 | 0xfc, 0xe1,
|
---|
553 | 0x7e, 0x7e, /* push mof. */
|
---|
554 | 0x7f, 0x0d, /* (dip [pc+]) */
|
---|
555 | 0, 0, 0, 0, /* Replaced with address of .got + 4. */
|
---|
556 | 0x30, 0x7a, /* move [...],mof */
|
---|
557 | 0x7f, 0x0d, /* (dip [pc+]) */
|
---|
558 | 0, 0, 0, 0, /* Replaced with address of .got + 8. */
|
---|
559 | 0x30, 0x09, /* jump [...] */
|
---|
560 | };
|
---|
561 |
|
---|
562 | /* Subsequent entries in an absolute procedure linkage table look like
|
---|
563 | this. */
|
---|
564 |
|
---|
565 | static const bfd_byte elf_cris_plt_entry[PLT_ENTRY_SIZE] =
|
---|
566 | {
|
---|
567 | 0x7f, 0x0d, /* (dip [pc+]) */
|
---|
568 | 0, 0, 0, 0, /* Replaced with address of this symbol in .got. */
|
---|
569 | 0x30, 0x09, /* jump [...] */
|
---|
570 | 0x3f, 0x7e, /* move [pc+],mof */
|
---|
571 | 0, 0, 0, 0, /* Replaced with offset into relocation table. */
|
---|
572 | 0x2f, 0xfe, /* add.d [pc+],pc */
|
---|
573 | 0xec, 0xff,
|
---|
574 | 0xff, 0xff /* Replaced with offset to start of .plt. */
|
---|
575 | };
|
---|
576 |
|
---|
577 | /* The first entry in a PIC procedure linkage table looks like this. */
|
---|
578 |
|
---|
579 | static const bfd_byte elf_cris_pic_plt0_entry[PLT_ENTRY_SIZE] =
|
---|
580 | {
|
---|
581 | 0xfc, 0xe1, 0x7e, 0x7e, /* push mof */
|
---|
582 | 0x04, 0x01, 0x30, 0x7a, /* move [r0+4],mof */
|
---|
583 | 0x08, 0x01, 0x30, 0x09, /* jump [r0+8] */
|
---|
584 | 0, 0, 0, 0, 0, 0, 0, 0, /* Pad out to 20 bytes. */
|
---|
585 | };
|
---|
586 |
|
---|
587 | /* Subsequent entries in a PIC procedure linkage table look like this. */
|
---|
588 |
|
---|
589 | static const bfd_byte elf_cris_pic_plt_entry[PLT_ENTRY_SIZE] =
|
---|
590 | {
|
---|
591 | 0x6f, 0x0d, /* (bdap [pc+].d,r0) */
|
---|
592 | 0, 0, 0, 0, /* Replaced with offset of this symbol in .got. */
|
---|
593 | 0x30, 0x09, /* jump [...] */
|
---|
594 | 0x3f, 0x7e, /* move [pc+],mof */
|
---|
595 | 0, 0, 0, 0, /* Replaced with offset into relocation table. */
|
---|
596 | 0x2f, 0xfe, /* add.d [pc+],pc */
|
---|
597 | 0xec, 0xff, /* Replaced with offset to start of .plt. */
|
---|
598 | 0xff, 0xff
|
---|
599 | };
|
---|
600 | |
---|
601 |
|
---|
602 | /* We copy elf32-m68k.c and elf32-i386.c for the basic linker hash bits
|
---|
603 | (and most other PIC/shlib stuff). Check that we don't drift away
|
---|
604 | without reason.
|
---|
605 |
|
---|
606 | The CRIS linker, like the m68k and i386 linkers (and probably the rest
|
---|
607 | too) needs to keep track of the number of relocs that it decides to
|
---|
608 | copy in check_relocs for each symbol. This is so that it can discard
|
---|
609 | PC relative relocs if it doesn't need them when linking with
|
---|
610 | -Bsymbolic. We store the information in a field extending the regular
|
---|
611 | ELF linker hash table. */
|
---|
612 |
|
---|
613 | /* This structure keeps track of the number of PC relative relocs we have
|
---|
614 | copied for a given symbol. */
|
---|
615 |
|
---|
616 | struct elf_cris_pcrel_relocs_copied
|
---|
617 | {
|
---|
618 | /* Next section. */
|
---|
619 | struct elf_cris_pcrel_relocs_copied *next;
|
---|
620 | /* A section in dynobj. */
|
---|
621 | asection *section;
|
---|
622 | /* Number of relocs copied in this section. */
|
---|
623 | bfd_size_type count;
|
---|
624 | };
|
---|
625 |
|
---|
626 | /* CRIS ELF linker hash entry. */
|
---|
627 |
|
---|
628 | struct elf_cris_link_hash_entry
|
---|
629 | {
|
---|
630 | struct elf_link_hash_entry root;
|
---|
631 |
|
---|
632 | /* Number of PC relative relocs copied for this symbol. */
|
---|
633 | struct elf_cris_pcrel_relocs_copied *pcrel_relocs_copied;
|
---|
634 |
|
---|
635 | /* The GOTPLT references are CRIS-specific; the goal is to avoid having
|
---|
636 | both a general GOT and a PLT-specific GOT entry for the same symbol,
|
---|
637 | when it is referenced both as a function and as a function pointer.
|
---|
638 |
|
---|
639 | Number of GOTPLT references for a function. */
|
---|
640 | bfd_signed_vma gotplt_refcount;
|
---|
641 |
|
---|
642 | /* Actual GOTPLT index for this symbol, if applicable, or zero if not
|
---|
643 | (zero is never used as an index). FIXME: We should be able to fold
|
---|
644 | this with gotplt_refcount in a union, like the got and plt unions in
|
---|
645 | elf_link_hash_entry. */
|
---|
646 | bfd_size_type gotplt_offset;
|
---|
647 | };
|
---|
648 |
|
---|
649 | /* CRIS ELF linker hash table. */
|
---|
650 |
|
---|
651 | struct elf_cris_link_hash_table
|
---|
652 | {
|
---|
653 | struct elf_link_hash_table root;
|
---|
654 |
|
---|
655 | /* We can't use the PLT offset and calculate to get the GOTPLT offset,
|
---|
656 | since we try and avoid creating GOTPLT:s when there's already a GOT.
|
---|
657 | Instead, we keep and update the next available index here. */
|
---|
658 | bfd_size_type next_gotplt_entry;
|
---|
659 | };
|
---|
660 |
|
---|
661 | /* Traverse a CRIS ELF linker hash table. */
|
---|
662 |
|
---|
663 | #define elf_cris_link_hash_traverse(table, func, info) \
|
---|
664 | (elf_link_hash_traverse \
|
---|
665 | (&(table)->root, \
|
---|
666 | (bfd_boolean (*) PARAMS ((struct elf_link_hash_entry *, PTR))) (func), \
|
---|
667 | (info)))
|
---|
668 |
|
---|
669 | /* Get the CRIS ELF linker hash table from a link_info structure. */
|
---|
670 |
|
---|
671 | #define elf_cris_hash_table(p) \
|
---|
672 | ((struct elf_cris_link_hash_table *) (p)->hash)
|
---|
673 |
|
---|
674 | /* Create an entry in a CRIS ELF linker hash table. */
|
---|
675 |
|
---|
676 | static struct bfd_hash_entry *
|
---|
677 | elf_cris_link_hash_newfunc (entry, table, string)
|
---|
678 | struct bfd_hash_entry *entry;
|
---|
679 | struct bfd_hash_table *table;
|
---|
680 | const char *string;
|
---|
681 | {
|
---|
682 | struct elf_cris_link_hash_entry *ret =
|
---|
683 | (struct elf_cris_link_hash_entry *) entry;
|
---|
684 |
|
---|
685 | /* Allocate the structure if it has not already been allocated by a
|
---|
686 | subclass. */
|
---|
687 | if (ret == (struct elf_cris_link_hash_entry *) NULL)
|
---|
688 | ret = ((struct elf_cris_link_hash_entry *)
|
---|
689 | bfd_hash_allocate (table,
|
---|
690 | sizeof (struct elf_cris_link_hash_entry)));
|
---|
691 | if (ret == (struct elf_cris_link_hash_entry *) NULL)
|
---|
692 | return (struct bfd_hash_entry *) ret;
|
---|
693 |
|
---|
694 | /* Call the allocation method of the superclass. */
|
---|
695 | ret = ((struct elf_cris_link_hash_entry *)
|
---|
696 | _bfd_elf_link_hash_newfunc ((struct bfd_hash_entry *) ret,
|
---|
697 | table, string));
|
---|
698 | if (ret != (struct elf_cris_link_hash_entry *) NULL)
|
---|
699 | {
|
---|
700 | ret->pcrel_relocs_copied = NULL;
|
---|
701 | ret->gotplt_refcount = 0;
|
---|
702 | ret->gotplt_offset = 0;
|
---|
703 | }
|
---|
704 |
|
---|
705 | return (struct bfd_hash_entry *) ret;
|
---|
706 | }
|
---|
707 |
|
---|
708 | /* Create a CRIS ELF linker hash table. */
|
---|
709 |
|
---|
710 | static struct bfd_link_hash_table *
|
---|
711 | elf_cris_link_hash_table_create (abfd)
|
---|
712 | bfd *abfd;
|
---|
713 | {
|
---|
714 | struct elf_cris_link_hash_table *ret;
|
---|
715 | bfd_size_type amt = sizeof (struct elf_cris_link_hash_table);
|
---|
716 |
|
---|
717 | ret = ((struct elf_cris_link_hash_table *) bfd_malloc (amt));
|
---|
718 | if (ret == (struct elf_cris_link_hash_table *) NULL)
|
---|
719 | return NULL;
|
---|
720 |
|
---|
721 | if (! _bfd_elf_link_hash_table_init (&ret->root, abfd,
|
---|
722 | elf_cris_link_hash_newfunc))
|
---|
723 | {
|
---|
724 | free (ret);
|
---|
725 | return NULL;
|
---|
726 | }
|
---|
727 |
|
---|
728 | /* Initialize to skip over the first three entries in the gotplt; they
|
---|
729 | are used for run-time symbol evaluation. */
|
---|
730 | ret->next_gotplt_entry = 12;
|
---|
731 |
|
---|
732 | return &ret->root.root;
|
---|
733 | }
|
---|
734 | |
---|
735 |
|
---|
736 | /* Perform a single relocation. By default we use the standard BFD
|
---|
737 | routines, with a few tweaks. */
|
---|
738 |
|
---|
739 | static bfd_reloc_status_type
|
---|
740 | cris_final_link_relocate (howto, input_bfd, input_section, contents, rel,
|
---|
741 | relocation)
|
---|
742 | reloc_howto_type * howto;
|
---|
743 | bfd * input_bfd;
|
---|
744 | asection * input_section;
|
---|
745 | bfd_byte * contents;
|
---|
746 | Elf_Internal_Rela * rel;
|
---|
747 | bfd_vma relocation;
|
---|
748 | {
|
---|
749 | bfd_reloc_status_type r;
|
---|
750 |
|
---|
751 | /* PC-relative relocations are relative to the position *after*
|
---|
752 | the reloc. Note that for R_CRIS_8_PCREL the adjustment is
|
---|
753 | not a single byte, since PC must be 16-bit-aligned. */
|
---|
754 | switch (ELF32_R_TYPE (rel->r_info))
|
---|
755 | {
|
---|
756 | /* Check that the 16-bit GOT relocs are positive. */
|
---|
757 | case R_CRIS_16_GOTPLT:
|
---|
758 | case R_CRIS_16_GOT:
|
---|
759 | if ((bfd_signed_vma) relocation < 0)
|
---|
760 | return bfd_reloc_overflow;
|
---|
761 | break;
|
---|
762 |
|
---|
763 | case R_CRIS_32_PLT_PCREL:
|
---|
764 | case R_CRIS_32_PCREL:
|
---|
765 | relocation -= 2;
|
---|
766 | /* Fall through. */
|
---|
767 | case R_CRIS_8_PCREL:
|
---|
768 | case R_CRIS_16_PCREL:
|
---|
769 | relocation -= 2;
|
---|
770 | break;
|
---|
771 |
|
---|
772 | default:
|
---|
773 | break;
|
---|
774 | }
|
---|
775 |
|
---|
776 | r = _bfd_final_link_relocate (howto, input_bfd, input_section,
|
---|
777 | contents, rel->r_offset,
|
---|
778 | relocation, rel->r_addend);
|
---|
779 | return r;
|
---|
780 | }
|
---|
781 | |
---|
782 |
|
---|
783 | /* Relocate an CRIS ELF section. See elf32-fr30.c, from where this was
|
---|
784 | copied, for further comments. */
|
---|
785 |
|
---|
786 | static bfd_boolean
|
---|
787 | cris_elf_relocate_section (output_bfd, info, input_bfd, input_section,
|
---|
788 | contents, relocs, local_syms, local_sections)
|
---|
789 | bfd *output_bfd ATTRIBUTE_UNUSED;
|
---|
790 | struct bfd_link_info *info;
|
---|
791 | bfd *input_bfd;
|
---|
792 | asection *input_section;
|
---|
793 | bfd_byte *contents;
|
---|
794 | Elf_Internal_Rela *relocs;
|
---|
795 | Elf_Internal_Sym *local_syms;
|
---|
796 | asection **local_sections;
|
---|
797 | {
|
---|
798 | bfd *dynobj;
|
---|
799 | Elf_Internal_Shdr *symtab_hdr;
|
---|
800 | struct elf_link_hash_entry **sym_hashes;
|
---|
801 | bfd_vma *local_got_offsets;
|
---|
802 | asection *sgot;
|
---|
803 | asection *splt;
|
---|
804 | asection *sreloc;
|
---|
805 | Elf_Internal_Rela *rel;
|
---|
806 | Elf_Internal_Rela *relend;
|
---|
807 |
|
---|
808 | if (info->relocateable)
|
---|
809 | return TRUE;
|
---|
810 |
|
---|
811 | dynobj = elf_hash_table (info)->dynobj;
|
---|
812 | local_got_offsets = elf_local_got_offsets (input_bfd);
|
---|
813 | symtab_hdr = & elf_tdata (input_bfd)->symtab_hdr;
|
---|
814 | sym_hashes = elf_sym_hashes (input_bfd);
|
---|
815 | relend = relocs + input_section->reloc_count;
|
---|
816 |
|
---|
817 | sgot = NULL;
|
---|
818 | splt = NULL;
|
---|
819 | sreloc = NULL;
|
---|
820 |
|
---|
821 | if (dynobj != NULL)
|
---|
822 | {
|
---|
823 | splt = bfd_get_section_by_name (dynobj, ".plt");
|
---|
824 | sgot = bfd_get_section_by_name (dynobj, ".got");
|
---|
825 | }
|
---|
826 |
|
---|
827 | for (rel = relocs; rel < relend; rel ++)
|
---|
828 | {
|
---|
829 | reloc_howto_type *howto;
|
---|
830 | unsigned long r_symndx;
|
---|
831 | Elf_Internal_Sym *sym;
|
---|
832 | asection *sec;
|
---|
833 | struct elf_link_hash_entry *h;
|
---|
834 | bfd_vma relocation;
|
---|
835 | bfd_reloc_status_type r;
|
---|
836 | const char *symname = NULL;
|
---|
837 | int r_type;
|
---|
838 |
|
---|
839 | r_type = ELF32_R_TYPE (rel->r_info);
|
---|
840 |
|
---|
841 | if ( r_type == R_CRIS_GNU_VTINHERIT
|
---|
842 | || r_type == R_CRIS_GNU_VTENTRY)
|
---|
843 | continue;
|
---|
844 |
|
---|
845 | /* This is a final link. */
|
---|
846 | r_symndx = ELF32_R_SYM (rel->r_info);
|
---|
847 | howto = cris_elf_howto_table + r_type;
|
---|
848 | h = NULL;
|
---|
849 | sym = NULL;
|
---|
850 | sec = NULL;
|
---|
851 |
|
---|
852 | if (r_symndx < symtab_hdr->sh_info)
|
---|
853 | {
|
---|
854 | sym = local_syms + r_symndx;
|
---|
855 | sec = local_sections [r_symndx];
|
---|
856 | relocation = _bfd_elf_rela_local_sym (output_bfd, sym, sec, rel);
|
---|
857 |
|
---|
858 | symname = (bfd_elf_string_from_elf_section
|
---|
859 | (input_bfd, symtab_hdr->sh_link, sym->st_name));
|
---|
860 | if (symname == NULL)
|
---|
861 | symname = bfd_section_name (input_bfd, sec);
|
---|
862 | }
|
---|
863 | else
|
---|
864 | {
|
---|
865 | /* It seems this can happen with erroneous or unsupported input
|
---|
866 | (mixing a.out and elf in an archive, for example.) */
|
---|
867 | if (sym_hashes == NULL)
|
---|
868 | return FALSE;
|
---|
869 |
|
---|
870 | h = sym_hashes [r_symndx - symtab_hdr->sh_info];
|
---|
871 |
|
---|
872 | while (h->root.type == bfd_link_hash_indirect
|
---|
873 | || h->root.type == bfd_link_hash_warning)
|
---|
874 | h = (struct elf_link_hash_entry *) h->root.u.i.link;
|
---|
875 |
|
---|
876 | symname = h->root.root.string;
|
---|
877 |
|
---|
878 | if (h->root.type == bfd_link_hash_defined
|
---|
879 | || h->root.type == bfd_link_hash_defweak)
|
---|
880 | {
|
---|
881 | sec = h->root.u.def.section;
|
---|
882 |
|
---|
883 | /* Perhaps we should detect the cases that
|
---|
884 | sec->output_section is expected to be NULL like i386 and
|
---|
885 | m68k, but apparently (and according to elfxx-ia64.c) all
|
---|
886 | valid cases are where the symbol is defined in a shared
|
---|
887 | object which we link dynamically against. This includes
|
---|
888 | PLT relocs for which we've created a PLT entry and other
|
---|
889 | relocs for which we're prepared to create dynamic
|
---|
890 | relocations.
|
---|
891 |
|
---|
892 | For now, new situations cause us to just err when
|
---|
893 | sec->output_offset is NULL but the object with the symbol
|
---|
894 | is *not* dynamically linked against. Thus this will
|
---|
895 | automatically remind us so we can see if there are other
|
---|
896 | valid cases we need to revisit. */
|
---|
897 | if ((sec->output_section == NULL
|
---|
898 | && (sec->owner->flags & DYNAMIC) != 0)
|
---|
899 |
|
---|
900 | /* Here follow the cases where the relocation value must
|
---|
901 | be zero (or when further handling is simplified when
|
---|
902 | zero). I can't claim to understand the various
|
---|
903 | conditions and they weren't described in the files
|
---|
904 | where I copied them from (elf32-m68k.c and
|
---|
905 | elf32-i386.c), but let's mention examples of where
|
---|
906 | they happen. FIXME: Perhaps define and use a
|
---|
907 | dynamic_symbol_p function like ia64.
|
---|
908 |
|
---|
909 | - When creating a shared library, we can have an
|
---|
910 | ordinary relocation for a symbol defined in a shared
|
---|
911 | library (perhaps the one we create). We then make
|
---|
912 | the relocation value zero, as the value seen now will
|
---|
913 | be added into the relocation addend in this shared
|
---|
914 | library, but must be handled only at dynamic-link
|
---|
915 | time. FIXME: Not sure this example covers the
|
---|
916 | h->elf_link_hash_flags test, though it's there in
|
---|
917 | other targets. */
|
---|
918 | || (info->shared
|
---|
919 | && ((! info->symbolic && h->dynindx != -1)
|
---|
920 | || (h->elf_link_hash_flags
|
---|
921 | & ELF_LINK_HASH_DEF_REGULAR) == 0)
|
---|
922 | && (input_section->flags & SEC_ALLOC) != 0
|
---|
923 | && (r_type == R_CRIS_8
|
---|
924 | || r_type == R_CRIS_16
|
---|
925 | || r_type == R_CRIS_32
|
---|
926 | || r_type == R_CRIS_8_PCREL
|
---|
927 | || r_type == R_CRIS_16_PCREL
|
---|
928 | || r_type == R_CRIS_32_PCREL)))
|
---|
929 | relocation = 0;
|
---|
930 | else if (sec->output_section != NULL)
|
---|
931 | relocation = (h->root.u.def.value
|
---|
932 | + sec->output_section->vma
|
---|
933 | + sec->output_offset);
|
---|
934 | else
|
---|
935 | {
|
---|
936 | (*_bfd_error_handler)
|
---|
937 | (_("%s: unresolvable relocation %s against symbol `%s' from %s section"),
|
---|
938 | bfd_archive_filename (input_bfd),
|
---|
939 | cris_elf_howto_table[r_type].name,
|
---|
940 | symname,
|
---|
941 | bfd_get_section_name (input_bfd, input_section));
|
---|
942 | bfd_set_error (bfd_error_bad_value);
|
---|
943 | return FALSE;
|
---|
944 | }
|
---|
945 | }
|
---|
946 | else if (h->root.type == bfd_link_hash_undefweak)
|
---|
947 | relocation = 0;
|
---|
948 | else if (info->shared
|
---|
949 | && !info->no_undefined
|
---|
950 | && ELF_ST_VISIBILITY (h->other) == STV_DEFAULT)
|
---|
951 | relocation = 0;
|
---|
952 | else
|
---|
953 | {
|
---|
954 | if (!(info->callbacks->undefined_symbol
|
---|
955 | (info, symname, input_bfd,
|
---|
956 | input_section, rel->r_offset,
|
---|
957 | (!info->shared || info->no_undefined
|
---|
958 | || ELF_ST_VISIBILITY (h->other)))))
|
---|
959 | return FALSE;
|
---|
960 | relocation = 0;
|
---|
961 | }
|
---|
962 | }
|
---|
963 |
|
---|
964 | switch (r_type)
|
---|
965 | {
|
---|
966 | case R_CRIS_16_GOTPLT:
|
---|
967 | case R_CRIS_32_GOTPLT:
|
---|
968 | /* This is like the case for R_CRIS_32_GOT and R_CRIS_16_GOT,
|
---|
969 | but we require a PLT, and the PLT handling will take care of
|
---|
970 | filling in the PLT-specific GOT entry. For the GOT offset,
|
---|
971 | calculate it as we do when filling it in for the .got.plt
|
---|
972 | section. If we don't have a PLT, punt to GOT handling. */
|
---|
973 | if (h != NULL
|
---|
974 | && ((struct elf_cris_link_hash_entry *) h)->gotplt_offset != 0)
|
---|
975 | {
|
---|
976 | asection *sgotplt
|
---|
977 | = bfd_get_section_by_name (dynobj, ".got.plt");
|
---|
978 | bfd_vma got_offset;
|
---|
979 |
|
---|
980 | BFD_ASSERT (h->dynindx != -1);
|
---|
981 | BFD_ASSERT (sgotplt != NULL);
|
---|
982 |
|
---|
983 | got_offset
|
---|
984 | = ((struct elf_cris_link_hash_entry *) h)->gotplt_offset;
|
---|
985 |
|
---|
986 | relocation = got_offset;
|
---|
987 | break;
|
---|
988 | }
|
---|
989 |
|
---|
990 | /* We didn't make a PLT entry for this symbol. Maybe everything is
|
---|
991 | folded into the GOT. Other than folding, this happens when
|
---|
992 | statically linking PIC code, or when using -Bsymbolic. Check
|
---|
993 | that we instead have a GOT entry as done for us by
|
---|
994 | elf_cris_adjust_dynamic_symbol, and drop through into the
|
---|
995 | ordinary GOT cases. */
|
---|
996 | if (h != NULL && h->got.offset == (bfd_vma) -1)
|
---|
997 | {
|
---|
998 | (*_bfd_error_handler)
|
---|
999 | (_("%s: No PLT nor GOT for relocation %s against symbol `%s' from %s section"),
|
---|
1000 | bfd_archive_filename (input_bfd),
|
---|
1001 | cris_elf_howto_table[r_type].name,
|
---|
1002 | symname[0] != '\0' ? symname : _("[whose name is lost]"),
|
---|
1003 | bfd_get_section_name (input_bfd, input_section));
|
---|
1004 |
|
---|
1005 | /* FIXME: Perhaps blaming input is not the right thing to
|
---|
1006 | do; this is probably an internal error. But it is true
|
---|
1007 | that we didn't like that particular input. */
|
---|
1008 | bfd_set_error (bfd_error_bad_value);
|
---|
1009 | return FALSE;
|
---|
1010 | }
|
---|
1011 | /* Fall through. */
|
---|
1012 |
|
---|
1013 | /* The size of the actual relocation is not used here; we only
|
---|
1014 | fill in the GOT table here. */
|
---|
1015 | case R_CRIS_16_GOT:
|
---|
1016 | case R_CRIS_32_GOT:
|
---|
1017 | {
|
---|
1018 | bfd_vma off;
|
---|
1019 |
|
---|
1020 | /* Note that despite using RELA relocations, the .got contents
|
---|
1021 | is always filled in with the link-relative relocation
|
---|
1022 | value; the addend. */
|
---|
1023 |
|
---|
1024 | if (h != NULL)
|
---|
1025 | {
|
---|
1026 | off = h->got.offset;
|
---|
1027 | BFD_ASSERT (off != (bfd_vma) -1);
|
---|
1028 |
|
---|
1029 | if (!elf_hash_table (info)->dynamic_sections_created
|
---|
1030 | || (! info->shared
|
---|
1031 | && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR))
|
---|
1032 | || (info->shared
|
---|
1033 | && (info->symbolic || h->dynindx == -1)
|
---|
1034 | && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR)))
|
---|
1035 | {
|
---|
1036 | /* This wasn't checked above for ! info->shared, but
|
---|
1037 | must hold there if we get here; the symbol must be
|
---|
1038 | defined in the regular program, or be undefweak. */
|
---|
1039 | BFD_ASSERT (!elf_hash_table (info)->dynamic_sections_created
|
---|
1040 | || info->shared
|
---|
1041 | || (h->elf_link_hash_flags
|
---|
1042 | & ELF_LINK_HASH_DEF_REGULAR) != 0
|
---|
1043 | || h->root.type == bfd_link_hash_undefweak);
|
---|
1044 |
|
---|
1045 | /* This is actually a static link, or it is a
|
---|
1046 | -Bsymbolic link and the symbol is defined locally,
|
---|
1047 | or is undefweak, or the symbol was forced to be
|
---|
1048 | local because of a version file, or we're not
|
---|
1049 | creating a dynamic object. We must initialize this
|
---|
1050 | entry in the global offset table. Since the offset
|
---|
1051 | must always be a multiple of 4, we use the least
|
---|
1052 | significant bit to record whether we have
|
---|
1053 | initialized it already.
|
---|
1054 |
|
---|
1055 | If this GOT entry should be runtime-initialized, we
|
---|
1056 | will create a .rela.got relocation entry to
|
---|
1057 | initialize the value. This is done in the
|
---|
1058 | finish_dynamic_symbol routine. */
|
---|
1059 | if ((off & 1) != 0)
|
---|
1060 | off &= ~1;
|
---|
1061 | else
|
---|
1062 | {
|
---|
1063 | bfd_put_32 (output_bfd, relocation,
|
---|
1064 | sgot->contents + off);
|
---|
1065 | h->got.offset |= 1;
|
---|
1066 | }
|
---|
1067 | }
|
---|
1068 | }
|
---|
1069 | else
|
---|
1070 | {
|
---|
1071 | BFD_ASSERT (local_got_offsets != NULL
|
---|
1072 | && local_got_offsets[r_symndx] != (bfd_vma) -1);
|
---|
1073 |
|
---|
1074 | off = local_got_offsets[r_symndx];
|
---|
1075 |
|
---|
1076 | /* The offset must always be a multiple of 4. We use
|
---|
1077 | the least significant bit to record whether we have
|
---|
1078 | already generated the necessary reloc. */
|
---|
1079 | if ((off & 1) != 0)
|
---|
1080 | off &= ~1;
|
---|
1081 | else
|
---|
1082 | {
|
---|
1083 | bfd_put_32 (output_bfd, relocation, sgot->contents + off);
|
---|
1084 |
|
---|
1085 | if (info->shared)
|
---|
1086 | {
|
---|
1087 | asection *s;
|
---|
1088 | Elf_Internal_Rela outrel;
|
---|
1089 | bfd_byte *loc;
|
---|
1090 |
|
---|
1091 | s = bfd_get_section_by_name (dynobj, ".rela.got");
|
---|
1092 | BFD_ASSERT (s != NULL);
|
---|
1093 |
|
---|
1094 | outrel.r_offset = (sgot->output_section->vma
|
---|
1095 | + sgot->output_offset
|
---|
1096 | + off);
|
---|
1097 | outrel.r_info = ELF32_R_INFO (0, R_CRIS_RELATIVE);
|
---|
1098 | outrel.r_addend = relocation;
|
---|
1099 | loc = s->contents;
|
---|
1100 | loc += s->reloc_count++ * sizeof (Elf32_External_Rela);
|
---|
1101 | bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
|
---|
1102 | }
|
---|
1103 |
|
---|
1104 | local_got_offsets[r_symndx] |= 1;
|
---|
1105 | }
|
---|
1106 | }
|
---|
1107 |
|
---|
1108 | relocation = sgot->output_offset + off;
|
---|
1109 | if (rel->r_addend != 0)
|
---|
1110 | {
|
---|
1111 | /* We can't do anything for a relocation which is against
|
---|
1112 | a symbol *plus offset*. GOT holds relocations for
|
---|
1113 | symbols. Make this an error; the compiler isn't
|
---|
1114 | allowed to pass us these kinds of things. */
|
---|
1115 | if (h == NULL)
|
---|
1116 | (*_bfd_error_handler)
|
---|
1117 | (_("%s: relocation %s with non-zero addend %d against local symbol from %s section"),
|
---|
1118 | bfd_archive_filename (input_bfd),
|
---|
1119 | cris_elf_howto_table[r_type].name,
|
---|
1120 | rel->r_addend,
|
---|
1121 | bfd_get_section_name (input_bfd, input_section));
|
---|
1122 | else
|
---|
1123 | (*_bfd_error_handler)
|
---|
1124 | (_("%s: relocation %s with non-zero addend %d against symbol `%s' from %s section"),
|
---|
1125 | bfd_archive_filename (input_bfd),
|
---|
1126 | cris_elf_howto_table[r_type].name,
|
---|
1127 | rel->r_addend,
|
---|
1128 | symname[0] != '\0' ? symname : _("[whose name is lost]"),
|
---|
1129 | bfd_get_section_name (input_bfd, input_section));
|
---|
1130 |
|
---|
1131 | bfd_set_error (bfd_error_bad_value);
|
---|
1132 | return FALSE;
|
---|
1133 | }
|
---|
1134 | }
|
---|
1135 | break;
|
---|
1136 |
|
---|
1137 | case R_CRIS_32_GOTREL:
|
---|
1138 | /* This relocation must only be performed against local symbols. */
|
---|
1139 | if (h != NULL && ELF_ST_VISIBILITY (h->other) == STV_DEFAULT)
|
---|
1140 | {
|
---|
1141 | (*_bfd_error_handler)
|
---|
1142 | (_("%s: relocation %s is not allowed for global symbol: `%s' from %s section"),
|
---|
1143 | bfd_archive_filename (input_bfd),
|
---|
1144 | cris_elf_howto_table[r_type].name,
|
---|
1145 | symname,
|
---|
1146 | bfd_get_section_name (input_bfd, input_section));
|
---|
1147 | bfd_set_error (bfd_error_bad_value);
|
---|
1148 | return FALSE;
|
---|
1149 | }
|
---|
1150 |
|
---|
1151 | /* This can happen if we get a link error with the input ELF
|
---|
1152 | variant mismatching the output variant. Emit an error so
|
---|
1153 | it's noticed if it happens elsewhere. */
|
---|
1154 | if (sgot == NULL)
|
---|
1155 | {
|
---|
1156 | (*_bfd_error_handler)
|
---|
1157 | (_("%s: relocation %s in section %s with no GOT created"),
|
---|
1158 | bfd_archive_filename (input_bfd),
|
---|
1159 | cris_elf_howto_table[r_type].name,
|
---|
1160 | bfd_get_section_name (input_bfd, input_section));
|
---|
1161 | bfd_set_error (bfd_error_bad_value);
|
---|
1162 | return FALSE;
|
---|
1163 | }
|
---|
1164 |
|
---|
1165 | /* This relocation is like a PC-relative one, except the
|
---|
1166 | reference point is the location of GOT. Note that
|
---|
1167 | sgot->output_offset is not involved in this calculation. We
|
---|
1168 | always want the start of entire .got section, not the
|
---|
1169 | position after the reserved header. */
|
---|
1170 | relocation -= sgot->output_section->vma;
|
---|
1171 | break;
|
---|
1172 |
|
---|
1173 | case R_CRIS_32_PLT_PCREL:
|
---|
1174 | /* Relocation is to the entry for this symbol in the
|
---|
1175 | procedure linkage table. */
|
---|
1176 |
|
---|
1177 | /* Resolve a PLT_PCREL reloc against a local symbol directly,
|
---|
1178 | without using the procedure linkage table. */
|
---|
1179 | if (h == NULL || ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
|
---|
1180 | break;
|
---|
1181 |
|
---|
1182 | if (h->plt.offset == (bfd_vma) -1
|
---|
1183 | || splt == NULL)
|
---|
1184 | {
|
---|
1185 | /* We didn't make a PLT entry for this symbol. This
|
---|
1186 | happens when statically linking PIC code, or when
|
---|
1187 | using -Bsymbolic. */
|
---|
1188 | break;
|
---|
1189 | }
|
---|
1190 |
|
---|
1191 | relocation = (splt->output_section->vma
|
---|
1192 | + splt->output_offset
|
---|
1193 | + h->plt.offset);
|
---|
1194 | break;
|
---|
1195 |
|
---|
1196 | case R_CRIS_32_PLT_GOTREL:
|
---|
1197 | /* Like R_CRIS_32_PLT_PCREL, but the reference point is the
|
---|
1198 | start of the .got section. See also comment at
|
---|
1199 | R_CRIS_32_GOT. */
|
---|
1200 | relocation -= sgot->output_section->vma;
|
---|
1201 |
|
---|
1202 | /* Resolve a PLT_GOTREL reloc against a local symbol directly,
|
---|
1203 | without using the procedure linkage table. */
|
---|
1204 | if (h == NULL || ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
|
---|
1205 | break;
|
---|
1206 |
|
---|
1207 | if (h->plt.offset == (bfd_vma) -1
|
---|
1208 | || splt == NULL)
|
---|
1209 | {
|
---|
1210 | /* We didn't make a PLT entry for this symbol. This
|
---|
1211 | happens when statically linking PIC code, or when
|
---|
1212 | using -Bsymbolic. */
|
---|
1213 | break;
|
---|
1214 | }
|
---|
1215 |
|
---|
1216 | relocation = (splt->output_section->vma
|
---|
1217 | + splt->output_offset
|
---|
1218 | + h->plt.offset
|
---|
1219 | - sgot->output_section->vma);
|
---|
1220 | break;
|
---|
1221 |
|
---|
1222 | case R_CRIS_8_PCREL:
|
---|
1223 | case R_CRIS_16_PCREL:
|
---|
1224 | case R_CRIS_32_PCREL:
|
---|
1225 | /* If the symbol was local, we need no shlib-specific handling. */
|
---|
1226 | if (h == NULL || ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
|
---|
1227 | break;
|
---|
1228 |
|
---|
1229 | /* Fall through. */
|
---|
1230 | case R_CRIS_8:
|
---|
1231 | case R_CRIS_16:
|
---|
1232 | case R_CRIS_32:
|
---|
1233 | if (info->shared
|
---|
1234 | && r_symndx != 0
|
---|
1235 | && (input_section->flags & SEC_ALLOC) != 0
|
---|
1236 | && ((r_type != R_CRIS_8_PCREL
|
---|
1237 | && r_type != R_CRIS_16_PCREL
|
---|
1238 | && r_type != R_CRIS_32_PCREL)
|
---|
1239 | || (!info->symbolic
|
---|
1240 | || (h->elf_link_hash_flags
|
---|
1241 | & ELF_LINK_HASH_DEF_REGULAR) == 0)))
|
---|
1242 | {
|
---|
1243 | Elf_Internal_Rela outrel;
|
---|
1244 | bfd_byte *loc;
|
---|
1245 | bfd_boolean skip, relocate;
|
---|
1246 |
|
---|
1247 | /* When generating a shared object, these relocations
|
---|
1248 | are copied into the output file to be resolved at run
|
---|
1249 | time. */
|
---|
1250 |
|
---|
1251 | if (sreloc == NULL)
|
---|
1252 | {
|
---|
1253 | const char *name;
|
---|
1254 |
|
---|
1255 | name = (bfd_elf_string_from_elf_section
|
---|
1256 | (input_bfd,
|
---|
1257 | elf_elfheader (input_bfd)->e_shstrndx,
|
---|
1258 | elf_section_data (input_section)->rel_hdr.sh_name));
|
---|
1259 | if (name == NULL)
|
---|
1260 | return FALSE;
|
---|
1261 |
|
---|
1262 | BFD_ASSERT (strncmp (name, ".rela", 5) == 0
|
---|
1263 | && strcmp (bfd_get_section_name (input_bfd,
|
---|
1264 | input_section),
|
---|
1265 | name + 5) == 0);
|
---|
1266 |
|
---|
1267 | sreloc = bfd_get_section_by_name (dynobj, name);
|
---|
1268 |
|
---|
1269 | /* That section should have been created in
|
---|
1270 | cris_elf_check_relocs, but that function will not be
|
---|
1271 | called for objects which fail in
|
---|
1272 | cris_elf_merge_private_bfd_data. */
|
---|
1273 | if (sreloc == NULL)
|
---|
1274 | {
|
---|
1275 | (*_bfd_error_handler)
|
---|
1276 | (_("%s: Internal inconsistency; no relocation section %s"),
|
---|
1277 | bfd_archive_filename (input_bfd),
|
---|
1278 | name);
|
---|
1279 |
|
---|
1280 | bfd_set_error (bfd_error_bad_value);
|
---|
1281 | return FALSE;
|
---|
1282 | }
|
---|
1283 | }
|
---|
1284 |
|
---|
1285 | skip = FALSE;
|
---|
1286 | relocate = FALSE;
|
---|
1287 |
|
---|
1288 | outrel.r_offset =
|
---|
1289 | _bfd_elf_section_offset (output_bfd, info, input_section,
|
---|
1290 | rel->r_offset);
|
---|
1291 | if (outrel.r_offset == (bfd_vma) -1)
|
---|
1292 | skip = TRUE;
|
---|
1293 | else if (outrel.r_offset == (bfd_vma) -2)
|
---|
1294 | skip = TRUE, relocate = TRUE;
|
---|
1295 | outrel.r_offset += (input_section->output_section->vma
|
---|
1296 | + input_section->output_offset);
|
---|
1297 |
|
---|
1298 | if (skip)
|
---|
1299 | memset (&outrel, 0, sizeof outrel);
|
---|
1300 | /* h->dynindx may be -1 if the symbol was marked to
|
---|
1301 | become local. */
|
---|
1302 | else if (h != NULL
|
---|
1303 | && ((! info->symbolic && h->dynindx != -1)
|
---|
1304 | || (h->elf_link_hash_flags
|
---|
1305 | & ELF_LINK_HASH_DEF_REGULAR) == 0))
|
---|
1306 | {
|
---|
1307 | BFD_ASSERT (h->dynindx != -1);
|
---|
1308 | outrel.r_info = ELF32_R_INFO (h->dynindx, r_type);
|
---|
1309 | outrel.r_addend = relocation + rel->r_addend;
|
---|
1310 | }
|
---|
1311 | else
|
---|
1312 | {
|
---|
1313 | if (r_type == R_CRIS_32)
|
---|
1314 | {
|
---|
1315 | relocate = TRUE;
|
---|
1316 | outrel.r_info = ELF32_R_INFO (0, R_CRIS_RELATIVE);
|
---|
1317 | outrel.r_addend = relocation + rel->r_addend;
|
---|
1318 | }
|
---|
1319 | else
|
---|
1320 | {
|
---|
1321 | long indx;
|
---|
1322 |
|
---|
1323 | if (h == NULL)
|
---|
1324 | sec = local_sections[r_symndx];
|
---|
1325 | else
|
---|
1326 | {
|
---|
1327 | BFD_ASSERT (h->root.type == bfd_link_hash_defined
|
---|
1328 | || (h->root.type
|
---|
1329 | == bfd_link_hash_defweak));
|
---|
1330 | sec = h->root.u.def.section;
|
---|
1331 | }
|
---|
1332 | if (sec != NULL && bfd_is_abs_section (sec))
|
---|
1333 | indx = 0;
|
---|
1334 | else if (sec == NULL || sec->owner == NULL)
|
---|
1335 | {
|
---|
1336 | bfd_set_error (bfd_error_bad_value);
|
---|
1337 | return FALSE;
|
---|
1338 | }
|
---|
1339 | else
|
---|
1340 | {
|
---|
1341 | asection *osec;
|
---|
1342 |
|
---|
1343 | osec = sec->output_section;
|
---|
1344 | indx = elf_section_data (osec)->dynindx;
|
---|
1345 | BFD_ASSERT (indx > 0);
|
---|
1346 | }
|
---|
1347 |
|
---|
1348 | outrel.r_info = ELF32_R_INFO (indx, r_type);
|
---|
1349 | outrel.r_addend = relocation + rel->r_addend;
|
---|
1350 | }
|
---|
1351 | }
|
---|
1352 |
|
---|
1353 | loc = sreloc->contents;
|
---|
1354 | loc += sreloc->reloc_count++ * sizeof (Elf32_External_Rela);
|
---|
1355 | bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
|
---|
1356 |
|
---|
1357 | /* This reloc will be computed at runtime, so there's no
|
---|
1358 | need to do anything now, except for R_CRIS_32 relocations
|
---|
1359 | that have been turned into R_CRIS_RELATIVE. */
|
---|
1360 | if (!relocate)
|
---|
1361 | continue;
|
---|
1362 | }
|
---|
1363 |
|
---|
1364 | break;
|
---|
1365 | }
|
---|
1366 |
|
---|
1367 | r = cris_final_link_relocate (howto, input_bfd, input_section,
|
---|
1368 | contents, rel, relocation);
|
---|
1369 |
|
---|
1370 | if (r != bfd_reloc_ok)
|
---|
1371 | {
|
---|
1372 | const char * msg = (const char *) NULL;
|
---|
1373 |
|
---|
1374 | switch (r)
|
---|
1375 | {
|
---|
1376 | case bfd_reloc_overflow:
|
---|
1377 | r = info->callbacks->reloc_overflow
|
---|
1378 | (info, symname, howto->name, (bfd_vma) 0,
|
---|
1379 | input_bfd, input_section, rel->r_offset);
|
---|
1380 | break;
|
---|
1381 |
|
---|
1382 | case bfd_reloc_undefined:
|
---|
1383 | r = info->callbacks->undefined_symbol
|
---|
1384 | (info, symname, input_bfd, input_section, rel->r_offset,
|
---|
1385 | TRUE);
|
---|
1386 | break;
|
---|
1387 |
|
---|
1388 | case bfd_reloc_outofrange:
|
---|
1389 | msg = _("internal error: out of range error");
|
---|
1390 | break;
|
---|
1391 |
|
---|
1392 | case bfd_reloc_notsupported:
|
---|
1393 | msg = _("internal error: unsupported relocation error");
|
---|
1394 | break;
|
---|
1395 |
|
---|
1396 | case bfd_reloc_dangerous:
|
---|
1397 | msg = _("internal error: dangerous relocation");
|
---|
1398 | break;
|
---|
1399 |
|
---|
1400 | default:
|
---|
1401 | msg = _("internal error: unknown error");
|
---|
1402 | break;
|
---|
1403 | }
|
---|
1404 |
|
---|
1405 | if (msg)
|
---|
1406 | r = info->callbacks->warning
|
---|
1407 | (info, msg, symname, input_bfd, input_section, rel->r_offset);
|
---|
1408 |
|
---|
1409 | if (! r)
|
---|
1410 | return FALSE;
|
---|
1411 | }
|
---|
1412 | }
|
---|
1413 |
|
---|
1414 | return TRUE;
|
---|
1415 | }
|
---|
1416 | |
---|
1417 |
|
---|
1418 | /* Finish up dynamic symbol handling. We set the contents of various
|
---|
1419 | dynamic sections here. */
|
---|
1420 |
|
---|
1421 | static bfd_boolean
|
---|
1422 | elf_cris_finish_dynamic_symbol (output_bfd, info, h, sym)
|
---|
1423 | bfd *output_bfd;
|
---|
1424 | struct bfd_link_info *info;
|
---|
1425 | struct elf_link_hash_entry *h;
|
---|
1426 | Elf_Internal_Sym *sym;
|
---|
1427 | {
|
---|
1428 | bfd *dynobj;
|
---|
1429 | int plt_off1 = 2, plt_off2 = 10, plt_off3 = 16;
|
---|
1430 |
|
---|
1431 | dynobj = elf_hash_table (info)->dynobj;
|
---|
1432 |
|
---|
1433 | if (h->plt.offset != (bfd_vma) -1)
|
---|
1434 | {
|
---|
1435 | asection *splt;
|
---|
1436 | asection *sgotplt;
|
---|
1437 | asection *sgot;
|
---|
1438 | asection *srela;
|
---|
1439 | bfd_vma got_base;
|
---|
1440 |
|
---|
1441 | bfd_vma gotplt_offset
|
---|
1442 | = ((struct elf_cris_link_hash_entry *) h)->gotplt_offset;
|
---|
1443 | Elf_Internal_Rela rela;
|
---|
1444 | bfd_byte *loc;
|
---|
1445 | bfd_boolean has_gotplt = gotplt_offset != 0;
|
---|
1446 |
|
---|
1447 | /* Get the index in the procedure linkage table which
|
---|
1448 | corresponds to this symbol. This is the index of this symbol
|
---|
1449 | in all the symbols for which we are making plt entries. The
|
---|
1450 | first entry in the procedure linkage table is reserved. */
|
---|
1451 | /* We have to count backwards here, and the result is only valid as
|
---|
1452 | an index into .got.plt and its relocations. FIXME: Constants... */
|
---|
1453 | bfd_vma gotplt_index = gotplt_offset/4 - 3;
|
---|
1454 |
|
---|
1455 | /* Get the offset into the .got table of the entry that corresponds
|
---|
1456 | to this function. Note that we embed knowledge that "incoming"
|
---|
1457 | .got goes after .got.plt in the output without padding (pointer
|
---|
1458 | aligned). However, that knowledge is present in several other
|
---|
1459 | places too, here and in elflink.h at least. */
|
---|
1460 | bfd_vma got_offset
|
---|
1461 | = (has_gotplt
|
---|
1462 | ? gotplt_offset
|
---|
1463 | : h->got.offset + elf_cris_hash_table(info)->next_gotplt_entry);
|
---|
1464 |
|
---|
1465 | /* This symbol has an entry in the procedure linkage table. Set it
|
---|
1466 | up. */
|
---|
1467 |
|
---|
1468 | BFD_ASSERT (h->dynindx != -1);
|
---|
1469 |
|
---|
1470 | splt = bfd_get_section_by_name (dynobj, ".plt");
|
---|
1471 | sgot = bfd_get_section_by_name (dynobj, ".got");
|
---|
1472 | sgotplt = bfd_get_section_by_name (dynobj, ".got.plt");
|
---|
1473 | srela = bfd_get_section_by_name (dynobj, ".rela.plt");
|
---|
1474 | BFD_ASSERT (splt != NULL && sgotplt != NULL
|
---|
1475 | && (! has_gotplt || srela != NULL));
|
---|
1476 |
|
---|
1477 | got_base = sgotplt->output_section->vma + sgotplt->output_offset;
|
---|
1478 |
|
---|
1479 | /* Fill in the entry in the procedure linkage table. */
|
---|
1480 | if (! info->shared)
|
---|
1481 | {
|
---|
1482 | memcpy (splt->contents + h->plt.offset, elf_cris_plt_entry,
|
---|
1483 | PLT_ENTRY_SIZE);
|
---|
1484 |
|
---|
1485 | /* We need to enter the absolute address of the GOT entry here. */
|
---|
1486 | bfd_put_32 (output_bfd, got_base + got_offset,
|
---|
1487 | splt->contents + h->plt.offset + plt_off1);
|
---|
1488 | }
|
---|
1489 | else
|
---|
1490 | {
|
---|
1491 | memcpy (splt->contents + h->plt.offset, elf_cris_pic_plt_entry,
|
---|
1492 | PLT_ENTRY_SIZE);
|
---|
1493 | bfd_put_32 (output_bfd, got_offset,
|
---|
1494 | splt->contents + h->plt.offset + plt_off1);
|
---|
1495 | }
|
---|
1496 |
|
---|
1497 | /* Fill in the plt entry and make a relocation, if this is a "real"
|
---|
1498 | PLT entry. */
|
---|
1499 | if (has_gotplt)
|
---|
1500 | {
|
---|
1501 | /* Fill in the offset into the reloc table. */
|
---|
1502 | bfd_put_32 (output_bfd,
|
---|
1503 | gotplt_index * sizeof (Elf32_External_Rela),
|
---|
1504 | splt->contents + h->plt.offset + plt_off2);
|
---|
1505 |
|
---|
1506 | /* Fill in the offset to the first PLT entry, where to "jump". */
|
---|
1507 | bfd_put_32 (output_bfd, - (h->plt.offset + plt_off3 + 4),
|
---|
1508 | splt->contents + h->plt.offset + plt_off3);
|
---|
1509 |
|
---|
1510 | /* Fill in the entry in the global offset table with the address of
|
---|
1511 | the relocating stub. */
|
---|
1512 | bfd_put_32 (output_bfd,
|
---|
1513 | (splt->output_section->vma
|
---|
1514 | + splt->output_offset
|
---|
1515 | + h->plt.offset
|
---|
1516 | + 8),
|
---|
1517 | sgotplt->contents + got_offset);
|
---|
1518 |
|
---|
1519 | /* Fill in the entry in the .rela.plt section. */
|
---|
1520 | rela.r_offset = (sgotplt->output_section->vma
|
---|
1521 | + sgotplt->output_offset
|
---|
1522 | + got_offset);
|
---|
1523 | rela.r_info = ELF32_R_INFO (h->dynindx, R_CRIS_JUMP_SLOT);
|
---|
1524 | rela.r_addend = 0;
|
---|
1525 | loc = srela->contents + gotplt_index * sizeof (Elf32_External_Rela);
|
---|
1526 | bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
|
---|
1527 | }
|
---|
1528 |
|
---|
1529 | if ((h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
|
---|
1530 | {
|
---|
1531 | /* Mark the symbol as undefined, rather than as defined in
|
---|
1532 | the .plt section. Leave the value alone. */
|
---|
1533 | sym->st_shndx = SHN_UNDEF;
|
---|
1534 |
|
---|
1535 | /* FIXME: From elf32-sparc.c 2001-02-19 (1.18). I still don't
|
---|
1536 | know whether resetting the value is significant; if it really
|
---|
1537 | is, rather than a quirk or bug in the sparc port, then I
|
---|
1538 | believe we'd see this elsewhere. */
|
---|
1539 | /* If the symbol is weak, we do need to clear the value.
|
---|
1540 | Otherwise, the PLT entry would provide a definition for
|
---|
1541 | the symbol even if the symbol wasn't defined anywhere,
|
---|
1542 | and so the symbol would never be NULL. */
|
---|
1543 | if ((h->elf_link_hash_flags & ELF_LINK_HASH_REF_REGULAR_NONWEAK)
|
---|
1544 | == 0)
|
---|
1545 | sym->st_value = 0;
|
---|
1546 | }
|
---|
1547 | }
|
---|
1548 |
|
---|
1549 | /* We don't emit .got relocs for symbols that aren't in the
|
---|
1550 | dynamic-symbols table for an ordinary program and are either defined
|
---|
1551 | by the program or are undefined weak symbols. */
|
---|
1552 | if (h->got.offset != (bfd_vma) -1
|
---|
1553 | && (info->shared
|
---|
1554 | || (h->dynindx != -1
|
---|
1555 | && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0
|
---|
1556 | && h->root.type != bfd_link_hash_undefweak)))
|
---|
1557 | {
|
---|
1558 | asection *sgot;
|
---|
1559 | asection *srela;
|
---|
1560 | Elf_Internal_Rela rela;
|
---|
1561 | bfd_byte *loc;
|
---|
1562 | bfd_byte *where;
|
---|
1563 |
|
---|
1564 | /* This symbol has an entry in the global offset table. Set it up. */
|
---|
1565 |
|
---|
1566 | sgot = bfd_get_section_by_name (dynobj, ".got");
|
---|
1567 | srela = bfd_get_section_by_name (dynobj, ".rela.got");
|
---|
1568 | BFD_ASSERT (sgot != NULL && srela != NULL);
|
---|
1569 |
|
---|
1570 | rela.r_offset = (sgot->output_section->vma
|
---|
1571 | + sgot->output_offset
|
---|
1572 | + (h->got.offset &~ (bfd_vma) 1));
|
---|
1573 |
|
---|
1574 | /* If this is a static link, or it is a -Bsymbolic link and the
|
---|
1575 | symbol is defined locally or was forced to be local because
|
---|
1576 | of a version file, we just want to emit a RELATIVE reloc.
|
---|
1577 | The entry in the global offset table will already have been
|
---|
1578 | initialized in the relocate_section function. */
|
---|
1579 | where = sgot->contents + (h->got.offset &~ (bfd_vma) 1);
|
---|
1580 | if (! elf_hash_table (info)->dynamic_sections_created
|
---|
1581 | || (info->shared
|
---|
1582 | && (info->symbolic || h->dynindx == -1)
|
---|
1583 | && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR)))
|
---|
1584 | {
|
---|
1585 | rela.r_info = ELF32_R_INFO (0, R_CRIS_RELATIVE);
|
---|
1586 | rela.r_addend = bfd_get_signed_32 (output_bfd, where);
|
---|
1587 | }
|
---|
1588 | else
|
---|
1589 | {
|
---|
1590 | bfd_put_32 (output_bfd, (bfd_vma) 0, where);
|
---|
1591 | rela.r_info = ELF32_R_INFO (h->dynindx, R_CRIS_GLOB_DAT);
|
---|
1592 | rela.r_addend = 0;
|
---|
1593 | }
|
---|
1594 |
|
---|
1595 | loc = srela->contents;
|
---|
1596 | loc += srela->reloc_count++ * sizeof (Elf32_External_Rela);
|
---|
1597 | bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
|
---|
1598 | }
|
---|
1599 |
|
---|
1600 | if ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_COPY) != 0)
|
---|
1601 | {
|
---|
1602 | asection *s;
|
---|
1603 | Elf_Internal_Rela rela;
|
---|
1604 | bfd_byte *loc;
|
---|
1605 |
|
---|
1606 | /* This symbol needs a copy reloc. Set it up. */
|
---|
1607 |
|
---|
1608 | BFD_ASSERT (h->dynindx != -1
|
---|
1609 | && (h->root.type == bfd_link_hash_defined
|
---|
1610 | || h->root.type == bfd_link_hash_defweak));
|
---|
1611 |
|
---|
1612 | s = bfd_get_section_by_name (h->root.u.def.section->owner,
|
---|
1613 | ".rela.bss");
|
---|
1614 | BFD_ASSERT (s != NULL);
|
---|
1615 |
|
---|
1616 | rela.r_offset = (h->root.u.def.value
|
---|
1617 | + h->root.u.def.section->output_section->vma
|
---|
1618 | + h->root.u.def.section->output_offset);
|
---|
1619 | rela.r_info = ELF32_R_INFO (h->dynindx, R_CRIS_COPY);
|
---|
1620 | rela.r_addend = 0;
|
---|
1621 | loc = s->contents + s->reloc_count++ * sizeof (Elf32_External_Rela);
|
---|
1622 | bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
|
---|
1623 | }
|
---|
1624 |
|
---|
1625 | /* Mark _DYNAMIC and _GLOBAL_OFFSET_TABLE_ as absolute. */
|
---|
1626 | if (strcmp (h->root.root.string, "_DYNAMIC") == 0
|
---|
1627 | || strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
|
---|
1628 | sym->st_shndx = SHN_ABS;
|
---|
1629 |
|
---|
1630 | return TRUE;
|
---|
1631 | }
|
---|
1632 | |
---|
1633 |
|
---|
1634 | /* Finish up the dynamic sections. */
|
---|
1635 |
|
---|
1636 | static bfd_boolean
|
---|
1637 | elf_cris_finish_dynamic_sections (output_bfd, info)
|
---|
1638 | bfd *output_bfd;
|
---|
1639 | struct bfd_link_info *info;
|
---|
1640 | {
|
---|
1641 | bfd *dynobj;
|
---|
1642 | asection *sgot;
|
---|
1643 | asection *sdyn;
|
---|
1644 |
|
---|
1645 | dynobj = elf_hash_table (info)->dynobj;
|
---|
1646 |
|
---|
1647 | sgot = bfd_get_section_by_name (dynobj, ".got.plt");
|
---|
1648 | BFD_ASSERT (sgot != NULL);
|
---|
1649 | sdyn = bfd_get_section_by_name (dynobj, ".dynamic");
|
---|
1650 |
|
---|
1651 | if (elf_hash_table (info)->dynamic_sections_created)
|
---|
1652 | {
|
---|
1653 | asection *splt;
|
---|
1654 | Elf32_External_Dyn *dyncon, *dynconend;
|
---|
1655 |
|
---|
1656 | splt = bfd_get_section_by_name (dynobj, ".plt");
|
---|
1657 | BFD_ASSERT (splt != NULL && sdyn != NULL);
|
---|
1658 |
|
---|
1659 | dyncon = (Elf32_External_Dyn *) sdyn->contents;
|
---|
1660 | dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->_raw_size);
|
---|
1661 | for (; dyncon < dynconend; dyncon++)
|
---|
1662 | {
|
---|
1663 | Elf_Internal_Dyn dyn;
|
---|
1664 | asection *s;
|
---|
1665 |
|
---|
1666 | bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn);
|
---|
1667 |
|
---|
1668 | switch (dyn.d_tag)
|
---|
1669 | {
|
---|
1670 | default:
|
---|
1671 | break;
|
---|
1672 |
|
---|
1673 | case DT_PLTGOT:
|
---|
1674 | s = bfd_get_section_by_name (output_bfd, ".got");
|
---|
1675 | BFD_ASSERT (s != NULL);
|
---|
1676 | dyn.d_un.d_ptr = s->vma;
|
---|
1677 | bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
|
---|
1678 | break;
|
---|
1679 |
|
---|
1680 | case DT_JMPREL:
|
---|
1681 | /* Yes, we *can* have a .plt and no .plt.rela, for instance
|
---|
1682 | if all symbols are found in the .got (not .got.plt). */
|
---|
1683 | s = bfd_get_section_by_name (output_bfd, ".rela.plt");
|
---|
1684 | dyn.d_un.d_ptr = s != NULL ? s->vma : 0;
|
---|
1685 | bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
|
---|
1686 | break;
|
---|
1687 |
|
---|
1688 | case DT_PLTRELSZ:
|
---|
1689 | s = bfd_get_section_by_name (output_bfd, ".rela.plt");
|
---|
1690 | if (s == NULL)
|
---|
1691 | dyn.d_un.d_val = 0;
|
---|
1692 | else if (s->_cooked_size != 0)
|
---|
1693 | dyn.d_un.d_val = s->_cooked_size;
|
---|
1694 | else
|
---|
1695 | dyn.d_un.d_val = s->_raw_size;
|
---|
1696 | bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
|
---|
1697 | break;
|
---|
1698 |
|
---|
1699 | case DT_RELASZ:
|
---|
1700 | /* The procedure linkage table relocs (DT_JMPREL) should
|
---|
1701 | not be included in the overall relocs (DT_RELA).
|
---|
1702 | Therefore, we override the DT_RELASZ entry here to
|
---|
1703 | make it not include the JMPREL relocs. Since the
|
---|
1704 | linker script arranges for .rela.plt to follow all
|
---|
1705 | other relocation sections, we don't have to worry
|
---|
1706 | about changing the DT_RELA entry. */
|
---|
1707 | s = bfd_get_section_by_name (output_bfd, ".rela.plt");
|
---|
1708 | if (s != NULL)
|
---|
1709 | {
|
---|
1710 | if (s->_cooked_size != 0)
|
---|
1711 | dyn.d_un.d_val -= s->_cooked_size;
|
---|
1712 | else
|
---|
1713 | dyn.d_un.d_val -= s->_raw_size;
|
---|
1714 | }
|
---|
1715 | bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
|
---|
1716 | break;
|
---|
1717 | }
|
---|
1718 | }
|
---|
1719 |
|
---|
1720 | /* Fill in the first entry in the procedure linkage table. */
|
---|
1721 | if (splt->_raw_size > 0)
|
---|
1722 | {
|
---|
1723 | if (info->shared)
|
---|
1724 | memcpy (splt->contents, elf_cris_pic_plt0_entry, PLT_ENTRY_SIZE);
|
---|
1725 | else
|
---|
1726 | {
|
---|
1727 | memcpy (splt->contents, elf_cris_plt0_entry, PLT_ENTRY_SIZE);
|
---|
1728 | bfd_put_32 (output_bfd,
|
---|
1729 | sgot->output_section->vma + sgot->output_offset + 4,
|
---|
1730 | splt->contents + 6);
|
---|
1731 | bfd_put_32 (output_bfd,
|
---|
1732 | sgot->output_section->vma + sgot->output_offset + 8,
|
---|
1733 | splt->contents + 14);
|
---|
1734 |
|
---|
1735 | elf_section_data (splt->output_section)->this_hdr.sh_entsize
|
---|
1736 | = PLT_ENTRY_SIZE;
|
---|
1737 | }
|
---|
1738 | }
|
---|
1739 | }
|
---|
1740 |
|
---|
1741 | /* Fill in the first three entries in the global offset table. */
|
---|
1742 | if (sgot->_raw_size > 0)
|
---|
1743 | {
|
---|
1744 | if (sdyn == NULL)
|
---|
1745 | bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents);
|
---|
1746 | else
|
---|
1747 | bfd_put_32 (output_bfd,
|
---|
1748 | sdyn->output_section->vma + sdyn->output_offset,
|
---|
1749 | sgot->contents);
|
---|
1750 | bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 4);
|
---|
1751 | bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 8);
|
---|
1752 | }
|
---|
1753 |
|
---|
1754 | elf_section_data (sgot->output_section)->this_hdr.sh_entsize = 4;
|
---|
1755 |
|
---|
1756 | return TRUE;
|
---|
1757 | }
|
---|
1758 | |
---|
1759 |
|
---|
1760 | /* Return the section that should be marked against GC for a given
|
---|
1761 | relocation. */
|
---|
1762 |
|
---|
1763 | static asection *
|
---|
1764 | cris_elf_gc_mark_hook (sec, info, rel, h, sym)
|
---|
1765 | asection *sec;
|
---|
1766 | struct bfd_link_info *info ATTRIBUTE_UNUSED;
|
---|
1767 | Elf_Internal_Rela *rel;
|
---|
1768 | struct elf_link_hash_entry *h;
|
---|
1769 | Elf_Internal_Sym *sym;
|
---|
1770 | {
|
---|
1771 | if (h != NULL)
|
---|
1772 | {
|
---|
1773 | switch (ELF32_R_TYPE (rel->r_info))
|
---|
1774 | {
|
---|
1775 | case R_CRIS_GNU_VTINHERIT:
|
---|
1776 | case R_CRIS_GNU_VTENTRY:
|
---|
1777 | break;
|
---|
1778 |
|
---|
1779 | default:
|
---|
1780 | switch (h->root.type)
|
---|
1781 | {
|
---|
1782 | case bfd_link_hash_defined:
|
---|
1783 | case bfd_link_hash_defweak:
|
---|
1784 | return h->root.u.def.section;
|
---|
1785 |
|
---|
1786 | case bfd_link_hash_common:
|
---|
1787 | return h->root.u.c.p->section;
|
---|
1788 |
|
---|
1789 | default:
|
---|
1790 | break;
|
---|
1791 | }
|
---|
1792 | }
|
---|
1793 | }
|
---|
1794 | else
|
---|
1795 | return bfd_section_from_elf_index (sec->owner, sym->st_shndx);
|
---|
1796 |
|
---|
1797 | return NULL;
|
---|
1798 | }
|
---|
1799 |
|
---|
1800 | /* Update the got entry reference counts for the section being removed. */
|
---|
1801 |
|
---|
1802 | static bfd_boolean
|
---|
1803 | cris_elf_gc_sweep_hook (abfd, info, sec, relocs)
|
---|
1804 | bfd *abfd ATTRIBUTE_UNUSED;
|
---|
1805 | struct bfd_link_info *info ATTRIBUTE_UNUSED;
|
---|
1806 | asection *sec ATTRIBUTE_UNUSED;
|
---|
1807 | const Elf_Internal_Rela *relocs ATTRIBUTE_UNUSED;
|
---|
1808 | {
|
---|
1809 | Elf_Internal_Shdr *symtab_hdr;
|
---|
1810 | struct elf_link_hash_entry **sym_hashes;
|
---|
1811 | bfd_signed_vma *local_got_refcounts;
|
---|
1812 | const Elf_Internal_Rela *rel, *relend;
|
---|
1813 | unsigned long r_symndx;
|
---|
1814 | struct elf_link_hash_entry *h;
|
---|
1815 | bfd *dynobj;
|
---|
1816 | asection *sgot;
|
---|
1817 | asection *srelgot;
|
---|
1818 |
|
---|
1819 | symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
|
---|
1820 | sym_hashes = elf_sym_hashes (abfd);
|
---|
1821 | local_got_refcounts = elf_local_got_refcounts (abfd);
|
---|
1822 |
|
---|
1823 | dynobj = elf_hash_table (info)->dynobj;
|
---|
1824 | if (dynobj == NULL)
|
---|
1825 | return TRUE;
|
---|
1826 |
|
---|
1827 | sgot = bfd_get_section_by_name (dynobj, ".got");
|
---|
1828 | srelgot = bfd_get_section_by_name (dynobj, ".rela.got");
|
---|
1829 |
|
---|
1830 | relend = relocs + sec->reloc_count;
|
---|
1831 | for (rel = relocs; rel < relend; rel++)
|
---|
1832 | {
|
---|
1833 | switch (ELF32_R_TYPE (rel->r_info))
|
---|
1834 | {
|
---|
1835 | case R_CRIS_16_GOT:
|
---|
1836 | case R_CRIS_32_GOT:
|
---|
1837 | r_symndx = ELF32_R_SYM (rel->r_info);
|
---|
1838 | if (r_symndx >= symtab_hdr->sh_info)
|
---|
1839 | {
|
---|
1840 | h = sym_hashes[r_symndx - symtab_hdr->sh_info];
|
---|
1841 | if (h->got.refcount > 0)
|
---|
1842 | {
|
---|
1843 | --h->got.refcount;
|
---|
1844 | if (h->got.refcount == 0)
|
---|
1845 | {
|
---|
1846 | /* We don't need the .got entry any more. */
|
---|
1847 | sgot->_raw_size -= 4;
|
---|
1848 | srelgot->_raw_size -= sizeof (Elf32_External_Rela);
|
---|
1849 | }
|
---|
1850 | }
|
---|
1851 | break;
|
---|
1852 | }
|
---|
1853 |
|
---|
1854 | local_got_reloc:
|
---|
1855 | if (local_got_refcounts != NULL)
|
---|
1856 | {
|
---|
1857 | if (local_got_refcounts[r_symndx] > 0)
|
---|
1858 | {
|
---|
1859 | --local_got_refcounts[r_symndx];
|
---|
1860 | if (local_got_refcounts[r_symndx] == 0)
|
---|
1861 | {
|
---|
1862 | /* We don't need the .got entry any more. */
|
---|
1863 | sgot->_raw_size -= 4;
|
---|
1864 | if (info->shared)
|
---|
1865 | srelgot->_raw_size -= sizeof (Elf32_External_Rela);
|
---|
1866 | }
|
---|
1867 | }
|
---|
1868 | }
|
---|
1869 | break;
|
---|
1870 |
|
---|
1871 | case R_CRIS_16_GOTPLT:
|
---|
1872 | case R_CRIS_32_GOTPLT:
|
---|
1873 | /* For local symbols, treat these like GOT relocs. */
|
---|
1874 | r_symndx = ELF32_R_SYM (rel->r_info);
|
---|
1875 | if (r_symndx < symtab_hdr->sh_info)
|
---|
1876 | goto local_got_reloc;
|
---|
1877 |
|
---|
1878 | case R_CRIS_32_PLT_GOTREL:
|
---|
1879 | /* FIXME: We don't garbage-collect away the .got section. */
|
---|
1880 | if (local_got_refcounts != NULL)
|
---|
1881 | local_got_refcounts[-1]--;
|
---|
1882 | /* Fall through. */
|
---|
1883 |
|
---|
1884 | case R_CRIS_8_PCREL:
|
---|
1885 | case R_CRIS_16_PCREL:
|
---|
1886 | case R_CRIS_32_PCREL:
|
---|
1887 | case R_CRIS_32_PLT_PCREL:
|
---|
1888 | r_symndx = ELF32_R_SYM (rel->r_info);
|
---|
1889 | if (r_symndx >= symtab_hdr->sh_info)
|
---|
1890 | {
|
---|
1891 | h = sym_hashes[r_symndx - symtab_hdr->sh_info];
|
---|
1892 | if (ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
|
---|
1893 | && h->plt.refcount > 0)
|
---|
1894 | --h->plt.refcount;
|
---|
1895 | }
|
---|
1896 | break;
|
---|
1897 |
|
---|
1898 | default:
|
---|
1899 | break;
|
---|
1900 | }
|
---|
1901 | }
|
---|
1902 |
|
---|
1903 | return TRUE;
|
---|
1904 | }
|
---|
1905 |
|
---|
1906 | /* Make sure we emit a GOT entry if the symbol was supposed to have a PLT
|
---|
1907 | entry but we found we will not create any. Called when we find we will
|
---|
1908 | not have any PLT for this symbol, by for example
|
---|
1909 | elf_cris_adjust_dynamic_symbol when we're doing a proper dynamic link,
|
---|
1910 | or elf_cris_size_dynamic_sections if no dynamic sections will be
|
---|
1911 | created (we're only linking static objects). */
|
---|
1912 |
|
---|
1913 | static bfd_boolean
|
---|
1914 | elf_cris_adjust_gotplt_to_got (h, p)
|
---|
1915 | struct elf_cris_link_hash_entry *h;
|
---|
1916 | PTR p;
|
---|
1917 | {
|
---|
1918 | struct bfd_link_info *info = (struct bfd_link_info *) p;
|
---|
1919 | bfd *dynobj = elf_hash_table (info)->dynobj;
|
---|
1920 |
|
---|
1921 | BFD_ASSERT (dynobj != NULL);
|
---|
1922 |
|
---|
1923 | if (h->root.root.type == bfd_link_hash_warning)
|
---|
1924 | h = (struct elf_cris_link_hash_entry *) h->root.root.u.i.link;
|
---|
1925 |
|
---|
1926 | /* If nobody wanted a GOTPLT with this symbol, we're done. */
|
---|
1927 | if (h->gotplt_refcount <= 0)
|
---|
1928 | return TRUE;
|
---|
1929 |
|
---|
1930 | if (h->root.got.refcount > 0)
|
---|
1931 | {
|
---|
1932 | /* There's a GOT entry for this symbol. Just adjust the refcount.
|
---|
1933 | Probably not necessary at this stage, but keeping it accurate
|
---|
1934 | helps avoiding surprises later. */
|
---|
1935 | h->root.got.refcount += h->gotplt_refcount;
|
---|
1936 | h->gotplt_refcount = -1;
|
---|
1937 | }
|
---|
1938 | else
|
---|
1939 | {
|
---|
1940 | /* No GOT entry for this symbol. We need to create one. */
|
---|
1941 | asection *sgot = bfd_get_section_by_name (dynobj, ".got");
|
---|
1942 | asection *srelgot
|
---|
1943 | = bfd_get_section_by_name (dynobj, ".rela.got");
|
---|
1944 |
|
---|
1945 | /* Put an accurate refcount there. */
|
---|
1946 | h->root.got.refcount = h->gotplt_refcount;
|
---|
1947 |
|
---|
1948 | h->gotplt_refcount = -1;
|
---|
1949 |
|
---|
1950 | /* We always have a .got and a .rela.got section if there were
|
---|
1951 | GOTPLT relocs in input. */
|
---|
1952 | BFD_ASSERT (sgot != NULL && srelgot != NULL);
|
---|
1953 |
|
---|
1954 | /* Allocate space in the .got section. */
|
---|
1955 | sgot->_raw_size += 4;
|
---|
1956 |
|
---|
1957 | /* Allocate relocation space. */
|
---|
1958 | srelgot->_raw_size += sizeof (Elf32_External_Rela);
|
---|
1959 | }
|
---|
1960 |
|
---|
1961 | return TRUE;
|
---|
1962 | }
|
---|
1963 |
|
---|
1964 | /* Try to fold PLT entries with GOT entries. There are two cases when we
|
---|
1965 | want to do this:
|
---|
1966 |
|
---|
1967 | - When all PLT references are GOTPLT references, and there are GOT
|
---|
1968 | references. We don't have to generate a PLT at all.
|
---|
1969 |
|
---|
1970 | - When there are both (ordinary) PLT references and GOT references.
|
---|
1971 | We want to make the PLT reference use the ordinary GOT entry rather
|
---|
1972 | than a run-time dynamically resolved GOTPLT entry (since the GOT
|
---|
1973 | entry will have to be resolved at startup anyway).
|
---|
1974 |
|
---|
1975 | Though the latter case is handled when room for the PLT is allocated,
|
---|
1976 | not here.
|
---|
1977 |
|
---|
1978 | Note that this function is called before symbols are forced local by
|
---|
1979 | version scripts. The differing cases are handled by
|
---|
1980 | elf_cris_hide_symbol. */
|
---|
1981 |
|
---|
1982 | static bfd_boolean
|
---|
1983 | elf_cris_try_fold_plt_to_got (h, p)
|
---|
1984 | struct elf_cris_link_hash_entry *h;
|
---|
1985 | PTR p;
|
---|
1986 | {
|
---|
1987 | struct bfd_link_info *info = (struct bfd_link_info *) p;
|
---|
1988 |
|
---|
1989 | /* If there are no GOT references for this symbol, we can't fold any
|
---|
1990 | other reference so there's nothing to do. Likewise if there are no
|
---|
1991 | PLT references; GOTPLT references included. */
|
---|
1992 | if (h->root.got.refcount <= 0 || h->root.plt.refcount <= 0)
|
---|
1993 | return TRUE;
|
---|
1994 |
|
---|
1995 | /* GOTPLT relocs are supposed to be included into the PLT refcount. */
|
---|
1996 | BFD_ASSERT (h->gotplt_refcount <= h->root.plt.refcount);
|
---|
1997 |
|
---|
1998 | if (h->gotplt_refcount == h->root.plt.refcount)
|
---|
1999 | {
|
---|
2000 | /* The only PLT references are GOTPLT references, and there are GOT
|
---|
2001 | references. Convert PLT to GOT references. */
|
---|
2002 | if (! elf_cris_adjust_gotplt_to_got (h, info))
|
---|
2003 | return FALSE;
|
---|
2004 |
|
---|
2005 | /* Clear the PLT references, so no PLT will be created. */
|
---|
2006 | h->root.plt.offset = (bfd_vma) -1;
|
---|
2007 | }
|
---|
2008 |
|
---|
2009 | return TRUE;
|
---|
2010 | }
|
---|
2011 |
|
---|
2012 | /* Our own version of hide_symbol, so that we can adjust a GOTPLT reloc
|
---|
2013 | to use a GOT entry (and create one) rather than requiring a GOTPLT
|
---|
2014 | entry. */
|
---|
2015 |
|
---|
2016 | static void
|
---|
2017 | elf_cris_hide_symbol (info, h, force_local)
|
---|
2018 | struct bfd_link_info *info;
|
---|
2019 | struct elf_link_hash_entry *h;
|
---|
2020 | bfd_boolean force_local;
|
---|
2021 | {
|
---|
2022 | elf_cris_adjust_gotplt_to_got ((struct elf_cris_link_hash_entry *) h, info);
|
---|
2023 |
|
---|
2024 | _bfd_elf_link_hash_hide_symbol (info, h, force_local);
|
---|
2025 | }
|
---|
2026 |
|
---|
2027 | /* Adjust a symbol defined by a dynamic object and referenced by a
|
---|
2028 | regular object. The current definition is in some section of the
|
---|
2029 | dynamic object, but we're not including those sections. We have to
|
---|
2030 | change the definition to something the rest of the link can
|
---|
2031 | understand. */
|
---|
2032 |
|
---|
2033 | static bfd_boolean
|
---|
2034 | elf_cris_adjust_dynamic_symbol (info, h)
|
---|
2035 | struct bfd_link_info *info;
|
---|
2036 | struct elf_link_hash_entry *h;
|
---|
2037 | {
|
---|
2038 | bfd *dynobj;
|
---|
2039 | asection *s;
|
---|
2040 | unsigned int power_of_two;
|
---|
2041 |
|
---|
2042 | dynobj = elf_hash_table (info)->dynobj;
|
---|
2043 |
|
---|
2044 | /* Make sure we know what is going on here. */
|
---|
2045 | BFD_ASSERT (dynobj != NULL
|
---|
2046 | && ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT)
|
---|
2047 | || h->weakdef != NULL
|
---|
2048 | || ((h->elf_link_hash_flags
|
---|
2049 | & ELF_LINK_HASH_DEF_DYNAMIC) != 0
|
---|
2050 | && (h->elf_link_hash_flags
|
---|
2051 | & ELF_LINK_HASH_REF_REGULAR) != 0
|
---|
2052 | && (h->elf_link_hash_flags
|
---|
2053 | & ELF_LINK_HASH_DEF_REGULAR) == 0)));
|
---|
2054 |
|
---|
2055 | /* If this is a function, put it in the procedure linkage table. We
|
---|
2056 | will fill in the contents of the procedure linkage table later,
|
---|
2057 | when we know the address of the .got section. */
|
---|
2058 | if (h->type == STT_FUNC
|
---|
2059 | || (h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT) != 0)
|
---|
2060 | {
|
---|
2061 | /* If we link a program (not a DSO), we'll get rid of unnecessary
|
---|
2062 | PLT entries; we point to the actual symbols -- even for pic
|
---|
2063 | relocs, because a program built with -fpic should have the same
|
---|
2064 | result as one built without -fpic, specifically considering weak
|
---|
2065 | symbols.
|
---|
2066 | FIXME: m68k and i386 differ here, for unclear reasons. */
|
---|
2067 | if (! info->shared
|
---|
2068 | && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_DYNAMIC) == 0)
|
---|
2069 | {
|
---|
2070 | /* This case can occur if we saw a PLT reloc in an input file,
|
---|
2071 | but the symbol was not defined by a dynamic object. In such
|
---|
2072 | a case, we don't actually need to build a procedure linkage
|
---|
2073 | table, and we can just do an absolute or PC reloc instead, or
|
---|
2074 | change a .got.plt index to a .got index for GOTPLT relocs. */
|
---|
2075 | BFD_ASSERT ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT) != 0);
|
---|
2076 | h->elf_link_hash_flags &= ~ELF_LINK_HASH_NEEDS_PLT;
|
---|
2077 | h->plt.offset = (bfd_vma) -1;
|
---|
2078 | return
|
---|
2079 | elf_cris_adjust_gotplt_to_got ((struct
|
---|
2080 | elf_cris_link_hash_entry *) h,
|
---|
2081 | info);
|
---|
2082 | }
|
---|
2083 |
|
---|
2084 | /* If there are only GOT references and GOTPLT references to this
|
---|
2085 | PLT entry, get rid of the PLT. */
|
---|
2086 | if (! elf_cris_try_fold_plt_to_got ((struct elf_cris_link_hash_entry *)
|
---|
2087 | h, info))
|
---|
2088 | return FALSE;
|
---|
2089 |
|
---|
2090 | /* GC or folding may have rendered this entry unused. */
|
---|
2091 | if (h->plt.refcount <= 0)
|
---|
2092 | {
|
---|
2093 | h->elf_link_hash_flags &= ~ELF_LINK_HASH_NEEDS_PLT;
|
---|
2094 | h->plt.offset = (bfd_vma) -1;
|
---|
2095 | return TRUE;
|
---|
2096 | }
|
---|
2097 |
|
---|
2098 | /* Make sure this symbol is output as a dynamic symbol. */
|
---|
2099 | if (h->dynindx == -1)
|
---|
2100 | {
|
---|
2101 | if (! bfd_elf32_link_record_dynamic_symbol (info, h))
|
---|
2102 | return FALSE;
|
---|
2103 | }
|
---|
2104 |
|
---|
2105 | s = bfd_get_section_by_name (dynobj, ".plt");
|
---|
2106 | BFD_ASSERT (s != NULL);
|
---|
2107 |
|
---|
2108 | /* If this is the first .plt entry, make room for the special
|
---|
2109 | first entry. */
|
---|
2110 | if (s->_raw_size == 0)
|
---|
2111 | s->_raw_size += PLT_ENTRY_SIZE;
|
---|
2112 |
|
---|
2113 | /* If this symbol is not defined in a regular file, and we are
|
---|
2114 | not generating a shared library, then set the symbol to this
|
---|
2115 | location in the .plt. */
|
---|
2116 | if (!info->shared
|
---|
2117 | && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
|
---|
2118 | {
|
---|
2119 | h->root.u.def.section = s;
|
---|
2120 | h->root.u.def.value = s->_raw_size;
|
---|
2121 | }
|
---|
2122 |
|
---|
2123 | /* If there's already a GOT entry, use that, not a .got.plt. A
|
---|
2124 | GOT field still has a reference count when we get here; it's
|
---|
2125 | not yet changed to an offset. */
|
---|
2126 | if (h->got.refcount > 0)
|
---|
2127 | {
|
---|
2128 | h->got.refcount += h->plt.refcount;
|
---|
2129 |
|
---|
2130 | /* Mark the PLT offset to use the GOT entry by setting the low
|
---|
2131 | bit in the plt offset; it is always a multiple of
|
---|
2132 | pointer-size. */
|
---|
2133 | BFD_ASSERT ((s->_raw_size & 3) == 0);
|
---|
2134 |
|
---|
2135 | /* Change the PLT refcount to an offset. */
|
---|
2136 | h->plt.offset = s->_raw_size;
|
---|
2137 |
|
---|
2138 | /* By not setting gotplt_offset (i.e. it remains at 0), we signal
|
---|
2139 | that the got entry should be used instead. */
|
---|
2140 | BFD_ASSERT (((struct elf_cris_link_hash_entry *)
|
---|
2141 | h)->gotplt_offset == 0);
|
---|
2142 |
|
---|
2143 | /* Make room for this entry. */
|
---|
2144 | s->_raw_size += PLT_ENTRY_SIZE;
|
---|
2145 |
|
---|
2146 | return TRUE;
|
---|
2147 | }
|
---|
2148 |
|
---|
2149 | /* No GOT reference for this symbol; prepare for an ordinary PLT. */
|
---|
2150 | h->plt.offset = s->_raw_size;
|
---|
2151 |
|
---|
2152 | /* Make room for this entry. */
|
---|
2153 | s->_raw_size += PLT_ENTRY_SIZE;
|
---|
2154 |
|
---|
2155 | /* We also need to make an entry in the .got.plt section, which
|
---|
2156 | will be placed in the .got section by the linker script. */
|
---|
2157 | ((struct elf_cris_link_hash_entry *) h)->gotplt_offset
|
---|
2158 | = elf_cris_hash_table (info)->next_gotplt_entry;
|
---|
2159 | elf_cris_hash_table (info)->next_gotplt_entry += 4;
|
---|
2160 |
|
---|
2161 | s = bfd_get_section_by_name (dynobj, ".got.plt");
|
---|
2162 | BFD_ASSERT (s != NULL);
|
---|
2163 | s->_raw_size += 4;
|
---|
2164 |
|
---|
2165 | /* We also need to make an entry in the .rela.plt section. */
|
---|
2166 |
|
---|
2167 | s = bfd_get_section_by_name (dynobj, ".rela.plt");
|
---|
2168 | BFD_ASSERT (s != NULL);
|
---|
2169 | s->_raw_size += sizeof (Elf32_External_Rela);
|
---|
2170 |
|
---|
2171 | return TRUE;
|
---|
2172 | }
|
---|
2173 |
|
---|
2174 | /* Reinitialize the plt offset now that it is not used as a reference
|
---|
2175 | count any more. */
|
---|
2176 | h->plt.offset = (bfd_vma) -1;
|
---|
2177 |
|
---|
2178 | /* If this is a weak symbol, and there is a real definition, the
|
---|
2179 | processor independent code will have arranged for us to see the
|
---|
2180 | real definition first, and we can just use the same value. */
|
---|
2181 | if (h->weakdef != NULL)
|
---|
2182 | {
|
---|
2183 | BFD_ASSERT (h->weakdef->root.type == bfd_link_hash_defined
|
---|
2184 | || h->weakdef->root.type == bfd_link_hash_defweak);
|
---|
2185 | h->root.u.def.section = h->weakdef->root.u.def.section;
|
---|
2186 | h->root.u.def.value = h->weakdef->root.u.def.value;
|
---|
2187 | return TRUE;
|
---|
2188 | }
|
---|
2189 |
|
---|
2190 | /* This is a reference to a symbol defined by a dynamic object which
|
---|
2191 | is not a function. */
|
---|
2192 |
|
---|
2193 | /* If we are creating a shared library, we must presume that the
|
---|
2194 | only references to the symbol are via the global offset table.
|
---|
2195 | For such cases we need not do anything here; the relocations will
|
---|
2196 | be handled correctly by relocate_section. */
|
---|
2197 | if (info->shared)
|
---|
2198 | return TRUE;
|
---|
2199 |
|
---|
2200 | /* If there are no references to this symbol that do not use the
|
---|
2201 | GOT, we don't need to generate a copy reloc. */
|
---|
2202 | if ((h->elf_link_hash_flags & ELF_LINK_NON_GOT_REF) == 0)
|
---|
2203 | return TRUE;
|
---|
2204 |
|
---|
2205 | /* We must allocate the symbol in our .dynbss section, which will
|
---|
2206 | become part of the .bss section of the executable. There will be
|
---|
2207 | an entry for this symbol in the .dynsym section. The dynamic
|
---|
2208 | object will contain position independent code, so all references
|
---|
2209 | from the dynamic object to this symbol will go through the global
|
---|
2210 | offset table. The dynamic linker will use the .dynsym entry to
|
---|
2211 | determine the address it must put in the global offset table, so
|
---|
2212 | both the dynamic object and the regular object will refer to the
|
---|
2213 | same memory location for the variable. */
|
---|
2214 |
|
---|
2215 | s = bfd_get_section_by_name (dynobj, ".dynbss");
|
---|
2216 | BFD_ASSERT (s != NULL);
|
---|
2217 |
|
---|
2218 | /* We must generate a R_CRIS_COPY reloc to tell the dynamic linker to
|
---|
2219 | copy the initial value out of the dynamic object and into the
|
---|
2220 | runtime process image. We need to remember the offset into the
|
---|
2221 | .rela.bss section we are going to use. */
|
---|
2222 | if ((h->root.u.def.section->flags & SEC_ALLOC) != 0)
|
---|
2223 | {
|
---|
2224 | asection *srel;
|
---|
2225 |
|
---|
2226 | srel = bfd_get_section_by_name (dynobj, ".rela.bss");
|
---|
2227 | BFD_ASSERT (srel != NULL);
|
---|
2228 | srel->_raw_size += sizeof (Elf32_External_Rela);
|
---|
2229 | h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_COPY;
|
---|
2230 | }
|
---|
2231 |
|
---|
2232 | /* Historic precedent: m68k and i386 allow max 8-byte alignment for the
|
---|
2233 | thing to copy; so do we. */
|
---|
2234 |
|
---|
2235 | /* We need to figure out the alignment required for this symbol. I
|
---|
2236 | have no idea how ELF linkers handle this. */
|
---|
2237 | power_of_two = bfd_log2 (h->size);
|
---|
2238 | if (power_of_two > 3)
|
---|
2239 | power_of_two = 3;
|
---|
2240 |
|
---|
2241 | /* Apply the required alignment. */
|
---|
2242 | s->_raw_size = BFD_ALIGN (s->_raw_size,
|
---|
2243 | (bfd_size_type) (1 << power_of_two));
|
---|
2244 | if (power_of_two > bfd_get_section_alignment (dynobj, s))
|
---|
2245 | {
|
---|
2246 | if (!bfd_set_section_alignment (dynobj, s, power_of_two))
|
---|
2247 | return FALSE;
|
---|
2248 | }
|
---|
2249 |
|
---|
2250 | /* Define the symbol as being at this point in the section. */
|
---|
2251 | h->root.u.def.section = s;
|
---|
2252 | h->root.u.def.value = s->_raw_size;
|
---|
2253 |
|
---|
2254 | /* Increment the section size to make room for the symbol. */
|
---|
2255 | s->_raw_size += h->size;
|
---|
2256 |
|
---|
2257 | return TRUE;
|
---|
2258 | }
|
---|
2259 |
|
---|
2260 | /* Look through the relocs for a section during the first phase. */
|
---|
2261 |
|
---|
2262 | static bfd_boolean
|
---|
2263 | cris_elf_check_relocs (abfd, info, sec, relocs)
|
---|
2264 | bfd *abfd;
|
---|
2265 | struct bfd_link_info *info;
|
---|
2266 | asection *sec;
|
---|
2267 | const Elf_Internal_Rela *relocs;
|
---|
2268 | {
|
---|
2269 | bfd *dynobj;
|
---|
2270 | Elf_Internal_Shdr *symtab_hdr;
|
---|
2271 | struct elf_link_hash_entry **sym_hashes, **sym_hashes_end;
|
---|
2272 | bfd_signed_vma *local_got_refcounts;
|
---|
2273 | const Elf_Internal_Rela *rel;
|
---|
2274 | const Elf_Internal_Rela *rel_end;
|
---|
2275 | asection *sgot;
|
---|
2276 | asection *srelgot;
|
---|
2277 | asection *sreloc;
|
---|
2278 |
|
---|
2279 | if (info->relocateable)
|
---|
2280 | return TRUE;
|
---|
2281 |
|
---|
2282 | dynobj = elf_hash_table (info)->dynobj;
|
---|
2283 | symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
|
---|
2284 | sym_hashes = elf_sym_hashes (abfd);
|
---|
2285 | sym_hashes_end = sym_hashes + symtab_hdr->sh_size/sizeof (Elf32_External_Sym);
|
---|
2286 | local_got_refcounts = elf_local_got_refcounts (abfd);
|
---|
2287 |
|
---|
2288 | sgot = NULL;
|
---|
2289 | srelgot = NULL;
|
---|
2290 | sreloc = NULL;
|
---|
2291 |
|
---|
2292 | if (!elf_bad_symtab (abfd))
|
---|
2293 | sym_hashes_end -= symtab_hdr->sh_info;
|
---|
2294 |
|
---|
2295 | rel_end = relocs + sec->reloc_count;
|
---|
2296 | for (rel = relocs; rel < rel_end; rel++)
|
---|
2297 | {
|
---|
2298 | struct elf_link_hash_entry *h;
|
---|
2299 | unsigned long r_symndx;
|
---|
2300 | enum elf_cris_reloc_type r_type;
|
---|
2301 |
|
---|
2302 | r_symndx = ELF32_R_SYM (rel->r_info);
|
---|
2303 | if (r_symndx < symtab_hdr->sh_info)
|
---|
2304 | h = NULL;
|
---|
2305 | else
|
---|
2306 | h = sym_hashes[r_symndx - symtab_hdr->sh_info];
|
---|
2307 |
|
---|
2308 | r_type = ELF32_R_TYPE (rel->r_info);
|
---|
2309 |
|
---|
2310 | /* Some relocs require linker-created sections; we need to hang them
|
---|
2311 | on the first input bfd we found that contained dynamic relocs. */
|
---|
2312 | switch (r_type)
|
---|
2313 | {
|
---|
2314 | case R_CRIS_16_GOT:
|
---|
2315 | case R_CRIS_32_GOT:
|
---|
2316 | case R_CRIS_32_GOTREL:
|
---|
2317 | case R_CRIS_32_PLT_GOTREL:
|
---|
2318 | case R_CRIS_32_PLT_PCREL:
|
---|
2319 | case R_CRIS_16_GOTPLT:
|
---|
2320 | case R_CRIS_32_GOTPLT:
|
---|
2321 | if (dynobj == NULL)
|
---|
2322 | {
|
---|
2323 | elf_hash_table (info)->dynobj = dynobj = abfd;
|
---|
2324 |
|
---|
2325 | /* Create the .got section, so we can assume it's always
|
---|
2326 | present whenever there's a dynobj. */
|
---|
2327 | if (!_bfd_elf_create_got_section (dynobj, info))
|
---|
2328 | return FALSE;
|
---|
2329 | }
|
---|
2330 | break;
|
---|
2331 |
|
---|
2332 | default:
|
---|
2333 | break;
|
---|
2334 | }
|
---|
2335 |
|
---|
2336 | /* Some relocs require a global offset table (but perhaps not a
|
---|
2337 | specific GOT entry). */
|
---|
2338 | switch (r_type)
|
---|
2339 | {
|
---|
2340 | /* For R_CRIS_16_GOTPLT and R_CRIS_32_GOTPLT, we need a GOT
|
---|
2341 | entry only for local symbols. Unfortunately, we don't know
|
---|
2342 | until later on if there's a version script that forces the
|
---|
2343 | symbol local. We must have the .rela.got section in place
|
---|
2344 | before we know if the symbol looks global now, so we need
|
---|
2345 | to treat the reloc just like for R_CRIS_16_GOT and
|
---|
2346 | R_CRIS_32_GOT. */
|
---|
2347 | case R_CRIS_16_GOTPLT:
|
---|
2348 | case R_CRIS_32_GOTPLT:
|
---|
2349 | case R_CRIS_16_GOT:
|
---|
2350 | case R_CRIS_32_GOT:
|
---|
2351 | if (srelgot == NULL
|
---|
2352 | && (h != NULL || info->shared))
|
---|
2353 | {
|
---|
2354 | srelgot = bfd_get_section_by_name (dynobj, ".rela.got");
|
---|
2355 | if (srelgot == NULL)
|
---|
2356 | {
|
---|
2357 | srelgot = bfd_make_section (dynobj, ".rela.got");
|
---|
2358 | if (srelgot == NULL
|
---|
2359 | || !bfd_set_section_flags (dynobj, srelgot,
|
---|
2360 | (SEC_ALLOC
|
---|
2361 | | SEC_LOAD
|
---|
2362 | | SEC_HAS_CONTENTS
|
---|
2363 | | SEC_IN_MEMORY
|
---|
2364 | | SEC_LINKER_CREATED
|
---|
2365 | | SEC_READONLY))
|
---|
2366 | || !bfd_set_section_alignment (dynobj, srelgot, 2))
|
---|
2367 | return FALSE;
|
---|
2368 | }
|
---|
2369 | }
|
---|
2370 | /* Fall through. */
|
---|
2371 |
|
---|
2372 | case R_CRIS_32_GOTREL:
|
---|
2373 | case R_CRIS_32_PLT_GOTREL:
|
---|
2374 | if (sgot == NULL)
|
---|
2375 | sgot = bfd_get_section_by_name (dynobj, ".got");
|
---|
2376 |
|
---|
2377 | if (local_got_refcounts == NULL)
|
---|
2378 | {
|
---|
2379 | bfd_size_type amt;
|
---|
2380 |
|
---|
2381 | /* We use index local_got_refcounts[-1] to count all
|
---|
2382 | GOT-relative relocations that do not have explicit
|
---|
2383 | GOT entries. */
|
---|
2384 | amt = symtab_hdr->sh_info + 1;
|
---|
2385 | amt *= sizeof (bfd_signed_vma);
|
---|
2386 | local_got_refcounts = ((bfd_signed_vma *) bfd_zalloc (abfd, amt));
|
---|
2387 | if (local_got_refcounts == NULL)
|
---|
2388 | return FALSE;
|
---|
2389 |
|
---|
2390 | local_got_refcounts++;
|
---|
2391 | elf_local_got_refcounts (abfd) = local_got_refcounts;
|
---|
2392 | }
|
---|
2393 | break;
|
---|
2394 |
|
---|
2395 | default:
|
---|
2396 | break;
|
---|
2397 | }
|
---|
2398 |
|
---|
2399 | switch (r_type)
|
---|
2400 | {
|
---|
2401 | case R_CRIS_16_GOTPLT:
|
---|
2402 | case R_CRIS_32_GOTPLT:
|
---|
2403 | /* Mark that we need a GOT entry if the PLT entry (and its GOT
|
---|
2404 | entry) is eliminated. We can only do this for a non-local
|
---|
2405 | symbol. */
|
---|
2406 | if (h != NULL)
|
---|
2407 | {
|
---|
2408 | ((struct elf_cris_link_hash_entry *) h)->gotplt_refcount++;
|
---|
2409 | goto handle_gotplt_reloc;
|
---|
2410 | }
|
---|
2411 | /* If h is NULL then this is a local symbol, and we must make a
|
---|
2412 | GOT entry for it, so handle it like a GOT reloc. */
|
---|
2413 | /* Fall through. */
|
---|
2414 |
|
---|
2415 | case R_CRIS_16_GOT:
|
---|
2416 | case R_CRIS_32_GOT:
|
---|
2417 | /* This symbol requires a global offset table entry. */
|
---|
2418 | if (h != NULL)
|
---|
2419 | {
|
---|
2420 | if (h->got.refcount == 0)
|
---|
2421 | {
|
---|
2422 | /* Make sure this symbol is output as a dynamic symbol. */
|
---|
2423 | if (h->dynindx == -1)
|
---|
2424 | {
|
---|
2425 | if (!bfd_elf32_link_record_dynamic_symbol (info, h))
|
---|
2426 | return FALSE;
|
---|
2427 | }
|
---|
2428 |
|
---|
2429 | /* Allocate space in the .got section. */
|
---|
2430 | sgot->_raw_size += 4;
|
---|
2431 | /* Allocate relocation space. */
|
---|
2432 | srelgot->_raw_size += sizeof (Elf32_External_Rela);
|
---|
2433 | }
|
---|
2434 | h->got.refcount++;
|
---|
2435 | }
|
---|
2436 | else
|
---|
2437 | {
|
---|
2438 | /* This is a global offset table entry for a local symbol. */
|
---|
2439 | if (local_got_refcounts[r_symndx] == 0)
|
---|
2440 | {
|
---|
2441 | sgot->_raw_size += 4;
|
---|
2442 | if (info->shared)
|
---|
2443 | {
|
---|
2444 | /* If we are generating a shared object, we need to
|
---|
2445 | output a R_CRIS_RELATIVE reloc so that the dynamic
|
---|
2446 | linker can adjust this GOT entry. */
|
---|
2447 | srelgot->_raw_size += sizeof (Elf32_External_Rela);
|
---|
2448 | }
|
---|
2449 | }
|
---|
2450 | local_got_refcounts[r_symndx]++;
|
---|
2451 | }
|
---|
2452 | break;
|
---|
2453 |
|
---|
2454 | case R_CRIS_32_GOTREL:
|
---|
2455 | /* This reference requires a global offset table.
|
---|
2456 | FIXME: The actual refcount isn't used currently; the .got
|
---|
2457 | section can't be removed if there were any references in the
|
---|
2458 | input. */
|
---|
2459 | local_got_refcounts[-1]++;
|
---|
2460 | break;
|
---|
2461 |
|
---|
2462 | handle_gotplt_reloc:
|
---|
2463 |
|
---|
2464 | case R_CRIS_32_PLT_GOTREL:
|
---|
2465 | /* This reference requires a global offset table. */
|
---|
2466 | local_got_refcounts[-1]++;
|
---|
2467 | /* Fall through. */
|
---|
2468 |
|
---|
2469 | case R_CRIS_32_PLT_PCREL:
|
---|
2470 | /* This symbol requires a procedure linkage table entry. We
|
---|
2471 | actually build the entry in adjust_dynamic_symbol,
|
---|
2472 | because this might be a case of linking PIC code which is
|
---|
2473 | never referenced by a dynamic object, in which case we
|
---|
2474 | don't need to generate a procedure linkage table entry
|
---|
2475 | after all. */
|
---|
2476 |
|
---|
2477 | /* If this is a local symbol, we resolve it directly without
|
---|
2478 | creating a procedure linkage table entry. */
|
---|
2479 | if (h == NULL || ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
|
---|
2480 | continue;
|
---|
2481 |
|
---|
2482 | h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_PLT;
|
---|
2483 | h->plt.refcount++;
|
---|
2484 | break;
|
---|
2485 |
|
---|
2486 | case R_CRIS_8:
|
---|
2487 | case R_CRIS_16:
|
---|
2488 | case R_CRIS_32:
|
---|
2489 | /* Let's help debug shared library creation. Any of these
|
---|
2490 | relocs can be used in shared libs, but pages containing them
|
---|
2491 | cannot be shared. Don't warn for sections we don't care
|
---|
2492 | about, such as debug sections or non-constant sections. We
|
---|
2493 | can't help tables of (global) function pointers, for example,
|
---|
2494 | though they must be emitted in a data section to avoid having
|
---|
2495 | impure text sections. */
|
---|
2496 | if (info->shared
|
---|
2497 | && (sec->flags & SEC_ALLOC) != 0
|
---|
2498 | && (sec->flags & SEC_READONLY) != 0)
|
---|
2499 | {
|
---|
2500 | /* FIXME: How do we make this optionally a warning only? */
|
---|
2501 | (*_bfd_error_handler)
|
---|
2502 | (_("%s, section %s:\n relocation %s should not be used in a shared object; recompile with -fPIC"),
|
---|
2503 | bfd_archive_filename (abfd),
|
---|
2504 | sec->name,
|
---|
2505 | cris_elf_howto_table[r_type].name);
|
---|
2506 | }
|
---|
2507 | /* Fall through. */
|
---|
2508 |
|
---|
2509 | case R_CRIS_8_PCREL:
|
---|
2510 | case R_CRIS_16_PCREL:
|
---|
2511 | case R_CRIS_32_PCREL:
|
---|
2512 | if (h != NULL)
|
---|
2513 | {
|
---|
2514 | h->elf_link_hash_flags |= ELF_LINK_NON_GOT_REF;
|
---|
2515 |
|
---|
2516 | /* Make sure a plt entry is created for this symbol if it
|
---|
2517 | turns out to be a function defined by a dynamic object. */
|
---|
2518 | if (ELF_ST_VISIBILITY (h->other) == STV_DEFAULT)
|
---|
2519 | h->plt.refcount++;
|
---|
2520 | }
|
---|
2521 |
|
---|
2522 | /* If we are creating a shared library and this is not a local
|
---|
2523 | symbol, we need to copy the reloc into the shared library.
|
---|
2524 | However when linking with -Bsymbolic and this is a global
|
---|
2525 | symbol which is defined in an object we are including in the
|
---|
2526 | link (i.e., DEF_REGULAR is set), then we can resolve the
|
---|
2527 | reloc directly. At this point we have not seen all the input
|
---|
2528 | files, so it is possible that DEF_REGULAR is not set now but
|
---|
2529 | will be set later (it is never cleared). In case of a weak
|
---|
2530 | definition, DEF_REGULAR may be cleared later by a strong
|
---|
2531 | definition in a shared library. We account for that
|
---|
2532 | possibility below by storing information in the relocs_copied
|
---|
2533 | field of the hash table entry. A similar situation occurs
|
---|
2534 | when creating shared libraries and symbol visibility changes
|
---|
2535 | render the symbol local. */
|
---|
2536 |
|
---|
2537 | /* No need to do anything if we're not creating a shared object. */
|
---|
2538 | if (! info->shared)
|
---|
2539 | break;
|
---|
2540 |
|
---|
2541 | /* We don't need to handle relocs into sections not going into
|
---|
2542 | the "real" output. */
|
---|
2543 | if ((sec->flags & SEC_ALLOC) == 0)
|
---|
2544 | break;
|
---|
2545 |
|
---|
2546 | /* We can only eliminate PC-relative relocs. */
|
---|
2547 | if (r_type == R_CRIS_8_PCREL
|
---|
2548 | || r_type == R_CRIS_16_PCREL
|
---|
2549 | || r_type == R_CRIS_32_PCREL)
|
---|
2550 | {
|
---|
2551 | /* If the symbol is local, then we can eliminate the reloc. */
|
---|
2552 | if (h == NULL || ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
|
---|
2553 | break;
|
---|
2554 |
|
---|
2555 | /* If this is with -Bsymbolic and the symbol isn't weak, and
|
---|
2556 | is defined by an ordinary object (the ones we include in
|
---|
2557 | this shared library) then we can also eliminate the
|
---|
2558 | reloc. See comment above for more eliminable cases which
|
---|
2559 | we can't identify at this time. */
|
---|
2560 | if (info->symbolic
|
---|
2561 | && h->root.type != bfd_link_hash_defweak
|
---|
2562 | && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) != 0)
|
---|
2563 | break;
|
---|
2564 | }
|
---|
2565 |
|
---|
2566 | /* We create a reloc section in dynobj and make room for this
|
---|
2567 | reloc. */
|
---|
2568 | if (sreloc == NULL)
|
---|
2569 | {
|
---|
2570 | const char *name;
|
---|
2571 |
|
---|
2572 | name = (bfd_elf_string_from_elf_section
|
---|
2573 | (abfd,
|
---|
2574 | elf_elfheader (abfd)->e_shstrndx,
|
---|
2575 | elf_section_data (sec)->rel_hdr.sh_name));
|
---|
2576 | if (name == NULL)
|
---|
2577 | return FALSE;
|
---|
2578 |
|
---|
2579 | BFD_ASSERT (strncmp (name, ".rela", 5) == 0
|
---|
2580 | && strcmp (bfd_get_section_name (abfd, sec),
|
---|
2581 | name + 5) == 0);
|
---|
2582 |
|
---|
2583 | sreloc = bfd_get_section_by_name (dynobj, name);
|
---|
2584 | if (sreloc == NULL)
|
---|
2585 | {
|
---|
2586 | sreloc = bfd_make_section (dynobj, name);
|
---|
2587 | if (sreloc == NULL
|
---|
2588 | || !bfd_set_section_flags (dynobj, sreloc,
|
---|
2589 | (SEC_ALLOC
|
---|
2590 | | SEC_LOAD
|
---|
2591 | | SEC_HAS_CONTENTS
|
---|
2592 | | SEC_IN_MEMORY
|
---|
2593 | | SEC_LINKER_CREATED
|
---|
2594 | | SEC_READONLY))
|
---|
2595 | || !bfd_set_section_alignment (dynobj, sreloc, 2))
|
---|
2596 | return FALSE;
|
---|
2597 | }
|
---|
2598 | if (sec->flags & SEC_READONLY)
|
---|
2599 | info->flags |= DF_TEXTREL;
|
---|
2600 | }
|
---|
2601 |
|
---|
2602 | sreloc->_raw_size += sizeof (Elf32_External_Rela);
|
---|
2603 |
|
---|
2604 | /* If we are linking with -Bsymbolic, we count the number of PC
|
---|
2605 | relative relocations we have entered for this symbol, so that
|
---|
2606 | we can discard them again if the symbol is later defined by a
|
---|
2607 | regular object. We know that h is really a pointer to an
|
---|
2608 | elf_cris_link_hash_entry. */
|
---|
2609 | if ((r_type == R_CRIS_8_PCREL
|
---|
2610 | || r_type == R_CRIS_16_PCREL
|
---|
2611 | || r_type == R_CRIS_32_PCREL)
|
---|
2612 | && info->symbolic)
|
---|
2613 | {
|
---|
2614 | struct elf_cris_link_hash_entry *eh;
|
---|
2615 | struct elf_cris_pcrel_relocs_copied *p;
|
---|
2616 |
|
---|
2617 | eh = (struct elf_cris_link_hash_entry *) h;
|
---|
2618 |
|
---|
2619 | for (p = eh->pcrel_relocs_copied; p != NULL; p = p->next)
|
---|
2620 | if (p->section == sreloc)
|
---|
2621 | break;
|
---|
2622 |
|
---|
2623 | if (p == NULL)
|
---|
2624 | {
|
---|
2625 | p = ((struct elf_cris_pcrel_relocs_copied *)
|
---|
2626 | bfd_alloc (dynobj, (bfd_size_type) sizeof *p));
|
---|
2627 | if (p == NULL)
|
---|
2628 | return FALSE;
|
---|
2629 | p->next = eh->pcrel_relocs_copied;
|
---|
2630 | eh->pcrel_relocs_copied = p;
|
---|
2631 | p->section = sreloc;
|
---|
2632 | p->count = 0;
|
---|
2633 | }
|
---|
2634 |
|
---|
2635 | ++p->count;
|
---|
2636 | }
|
---|
2637 | break;
|
---|
2638 |
|
---|
2639 | /* This relocation describes the C++ object vtable hierarchy.
|
---|
2640 | Reconstruct it for later use during GC. */
|
---|
2641 | case R_CRIS_GNU_VTINHERIT:
|
---|
2642 | if (!_bfd_elf32_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
|
---|
2643 | return FALSE;
|
---|
2644 | break;
|
---|
2645 |
|
---|
2646 | /* This relocation describes which C++ vtable entries are actually
|
---|
2647 | used. Record for later use during GC. */
|
---|
2648 | case R_CRIS_GNU_VTENTRY:
|
---|
2649 | if (!_bfd_elf32_gc_record_vtentry (abfd, sec, h, rel->r_addend))
|
---|
2650 | return FALSE;
|
---|
2651 | break;
|
---|
2652 |
|
---|
2653 | default:
|
---|
2654 | /* Other relocs do not appear here. */
|
---|
2655 | bfd_set_error (bfd_error_bad_value);
|
---|
2656 | return FALSE;
|
---|
2657 | }
|
---|
2658 | }
|
---|
2659 |
|
---|
2660 | return TRUE;
|
---|
2661 | }
|
---|
2662 |
|
---|
2663 | /* Set the sizes of the dynamic sections. */
|
---|
2664 |
|
---|
2665 | static bfd_boolean
|
---|
2666 | elf_cris_size_dynamic_sections (output_bfd, info)
|
---|
2667 | bfd *output_bfd ATTRIBUTE_UNUSED;
|
---|
2668 | struct bfd_link_info *info;
|
---|
2669 | {
|
---|
2670 | bfd *dynobj;
|
---|
2671 | asection *s;
|
---|
2672 | bfd_boolean plt;
|
---|
2673 | bfd_boolean relocs;
|
---|
2674 |
|
---|
2675 | dynobj = elf_hash_table (info)->dynobj;
|
---|
2676 | BFD_ASSERT (dynobj != NULL);
|
---|
2677 |
|
---|
2678 | if (elf_hash_table (info)->dynamic_sections_created)
|
---|
2679 | {
|
---|
2680 | /* Set the contents of the .interp section to the interpreter. */
|
---|
2681 | if (!info->shared)
|
---|
2682 | {
|
---|
2683 | s = bfd_get_section_by_name (dynobj, ".interp");
|
---|
2684 | BFD_ASSERT (s != NULL);
|
---|
2685 | s->_raw_size = sizeof ELF_DYNAMIC_INTERPRETER;
|
---|
2686 | s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
|
---|
2687 | }
|
---|
2688 | }
|
---|
2689 | else
|
---|
2690 | {
|
---|
2691 | /* Adjust all expected GOTPLT uses to use a GOT entry instead. */
|
---|
2692 | elf_cris_link_hash_traverse (elf_cris_hash_table (info),
|
---|
2693 | elf_cris_adjust_gotplt_to_got,
|
---|
2694 | (PTR) info);
|
---|
2695 |
|
---|
2696 | /* We may have created entries in the .rela.got section.
|
---|
2697 | However, if we are not creating the dynamic sections, we will
|
---|
2698 | not actually use these entries. Reset the size of .rela.got,
|
---|
2699 | which will cause it to get stripped from the output file
|
---|
2700 | below. */
|
---|
2701 | s = bfd_get_section_by_name (dynobj, ".rela.got");
|
---|
2702 | if (s != NULL)
|
---|
2703 | s->_raw_size = 0;
|
---|
2704 | }
|
---|
2705 |
|
---|
2706 | /* If this is a -Bsymbolic shared link, then we need to discard all PC
|
---|
2707 | relative relocs against symbols defined in a regular object. We
|
---|
2708 | allocated space for them in the check_relocs routine, but we will not
|
---|
2709 | fill them in in the relocate_section routine. We also discard space
|
---|
2710 | for relocs that have become for local symbols due to symbol
|
---|
2711 | visibility changes. For programs, we discard space for relocs for
|
---|
2712 | symbols not referenced by any dynamic object. */
|
---|
2713 | if (info->shared)
|
---|
2714 | elf_cris_link_hash_traverse (elf_cris_hash_table (info),
|
---|
2715 | elf_cris_discard_excess_dso_dynamics,
|
---|
2716 | (PTR) info);
|
---|
2717 | else
|
---|
2718 | elf_cris_link_hash_traverse (elf_cris_hash_table (info),
|
---|
2719 | elf_cris_discard_excess_program_dynamics,
|
---|
2720 | (PTR) info);
|
---|
2721 |
|
---|
2722 | /* The check_relocs and adjust_dynamic_symbol entry points have
|
---|
2723 | determined the sizes of the various dynamic sections. Allocate
|
---|
2724 | memory for them. */
|
---|
2725 | plt = FALSE;
|
---|
2726 | relocs = FALSE;
|
---|
2727 | for (s = dynobj->sections; s != NULL; s = s->next)
|
---|
2728 | {
|
---|
2729 | const char *name;
|
---|
2730 | bfd_boolean strip;
|
---|
2731 |
|
---|
2732 | if ((s->flags & SEC_LINKER_CREATED) == 0)
|
---|
2733 | continue;
|
---|
2734 |
|
---|
2735 | /* It's OK to base decisions on the section name, because none
|
---|
2736 | of the dynobj section names depend upon the input files. */
|
---|
2737 | name = bfd_get_section_name (dynobj, s);
|
---|
2738 |
|
---|
2739 | strip = FALSE;
|
---|
2740 |
|
---|
2741 | if (strcmp (name, ".plt") == 0)
|
---|
2742 | {
|
---|
2743 | if (s->_raw_size == 0)
|
---|
2744 | {
|
---|
2745 | /* Strip this section if we don't need it; see the
|
---|
2746 | comment below. */
|
---|
2747 | strip = TRUE;
|
---|
2748 | }
|
---|
2749 | else
|
---|
2750 | {
|
---|
2751 | /* Remember whether there is a PLT. */
|
---|
2752 | plt = TRUE;
|
---|
2753 | }
|
---|
2754 | }
|
---|
2755 | else if (strncmp (name, ".rela", 5) == 0)
|
---|
2756 | {
|
---|
2757 | if (s->_raw_size == 0)
|
---|
2758 | {
|
---|
2759 | /* If we don't need this section, strip it from the
|
---|
2760 | output file. This is mostly to handle .rela.bss and
|
---|
2761 | .rela.plt. We must create both sections in
|
---|
2762 | create_dynamic_sections, because they must be created
|
---|
2763 | before the linker maps input sections to output
|
---|
2764 | sections. The linker does that before
|
---|
2765 | adjust_dynamic_symbol is called, and it is that
|
---|
2766 | function which decides whether anything needs to go
|
---|
2767 | into these sections. */
|
---|
2768 | strip = TRUE;
|
---|
2769 | }
|
---|
2770 | else
|
---|
2771 | {
|
---|
2772 | /* Remember whether there are any reloc sections other
|
---|
2773 | than .rela.plt. */
|
---|
2774 | if (strcmp (name, ".rela.plt") != 0)
|
---|
2775 | relocs = TRUE;
|
---|
2776 |
|
---|
2777 | /* We use the reloc_count field as a counter if we need
|
---|
2778 | to copy relocs into the output file. */
|
---|
2779 | s->reloc_count = 0;
|
---|
2780 | }
|
---|
2781 | }
|
---|
2782 | else if (strncmp (name, ".got", 4) != 0)
|
---|
2783 | {
|
---|
2784 | /* It's not one of our sections, so don't allocate space. */
|
---|
2785 | continue;
|
---|
2786 | }
|
---|
2787 |
|
---|
2788 | if (strip)
|
---|
2789 | {
|
---|
2790 | _bfd_strip_section_from_output (info, s);
|
---|
2791 | continue;
|
---|
2792 | }
|
---|
2793 |
|
---|
2794 | /* Allocate memory for the section contents. We use bfd_zalloc here
|
---|
2795 | in case unused entries are not reclaimed before the section's
|
---|
2796 | contents are written out. This should not happen, but this way
|
---|
2797 | if it does, we will not write out garbage. For reloc sections,
|
---|
2798 | this will make entries have the type R_CRIS_NONE. */
|
---|
2799 | s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->_raw_size);
|
---|
2800 | if (s->contents == NULL && s->_raw_size != 0)
|
---|
2801 | return FALSE;
|
---|
2802 | }
|
---|
2803 |
|
---|
2804 | if (elf_hash_table (info)->dynamic_sections_created)
|
---|
2805 | {
|
---|
2806 | /* Add some entries to the .dynamic section. We fill in the
|
---|
2807 | values later, in elf_cris_finish_dynamic_sections, but we
|
---|
2808 | must add the entries now so that we get the correct size for
|
---|
2809 | the .dynamic section. The DT_DEBUG entry is filled in by the
|
---|
2810 | dynamic linker and used by the debugger. */
|
---|
2811 | #define add_dynamic_entry(TAG, VAL) \
|
---|
2812 | bfd_elf32_add_dynamic_entry (info, (bfd_vma) (TAG), (bfd_vma) (VAL))
|
---|
2813 |
|
---|
2814 | if (!info->shared)
|
---|
2815 | {
|
---|
2816 | if (!add_dynamic_entry (DT_DEBUG, 0))
|
---|
2817 | return FALSE;
|
---|
2818 | }
|
---|
2819 |
|
---|
2820 | if (plt)
|
---|
2821 | {
|
---|
2822 | if (!add_dynamic_entry (DT_PLTGOT, 0)
|
---|
2823 | || !add_dynamic_entry (DT_PLTRELSZ, 0)
|
---|
2824 | || !add_dynamic_entry (DT_PLTREL, DT_RELA)
|
---|
2825 | || !add_dynamic_entry (DT_JMPREL, 0))
|
---|
2826 | return FALSE;
|
---|
2827 | }
|
---|
2828 |
|
---|
2829 | if (relocs)
|
---|
2830 | {
|
---|
2831 | if (!add_dynamic_entry (DT_RELA, 0)
|
---|
2832 | || !add_dynamic_entry (DT_RELASZ, 0)
|
---|
2833 | || !add_dynamic_entry (DT_RELAENT, sizeof (Elf32_External_Rela)))
|
---|
2834 | return FALSE;
|
---|
2835 | }
|
---|
2836 |
|
---|
2837 | if ((info->flags & DF_TEXTREL) != 0)
|
---|
2838 | {
|
---|
2839 | if (!add_dynamic_entry (DT_TEXTREL, 0))
|
---|
2840 | return FALSE;
|
---|
2841 | info->flags |= DF_TEXTREL;
|
---|
2842 | }
|
---|
2843 | }
|
---|
2844 | #undef add_dynamic_entry
|
---|
2845 |
|
---|
2846 | return TRUE;
|
---|
2847 | }
|
---|
2848 |
|
---|
2849 | /* This function is called via elf_cris_link_hash_traverse if we are
|
---|
2850 | creating a shared object. In the -Bsymbolic case, it discards the
|
---|
2851 | space allocated to copy PC relative relocs against symbols which
|
---|
2852 | are defined in regular objects. For the normal non-symbolic case,
|
---|
2853 | we also discard space for relocs that have become local due to
|
---|
2854 | symbol visibility changes. We allocated space for them in the
|
---|
2855 | check_relocs routine, but we won't fill them in in the
|
---|
2856 | relocate_section routine. */
|
---|
2857 |
|
---|
2858 | static bfd_boolean
|
---|
2859 | elf_cris_discard_excess_dso_dynamics (h, inf)
|
---|
2860 | struct elf_cris_link_hash_entry *h;
|
---|
2861 | PTR inf;
|
---|
2862 | {
|
---|
2863 | struct elf_cris_pcrel_relocs_copied *s;
|
---|
2864 | struct bfd_link_info *info = (struct bfd_link_info *) inf;
|
---|
2865 |
|
---|
2866 | if (h->root.root.type == bfd_link_hash_warning)
|
---|
2867 | h = (struct elf_cris_link_hash_entry *) h->root.root.u.i.link;
|
---|
2868 |
|
---|
2869 | /* If a symbol has been forced local or we have found a regular
|
---|
2870 | definition for the symbolic link case, then we won't be needing
|
---|
2871 | any relocs. */
|
---|
2872 | if ((h->root.elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) != 0
|
---|
2873 | && ((h->root.elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) != 0
|
---|
2874 | || info->symbolic))
|
---|
2875 | {
|
---|
2876 | for (s = h->pcrel_relocs_copied; s != NULL; s = s->next)
|
---|
2877 | s->section->_raw_size -= s->count * sizeof (Elf32_External_Rela);
|
---|
2878 | }
|
---|
2879 |
|
---|
2880 | return TRUE;
|
---|
2881 | }
|
---|
2882 |
|
---|
2883 | /* This function is called via elf_cris_link_hash_traverse if we are *not*
|
---|
2884 | creating a shared object. We discard space for relocs for symbols put
|
---|
2885 | in the .got, but which we found we do not have to resolve at run-time. */
|
---|
2886 |
|
---|
2887 | static bfd_boolean
|
---|
2888 | elf_cris_discard_excess_program_dynamics (h, inf)
|
---|
2889 | struct elf_cris_link_hash_entry *h;
|
---|
2890 | PTR inf;
|
---|
2891 | {
|
---|
2892 | struct bfd_link_info *info = (struct bfd_link_info *) inf;
|
---|
2893 |
|
---|
2894 | if (h->root.root.type == bfd_link_hash_warning)
|
---|
2895 | h = (struct elf_cris_link_hash_entry *) h->root.root.u.i.link;
|
---|
2896 |
|
---|
2897 | /* If we're not creating a shared library and have a symbol which is
|
---|
2898 | referred to by .got references, but the symbol is defined locally,
|
---|
2899 | (or rather, not not defined by a DSO) then lose the reloc for the
|
---|
2900 | .got (don't allocate room for it). */
|
---|
2901 | if ((h->root.elf_link_hash_flags & ELF_LINK_HASH_DEF_DYNAMIC) == 0)
|
---|
2902 | {
|
---|
2903 | if (h->root.got.refcount > 0
|
---|
2904 | /* The size of this section is only valid and in sync with the
|
---|
2905 | various reference counts if we do dynamic; don't decrement it
|
---|
2906 | otherwise. */
|
---|
2907 | && elf_hash_table (info)->dynamic_sections_created)
|
---|
2908 | {
|
---|
2909 | bfd *dynobj = elf_hash_table (info)->dynobj;
|
---|
2910 | asection *srelgot;
|
---|
2911 |
|
---|
2912 | BFD_ASSERT (dynobj != NULL);
|
---|
2913 |
|
---|
2914 | srelgot = bfd_get_section_by_name (dynobj, ".rela.got");
|
---|
2915 |
|
---|
2916 | BFD_ASSERT (srelgot != NULL);
|
---|
2917 |
|
---|
2918 | srelgot->_raw_size -= sizeof (Elf32_External_Rela);
|
---|
2919 | }
|
---|
2920 |
|
---|
2921 | /* If the locally-defined symbol isn't used by a DSO, then we don't
|
---|
2922 | have to export it as a dynamic symbol. This was already done for
|
---|
2923 | functions; doing this for all symbols would presumably not
|
---|
2924 | introduce new problems. Of course we don't do this if we're
|
---|
2925 | exporting all dynamic symbols. */
|
---|
2926 | if (! info->export_dynamic
|
---|
2927 | && (h->root.elf_link_hash_flags & ELF_LINK_HASH_REF_DYNAMIC) == 0)
|
---|
2928 | {
|
---|
2929 | h->root.dynindx = -1;
|
---|
2930 | _bfd_elf_strtab_delref (elf_hash_table (info)->dynstr,
|
---|
2931 | h->root.dynstr_index);
|
---|
2932 | }
|
---|
2933 | }
|
---|
2934 |
|
---|
2935 | return TRUE;
|
---|
2936 | }
|
---|
2937 |
|
---|
2938 | /* Reject a file depending on presence and expectation of prefixed
|
---|
2939 | underscores on symbols. */
|
---|
2940 |
|
---|
2941 | static bfd_boolean
|
---|
2942 | cris_elf_object_p (abfd)
|
---|
2943 | bfd *abfd;
|
---|
2944 | {
|
---|
2945 | if ((elf_elfheader (abfd)->e_flags & EF_CRIS_UNDERSCORE))
|
---|
2946 | return (bfd_get_symbol_leading_char (abfd) == '_');
|
---|
2947 | else
|
---|
2948 | return (bfd_get_symbol_leading_char (abfd) == 0);
|
---|
2949 | }
|
---|
2950 |
|
---|
2951 | /* Mark presence or absence of leading underscore. */
|
---|
2952 |
|
---|
2953 | static void
|
---|
2954 | cris_elf_final_write_processing (abfd, linker)
|
---|
2955 | bfd *abfd;
|
---|
2956 | bfd_boolean linker ATTRIBUTE_UNUSED;
|
---|
2957 | {
|
---|
2958 | if (bfd_get_symbol_leading_char (abfd) == '_')
|
---|
2959 | elf_elfheader (abfd)->e_flags |= EF_CRIS_UNDERSCORE;
|
---|
2960 | else
|
---|
2961 | elf_elfheader (abfd)->e_flags &= ~EF_CRIS_UNDERSCORE;
|
---|
2962 | }
|
---|
2963 |
|
---|
2964 | /* Display the flags field. */
|
---|
2965 |
|
---|
2966 | static bfd_boolean
|
---|
2967 | cris_elf_print_private_bfd_data (abfd, ptr)
|
---|
2968 | bfd *abfd;
|
---|
2969 | PTR ptr;
|
---|
2970 | {
|
---|
2971 | FILE *file = (FILE *) ptr;
|
---|
2972 |
|
---|
2973 | BFD_ASSERT (abfd != NULL && ptr != NULL)
|
---|
2974 |
|
---|
2975 | _bfd_elf_print_private_bfd_data (abfd, ptr);
|
---|
2976 |
|
---|
2977 | fprintf (file, _("private flags = %lx:"), elf_elfheader (abfd)->e_flags);
|
---|
2978 |
|
---|
2979 | if (elf_elfheader (abfd)->e_flags & EF_CRIS_UNDERSCORE)
|
---|
2980 | fprintf (file, _(" [symbols have a _ prefix]"));
|
---|
2981 |
|
---|
2982 | fputc ('\n', file);
|
---|
2983 | return TRUE;
|
---|
2984 | }
|
---|
2985 |
|
---|
2986 | /* Don't mix files with and without a leading underscore. */
|
---|
2987 |
|
---|
2988 | static bfd_boolean
|
---|
2989 | cris_elf_merge_private_bfd_data (ibfd, obfd)
|
---|
2990 | bfd *ibfd;
|
---|
2991 | bfd *obfd;
|
---|
2992 | {
|
---|
2993 | flagword old_flags, new_flags;
|
---|
2994 |
|
---|
2995 | if (! _bfd_generic_verify_endian_match (ibfd, obfd))
|
---|
2996 | return FALSE;
|
---|
2997 |
|
---|
2998 | if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour
|
---|
2999 | || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
|
---|
3000 | return TRUE;
|
---|
3001 |
|
---|
3002 | if (! elf_flags_init (obfd))
|
---|
3003 | {
|
---|
3004 | /* This happens when ld starts out with a 'blank' output file. */
|
---|
3005 | elf_flags_init (obfd) = TRUE;
|
---|
3006 |
|
---|
3007 | /* Set flags according to current bfd_target. */
|
---|
3008 | cris_elf_final_write_processing (obfd, FALSE);
|
---|
3009 | }
|
---|
3010 |
|
---|
3011 | old_flags = elf_elfheader (obfd)->e_flags;
|
---|
3012 | new_flags = elf_elfheader (ibfd)->e_flags;
|
---|
3013 |
|
---|
3014 | /* Is this good or bad? We'll follow with other excluding flags. */
|
---|
3015 | if ((old_flags & EF_CRIS_UNDERSCORE) != (new_flags & EF_CRIS_UNDERSCORE))
|
---|
3016 | {
|
---|
3017 | (*_bfd_error_handler)
|
---|
3018 | ((new_flags & EF_CRIS_UNDERSCORE)
|
---|
3019 | ? _("%s: uses _-prefixed symbols, but writing file with non-prefixed symbols")
|
---|
3020 | : _("%s: uses non-prefixed symbols, but writing file with _-prefixed symbols"),
|
---|
3021 | bfd_archive_filename (ibfd));
|
---|
3022 | bfd_set_error (bfd_error_bad_value);
|
---|
3023 | return FALSE;
|
---|
3024 | }
|
---|
3025 |
|
---|
3026 | return TRUE;
|
---|
3027 | }
|
---|
3028 |
|
---|
3029 |
|
---|
3030 | static enum elf_reloc_type_class
|
---|
3031 | elf_cris_reloc_type_class (rela)
|
---|
3032 | const Elf_Internal_Rela *rela;
|
---|
3033 | {
|
---|
3034 | switch ((int) ELF32_R_TYPE (rela->r_info))
|
---|
3035 | {
|
---|
3036 | case R_CRIS_RELATIVE:
|
---|
3037 | return reloc_class_relative;
|
---|
3038 | case R_CRIS_JUMP_SLOT:
|
---|
3039 | return reloc_class_plt;
|
---|
3040 | case R_CRIS_COPY:
|
---|
3041 | return reloc_class_copy;
|
---|
3042 | default:
|
---|
3043 | return reloc_class_normal;
|
---|
3044 | }
|
---|
3045 | }
|
---|
3046 | |
---|
3047 |
|
---|
3048 | #define ELF_ARCH bfd_arch_cris
|
---|
3049 | #define ELF_MACHINE_CODE EM_CRIS
|
---|
3050 | #define ELF_MAXPAGESIZE 0x2000
|
---|
3051 |
|
---|
3052 | #define TARGET_LITTLE_SYM bfd_elf32_cris_vec
|
---|
3053 | #define TARGET_LITTLE_NAME "elf32-cris"
|
---|
3054 | #define elf_symbol_leading_char 0
|
---|
3055 |
|
---|
3056 | #define elf_info_to_howto_rel NULL
|
---|
3057 | #define elf_info_to_howto cris_info_to_howto_rela
|
---|
3058 | #define elf_backend_relocate_section cris_elf_relocate_section
|
---|
3059 | #define elf_backend_gc_mark_hook cris_elf_gc_mark_hook
|
---|
3060 | #define elf_backend_gc_sweep_hook cris_elf_gc_sweep_hook
|
---|
3061 | #define elf_backend_check_relocs cris_elf_check_relocs
|
---|
3062 | #define elf_backend_grok_prstatus cris_elf_grok_prstatus
|
---|
3063 | #define elf_backend_grok_psinfo cris_elf_grok_psinfo
|
---|
3064 |
|
---|
3065 | #define elf_backend_can_gc_sections 1
|
---|
3066 | #define elf_backend_can_refcount 1
|
---|
3067 |
|
---|
3068 | #define elf_backend_object_p cris_elf_object_p
|
---|
3069 | #define elf_backend_final_write_processing \
|
---|
3070 | cris_elf_final_write_processing
|
---|
3071 | #define bfd_elf32_bfd_print_private_bfd_data \
|
---|
3072 | cris_elf_print_private_bfd_data
|
---|
3073 | #define bfd_elf32_bfd_merge_private_bfd_data \
|
---|
3074 | cris_elf_merge_private_bfd_data
|
---|
3075 |
|
---|
3076 | #define bfd_elf32_bfd_reloc_type_lookup cris_reloc_type_lookup
|
---|
3077 |
|
---|
3078 | #define bfd_elf32_bfd_link_hash_table_create \
|
---|
3079 | elf_cris_link_hash_table_create
|
---|
3080 | #define elf_backend_adjust_dynamic_symbol \
|
---|
3081 | elf_cris_adjust_dynamic_symbol
|
---|
3082 | #define elf_backend_size_dynamic_sections \
|
---|
3083 | elf_cris_size_dynamic_sections
|
---|
3084 | #define elf_backend_finish_dynamic_symbol \
|
---|
3085 | elf_cris_finish_dynamic_symbol
|
---|
3086 | #define elf_backend_finish_dynamic_sections \
|
---|
3087 | elf_cris_finish_dynamic_sections
|
---|
3088 | #define elf_backend_create_dynamic_sections \
|
---|
3089 | _bfd_elf_create_dynamic_sections
|
---|
3090 | #define bfd_elf32_bfd_final_link \
|
---|
3091 | _bfd_elf32_gc_common_final_link
|
---|
3092 | #define elf_backend_hide_symbol elf_cris_hide_symbol
|
---|
3093 | #define elf_backend_reloc_type_class elf_cris_reloc_type_class
|
---|
3094 |
|
---|
3095 | #define elf_backend_want_got_plt 1
|
---|
3096 | #define elf_backend_plt_readonly 1
|
---|
3097 | #define elf_backend_want_plt_sym 0
|
---|
3098 | #define elf_backend_got_header_size 12
|
---|
3099 | #define elf_backend_plt_header_size PLT_ENTRY_SIZE
|
---|
3100 |
|
---|
3101 | /* Later, we my want to optimize RELA entries into REL entries for dynamic
|
---|
3102 | linking and libraries (if it's a win of any significance). Until then,
|
---|
3103 | take the easy route. */
|
---|
3104 | #define elf_backend_may_use_rel_p 0
|
---|
3105 | #define elf_backend_may_use_rela_p 1
|
---|
3106 | #define elf_backend_rela_normal 1
|
---|
3107 |
|
---|
3108 | #include "elf32-target.h"
|
---|
3109 |
|
---|
3110 | #define INCLUDED_TARGET_FILE
|
---|
3111 |
|
---|
3112 | #undef TARGET_LITTLE_SYM
|
---|
3113 | #undef TARGET_LITTLE_NAME
|
---|
3114 | #undef elf_symbol_leading_char
|
---|
3115 |
|
---|
3116 | #define TARGET_LITTLE_SYM bfd_elf32_us_cris_vec
|
---|
3117 | #define TARGET_LITTLE_NAME "elf32-us-cris"
|
---|
3118 | #define elf_symbol_leading_char '_'
|
---|
3119 |
|
---|
3120 | #include "elf32-target.h"
|
---|