?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
* ld-arm/arm-elf.exp: Add arm-static-app test.
[binutils.git] / bfd / elf64-mips.c
blob71c3425eaa8b561a844ab17f27e101610d18b2ef
1 /* MIPS-specific support for 64-bit ELF
2 Copyright 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003
3 Free Software Foundation, Inc.
4 Ian Lance Taylor, Cygnus Support
5 Linker support added by Mark Mitchell, CodeSourcery, LLC.
6 <mark@codesourcery.com>
7
8 This file is part of BFD, the Binary File Descriptor library.
9
10 This program is free software; you can redistribute it and/or modify
11 it under the terms of the GNU General Public License as published by
12 the Free Software Foundation; either version 2 of the License, or
13 (at your option) any later version.
14
15 This program is distributed in the hope that it will be useful,
16 but WITHOUT ANY WARRANTY; without even the implied warranty of
17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 GNU General Public License for more details.
19
20 You should have received a copy of the GNU General Public License
21 along with this program; if not, write to the Free Software
22 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
23
24 /* This file supports the 64-bit MIPS ELF ABI.
25
26 The MIPS 64-bit ELF ABI uses an unusual reloc format. This file
27 overrides the usual ELF reloc handling, and handles reading and
28 writing the relocations here. */
29
30 /* TODO: Many things are unsupported, even if there is some code for it
31 . (which was mostly stolen from elf32-mips.c and slightly adapted).
32 .
33 . - Relocation handling for REL relocs is wrong in many cases and
34 . generally untested.
35 . - Relocation handling for RELA relocs related to GOT support are
36 . also likely to be wrong.
37 . - Support for MIPS16 is untested.
38 . - Combined relocs with RSS_* entries are unsupported.
39 . - The whole GOT handling for NewABI is missing, some parts of
40 . the OldABI version is still lying around and should be removed.
41 */
42
43 #include "bfd.h"
44 #include "sysdep.h"
45 #include "libbfd.h"
46 #include "aout/ar.h"
47 #include "bfdlink.h"
48 #include "genlink.h"
49 #include "elf-bfd.h"
50 #include "elfxx-mips.h"
51 #include "elf/mips.h"
52
53 /* Get the ECOFF swapping routines. The 64-bit ABI is not supposed to
54 use ECOFF. However, we support it anyhow for an easier changeover. */
55 #include "coff/sym.h"
56 #include "coff/symconst.h"
57 #include "coff/internal.h"
58 #include "coff/ecoff.h"
59 /* The 64 bit versions of the mdebug data structures are in alpha.h. */
60 #include "coff/alpha.h"
61 #define ECOFF_SIGNED_64
62 #include "ecoffswap.h"
63
64 static void mips_elf64_swap_reloc_in
65 (bfd *, const Elf64_Mips_External_Rel *, Elf64_Mips_Internal_Rela *);
66 static void mips_elf64_swap_reloca_in
67 (bfd *, const Elf64_Mips_External_Rela *, Elf64_Mips_Internal_Rela *);
68 static void mips_elf64_swap_reloc_out
69 (bfd *, const Elf64_Mips_Internal_Rela *, Elf64_Mips_External_Rel *);
70 static void mips_elf64_swap_reloca_out
71 (bfd *, const Elf64_Mips_Internal_Rela *, Elf64_Mips_External_Rela *);
72 static void mips_elf64_be_swap_reloc_in
73 (bfd *, const bfd_byte *, Elf_Internal_Rela *);
74 static void mips_elf64_be_swap_reloc_out
75 (bfd *, const Elf_Internal_Rela *, bfd_byte *);
76 static void mips_elf64_be_swap_reloca_in
77 (bfd *, const bfd_byte *, Elf_Internal_Rela *);
78 static void mips_elf64_be_swap_reloca_out
79 (bfd *, const Elf_Internal_Rela *, bfd_byte *);
80 static reloc_howto_type *bfd_elf64_bfd_reloc_type_lookup
81 (bfd *, bfd_reloc_code_real_type);
82 static reloc_howto_type *mips_elf64_rtype_to_howto
83 (unsigned int, bfd_boolean);
84 static void mips_elf64_info_to_howto_rel
85 (bfd *, arelent *, Elf_Internal_Rela *);
86 static void mips_elf64_info_to_howto_rela
87 (bfd *, arelent *, Elf_Internal_Rela *);
88 static long mips_elf64_get_reloc_upper_bound
89 (bfd *, asection *);
90 static long mips_elf64_canonicalize_reloc
91 (bfd *, asection *, arelent **, asymbol **);
92 static long mips_elf64_get_dynamic_reloc_upper_bound
93 (bfd *);
94 static long mips_elf64_canonicalize_dynamic_reloc
95 (bfd *, arelent **, asymbol **);
96 static bfd_boolean mips_elf64_slurp_one_reloc_table
97 (bfd *, asection *, Elf_Internal_Shdr *, bfd_size_type, arelent *,
98 asymbol **, bfd_boolean);
99 static bfd_boolean mips_elf64_slurp_reloc_table
100 (bfd *, asection *, asymbol **, bfd_boolean);
101 static void mips_elf64_write_relocs
102 (bfd *, asection *, void *);
103 static void mips_elf64_write_rel
104 (bfd *, asection *, Elf_Internal_Shdr *, int *, void *);
105 static void mips_elf64_write_rela
106 (bfd *, asection *, Elf_Internal_Shdr *, int *, void *);
107 static bfd_reloc_status_type mips_elf64_gprel16_reloc
108 (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **);
109 static bfd_reloc_status_type mips_elf64_literal_reloc
110 (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **);
111 static bfd_reloc_status_type mips_elf64_gprel32_reloc
112 (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **);
113 static bfd_reloc_status_type mips_elf64_shift6_reloc
114 (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **);
115 static bfd_reloc_status_type mips16_jump_reloc
116 (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **);
117 static bfd_reloc_status_type mips16_gprel_reloc
118 (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **);
119 static bfd_boolean mips_elf64_assign_gp
120 (bfd *, bfd_vma *);
121 static bfd_reloc_status_type mips_elf64_final_gp
122 (bfd *, asymbol *, bfd_boolean, char **, bfd_vma *);
123 static bfd_boolean mips_elf64_object_p
124 (bfd *);
125 static irix_compat_t elf64_mips_irix_compat
126 (bfd *);
127 static bfd_boolean elf64_mips_grok_prstatus
128 (bfd *, Elf_Internal_Note *);
129 static bfd_boolean elf64_mips_grok_psinfo
130 (bfd *, Elf_Internal_Note *);
131
132 extern const bfd_target bfd_elf64_bigmips_vec;
133 extern const bfd_target bfd_elf64_littlemips_vec;
134
135 /* In case we're on a 32-bit machine, construct a 64-bit "-1" value
136 from smaller values. Start with zero, widen, *then* decrement. */
137 #define MINUS_ONE (((bfd_vma)0) - 1)
138
139 /* The number of local .got entries we reserve. */
140 #define MIPS_RESERVED_GOTNO (2)
141 \f
142 /* The relocation table used for SHT_REL sections. */
143
144 static reloc_howto_type mips_elf64_howto_table_rel[] =
145 {
146 /* No relocation. */
147 HOWTO (R_MIPS_NONE, /* type */
148 0, /* rightshift */
149 0, /* size (0 = byte, 1 = short, 2 = long) */
150 0, /* bitsize */
151 FALSE, /* pc_relative */
152 0, /* bitpos */
153 complain_overflow_dont, /* complain_on_overflow */
154 _bfd_mips_elf_generic_reloc, /* special_function */
155 "R_MIPS_NONE", /* name */
156 FALSE, /* partial_inplace */
157 0, /* src_mask */
158 0, /* dst_mask */
159 FALSE), /* pcrel_offset */
160
161 /* 16 bit relocation. */
162 HOWTO (R_MIPS_16, /* type */
163 0, /* rightshift */
164 2, /* size (0 = byte, 1 = short, 2 = long) */
165 16, /* bitsize */
166 FALSE, /* pc_relative */
167 0, /* bitpos */
168 complain_overflow_signed, /* complain_on_overflow */
169 _bfd_mips_elf_generic_reloc, /* special_function */
170 "R_MIPS_16", /* name */
171 TRUE, /* partial_inplace */
172 0x0000ffff, /* src_mask */
173 0x0000ffff, /* dst_mask */
174 FALSE), /* pcrel_offset */
175
176 /* 32 bit relocation. */
177 HOWTO (R_MIPS_32, /* type */
178 0, /* rightshift */
179 2, /* size (0 = byte, 1 = short, 2 = long) */
180 32, /* bitsize */
181 FALSE, /* pc_relative */
182 0, /* bitpos */
183 complain_overflow_dont, /* complain_on_overflow */
184 _bfd_mips_elf_generic_reloc, /* special_function */
185 "R_MIPS_32", /* name */
186 TRUE, /* partial_inplace */
187 0xffffffff, /* src_mask */
188 0xffffffff, /* dst_mask */
189 FALSE), /* pcrel_offset */
190
191 /* 32 bit symbol relative relocation. */
192 HOWTO (R_MIPS_REL32, /* type */
193 0, /* rightshift */
194 2, /* size (0 = byte, 1 = short, 2 = long) */
195 32, /* bitsize */
196 FALSE, /* pc_relative */
197 0, /* bitpos */
198 complain_overflow_dont, /* complain_on_overflow */
199 _bfd_mips_elf_generic_reloc, /* special_function */
200 "R_MIPS_REL32", /* name */
201 TRUE, /* partial_inplace */
202 0xffffffff, /* src_mask */
203 0xffffffff, /* dst_mask */
204 FALSE), /* pcrel_offset */
205
206 /* 26 bit jump address. */
207 HOWTO (R_MIPS_26, /* type */
208 2, /* rightshift */
209 2, /* size (0 = byte, 1 = short, 2 = long) */
210 26, /* bitsize */
211 FALSE, /* pc_relative */
212 0, /* bitpos */
213 complain_overflow_dont, /* complain_on_overflow */
214 /* This needs complex overflow
215 detection, because the upper 36
216 bits must match the PC + 4. */
217 _bfd_mips_elf_generic_reloc, /* special_function */
218 "R_MIPS_26", /* name */
219 TRUE, /* partial_inplace */
220 0x03ffffff, /* src_mask */
221 0x03ffffff, /* dst_mask */
222 FALSE), /* pcrel_offset */
223
224 /* R_MIPS_HI16 and R_MIPS_LO16 are unsupported for NewABI REL.
225 However, the native IRIX6 tools use them, so we try our best. */
226
227 /* High 16 bits of symbol value. */
228 HOWTO (R_MIPS_HI16, /* type */
229 16, /* rightshift */
230 2, /* size (0 = byte, 1 = short, 2 = long) */
231 16, /* bitsize */
232 FALSE, /* pc_relative */
233 0, /* bitpos */
234 complain_overflow_dont, /* complain_on_overflow */
235 _bfd_mips_elf_hi16_reloc, /* special_function */
236 "R_MIPS_HI16", /* name */
237 TRUE, /* partial_inplace */
238 0x0000ffff, /* src_mask */
239 0x0000ffff, /* dst_mask */
240 FALSE), /* pcrel_offset */
241
242 /* Low 16 bits of symbol value. */
243 HOWTO (R_MIPS_LO16, /* type */
244 0, /* rightshift */
245 2, /* size (0 = byte, 1 = short, 2 = long) */
246 16, /* bitsize */
247 FALSE, /* pc_relative */
248 0, /* bitpos */
249 complain_overflow_dont, /* complain_on_overflow */
250 _bfd_mips_elf_lo16_reloc, /* special_function */
251 "R_MIPS_LO16", /* name */
252 TRUE, /* partial_inplace */
253 0x0000ffff, /* src_mask */
254 0x0000ffff, /* dst_mask */
255 FALSE), /* pcrel_offset */
256
257 /* GP relative reference. */
258 HOWTO (R_MIPS_GPREL16, /* type */
259 0, /* rightshift */
260 2, /* size (0 = byte, 1 = short, 2 = long) */
261 16, /* bitsize */
262 FALSE, /* pc_relative */
263 0, /* bitpos */
264 complain_overflow_signed, /* complain_on_overflow */
265 mips_elf64_gprel16_reloc, /* special_function */
266 "R_MIPS_GPREL16", /* name */
267 TRUE, /* partial_inplace */
268 0x0000ffff, /* src_mask */
269 0x0000ffff, /* dst_mask */
270 FALSE), /* pcrel_offset */
271
272 /* Reference to literal section. */
273 HOWTO (R_MIPS_LITERAL, /* type */
274 0, /* rightshift */
275 2, /* size (0 = byte, 1 = short, 2 = long) */
276 16, /* bitsize */
277 FALSE, /* pc_relative */
278 0, /* bitpos */
279 complain_overflow_signed, /* complain_on_overflow */
280 mips_elf64_literal_reloc, /* special_function */
281 "R_MIPS_LITERAL", /* name */
282 TRUE, /* partial_inplace */
283 0x0000ffff, /* src_mask */
284 0x0000ffff, /* dst_mask */
285 FALSE), /* pcrel_offset */
286
287 /* Reference to global offset table. */
288 HOWTO (R_MIPS_GOT16, /* type */
289 0, /* rightshift */
290 2, /* size (0 = byte, 1 = short, 2 = long) */
291 16, /* bitsize */
292 FALSE, /* pc_relative */
293 0, /* bitpos */
294 complain_overflow_signed, /* complain_on_overflow */
295 _bfd_mips_elf_got16_reloc, /* special_function */
296 "R_MIPS_GOT16", /* name */
297 TRUE, /* partial_inplace */
298 0x0000ffff, /* src_mask */
299 0x0000ffff, /* dst_mask */
300 FALSE), /* pcrel_offset */
301
302 /* 16 bit PC relative reference. */
303 HOWTO (R_MIPS_PC16, /* type */
304 0, /* rightshift */
305 2, /* size (0 = byte, 1 = short, 2 = long) */
306 16, /* bitsize */
307 TRUE, /* pc_relative */
308 0, /* bitpos */
309 complain_overflow_signed, /* complain_on_overflow */
310 _bfd_mips_elf_generic_reloc, /* special_function */
311 "R_MIPS_PC16", /* name */
312 TRUE, /* partial_inplace */
313 0x0000ffff, /* src_mask */
314 0x0000ffff, /* dst_mask */
315 TRUE), /* pcrel_offset */
316
317 /* 16 bit call through global offset table. */
318 HOWTO (R_MIPS_CALL16, /* type */
319 0, /* rightshift */
320 2, /* size (0 = byte, 1 = short, 2 = long) */
321 16, /* bitsize */
322 FALSE, /* pc_relative */
323 0, /* bitpos */
324 complain_overflow_signed, /* complain_on_overflow */
325 _bfd_mips_elf_generic_reloc, /* special_function */
326 "R_MIPS_CALL16", /* name */
327 TRUE, /* partial_inplace */
328 0x0000ffff, /* src_mask */
329 0x0000ffff, /* dst_mask */
330 FALSE), /* pcrel_offset */
331
332 /* 32 bit GP relative reference. */
333 HOWTO (R_MIPS_GPREL32, /* type */
334 0, /* rightshift */
335 2, /* size (0 = byte, 1 = short, 2 = long) */
336 32, /* bitsize */
337 FALSE, /* pc_relative */
338 0, /* bitpos */
339 complain_overflow_dont, /* complain_on_overflow */
340 mips_elf64_gprel32_reloc, /* special_function */
341 "R_MIPS_GPREL32", /* name */
342 TRUE, /* partial_inplace */
343 0xffffffff, /* src_mask */
344 0xffffffff, /* dst_mask */
345 FALSE), /* pcrel_offset */
346
347 EMPTY_HOWTO (13),
348 EMPTY_HOWTO (14),
349 EMPTY_HOWTO (15),
350
351 /* A 5 bit shift field. */
352 HOWTO (R_MIPS_SHIFT5, /* type */
353 0, /* rightshift */
354 2, /* size (0 = byte, 1 = short, 2 = long) */
355 5, /* bitsize */
356 FALSE, /* pc_relative */
357 6, /* bitpos */
358 complain_overflow_bitfield, /* complain_on_overflow */
359 _bfd_mips_elf_generic_reloc, /* special_function */
360 "R_MIPS_SHIFT5", /* name */
361 TRUE, /* partial_inplace */
362 0x000007c0, /* src_mask */
363 0x000007c0, /* dst_mask */
364 FALSE), /* pcrel_offset */
365
366 /* A 6 bit shift field. */
367 HOWTO (R_MIPS_SHIFT6, /* type */
368 0, /* rightshift */
369 2, /* size (0 = byte, 1 = short, 2 = long) */
370 6, /* bitsize */
371 FALSE, /* pc_relative */
372 6, /* bitpos */
373 complain_overflow_bitfield, /* complain_on_overflow */
374 mips_elf64_shift6_reloc, /* special_function */
375 "R_MIPS_SHIFT6", /* name */
376 TRUE, /* partial_inplace */
377 0x000007c4, /* src_mask */
378 0x000007c4, /* dst_mask */
379 FALSE), /* pcrel_offset */
380
381 /* 64 bit relocation. */
382 HOWTO (R_MIPS_64, /* type */
383 0, /* rightshift */
384 4, /* size (0 = byte, 1 = short, 2 = long) */
385 64, /* bitsize */
386 FALSE, /* pc_relative */
387 0, /* bitpos */
388 complain_overflow_dont, /* complain_on_overflow */
389 _bfd_mips_elf_generic_reloc, /* special_function */
390 "R_MIPS_64", /* name */
391 TRUE, /* partial_inplace */
392 MINUS_ONE, /* src_mask */
393 MINUS_ONE, /* dst_mask */
394 FALSE), /* pcrel_offset */
395
396 /* Displacement in the global offset table. */
397 HOWTO (R_MIPS_GOT_DISP, /* type */
398 0, /* rightshift */
399 2, /* size (0 = byte, 1 = short, 2 = long) */
400 16, /* bitsize */
401 FALSE, /* pc_relative */
402 0, /* bitpos */
403 complain_overflow_signed, /* complain_on_overflow */
404 _bfd_mips_elf_generic_reloc, /* special_function */
405 "R_MIPS_GOT_DISP", /* name */
406 TRUE, /* partial_inplace */
407 0x0000ffff, /* src_mask */
408 0x0000ffff, /* dst_mask */
409 FALSE), /* pcrel_offset */
410
411 /* Displacement to page pointer in the global offset table. */
412 HOWTO (R_MIPS_GOT_PAGE, /* type */
413 0, /* rightshift */
414 2, /* size (0 = byte, 1 = short, 2 = long) */
415 16, /* bitsize */
416 FALSE, /* pc_relative */
417 0, /* bitpos */
418 complain_overflow_signed, /* complain_on_overflow */
419 _bfd_mips_elf_generic_reloc, /* special_function */
420 "R_MIPS_GOT_PAGE", /* name */
421 TRUE, /* partial_inplace */
422 0x0000ffff, /* src_mask */
423 0x0000ffff, /* dst_mask */
424 FALSE), /* pcrel_offset */
425
426 /* Offset from page pointer in the global offset table. */
427 HOWTO (R_MIPS_GOT_OFST, /* type */
428 0, /* rightshift */
429 2, /* size (0 = byte, 1 = short, 2 = long) */
430 16, /* bitsize */
431 FALSE, /* pc_relative */
432 0, /* bitpos */
433 complain_overflow_signed, /* complain_on_overflow */
434 _bfd_mips_elf_generic_reloc, /* special_function */
435 "R_MIPS_GOT_OFST", /* name */
436 TRUE, /* partial_inplace */
437 0x0000ffff, /* src_mask */
438 0x0000ffff, /* dst_mask */
439 FALSE), /* pcrel_offset */
440
441 /* High 16 bits of displacement in global offset table. */
442 HOWTO (R_MIPS_GOT_HI16, /* type */
443 0, /* rightshift */
444 2, /* size (0 = byte, 1 = short, 2 = long) */
445 16, /* bitsize */
446 FALSE, /* pc_relative */
447 0, /* bitpos */
448 complain_overflow_dont, /* complain_on_overflow */
449 _bfd_mips_elf_generic_reloc, /* special_function */
450 "R_MIPS_GOT_HI16", /* name */
451 TRUE, /* partial_inplace */
452 0x0000ffff, /* src_mask */
453 0x0000ffff, /* dst_mask */
454 FALSE), /* pcrel_offset */
455
456 /* Low 16 bits of displacement in global offset table. */
457 HOWTO (R_MIPS_GOT_LO16, /* type */
458 0, /* rightshift */
459 2, /* size (0 = byte, 1 = short, 2 = long) */
460 16, /* bitsize */
461 FALSE, /* pc_relative */
462 0, /* bitpos */
463 complain_overflow_dont, /* complain_on_overflow */
464 _bfd_mips_elf_generic_reloc, /* special_function */
465 "R_MIPS_GOT_LO16", /* name */
466 TRUE, /* partial_inplace */
467 0x0000ffff, /* src_mask */
468 0x0000ffff, /* dst_mask */
469 FALSE), /* pcrel_offset */
470
471 /* 64 bit subtraction. */
472 HOWTO (R_MIPS_SUB, /* type */
473 0, /* rightshift */
474 4, /* size (0 = byte, 1 = short, 2 = long) */
475 64, /* bitsize */
476 FALSE, /* pc_relative */
477 0, /* bitpos */
478 complain_overflow_dont, /* complain_on_overflow */
479 _bfd_mips_elf_generic_reloc, /* special_function */
480 "R_MIPS_SUB", /* name */
481 TRUE, /* partial_inplace */
482 MINUS_ONE, /* src_mask */
483 MINUS_ONE, /* dst_mask */
484 FALSE), /* pcrel_offset */
485
486 /* Insert the addend as an instruction. */
487 /* FIXME: Not handled correctly. */
488 HOWTO (R_MIPS_INSERT_A, /* type */
489 0, /* rightshift */
490 2, /* size (0 = byte, 1 = short, 2 = long) */
491 32, /* bitsize */
492 FALSE, /* pc_relative */
493 0, /* bitpos */
494 complain_overflow_dont, /* complain_on_overflow */
495 _bfd_mips_elf_generic_reloc, /* special_function */
496 "R_MIPS_INSERT_A", /* name */
497 TRUE, /* partial_inplace */
498 0xffffffff, /* src_mask */
499 0xffffffff, /* dst_mask */
500 FALSE), /* pcrel_offset */
501
502 /* Insert the addend as an instruction, and change all relocations
503 to refer to the old instruction at the address. */
504 /* FIXME: Not handled correctly. */
505 HOWTO (R_MIPS_INSERT_B, /* type */
506 0, /* rightshift */
507 2, /* size (0 = byte, 1 = short, 2 = long) */
508 32, /* bitsize */
509 FALSE, /* pc_relative */
510 0, /* bitpos */
511 complain_overflow_dont, /* complain_on_overflow */
512 _bfd_mips_elf_generic_reloc, /* special_function */
513 "R_MIPS_INSERT_B", /* name */
514 TRUE, /* partial_inplace */
515 0xffffffff, /* src_mask */
516 0xffffffff, /* dst_mask */
517 FALSE), /* pcrel_offset */
518
519 /* Delete a 32 bit instruction. */
520 /* FIXME: Not handled correctly. */
521 HOWTO (R_MIPS_DELETE, /* type */
522 0, /* rightshift */
523 2, /* size (0 = byte, 1 = short, 2 = long) */
524 32, /* bitsize */
525 FALSE, /* pc_relative */
526 0, /* bitpos */
527 complain_overflow_dont, /* complain_on_overflow */
528 _bfd_mips_elf_generic_reloc, /* special_function */
529 "R_MIPS_DELETE", /* name */
530 TRUE, /* partial_inplace */
531 0xffffffff, /* src_mask */
532 0xffffffff, /* dst_mask */
533 FALSE), /* pcrel_offset */
534
535 /* The MIPS ELF64 ABI Draft wants us to support these for REL relocations.
536 We don't, because
537 a) It means building the addend from a R_MIPS_HIGHEST/R_MIPS_HIGHER/
538 R_MIPS_HI16/R_MIPS_LO16 sequence with varying ordering, using
539 fallable heuristics.
540 b) No other NewABI toolchain actually emits such relocations. */
541 EMPTY_HOWTO (R_MIPS_HIGHER),
542 EMPTY_HOWTO (R_MIPS_HIGHEST),
543
544 /* High 16 bits of displacement in global offset table. */
545 HOWTO (R_MIPS_CALL_HI16, /* type */
546 0, /* rightshift */
547 2, /* size (0 = byte, 1 = short, 2 = long) */
548 16, /* bitsize */
549 FALSE, /* pc_relative */
550 0, /* bitpos */
551 complain_overflow_dont, /* complain_on_overflow */
552 _bfd_mips_elf_generic_reloc, /* special_function */
553 "R_MIPS_CALL_HI16", /* name */
554 TRUE, /* partial_inplace */
555 0x0000ffff, /* src_mask */
556 0x0000ffff, /* dst_mask */
557 FALSE), /* pcrel_offset */
558
559 /* Low 16 bits of displacement in global offset table. */
560 HOWTO (R_MIPS_CALL_LO16, /* type */
561 0, /* rightshift */
562 2, /* size (0 = byte, 1 = short, 2 = long) */
563 16, /* bitsize */
564 FALSE, /* pc_relative */
565 0, /* bitpos */
566 complain_overflow_dont, /* complain_on_overflow */
567 _bfd_mips_elf_generic_reloc, /* special_function */
568 "R_MIPS_CALL_LO16", /* name */
569 TRUE, /* partial_inplace */
570 0x0000ffff, /* src_mask */
571 0x0000ffff, /* dst_mask */
572 FALSE), /* pcrel_offset */
573
574 /* Section displacement, used by an associated event location section. */
575 HOWTO (R_MIPS_SCN_DISP, /* type */
576 0, /* rightshift */
577 2, /* size (0 = byte, 1 = short, 2 = long) */
578 32, /* bitsize */
579 FALSE, /* pc_relative */
580 0, /* bitpos */
581 complain_overflow_dont, /* complain_on_overflow */
582 _bfd_mips_elf_generic_reloc, /* special_function */
583 "R_MIPS_SCN_DISP", /* name */
584 TRUE, /* partial_inplace */
585 0xffffffff, /* src_mask */
586 0xffffffff, /* dst_mask */
587 FALSE), /* pcrel_offset */
588
589 HOWTO (R_MIPS_REL16, /* type */
590 0, /* rightshift */
591 1, /* size (0 = byte, 1 = short, 2 = long) */
592 16, /* bitsize */
593 FALSE, /* pc_relative */
594 0, /* bitpos */
595 complain_overflow_signed, /* complain_on_overflow */
596 _bfd_mips_elf_generic_reloc, /* special_function */
597 "R_MIPS_REL16", /* name */
598 TRUE, /* partial_inplace */
599 0xffff, /* src_mask */
600 0xffff, /* dst_mask */
601 FALSE), /* pcrel_offset */
602
603 /* These two are obsolete. */
604 EMPTY_HOWTO (R_MIPS_ADD_IMMEDIATE),
605 EMPTY_HOWTO (R_MIPS_PJUMP),
606
607 /* Similiar to R_MIPS_REL32, but used for relocations in a GOT section.
608 It must be used for multigot GOT's (and only there). */
609 HOWTO (R_MIPS_RELGOT, /* type */
610 0, /* rightshift */
611 2, /* size (0 = byte, 1 = short, 2 = long) */
612 32, /* bitsize */
613 FALSE, /* pc_relative */
614 0, /* bitpos */
615 complain_overflow_dont, /* complain_on_overflow */
616 _bfd_mips_elf_generic_reloc, /* special_function */
617 "R_MIPS_RELGOT", /* name */
618 TRUE, /* partial_inplace */
619 0xffffffff, /* src_mask */
620 0xffffffff, /* dst_mask */
621 FALSE), /* pcrel_offset */
622
623 /* Protected jump conversion. This is an optimization hint. No
624 relocation is required for correctness. */
625 HOWTO (R_MIPS_JALR, /* type */
626 0, /* rightshift */
627 2, /* size (0 = byte, 1 = short, 2 = long) */
628 32, /* bitsize */
629 FALSE, /* pc_relative */
630 0, /* bitpos */
631 complain_overflow_dont, /* complain_on_overflow */
632 _bfd_mips_elf_generic_reloc, /* special_function */
633 "R_MIPS_JALR", /* name */
634 FALSE, /* partial_inplace */
635 0, /* src_mask */
636 0x00000000, /* dst_mask */
637 FALSE), /* pcrel_offset */
638 };
639
640 /* The relocation table used for SHT_RELA sections. */
641
642 static reloc_howto_type mips_elf64_howto_table_rela[] =
643 {
644 /* No relocation. */
645 HOWTO (R_MIPS_NONE, /* type */
646 0, /* rightshift */
647 0, /* size (0 = byte, 1 = short, 2 = long) */
648 0, /* bitsize */
649 FALSE, /* pc_relative */
650 0, /* bitpos */
651 complain_overflow_dont, /* complain_on_overflow */
652 _bfd_mips_elf_generic_reloc, /* special_function */
653 "R_MIPS_NONE", /* name */
654 FALSE, /* partial_inplace */
655 0, /* src_mask */
656 0, /* dst_mask */
657 FALSE), /* pcrel_offset */
658
659 /* 16 bit relocation. */
660 HOWTO (R_MIPS_16, /* type */
661 0, /* rightshift */
662 2, /* size (0 = byte, 1 = short, 2 = long) */
663 16, /* bitsize */
664 FALSE, /* pc_relative */
665 0, /* bitpos */
666 complain_overflow_signed, /* complain_on_overflow */
667 _bfd_mips_elf_generic_reloc, /* special_function */
668 "R_MIPS_16", /* name */
669 FALSE, /* partial_inplace */
670 0, /* src_mask */
671 0x0000ffff, /* dst_mask */
672 FALSE), /* pcrel_offset */
673
674 /* 32 bit relocation. */
675 HOWTO (R_MIPS_32, /* type */
676 0, /* rightshift */
677 2, /* size (0 = byte, 1 = short, 2 = long) */
678 32, /* bitsize */
679 FALSE, /* pc_relative */
680 0, /* bitpos */
681 complain_overflow_dont, /* complain_on_overflow */
682 _bfd_mips_elf_generic_reloc, /* special_function */
683 "R_MIPS_32", /* name */
684 FALSE, /* partial_inplace */
685 0, /* src_mask */
686 0xffffffff, /* dst_mask */
687 FALSE), /* pcrel_offset */
688
689 /* 32 bit symbol relative relocation. */
690 HOWTO (R_MIPS_REL32, /* type */
691 0, /* rightshift */
692 2, /* size (0 = byte, 1 = short, 2 = long) */
693 32, /* bitsize */
694 FALSE, /* pc_relative */
695 0, /* bitpos */
696 complain_overflow_dont, /* complain_on_overflow */
697 _bfd_mips_elf_generic_reloc, /* special_function */
698 "R_MIPS_REL32", /* name */
699 FALSE, /* partial_inplace */
700 0, /* src_mask */
701 0xffffffff, /* dst_mask */
702 FALSE), /* pcrel_offset */
703
704 /* 26 bit jump address. */
705 HOWTO (R_MIPS_26, /* type */
706 2, /* rightshift */
707 2, /* size (0 = byte, 1 = short, 2 = long) */
708 26, /* bitsize */
709 FALSE, /* pc_relative */
710 0, /* bitpos */
711 complain_overflow_dont, /* complain_on_overflow */
712 /* This needs complex overflow
713 detection, because the upper 36
714 bits must match the PC + 4. */
715 _bfd_mips_elf_generic_reloc, /* special_function */
716 "R_MIPS_26", /* name */
717 FALSE, /* partial_inplace */
718 0, /* src_mask */
719 0x03ffffff, /* dst_mask */
720 FALSE), /* pcrel_offset */
721
722 /* High 16 bits of symbol value. */
723 HOWTO (R_MIPS_HI16, /* type */
724 0, /* rightshift */
725 2, /* size (0 = byte, 1 = short, 2 = long) */
726 16, /* bitsize */
727 FALSE, /* pc_relative */
728 0, /* bitpos */
729 complain_overflow_dont, /* complain_on_overflow */
730 _bfd_mips_elf_generic_reloc, /* special_function */
731 "R_MIPS_HI16", /* name */
732 FALSE, /* partial_inplace */
733 0, /* src_mask */
734 0x0000ffff, /* dst_mask */
735 FALSE), /* pcrel_offset */
736
737 /* Low 16 bits of symbol value. */
738 HOWTO (R_MIPS_LO16, /* type */
739 0, /* rightshift */
740 2, /* size (0 = byte, 1 = short, 2 = long) */
741 16, /* bitsize */
742 FALSE, /* pc_relative */
743 0, /* bitpos */
744 complain_overflow_dont, /* complain_on_overflow */
745 _bfd_mips_elf_generic_reloc, /* special_function */
746 "R_MIPS_LO16", /* name */
747 FALSE, /* partial_inplace */
748 0, /* src_mask */
749 0x0000ffff, /* dst_mask */
750 FALSE), /* pcrel_offset */
751
752 /* GP relative reference. */
753 HOWTO (R_MIPS_GPREL16, /* type */
754 0, /* rightshift */
755 2, /* size (0 = byte, 1 = short, 2 = long) */
756 16, /* bitsize */
757 FALSE, /* pc_relative */
758 0, /* bitpos */
759 complain_overflow_signed, /* complain_on_overflow */
760 mips_elf64_gprel16_reloc, /* special_function */
761 "R_MIPS_GPREL16", /* name */
762 FALSE, /* partial_inplace */
763 0, /* src_mask */
764 0x0000ffff, /* dst_mask */
765 FALSE), /* pcrel_offset */
766
767 /* Reference to literal section. */
768 HOWTO (R_MIPS_LITERAL, /* type */
769 0, /* rightshift */
770 2, /* size (0 = byte, 1 = short, 2 = long) */
771 16, /* bitsize */
772 FALSE, /* pc_relative */
773 0, /* bitpos */
774 complain_overflow_signed, /* complain_on_overflow */
775 mips_elf64_literal_reloc, /* special_function */
776 "R_MIPS_LITERAL", /* name */
777 FALSE, /* partial_inplace */
778 0, /* src_mask */
779 0x0000ffff, /* dst_mask */
780 FALSE), /* pcrel_offset */
781
782 /* Reference to global offset table. */
783 HOWTO (R_MIPS_GOT16, /* type */
784 0, /* rightshift */
785 2, /* size (0 = byte, 1 = short, 2 = long) */
786 16, /* bitsize */
787 FALSE, /* pc_relative */
788 0, /* bitpos */
789 complain_overflow_signed, /* complain_on_overflow */
790 _bfd_mips_elf_generic_reloc, /* special_function */
791 "R_MIPS_GOT16", /* name */
792 FALSE, /* partial_inplace */
793 0, /* src_mask */
794 0x0000ffff, /* dst_mask */
795 FALSE), /* pcrel_offset */
796
797 /* 16 bit PC relative reference. */
798 HOWTO (R_MIPS_PC16, /* type */
799 0, /* rightshift */
800 2, /* size (0 = byte, 1 = short, 2 = long) */
801 16, /* bitsize */
802 TRUE, /* pc_relative */
803 0, /* bitpos */
804 complain_overflow_signed, /* complain_on_overflow */
805 _bfd_mips_elf_generic_reloc, /* special_function */
806 "R_MIPS_PC16", /* name */
807 FALSE, /* partial_inplace */
808 0, /* src_mask */
809 0x0000ffff, /* dst_mask */
810 TRUE), /* pcrel_offset */
811
812 /* 16 bit call through global offset table. */
813 HOWTO (R_MIPS_CALL16, /* type */
814 0, /* rightshift */
815 2, /* size (0 = byte, 1 = short, 2 = long) */
816 16, /* bitsize */
817 FALSE, /* pc_relative */
818 0, /* bitpos */
819 complain_overflow_signed, /* complain_on_overflow */
820 _bfd_mips_elf_generic_reloc, /* special_function */
821 "R_MIPS_CALL16", /* name */
822 FALSE, /* partial_inplace */
823 0, /* src_mask */
824 0x0000ffff, /* dst_mask */
825 FALSE), /* pcrel_offset */
826
827 /* 32 bit GP relative reference. */
828 HOWTO (R_MIPS_GPREL32, /* type */
829 0, /* rightshift */
830 2, /* size (0 = byte, 1 = short, 2 = long) */
831 32, /* bitsize */
832 FALSE, /* pc_relative */
833 0, /* bitpos */
834 complain_overflow_dont, /* complain_on_overflow */
835 mips_elf64_gprel32_reloc, /* special_function */
836 "R_MIPS_GPREL32", /* name */
837 FALSE, /* partial_inplace */
838 0, /* src_mask */
839 0xffffffff, /* dst_mask */
840 FALSE), /* pcrel_offset */
841
842 EMPTY_HOWTO (13),
843 EMPTY_HOWTO (14),
844 EMPTY_HOWTO (15),
845
846 /* A 5 bit shift field. */
847 HOWTO (R_MIPS_SHIFT5, /* type */
848 0, /* rightshift */
849 2, /* size (0 = byte, 1 = short, 2 = long) */
850 5, /* bitsize */
851 FALSE, /* pc_relative */
852 6, /* bitpos */
853 complain_overflow_bitfield, /* complain_on_overflow */
854 _bfd_mips_elf_generic_reloc, /* special_function */
855 "R_MIPS_SHIFT5", /* name */
856 FALSE, /* partial_inplace */
857 0, /* src_mask */
858 0x000007c0, /* dst_mask */
859 FALSE), /* pcrel_offset */
860
861 /* A 6 bit shift field. */
862 HOWTO (R_MIPS_SHIFT6, /* type */
863 0, /* rightshift */
864 2, /* size (0 = byte, 1 = short, 2 = long) */
865 6, /* bitsize */
866 FALSE, /* pc_relative */
867 6, /* bitpos */
868 complain_overflow_bitfield, /* complain_on_overflow */
869 mips_elf64_shift6_reloc, /* special_function */
870 "R_MIPS_SHIFT6", /* name */
871 FALSE, /* partial_inplace */
872 0, /* src_mask */
873 0x000007c4, /* dst_mask */
874 FALSE), /* pcrel_offset */
875
876 /* 64 bit relocation. */
877 HOWTO (R_MIPS_64, /* type */
878 0, /* rightshift */
879 4, /* size (0 = byte, 1 = short, 2 = long) */
880 64, /* bitsize */
881 FALSE, /* pc_relative */
882 0, /* bitpos */
883 complain_overflow_dont, /* complain_on_overflow */
884 _bfd_mips_elf_generic_reloc, /* special_function */
885 "R_MIPS_64", /* name */
886 FALSE, /* partial_inplace */
887 0, /* src_mask */
888 MINUS_ONE, /* dst_mask */
889 FALSE), /* pcrel_offset */
890
891 /* Displacement in the global offset table. */
892 HOWTO (R_MIPS_GOT_DISP, /* type */
893 0, /* rightshift */
894 2, /* size (0 = byte, 1 = short, 2 = long) */
895 16, /* bitsize */
896 FALSE, /* pc_relative */
897 0, /* bitpos */
898 complain_overflow_signed, /* complain_on_overflow */
899 _bfd_mips_elf_generic_reloc, /* special_function */
900 "R_MIPS_GOT_DISP", /* name */
901 FALSE, /* partial_inplace */
902 0, /* src_mask */
903 0x0000ffff, /* dst_mask */
904 FALSE), /* pcrel_offset */
905
906 /* Displacement to page pointer in the global offset table. */
907 HOWTO (R_MIPS_GOT_PAGE, /* type */
908 0, /* rightshift */
909 2, /* size (0 = byte, 1 = short, 2 = long) */
910 16, /* bitsize */
911 FALSE, /* pc_relative */
912 0, /* bitpos */
913 complain_overflow_signed, /* complain_on_overflow */
914 _bfd_mips_elf_generic_reloc, /* special_function */
915 "R_MIPS_GOT_PAGE", /* name */
916 FALSE, /* partial_inplace */
917 0, /* src_mask */
918 0x0000ffff, /* dst_mask */
919 FALSE), /* pcrel_offset */
920
921 /* Offset from page pointer in the global offset table. */
922 HOWTO (R_MIPS_GOT_OFST, /* type */
923 0, /* rightshift */
924 2, /* size (0 = byte, 1 = short, 2 = long) */
925 16, /* bitsize */
926 FALSE, /* pc_relative */
927 0, /* bitpos */
928 complain_overflow_signed, /* complain_on_overflow */
929 _bfd_mips_elf_generic_reloc, /* special_function */
930 "R_MIPS_GOT_OFST", /* name */
931 FALSE, /* partial_inplace */
932 0, /* src_mask */
933 0x0000ffff, /* dst_mask */
934 FALSE), /* pcrel_offset */
935
936 /* High 16 bits of displacement in global offset table. */
937 HOWTO (R_MIPS_GOT_HI16, /* type */
938 0, /* rightshift */
939 2, /* size (0 = byte, 1 = short, 2 = long) */
940 16, /* bitsize */
941 FALSE, /* pc_relative */
942 0, /* bitpos */
943 complain_overflow_dont, /* complain_on_overflow */
944 _bfd_mips_elf_generic_reloc, /* special_function */
945 "R_MIPS_GOT_HI16", /* name */
946 FALSE, /* partial_inplace */
947 0, /* src_mask */
948 0x0000ffff, /* dst_mask */
949 FALSE), /* pcrel_offset */
950
951 /* Low 16 bits of displacement in global offset table. */
952 HOWTO (R_MIPS_GOT_LO16, /* type */
953 0, /* rightshift */
954 2, /* size (0 = byte, 1 = short, 2 = long) */
955 16, /* bitsize */
956 FALSE, /* pc_relative */
957 0, /* bitpos */
958 complain_overflow_dont, /* complain_on_overflow */
959 _bfd_mips_elf_generic_reloc, /* special_function */
960 "R_MIPS_GOT_LO16", /* name */
961 FALSE, /* partial_inplace */
962 0, /* src_mask */
963 0x0000ffff, /* dst_mask */
964 FALSE), /* pcrel_offset */
965
966 /* 64 bit subtraction. */
967 HOWTO (R_MIPS_SUB, /* type */
968 0, /* rightshift */
969 4, /* size (0 = byte, 1 = short, 2 = long) */
970 64, /* bitsize */
971 FALSE, /* pc_relative */
972 0, /* bitpos */
973 complain_overflow_dont, /* complain_on_overflow */
974 _bfd_mips_elf_generic_reloc, /* special_function */
975 "R_MIPS_SUB", /* name */
976 FALSE, /* partial_inplace */
977 0, /* src_mask */
978 MINUS_ONE, /* dst_mask */
979 FALSE), /* pcrel_offset */
980
981 /* Insert the addend as an instruction. */
982 /* FIXME: Not handled correctly. */
983 HOWTO (R_MIPS_INSERT_A, /* type */
984 0, /* rightshift */
985 2, /* size (0 = byte, 1 = short, 2 = long) */
986 32, /* bitsize */
987 FALSE, /* pc_relative */
988 0, /* bitpos */
989 complain_overflow_dont, /* complain_on_overflow */
990 _bfd_mips_elf_generic_reloc, /* special_function */
991 "R_MIPS_INSERT_A", /* name */
992 FALSE, /* partial_inplace */
993 0, /* src_mask */
994 0xffffffff, /* dst_mask */
995 FALSE), /* pcrel_offset */
996
997 /* Insert the addend as an instruction, and change all relocations
998 to refer to the old instruction at the address. */
999 /* FIXME: Not handled correctly. */
1000 HOWTO (R_MIPS_INSERT_B, /* type */
1001 0, /* rightshift */
1002 2, /* size (0 = byte, 1 = short, 2 = long) */
1003 32, /* bitsize */
1004 FALSE, /* pc_relative */
1005 0, /* bitpos */
1006 complain_overflow_dont, /* complain_on_overflow */
1007 _bfd_mips_elf_generic_reloc, /* special_function */
1008 "R_MIPS_INSERT_B", /* name */
1009 FALSE, /* partial_inplace */
1010 0, /* src_mask */
1011 0xffffffff, /* dst_mask */
1012 FALSE), /* pcrel_offset */
1013
1014 /* Delete a 32 bit instruction. */
1015 /* FIXME: Not handled correctly. */
1016 HOWTO (R_MIPS_DELETE, /* type */
1017 0, /* rightshift */
1018 2, /* size (0 = byte, 1 = short, 2 = long) */
1019 32, /* bitsize */
1020 FALSE, /* pc_relative */
1021 0, /* bitpos */
1022 complain_overflow_dont, /* complain_on_overflow */
1023 _bfd_mips_elf_generic_reloc, /* special_function */
1024 "R_MIPS_DELETE", /* name */
1025 FALSE, /* partial_inplace */
1026 0, /* src_mask */
1027 0xffffffff, /* dst_mask */
1028 FALSE), /* pcrel_offset */
1029
1030 /* Get the higher value of a 64 bit addend. */
1031 HOWTO (R_MIPS_HIGHER, /* type */
1032 0, /* rightshift */
1033 2, /* size (0 = byte, 1 = short, 2 = long) */
1034 16, /* bitsize */
1035 FALSE, /* pc_relative */
1036 0, /* bitpos */
1037 complain_overflow_dont, /* complain_on_overflow */
1038 _bfd_mips_elf_generic_reloc, /* special_function */
1039 "R_MIPS_HIGHER", /* name */
1040 FALSE, /* partial_inplace */
1041 0, /* src_mask */
1042 0x0000ffff, /* dst_mask */
1043 FALSE), /* pcrel_offset */
1044
1045 /* Get the highest value of a 64 bit addend. */
1046 HOWTO (R_MIPS_HIGHEST, /* type */
1047 0, /* rightshift */
1048 2, /* size (0 = byte, 1 = short, 2 = long) */
1049 16, /* bitsize */
1050 FALSE, /* pc_relative */
1051 0, /* bitpos */
1052 complain_overflow_dont, /* complain_on_overflow */
1053 _bfd_mips_elf_generic_reloc, /* special_function */
1054 "R_MIPS_HIGHEST", /* name */
1055 FALSE, /* partial_inplace */
1056 0, /* src_mask */
1057 0x0000ffff, /* dst_mask */
1058 FALSE), /* pcrel_offset */
1059
1060 /* High 16 bits of displacement in global offset table. */
1061 HOWTO (R_MIPS_CALL_HI16, /* type */
1062 0, /* rightshift */
1063 2, /* size (0 = byte, 1 = short, 2 = long) */
1064 16, /* bitsize */
1065 FALSE, /* pc_relative */
1066 0, /* bitpos */
1067 complain_overflow_dont, /* complain_on_overflow */
1068 _bfd_mips_elf_generic_reloc, /* special_function */
1069 "R_MIPS_CALL_HI16", /* name */
1070 FALSE, /* partial_inplace */
1071 0, /* src_mask */
1072 0x0000ffff, /* dst_mask */
1073 FALSE), /* pcrel_offset */
1074
1075 /* Low 16 bits of displacement in global offset table. */
1076 HOWTO (R_MIPS_CALL_LO16, /* type */
1077 0, /* rightshift */
1078 2, /* size (0 = byte, 1 = short, 2 = long) */
1079 16, /* bitsize */
1080 FALSE, /* pc_relative */
1081 0, /* bitpos */
1082 complain_overflow_dont, /* complain_on_overflow */
1083 _bfd_mips_elf_generic_reloc, /* special_function */
1084 "R_MIPS_CALL_LO16", /* name */
1085 FALSE, /* partial_inplace */
1086 0, /* src_mask */
1087 0x0000ffff, /* dst_mask */
1088 FALSE), /* pcrel_offset */
1089
1090 /* Section displacement, used by an associated event location section. */
1091 HOWTO (R_MIPS_SCN_DISP, /* type */
1092 0, /* rightshift */
1093 2, /* size (0 = byte, 1 = short, 2 = long) */
1094 32, /* bitsize */
1095 FALSE, /* pc_relative */
1096 0, /* bitpos */
1097 complain_overflow_dont, /* complain_on_overflow */
1098 _bfd_mips_elf_generic_reloc, /* special_function */
1099 "R_MIPS_SCN_DISP", /* name */
1100 FALSE, /* partial_inplace */
1101 0, /* src_mask */
1102 0xffffffff, /* dst_mask */
1103 FALSE), /* pcrel_offset */
1104
1105 HOWTO (R_MIPS_REL16, /* type */
1106 0, /* rightshift */
1107 1, /* size (0 = byte, 1 = short, 2 = long) */
1108 16, /* bitsize */
1109 FALSE, /* pc_relative */
1110 0, /* bitpos */
1111 complain_overflow_signed, /* complain_on_overflow */
1112 _bfd_mips_elf_generic_reloc, /* special_function */
1113 "R_MIPS_REL16", /* name */
1114 FALSE, /* partial_inplace */
1115 0, /* src_mask */
1116 0xffff, /* dst_mask */
1117 FALSE), /* pcrel_offset */
1118
1119 /* These two are obsolete. */
1120 EMPTY_HOWTO (R_MIPS_ADD_IMMEDIATE),
1121 EMPTY_HOWTO (R_MIPS_PJUMP),
1122
1123 /* Similiar to R_MIPS_REL32, but used for relocations in a GOT section.
1124 It must be used for multigot GOT's (and only there). */
1125 HOWTO (R_MIPS_RELGOT, /* type */
1126 0, /* rightshift */
1127 2, /* size (0 = byte, 1 = short, 2 = long) */
1128 32, /* bitsize */
1129 FALSE, /* pc_relative */
1130 0, /* bitpos */
1131 complain_overflow_dont, /* complain_on_overflow */
1132 _bfd_mips_elf_generic_reloc, /* special_function */
1133 "R_MIPS_RELGOT", /* name */
1134 FALSE, /* partial_inplace */
1135 0, /* src_mask */
1136 0xffffffff, /* dst_mask */
1137 FALSE), /* pcrel_offset */
1138
1139 /* Protected jump conversion. This is an optimization hint. No
1140 relocation is required for correctness. */
1141 HOWTO (R_MIPS_JALR, /* type */
1142 0, /* rightshift */
1143 2, /* size (0 = byte, 1 = short, 2 = long) */
1144 32, /* bitsize */
1145 FALSE, /* pc_relative */
1146 0, /* bitpos */
1147 complain_overflow_dont, /* complain_on_overflow */
1148 _bfd_mips_elf_generic_reloc, /* special_function */
1149 "R_MIPS_JALR", /* name */
1150 FALSE, /* partial_inplace */
1151 0, /* src_mask */
1152 0x00000000, /* dst_mask */
1153 FALSE), /* pcrel_offset */
1154 };
1155
1156 /* The reloc used for the mips16 jump instruction. */
1157 static reloc_howto_type elf_mips16_jump_howto =
1158 HOWTO (R_MIPS16_26, /* type */
1159 2, /* rightshift */
1160 2, /* size (0 = byte, 1 = short, 2 = long) */
1161 26, /* bitsize */
1162 FALSE, /* pc_relative */
1163 0, /* bitpos */
1164 complain_overflow_dont, /* complain_on_overflow */
1165 /* This needs complex overflow
1166 detection, because the upper four
1167 bits must match the PC. */
1168 mips16_jump_reloc, /* special_function */
1169 "R_MIPS16_26", /* name */
1170 TRUE, /* partial_inplace */
1171 0x3ffffff, /* src_mask */
1172 0x3ffffff, /* dst_mask */
1173 FALSE); /* pcrel_offset */
1174
1175 /* The reloc used for the mips16 gprel instruction. */
1176 static reloc_howto_type elf_mips16_gprel_howto =
1177 HOWTO (R_MIPS16_GPREL, /* type */
1178 0, /* rightshift */
1179 2, /* size (0 = byte, 1 = short, 2 = long) */
1180 16, /* bitsize */
1181 FALSE, /* pc_relative */
1182 0, /* bitpos */
1183 complain_overflow_signed, /* complain_on_overflow */
1184 mips16_gprel_reloc, /* special_function */
1185 "R_MIPS16_GPREL", /* name */
1186 TRUE, /* partial_inplace */
1187 0x07ff001f, /* src_mask */
1188 0x07ff001f, /* dst_mask */
1189 FALSE); /* pcrel_offset */
1190
1191 /* GNU extension to record C++ vtable hierarchy */
1192 static reloc_howto_type elf_mips_gnu_vtinherit_howto =
1193 HOWTO (R_MIPS_GNU_VTINHERIT, /* type */
1194 0, /* rightshift */
1195 2, /* size (0 = byte, 1 = short, 2 = long) */
1196 0, /* bitsize */
1197 FALSE, /* pc_relative */
1198 0, /* bitpos */
1199 complain_overflow_dont, /* complain_on_overflow */
1200 NULL, /* special_function */
1201 "R_MIPS_GNU_VTINHERIT", /* name */
1202 FALSE, /* partial_inplace */
1203 0, /* src_mask */
1204 0, /* dst_mask */
1205 FALSE); /* pcrel_offset */
1206
1207 /* GNU extension to record C++ vtable member usage */
1208 static reloc_howto_type elf_mips_gnu_vtentry_howto =
1209 HOWTO (R_MIPS_GNU_VTENTRY, /* type */
1210 0, /* rightshift */
1211 2, /* size (0 = byte, 1 = short, 2 = long) */
1212 0, /* bitsize */
1213 FALSE, /* pc_relative */
1214 0, /* bitpos */
1215 complain_overflow_dont, /* complain_on_overflow */
1216 _bfd_elf_rel_vtable_reloc_fn, /* special_function */
1217 "R_MIPS_GNU_VTENTRY", /* name */
1218 FALSE, /* partial_inplace */
1219 0, /* src_mask */
1220 0, /* dst_mask */
1221 FALSE); /* pcrel_offset */
1222 \f
1223 /* 16 bit offset for pc-relative branches. */
1224 static reloc_howto_type elf_mips_gnu_rel16_s2 =
1225 HOWTO (R_MIPS_GNU_REL16_S2, /* type */
1226 2, /* rightshift */
1227 2, /* size (0 = byte, 1 = short, 2 = long) */
1228 16, /* bitsize */
1229 TRUE, /* pc_relative */
1230 0, /* bitpos */
1231 complain_overflow_signed, /* complain_on_overflow */
1232 _bfd_mips_elf_generic_reloc, /* special_function */
1233 "R_MIPS_GNU_REL16_S2", /* name */
1234 TRUE, /* partial_inplace */
1235 0x0000ffff, /* src_mask */
1236 0x0000ffff, /* dst_mask */
1237 TRUE); /* pcrel_offset */
1238
1239 /* 16 bit offset for pc-relative branches. */
1240 static reloc_howto_type elf_mips_gnu_rela16_s2 =
1241 HOWTO (R_MIPS_GNU_REL16_S2, /* type */
1242 2, /* rightshift */
1243 2, /* size (0 = byte, 1 = short, 2 = long) */
1244 16, /* bitsize */
1245 TRUE, /* pc_relative */
1246 0, /* bitpos */
1247 complain_overflow_signed, /* complain_on_overflow */
1248 _bfd_mips_elf_generic_reloc, /* special_function */
1249 "R_MIPS_GNU_REL16_S2", /* name */
1250 FALSE, /* partial_inplace */
1251 0, /* src_mask */
1252 0x0000ffff, /* dst_mask */
1253 TRUE); /* pcrel_offset */
1254 \f
1255 /* Swap in a MIPS 64-bit Rel reloc. */
1256
1257 static void
1258 mips_elf64_swap_reloc_in (bfd *abfd, const Elf64_Mips_External_Rel *src,
1259 Elf64_Mips_Internal_Rela *dst)
1260 {
1261 dst->r_offset = H_GET_64 (abfd, src->r_offset);
1262 dst->r_sym = H_GET_32 (abfd, src->r_sym);
1263 dst->r_ssym = H_GET_8 (abfd, src->r_ssym);
1264 dst->r_type3 = H_GET_8 (abfd, src->r_type3);
1265 dst->r_type2 = H_GET_8 (abfd, src->r_type2);
1266 dst->r_type = H_GET_8 (abfd, src->r_type);
1267 dst->r_addend = 0;
1268 }
1269
1270 /* Swap in a MIPS 64-bit Rela reloc. */
1271
1272 static void
1273 mips_elf64_swap_reloca_in (bfd *abfd, const Elf64_Mips_External_Rela *src,
1274 Elf64_Mips_Internal_Rela *dst)
1275 {
1276 dst->r_offset = H_GET_64 (abfd, src->r_offset);
1277 dst->r_sym = H_GET_32 (abfd, src->r_sym);
1278 dst->r_ssym = H_GET_8 (abfd, src->r_ssym);
1279 dst->r_type3 = H_GET_8 (abfd, src->r_type3);
1280 dst->r_type2 = H_GET_8 (abfd, src->r_type2);
1281 dst->r_type = H_GET_8 (abfd, src->r_type);
1282 dst->r_addend = H_GET_S64 (abfd, src->r_addend);
1283 }
1284
1285 /* Swap out a MIPS 64-bit Rel reloc. */
1286
1287 static void
1288 mips_elf64_swap_reloc_out (bfd *abfd, const Elf64_Mips_Internal_Rela *src,
1289 Elf64_Mips_External_Rel *dst)
1290 {
1291 H_PUT_64 (abfd, src->r_offset, dst->r_offset);
1292 H_PUT_32 (abfd, src->r_sym, dst->r_sym);
1293 H_PUT_8 (abfd, src->r_ssym, dst->r_ssym);
1294 H_PUT_8 (abfd, src->r_type3, dst->r_type3);
1295 H_PUT_8 (abfd, src->r_type2, dst->r_type2);
1296 H_PUT_8 (abfd, src->r_type, dst->r_type);
1297 }
1298
1299 /* Swap out a MIPS 64-bit Rela reloc. */
1300
1301 static void
1302 mips_elf64_swap_reloca_out (bfd *abfd, const Elf64_Mips_Internal_Rela *src,
1303 Elf64_Mips_External_Rela *dst)
1304 {
1305 H_PUT_64 (abfd, src->r_offset, dst->r_offset);
1306 H_PUT_32 (abfd, src->r_sym, dst->r_sym);
1307 H_PUT_8 (abfd, src->r_ssym, dst->r_ssym);
1308 H_PUT_8 (abfd, src->r_type3, dst->r_type3);
1309 H_PUT_8 (abfd, src->r_type2, dst->r_type2);
1310 H_PUT_8 (abfd, src->r_type, dst->r_type);
1311 H_PUT_S64 (abfd, src->r_addend, dst->r_addend);
1312 }
1313
1314 /* Swap in a MIPS 64-bit Rel reloc. */
1315
1316 static void
1317 mips_elf64_be_swap_reloc_in (bfd *abfd, const bfd_byte *src,
1318 Elf_Internal_Rela *dst)
1319 {
1320 Elf64_Mips_Internal_Rela mirel;
1321
1322 mips_elf64_swap_reloc_in (abfd,
1323 (const Elf64_Mips_External_Rel *) src,
1324 &mirel);
1325
1326 dst[0].r_offset = mirel.r_offset;
1327 dst[0].r_info = ELF64_R_INFO (mirel.r_sym, mirel.r_type);
1328 dst[0].r_addend = 0;
1329 dst[1].r_offset = mirel.r_offset;
1330 dst[1].r_info = ELF64_R_INFO (mirel.r_ssym, mirel.r_type2);
1331 dst[1].r_addend = 0;
1332 dst[2].r_offset = mirel.r_offset;
1333 dst[2].r_info = ELF64_R_INFO (STN_UNDEF, mirel.r_type3);
1334 dst[2].r_addend = 0;
1335 }
1336
1337 /* Swap in a MIPS 64-bit Rela reloc. */
1338
1339 static void
1340 mips_elf64_be_swap_reloca_in (bfd *abfd, const bfd_byte *src,
1341 Elf_Internal_Rela *dst)
1342 {
1343 Elf64_Mips_Internal_Rela mirela;
1344
1345 mips_elf64_swap_reloca_in (abfd,
1346 (const Elf64_Mips_External_Rela *) src,
1347 &mirela);
1348
1349 dst[0].r_offset = mirela.r_offset;
1350 dst[0].r_info = ELF64_R_INFO (mirela.r_sym, mirela.r_type);
1351 dst[0].r_addend = mirela.r_addend;
1352 dst[1].r_offset = mirela.r_offset;
1353 dst[1].r_info = ELF64_R_INFO (mirela.r_ssym, mirela.r_type2);
1354 dst[1].r_addend = 0;
1355 dst[2].r_offset = mirela.r_offset;
1356 dst[2].r_info = ELF64_R_INFO (STN_UNDEF, mirela.r_type3);
1357 dst[2].r_addend = 0;
1358 }
1359
1360 /* Swap out a MIPS 64-bit Rel reloc. */
1361
1362 static void
1363 mips_elf64_be_swap_reloc_out (bfd *abfd, const Elf_Internal_Rela *src,
1364 bfd_byte *dst)
1365 {
1366 Elf64_Mips_Internal_Rela mirel;
1367
1368 mirel.r_offset = src[0].r_offset;
1369 BFD_ASSERT(src[0].r_offset == src[1].r_offset);
1370 #if 0
1371 BFD_ASSERT(src[0].r_offset == src[2].r_offset);
1372 #endif
1373
1374 mirel.r_type = ELF64_MIPS_R_TYPE (src[0].r_info);
1375 mirel.r_sym = ELF64_R_SYM (src[0].r_info);
1376 mirel.r_type2 = ELF64_MIPS_R_TYPE (src[1].r_info);
1377 mirel.r_ssym = ELF64_MIPS_R_SSYM (src[1].r_info);
1378 mirel.r_type3 = ELF64_MIPS_R_TYPE (src[2].r_info);
1379
1380 mips_elf64_swap_reloc_out (abfd, &mirel,
1381 (Elf64_Mips_External_Rel *) dst);
1382 }
1383
1384 /* Swap out a MIPS 64-bit Rela reloc. */
1385
1386 static void
1387 mips_elf64_be_swap_reloca_out (bfd *abfd, const Elf_Internal_Rela *src,
1388 bfd_byte *dst)
1389 {
1390 Elf64_Mips_Internal_Rela mirela;
1391
1392 mirela.r_offset = src[0].r_offset;
1393 BFD_ASSERT(src[0].r_offset == src[1].r_offset);
1394 BFD_ASSERT(src[0].r_offset == src[2].r_offset);
1395
1396 mirela.r_type = ELF64_MIPS_R_TYPE (src[0].r_info);
1397 mirela.r_sym = ELF64_R_SYM (src[0].r_info);
1398 mirela.r_addend = src[0].r_addend;
1399 BFD_ASSERT(src[1].r_addend == 0);
1400 BFD_ASSERT(src[2].r_addend == 0);
1401
1402 mirela.r_type2 = ELF64_MIPS_R_TYPE (src[1].r_info);
1403 mirela.r_ssym = ELF64_MIPS_R_SSYM (src[1].r_info);
1404 mirela.r_type3 = ELF64_MIPS_R_TYPE (src[2].r_info);
1405
1406 mips_elf64_swap_reloca_out (abfd, &mirela,
1407 (Elf64_Mips_External_Rela *) dst);
1408 }
1409 \f
1410 /* Set the GP value for OUTPUT_BFD. Returns FALSE if this is a
1411 dangerous relocation. */
1412
1413 static bfd_boolean
1414 mips_elf64_assign_gp (bfd *output_bfd, bfd_vma *pgp)
1415 {
1416 unsigned int count;
1417 asymbol **sym;
1418 unsigned int i;
1419
1420 /* If we've already figured out what GP will be, just return it. */
1421 *pgp = _bfd_get_gp_value (output_bfd);
1422 if (*pgp)
1423 return TRUE;
1424
1425 count = bfd_get_symcount (output_bfd);
1426 sym = bfd_get_outsymbols (output_bfd);
1427
1428 /* The linker script will have created a symbol named `_gp' with the
1429 appropriate value. */
1430 if (sym == NULL)
1431 i = count;
1432 else
1433 {
1434 for (i = 0; i < count; i++, sym++)
1435 {
1436 register const char *name;
1437
1438 name = bfd_asymbol_name (*sym);
1439 if (*name == '_' && strcmp (name, "_gp") == 0)
1440 {
1441 *pgp = bfd_asymbol_value (*sym);
1442 _bfd_set_gp_value (output_bfd, *pgp);
1443 break;
1444 }
1445 }
1446 }
1447
1448 if (i >= count)
1449 {
1450 /* Only get the error once. */
1451 *pgp = 4;
1452 _bfd_set_gp_value (output_bfd, *pgp);
1453 return FALSE;
1454 }
1455
1456 return TRUE;
1457 }
1458
1459 /* We have to figure out the gp value, so that we can adjust the
1460 symbol value correctly. We look up the symbol _gp in the output
1461 BFD. If we can't find it, we're stuck. We cache it in the ELF
1462 target data. We don't need to adjust the symbol value for an
1463 external symbol if we are producing relocatable output. */
1464
1465 static bfd_reloc_status_type
1466 mips_elf64_final_gp (bfd *output_bfd, asymbol *symbol, bfd_boolean relocatable,
1467 char **error_message, bfd_vma *pgp)
1468 {
1469 if (bfd_is_und_section (symbol->section)
1470 && ! relocatable)
1471 {
1472 *pgp = 0;
1473 return bfd_reloc_undefined;
1474 }
1475
1476 *pgp = _bfd_get_gp_value (output_bfd);
1477 if (*pgp == 0
1478 && (! relocatable
1479 || (symbol->flags & BSF_SECTION_SYM) != 0))
1480 {
1481 if (relocatable)
1482 {
1483 /* Make up a value. */
1484 *pgp = symbol->section->output_section->vma /*+ 0x4000*/;
1485 _bfd_set_gp_value (output_bfd, *pgp);
1486 }
1487 else if (!mips_elf64_assign_gp (output_bfd, pgp))
1488 {
1489 *error_message =
1490 (char *) _("GP relative relocation when _gp not defined");
1491 return bfd_reloc_dangerous;
1492 }
1493 }
1494
1495 return bfd_reloc_ok;
1496 }
1497
1498 /* Do a R_MIPS_GPREL16 relocation. This is a 16 bit value which must
1499 become the offset from the gp register. */
1500
1501 static bfd_reloc_status_type
1502 mips_elf64_gprel16_reloc (bfd *abfd, arelent *reloc_entry, asymbol *symbol,
1503 void *data, asection *input_section, bfd *output_bfd,
1504 char **error_message)
1505 {
1506 bfd_boolean relocatable;
1507 bfd_reloc_status_type ret;
1508 bfd_vma gp;
1509
1510 /* If we're relocating, and this is an external symbol, we don't want
1511 to change anything. */
1512 if (output_bfd != NULL
1513 && (symbol->flags & BSF_SECTION_SYM) == 0
1514 && (symbol->flags & BSF_LOCAL) != 0)
1515 {
1516 reloc_entry->address += input_section->output_offset;
1517 return bfd_reloc_ok;
1518 }
1519
1520 if (output_bfd != NULL)
1521 relocatable = TRUE;
1522 else
1523 {
1524 relocatable = FALSE;
1525 output_bfd = symbol->section->output_section->owner;
1526 }
1527
1528 ret = mips_elf64_final_gp (output_bfd, symbol, relocatable, error_message,
1529 &gp);
1530 if (ret != bfd_reloc_ok)
1531 return ret;
1532
1533 return _bfd_mips_elf_gprel16_with_gp (abfd, symbol, reloc_entry,
1534 input_section, relocatable,
1535 data, gp);
1536 }
1537
1538 /* Do a R_MIPS_LITERAL relocation. */
1539
1540 static bfd_reloc_status_type
1541 mips_elf64_literal_reloc (bfd *abfd, arelent *reloc_entry, asymbol *symbol,
1542 void *data, asection *input_section, bfd *output_bfd,
1543 char **error_message)
1544 {
1545 bfd_boolean relocatable;
1546 bfd_reloc_status_type ret;
1547 bfd_vma gp;
1548
1549 /* If we're relocating, and this is an external symbol, we don't
1550 want to change anything. */
1551 if (output_bfd != NULL
1552 && (symbol->flags & BSF_SECTION_SYM) == 0
1553 && (symbol->flags & BSF_LOCAL) != 0)
1554 {
1555 reloc_entry->address += input_section->output_offset;
1556 return bfd_reloc_ok;
1557 }
1558
1559 /* FIXME: The entries in the .lit8 and .lit4 sections should be merged. */
1560 if (output_bfd != NULL)
1561 relocatable = TRUE;
1562 else
1563 {
1564 relocatable = FALSE;
1565 output_bfd = symbol->section->output_section->owner;
1566 }
1567
1568 ret = mips_elf64_final_gp (output_bfd, symbol, relocatable, error_message,
1569 &gp);
1570 if (ret != bfd_reloc_ok)
1571 return ret;
1572
1573 return _bfd_mips_elf_gprel16_with_gp (abfd, symbol, reloc_entry,
1574 input_section, relocatable,
1575 data, gp);
1576 }
1577
1578 /* Do a R_MIPS_GPREL32 relocation. This is a 32 bit value which must
1579 become the offset from the gp register. */
1580
1581 static bfd_reloc_status_type
1582 mips_elf64_gprel32_reloc (bfd *abfd, arelent *reloc_entry, asymbol *symbol,
1583 void *data, asection *input_section, bfd *output_bfd,
1584 char **error_message)
1585 {
1586 bfd_boolean relocatable;
1587 bfd_reloc_status_type ret;
1588 bfd_vma gp;
1589 bfd_vma relocation;
1590 bfd_vma val;
1591
1592 /* If we're relocating, and this is an external symbol, we don't want
1593 to change anything. */
1594 if (output_bfd != NULL
1595 && (symbol->flags & BSF_SECTION_SYM) == 0
1596 && (symbol->flags & BSF_LOCAL) != 0)
1597 {
1598 *error_message = (char *)
1599 _("32bits gp relative relocation occurs for an external symbol");
1600 return bfd_reloc_outofrange;
1601 }
1602
1603 if (output_bfd != NULL)
1604 relocatable = TRUE;
1605 else
1606 {
1607 relocatable = FALSE;
1608 output_bfd = symbol->section->output_section->owner;
1609 }
1610
1611 ret = mips_elf64_final_gp (output_bfd, symbol, relocatable,
1612 error_message, &gp);
1613 if (ret != bfd_reloc_ok)
1614 return ret;
1615
1616 if (bfd_is_com_section (symbol->section))
1617 relocation = 0;
1618 else
1619 relocation = symbol->value;
1620
1621 relocation += symbol->section->output_section->vma;
1622 relocation += symbol->section->output_offset;
1623
1624 if (reloc_entry->address > input_section->_cooked_size)
1625 return bfd_reloc_outofrange;
1626
1627 /* Set val to the offset into the section or symbol. */
1628 val = reloc_entry->addend;
1629
1630 if (reloc_entry->howto->partial_inplace)
1631 val += bfd_get_32 (abfd, (bfd_byte *) data + reloc_entry->address);
1632
1633 /* Adjust val for the final section location and GP value. If we
1634 are producing relocatable output, we don't want to do this for
1635 an external symbol. */
1636 if (! relocatable
1637 || (symbol->flags & BSF_SECTION_SYM) != 0)
1638 val += relocation - gp;
1639
1640 if (reloc_entry->howto->partial_inplace)
1641 bfd_put_32 (abfd, val, (bfd_byte *) data + reloc_entry->address);
1642 else
1643 reloc_entry->addend = val;
1644
1645 if (relocatable)
1646 reloc_entry->address += input_section->output_offset;
1647
1648 return bfd_reloc_ok;
1649 }
1650
1651 /* Do a R_MIPS_SHIFT6 relocation. The MSB of the shift is stored at bit 2,
1652 the rest is at bits 6-10. The bitpos already got right by the howto. */
1653
1654 static bfd_reloc_status_type
1655 mips_elf64_shift6_reloc (bfd *abfd, arelent *reloc_entry, asymbol *symbol,
1656 void *data, asection *input_section, bfd *output_bfd,
1657 char **error_message)
1658 {
1659 if (reloc_entry->howto->partial_inplace)
1660 {
1661 reloc_entry->addend = ((reloc_entry->addend & 0x00007c0)
1662 | (reloc_entry->addend & 0x00000800) >> 9);
1663 }
1664
1665 return _bfd_mips_elf_generic_reloc (abfd, reloc_entry, symbol, data,
1666 input_section, output_bfd,
1667 error_message);
1668 }
1669
1670 /* Handle a mips16 jump. */
1671
1672 static bfd_reloc_status_type
1673 mips16_jump_reloc (bfd *abfd ATTRIBUTE_UNUSED, arelent *reloc_entry,
1674 asymbol *symbol, void *data ATTRIBUTE_UNUSED,
1675 asection *input_section, bfd *output_bfd,
1676 char **error_message ATTRIBUTE_UNUSED)
1677 {
1678 if (output_bfd != NULL
1679 && (symbol->flags & BSF_SECTION_SYM) == 0
1680 && (! reloc_entry->howto->partial_inplace
1681 || reloc_entry->addend == 0))
1682 {
1683 reloc_entry->address += input_section->output_offset;
1684 return bfd_reloc_ok;
1685 }
1686
1687 /* FIXME. */
1688 {
1689 static bfd_boolean warned;
1690
1691 if (! warned)
1692 (*_bfd_error_handler)
1693 (_("Linking mips16 objects into %s format is not supported"),
1694 bfd_get_target (input_section->output_section->owner));
1695 warned = TRUE;
1696 }
1697
1698 return bfd_reloc_undefined;
1699 }
1700
1701 /* Handle a mips16 GP relative reloc. */
1702
1703 static bfd_reloc_status_type
1704 mips16_gprel_reloc (bfd *abfd, arelent *reloc_entry, asymbol *symbol,
1705 void *data, asection *input_section, bfd *output_bfd,
1706 char **error_message)
1707 {
1708 bfd_boolean relocatable;
1709 bfd_reloc_status_type ret;
1710 bfd_vma gp;
1711 unsigned short extend = 0;
1712 unsigned short insn = 0;
1713 bfd_signed_vma val;
1714 bfd_vma relocation;
1715
1716 /* If we're relocating, and this is an external symbol with no
1717 addend, we don't want to change anything. */
1718 if (output_bfd != NULL
1719 && (symbol->flags & BSF_SECTION_SYM) == 0
1720 && (symbol->flags & BSF_LOCAL) != 0)
1721 {
1722 reloc_entry->address += input_section->output_offset;
1723 return bfd_reloc_ok;
1724 }
1725
1726 if (output_bfd != NULL)
1727 relocatable = TRUE;
1728 else
1729 {
1730 relocatable = FALSE;
1731 output_bfd = symbol->section->output_section->owner;
1732 }
1733
1734 ret = mips_elf64_final_gp (output_bfd, symbol, relocatable, error_message,
1735 &gp);
1736 if (ret != bfd_reloc_ok)
1737 return ret;
1738
1739 if (reloc_entry->address > input_section->_cooked_size)
1740 return bfd_reloc_outofrange;
1741
1742 if (bfd_is_com_section (symbol->section))
1743 relocation = 0;
1744 else
1745 relocation = symbol->value;
1746
1747 relocation += symbol->section->output_section->vma;
1748 relocation += symbol->section->output_offset;
1749
1750 /* Set val to the offset into the section or symbol. */
1751 val = reloc_entry->addend;
1752
1753 if (reloc_entry->howto->partial_inplace)
1754 {
1755 /* Pick up the mips16 extend instruction and the real instruction. */
1756 extend = bfd_get_16 (abfd, (bfd_byte *) data + reloc_entry->address);
1757 insn = bfd_get_16 (abfd, (bfd_byte *) data + reloc_entry->address + 2);
1758 val += ((extend & 0x1f) << 11) | (extend & 0x7e0) | (insn & 0x1f);
1759 }
1760
1761 _bfd_mips_elf_sign_extend(val, 16);
1762
1763 /* Adjust val for the final section location and GP value. If we
1764 are producing relocatable output, we don't want to do this for
1765 an external symbol. */
1766 if (! relocatable
1767 || (symbol->flags & BSF_SECTION_SYM) != 0)
1768 val += relocation - gp;
1769
1770 if (reloc_entry->howto->partial_inplace)
1771 {
1772 bfd_put_16 (abfd,
1773 (extend & 0xf800) | ((val >> 11) & 0x1f) | (val & 0x7e0),
1774 (bfd_byte *) data + reloc_entry->address);
1775 bfd_put_16 (abfd,
1776 (insn & 0xffe0) | (val & 0x1f),
1777 (bfd_byte *) data + reloc_entry->address + 2);
1778 }
1779 else
1780 reloc_entry->addend = val;
1781
1782 if (relocatable)
1783 reloc_entry->address += input_section->output_offset;
1784 else if (((val & ~0xffff) != ~0xffff) && ((val & ~0xffff) != 0))
1785 return bfd_reloc_overflow;
1786
1787 return bfd_reloc_ok;
1788 }
1789 \f
1790 /* A mapping from BFD reloc types to MIPS ELF reloc types. */
1791
1792 struct elf_reloc_map {
1793 bfd_reloc_code_real_type bfd_val;
1794 enum elf_mips_reloc_type elf_val;
1795 };
1796
1797 static const struct elf_reloc_map mips_reloc_map[] =
1798 {
1799 { BFD_RELOC_NONE, R_MIPS_NONE },
1800 { BFD_RELOC_16, R_MIPS_16 },
1801 { BFD_RELOC_32, R_MIPS_32 },
1802 /* There is no BFD reloc for R_MIPS_REL32. */
1803 { BFD_RELOC_64, R_MIPS_64 },
1804 { BFD_RELOC_CTOR, R_MIPS_64 },
1805 { BFD_RELOC_16_PCREL, R_MIPS_PC16 },
1806 { BFD_RELOC_HI16_S, R_MIPS_HI16 },
1807 { BFD_RELOC_LO16, R_MIPS_LO16 },
1808 { BFD_RELOC_GPREL16, R_MIPS_GPREL16 },
1809 { BFD_RELOC_GPREL32, R_MIPS_GPREL32 },
1810 { BFD_RELOC_MIPS_JMP, R_MIPS_26 },
1811 { BFD_RELOC_MIPS_LITERAL, R_MIPS_LITERAL },
1812 { BFD_RELOC_MIPS_GOT16, R_MIPS_GOT16 },
1813 { BFD_RELOC_MIPS_CALL16, R_MIPS_CALL16 },
1814 { BFD_RELOC_MIPS_SHIFT5, R_MIPS_SHIFT5 },
1815 { BFD_RELOC_MIPS_SHIFT6, R_MIPS_SHIFT6 },
1816 { BFD_RELOC_MIPS_GOT_DISP, R_MIPS_GOT_DISP },
1817 { BFD_RELOC_MIPS_GOT_PAGE, R_MIPS_GOT_PAGE },
1818 { BFD_RELOC_MIPS_GOT_OFST, R_MIPS_GOT_OFST },
1819 { BFD_RELOC_MIPS_GOT_HI16, R_MIPS_GOT_HI16 },
1820 { BFD_RELOC_MIPS_GOT_LO16, R_MIPS_GOT_LO16 },
1821 { BFD_RELOC_MIPS_SUB, R_MIPS_SUB },
1822 { BFD_RELOC_MIPS_INSERT_A, R_MIPS_INSERT_A },
1823 { BFD_RELOC_MIPS_INSERT_B, R_MIPS_INSERT_B },
1824 { BFD_RELOC_MIPS_DELETE, R_MIPS_DELETE },
1825 { BFD_RELOC_MIPS_HIGHEST, R_MIPS_HIGHEST },
1826 { BFD_RELOC_MIPS_HIGHER, R_MIPS_HIGHER },
1827 { BFD_RELOC_MIPS_CALL_HI16, R_MIPS_CALL_HI16 },
1828 { BFD_RELOC_MIPS_CALL_LO16, R_MIPS_CALL_LO16 },
1829 { BFD_RELOC_MIPS_SCN_DISP, R_MIPS_SCN_DISP },
1830 { BFD_RELOC_MIPS_REL16, R_MIPS_REL16 },
1831 /* Use of R_MIPS_ADD_IMMEDIATE and R_MIPS_PJUMP is deprecated. */
1832 { BFD_RELOC_MIPS_RELGOT, R_MIPS_RELGOT },
1833 { BFD_RELOC_MIPS_JALR, R_MIPS_JALR }
1834 };
1835
1836 /* Given a BFD reloc type, return a howto structure. */
1837
1838 static reloc_howto_type *
1839 bfd_elf64_bfd_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
1840 bfd_reloc_code_real_type code)
1841 {
1842 unsigned int i;
1843 /* FIXME: We default to RELA here instead of choosing the right
1844 relocation variant. */
1845 reloc_howto_type *howto_table = mips_elf64_howto_table_rela;
1846
1847 for (i = 0; i < sizeof (mips_reloc_map) / sizeof (struct elf_reloc_map);
1848 i++)
1849 {
1850 if (mips_reloc_map[i].bfd_val == code)
1851 return &howto_table[(int) mips_reloc_map[i].elf_val];
1852 }
1853
1854 switch (code)
1855 {
1856 case BFD_RELOC_MIPS16_JMP:
1857 return &elf_mips16_jump_howto;
1858 case BFD_RELOC_MIPS16_GPREL:
1859 return &elf_mips16_gprel_howto;
1860 case BFD_RELOC_VTABLE_INHERIT:
1861 return &elf_mips_gnu_vtinherit_howto;
1862 case BFD_RELOC_VTABLE_ENTRY:
1863 return &elf_mips_gnu_vtentry_howto;
1864 case BFD_RELOC_16_PCREL_S2:
1865 return &elf_mips_gnu_rela16_s2;
1866 default:
1867 bfd_set_error (bfd_error_bad_value);
1868 return NULL;
1869 }
1870 }
1871
1872 /* Given a MIPS Elf_Internal_Rel, fill in an arelent structure. */
1873
1874 static reloc_howto_type *
1875 mips_elf64_rtype_to_howto (unsigned int r_type, bfd_boolean rela_p)
1876 {
1877 switch (r_type)
1878 {
1879 case R_MIPS16_26:
1880 return &elf_mips16_jump_howto;
1881 case R_MIPS16_GPREL:
1882 return &elf_mips16_gprel_howto;
1883 case R_MIPS_GNU_VTINHERIT:
1884 return &elf_mips_gnu_vtinherit_howto;
1885 case R_MIPS_GNU_VTENTRY:
1886 return &elf_mips_gnu_vtentry_howto;
1887 case R_MIPS_GNU_REL16_S2:
1888 if (rela_p)
1889 return &elf_mips_gnu_rela16_s2;
1890 else
1891 return &elf_mips_gnu_rel16_s2;
1892 default:
1893 BFD_ASSERT (r_type < (unsigned int) R_MIPS_max);
1894 if (rela_p)
1895 return &mips_elf64_howto_table_rela[r_type];
1896 else
1897 return &mips_elf64_howto_table_rel[r_type];
1898 break;
1899 }
1900 }
1901
1902 /* Prevent relocation handling by bfd for MIPS ELF64. */
1903
1904 static void
1905 mips_elf64_info_to_howto_rel (bfd *abfd ATTRIBUTE_UNUSED,
1906 arelent *cache_ptr ATTRIBUTE_UNUSED,
1907 Elf_Internal_Rela *dst ATTRIBUTE_UNUSED)
1908 {
1909 BFD_ASSERT (0);
1910 }
1911
1912 static void
1913 mips_elf64_info_to_howto_rela (bfd *abfd ATTRIBUTE_UNUSED,
1914 arelent *cache_ptr ATTRIBUTE_UNUSED,
1915 Elf_Internal_Rela *dst ATTRIBUTE_UNUSED)
1916 {
1917 BFD_ASSERT (0);
1918 }
1919
1920 /* Since each entry in an SHT_REL or SHT_RELA section can represent up
1921 to three relocs, we must tell the user to allocate more space. */
1922
1923 static long
1924 mips_elf64_get_reloc_upper_bound (bfd *abfd ATTRIBUTE_UNUSED, asection *sec)
1925 {
1926 return (sec->reloc_count * 3 + 1) * sizeof (arelent *);
1927 }
1928
1929 static long
1930 mips_elf64_get_dynamic_reloc_upper_bound (bfd *abfd)
1931 {
1932 return _bfd_elf_get_dynamic_reloc_upper_bound (abfd) * 3;
1933 }
1934
1935 /* We must also copy more relocations than the corresponding functions
1936 in elf.c would, so the two following functions are slightly
1937 modified from elf.c, that multiply the external relocation count by
1938 3 to obtain the internal relocation count. */
1939
1940 static long
1941 mips_elf64_canonicalize_reloc (bfd *abfd, sec_ptr section,
1942 arelent **relptr, asymbol **symbols)
1943 {
1944 arelent *tblptr;
1945 unsigned int i;
1946 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
1947
1948 if (! bed->s->slurp_reloc_table (abfd, section, symbols, FALSE))
1949 return -1;
1950
1951 tblptr = section->relocation;
1952 for (i = 0; i < section->reloc_count * 3; i++)
1953 *relptr++ = tblptr++;
1954
1955 *relptr = NULL;
1956
1957 return section->reloc_count * 3;
1958 }
1959
1960 static long
1961 mips_elf64_canonicalize_dynamic_reloc (bfd *abfd, arelent **storage,
1962 asymbol **syms)
1963 {
1964 bfd_boolean (*slurp_relocs) (bfd *, asection *, asymbol **, bfd_boolean);
1965 asection *s;
1966 long ret;
1967
1968 if (elf_dynsymtab (abfd) == 0)
1969 {
1970 bfd_set_error (bfd_error_invalid_operation);
1971 return -1;
1972 }
1973
1974 slurp_relocs = get_elf_backend_data (abfd)->s->slurp_reloc_table;
1975 ret = 0;
1976 for (s = abfd->sections; s != NULL; s = s->next)
1977 {
1978 if (elf_section_data (s)->this_hdr.sh_link == elf_dynsymtab (abfd)
1979 && (elf_section_data (s)->this_hdr.sh_type == SHT_REL
1980 || elf_section_data (s)->this_hdr.sh_type == SHT_RELA))
1981 {
1982 arelent *p;
1983 long count, i;
1984
1985 if (! (*slurp_relocs) (abfd, s, syms, TRUE))
1986 return -1;
1987 count = s->_raw_size / elf_section_data (s)->this_hdr.sh_entsize * 3;
1988 p = s->relocation;
1989 for (i = 0; i < count; i++)
1990 *storage++ = p++;
1991 ret += count;
1992 }
1993 }
1994
1995 *storage = NULL;
1996
1997 return ret;
1998 }
1999
2000 /* Read the relocations from one reloc section. This is mostly copied
2001 from elfcode.h, except for the changes to expand one external
2002 relocation to 3 internal ones. We must unfortunately set
2003 reloc_count to the number of external relocations, because a lot of
2004 generic code seems to depend on this. */
2005
2006 static bfd_boolean
2007 mips_elf64_slurp_one_reloc_table (bfd *abfd, asection *asect,
2008 Elf_Internal_Shdr *rel_hdr,
2009 bfd_size_type reloc_count,
2010 arelent *relents, asymbol **symbols,
2011 bfd_boolean dynamic)
2012 {
2013 void *allocated;
2014 bfd_byte *native_relocs;
2015 arelent *relent;
2016 bfd_vma i;
2017 int entsize;
2018 reloc_howto_type *howto_table;
2019
2020 allocated = bfd_malloc (rel_hdr->sh_size);
2021 if (allocated == NULL)
2022 return FALSE;
2023
2024 if (bfd_seek (abfd, rel_hdr->sh_offset, SEEK_SET) != 0
2025 || (bfd_bread (allocated, rel_hdr->sh_size, abfd)
2026 != rel_hdr->sh_size))
2027 goto error_return;
2028
2029 native_relocs = allocated;
2030
2031 entsize = rel_hdr->sh_entsize;
2032 BFD_ASSERT (entsize == sizeof (Elf64_Mips_External_Rel)
2033 || entsize == sizeof (Elf64_Mips_External_Rela));
2034
2035 if (entsize == sizeof (Elf64_Mips_External_Rel))
2036 howto_table = mips_elf64_howto_table_rel;
2037 else
2038 howto_table = mips_elf64_howto_table_rela;
2039
2040 for (i = 0, relent = relents;
2041 i < reloc_count;
2042 i++, native_relocs += entsize)
2043 {
2044 Elf64_Mips_Internal_Rela rela;
2045 bfd_boolean used_sym, used_ssym;
2046 int ir;
2047
2048 if (entsize == sizeof (Elf64_Mips_External_Rela))
2049 mips_elf64_swap_reloca_in (abfd,
2050 (Elf64_Mips_External_Rela *) native_relocs,
2051 &rela);
2052 else
2053 mips_elf64_swap_reloc_in (abfd,
2054 (Elf64_Mips_External_Rel *) native_relocs,
2055 &rela);
2056
2057 /* Each entry represents exactly three actual relocations. */
2058
2059 used_sym = FALSE;
2060 used_ssym = FALSE;
2061 for (ir = 0; ir < 3; ir++)
2062 {
2063 enum elf_mips_reloc_type type;
2064
2065 switch (ir)
2066 {
2067 default:
2068 abort ();
2069 case 0:
2070 type = (enum elf_mips_reloc_type) rela.r_type;
2071 break;
2072 case 1:
2073 type = (enum elf_mips_reloc_type) rela.r_type2;
2074 break;
2075 case 2:
2076 type = (enum elf_mips_reloc_type) rela.r_type3;
2077 break;
2078 }
2079
2080 /* Some types require symbols, whereas some do not. */
2081 switch (type)
2082 {
2083 case R_MIPS_NONE:
2084 case R_MIPS_LITERAL:
2085 case R_MIPS_INSERT_A:
2086 case R_MIPS_INSERT_B:
2087 case R_MIPS_DELETE:
2088 relent->sym_ptr_ptr = bfd_abs_section_ptr->symbol_ptr_ptr;
2089 break;
2090
2091 default:
2092 if (! used_sym)
2093 {
2094 if (rela.r_sym == 0)
2095 relent->sym_ptr_ptr = bfd_abs_section_ptr->symbol_ptr_ptr;
2096 else
2097 {
2098 asymbol **ps, *s;
2099
2100 ps = symbols + rela.r_sym - 1;
2101 s = *ps;
2102 if ((s->flags & BSF_SECTION_SYM) == 0)
2103 relent->sym_ptr_ptr = ps;
2104 else
2105 relent->sym_ptr_ptr = s->section->symbol_ptr_ptr;
2106 }
2107
2108 used_sym = TRUE;
2109 }
2110 else if (! used_ssym)
2111 {
2112 switch (rela.r_ssym)
2113 {
2114 case RSS_UNDEF:
2115 relent->sym_ptr_ptr =
2116 bfd_abs_section_ptr->symbol_ptr_ptr;
2117 break;
2118
2119 case RSS_GP:
2120 case RSS_GP0:
2121 case RSS_LOC:
2122 /* FIXME: I think these need to be handled using
2123 special howto structures. */
2124 BFD_ASSERT (0);
2125 break;
2126
2127 default:
2128 BFD_ASSERT (0);
2129 break;
2130 }
2131
2132 used_ssym = TRUE;
2133 }
2134 else
2135 relent->sym_ptr_ptr = bfd_abs_section_ptr->symbol_ptr_ptr;
2136
2137 break;
2138 }
2139
2140 /* The address of an ELF reloc is section relative for an
2141 object file, and absolute for an executable file or
2142 shared library. The address of a BFD reloc is always
2143 section relative. */
2144 if ((abfd->flags & (EXEC_P | DYNAMIC)) == 0 || dynamic)
2145 relent->address = rela.r_offset;
2146 else
2147 relent->address = rela.r_offset - asect->vma;
2148
2149 relent->addend = rela.r_addend;
2150
2151 relent->howto = &howto_table[(int) type];
2152
2153 ++relent;
2154 }
2155 }
2156
2157 asect->reloc_count += (relent - relents) / 3;
2158
2159 if (allocated != NULL)
2160 free (allocated);
2161
2162 return TRUE;
2163
2164 error_return:
2165 if (allocated != NULL)
2166 free (allocated);
2167 return FALSE;
2168 }
2169
2170 /* Read the relocations. On Irix 6, there can be two reloc sections
2171 associated with a single data section. This is copied from
2172 elfcode.h as well, with changes as small as accounting for 3
2173 internal relocs per external reloc and resetting reloc_count to
2174 zero before processing the relocs of a section. */
2175
2176 static bfd_boolean
2177 mips_elf64_slurp_reloc_table (bfd *abfd, asection *asect,
2178 asymbol **symbols, bfd_boolean dynamic)
2179 {
2180 struct bfd_elf_section_data * const d = elf_section_data (asect);
2181 Elf_Internal_Shdr *rel_hdr;
2182 Elf_Internal_Shdr *rel_hdr2;
2183 bfd_size_type reloc_count;
2184 bfd_size_type reloc_count2;
2185 arelent *relents;
2186 bfd_size_type amt;
2187
2188 if (asect->relocation != NULL)
2189 return TRUE;
2190
2191 if (! dynamic)
2192 {
2193 if ((asect->flags & SEC_RELOC) == 0
2194 || asect->reloc_count == 0)
2195 return TRUE;
2196
2197 rel_hdr = &d->rel_hdr;
2198 reloc_count = NUM_SHDR_ENTRIES (rel_hdr);
2199 rel_hdr2 = d->rel_hdr2;
2200 reloc_count2 = (rel_hdr2 ? NUM_SHDR_ENTRIES (rel_hdr2) : 0);
2201
2202 BFD_ASSERT (asect->reloc_count == reloc_count + reloc_count2);
2203 BFD_ASSERT (asect->rel_filepos == rel_hdr->sh_offset
2204 || (rel_hdr2 && asect->rel_filepos == rel_hdr2->sh_offset));
2205
2206 }
2207 else
2208 {
2209 /* Note that ASECT->RELOC_COUNT tends not to be accurate in this
2210 case because relocations against this section may use the
2211 dynamic symbol table, and in that case bfd_section_from_shdr
2212 in elf.c does not update the RELOC_COUNT. */
2213 if (asect->_raw_size == 0)
2214 return TRUE;
2215
2216 rel_hdr = &d->this_hdr;
2217 reloc_count = NUM_SHDR_ENTRIES (rel_hdr);
2218 rel_hdr2 = NULL;
2219 reloc_count2 = 0;
2220 }
2221
2222 /* Allocate space for 3 arelent structures for each Rel structure. */
2223 amt = (reloc_count + reloc_count2) * 3 * sizeof (arelent);
2224 relents = bfd_alloc (abfd, amt);
2225 if (relents == NULL)
2226 return FALSE;
2227
2228 /* The slurp_one_reloc_table routine increments reloc_count. */
2229 asect->reloc_count = 0;
2230
2231 if (! mips_elf64_slurp_one_reloc_table (abfd, asect,
2232 rel_hdr, reloc_count,
2233 relents,
2234 symbols, dynamic))
2235 return FALSE;
2236 if (d->rel_hdr2 != NULL)
2237 {
2238 if (! mips_elf64_slurp_one_reloc_table (abfd, asect,
2239 rel_hdr2, reloc_count2,
2240 relents + reloc_count * 3,
2241 symbols, dynamic))
2242 return FALSE;
2243 }
2244
2245 asect->relocation = relents;
2246 return TRUE;
2247 }
2248
2249 /* Write out the relocations. */
2250
2251 static void
2252 mips_elf64_write_relocs (bfd *abfd, asection *sec, void *data)
2253 {
2254 bfd_boolean *failedp = data;
2255 int count;
2256 Elf_Internal_Shdr *rel_hdr;
2257 unsigned int idx;
2258
2259 /* If we have already failed, don't do anything. */
2260 if (*failedp)
2261 return;
2262
2263 if ((sec->flags & SEC_RELOC) == 0)
2264 return;
2265
2266 /* The linker backend writes the relocs out itself, and sets the
2267 reloc_count field to zero to inhibit writing them here. Also,
2268 sometimes the SEC_RELOC flag gets set even when there aren't any
2269 relocs. */
2270 if (sec->reloc_count == 0)
2271 return;
2272
2273 /* We can combine up to three relocs that refer to the same address
2274 if the latter relocs have no associated symbol. */
2275 count = 0;
2276 for (idx = 0; idx < sec->reloc_count; idx++)
2277 {
2278 bfd_vma addr;
2279 unsigned int i;
2280
2281 ++count;
2282
2283 addr = sec->orelocation[idx]->address;
2284 for (i = 0; i < 2; i++)
2285 {
2286 arelent *r;
2287
2288 if (idx + 1 >= sec->reloc_count)
2289 break;
2290 r = sec->orelocation[idx + 1];
2291 if (r->address != addr
2292 || ! bfd_is_abs_section ((*r->sym_ptr_ptr)->section)
2293 || (*r->sym_ptr_ptr)->value != 0)
2294 break;
2295
2296 /* We can merge the reloc at IDX + 1 with the reloc at IDX. */
2297
2298 ++idx;
2299 }
2300 }
2301
2302 rel_hdr = &elf_section_data (sec)->rel_hdr;
2303
2304 /* Do the actual relocation. */
2305
2306 if (rel_hdr->sh_entsize == sizeof(Elf64_Mips_External_Rel))
2307 mips_elf64_write_rel (abfd, sec, rel_hdr, &count, data);
2308 else if (rel_hdr->sh_entsize == sizeof(Elf64_Mips_External_Rela))
2309 mips_elf64_write_rela (abfd, sec, rel_hdr, &count, data);
2310 else
2311 BFD_ASSERT (0);
2312 }
2313
2314 static void
2315 mips_elf64_write_rel (bfd *abfd, asection *sec,
2316 Elf_Internal_Shdr *rel_hdr,
2317 int *count, void *data)
2318 {
2319 bfd_boolean *failedp = data;
2320 Elf64_Mips_External_Rel *ext_rel;
2321 unsigned int idx;
2322 asymbol *last_sym = 0;
2323 int last_sym_idx = 0;
2324
2325 rel_hdr->sh_size = rel_hdr->sh_entsize * *count;
2326 rel_hdr->contents = bfd_alloc (abfd, rel_hdr->sh_size);
2327 if (rel_hdr->contents == NULL)
2328 {
2329 *failedp = TRUE;
2330 return;
2331 }
2332
2333 ext_rel = (Elf64_Mips_External_Rel *) rel_hdr->contents;
2334 for (idx = 0; idx < sec->reloc_count; idx++, ext_rel++)
2335 {
2336 arelent *ptr;
2337 Elf64_Mips_Internal_Rela int_rel;
2338 asymbol *sym;
2339 int n;
2340 unsigned int i;
2341
2342 ptr = sec->orelocation[idx];
2343
2344 /* The address of an ELF reloc is section relative for an object
2345 file, and absolute for an executable file or shared library.
2346 The address of a BFD reloc is always section relative. */
2347 if ((abfd->flags & (EXEC_P | DYNAMIC)) == 0)
2348 int_rel.r_offset = ptr->address;
2349 else
2350 int_rel.r_offset = ptr->address + sec->vma;
2351
2352 sym = *ptr->sym_ptr_ptr;
2353 if (sym == last_sym)
2354 n = last_sym_idx;
2355 else
2356 {
2357 last_sym = sym;
2358 n = _bfd_elf_symbol_from_bfd_symbol (abfd, &sym);
2359 if (n < 0)
2360 {
2361 *failedp = TRUE;
2362 return;
2363 }
2364 last_sym_idx = n;
2365 }
2366
2367 int_rel.r_sym = n;
2368 int_rel.r_ssym = RSS_UNDEF;
2369
2370 if ((*ptr->sym_ptr_ptr)->the_bfd->xvec != abfd->xvec
2371 && ! _bfd_elf_validate_reloc (abfd, ptr))
2372 {
2373 *failedp = TRUE;
2374 return;
2375 }
2376
2377 int_rel.r_type = ptr->howto->type;
2378 int_rel.r_type2 = (int) R_MIPS_NONE;
2379 int_rel.r_type3 = (int) R_MIPS_NONE;
2380
2381 for (i = 0; i < 2; i++)
2382 {
2383 arelent *r;
2384
2385 if (idx + 1 >= sec->reloc_count)
2386 break;
2387 r = sec->orelocation[idx + 1];
2388 if (r->address != ptr->address
2389 || ! bfd_is_abs_section ((*r->sym_ptr_ptr)->section)
2390 || (*r->sym_ptr_ptr)->value != 0)
2391 break;
2392
2393 /* We can merge the reloc at IDX + 1 with the reloc at IDX. */
2394
2395 if (i == 0)
2396 int_rel.r_type2 = r->howto->type;
2397 else
2398 int_rel.r_type3 = r->howto->type;
2399
2400 ++idx;
2401 }
2402
2403 mips_elf64_swap_reloc_out (abfd, &int_rel, ext_rel);
2404 }
2405
2406 BFD_ASSERT (ext_rel - (Elf64_Mips_External_Rel *) rel_hdr->contents
2407 == *count);
2408 }
2409
2410 static void
2411 mips_elf64_write_rela (bfd *abfd, asection *sec,
2412 Elf_Internal_Shdr *rela_hdr,
2413 int *count, void *data)
2414 {
2415 bfd_boolean *failedp = data;
2416 Elf64_Mips_External_Rela *ext_rela;
2417 unsigned int idx;
2418 asymbol *last_sym = 0;
2419 int last_sym_idx = 0;
2420
2421 rela_hdr->sh_size = rela_hdr->sh_entsize * *count;
2422 rela_hdr->contents = bfd_alloc (abfd, rela_hdr->sh_size);
2423 if (rela_hdr->contents == NULL)
2424 {
2425 *failedp = TRUE;
2426 return;
2427 }
2428
2429 ext_rela = (Elf64_Mips_External_Rela *) rela_hdr->contents;
2430 for (idx = 0; idx < sec->reloc_count; idx++, ext_rela++)
2431 {
2432 arelent *ptr;
2433 Elf64_Mips_Internal_Rela int_rela;
2434 asymbol *sym;
2435 int n;
2436 unsigned int i;
2437
2438 ptr = sec->orelocation[idx];
2439
2440 /* The address of an ELF reloc is section relative for an object
2441 file, and absolute for an executable file or shared library.
2442 The address of a BFD reloc is always section relative. */
2443 if ((abfd->flags & (EXEC_P | DYNAMIC)) == 0)
2444 int_rela.r_offset = ptr->address;
2445 else
2446 int_rela.r_offset = ptr->address + sec->vma;
2447
2448 sym = *ptr->sym_ptr_ptr;
2449 if (sym == last_sym)
2450 n = last_sym_idx;
2451 else
2452 {
2453 last_sym = sym;
2454 n = _bfd_elf_symbol_from_bfd_symbol (abfd, &sym);
2455 if (n < 0)
2456 {
2457 *failedp = TRUE;
2458 return;
2459 }
2460 last_sym_idx = n;
2461 }
2462
2463 int_rela.r_sym = n;
2464 int_rela.r_addend = ptr->addend;
2465 int_rela.r_ssym = RSS_UNDEF;
2466
2467 if ((*ptr->sym_ptr_ptr)->the_bfd->xvec != abfd->xvec
2468 && ! _bfd_elf_validate_reloc (abfd, ptr))
2469 {
2470 *failedp = TRUE;
2471 return;
2472 }
2473
2474 int_rela.r_type = ptr->howto->type;
2475 int_rela.r_type2 = (int) R_MIPS_NONE;
2476 int_rela.r_type3 = (int) R_MIPS_NONE;
2477
2478 for (i = 0; i < 2; i++)
2479 {
2480 arelent *r;
2481
2482 if (idx + 1 >= sec->reloc_count)
2483 break;
2484 r = sec->orelocation[idx + 1];
2485 if (r->address != ptr->address
2486 || ! bfd_is_abs_section ((*r->sym_ptr_ptr)->section)
2487 || (*r->sym_ptr_ptr)->value != 0)
2488 break;
2489
2490 /* We can merge the reloc at IDX + 1 with the reloc at IDX. */
2491
2492 if (i == 0)
2493 int_rela.r_type2 = r->howto->type;
2494 else
2495 int_rela.r_type3 = r->howto->type;
2496
2497 ++idx;
2498 }
2499
2500 mips_elf64_swap_reloca_out (abfd, &int_rela, ext_rela);
2501 }
2502
2503 BFD_ASSERT (ext_rela - (Elf64_Mips_External_Rela *) rela_hdr->contents
2504 == *count);
2505 }
2506 \f
2507 /* Set the right machine number for a MIPS ELF file. */
2508
2509 static bfd_boolean
2510 mips_elf64_object_p (bfd *abfd)
2511 {
2512 unsigned long mach;
2513
2514 /* Irix 6 is broken. Object file symbol tables are not always
2515 sorted correctly such that local symbols precede global symbols,
2516 and the sh_info field in the symbol table is not always right. */
2517 if (elf64_mips_irix_compat (abfd) != ict_none)
2518 elf_bad_symtab (abfd) = TRUE;
2519
2520 mach = _bfd_elf_mips_mach (elf_elfheader (abfd)->e_flags);
2521 bfd_default_set_arch_mach (abfd, bfd_arch_mips, mach);
2522 return TRUE;
2523 }
2524
2525 /* Depending on the target vector we generate some version of Irix
2526 executables or "normal" MIPS ELF ABI executables. */
2527 static irix_compat_t
2528 elf64_mips_irix_compat (bfd *abfd)
2529 {
2530 if ((abfd->xvec == &bfd_elf64_bigmips_vec)
2531 || (abfd->xvec == &bfd_elf64_littlemips_vec))
2532 return ict_irix6;
2533 else
2534 return ict_none;
2535 }
2536 \f
2537 /* Support for core dump NOTE sections. */
2538 static bfd_boolean
2539 elf64_mips_grok_prstatus (bfd *abfd, Elf_Internal_Note *note)
2540 {
2541 int offset;
2542 unsigned int raw_size;
2543
2544 switch (note->descsz)
2545 {
2546 default:
2547 return FALSE;
2548
2549 case 480: /* Linux/MIPS - N64 kernel */
2550 /* pr_cursig */
2551 elf_tdata (abfd)->core_signal = bfd_get_16 (abfd, note->descdata + 12);
2552
2553 /* pr_pid */
2554 elf_tdata (abfd)->core_pid = bfd_get_32 (abfd, note->descdata + 32);
2555
2556 /* pr_reg */
2557 offset = 112;
2558 raw_size = 360;
2559
2560 break;
2561 }
2562
2563 /* Make a ".reg/999" section. */
2564 return _bfd_elfcore_make_pseudosection (abfd, ".reg",
2565 raw_size, note->descpos + offset);
2566 }
2567
2568 static bfd_boolean
2569 elf64_mips_grok_psinfo (bfd *abfd, Elf_Internal_Note *note)
2570 {
2571 switch (note->descsz)
2572 {
2573 default:
2574 return FALSE;
2575
2576 case 136: /* Linux/MIPS - N64 kernel elf_prpsinfo */
2577 elf_tdata (abfd)->core_program
2578 = _bfd_elfcore_strndup (abfd, note->descdata + 40, 16);
2579 elf_tdata (abfd)->core_command
2580 = _bfd_elfcore_strndup (abfd, note->descdata + 56, 80);
2581 }
2582
2583 /* Note that for some reason, a spurious space is tacked
2584 onto the end of the args in some (at least one anyway)
2585 implementations, so strip it off if it exists. */
2586
2587 {
2588 char *command = elf_tdata (abfd)->core_command;
2589 int n = strlen (command);
2590
2591 if (0 < n && command[n - 1] == ' ')
2592 command[n - 1] = '\0';
2593 }
2594
2595 return TRUE;
2596 }
2597 \f
2598 /* ECOFF swapping routines. These are used when dealing with the
2599 .mdebug section, which is in the ECOFF debugging format. */
2600 static const struct ecoff_debug_swap mips_elf64_ecoff_debug_swap =
2601 {
2602 /* Symbol table magic number. */
2603 magicSym2,
2604 /* Alignment of debugging information. E.g., 4. */
2605 8,
2606 /* Sizes of external symbolic information. */
2607 sizeof (struct hdr_ext),
2608 sizeof (struct dnr_ext),
2609 sizeof (struct pdr_ext),
2610 sizeof (struct sym_ext),
2611 sizeof (struct opt_ext),
2612 sizeof (struct fdr_ext),
2613 sizeof (struct rfd_ext),
2614 sizeof (struct ext_ext),
2615 /* Functions to swap in external symbolic data. */
2616 ecoff_swap_hdr_in,
2617 ecoff_swap_dnr_in,
2618 ecoff_swap_pdr_in,
2619 ecoff_swap_sym_in,
2620 ecoff_swap_opt_in,
2621 ecoff_swap_fdr_in,
2622 ecoff_swap_rfd_in,
2623 ecoff_swap_ext_in,
2624 _bfd_ecoff_swap_tir_in,
2625 _bfd_ecoff_swap_rndx_in,
2626 /* Functions to swap out external symbolic data. */
2627 ecoff_swap_hdr_out,
2628 ecoff_swap_dnr_out,
2629 ecoff_swap_pdr_out,
2630 ecoff_swap_sym_out,
2631 ecoff_swap_opt_out,
2632 ecoff_swap_fdr_out,
2633 ecoff_swap_rfd_out,
2634 ecoff_swap_ext_out,
2635 _bfd_ecoff_swap_tir_out,
2636 _bfd_ecoff_swap_rndx_out,
2637 /* Function to read in symbolic data. */
2638 _bfd_mips_elf_read_ecoff_info
2639 };
2640 \f
2641 /* Relocations in the 64 bit MIPS ELF ABI are more complex than in
2642 standard ELF. This structure is used to redirect the relocation
2643 handling routines. */
2644
2645 const struct elf_size_info mips_elf64_size_info =
2646 {
2647 sizeof (Elf64_External_Ehdr),
2648 sizeof (Elf64_External_Phdr),
2649 sizeof (Elf64_External_Shdr),
2650 sizeof (Elf64_Mips_External_Rel),
2651 sizeof (Elf64_Mips_External_Rela),
2652 sizeof (Elf64_External_Sym),
2653 sizeof (Elf64_External_Dyn),
2654 sizeof (Elf_External_Note),
2655 4, /* hash-table entry size */
2656 3, /* internal relocations per external relocations */
2657 64, /* arch_size */
2658 3, /* log_file_align */
2659 ELFCLASS64,
2660 EV_CURRENT,
2661 bfd_elf64_write_out_phdrs,
2662 bfd_elf64_write_shdrs_and_ehdr,
2663 mips_elf64_write_relocs,
2664 bfd_elf64_swap_symbol_in,
2665 bfd_elf64_swap_symbol_out,
2666 mips_elf64_slurp_reloc_table,
2667 bfd_elf64_slurp_symbol_table,
2668 bfd_elf64_swap_dyn_in,
2669 bfd_elf64_swap_dyn_out,
2670 mips_elf64_be_swap_reloc_in,
2671 mips_elf64_be_swap_reloc_out,
2672 mips_elf64_be_swap_reloca_in,
2673 mips_elf64_be_swap_reloca_out
2674 };
2675
2676 #define ELF_ARCH bfd_arch_mips
2677 #define ELF_MACHINE_CODE EM_MIPS
2678
2679 #define elf_backend_collect TRUE
2680 #define elf_backend_type_change_ok TRUE
2681 #define elf_backend_can_gc_sections TRUE
2682 #define elf_info_to_howto mips_elf64_info_to_howto_rela
2683 #define elf_info_to_howto_rel mips_elf64_info_to_howto_rel
2684 #define elf_backend_object_p mips_elf64_object_p
2685 #define elf_backend_symbol_processing _bfd_mips_elf_symbol_processing
2686 #define elf_backend_section_processing _bfd_mips_elf_section_processing
2687 #define elf_backend_section_from_shdr _bfd_mips_elf_section_from_shdr
2688 #define elf_backend_fake_sections _bfd_mips_elf_fake_sections
2689 #define elf_backend_section_from_bfd_section \
2690 _bfd_mips_elf_section_from_bfd_section
2691 #define elf_backend_add_symbol_hook _bfd_mips_elf_add_symbol_hook
2692 #define elf_backend_link_output_symbol_hook \
2693 _bfd_mips_elf_link_output_symbol_hook
2694 #define elf_backend_create_dynamic_sections \
2695 _bfd_mips_elf_create_dynamic_sections
2696 #define elf_backend_check_relocs _bfd_mips_elf_check_relocs
2697 #define elf_backend_adjust_dynamic_symbol \
2698 _bfd_mips_elf_adjust_dynamic_symbol
2699 #define elf_backend_always_size_sections \
2700 _bfd_mips_elf_always_size_sections
2701 #define elf_backend_size_dynamic_sections \
2702 _bfd_mips_elf_size_dynamic_sections
2703 #define elf_backend_relocate_section _bfd_mips_elf_relocate_section
2704 #define elf_backend_finish_dynamic_symbol \
2705 _bfd_mips_elf_finish_dynamic_symbol
2706 #define elf_backend_finish_dynamic_sections \
2707 _bfd_mips_elf_finish_dynamic_sections
2708 #define elf_backend_final_write_processing \
2709 _bfd_mips_elf_final_write_processing
2710 #define elf_backend_additional_program_headers \
2711 _bfd_mips_elf_additional_program_headers
2712 #define elf_backend_modify_segment_map _bfd_mips_elf_modify_segment_map
2713 #define elf_backend_gc_mark_hook _bfd_mips_elf_gc_mark_hook
2714 #define elf_backend_gc_sweep_hook _bfd_mips_elf_gc_sweep_hook
2715 #define elf_backend_copy_indirect_symbol \
2716 _bfd_mips_elf_copy_indirect_symbol
2717 #define elf_backend_hide_symbol _bfd_mips_elf_hide_symbol
2718 #define elf_backend_ignore_discarded_relocs \
2719 _bfd_mips_elf_ignore_discarded_relocs
2720 #define elf_backend_mips_irix_compat elf64_mips_irix_compat
2721 #define elf_backend_mips_rtype_to_howto mips_elf64_rtype_to_howto
2722 #define elf_backend_ecoff_debug_swap &mips_elf64_ecoff_debug_swap
2723 #define elf_backend_size_info mips_elf64_size_info
2724
2725 #define elf_backend_grok_prstatus elf64_mips_grok_prstatus
2726 #define elf_backend_grok_psinfo elf64_mips_grok_psinfo
2727
2728 #define elf_backend_got_header_size (4 * MIPS_RESERVED_GOTNO)
2729
2730 /* MIPS ELF64 can use a mixture of REL and RELA, but some Relocations
2731 work better/work only in RELA, so we default to this. */
2732 #define elf_backend_may_use_rel_p 1
2733 #define elf_backend_may_use_rela_p 1
2734 #define elf_backend_default_use_rela_p 1
2735
2736 #define elf_backend_write_section _bfd_mips_elf_write_section
2737
2738 /* We don't set bfd_elf64_bfd_is_local_label_name because the 32-bit
2739 MIPS-specific function only applies to IRIX5, which had no 64-bit
2740 ABI. */
2741 #define bfd_elf64_find_nearest_line _bfd_mips_elf_find_nearest_line
2742 #define bfd_elf64_new_section_hook _bfd_mips_elf_new_section_hook
2743 #define bfd_elf64_set_section_contents _bfd_mips_elf_set_section_contents
2744 #define bfd_elf64_bfd_get_relocated_section_contents \
2745 _bfd_elf_mips_get_relocated_section_contents
2746 #define bfd_elf64_bfd_link_hash_table_create \
2747 _bfd_mips_elf_link_hash_table_create
2748 #define bfd_elf64_bfd_final_link _bfd_mips_elf_final_link
2749 #define bfd_elf64_bfd_merge_private_bfd_data \
2750 _bfd_mips_elf_merge_private_bfd_data
2751 #define bfd_elf64_bfd_set_private_flags _bfd_mips_elf_set_private_flags
2752 #define bfd_elf64_bfd_print_private_bfd_data \
2753 _bfd_mips_elf_print_private_bfd_data
2754
2755 #define bfd_elf64_get_reloc_upper_bound mips_elf64_get_reloc_upper_bound
2756 #define bfd_elf64_canonicalize_reloc mips_elf64_canonicalize_reloc
2757 #define bfd_elf64_get_dynamic_reloc_upper_bound mips_elf64_get_dynamic_reloc_upper_bound
2758 #define bfd_elf64_canonicalize_dynamic_reloc mips_elf64_canonicalize_dynamic_reloc
2759 #define bfd_elf64_bfd_relax_section _bfd_mips_relax_section
2760
2761 /* MIPS ELF64 archive functions. */
2762 #define bfd_elf64_archive_functions
2763 extern bfd_boolean bfd_elf64_archive_slurp_armap
2764 (bfd *);
2765 extern bfd_boolean bfd_elf64_archive_write_armap
2766 (bfd *, unsigned int, struct orl *, unsigned int, int);
2767 #define bfd_elf64_archive_slurp_extended_name_table \
2768 _bfd_archive_coff_slurp_extended_name_table
2769 #define bfd_elf64_archive_construct_extended_name_table \
2770 _bfd_archive_coff_construct_extended_name_table
2771 #define bfd_elf64_archive_truncate_arname \
2772 _bfd_archive_coff_truncate_arname
2773 #define bfd_elf64_archive_read_ar_hdr _bfd_archive_coff_read_ar_hdr
2774 #define bfd_elf64_archive_openr_next_archived_file \
2775 _bfd_archive_coff_openr_next_archived_file
2776 #define bfd_elf64_archive_get_elt_at_index \
2777 _bfd_archive_coff_get_elt_at_index
2778 #define bfd_elf64_archive_generic_stat_arch_elt \
2779 _bfd_archive_coff_generic_stat_arch_elt
2780 #define bfd_elf64_archive_update_armap_timestamp \
2781 _bfd_archive_coff_update_armap_timestamp
2782
2783 /* The SGI style (n)64 NewABI. */
2784 #define TARGET_LITTLE_SYM bfd_elf64_littlemips_vec
2785 #define TARGET_LITTLE_NAME "elf64-littlemips"
2786 #define TARGET_BIG_SYM bfd_elf64_bigmips_vec
2787 #define TARGET_BIG_NAME "elf64-bigmips"
2788
2789 /* The SVR4 MIPS ABI says that this should be 0x10000, but Irix 5 uses
2790 a value of 0x1000, and we are compatible.
2791 FIXME: How does this affect NewABI? */
2792 #define ELF_MAXPAGESIZE 0x1000
2793
2794 #include "elf64-target.h"
2795
2796 /* The SYSV-style 'traditional' (n)64 NewABI. */
2797 #undef TARGET_LITTLE_SYM
2798 #undef TARGET_LITTLE_NAME
2799 #undef TARGET_BIG_SYM
2800 #undef TARGET_BIG_NAME
2801
2802 #undef ELF_MAXPAGESIZE
2803
2804 #define TARGET_LITTLE_SYM bfd_elf64_tradlittlemips_vec
2805 #define TARGET_LITTLE_NAME "elf64-tradlittlemips"
2806 #define TARGET_BIG_SYM bfd_elf64_tradbigmips_vec
2807 #define TARGET_BIG_NAME "elf64-tradbigmips"
2808
2809 /* The SVR4 MIPS ABI says that this should be 0x10000, and Linux uses
2810 page sizes of up to that limit, so we need to respect it. */
2811 #define ELF_MAXPAGESIZE 0x10000
2812 #define elf64_bed elf64_tradbed
2813
2814 /* Include the target file again for this target. */
2815 #include "elf64-target.h"
git-cvsimport of binutils cvsroot