2004-05-14 Andrew Cagney <cagney@redhat.com>
[deliverable/binutils-gdb.git] / bfd / elf32-cris.c
1 /* CRIS-specific support for 32-bit ELF.
2 Copyright 2000, 2001, 2002, 2003, 2004 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 \f
409 /* Map BFD reloc types to CRIS ELF reloc types. */
410
411 struct cris_reloc_map
412 {
413 bfd_reloc_code_real_type bfd_reloc_val;
414 unsigned int cris_reloc_val;
415 };
416
417 static const struct cris_reloc_map cris_reloc_map [] =
418 {
419 { BFD_RELOC_NONE, R_CRIS_NONE },
420 { BFD_RELOC_8, R_CRIS_8 },
421 { BFD_RELOC_16, R_CRIS_16 },
422 { BFD_RELOC_32, R_CRIS_32 },
423 { BFD_RELOC_8_PCREL, R_CRIS_8_PCREL },
424 { BFD_RELOC_16_PCREL, R_CRIS_16_PCREL },
425 { BFD_RELOC_32_PCREL, R_CRIS_32_PCREL },
426 { BFD_RELOC_VTABLE_INHERIT, R_CRIS_GNU_VTINHERIT },
427 { BFD_RELOC_VTABLE_ENTRY, R_CRIS_GNU_VTENTRY },
428 { BFD_RELOC_CRIS_COPY, R_CRIS_COPY },
429 { BFD_RELOC_CRIS_GLOB_DAT, R_CRIS_GLOB_DAT },
430 { BFD_RELOC_CRIS_JUMP_SLOT, R_CRIS_JUMP_SLOT },
431 { BFD_RELOC_CRIS_RELATIVE, R_CRIS_RELATIVE },
432 { BFD_RELOC_CRIS_16_GOT, R_CRIS_16_GOT },
433 { BFD_RELOC_CRIS_32_GOT, R_CRIS_32_GOT },
434 { BFD_RELOC_CRIS_16_GOTPLT, R_CRIS_16_GOTPLT },
435 { BFD_RELOC_CRIS_32_GOTPLT, R_CRIS_32_GOTPLT },
436 { BFD_RELOC_CRIS_32_GOTREL, R_CRIS_32_GOTREL },
437 { BFD_RELOC_CRIS_32_PLT_GOTREL, R_CRIS_32_PLT_GOTREL },
438 { BFD_RELOC_CRIS_32_PLT_PCREL, R_CRIS_32_PLT_PCREL }
439 };
440
441 static reloc_howto_type *
442 cris_reloc_type_lookup (abfd, code)
443 bfd * abfd ATTRIBUTE_UNUSED;
444 bfd_reloc_code_real_type code;
445 {
446 unsigned int i;
447
448 for (i = 0; i < sizeof (cris_reloc_map) / sizeof (cris_reloc_map[0]); i++)
449 if (cris_reloc_map [i].bfd_reloc_val == code)
450 return & cris_elf_howto_table [cris_reloc_map[i].cris_reloc_val];
451
452 return NULL;
453 }
454
455 /* Set the howto pointer for an CRIS ELF reloc. */
456
457 static void
458 cris_info_to_howto_rela (abfd, cache_ptr, dst)
459 bfd * abfd ATTRIBUTE_UNUSED;
460 arelent * cache_ptr;
461 Elf_Internal_Rela * dst;
462 {
463 unsigned int r_type;
464
465 r_type = ELF32_R_TYPE (dst->r_info);
466 BFD_ASSERT (r_type < (unsigned int) R_CRIS_max);
467 cache_ptr->howto = & cris_elf_howto_table [r_type];
468 }
469 \f
470 /* Support for core dump NOTE sections. */
471
472 static bfd_boolean
473 cris_elf_grok_prstatus (abfd, note)
474 bfd *abfd;
475 Elf_Internal_Note *note;
476 {
477 int offset;
478 size_t raw_size;
479
480 switch (note->descsz)
481 {
482 default:
483 return FALSE;
484
485 case 214: /* Linux/CRIS */
486 /* pr_cursig */
487 elf_tdata (abfd)->core_signal = bfd_get_16 (abfd, note->descdata + 12);
488
489 /* pr_pid */
490 elf_tdata (abfd)->core_pid = bfd_get_32 (abfd, note->descdata + 22);
491
492 /* pr_reg */
493 offset = 70;
494 raw_size = 140;
495
496 break;
497 }
498
499 /* Make a ".reg/999" section. */
500 return _bfd_elfcore_make_pseudosection (abfd, ".reg",
501 raw_size, note->descpos + offset);
502 }
503
504 static bfd_boolean
505 cris_elf_grok_psinfo (abfd, note)
506 bfd *abfd;
507 Elf_Internal_Note *note;
508 {
509 switch (note->descsz)
510 {
511 default:
512 return FALSE;
513
514 case 124: /* Linux/CRIS elf_prpsinfo */
515 elf_tdata (abfd)->core_program
516 = _bfd_elfcore_strndup (abfd, note->descdata + 28, 16);
517 elf_tdata (abfd)->core_command
518 = _bfd_elfcore_strndup (abfd, note->descdata + 44, 80);
519 }
520
521 /* Note that for some reason, a spurious space is tacked
522 onto the end of the args in some (at least one anyway)
523 implementations, so strip it off if it exists. */
524
525 {
526 char *command = elf_tdata (abfd)->core_command;
527 int n = strlen (command);
528
529 if (0 < n && command[n - 1] == ' ')
530 command[n - 1] = '\0';
531 }
532
533 return TRUE;
534 }
535 \f
536 /* The name of the dynamic interpreter. This is put in the .interp
537 section. */
538
539 #define ELF_DYNAMIC_INTERPRETER "/lib/ld.so.1"
540
541 /* The size in bytes of an entry in the procedure linkage table. */
542
543 #define PLT_ENTRY_SIZE 20
544
545 /* The first entry in an absolute procedure linkage table looks like this. */
546
547 static const bfd_byte elf_cris_plt0_entry[PLT_ENTRY_SIZE] =
548 {
549 0xfc, 0xe1,
550 0x7e, 0x7e, /* push mof. */
551 0x7f, 0x0d, /* (dip [pc+]) */
552 0, 0, 0, 0, /* Replaced with address of .got + 4. */
553 0x30, 0x7a, /* move [...],mof */
554 0x7f, 0x0d, /* (dip [pc+]) */
555 0, 0, 0, 0, /* Replaced with address of .got + 8. */
556 0x30, 0x09, /* jump [...] */
557 };
558
559 /* Subsequent entries in an absolute procedure linkage table look like
560 this. */
561
562 static const bfd_byte elf_cris_plt_entry[PLT_ENTRY_SIZE] =
563 {
564 0x7f, 0x0d, /* (dip [pc+]) */
565 0, 0, 0, 0, /* Replaced with address of this symbol in .got. */
566 0x30, 0x09, /* jump [...] */
567 0x3f, 0x7e, /* move [pc+],mof */
568 0, 0, 0, 0, /* Replaced with offset into relocation table. */
569 0x2f, 0xfe, /* add.d [pc+],pc */
570 0xec, 0xff,
571 0xff, 0xff /* Replaced with offset to start of .plt. */
572 };
573
574 /* The first entry in a PIC procedure linkage table looks like this. */
575
576 static const bfd_byte elf_cris_pic_plt0_entry[PLT_ENTRY_SIZE] =
577 {
578 0xfc, 0xe1, 0x7e, 0x7e, /* push mof */
579 0x04, 0x01, 0x30, 0x7a, /* move [r0+4],mof */
580 0x08, 0x01, 0x30, 0x09, /* jump [r0+8] */
581 0, 0, 0, 0, 0, 0, 0, 0, /* Pad out to 20 bytes. */
582 };
583
584 /* Subsequent entries in a PIC procedure linkage table look like this. */
585
586 static const bfd_byte elf_cris_pic_plt_entry[PLT_ENTRY_SIZE] =
587 {
588 0x6f, 0x0d, /* (bdap [pc+].d,r0) */
589 0, 0, 0, 0, /* Replaced with offset of this symbol in .got. */
590 0x30, 0x09, /* jump [...] */
591 0x3f, 0x7e, /* move [pc+],mof */
592 0, 0, 0, 0, /* Replaced with offset into relocation table. */
593 0x2f, 0xfe, /* add.d [pc+],pc */
594 0xec, 0xff, /* Replaced with offset to start of .plt. */
595 0xff, 0xff
596 };
597 \f
598 /* We copy elf32-m68k.c and elf32-i386.c for the basic linker hash bits
599 (and most other PIC/shlib stuff). Check that we don't drift away
600 without reason.
601
602 The CRIS linker, like the m68k and i386 linkers (and probably the rest
603 too) needs to keep track of the number of relocs that it decides to
604 copy in check_relocs for each symbol. This is so that it can discard
605 PC relative relocs if it doesn't need them when linking with
606 -Bsymbolic. We store the information in a field extending the regular
607 ELF linker hash table. */
608
609 /* This structure keeps track of the number of PC relative relocs we have
610 copied for a given symbol. */
611
612 struct elf_cris_pcrel_relocs_copied
613 {
614 /* Next section. */
615 struct elf_cris_pcrel_relocs_copied *next;
616 /* A section in dynobj. */
617 asection *section;
618 /* Number of relocs copied in this section. */
619 bfd_size_type count;
620 };
621
622 /* CRIS ELF linker hash entry. */
623
624 struct elf_cris_link_hash_entry
625 {
626 struct elf_link_hash_entry root;
627
628 /* Number of PC relative relocs copied for this symbol. */
629 struct elf_cris_pcrel_relocs_copied *pcrel_relocs_copied;
630
631 /* The GOTPLT references are CRIS-specific; the goal is to avoid having
632 both a general GOT and a PLT-specific GOT entry for the same symbol,
633 when it is referenced both as a function and as a function pointer.
634
635 Number of GOTPLT references for a function. */
636 bfd_signed_vma gotplt_refcount;
637
638 /* Actual GOTPLT index for this symbol, if applicable, or zero if not
639 (zero is never used as an index). FIXME: We should be able to fold
640 this with gotplt_refcount in a union, like the got and plt unions in
641 elf_link_hash_entry. */
642 bfd_size_type gotplt_offset;
643 };
644
645 /* CRIS ELF linker hash table. */
646
647 struct elf_cris_link_hash_table
648 {
649 struct elf_link_hash_table root;
650
651 /* We can't use the PLT offset and calculate to get the GOTPLT offset,
652 since we try and avoid creating GOTPLT:s when there's already a GOT.
653 Instead, we keep and update the next available index here. */
654 bfd_size_type next_gotplt_entry;
655 };
656
657 /* Traverse a CRIS ELF linker hash table. */
658
659 #define elf_cris_link_hash_traverse(table, func, info) \
660 (elf_link_hash_traverse \
661 (&(table)->root, \
662 (bfd_boolean (*) PARAMS ((struct elf_link_hash_entry *, PTR))) (func), \
663 (info)))
664
665 /* Get the CRIS ELF linker hash table from a link_info structure. */
666
667 #define elf_cris_hash_table(p) \
668 ((struct elf_cris_link_hash_table *) (p)->hash)
669
670 /* Create an entry in a CRIS ELF linker hash table. */
671
672 static struct bfd_hash_entry *
673 elf_cris_link_hash_newfunc (entry, table, string)
674 struct bfd_hash_entry *entry;
675 struct bfd_hash_table *table;
676 const char *string;
677 {
678 struct elf_cris_link_hash_entry *ret =
679 (struct elf_cris_link_hash_entry *) entry;
680
681 /* Allocate the structure if it has not already been allocated by a
682 subclass. */
683 if (ret == (struct elf_cris_link_hash_entry *) NULL)
684 ret = ((struct elf_cris_link_hash_entry *)
685 bfd_hash_allocate (table,
686 sizeof (struct elf_cris_link_hash_entry)));
687 if (ret == (struct elf_cris_link_hash_entry *) NULL)
688 return (struct bfd_hash_entry *) ret;
689
690 /* Call the allocation method of the superclass. */
691 ret = ((struct elf_cris_link_hash_entry *)
692 _bfd_elf_link_hash_newfunc ((struct bfd_hash_entry *) ret,
693 table, string));
694 if (ret != (struct elf_cris_link_hash_entry *) NULL)
695 {
696 ret->pcrel_relocs_copied = NULL;
697 ret->gotplt_refcount = 0;
698 ret->gotplt_offset = 0;
699 }
700
701 return (struct bfd_hash_entry *) ret;
702 }
703
704 /* Create a CRIS ELF linker hash table. */
705
706 static struct bfd_link_hash_table *
707 elf_cris_link_hash_table_create (abfd)
708 bfd *abfd;
709 {
710 struct elf_cris_link_hash_table *ret;
711 bfd_size_type amt = sizeof (struct elf_cris_link_hash_table);
712
713 ret = ((struct elf_cris_link_hash_table *) bfd_malloc (amt));
714 if (ret == (struct elf_cris_link_hash_table *) NULL)
715 return NULL;
716
717 if (! _bfd_elf_link_hash_table_init (&ret->root, abfd,
718 elf_cris_link_hash_newfunc))
719 {
720 free (ret);
721 return NULL;
722 }
723
724 /* Initialize to skip over the first three entries in the gotplt; they
725 are used for run-time symbol evaluation. */
726 ret->next_gotplt_entry = 12;
727
728 return &ret->root.root;
729 }
730 \f
731 /* Perform a single relocation. By default we use the standard BFD
732 routines, with a few tweaks. */
733
734 static bfd_reloc_status_type
735 cris_final_link_relocate (howto, input_bfd, input_section, contents, rel,
736 relocation)
737 reloc_howto_type * howto;
738 bfd * input_bfd;
739 asection * input_section;
740 bfd_byte * contents;
741 Elf_Internal_Rela * rel;
742 bfd_vma relocation;
743 {
744 bfd_reloc_status_type r;
745
746 /* PC-relative relocations are relative to the position *after*
747 the reloc. Note that for R_CRIS_8_PCREL the adjustment is
748 not a single byte, since PC must be 16-bit-aligned. */
749 switch (ELF32_R_TYPE (rel->r_info))
750 {
751 /* Check that the 16-bit GOT relocs are positive. */
752 case R_CRIS_16_GOTPLT:
753 case R_CRIS_16_GOT:
754 if ((bfd_signed_vma) relocation < 0)
755 return bfd_reloc_overflow;
756 break;
757
758 case R_CRIS_32_PLT_PCREL:
759 case R_CRIS_32_PCREL:
760 relocation -= 2;
761 /* Fall through. */
762 case R_CRIS_8_PCREL:
763 case R_CRIS_16_PCREL:
764 relocation -= 2;
765 break;
766
767 default:
768 break;
769 }
770
771 r = _bfd_final_link_relocate (howto, input_bfd, input_section,
772 contents, rel->r_offset,
773 relocation, rel->r_addend);
774 return r;
775 }
776 \f
777 /* Relocate an CRIS ELF section. See elf32-fr30.c, from where this was
778 copied, for further comments. */
779
780 static bfd_boolean
781 cris_elf_relocate_section (output_bfd, info, input_bfd, input_section,
782 contents, relocs, local_syms, local_sections)
783 bfd *output_bfd ATTRIBUTE_UNUSED;
784 struct bfd_link_info *info;
785 bfd *input_bfd;
786 asection *input_section;
787 bfd_byte *contents;
788 Elf_Internal_Rela *relocs;
789 Elf_Internal_Sym *local_syms;
790 asection **local_sections;
791 {
792 bfd *dynobj;
793 Elf_Internal_Shdr *symtab_hdr;
794 struct elf_link_hash_entry **sym_hashes;
795 bfd_vma *local_got_offsets;
796 asection *sgot;
797 asection *splt;
798 asection *sreloc;
799 Elf_Internal_Rela *rel;
800 Elf_Internal_Rela *relend;
801
802 if (info->relocatable)
803 return TRUE;
804
805 dynobj = elf_hash_table (info)->dynobj;
806 local_got_offsets = elf_local_got_offsets (input_bfd);
807 symtab_hdr = & elf_tdata (input_bfd)->symtab_hdr;
808 sym_hashes = elf_sym_hashes (input_bfd);
809 relend = relocs + input_section->reloc_count;
810
811 sgot = NULL;
812 splt = NULL;
813 sreloc = NULL;
814
815 if (dynobj != NULL)
816 {
817 splt = bfd_get_section_by_name (dynobj, ".plt");
818 sgot = bfd_get_section_by_name (dynobj, ".got");
819 }
820
821 for (rel = relocs; rel < relend; rel ++)
822 {
823 reloc_howto_type *howto;
824 unsigned long r_symndx;
825 Elf_Internal_Sym *sym;
826 asection *sec;
827 struct elf_link_hash_entry *h;
828 bfd_vma relocation;
829 bfd_reloc_status_type r;
830 const char *symname = NULL;
831 int r_type;
832
833 r_type = ELF32_R_TYPE (rel->r_info);
834
835 if ( r_type == R_CRIS_GNU_VTINHERIT
836 || r_type == R_CRIS_GNU_VTENTRY)
837 continue;
838
839 /* This is a final link. */
840 r_symndx = ELF32_R_SYM (rel->r_info);
841 howto = cris_elf_howto_table + r_type;
842 h = NULL;
843 sym = NULL;
844 sec = NULL;
845
846 if (r_symndx < symtab_hdr->sh_info)
847 {
848 sym = local_syms + r_symndx;
849 sec = local_sections [r_symndx];
850 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel);
851
852 symname = (bfd_elf_string_from_elf_section
853 (input_bfd, symtab_hdr->sh_link, sym->st_name));
854 if (symname == NULL)
855 symname = bfd_section_name (input_bfd, sec);
856 }
857 else
858 {
859 bfd_boolean warned;
860 bfd_boolean unresolved_reloc;
861
862 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
863 r_symndx, symtab_hdr, sym_hashes,
864 h, sec, relocation,
865 unresolved_reloc, warned);
866
867 if (unresolved_reloc
868 /* Perhaps we should detect the cases that
869 sec->output_section is expected to be NULL like i386 and
870 m68k, but apparently (and according to elfxx-ia64.c) all
871 valid cases are where the symbol is defined in a shared
872 object which we link dynamically against. This includes
873 PLT relocs for which we've created a PLT entry and other
874 relocs for which we're prepared to create dynamic
875 relocations.
876
877 For now, new situations cause us to just err when
878 sec->output_offset is NULL but the object with the symbol
879 is *not* dynamically linked against. Thus this will
880 automatically remind us so we can see if there are other
881 valid cases we need to revisit. */
882 && (sec->owner->flags & DYNAMIC) != 0)
883 relocation = 0;
884
885 else if (h->root.type == bfd_link_hash_defined
886 || h->root.type == bfd_link_hash_defweak)
887 {
888 /* Here follow the cases where the relocation value must
889 be zero (or when further handling is simplified when
890 zero). I can't claim to understand the various
891 conditions and they weren't described in the files
892 where I copied them from (elf32-m68k.c and
893 elf32-i386.c), but let's mention examples of where
894 they happen. FIXME: Perhaps define and use a
895 dynamic_symbol_p function like ia64.
896
897 - When creating a shared library, we can have an
898 ordinary relocation for a symbol defined in a shared
899 library (perhaps the one we create). We then make
900 the relocation value zero, as the value seen now will
901 be added into the relocation addend in this shared
902 library, but must be handled only at dynamic-link
903 time. FIXME: Not sure this example covers the
904 h->elf_link_hash_flags test, though it's there in
905 other targets. */
906 if (info->shared
907 && ((! info->symbolic && h->dynindx != -1)
908 || (h->elf_link_hash_flags
909 & ELF_LINK_HASH_DEF_REGULAR) == 0)
910 && (input_section->flags & SEC_ALLOC) != 0
911 && (r_type == R_CRIS_8
912 || r_type == R_CRIS_16
913 || r_type == R_CRIS_32
914 || r_type == R_CRIS_8_PCREL
915 || r_type == R_CRIS_16_PCREL
916 || r_type == R_CRIS_32_PCREL))
917 relocation = 0;
918 else if (unresolved_reloc)
919 {
920 _bfd_error_handler
921 (_("%s: unresolvable relocation %s against symbol `%s' from %s section"),
922 bfd_archive_filename (input_bfd),
923 cris_elf_howto_table[r_type].name,
924 symname,
925 bfd_get_section_name (input_bfd, input_section));
926 bfd_set_error (bfd_error_bad_value);
927 return FALSE;
928 }
929 }
930 }
931
932 switch (r_type)
933 {
934 case R_CRIS_16_GOTPLT:
935 case R_CRIS_32_GOTPLT:
936 /* This is like the case for R_CRIS_32_GOT and R_CRIS_16_GOT,
937 but we require a PLT, and the PLT handling will take care of
938 filling in the PLT-specific GOT entry. For the GOT offset,
939 calculate it as we do when filling it in for the .got.plt
940 section. If we don't have a PLT, punt to GOT handling. */
941 if (h != NULL
942 && ((struct elf_cris_link_hash_entry *) h)->gotplt_offset != 0)
943 {
944 asection *sgotplt
945 = bfd_get_section_by_name (dynobj, ".got.plt");
946 bfd_vma got_offset;
947
948 BFD_ASSERT (h->dynindx != -1);
949 BFD_ASSERT (sgotplt != NULL);
950
951 got_offset
952 = ((struct elf_cris_link_hash_entry *) h)->gotplt_offset;
953
954 relocation = got_offset;
955 break;
956 }
957
958 /* We didn't make a PLT entry for this symbol. Maybe everything is
959 folded into the GOT. Other than folding, this happens when
960 statically linking PIC code, or when using -Bsymbolic. Check
961 that we instead have a GOT entry as done for us by
962 elf_cris_adjust_dynamic_symbol, and drop through into the
963 ordinary GOT cases. This must not happen for the
964 executable, because any reference it does to a function
965 that is satisfied by a DSO must generate a PLT. We assume
966 these call-specific relocs don't address non-functions. */
967 if (h != NULL
968 && (h->got.offset == (bfd_vma) -1
969 || (!info->shared
970 && !((h->elf_link_hash_flags
971 & ELF_LINK_HASH_DEF_REGULAR) != 0
972 || ((h->elf_link_hash_flags
973 & ELF_LINK_HASH_DEF_DYNAMIC) == 0
974 && h->root.type == bfd_link_hash_undefweak)))))
975 {
976 (*_bfd_error_handler)
977 ((h->got.offset == (bfd_vma) -1)
978 ? _("%s: No PLT nor GOT for relocation %s against\
979 symbol `%s' from %s section")
980 : _("%s: No PLT for relocation %s against\
981 symbol `%s' from %s section"),
982 bfd_archive_filename (input_bfd),
983 cris_elf_howto_table[r_type].name,
984 symname[0] != '\0' ? symname : _("[whose name is lost]"),
985 bfd_get_section_name (input_bfd, input_section));
986
987 /* FIXME: Perhaps blaming input is not the right thing to
988 do; this is probably an internal error. But it is true
989 that we didn't like that particular input. */
990 bfd_set_error (bfd_error_bad_value);
991 return FALSE;
992 }
993 /* Fall through. */
994
995 /* The size of the actual relocation is not used here; we only
996 fill in the GOT table here. */
997 case R_CRIS_16_GOT:
998 case R_CRIS_32_GOT:
999 {
1000 bfd_vma off;
1001
1002 /* Note that despite using RELA relocations, the .got contents
1003 is always filled in with the link-relative relocation
1004 value; the addend. */
1005
1006 if (h != NULL)
1007 {
1008 off = h->got.offset;
1009 BFD_ASSERT (off != (bfd_vma) -1);
1010
1011 if (!elf_hash_table (info)->dynamic_sections_created
1012 || (! info->shared
1013 && ((h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR)
1014 || h->type == STT_FUNC
1015 || (h->elf_link_hash_flags
1016 & ELF_LINK_HASH_NEEDS_PLT)))
1017 || (info->shared
1018 && (info->symbolic || h->dynindx == -1)
1019 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR)))
1020 {
1021 /* This wasn't checked above for ! info->shared, but
1022 must hold there if we get here; the symbol must
1023 be defined in the regular program or be undefweak
1024 or be a function or otherwise need a PLT. */
1025 BFD_ASSERT (!elf_hash_table (info)->dynamic_sections_created
1026 || info->shared
1027 || (h->elf_link_hash_flags
1028 & ELF_LINK_HASH_DEF_REGULAR) != 0
1029 || h->type == STT_FUNC
1030 || (h->elf_link_hash_flags
1031 & ELF_LINK_HASH_NEEDS_PLT)
1032 || h->root.type == bfd_link_hash_undefweak);
1033
1034 /* This is actually a static link, or it is a
1035 -Bsymbolic link and the symbol is defined locally,
1036 or is undefweak, or the symbol was forced to be
1037 local because of a version file, or we're not
1038 creating a dynamic object. We must initialize this
1039 entry in the global offset table. Since the offset
1040 must always be a multiple of 4, we use the least
1041 significant bit to record whether we have
1042 initialized it already.
1043
1044 If this GOT entry should be runtime-initialized, we
1045 will create a .rela.got relocation entry to
1046 initialize the value. This is done in the
1047 finish_dynamic_symbol routine. */
1048 if ((off & 1) != 0)
1049 off &= ~1;
1050 else
1051 {
1052 bfd_put_32 (output_bfd, relocation,
1053 sgot->contents + off);
1054 h->got.offset |= 1;
1055 }
1056 }
1057 }
1058 else
1059 {
1060 BFD_ASSERT (local_got_offsets != NULL
1061 && local_got_offsets[r_symndx] != (bfd_vma) -1);
1062
1063 off = local_got_offsets[r_symndx];
1064
1065 /* The offset must always be a multiple of 4. We use
1066 the least significant bit to record whether we have
1067 already generated the necessary reloc. */
1068 if ((off & 1) != 0)
1069 off &= ~1;
1070 else
1071 {
1072 bfd_put_32 (output_bfd, relocation, sgot->contents + off);
1073
1074 if (info->shared)
1075 {
1076 asection *s;
1077 Elf_Internal_Rela outrel;
1078 bfd_byte *loc;
1079
1080 s = bfd_get_section_by_name (dynobj, ".rela.got");
1081 BFD_ASSERT (s != NULL);
1082
1083 outrel.r_offset = (sgot->output_section->vma
1084 + sgot->output_offset
1085 + off);
1086 outrel.r_info = ELF32_R_INFO (0, R_CRIS_RELATIVE);
1087 outrel.r_addend = relocation;
1088 loc = s->contents;
1089 loc += s->reloc_count++ * sizeof (Elf32_External_Rela);
1090 bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
1091 }
1092
1093 local_got_offsets[r_symndx] |= 1;
1094 }
1095 }
1096
1097 relocation = sgot->output_offset + off;
1098 if (rel->r_addend != 0)
1099 {
1100 /* We can't do anything for a relocation which is against
1101 a symbol *plus offset*. GOT holds relocations for
1102 symbols. Make this an error; the compiler isn't
1103 allowed to pass us these kinds of things. */
1104 if (h == NULL)
1105 (*_bfd_error_handler)
1106 (_("%s: relocation %s with non-zero addend %d against local symbol from %s section"),
1107 bfd_archive_filename (input_bfd),
1108 cris_elf_howto_table[r_type].name,
1109 rel->r_addend,
1110 bfd_get_section_name (input_bfd, input_section));
1111 else
1112 (*_bfd_error_handler)
1113 (_("%s: relocation %s with non-zero addend %d against symbol `%s' from %s section"),
1114 bfd_archive_filename (input_bfd),
1115 cris_elf_howto_table[r_type].name,
1116 rel->r_addend,
1117 symname[0] != '\0' ? symname : _("[whose name is lost]"),
1118 bfd_get_section_name (input_bfd, input_section));
1119
1120 bfd_set_error (bfd_error_bad_value);
1121 return FALSE;
1122 }
1123 }
1124 break;
1125
1126 case R_CRIS_32_GOTREL:
1127 /* This relocation must only be performed against local symbols.
1128 It's also ok when we link a program and the symbol is either
1129 defined in an ordinary (non-DSO) object or is undefined weak. */
1130 if (h != NULL
1131 && ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
1132 && !(!info->shared
1133 && ((h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) != 0
1134 || ((h->elf_link_hash_flags & ELF_LINK_HASH_DEF_DYNAMIC) == 0
1135 && h->root.type == bfd_link_hash_undefweak))))
1136 {
1137 (*_bfd_error_handler)
1138 (_("%s: relocation %s is not allowed for global symbol: `%s' from %s section"),
1139 bfd_archive_filename (input_bfd),
1140 cris_elf_howto_table[r_type].name,
1141 symname,
1142 bfd_get_section_name (input_bfd, input_section));
1143 bfd_set_error (bfd_error_bad_value);
1144 return FALSE;
1145 }
1146
1147 /* This can happen if we get a link error with the input ELF
1148 variant mismatching the output variant. Emit an error so
1149 it's noticed if it happens elsewhere. */
1150 if (sgot == NULL)
1151 {
1152 (*_bfd_error_handler)
1153 (_("%s: relocation %s in section %s with no GOT created"),
1154 bfd_archive_filename (input_bfd),
1155 cris_elf_howto_table[r_type].name,
1156 bfd_get_section_name (input_bfd, input_section));
1157 bfd_set_error (bfd_error_bad_value);
1158 return FALSE;
1159 }
1160
1161 /* This relocation is like a PC-relative one, except the
1162 reference point is the location of GOT. Note that
1163 sgot->output_offset is not involved in this calculation. We
1164 always want the start of entire .got section, not the
1165 position after the reserved header. */
1166 relocation -= sgot->output_section->vma;
1167 break;
1168
1169 case R_CRIS_32_PLT_PCREL:
1170 /* Relocation is to the entry for this symbol in the
1171 procedure linkage table. */
1172
1173 /* Resolve a PLT_PCREL reloc against a local symbol directly,
1174 without using the procedure linkage table. */
1175 if (h == NULL || ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
1176 break;
1177
1178 if (h->plt.offset == (bfd_vma) -1
1179 || splt == NULL)
1180 {
1181 /* We didn't make a PLT entry for this symbol. This
1182 happens when statically linking PIC code, or when
1183 using -Bsymbolic. */
1184 break;
1185 }
1186
1187 relocation = (splt->output_section->vma
1188 + splt->output_offset
1189 + h->plt.offset);
1190 break;
1191
1192 case R_CRIS_32_PLT_GOTREL:
1193 /* Like R_CRIS_32_PLT_PCREL, but the reference point is the
1194 start of the .got section. See also comment at
1195 R_CRIS_32_GOT. */
1196 relocation -= sgot->output_section->vma;
1197
1198 /* Resolve a PLT_GOTREL reloc against a local symbol directly,
1199 without using the procedure linkage table. */
1200 if (h == NULL || ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
1201 break;
1202
1203 if (h->plt.offset == (bfd_vma) -1
1204 || splt == NULL)
1205 {
1206 /* We didn't make a PLT entry for this symbol. This
1207 happens when statically linking PIC code, or when
1208 using -Bsymbolic. */
1209 break;
1210 }
1211
1212 relocation = (splt->output_section->vma
1213 + splt->output_offset
1214 + h->plt.offset
1215 - sgot->output_section->vma);
1216 break;
1217
1218 case R_CRIS_8_PCREL:
1219 case R_CRIS_16_PCREL:
1220 case R_CRIS_32_PCREL:
1221 /* If the symbol was local, we need no shlib-specific handling. */
1222 if (h == NULL || ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
1223 break;
1224
1225 /* Fall through. */
1226 case R_CRIS_8:
1227 case R_CRIS_16:
1228 case R_CRIS_32:
1229 if (info->shared
1230 && r_symndx != 0
1231 && (input_section->flags & SEC_ALLOC) != 0
1232 && ((r_type != R_CRIS_8_PCREL
1233 && r_type != R_CRIS_16_PCREL
1234 && r_type != R_CRIS_32_PCREL)
1235 || (!info->symbolic
1236 || (h->elf_link_hash_flags
1237 & ELF_LINK_HASH_DEF_REGULAR) == 0)))
1238 {
1239 Elf_Internal_Rela outrel;
1240 bfd_byte *loc;
1241 bfd_boolean skip, relocate;
1242
1243 /* When generating a shared object, these relocations
1244 are copied into the output file to be resolved at run
1245 time. */
1246
1247 if (sreloc == NULL)
1248 {
1249 const char *name;
1250
1251 name = (bfd_elf_string_from_elf_section
1252 (input_bfd,
1253 elf_elfheader (input_bfd)->e_shstrndx,
1254 elf_section_data (input_section)->rel_hdr.sh_name));
1255 if (name == NULL)
1256 return FALSE;
1257
1258 BFD_ASSERT (strncmp (name, ".rela", 5) == 0
1259 && strcmp (bfd_get_section_name (input_bfd,
1260 input_section),
1261 name + 5) == 0);
1262
1263 sreloc = bfd_get_section_by_name (dynobj, name);
1264
1265 /* That section should have been created in
1266 cris_elf_check_relocs, but that function will not be
1267 called for objects which fail in
1268 cris_elf_merge_private_bfd_data. */
1269 if (sreloc == NULL)
1270 {
1271 (*_bfd_error_handler)
1272 (_("%s: Internal inconsistency; no relocation section %s"),
1273 bfd_archive_filename (input_bfd),
1274 name);
1275
1276 bfd_set_error (bfd_error_bad_value);
1277 return FALSE;
1278 }
1279 }
1280
1281 skip = FALSE;
1282 relocate = FALSE;
1283
1284 outrel.r_offset =
1285 _bfd_elf_section_offset (output_bfd, info, input_section,
1286 rel->r_offset);
1287 if (outrel.r_offset == (bfd_vma) -1)
1288 skip = TRUE;
1289 else if (outrel.r_offset == (bfd_vma) -2)
1290 skip = TRUE, relocate = TRUE;
1291 outrel.r_offset += (input_section->output_section->vma
1292 + input_section->output_offset);
1293
1294 if (skip)
1295 memset (&outrel, 0, sizeof outrel);
1296 /* h->dynindx may be -1 if the symbol was marked to
1297 become local. */
1298 else if (h != NULL
1299 && ((! info->symbolic && h->dynindx != -1)
1300 || (h->elf_link_hash_flags
1301 & ELF_LINK_HASH_DEF_REGULAR) == 0))
1302 {
1303 BFD_ASSERT (h->dynindx != -1);
1304 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type);
1305 outrel.r_addend = relocation + rel->r_addend;
1306 }
1307 else
1308 {
1309 if (r_type == R_CRIS_32)
1310 {
1311 relocate = TRUE;
1312 outrel.r_info = ELF32_R_INFO (0, R_CRIS_RELATIVE);
1313 outrel.r_addend = relocation + rel->r_addend;
1314 }
1315 else
1316 {
1317 long indx;
1318
1319 if (bfd_is_abs_section (sec))
1320 indx = 0;
1321 else if (sec == NULL || sec->owner == NULL)
1322 {
1323 bfd_set_error (bfd_error_bad_value);
1324 return FALSE;
1325 }
1326 else
1327 {
1328 asection *osec;
1329
1330 osec = sec->output_section;
1331 indx = elf_section_data (osec)->dynindx;
1332 BFD_ASSERT (indx > 0);
1333 }
1334
1335 outrel.r_info = ELF32_R_INFO (indx, r_type);
1336 outrel.r_addend = relocation + rel->r_addend;
1337 }
1338 }
1339
1340 loc = sreloc->contents;
1341 loc += sreloc->reloc_count++ * sizeof (Elf32_External_Rela);
1342 bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
1343
1344 /* This reloc will be computed at runtime, so there's no
1345 need to do anything now, except for R_CRIS_32 relocations
1346 that have been turned into R_CRIS_RELATIVE. */
1347 if (!relocate)
1348 continue;
1349 }
1350
1351 break;
1352 }
1353
1354 r = cris_final_link_relocate (howto, input_bfd, input_section,
1355 contents, rel, relocation);
1356
1357 if (r != bfd_reloc_ok)
1358 {
1359 const char * msg = (const char *) NULL;
1360
1361 switch (r)
1362 {
1363 case bfd_reloc_overflow:
1364 r = info->callbacks->reloc_overflow
1365 (info, symname, howto->name, (bfd_vma) 0,
1366 input_bfd, input_section, rel->r_offset);
1367 break;
1368
1369 case bfd_reloc_undefined:
1370 r = info->callbacks->undefined_symbol
1371 (info, symname, input_bfd, input_section, rel->r_offset,
1372 TRUE);
1373 break;
1374
1375 case bfd_reloc_outofrange:
1376 msg = _("internal error: out of range error");
1377 break;
1378
1379 case bfd_reloc_notsupported:
1380 msg = _("internal error: unsupported relocation error");
1381 break;
1382
1383 case bfd_reloc_dangerous:
1384 msg = _("internal error: dangerous relocation");
1385 break;
1386
1387 default:
1388 msg = _("internal error: unknown error");
1389 break;
1390 }
1391
1392 if (msg)
1393 r = info->callbacks->warning
1394 (info, msg, symname, input_bfd, input_section, rel->r_offset);
1395
1396 if (! r)
1397 return FALSE;
1398 }
1399 }
1400
1401 return TRUE;
1402 }
1403 \f
1404 /* Finish up dynamic symbol handling. We set the contents of various
1405 dynamic sections here. */
1406
1407 static bfd_boolean
1408 elf_cris_finish_dynamic_symbol (output_bfd, info, h, sym)
1409 bfd *output_bfd;
1410 struct bfd_link_info *info;
1411 struct elf_link_hash_entry *h;
1412 Elf_Internal_Sym *sym;
1413 {
1414 bfd *dynobj;
1415 int plt_off1 = 2, plt_off2 = 10, plt_off3 = 16;
1416
1417 dynobj = elf_hash_table (info)->dynobj;
1418
1419 if (h->plt.offset != (bfd_vma) -1)
1420 {
1421 asection *splt;
1422 asection *sgotplt;
1423 asection *sgot;
1424 asection *srela;
1425 bfd_vma got_base;
1426
1427 bfd_vma gotplt_offset
1428 = ((struct elf_cris_link_hash_entry *) h)->gotplt_offset;
1429 Elf_Internal_Rela rela;
1430 bfd_byte *loc;
1431 bfd_boolean has_gotplt = gotplt_offset != 0;
1432
1433 /* Get the index in the procedure linkage table which
1434 corresponds to this symbol. This is the index of this symbol
1435 in all the symbols for which we are making plt entries. The
1436 first entry in the procedure linkage table is reserved. */
1437 /* We have to count backwards here, and the result is only valid as
1438 an index into .got.plt and its relocations. FIXME: Constants... */
1439 bfd_vma gotplt_index = gotplt_offset/4 - 3;
1440
1441 /* Get the offset into the .got table of the entry that corresponds
1442 to this function. Note that we embed knowledge that "incoming"
1443 .got goes after .got.plt in the output without padding (pointer
1444 aligned). However, that knowledge is present in several other
1445 places too. */
1446 bfd_vma got_offset
1447 = (has_gotplt
1448 ? gotplt_offset
1449 : h->got.offset + elf_cris_hash_table(info)->next_gotplt_entry);
1450
1451 /* This symbol has an entry in the procedure linkage table. Set it
1452 up. */
1453
1454 BFD_ASSERT (h->dynindx != -1);
1455
1456 splt = bfd_get_section_by_name (dynobj, ".plt");
1457 sgot = bfd_get_section_by_name (dynobj, ".got");
1458 sgotplt = bfd_get_section_by_name (dynobj, ".got.plt");
1459 srela = bfd_get_section_by_name (dynobj, ".rela.plt");
1460 BFD_ASSERT (splt != NULL && sgotplt != NULL
1461 && (! has_gotplt || srela != NULL));
1462
1463 got_base = sgotplt->output_section->vma + sgotplt->output_offset;
1464
1465 /* Fill in the entry in the procedure linkage table. */
1466 if (! info->shared)
1467 {
1468 memcpy (splt->contents + h->plt.offset, elf_cris_plt_entry,
1469 PLT_ENTRY_SIZE);
1470
1471 /* We need to enter the absolute address of the GOT entry here. */
1472 bfd_put_32 (output_bfd, got_base + got_offset,
1473 splt->contents + h->plt.offset + plt_off1);
1474 }
1475 else
1476 {
1477 memcpy (splt->contents + h->plt.offset, elf_cris_pic_plt_entry,
1478 PLT_ENTRY_SIZE);
1479 bfd_put_32 (output_bfd, got_offset,
1480 splt->contents + h->plt.offset + plt_off1);
1481 }
1482
1483 /* Fill in the plt entry and make a relocation, if this is a "real"
1484 PLT entry. */
1485 if (has_gotplt)
1486 {
1487 /* Fill in the offset into the reloc table. */
1488 bfd_put_32 (output_bfd,
1489 gotplt_index * sizeof (Elf32_External_Rela),
1490 splt->contents + h->plt.offset + plt_off2);
1491
1492 /* Fill in the offset to the first PLT entry, where to "jump". */
1493 bfd_put_32 (output_bfd, - (h->plt.offset + plt_off3 + 4),
1494 splt->contents + h->plt.offset + plt_off3);
1495
1496 /* Fill in the entry in the global offset table with the address of
1497 the relocating stub. */
1498 bfd_put_32 (output_bfd,
1499 (splt->output_section->vma
1500 + splt->output_offset
1501 + h->plt.offset
1502 + 8),
1503 sgotplt->contents + got_offset);
1504
1505 /* Fill in the entry in the .rela.plt section. */
1506 rela.r_offset = (sgotplt->output_section->vma
1507 + sgotplt->output_offset
1508 + got_offset);
1509 rela.r_info = ELF32_R_INFO (h->dynindx, R_CRIS_JUMP_SLOT);
1510 rela.r_addend = 0;
1511 loc = srela->contents + gotplt_index * sizeof (Elf32_External_Rela);
1512 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
1513 }
1514
1515 if ((h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
1516 {
1517 /* Mark the symbol as undefined, rather than as defined in
1518 the .plt section. Leave the value alone. */
1519 sym->st_shndx = SHN_UNDEF;
1520
1521 /* FIXME: From elf32-sparc.c 2001-02-19 (1.18). I still don't
1522 know whether resetting the value is significant; if it really
1523 is, rather than a quirk or bug in the sparc port, then I
1524 believe we'd see this elsewhere. */
1525 /* If the symbol is weak, we do need to clear the value.
1526 Otherwise, the PLT entry would provide a definition for
1527 the symbol even if the symbol wasn't defined anywhere,
1528 and so the symbol would never be NULL. */
1529 if ((h->elf_link_hash_flags & ELF_LINK_HASH_REF_REGULAR_NONWEAK)
1530 == 0)
1531 sym->st_value = 0;
1532 }
1533 }
1534
1535 /* For an ordinary program, we emit .got relocs only for symbols that
1536 are in the dynamic-symbols table and are either defined by the
1537 program or are undefined weak symbols, or are function symbols
1538 where we do not output a PLT: the PLT reloc was output above and all
1539 references to the function symbol are redirected to the PLT. */
1540 if (h->got.offset != (bfd_vma) -1
1541 && (info->shared
1542 || (h->dynindx != -1
1543 && h->plt.offset == (bfd_vma) -1
1544 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0
1545 && h->root.type != bfd_link_hash_undefweak)))
1546 {
1547 asection *sgot;
1548 asection *srela;
1549 Elf_Internal_Rela rela;
1550 bfd_byte *loc;
1551 bfd_byte *where;
1552
1553 /* This symbol has an entry in the global offset table. Set it up. */
1554
1555 sgot = bfd_get_section_by_name (dynobj, ".got");
1556 srela = bfd_get_section_by_name (dynobj, ".rela.got");
1557 BFD_ASSERT (sgot != NULL && srela != NULL);
1558
1559 rela.r_offset = (sgot->output_section->vma
1560 + sgot->output_offset
1561 + (h->got.offset &~ (bfd_vma) 1));
1562
1563 /* If this is a static link, or it is a -Bsymbolic link and the
1564 symbol is defined locally or was forced to be local because
1565 of a version file, we just want to emit a RELATIVE reloc.
1566 The entry in the global offset table will already have been
1567 initialized in the relocate_section function. */
1568 where = sgot->contents + (h->got.offset &~ (bfd_vma) 1);
1569 if (! elf_hash_table (info)->dynamic_sections_created
1570 || (info->shared
1571 && (info->symbolic || h->dynindx == -1)
1572 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR)))
1573 {
1574 rela.r_info = ELF32_R_INFO (0, R_CRIS_RELATIVE);
1575 rela.r_addend = bfd_get_signed_32 (output_bfd, where);
1576 }
1577 else
1578 {
1579 bfd_put_32 (output_bfd, (bfd_vma) 0, where);
1580 rela.r_info = ELF32_R_INFO (h->dynindx, R_CRIS_GLOB_DAT);
1581 rela.r_addend = 0;
1582 }
1583
1584 loc = srela->contents;
1585 loc += srela->reloc_count++ * sizeof (Elf32_External_Rela);
1586 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
1587 }
1588
1589 if ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_COPY) != 0)
1590 {
1591 asection *s;
1592 Elf_Internal_Rela rela;
1593 bfd_byte *loc;
1594
1595 /* This symbol needs a copy reloc. Set it up. */
1596
1597 BFD_ASSERT (h->dynindx != -1
1598 && (h->root.type == bfd_link_hash_defined
1599 || h->root.type == bfd_link_hash_defweak));
1600
1601 s = bfd_get_section_by_name (h->root.u.def.section->owner,
1602 ".rela.bss");
1603 BFD_ASSERT (s != NULL);
1604
1605 rela.r_offset = (h->root.u.def.value
1606 + h->root.u.def.section->output_section->vma
1607 + h->root.u.def.section->output_offset);
1608 rela.r_info = ELF32_R_INFO (h->dynindx, R_CRIS_COPY);
1609 rela.r_addend = 0;
1610 loc = s->contents + s->reloc_count++ * sizeof (Elf32_External_Rela);
1611 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
1612 }
1613
1614 /* Mark _DYNAMIC and _GLOBAL_OFFSET_TABLE_ as absolute. */
1615 if (strcmp (h->root.root.string, "_DYNAMIC") == 0
1616 || strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
1617 sym->st_shndx = SHN_ABS;
1618
1619 return TRUE;
1620 }
1621 \f
1622 /* Finish up the dynamic sections. */
1623
1624 static bfd_boolean
1625 elf_cris_finish_dynamic_sections (output_bfd, info)
1626 bfd *output_bfd;
1627 struct bfd_link_info *info;
1628 {
1629 bfd *dynobj;
1630 asection *sgot;
1631 asection *sdyn;
1632
1633 dynobj = elf_hash_table (info)->dynobj;
1634
1635 sgot = bfd_get_section_by_name (dynobj, ".got.plt");
1636 BFD_ASSERT (sgot != NULL);
1637 sdyn = bfd_get_section_by_name (dynobj, ".dynamic");
1638
1639 if (elf_hash_table (info)->dynamic_sections_created)
1640 {
1641 asection *splt;
1642 Elf32_External_Dyn *dyncon, *dynconend;
1643
1644 splt = bfd_get_section_by_name (dynobj, ".plt");
1645 BFD_ASSERT (splt != NULL && sdyn != NULL);
1646
1647 dyncon = (Elf32_External_Dyn *) sdyn->contents;
1648 dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->_raw_size);
1649 for (; dyncon < dynconend; dyncon++)
1650 {
1651 Elf_Internal_Dyn dyn;
1652 asection *s;
1653
1654 bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn);
1655
1656 switch (dyn.d_tag)
1657 {
1658 default:
1659 break;
1660
1661 case DT_PLTGOT:
1662 s = bfd_get_section_by_name (output_bfd, ".got");
1663 BFD_ASSERT (s != NULL);
1664 dyn.d_un.d_ptr = s->vma;
1665 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
1666 break;
1667
1668 case DT_JMPREL:
1669 /* Yes, we *can* have a .plt and no .plt.rela, for instance
1670 if all symbols are found in the .got (not .got.plt). */
1671 s = bfd_get_section_by_name (output_bfd, ".rela.plt");
1672 dyn.d_un.d_ptr = s != NULL ? s->vma : 0;
1673 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
1674 break;
1675
1676 case DT_PLTRELSZ:
1677 s = bfd_get_section_by_name (output_bfd, ".rela.plt");
1678 if (s == NULL)
1679 dyn.d_un.d_val = 0;
1680 else if (s->_cooked_size != 0)
1681 dyn.d_un.d_val = s->_cooked_size;
1682 else
1683 dyn.d_un.d_val = s->_raw_size;
1684 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
1685 break;
1686
1687 case DT_RELASZ:
1688 /* The procedure linkage table relocs (DT_JMPREL) should
1689 not be included in the overall relocs (DT_RELA).
1690 Therefore, we override the DT_RELASZ entry here to
1691 make it not include the JMPREL relocs. Since the
1692 linker script arranges for .rela.plt to follow all
1693 other relocation sections, we don't have to worry
1694 about changing the DT_RELA entry. */
1695 s = bfd_get_section_by_name (output_bfd, ".rela.plt");
1696 if (s != NULL)
1697 {
1698 if (s->_cooked_size != 0)
1699 dyn.d_un.d_val -= s->_cooked_size;
1700 else
1701 dyn.d_un.d_val -= s->_raw_size;
1702 }
1703 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
1704 break;
1705 }
1706 }
1707
1708 /* Fill in the first entry in the procedure linkage table. */
1709 if (splt->_raw_size > 0)
1710 {
1711 if (info->shared)
1712 memcpy (splt->contents, elf_cris_pic_plt0_entry, PLT_ENTRY_SIZE);
1713 else
1714 {
1715 memcpy (splt->contents, elf_cris_plt0_entry, PLT_ENTRY_SIZE);
1716 bfd_put_32 (output_bfd,
1717 sgot->output_section->vma + sgot->output_offset + 4,
1718 splt->contents + 6);
1719 bfd_put_32 (output_bfd,
1720 sgot->output_section->vma + sgot->output_offset + 8,
1721 splt->contents + 14);
1722
1723 elf_section_data (splt->output_section)->this_hdr.sh_entsize
1724 = PLT_ENTRY_SIZE;
1725 }
1726 }
1727 }
1728
1729 /* Fill in the first three entries in the global offset table. */
1730 if (sgot->_raw_size > 0)
1731 {
1732 if (sdyn == NULL)
1733 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents);
1734 else
1735 bfd_put_32 (output_bfd,
1736 sdyn->output_section->vma + sdyn->output_offset,
1737 sgot->contents);
1738 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 4);
1739 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 8);
1740 }
1741
1742 elf_section_data (sgot->output_section)->this_hdr.sh_entsize = 4;
1743
1744 return TRUE;
1745 }
1746 \f
1747 /* Return the section that should be marked against GC for a given
1748 relocation. */
1749
1750 static asection *
1751 cris_elf_gc_mark_hook (sec, info, rel, h, sym)
1752 asection *sec;
1753 struct bfd_link_info *info ATTRIBUTE_UNUSED;
1754 Elf_Internal_Rela *rel;
1755 struct elf_link_hash_entry *h;
1756 Elf_Internal_Sym *sym;
1757 {
1758 if (h != NULL)
1759 {
1760 switch (ELF32_R_TYPE (rel->r_info))
1761 {
1762 case R_CRIS_GNU_VTINHERIT:
1763 case R_CRIS_GNU_VTENTRY:
1764 break;
1765
1766 default:
1767 switch (h->root.type)
1768 {
1769 case bfd_link_hash_defined:
1770 case bfd_link_hash_defweak:
1771 return h->root.u.def.section;
1772
1773 case bfd_link_hash_common:
1774 return h->root.u.c.p->section;
1775
1776 default:
1777 break;
1778 }
1779 }
1780 }
1781 else
1782 return bfd_section_from_elf_index (sec->owner, sym->st_shndx);
1783
1784 return NULL;
1785 }
1786
1787 /* Update the got entry reference counts for the section being removed. */
1788
1789 static bfd_boolean
1790 cris_elf_gc_sweep_hook (abfd, info, sec, relocs)
1791 bfd *abfd ATTRIBUTE_UNUSED;
1792 struct bfd_link_info *info ATTRIBUTE_UNUSED;
1793 asection *sec ATTRIBUTE_UNUSED;
1794 const Elf_Internal_Rela *relocs ATTRIBUTE_UNUSED;
1795 {
1796 Elf_Internal_Shdr *symtab_hdr;
1797 struct elf_link_hash_entry **sym_hashes;
1798 bfd_signed_vma *local_got_refcounts;
1799 const Elf_Internal_Rela *rel, *relend;
1800 bfd *dynobj;
1801 asection *sgot;
1802 asection *srelgot;
1803
1804 dynobj = elf_hash_table (info)->dynobj;
1805 if (dynobj == NULL)
1806 return TRUE;
1807
1808 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
1809 sym_hashes = elf_sym_hashes (abfd);
1810 local_got_refcounts = elf_local_got_refcounts (abfd);
1811
1812 sgot = bfd_get_section_by_name (dynobj, ".got");
1813 srelgot = bfd_get_section_by_name (dynobj, ".rela.got");
1814
1815 relend = relocs + sec->reloc_count;
1816 for (rel = relocs; rel < relend; rel++)
1817 {
1818 unsigned long r_symndx;
1819 struct elf_link_hash_entry *h;
1820
1821 switch (ELF32_R_TYPE (rel->r_info))
1822 {
1823 case R_CRIS_16_GOT:
1824 case R_CRIS_32_GOT:
1825 r_symndx = ELF32_R_SYM (rel->r_info);
1826 if (r_symndx >= symtab_hdr->sh_info)
1827 {
1828 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1829 if (h->got.refcount > 0)
1830 {
1831 --h->got.refcount;
1832 if (h->got.refcount == 0)
1833 {
1834 /* We don't need the .got entry any more. */
1835 sgot->_raw_size -= 4;
1836 srelgot->_raw_size -= sizeof (Elf32_External_Rela);
1837 }
1838 }
1839 break;
1840 }
1841
1842 local_got_reloc:
1843 if (local_got_refcounts != NULL)
1844 {
1845 if (local_got_refcounts[r_symndx] > 0)
1846 {
1847 --local_got_refcounts[r_symndx];
1848 if (local_got_refcounts[r_symndx] == 0)
1849 {
1850 /* We don't need the .got entry any more. */
1851 sgot->_raw_size -= 4;
1852 if (info->shared)
1853 srelgot->_raw_size -= sizeof (Elf32_External_Rela);
1854 }
1855 }
1856 }
1857 break;
1858
1859 case R_CRIS_16_GOTPLT:
1860 case R_CRIS_32_GOTPLT:
1861 /* For local symbols, treat these like GOT relocs. */
1862 r_symndx = ELF32_R_SYM (rel->r_info);
1863 if (r_symndx < symtab_hdr->sh_info)
1864 goto local_got_reloc;
1865 /* Fall through. */
1866 case R_CRIS_32_PLT_GOTREL:
1867 /* FIXME: We don't garbage-collect away the .got section. */
1868 if (local_got_refcounts != NULL)
1869 local_got_refcounts[-1]--;
1870 /* Fall through. */
1871 case R_CRIS_8_PCREL:
1872 case R_CRIS_16_PCREL:
1873 case R_CRIS_32_PCREL:
1874 case R_CRIS_32_PLT_PCREL:
1875 r_symndx = ELF32_R_SYM (rel->r_info);
1876 if (r_symndx >= symtab_hdr->sh_info)
1877 {
1878 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1879 if (ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
1880 && h->plt.refcount > 0)
1881 --h->plt.refcount;
1882 }
1883 break;
1884
1885 default:
1886 break;
1887 }
1888 }
1889
1890 return TRUE;
1891 }
1892
1893 /* Make sure we emit a GOT entry if the symbol was supposed to have a PLT
1894 entry but we found we will not create any. Called when we find we will
1895 not have any PLT for this symbol, by for example
1896 elf_cris_adjust_dynamic_symbol when we're doing a proper dynamic link,
1897 or elf_cris_size_dynamic_sections if no dynamic sections will be
1898 created (we're only linking static objects). */
1899
1900 static bfd_boolean
1901 elf_cris_adjust_gotplt_to_got (h, p)
1902 struct elf_cris_link_hash_entry *h;
1903 PTR p;
1904 {
1905 struct bfd_link_info *info = (struct bfd_link_info *) p;
1906 bfd *dynobj = elf_hash_table (info)->dynobj;
1907
1908 BFD_ASSERT (dynobj != NULL);
1909
1910 if (h->root.root.type == bfd_link_hash_warning)
1911 h = (struct elf_cris_link_hash_entry *) h->root.root.u.i.link;
1912
1913 /* If nobody wanted a GOTPLT with this symbol, we're done. */
1914 if (h->gotplt_refcount <= 0)
1915 return TRUE;
1916
1917 if (h->root.got.refcount > 0)
1918 {
1919 /* There's a GOT entry for this symbol. Just adjust the refcount.
1920 Probably not necessary at this stage, but keeping it accurate
1921 helps avoiding surprises later. */
1922 h->root.got.refcount += h->gotplt_refcount;
1923 h->gotplt_refcount = -1;
1924 }
1925 else
1926 {
1927 /* No GOT entry for this symbol. We need to create one. */
1928 asection *sgot = bfd_get_section_by_name (dynobj, ".got");
1929 asection *srelgot
1930 = bfd_get_section_by_name (dynobj, ".rela.got");
1931
1932 /* Put an accurate refcount there. */
1933 h->root.got.refcount = h->gotplt_refcount;
1934
1935 h->gotplt_refcount = -1;
1936
1937 /* We always have a .got and a .rela.got section if there were
1938 GOTPLT relocs in input. */
1939 BFD_ASSERT (sgot != NULL && srelgot != NULL);
1940
1941 /* Allocate space in the .got section. */
1942 sgot->_raw_size += 4;
1943
1944 /* Allocate relocation space. */
1945 srelgot->_raw_size += sizeof (Elf32_External_Rela);
1946 }
1947
1948 return TRUE;
1949 }
1950
1951 /* Try to fold PLT entries with GOT entries. There are two cases when we
1952 want to do this:
1953
1954 - When all PLT references are GOTPLT references, and there are GOT
1955 references, and this is not the executable. We don't have to
1956 generate a PLT at all.
1957
1958 - When there are both (ordinary) PLT references and GOT references,
1959 and this isn't the executable.
1960 We want to make the PLT reference use the ordinary GOT entry rather
1961 than R_CRIS_JUMP_SLOT, a run-time dynamically resolved GOTPLT entry,
1962 since the GOT entry will have to be resolved at startup anyway.
1963
1964 Though the latter case is handled when room for the PLT is allocated,
1965 not here.
1966
1967 By folding into the GOT, we may need a round-trip to a PLT in the
1968 executable for calls, a loss in performance. Still, losing a
1969 reloc is a win in size and at least in start-up time.
1970
1971 Note that this function is called before symbols are forced local by
1972 version scripts. The differing cases are handled by
1973 elf_cris_hide_symbol. */
1974
1975 static bfd_boolean
1976 elf_cris_try_fold_plt_to_got (h, p)
1977 struct elf_cris_link_hash_entry *h;
1978 PTR p;
1979 {
1980 struct bfd_link_info *info = (struct bfd_link_info *) p;
1981
1982 /* If there are no GOT references for this symbol, we can't fold any
1983 other reference so there's nothing to do. Likewise if there are no
1984 PLT references; GOTPLT references included. */
1985 if (h->root.got.refcount <= 0 || h->root.plt.refcount <= 0)
1986 return TRUE;
1987
1988 /* GOTPLT relocs are supposed to be included into the PLT refcount. */
1989 BFD_ASSERT (h->gotplt_refcount <= h->root.plt.refcount);
1990
1991 if (h->gotplt_refcount == h->root.plt.refcount)
1992 {
1993 /* The only PLT references are GOTPLT references, and there are GOT
1994 references. Convert PLT to GOT references. */
1995 if (! elf_cris_adjust_gotplt_to_got (h, info))
1996 return FALSE;
1997
1998 /* Clear the PLT references, so no PLT will be created. */
1999 h->root.plt.offset = (bfd_vma) -1;
2000 }
2001
2002 return TRUE;
2003 }
2004
2005 /* Our own version of hide_symbol, so that we can adjust a GOTPLT reloc
2006 to use a GOT entry (and create one) rather than requiring a GOTPLT
2007 entry. */
2008
2009 static void
2010 elf_cris_hide_symbol (info, h, force_local)
2011 struct bfd_link_info *info;
2012 struct elf_link_hash_entry *h;
2013 bfd_boolean force_local;
2014 {
2015 elf_cris_adjust_gotplt_to_got ((struct elf_cris_link_hash_entry *) h, info);
2016
2017 _bfd_elf_link_hash_hide_symbol (info, h, force_local);
2018 }
2019
2020 /* Adjust a symbol defined by a dynamic object and referenced by a
2021 regular object. The current definition is in some section of the
2022 dynamic object, but we're not including those sections. We have to
2023 change the definition to something the rest of the link can
2024 understand. */
2025
2026 static bfd_boolean
2027 elf_cris_adjust_dynamic_symbol (info, h)
2028 struct bfd_link_info *info;
2029 struct elf_link_hash_entry *h;
2030 {
2031 bfd *dynobj;
2032 asection *s;
2033 unsigned int power_of_two;
2034
2035 dynobj = elf_hash_table (info)->dynobj;
2036
2037 /* Make sure we know what is going on here. */
2038 BFD_ASSERT (dynobj != NULL
2039 && ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT)
2040 || h->weakdef != NULL
2041 || ((h->elf_link_hash_flags
2042 & ELF_LINK_HASH_DEF_DYNAMIC) != 0
2043 && (h->elf_link_hash_flags
2044 & ELF_LINK_HASH_REF_REGULAR) != 0
2045 && (h->elf_link_hash_flags
2046 & ELF_LINK_HASH_DEF_REGULAR) == 0)));
2047
2048 /* If this is a function, put it in the procedure linkage table. We
2049 will fill in the contents of the procedure linkage table later,
2050 when we know the address of the .got section. */
2051 if (h->type == STT_FUNC
2052 || (h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT) != 0)
2053 {
2054 /* If we link a program (not a DSO), we'll get rid of unnecessary
2055 PLT entries; we point to the actual symbols -- even for pic
2056 relocs, because a program built with -fpic should have the same
2057 result as one built without -fpic, specifically considering weak
2058 symbols.
2059 FIXME: m68k and i386 differ here, for unclear reasons. */
2060 if (! info->shared
2061 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_DYNAMIC) == 0)
2062 {
2063 /* This case can occur if we saw a PLT reloc in an input file,
2064 but the symbol was not defined by a dynamic object. In such
2065 a case, we don't actually need to build a procedure linkage
2066 table, and we can just do an absolute or PC reloc instead, or
2067 change a .got.plt index to a .got index for GOTPLT relocs. */
2068 BFD_ASSERT ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT) != 0);
2069 h->elf_link_hash_flags &= ~ELF_LINK_HASH_NEEDS_PLT;
2070 h->plt.offset = (bfd_vma) -1;
2071 return
2072 elf_cris_adjust_gotplt_to_got ((struct
2073 elf_cris_link_hash_entry *) h,
2074 info);
2075 }
2076
2077 /* If we had a R_CRIS_GLOB_DAT that didn't have to point to a PLT;
2078 where a pointer-equivalent symbol was unimportant (i.e. more
2079 like R_CRIS_JUMP_SLOT after symbol evaluation) we could get rid
2080 of the PLT. We can't for the executable, because the GOT
2081 entries will point to the PLT there (and be constant). */
2082 if (info->shared
2083 && !elf_cris_try_fold_plt_to_got ((struct elf_cris_link_hash_entry*)
2084 h, info))
2085 return FALSE;
2086
2087 /* GC or folding may have rendered this entry unused. */
2088 if (h->plt.refcount <= 0)
2089 {
2090 h->elf_link_hash_flags &= ~ELF_LINK_HASH_NEEDS_PLT;
2091 h->plt.offset = (bfd_vma) -1;
2092 return TRUE;
2093 }
2094
2095 /* Make sure this symbol is output as a dynamic symbol. */
2096 if (h->dynindx == -1)
2097 {
2098 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2099 return FALSE;
2100 }
2101
2102 s = bfd_get_section_by_name (dynobj, ".plt");
2103 BFD_ASSERT (s != NULL);
2104
2105 /* If this is the first .plt entry, make room for the special
2106 first entry. */
2107 if (s->_raw_size == 0)
2108 s->_raw_size += PLT_ENTRY_SIZE;
2109
2110 /* If this symbol is not defined in a regular file, and we are
2111 not generating a shared library, then set the symbol to this
2112 location in the .plt. */
2113 if (!info->shared
2114 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
2115 {
2116 h->root.u.def.section = s;
2117 h->root.u.def.value = s->_raw_size;
2118 }
2119
2120 /* If there's already a GOT entry, use that, not a .got.plt. A
2121 GOT field still has a reference count when we get here; it's
2122 not yet changed to an offset. We can't do this for an
2123 executable, because then the reloc associated with the PLT
2124 would get a non-PLT reloc pointing to the PLT. FIXME: Move
2125 this to elf_cris_try_fold_plt_to_got. */
2126 if (info->shared && 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->relocatable)
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_elf_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_elf_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_elf_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->executable)
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_elf_add_dynamic_entry (info, TAG, 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 defined by a DSO) then lose the reloc for the .got
2900 (don't allocate room for it). Likewise for relocs for something
2901 for which we create a PLT. */
2902 if ((h->root.elf_link_hash_flags & ELF_LINK_HASH_DEF_DYNAMIC) == 0
2903 || h->root.plt.refcount > 0)
2904 {
2905 if (h->root.got.refcount > 0
2906 /* The size of this section is only valid and in sync with the
2907 various reference counts if we do dynamic; don't decrement it
2908 otherwise. */
2909 && elf_hash_table (info)->dynamic_sections_created)
2910 {
2911 bfd *dynobj = elf_hash_table (info)->dynobj;
2912 asection *srelgot;
2913
2914 BFD_ASSERT (dynobj != NULL);
2915
2916 srelgot = bfd_get_section_by_name (dynobj, ".rela.got");
2917
2918 BFD_ASSERT (srelgot != NULL);
2919
2920 srelgot->_raw_size -= sizeof (Elf32_External_Rela);
2921 }
2922
2923 /* If the locally-defined symbol isn't used by a DSO, then we don't
2924 have to export it as a dynamic symbol. This was already done for
2925 functions; doing this for all symbols would presumably not
2926 introduce new problems. Of course we don't do this if we're
2927 exporting all dynamic symbols. */
2928 if (! info->export_dynamic
2929 && (h->root.elf_link_hash_flags
2930 & (ELF_LINK_HASH_DEF_DYNAMIC|ELF_LINK_HASH_REF_DYNAMIC)) == 0)
2931 {
2932 h->root.dynindx = -1;
2933 _bfd_elf_strtab_delref (elf_hash_table (info)->dynstr,
2934 h->root.dynstr_index);
2935 }
2936 }
2937
2938 return TRUE;
2939 }
2940
2941 /* Reject a file depending on presence and expectation of prefixed
2942 underscores on symbols. */
2943
2944 static bfd_boolean
2945 cris_elf_object_p (abfd)
2946 bfd *abfd;
2947 {
2948 if ((elf_elfheader (abfd)->e_flags & EF_CRIS_UNDERSCORE))
2949 return (bfd_get_symbol_leading_char (abfd) == '_');
2950 else
2951 return (bfd_get_symbol_leading_char (abfd) == 0);
2952 }
2953
2954 /* Mark presence or absence of leading underscore. */
2955
2956 static void
2957 cris_elf_final_write_processing (abfd, linker)
2958 bfd *abfd;
2959 bfd_boolean linker ATTRIBUTE_UNUSED;
2960 {
2961 if (bfd_get_symbol_leading_char (abfd) == '_')
2962 elf_elfheader (abfd)->e_flags |= EF_CRIS_UNDERSCORE;
2963 else
2964 elf_elfheader (abfd)->e_flags &= ~EF_CRIS_UNDERSCORE;
2965 }
2966
2967 /* Display the flags field. */
2968
2969 static bfd_boolean
2970 cris_elf_print_private_bfd_data (abfd, ptr)
2971 bfd *abfd;
2972 PTR ptr;
2973 {
2974 FILE *file = (FILE *) ptr;
2975
2976 BFD_ASSERT (abfd != NULL && ptr != NULL)
2977
2978 _bfd_elf_print_private_bfd_data (abfd, ptr);
2979
2980 fprintf (file, _("private flags = %lx:"), elf_elfheader (abfd)->e_flags);
2981
2982 if (elf_elfheader (abfd)->e_flags & EF_CRIS_UNDERSCORE)
2983 fprintf (file, _(" [symbols have a _ prefix]"));
2984
2985 fputc ('\n', file);
2986 return TRUE;
2987 }
2988
2989 /* Don't mix files with and without a leading underscore. */
2990
2991 static bfd_boolean
2992 cris_elf_merge_private_bfd_data (ibfd, obfd)
2993 bfd *ibfd;
2994 bfd *obfd;
2995 {
2996 flagword old_flags, new_flags;
2997
2998 if (! _bfd_generic_verify_endian_match (ibfd, obfd))
2999 return FALSE;
3000
3001 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour
3002 || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
3003 return TRUE;
3004
3005 if (! elf_flags_init (obfd))
3006 {
3007 /* This happens when ld starts out with a 'blank' output file. */
3008 elf_flags_init (obfd) = TRUE;
3009
3010 /* Set flags according to current bfd_target. */
3011 cris_elf_final_write_processing (obfd, FALSE);
3012 }
3013
3014 old_flags = elf_elfheader (obfd)->e_flags;
3015 new_flags = elf_elfheader (ibfd)->e_flags;
3016
3017 /* Is this good or bad? We'll follow with other excluding flags. */
3018 if ((old_flags & EF_CRIS_UNDERSCORE) != (new_flags & EF_CRIS_UNDERSCORE))
3019 {
3020 (*_bfd_error_handler)
3021 ((new_flags & EF_CRIS_UNDERSCORE)
3022 ? _("%s: uses _-prefixed symbols, but writing file with non-prefixed symbols")
3023 : _("%s: uses non-prefixed symbols, but writing file with _-prefixed symbols"),
3024 bfd_archive_filename (ibfd));
3025 bfd_set_error (bfd_error_bad_value);
3026 return FALSE;
3027 }
3028
3029 return TRUE;
3030 }
3031
3032
3033 static enum elf_reloc_type_class
3034 elf_cris_reloc_type_class (rela)
3035 const Elf_Internal_Rela *rela;
3036 {
3037 switch ((int) ELF32_R_TYPE (rela->r_info))
3038 {
3039 case R_CRIS_RELATIVE:
3040 return reloc_class_relative;
3041 case R_CRIS_JUMP_SLOT:
3042 return reloc_class_plt;
3043 case R_CRIS_COPY:
3044 return reloc_class_copy;
3045 default:
3046 return reloc_class_normal;
3047 }
3048 }
3049 \f
3050 #define ELF_ARCH bfd_arch_cris
3051 #define ELF_MACHINE_CODE EM_CRIS
3052 #define ELF_MAXPAGESIZE 0x2000
3053
3054 #define TARGET_LITTLE_SYM bfd_elf32_cris_vec
3055 #define TARGET_LITTLE_NAME "elf32-cris"
3056 #define elf_symbol_leading_char 0
3057
3058 #define elf_info_to_howto_rel NULL
3059 #define elf_info_to_howto cris_info_to_howto_rela
3060 #define elf_backend_relocate_section cris_elf_relocate_section
3061 #define elf_backend_gc_mark_hook cris_elf_gc_mark_hook
3062 #define elf_backend_gc_sweep_hook cris_elf_gc_sweep_hook
3063 #define elf_backend_check_relocs cris_elf_check_relocs
3064 #define elf_backend_grok_prstatus cris_elf_grok_prstatus
3065 #define elf_backend_grok_psinfo cris_elf_grok_psinfo
3066
3067 #define elf_backend_can_gc_sections 1
3068 #define elf_backend_can_refcount 1
3069
3070 #define elf_backend_object_p cris_elf_object_p
3071 #define elf_backend_final_write_processing \
3072 cris_elf_final_write_processing
3073 #define bfd_elf32_bfd_print_private_bfd_data \
3074 cris_elf_print_private_bfd_data
3075 #define bfd_elf32_bfd_merge_private_bfd_data \
3076 cris_elf_merge_private_bfd_data
3077
3078 #define bfd_elf32_bfd_reloc_type_lookup cris_reloc_type_lookup
3079
3080 #define bfd_elf32_bfd_link_hash_table_create \
3081 elf_cris_link_hash_table_create
3082 #define elf_backend_adjust_dynamic_symbol \
3083 elf_cris_adjust_dynamic_symbol
3084 #define elf_backend_size_dynamic_sections \
3085 elf_cris_size_dynamic_sections
3086 #define elf_backend_finish_dynamic_symbol \
3087 elf_cris_finish_dynamic_symbol
3088 #define elf_backend_finish_dynamic_sections \
3089 elf_cris_finish_dynamic_sections
3090 #define elf_backend_create_dynamic_sections \
3091 _bfd_elf_create_dynamic_sections
3092 #define bfd_elf32_bfd_final_link \
3093 bfd_elf_gc_common_final_link
3094 #define elf_backend_hide_symbol elf_cris_hide_symbol
3095 #define elf_backend_reloc_type_class elf_cris_reloc_type_class
3096
3097 #define elf_backend_want_got_plt 1
3098 #define elf_backend_plt_readonly 1
3099 #define elf_backend_want_plt_sym 0
3100 #define elf_backend_got_header_size 12
3101
3102 /* Later, we my want to optimize RELA entries into REL entries for dynamic
3103 linking and libraries (if it's a win of any significance). Until then,
3104 take the easy route. */
3105 #define elf_backend_may_use_rel_p 0
3106 #define elf_backend_may_use_rela_p 1
3107 #define elf_backend_rela_normal 1
3108
3109 #include "elf32-target.h"
3110
3111 #define INCLUDED_TARGET_FILE
3112
3113 #undef TARGET_LITTLE_SYM
3114 #undef TARGET_LITTLE_NAME
3115 #undef elf_symbol_leading_char
3116
3117 #define TARGET_LITTLE_SYM bfd_elf32_us_cris_vec
3118 #define TARGET_LITTLE_NAME "elf32-us-cris"
3119 #define elf_symbol_leading_char '_'
3120
3121 #include "elf32-target.h"
This page took 0.145841 seconds and 4 git commands to generate.