Add notes about the target specific nature of i386 PE command line options.
[binutils.git] / bfd / elf64-mips.c
blob39f21b3046dd7d49eaad25b29ea3fcb963dc9d24
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>
8 This file is part of BFD, the Binary File Descriptor library.
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.
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.
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. */
24 /* This file supports the 64-bit MIPS ELF ABI.
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. */
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).
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.
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"
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"
64 static void mips_elf64_swap_reloc_in
65 PARAMS ((bfd *, const Elf64_Mips_External_Rel *,
66 Elf64_Mips_Internal_Rela *));
67 static void mips_elf64_swap_reloca_in
68 PARAMS ((bfd *, const Elf64_Mips_External_Rela *,
69 Elf64_Mips_Internal_Rela *));
70 static void mips_elf64_swap_reloc_out
71 PARAMS ((bfd *, const Elf64_Mips_Internal_Rela *,
72 Elf64_Mips_External_Rel *));
73 static void mips_elf64_swap_reloca_out
74 PARAMS ((bfd *, const Elf64_Mips_Internal_Rela *,
75 Elf64_Mips_External_Rela *));
76 static void mips_elf64_be_swap_reloc_in
77 PARAMS ((bfd *, const bfd_byte *, Elf_Internal_Rela *));
78 static void mips_elf64_be_swap_reloc_out
79 PARAMS ((bfd *, const Elf_Internal_Rela *, bfd_byte *));
80 static void mips_elf64_be_swap_reloca_in
81 PARAMS ((bfd *, const bfd_byte *, Elf_Internal_Rela *));
82 static void mips_elf64_be_swap_reloca_out
83 PARAMS ((bfd *, const Elf_Internal_Rela *, bfd_byte *));
84 static reloc_howto_type *bfd_elf64_bfd_reloc_type_lookup
85 PARAMS ((bfd *, bfd_reloc_code_real_type));
86 static reloc_howto_type *mips_elf64_rtype_to_howto
87 PARAMS ((unsigned int, bfd_boolean));
88 static void mips_elf64_info_to_howto_rel
89 PARAMS ((bfd *, arelent *, Elf_Internal_Rela *));
90 static void mips_elf64_info_to_howto_rela
91 PARAMS ((bfd *, arelent *, Elf_Internal_Rela *));
92 static long mips_elf64_get_reloc_upper_bound
93 PARAMS ((bfd *, asection *));
94 static long mips_elf64_canonicalize_reloc
95 PARAMS ((bfd *, asection *, arelent **, asymbol **));
96 static long mips_elf64_get_dynamic_reloc_upper_bound PARAMS ((bfd *));
97 static long mips_elf64_canonicalize_dynamic_reloc
98 PARAMS ((bfd *, arelent **, asymbol **));
99 static bfd_boolean mips_elf64_slurp_one_reloc_table
100 PARAMS ((bfd *, asection *, Elf_Internal_Shdr *, bfd_size_type,
101 arelent *, asymbol **, bfd_boolean));
102 static bfd_boolean mips_elf64_slurp_reloc_table
103 PARAMS ((bfd *, asection *, asymbol **, bfd_boolean));
104 static void mips_elf64_write_relocs
105 PARAMS ((bfd *, asection *, PTR));
106 static void mips_elf64_write_rel
107 PARAMS((bfd *, asection *, Elf_Internal_Shdr *, int *, PTR));
108 static void mips_elf64_write_rela
109 PARAMS((bfd *, asection *, Elf_Internal_Shdr *, int *, PTR));
110 static bfd_reloc_status_type mips_elf64_hi16_reloc
111 PARAMS ((bfd *, arelent *, asymbol *, PTR, asection *, bfd *, char **));
112 static bfd_reloc_status_type mips_elf64_gprel16_reloc
113 PARAMS ((bfd *, arelent *, asymbol *, PTR, asection *, bfd *, char **));
114 static bfd_reloc_status_type mips_elf64_literal_reloc
115 PARAMS ((bfd *, arelent *, asymbol *, PTR, asection *, bfd *, char **));
116 static bfd_reloc_status_type mips_elf64_gprel32_reloc
117 PARAMS ((bfd *, arelent *, asymbol *, PTR, asection *, bfd *, char **));
118 static bfd_reloc_status_type mips_elf64_shift6_reloc
119 PARAMS ((bfd *, arelent *, asymbol *, PTR, asection *, bfd *, char **));
120 static bfd_reloc_status_type mips_elf64_got16_reloc
121 PARAMS ((bfd *, arelent *, asymbol *, PTR, asection *, bfd *, char **));
122 static bfd_reloc_status_type mips16_jump_reloc
123 PARAMS ((bfd *, arelent *, asymbol *, PTR, asection *, bfd *, char **));
124 static bfd_reloc_status_type mips16_gprel_reloc
125 PARAMS ((bfd *, arelent *, asymbol *, PTR, asection *, bfd *, char **));
126 static bfd_boolean mips_elf64_assign_gp
127 PARAMS ((bfd *, bfd_vma *));
128 static bfd_reloc_status_type mips_elf64_final_gp
129 PARAMS ((bfd *, asymbol *, bfd_boolean, char **, bfd_vma *));
130 static bfd_boolean mips_elf64_object_p
131 PARAMS ((bfd *));
132 static irix_compat_t elf64_mips_irix_compat
133 PARAMS ((bfd *));
134 static bfd_boolean elf64_mips_grok_prstatus
135 PARAMS ((bfd *, Elf_Internal_Note *));
136 static bfd_boolean elf64_mips_grok_psinfo
137 PARAMS ((bfd *, Elf_Internal_Note *));
139 extern const bfd_target bfd_elf64_bigmips_vec;
140 extern const bfd_target bfd_elf64_littlemips_vec;
142 /* In case we're on a 32-bit machine, construct a 64-bit "-1" value
143 from smaller values. Start with zero, widen, *then* decrement. */
144 #define MINUS_ONE (((bfd_vma)0) - 1)
146 /* The number of local .got entries we reserve. */
147 #define MIPS_RESERVED_GOTNO (2)
149 /* The relocation table used for SHT_REL sections. */
151 static reloc_howto_type mips_elf64_howto_table_rel[] =
153 /* No relocation. */
154 HOWTO (R_MIPS_NONE, /* type */
155 0, /* rightshift */
156 0, /* size (0 = byte, 1 = short, 2 = long) */
157 0, /* bitsize */
158 FALSE, /* pc_relative */
159 0, /* bitpos */
160 complain_overflow_dont, /* complain_on_overflow */
161 bfd_elf_generic_reloc, /* special_function */
162 "R_MIPS_NONE", /* name */
163 FALSE, /* partial_inplace */
164 0, /* src_mask */
165 0, /* dst_mask */
166 FALSE), /* pcrel_offset */
168 /* 16 bit relocation. */
169 HOWTO (R_MIPS_16, /* type */
170 0, /* rightshift */
171 2, /* size (0 = byte, 1 = short, 2 = long) */
172 16, /* bitsize */
173 FALSE, /* pc_relative */
174 0, /* bitpos */
175 complain_overflow_signed, /* complain_on_overflow */
176 bfd_elf_generic_reloc, /* special_function */
177 "R_MIPS_16", /* name */
178 TRUE, /* partial_inplace */
179 0x0000ffff, /* src_mask */
180 0x0000ffff, /* dst_mask */
181 FALSE), /* pcrel_offset */
183 /* 32 bit relocation. */
184 HOWTO (R_MIPS_32, /* type */
185 0, /* rightshift */
186 2, /* size (0 = byte, 1 = short, 2 = long) */
187 32, /* bitsize */
188 FALSE, /* pc_relative */
189 0, /* bitpos */
190 complain_overflow_dont, /* complain_on_overflow */
191 bfd_elf_generic_reloc, /* special_function */
192 "R_MIPS_32", /* name */
193 TRUE, /* partial_inplace */
194 0xffffffff, /* src_mask */
195 0xffffffff, /* dst_mask */
196 FALSE), /* pcrel_offset */
198 /* 32 bit symbol relative relocation. */
199 HOWTO (R_MIPS_REL32, /* type */
200 0, /* rightshift */
201 2, /* size (0 = byte, 1 = short, 2 = long) */
202 32, /* bitsize */
203 FALSE, /* pc_relative */
204 0, /* bitpos */
205 complain_overflow_dont, /* complain_on_overflow */
206 bfd_elf_generic_reloc, /* special_function */
207 "R_MIPS_REL32", /* name */
208 TRUE, /* partial_inplace */
209 0xffffffff, /* src_mask */
210 0xffffffff, /* dst_mask */
211 FALSE), /* pcrel_offset */
213 /* 26 bit jump address. */
214 HOWTO (R_MIPS_26, /* type */
215 2, /* rightshift */
216 2, /* size (0 = byte, 1 = short, 2 = long) */
217 26, /* bitsize */
218 FALSE, /* pc_relative */
219 0, /* bitpos */
220 complain_overflow_dont, /* complain_on_overflow */
221 /* This needs complex overflow
222 detection, because the upper 36
223 bits must match the PC + 4. */
224 bfd_elf_generic_reloc, /* special_function */
225 "R_MIPS_26", /* name */
226 TRUE, /* partial_inplace */
227 0x03ffffff, /* src_mask */
228 0x03ffffff, /* dst_mask */
229 FALSE), /* pcrel_offset */
231 /* R_MIPS_HI16 and R_MIPS_LO16 are unsupported for NewABI REL.
232 However, the native IRIX6 tools use them, so we try our best. */
234 /* High 16 bits of symbol value. */
235 HOWTO (R_MIPS_HI16, /* type */
236 0, /* rightshift */
237 2, /* size (0 = byte, 1 = short, 2 = long) */
238 16, /* bitsize */
239 FALSE, /* pc_relative */
240 0, /* bitpos */
241 complain_overflow_dont, /* complain_on_overflow */
242 mips_elf64_hi16_reloc, /* special_function */
243 "R_MIPS_HI16", /* name */
244 TRUE, /* partial_inplace */
245 0x0000ffff, /* src_mask */
246 0x0000ffff, /* dst_mask */
247 FALSE), /* pcrel_offset */
249 /* Low 16 bits of symbol value. */
250 HOWTO (R_MIPS_LO16, /* type */
251 0, /* rightshift */
252 2, /* size (0 = byte, 1 = short, 2 = long) */
253 16, /* bitsize */
254 FALSE, /* pc_relative */
255 0, /* bitpos */
256 complain_overflow_dont, /* complain_on_overflow */
257 bfd_elf_generic_reloc, /* special_function */
258 "R_MIPS_LO16", /* name */
259 TRUE, /* partial_inplace */
260 0x0000ffff, /* src_mask */
261 0x0000ffff, /* dst_mask */
262 FALSE), /* pcrel_offset */
264 /* GP relative reference. */
265 HOWTO (R_MIPS_GPREL16, /* type */
266 0, /* rightshift */
267 2, /* size (0 = byte, 1 = short, 2 = long) */
268 16, /* bitsize */
269 FALSE, /* pc_relative */
270 0, /* bitpos */
271 complain_overflow_signed, /* complain_on_overflow */
272 mips_elf64_gprel16_reloc, /* special_function */
273 "R_MIPS_GPREL16", /* name */
274 TRUE, /* partial_inplace */
275 0x0000ffff, /* src_mask */
276 0x0000ffff, /* dst_mask */
277 FALSE), /* pcrel_offset */
279 /* Reference to literal section. */
280 HOWTO (R_MIPS_LITERAL, /* type */
281 0, /* rightshift */
282 2, /* size (0 = byte, 1 = short, 2 = long) */
283 16, /* bitsize */
284 FALSE, /* pc_relative */
285 0, /* bitpos */
286 complain_overflow_signed, /* complain_on_overflow */
287 mips_elf64_literal_reloc, /* special_function */
288 "R_MIPS_LITERAL", /* name */
289 TRUE, /* partial_inplace */
290 0x0000ffff, /* src_mask */
291 0x0000ffff, /* dst_mask */
292 FALSE), /* pcrel_offset */
294 /* Reference to global offset table. */
295 HOWTO (R_MIPS_GOT16, /* type */
296 0, /* rightshift */
297 2, /* size (0 = byte, 1 = short, 2 = long) */
298 16, /* bitsize */
299 FALSE, /* pc_relative */
300 0, /* bitpos */
301 complain_overflow_signed, /* complain_on_overflow */
302 mips_elf64_got16_reloc, /* special_function */
303 "R_MIPS_GOT16", /* name */
304 TRUE, /* partial_inplace */
305 0x0000ffff, /* src_mask */
306 0x0000ffff, /* dst_mask */
307 FALSE), /* pcrel_offset */
309 /* 16 bit PC relative reference. */
310 HOWTO (R_MIPS_PC16, /* type */
311 0, /* rightshift */
312 2, /* size (0 = byte, 1 = short, 2 = long) */
313 16, /* bitsize */
314 TRUE, /* pc_relative */
315 0, /* bitpos */
316 complain_overflow_signed, /* complain_on_overflow */
317 bfd_elf_generic_reloc, /* special_function */
318 "R_MIPS_PC16", /* name */
319 TRUE, /* partial_inplace */
320 0x0000ffff, /* src_mask */
321 0x0000ffff, /* dst_mask */
322 TRUE), /* pcrel_offset */
324 /* 16 bit call through global offset table. */
325 HOWTO (R_MIPS_CALL16, /* type */
326 0, /* rightshift */
327 2, /* size (0 = byte, 1 = short, 2 = long) */
328 16, /* bitsize */
329 FALSE, /* pc_relative */
330 0, /* bitpos */
331 complain_overflow_signed, /* complain_on_overflow */
332 bfd_elf_generic_reloc, /* special_function */
333 "R_MIPS_CALL16", /* name */
334 TRUE, /* partial_inplace */
335 0x0000ffff, /* src_mask */
336 0x0000ffff, /* dst_mask */
337 FALSE), /* pcrel_offset */
339 /* 32 bit GP relative reference. */
340 HOWTO (R_MIPS_GPREL32, /* type */
341 0, /* rightshift */
342 2, /* size (0 = byte, 1 = short, 2 = long) */
343 32, /* bitsize */
344 FALSE, /* pc_relative */
345 0, /* bitpos */
346 complain_overflow_dont, /* complain_on_overflow */
347 mips_elf64_gprel32_reloc, /* special_function */
348 "R_MIPS_GPREL32", /* name */
349 TRUE, /* partial_inplace */
350 0xffffffff, /* src_mask */
351 0xffffffff, /* dst_mask */
352 FALSE), /* pcrel_offset */
354 EMPTY_HOWTO (13),
355 EMPTY_HOWTO (14),
356 EMPTY_HOWTO (15),
358 /* A 5 bit shift field. */
359 HOWTO (R_MIPS_SHIFT5, /* type */
360 0, /* rightshift */
361 2, /* size (0 = byte, 1 = short, 2 = long) */
362 5, /* bitsize */
363 FALSE, /* pc_relative */
364 6, /* bitpos */
365 complain_overflow_bitfield, /* complain_on_overflow */
366 bfd_elf_generic_reloc, /* special_function */
367 "R_MIPS_SHIFT5", /* name */
368 TRUE, /* partial_inplace */
369 0x000007c0, /* src_mask */
370 0x000007c0, /* dst_mask */
371 FALSE), /* pcrel_offset */
373 /* A 6 bit shift field. */
374 HOWTO (R_MIPS_SHIFT6, /* type */
375 0, /* rightshift */
376 2, /* size (0 = byte, 1 = short, 2 = long) */
377 6, /* bitsize */
378 FALSE, /* pc_relative */
379 6, /* bitpos */
380 complain_overflow_bitfield, /* complain_on_overflow */
381 mips_elf64_shift6_reloc, /* special_function */
382 "R_MIPS_SHIFT6", /* name */
383 TRUE, /* partial_inplace */
384 0x000007c4, /* src_mask */
385 0x000007c4, /* dst_mask */
386 FALSE), /* pcrel_offset */
388 /* 64 bit relocation. */
389 HOWTO (R_MIPS_64, /* type */
390 0, /* rightshift */
391 4, /* size (0 = byte, 1 = short, 2 = long) */
392 64, /* bitsize */
393 FALSE, /* pc_relative */
394 0, /* bitpos */
395 complain_overflow_dont, /* complain_on_overflow */
396 bfd_elf_generic_reloc, /* special_function */
397 "R_MIPS_64", /* name */
398 TRUE, /* partial_inplace */
399 MINUS_ONE, /* src_mask */
400 MINUS_ONE, /* dst_mask */
401 FALSE), /* pcrel_offset */
403 /* Displacement in the global offset table. */
404 HOWTO (R_MIPS_GOT_DISP, /* type */
405 0, /* rightshift */
406 2, /* size (0 = byte, 1 = short, 2 = long) */
407 16, /* bitsize */
408 FALSE, /* pc_relative */
409 0, /* bitpos */
410 complain_overflow_signed, /* complain_on_overflow */
411 bfd_elf_generic_reloc, /* special_function */
412 "R_MIPS_GOT_DISP", /* name */
413 TRUE, /* partial_inplace */
414 0x0000ffff, /* src_mask */
415 0x0000ffff, /* dst_mask */
416 FALSE), /* pcrel_offset */
418 /* Displacement to page pointer in the global offset table. */
419 HOWTO (R_MIPS_GOT_PAGE, /* type */
420 0, /* rightshift */
421 2, /* size (0 = byte, 1 = short, 2 = long) */
422 16, /* bitsize */
423 FALSE, /* pc_relative */
424 0, /* bitpos */
425 complain_overflow_signed, /* complain_on_overflow */
426 bfd_elf_generic_reloc, /* special_function */
427 "R_MIPS_GOT_PAGE", /* name */
428 TRUE, /* partial_inplace */
429 0x0000ffff, /* src_mask */
430 0x0000ffff, /* dst_mask */
431 FALSE), /* pcrel_offset */
433 /* Offset from page pointer in the global offset table. */
434 HOWTO (R_MIPS_GOT_OFST, /* type */
435 0, /* rightshift */
436 2, /* size (0 = byte, 1 = short, 2 = long) */
437 16, /* bitsize */
438 FALSE, /* pc_relative */
439 0, /* bitpos */
440 complain_overflow_signed, /* complain_on_overflow */
441 bfd_elf_generic_reloc, /* special_function */
442 "R_MIPS_GOT_OFST", /* name */
443 TRUE, /* partial_inplace */
444 0x0000ffff, /* src_mask */
445 0x0000ffff, /* dst_mask */
446 FALSE), /* pcrel_offset */
448 /* High 16 bits of displacement in global offset table. */
449 HOWTO (R_MIPS_GOT_HI16, /* type */
450 0, /* rightshift */
451 2, /* size (0 = byte, 1 = short, 2 = long) */
452 16, /* bitsize */
453 FALSE, /* pc_relative */
454 0, /* bitpos */
455 complain_overflow_dont, /* complain_on_overflow */
456 bfd_elf_generic_reloc, /* special_function */
457 "R_MIPS_GOT_HI16", /* name */
458 TRUE, /* partial_inplace */
459 0x0000ffff, /* src_mask */
460 0x0000ffff, /* dst_mask */
461 FALSE), /* pcrel_offset */
463 /* Low 16 bits of displacement in global offset table. */
464 HOWTO (R_MIPS_GOT_LO16, /* type */
465 0, /* rightshift */
466 2, /* size (0 = byte, 1 = short, 2 = long) */
467 16, /* bitsize */
468 FALSE, /* pc_relative */
469 0, /* bitpos */
470 complain_overflow_dont, /* complain_on_overflow */
471 bfd_elf_generic_reloc, /* special_function */
472 "R_MIPS_GOT_LO16", /* name */
473 TRUE, /* partial_inplace */
474 0x0000ffff, /* src_mask */
475 0x0000ffff, /* dst_mask */
476 FALSE), /* pcrel_offset */
478 /* 64 bit substraction. */
479 HOWTO (R_MIPS_SUB, /* type */
480 0, /* rightshift */
481 4, /* size (0 = byte, 1 = short, 2 = long) */
482 64, /* bitsize */
483 FALSE, /* pc_relative */
484 0, /* bitpos */
485 complain_overflow_dont, /* complain_on_overflow */
486 bfd_elf_generic_reloc, /* special_function */
487 "R_MIPS_SUB", /* name */
488 TRUE, /* partial_inplace */
489 MINUS_ONE, /* src_mask */
490 MINUS_ONE, /* dst_mask */
491 FALSE), /* pcrel_offset */
493 /* Insert the addend as an instruction. */
494 /* FIXME: Not handled correctly. */
495 HOWTO (R_MIPS_INSERT_A, /* type */
496 0, /* rightshift */
497 2, /* size (0 = byte, 1 = short, 2 = long) */
498 32, /* bitsize */
499 FALSE, /* pc_relative */
500 0, /* bitpos */
501 complain_overflow_dont, /* complain_on_overflow */
502 bfd_elf_generic_reloc, /* special_function */
503 "R_MIPS_INSERT_A", /* name */
504 TRUE, /* partial_inplace */
505 0xffffffff, /* src_mask */
506 0xffffffff, /* dst_mask */
507 FALSE), /* pcrel_offset */
509 /* Insert the addend as an instruction, and change all relocations
510 to refer to the old instruction at the address. */
511 /* FIXME: Not handled correctly. */
512 HOWTO (R_MIPS_INSERT_B, /* type */
513 0, /* rightshift */
514 2, /* size (0 = byte, 1 = short, 2 = long) */
515 32, /* bitsize */
516 FALSE, /* pc_relative */
517 0, /* bitpos */
518 complain_overflow_dont, /* complain_on_overflow */
519 bfd_elf_generic_reloc, /* special_function */
520 "R_MIPS_INSERT_B", /* name */
521 TRUE, /* partial_inplace */
522 0xffffffff, /* src_mask */
523 0xffffffff, /* dst_mask */
524 FALSE), /* pcrel_offset */
526 /* Delete a 32 bit instruction. */
527 /* FIXME: Not handled correctly. */
528 HOWTO (R_MIPS_DELETE, /* type */
529 0, /* rightshift */
530 2, /* size (0 = byte, 1 = short, 2 = long) */
531 32, /* bitsize */
532 FALSE, /* pc_relative */
533 0, /* bitpos */
534 complain_overflow_dont, /* complain_on_overflow */
535 bfd_elf_generic_reloc, /* special_function */
536 "R_MIPS_DELETE", /* name */
537 TRUE, /* partial_inplace */
538 0xffffffff, /* src_mask */
539 0xffffffff, /* dst_mask */
540 FALSE), /* pcrel_offset */
542 /* The MIPS ELF64 ABI Draft wants us to support these for REL relocations.
543 We don't, because
544 a) It means building the addend from a R_MIPS_HIGHEST/R_MIPS_HIGHER/
545 R_MIPS_HI16/R_MIPS_LO16 sequence with varying ordering, using
546 fallable heuristics.
547 b) No other NewABI toolchain actually emits such relocations. */
548 EMPTY_HOWTO (R_MIPS_HIGHER),
549 EMPTY_HOWTO (R_MIPS_HIGHEST),
551 /* High 16 bits of displacement in global offset table. */
552 HOWTO (R_MIPS_CALL_HI16, /* type */
553 0, /* rightshift */
554 2, /* size (0 = byte, 1 = short, 2 = long) */
555 16, /* bitsize */
556 FALSE, /* pc_relative */
557 0, /* bitpos */
558 complain_overflow_dont, /* complain_on_overflow */
559 bfd_elf_generic_reloc, /* special_function */
560 "R_MIPS_CALL_HI16", /* name */
561 TRUE, /* partial_inplace */
562 0x0000ffff, /* src_mask */
563 0x0000ffff, /* dst_mask */
564 FALSE), /* pcrel_offset */
566 /* Low 16 bits of displacement in global offset table. */
567 HOWTO (R_MIPS_CALL_LO16, /* type */
568 0, /* rightshift */
569 2, /* size (0 = byte, 1 = short, 2 = long) */
570 16, /* bitsize */
571 FALSE, /* pc_relative */
572 0, /* bitpos */
573 complain_overflow_dont, /* complain_on_overflow */
574 bfd_elf_generic_reloc, /* special_function */
575 "R_MIPS_CALL_LO16", /* name */
576 TRUE, /* partial_inplace */
577 0x0000ffff, /* src_mask */
578 0x0000ffff, /* dst_mask */
579 FALSE), /* pcrel_offset */
581 /* Section displacement, used by an associated event location section. */
582 HOWTO (R_MIPS_SCN_DISP, /* type */
583 0, /* rightshift */
584 2, /* size (0 = byte, 1 = short, 2 = long) */
585 32, /* bitsize */
586 FALSE, /* pc_relative */
587 0, /* bitpos */
588 complain_overflow_dont, /* complain_on_overflow */
589 bfd_elf_generic_reloc, /* special_function */
590 "R_MIPS_SCN_DISP", /* name */
591 TRUE, /* partial_inplace */
592 0xffffffff, /* src_mask */
593 0xffffffff, /* dst_mask */
594 FALSE), /* pcrel_offset */
596 HOWTO (R_MIPS_REL16, /* type */
597 0, /* rightshift */
598 1, /* size (0 = byte, 1 = short, 2 = long) */
599 16, /* bitsize */
600 FALSE, /* pc_relative */
601 0, /* bitpos */
602 complain_overflow_signed, /* complain_on_overflow */
603 bfd_elf_generic_reloc, /* special_function */
604 "R_MIPS_REL16", /* name */
605 TRUE, /* partial_inplace */
606 0xffff, /* src_mask */
607 0xffff, /* dst_mask */
608 FALSE), /* pcrel_offset */
610 /* These two are obsolete. */
611 EMPTY_HOWTO (R_MIPS_ADD_IMMEDIATE),
612 EMPTY_HOWTO (R_MIPS_PJUMP),
614 /* Similiar to R_MIPS_REL32, but used for relocations in a GOT section.
615 It must be used for multigot GOT's (and only there). */
616 HOWTO (R_MIPS_RELGOT, /* type */
617 0, /* rightshift */
618 2, /* size (0 = byte, 1 = short, 2 = long) */
619 32, /* bitsize */
620 FALSE, /* pc_relative */
621 0, /* bitpos */
622 complain_overflow_dont, /* complain_on_overflow */
623 bfd_elf_generic_reloc, /* special_function */
624 "R_MIPS_RELGOT", /* name */
625 TRUE, /* partial_inplace */
626 0xffffffff, /* src_mask */
627 0xffffffff, /* dst_mask */
628 FALSE), /* pcrel_offset */
630 /* Protected jump conversion. This is an optimization hint. No
631 relocation is required for correctness. */
632 HOWTO (R_MIPS_JALR, /* type */
633 0, /* rightshift */
634 2, /* size (0 = byte, 1 = short, 2 = long) */
635 32, /* bitsize */
636 FALSE, /* pc_relative */
637 0, /* bitpos */
638 complain_overflow_dont, /* complain_on_overflow */
639 bfd_elf_generic_reloc, /* special_function */
640 "R_MIPS_JALR", /* name */
641 FALSE, /* partial_inplace */
642 0, /* src_mask */
643 0x00000000, /* dst_mask */
644 FALSE), /* pcrel_offset */
647 /* The relocation table used for SHT_RELA sections. */
649 static reloc_howto_type mips_elf64_howto_table_rela[] =
651 /* No relocation. */
652 HOWTO (R_MIPS_NONE, /* type */
653 0, /* rightshift */
654 0, /* size (0 = byte, 1 = short, 2 = long) */
655 0, /* bitsize */
656 FALSE, /* pc_relative */
657 0, /* bitpos */
658 complain_overflow_dont, /* complain_on_overflow */
659 bfd_elf_generic_reloc, /* special_function */
660 "R_MIPS_NONE", /* name */
661 FALSE, /* partial_inplace */
662 0, /* src_mask */
663 0, /* dst_mask */
664 FALSE), /* pcrel_offset */
666 /* 16 bit relocation. */
667 HOWTO (R_MIPS_16, /* type */
668 0, /* rightshift */
669 2, /* size (0 = byte, 1 = short, 2 = long) */
670 16, /* bitsize */
671 FALSE, /* pc_relative */
672 0, /* bitpos */
673 complain_overflow_signed, /* complain_on_overflow */
674 bfd_elf_generic_reloc, /* special_function */
675 "R_MIPS_16", /* name */
676 FALSE, /* partial_inplace */
677 0, /* src_mask */
678 0x0000ffff, /* dst_mask */
679 FALSE), /* pcrel_offset */
681 /* 32 bit relocation. */
682 HOWTO (R_MIPS_32, /* type */
683 0, /* rightshift */
684 2, /* size (0 = byte, 1 = short, 2 = long) */
685 32, /* bitsize */
686 FALSE, /* pc_relative */
687 0, /* bitpos */
688 complain_overflow_dont, /* complain_on_overflow */
689 bfd_elf_generic_reloc, /* special_function */
690 "R_MIPS_32", /* name */
691 FALSE, /* partial_inplace */
692 0, /* src_mask */
693 0xffffffff, /* dst_mask */
694 FALSE), /* pcrel_offset */
696 /* 32 bit symbol relative relocation. */
697 HOWTO (R_MIPS_REL32, /* type */
698 0, /* rightshift */
699 2, /* size (0 = byte, 1 = short, 2 = long) */
700 32, /* bitsize */
701 FALSE, /* pc_relative */
702 0, /* bitpos */
703 complain_overflow_dont, /* complain_on_overflow */
704 bfd_elf_generic_reloc, /* special_function */
705 "R_MIPS_REL32", /* name */
706 FALSE, /* partial_inplace */
707 0, /* src_mask */
708 0xffffffff, /* dst_mask */
709 FALSE), /* pcrel_offset */
711 /* 26 bit jump address. */
712 HOWTO (R_MIPS_26, /* type */
713 2, /* rightshift */
714 2, /* size (0 = byte, 1 = short, 2 = long) */
715 26, /* bitsize */
716 FALSE, /* pc_relative */
717 0, /* bitpos */
718 complain_overflow_dont, /* complain_on_overflow */
719 /* This needs complex overflow
720 detection, because the upper 36
721 bits must match the PC + 4. */
722 bfd_elf_generic_reloc, /* special_function */
723 "R_MIPS_26", /* name */
724 FALSE, /* partial_inplace */
725 0, /* src_mask */
726 0x03ffffff, /* dst_mask */
727 FALSE), /* pcrel_offset */
729 /* High 16 bits of symbol value. */
730 HOWTO (R_MIPS_HI16, /* type */
731 0, /* rightshift */
732 2, /* size (0 = byte, 1 = short, 2 = long) */
733 16, /* bitsize */
734 FALSE, /* pc_relative */
735 0, /* bitpos */
736 complain_overflow_dont, /* complain_on_overflow */
737 bfd_elf_generic_reloc, /* special_function */
738 "R_MIPS_HI16", /* name */
739 FALSE, /* partial_inplace */
740 0, /* src_mask */
741 0x0000ffff, /* dst_mask */
742 FALSE), /* pcrel_offset */
744 /* Low 16 bits of symbol value. */
745 HOWTO (R_MIPS_LO16, /* type */
746 0, /* rightshift */
747 2, /* size (0 = byte, 1 = short, 2 = long) */
748 16, /* bitsize */
749 FALSE, /* pc_relative */
750 0, /* bitpos */
751 complain_overflow_dont, /* complain_on_overflow */
752 bfd_elf_generic_reloc, /* special_function */
753 "R_MIPS_LO16", /* name */
754 FALSE, /* partial_inplace */
755 0, /* src_mask */
756 0x0000ffff, /* dst_mask */
757 FALSE), /* pcrel_offset */
759 /* GP relative reference. */
760 HOWTO (R_MIPS_GPREL16, /* type */
761 0, /* rightshift */
762 2, /* size (0 = byte, 1 = short, 2 = long) */
763 16, /* bitsize */
764 FALSE, /* pc_relative */
765 0, /* bitpos */
766 complain_overflow_signed, /* complain_on_overflow */
767 mips_elf64_gprel16_reloc, /* special_function */
768 "R_MIPS_GPREL16", /* name */
769 FALSE, /* partial_inplace */
770 0, /* src_mask */
771 0x0000ffff, /* dst_mask */
772 FALSE), /* pcrel_offset */
774 /* Reference to literal section. */
775 HOWTO (R_MIPS_LITERAL, /* type */
776 0, /* rightshift */
777 2, /* size (0 = byte, 1 = short, 2 = long) */
778 16, /* bitsize */
779 FALSE, /* pc_relative */
780 0, /* bitpos */
781 complain_overflow_signed, /* complain_on_overflow */
782 mips_elf64_literal_reloc, /* special_function */
783 "R_MIPS_LITERAL", /* name */
784 FALSE, /* partial_inplace */
785 0, /* src_mask */
786 0x0000ffff, /* dst_mask */
787 FALSE), /* pcrel_offset */
789 /* Reference to global offset table. */
790 HOWTO (R_MIPS_GOT16, /* type */
791 0, /* rightshift */
792 2, /* size (0 = byte, 1 = short, 2 = long) */
793 16, /* bitsize */
794 FALSE, /* pc_relative */
795 0, /* bitpos */
796 complain_overflow_signed, /* complain_on_overflow */
797 mips_elf64_got16_reloc, /* special_function */
798 "R_MIPS_GOT16", /* name */
799 FALSE, /* partial_inplace */
800 0, /* src_mask */
801 0x0000ffff, /* dst_mask */
802 FALSE), /* pcrel_offset */
804 /* 16 bit PC relative reference. */
805 HOWTO (R_MIPS_PC16, /* type */
806 0, /* rightshift */
807 2, /* size (0 = byte, 1 = short, 2 = long) */
808 16, /* bitsize */
809 TRUE, /* pc_relative */
810 0, /* bitpos */
811 complain_overflow_signed, /* complain_on_overflow */
812 bfd_elf_generic_reloc, /* special_function */
813 "R_MIPS_PC16", /* name */
814 FALSE, /* partial_inplace */
815 0, /* src_mask */
816 0x0000ffff, /* dst_mask */
817 TRUE), /* pcrel_offset */
819 /* 16 bit call through global offset table. */
820 HOWTO (R_MIPS_CALL16, /* type */
821 0, /* rightshift */
822 2, /* size (0 = byte, 1 = short, 2 = long) */
823 16, /* bitsize */
824 FALSE, /* pc_relative */
825 0, /* bitpos */
826 complain_overflow_signed, /* complain_on_overflow */
827 bfd_elf_generic_reloc, /* special_function */
828 "R_MIPS_CALL16", /* name */
829 FALSE, /* partial_inplace */
830 0, /* src_mask */
831 0x0000ffff, /* dst_mask */
832 FALSE), /* pcrel_offset */
834 /* 32 bit GP relative reference. */
835 HOWTO (R_MIPS_GPREL32, /* type */
836 0, /* rightshift */
837 2, /* size (0 = byte, 1 = short, 2 = long) */
838 32, /* bitsize */
839 FALSE, /* pc_relative */
840 0, /* bitpos */
841 complain_overflow_dont, /* complain_on_overflow */
842 mips_elf64_gprel32_reloc, /* special_function */
843 "R_MIPS_GPREL32", /* name */
844 FALSE, /* partial_inplace */
845 0, /* src_mask */
846 0xffffffff, /* dst_mask */
847 FALSE), /* pcrel_offset */
849 EMPTY_HOWTO (13),
850 EMPTY_HOWTO (14),
851 EMPTY_HOWTO (15),
853 /* A 5 bit shift field. */
854 HOWTO (R_MIPS_SHIFT5, /* type */
855 0, /* rightshift */
856 2, /* size (0 = byte, 1 = short, 2 = long) */
857 5, /* bitsize */
858 FALSE, /* pc_relative */
859 6, /* bitpos */
860 complain_overflow_bitfield, /* complain_on_overflow */
861 bfd_elf_generic_reloc, /* special_function */
862 "R_MIPS_SHIFT5", /* name */
863 FALSE, /* partial_inplace */
864 0, /* src_mask */
865 0x000007c0, /* dst_mask */
866 FALSE), /* pcrel_offset */
868 /* A 6 bit shift field. */
869 HOWTO (R_MIPS_SHIFT6, /* type */
870 0, /* rightshift */
871 2, /* size (0 = byte, 1 = short, 2 = long) */
872 6, /* bitsize */
873 FALSE, /* pc_relative */
874 6, /* bitpos */
875 complain_overflow_bitfield, /* complain_on_overflow */
876 mips_elf64_shift6_reloc, /* special_function */
877 "R_MIPS_SHIFT6", /* name */
878 FALSE, /* partial_inplace */
879 0, /* src_mask */
880 0x000007c4, /* dst_mask */
881 FALSE), /* pcrel_offset */
883 /* 64 bit relocation. */
884 HOWTO (R_MIPS_64, /* type */
885 0, /* rightshift */
886 4, /* size (0 = byte, 1 = short, 2 = long) */
887 64, /* bitsize */
888 FALSE, /* pc_relative */
889 0, /* bitpos */
890 complain_overflow_dont, /* complain_on_overflow */
891 bfd_elf_generic_reloc, /* special_function */
892 "R_MIPS_64", /* name */
893 FALSE, /* partial_inplace */
894 0, /* src_mask */
895 MINUS_ONE, /* dst_mask */
896 FALSE), /* pcrel_offset */
898 /* Displacement in the global offset table. */
899 HOWTO (R_MIPS_GOT_DISP, /* type */
900 0, /* rightshift */
901 2, /* size (0 = byte, 1 = short, 2 = long) */
902 16, /* bitsize */
903 FALSE, /* pc_relative */
904 0, /* bitpos */
905 complain_overflow_signed, /* complain_on_overflow */
906 bfd_elf_generic_reloc, /* special_function */
907 "R_MIPS_GOT_DISP", /* name */
908 FALSE, /* partial_inplace */
909 0, /* src_mask */
910 0x0000ffff, /* dst_mask */
911 FALSE), /* pcrel_offset */
913 /* Displacement to page pointer in the global offset table. */
914 HOWTO (R_MIPS_GOT_PAGE, /* type */
915 0, /* rightshift */
916 2, /* size (0 = byte, 1 = short, 2 = long) */
917 16, /* bitsize */
918 FALSE, /* pc_relative */
919 0, /* bitpos */
920 complain_overflow_signed, /* complain_on_overflow */
921 bfd_elf_generic_reloc, /* special_function */
922 "R_MIPS_GOT_PAGE", /* name */
923 FALSE, /* partial_inplace */
924 0, /* src_mask */
925 0x0000ffff, /* dst_mask */
926 FALSE), /* pcrel_offset */
928 /* Offset from page pointer in the global offset table. */
929 HOWTO (R_MIPS_GOT_OFST, /* type */
930 0, /* rightshift */
931 2, /* size (0 = byte, 1 = short, 2 = long) */
932 16, /* bitsize */
933 FALSE, /* pc_relative */
934 0, /* bitpos */
935 complain_overflow_signed, /* complain_on_overflow */
936 bfd_elf_generic_reloc, /* special_function */
937 "R_MIPS_GOT_OFST", /* name */
938 FALSE, /* partial_inplace */
939 0, /* src_mask */
940 0x0000ffff, /* dst_mask */
941 FALSE), /* pcrel_offset */
943 /* High 16 bits of displacement in global offset table. */
944 HOWTO (R_MIPS_GOT_HI16, /* type */
945 0, /* rightshift */
946 2, /* size (0 = byte, 1 = short, 2 = long) */
947 16, /* bitsize */
948 FALSE, /* pc_relative */
949 0, /* bitpos */
950 complain_overflow_dont, /* complain_on_overflow */
951 bfd_elf_generic_reloc, /* special_function */
952 "R_MIPS_GOT_HI16", /* name */
953 FALSE, /* partial_inplace */
954 0, /* src_mask */
955 0x0000ffff, /* dst_mask */
956 FALSE), /* pcrel_offset */
958 /* Low 16 bits of displacement in global offset table. */
959 HOWTO (R_MIPS_GOT_LO16, /* type */
960 0, /* rightshift */
961 2, /* size (0 = byte, 1 = short, 2 = long) */
962 16, /* bitsize */
963 FALSE, /* pc_relative */
964 0, /* bitpos */
965 complain_overflow_dont, /* complain_on_overflow */
966 bfd_elf_generic_reloc, /* special_function */
967 "R_MIPS_GOT_LO16", /* name */
968 FALSE, /* partial_inplace */
969 0, /* src_mask */
970 0x0000ffff, /* dst_mask */
971 FALSE), /* pcrel_offset */
973 /* 64 bit substraction. */
974 HOWTO (R_MIPS_SUB, /* type */
975 0, /* rightshift */
976 4, /* size (0 = byte, 1 = short, 2 = long) */
977 64, /* bitsize */
978 FALSE, /* pc_relative */
979 0, /* bitpos */
980 complain_overflow_dont, /* complain_on_overflow */
981 bfd_elf_generic_reloc, /* special_function */
982 "R_MIPS_SUB", /* name */
983 FALSE, /* partial_inplace */
984 0, /* src_mask */
985 MINUS_ONE, /* dst_mask */
986 FALSE), /* pcrel_offset */
988 /* Insert the addend as an instruction. */
989 /* FIXME: Not handled correctly. */
990 HOWTO (R_MIPS_INSERT_A, /* type */
991 0, /* rightshift */
992 2, /* size (0 = byte, 1 = short, 2 = long) */
993 32, /* bitsize */
994 FALSE, /* pc_relative */
995 0, /* bitpos */
996 complain_overflow_dont, /* complain_on_overflow */
997 bfd_elf_generic_reloc, /* special_function */
998 "R_MIPS_INSERT_A", /* name */
999 FALSE, /* partial_inplace */
1000 0, /* src_mask */
1001 0xffffffff, /* dst_mask */
1002 FALSE), /* pcrel_offset */
1004 /* Insert the addend as an instruction, and change all relocations
1005 to refer to the old instruction at the address. */
1006 /* FIXME: Not handled correctly. */
1007 HOWTO (R_MIPS_INSERT_B, /* type */
1008 0, /* rightshift */
1009 2, /* size (0 = byte, 1 = short, 2 = long) */
1010 32, /* bitsize */
1011 FALSE, /* pc_relative */
1012 0, /* bitpos */
1013 complain_overflow_dont, /* complain_on_overflow */
1014 bfd_elf_generic_reloc, /* special_function */
1015 "R_MIPS_INSERT_B", /* name */
1016 FALSE, /* partial_inplace */
1017 0, /* src_mask */
1018 0xffffffff, /* dst_mask */
1019 FALSE), /* pcrel_offset */
1021 /* Delete a 32 bit instruction. */
1022 /* FIXME: Not handled correctly. */
1023 HOWTO (R_MIPS_DELETE, /* type */
1024 0, /* rightshift */
1025 2, /* size (0 = byte, 1 = short, 2 = long) */
1026 32, /* bitsize */
1027 FALSE, /* pc_relative */
1028 0, /* bitpos */
1029 complain_overflow_dont, /* complain_on_overflow */
1030 bfd_elf_generic_reloc, /* special_function */
1031 "R_MIPS_DELETE", /* name */
1032 FALSE, /* partial_inplace */
1033 0, /* src_mask */
1034 0xffffffff, /* dst_mask */
1035 FALSE), /* pcrel_offset */
1037 /* Get the higher value of a 64 bit addend. */
1038 HOWTO (R_MIPS_HIGHER, /* type */
1039 0, /* rightshift */
1040 2, /* size (0 = byte, 1 = short, 2 = long) */
1041 16, /* bitsize */
1042 FALSE, /* pc_relative */
1043 0, /* bitpos */
1044 complain_overflow_dont, /* complain_on_overflow */
1045 bfd_elf_generic_reloc, /* special_function */
1046 "R_MIPS_HIGHER", /* name */
1047 FALSE, /* partial_inplace */
1048 0, /* src_mask */
1049 0x0000ffff, /* dst_mask */
1050 FALSE), /* pcrel_offset */
1052 /* Get the highest value of a 64 bit addend. */
1053 HOWTO (R_MIPS_HIGHEST, /* type */
1054 0, /* rightshift */
1055 2, /* size (0 = byte, 1 = short, 2 = long) */
1056 16, /* bitsize */
1057 FALSE, /* pc_relative */
1058 0, /* bitpos */
1059 complain_overflow_dont, /* complain_on_overflow */
1060 bfd_elf_generic_reloc, /* special_function */
1061 "R_MIPS_HIGHEST", /* name */
1062 FALSE, /* partial_inplace */
1063 0, /* src_mask */
1064 0x0000ffff, /* dst_mask */
1065 FALSE), /* pcrel_offset */
1067 /* High 16 bits of displacement in global offset table. */
1068 HOWTO (R_MIPS_CALL_HI16, /* type */
1069 0, /* rightshift */
1070 2, /* size (0 = byte, 1 = short, 2 = long) */
1071 16, /* bitsize */
1072 FALSE, /* pc_relative */
1073 0, /* bitpos */
1074 complain_overflow_dont, /* complain_on_overflow */
1075 bfd_elf_generic_reloc, /* special_function */
1076 "R_MIPS_CALL_HI16", /* name */
1077 FALSE, /* partial_inplace */
1078 0, /* src_mask */
1079 0x0000ffff, /* dst_mask */
1080 FALSE), /* pcrel_offset */
1082 /* Low 16 bits of displacement in global offset table. */
1083 HOWTO (R_MIPS_CALL_LO16, /* type */
1084 0, /* rightshift */
1085 2, /* size (0 = byte, 1 = short, 2 = long) */
1086 16, /* bitsize */
1087 FALSE, /* pc_relative */
1088 0, /* bitpos */
1089 complain_overflow_dont, /* complain_on_overflow */
1090 bfd_elf_generic_reloc, /* special_function */
1091 "R_MIPS_CALL_LO16", /* name */
1092 FALSE, /* partial_inplace */
1093 0, /* src_mask */
1094 0x0000ffff, /* dst_mask */
1095 FALSE), /* pcrel_offset */
1097 /* Section displacement, used by an associated event location section. */
1098 HOWTO (R_MIPS_SCN_DISP, /* type */
1099 0, /* rightshift */
1100 2, /* size (0 = byte, 1 = short, 2 = long) */
1101 32, /* bitsize */
1102 FALSE, /* pc_relative */
1103 0, /* bitpos */
1104 complain_overflow_dont, /* complain_on_overflow */
1105 bfd_elf_generic_reloc, /* special_function */
1106 "R_MIPS_SCN_DISP", /* name */
1107 FALSE, /* partial_inplace */
1108 0, /* src_mask */
1109 0xffffffff, /* dst_mask */
1110 FALSE), /* pcrel_offset */
1112 HOWTO (R_MIPS_REL16, /* type */
1113 0, /* rightshift */
1114 1, /* size (0 = byte, 1 = short, 2 = long) */
1115 16, /* bitsize */
1116 FALSE, /* pc_relative */
1117 0, /* bitpos */
1118 complain_overflow_signed, /* complain_on_overflow */
1119 bfd_elf_generic_reloc, /* special_function */
1120 "R_MIPS_REL16", /* name */
1121 FALSE, /* partial_inplace */
1122 0, /* src_mask */
1123 0xffff, /* dst_mask */
1124 FALSE), /* pcrel_offset */
1126 /* These two are obsolete. */
1127 EMPTY_HOWTO (R_MIPS_ADD_IMMEDIATE),
1128 EMPTY_HOWTO (R_MIPS_PJUMP),
1130 /* Similiar to R_MIPS_REL32, but used for relocations in a GOT section.
1131 It must be used for multigot GOT's (and only there). */
1132 HOWTO (R_MIPS_RELGOT, /* type */
1133 0, /* rightshift */
1134 2, /* size (0 = byte, 1 = short, 2 = long) */
1135 32, /* bitsize */
1136 FALSE, /* pc_relative */
1137 0, /* bitpos */
1138 complain_overflow_dont, /* complain_on_overflow */
1139 bfd_elf_generic_reloc, /* special_function */
1140 "R_MIPS_RELGOT", /* name */
1141 FALSE, /* partial_inplace */
1142 0, /* src_mask */
1143 0xffffffff, /* dst_mask */
1144 FALSE), /* pcrel_offset */
1146 /* Protected jump conversion. This is an optimization hint. No
1147 relocation is required for correctness. */
1148 HOWTO (R_MIPS_JALR, /* type */
1149 0, /* rightshift */
1150 2, /* size (0 = byte, 1 = short, 2 = long) */
1151 32, /* bitsize */
1152 FALSE, /* pc_relative */
1153 0, /* bitpos */
1154 complain_overflow_dont, /* complain_on_overflow */
1155 bfd_elf_generic_reloc, /* special_function */
1156 "R_MIPS_JALR", /* name */
1157 FALSE, /* partial_inplace */
1158 0, /* src_mask */
1159 0x00000000, /* dst_mask */
1160 FALSE), /* pcrel_offset */
1163 /* The reloc used for the mips16 jump instruction. */
1164 static reloc_howto_type elf_mips16_jump_howto =
1165 HOWTO (R_MIPS16_26, /* type */
1166 2, /* rightshift */
1167 2, /* size (0 = byte, 1 = short, 2 = long) */
1168 26, /* bitsize */
1169 FALSE, /* pc_relative */
1170 0, /* bitpos */
1171 complain_overflow_dont, /* complain_on_overflow */
1172 /* This needs complex overflow
1173 detection, because the upper four
1174 bits must match the PC. */
1175 mips16_jump_reloc, /* special_function */
1176 "R_MIPS16_26", /* name */
1177 TRUE, /* partial_inplace */
1178 0x3ffffff, /* src_mask */
1179 0x3ffffff, /* dst_mask */
1180 FALSE); /* pcrel_offset */
1182 /* The reloc used for the mips16 gprel instruction. */
1183 static reloc_howto_type elf_mips16_gprel_howto =
1184 HOWTO (R_MIPS16_GPREL, /* type */
1185 0, /* rightshift */
1186 2, /* size (0 = byte, 1 = short, 2 = long) */
1187 16, /* bitsize */
1188 FALSE, /* pc_relative */
1189 0, /* bitpos */
1190 complain_overflow_signed, /* complain_on_overflow */
1191 mips16_gprel_reloc, /* special_function */
1192 "R_MIPS16_GPREL", /* name */
1193 TRUE, /* partial_inplace */
1194 0x07ff001f, /* src_mask */
1195 0x07ff001f, /* dst_mask */
1196 FALSE); /* pcrel_offset */
1198 /* GNU extension to record C++ vtable hierarchy */
1199 static reloc_howto_type elf_mips_gnu_vtinherit_howto =
1200 HOWTO (R_MIPS_GNU_VTINHERIT, /* type */
1201 0, /* rightshift */
1202 2, /* size (0 = byte, 1 = short, 2 = long) */
1203 0, /* bitsize */
1204 FALSE, /* pc_relative */
1205 0, /* bitpos */
1206 complain_overflow_dont, /* complain_on_overflow */
1207 NULL, /* special_function */
1208 "R_MIPS_GNU_VTINHERIT", /* name */
1209 FALSE, /* partial_inplace */
1210 0, /* src_mask */
1211 0, /* dst_mask */
1212 FALSE); /* pcrel_offset */
1214 /* GNU extension to record C++ vtable member usage */
1215 static reloc_howto_type elf_mips_gnu_vtentry_howto =
1216 HOWTO (R_MIPS_GNU_VTENTRY, /* type */
1217 0, /* rightshift */
1218 2, /* size (0 = byte, 1 = short, 2 = long) */
1219 0, /* bitsize */
1220 FALSE, /* pc_relative */
1221 0, /* bitpos */
1222 complain_overflow_dont, /* complain_on_overflow */
1223 _bfd_elf_rel_vtable_reloc_fn, /* special_function */
1224 "R_MIPS_GNU_VTENTRY", /* name */
1225 FALSE, /* partial_inplace */
1226 0, /* src_mask */
1227 0, /* dst_mask */
1228 FALSE); /* pcrel_offset */
1230 /* Swap in a MIPS 64-bit Rel reloc. */
1232 static void
1233 mips_elf64_swap_reloc_in (abfd, src, dst)
1234 bfd *abfd;
1235 const Elf64_Mips_External_Rel *src;
1236 Elf64_Mips_Internal_Rela *dst;
1238 dst->r_offset = H_GET_64 (abfd, src->r_offset);
1239 dst->r_sym = H_GET_32 (abfd, src->r_sym);
1240 dst->r_ssym = H_GET_8 (abfd, src->r_ssym);
1241 dst->r_type3 = H_GET_8 (abfd, src->r_type3);
1242 dst->r_type2 = H_GET_8 (abfd, src->r_type2);
1243 dst->r_type = H_GET_8 (abfd, src->r_type);
1244 dst->r_addend = 0;
1247 /* Swap in a MIPS 64-bit Rela reloc. */
1249 static void
1250 mips_elf64_swap_reloca_in (abfd, src, dst)
1251 bfd *abfd;
1252 const Elf64_Mips_External_Rela *src;
1253 Elf64_Mips_Internal_Rela *dst;
1255 dst->r_offset = H_GET_64 (abfd, src->r_offset);
1256 dst->r_sym = H_GET_32 (abfd, src->r_sym);
1257 dst->r_ssym = H_GET_8 (abfd, src->r_ssym);
1258 dst->r_type3 = H_GET_8 (abfd, src->r_type3);
1259 dst->r_type2 = H_GET_8 (abfd, src->r_type2);
1260 dst->r_type = H_GET_8 (abfd, src->r_type);
1261 dst->r_addend = H_GET_S64 (abfd, src->r_addend);
1264 /* Swap out a MIPS 64-bit Rel reloc. */
1266 static void
1267 mips_elf64_swap_reloc_out (abfd, src, dst)
1268 bfd *abfd;
1269 const Elf64_Mips_Internal_Rela *src;
1270 Elf64_Mips_External_Rel *dst;
1272 H_PUT_64 (abfd, src->r_offset, dst->r_offset);
1273 H_PUT_32 (abfd, src->r_sym, dst->r_sym);
1274 H_PUT_8 (abfd, src->r_ssym, dst->r_ssym);
1275 H_PUT_8 (abfd, src->r_type3, dst->r_type3);
1276 H_PUT_8 (abfd, src->r_type2, dst->r_type2);
1277 H_PUT_8 (abfd, src->r_type, dst->r_type);
1280 /* Swap out a MIPS 64-bit Rela reloc. */
1282 static void
1283 mips_elf64_swap_reloca_out (abfd, src, dst)
1284 bfd *abfd;
1285 const Elf64_Mips_Internal_Rela *src;
1286 Elf64_Mips_External_Rela *dst;
1288 H_PUT_64 (abfd, src->r_offset, dst->r_offset);
1289 H_PUT_32 (abfd, src->r_sym, dst->r_sym);
1290 H_PUT_8 (abfd, src->r_ssym, dst->r_ssym);
1291 H_PUT_8 (abfd, src->r_type3, dst->r_type3);
1292 H_PUT_8 (abfd, src->r_type2, dst->r_type2);
1293 H_PUT_8 (abfd, src->r_type, dst->r_type);
1294 H_PUT_S64 (abfd, src->r_addend, dst->r_addend);
1297 /* Swap in a MIPS 64-bit Rel reloc. */
1299 static void
1300 mips_elf64_be_swap_reloc_in (abfd, src, dst)
1301 bfd *abfd;
1302 const bfd_byte *src;
1303 Elf_Internal_Rela *dst;
1305 Elf64_Mips_Internal_Rela mirel;
1307 mips_elf64_swap_reloc_in (abfd,
1308 (const Elf64_Mips_External_Rel *) src,
1309 &mirel);
1311 dst[0].r_offset = mirel.r_offset;
1312 dst[0].r_info = ELF64_R_INFO (mirel.r_sym, mirel.r_type);
1313 dst[0].r_addend = 0;
1314 dst[1].r_offset = mirel.r_offset;
1315 dst[1].r_info = ELF64_R_INFO (mirel.r_ssym, mirel.r_type2);
1316 dst[1].r_addend = 0;
1317 dst[2].r_offset = mirel.r_offset;
1318 dst[2].r_info = ELF64_R_INFO (STN_UNDEF, mirel.r_type3);
1319 dst[2].r_addend = 0;
1322 /* Swap in a MIPS 64-bit Rela reloc. */
1324 static void
1325 mips_elf64_be_swap_reloca_in (abfd, src, dst)
1326 bfd *abfd;
1327 const bfd_byte *src;
1328 Elf_Internal_Rela *dst;
1330 Elf64_Mips_Internal_Rela mirela;
1332 mips_elf64_swap_reloca_in (abfd,
1333 (const Elf64_Mips_External_Rela *) src,
1334 &mirela);
1336 dst[0].r_offset = mirela.r_offset;
1337 dst[0].r_info = ELF64_R_INFO (mirela.r_sym, mirela.r_type);
1338 dst[0].r_addend = mirela.r_addend;
1339 dst[1].r_offset = mirela.r_offset;
1340 dst[1].r_info = ELF64_R_INFO (mirela.r_ssym, mirela.r_type2);
1341 dst[1].r_addend = 0;
1342 dst[2].r_offset = mirela.r_offset;
1343 dst[2].r_info = ELF64_R_INFO (STN_UNDEF, mirela.r_type3);
1344 dst[2].r_addend = 0;
1347 /* Swap out a MIPS 64-bit Rel reloc. */
1349 static void
1350 mips_elf64_be_swap_reloc_out (abfd, src, dst)
1351 bfd *abfd;
1352 const Elf_Internal_Rela *src;
1353 bfd_byte *dst;
1355 Elf64_Mips_Internal_Rela mirel;
1357 mirel.r_offset = src[0].r_offset;
1358 BFD_ASSERT(src[0].r_offset == src[1].r_offset);
1359 #if 0
1360 BFD_ASSERT(src[0].r_offset == src[2].r_offset);
1361 #endif
1363 mirel.r_type = ELF64_MIPS_R_TYPE (src[0].r_info);
1364 mirel.r_sym = ELF64_R_SYM (src[0].r_info);
1365 mirel.r_type2 = ELF64_MIPS_R_TYPE (src[1].r_info);
1366 mirel.r_ssym = ELF64_MIPS_R_SSYM (src[1].r_info);
1367 mirel.r_type3 = ELF64_MIPS_R_TYPE (src[2].r_info);
1369 mips_elf64_swap_reloc_out (abfd, &mirel,
1370 (Elf64_Mips_External_Rel *) dst);
1373 /* Swap out a MIPS 64-bit Rela reloc. */
1375 static void
1376 mips_elf64_be_swap_reloca_out (abfd, src, dst)
1377 bfd *abfd;
1378 const Elf_Internal_Rela *src;
1379 bfd_byte *dst;
1381 Elf64_Mips_Internal_Rela mirela;
1383 mirela.r_offset = src[0].r_offset;
1384 BFD_ASSERT(src[0].r_offset == src[1].r_offset);
1385 BFD_ASSERT(src[0].r_offset == src[2].r_offset);
1387 mirela.r_type = ELF64_MIPS_R_TYPE (src[0].r_info);
1388 mirela.r_sym = ELF64_R_SYM (src[0].r_info);
1389 mirela.r_addend = src[0].r_addend;
1390 BFD_ASSERT(src[1].r_addend == 0);
1391 BFD_ASSERT(src[2].r_addend == 0);
1393 mirela.r_type2 = ELF64_MIPS_R_TYPE (src[1].r_info);
1394 mirela.r_ssym = ELF64_MIPS_R_SSYM (src[1].r_info);
1395 mirela.r_type3 = ELF64_MIPS_R_TYPE (src[2].r_info);
1397 mips_elf64_swap_reloca_out (abfd, &mirela,
1398 (Elf64_Mips_External_Rela *) dst);
1401 /* Do a R_MIPS_HI16 relocation. */
1403 static bfd_reloc_status_type
1404 mips_elf64_hi16_reloc (abfd, reloc_entry, symbol, data, input_section,
1405 output_bfd, error_message)
1406 bfd *abfd ATTRIBUTE_UNUSED;
1407 arelent *reloc_entry;
1408 asymbol *symbol;
1409 PTR data ATTRIBUTE_UNUSED;
1410 asection *input_section;
1411 bfd *output_bfd;
1412 char **error_message ATTRIBUTE_UNUSED;
1414 /* If we're relocating, and this is an external symbol, we don't
1415 want to change anything. */
1416 if (output_bfd != (bfd *) NULL
1417 && (symbol->flags & BSF_SECTION_SYM) == 0
1418 && (! reloc_entry->howto->partial_inplace
1419 || reloc_entry->addend == 0))
1421 reloc_entry->address += input_section->output_offset;
1422 return bfd_reloc_ok;
1425 if (((reloc_entry->addend & 0xffff) + 0x8000) & ~0xffff)
1426 reloc_entry->addend += 0x8000;
1428 return bfd_reloc_continue;
1431 /* Do a R_MIPS_GOT16 reloc. This is a reloc against the global offset
1432 table used for PIC code. If the symbol is an external symbol, the
1433 instruction is modified to contain the offset of the appropriate
1434 entry in the global offset table. If the symbol is a section
1435 symbol, the next reloc is a R_MIPS_LO16 reloc. The two 16 bit
1436 addends are combined to form the real addend against the section
1437 symbol; the GOT16 is modified to contain the offset of an entry in
1438 the global offset table, and the LO16 is modified to offset it
1439 appropriately. Thus an offset larger than 16 bits requires a
1440 modified value in the global offset table.
1442 This implementation suffices for the assembler, but the linker does
1443 not yet know how to create global offset tables. */
1445 static bfd_reloc_status_type
1446 mips_elf64_got16_reloc (abfd, reloc_entry, symbol, data, input_section,
1447 output_bfd, error_message)
1448 bfd *abfd;
1449 arelent *reloc_entry;
1450 asymbol *symbol;
1451 PTR data;
1452 asection *input_section;
1453 bfd *output_bfd;
1454 char **error_message;
1456 /* If we're relocating, and this is a local symbol, we can handle it
1457 just like an R_MIPS_HI16. */
1458 if (output_bfd != (bfd *) NULL
1459 && (symbol->flags & BSF_SECTION_SYM) != 0)
1460 return mips_elf64_hi16_reloc (abfd, reloc_entry, symbol, data,
1461 input_section, output_bfd, error_message);
1464 /* Otherwise we try to handle it as R_MIPS_GOT_DISP. */
1465 return bfd_elf_generic_reloc (abfd, reloc_entry, symbol, data,
1466 input_section, output_bfd, error_message);
1469 /* Set the GP value for OUTPUT_BFD. Returns FALSE if this is a
1470 dangerous relocation. */
1472 static bfd_boolean
1473 mips_elf64_assign_gp (output_bfd, pgp)
1474 bfd *output_bfd;
1475 bfd_vma *pgp;
1477 unsigned int count;
1478 asymbol **sym;
1479 unsigned int i;
1481 /* If we've already figured out what GP will be, just return it. */
1482 *pgp = _bfd_get_gp_value (output_bfd);
1483 if (*pgp)
1484 return TRUE;
1486 count = bfd_get_symcount (output_bfd);
1487 sym = bfd_get_outsymbols (output_bfd);
1489 /* The linker script will have created a symbol named `_gp' with the
1490 appropriate value. */
1491 if (sym == (asymbol **) NULL)
1492 i = count;
1493 else
1495 for (i = 0; i < count; i++, sym++)
1497 register const char *name;
1499 name = bfd_asymbol_name (*sym);
1500 if (*name == '_' && strcmp (name, "_gp") == 0)
1502 *pgp = bfd_asymbol_value (*sym);
1503 _bfd_set_gp_value (output_bfd, *pgp);
1504 break;
1509 if (i >= count)
1511 /* Only get the error once. */
1512 *pgp = 4;
1513 _bfd_set_gp_value (output_bfd, *pgp);
1514 return FALSE;
1517 return TRUE;
1520 /* We have to figure out the gp value, so that we can adjust the
1521 symbol value correctly. We look up the symbol _gp in the output
1522 BFD. If we can't find it, we're stuck. We cache it in the ELF
1523 target data. We don't need to adjust the symbol value for an
1524 external symbol if we are producing relocateable output. */
1526 static bfd_reloc_status_type
1527 mips_elf64_final_gp (output_bfd, symbol, relocateable, error_message, pgp)
1528 bfd *output_bfd;
1529 asymbol *symbol;
1530 bfd_boolean relocateable;
1531 char **error_message;
1532 bfd_vma *pgp;
1534 if (bfd_is_und_section (symbol->section)
1535 && ! relocateable)
1537 *pgp = 0;
1538 return bfd_reloc_undefined;
1541 *pgp = _bfd_get_gp_value (output_bfd);
1542 if (*pgp == 0
1543 && (! relocateable
1544 || (symbol->flags & BSF_SECTION_SYM) != 0))
1546 if (relocateable)
1548 /* Make up a value. */
1549 *pgp = symbol->section->output_section->vma /*+ 0x4000*/;
1550 _bfd_set_gp_value (output_bfd, *pgp);
1552 else if (!mips_elf64_assign_gp (output_bfd, pgp))
1554 *error_message =
1555 (char *) _("GP relative relocation when _gp not defined");
1556 return bfd_reloc_dangerous;
1560 return bfd_reloc_ok;
1563 /* Do a R_MIPS_GPREL16 relocation. This is a 16 bit value which must
1564 become the offset from the gp register. */
1566 static bfd_reloc_status_type
1567 mips_elf64_gprel16_reloc (abfd, reloc_entry, symbol, data, input_section,
1568 output_bfd, error_message)
1569 bfd *abfd;
1570 arelent *reloc_entry;
1571 asymbol *symbol;
1572 PTR data;
1573 asection *input_section;
1574 bfd *output_bfd;
1575 char **error_message;
1577 bfd_boolean relocateable;
1578 bfd_reloc_status_type ret;
1579 bfd_vma gp;
1581 /* If we're relocating, and this is an external symbol with no
1582 addend, we don't want to change anything. We will only have an
1583 addend if this is a newly created reloc, not read from an ELF
1584 file. */
1585 if (output_bfd != (bfd *) NULL
1586 && (symbol->flags & BSF_SECTION_SYM) == 0
1587 && (! reloc_entry->howto->partial_inplace
1588 || reloc_entry->addend == 0))
1590 reloc_entry->address += input_section->output_offset;
1591 return bfd_reloc_ok;
1594 if (output_bfd != (bfd *) NULL)
1595 relocateable = TRUE;
1596 else
1598 relocateable = FALSE;
1599 output_bfd = symbol->section->output_section->owner;
1602 ret = mips_elf64_final_gp (output_bfd, symbol, relocateable, error_message,
1603 &gp);
1604 if (ret != bfd_reloc_ok)
1605 return ret;
1607 return _bfd_mips_elf_gprel16_with_gp (abfd, symbol, reloc_entry,
1608 input_section, relocateable,
1609 data, gp);
1612 /* Do a R_MIPS_LITERAL relocation. */
1614 static bfd_reloc_status_type
1615 mips_elf64_literal_reloc (abfd, reloc_entry, symbol, data, input_section,
1616 output_bfd, error_message)
1617 bfd *abfd;
1618 arelent *reloc_entry;
1619 asymbol *symbol;
1620 PTR data;
1621 asection *input_section;
1622 bfd *output_bfd;
1623 char **error_message;
1625 bfd_boolean relocateable;
1626 bfd_reloc_status_type ret;
1627 bfd_vma gp;
1629 /* If we're relocating, and this is an external symbol, we don't
1630 want to change anything. */
1631 if (output_bfd != (bfd *) NULL
1632 && (symbol->flags & BSF_SECTION_SYM) == 0
1633 && (! reloc_entry->howto->partial_inplace
1634 || reloc_entry->addend == 0))
1636 reloc_entry->address += input_section->output_offset;
1637 return bfd_reloc_ok;
1640 /* FIXME: The entries in the .lit8 and .lit4 sections should be merged. */
1641 if (output_bfd != (bfd *) NULL)
1642 relocateable = TRUE;
1643 else
1645 relocateable = FALSE;
1646 output_bfd = symbol->section->output_section->owner;
1649 ret = mips_elf64_final_gp (output_bfd, symbol, relocateable, error_message,
1650 &gp);
1651 if (ret != bfd_reloc_ok)
1652 return ret;
1654 return _bfd_mips_elf_gprel16_with_gp (abfd, symbol, reloc_entry,
1655 input_section, relocateable,
1656 data, gp);
1659 /* Do a R_MIPS_GPREL32 relocation. This is a 32 bit value which must
1660 become the offset from the gp register. */
1662 static bfd_reloc_status_type
1663 mips_elf64_gprel32_reloc (abfd, reloc_entry, symbol, data, input_section,
1664 output_bfd, error_message)
1665 bfd *abfd;
1666 arelent *reloc_entry;
1667 asymbol *symbol;
1668 PTR data;
1669 asection *input_section;
1670 bfd *output_bfd;
1671 char **error_message;
1673 bfd_boolean relocateable;
1674 bfd_reloc_status_type ret;
1675 bfd_vma gp;
1676 bfd_vma relocation;
1677 unsigned long val;
1679 /* If we're relocating, and this is an external symbol with no
1680 addend, we don't want to change anything. We will only have an
1681 addend if this is a newly created reloc, not read from an ELF
1682 file. */
1683 if (output_bfd != (bfd *) NULL
1684 && (symbol->flags & BSF_SECTION_SYM) == 0
1685 && reloc_entry->addend == 0)
1687 *error_message = (char *)
1688 _("32bits gp relative relocation occurs for an external symbol");
1689 return bfd_reloc_outofrange;
1692 if (output_bfd != (bfd *) NULL)
1694 relocateable = TRUE;
1695 gp = _bfd_get_gp_value (output_bfd);
1697 else
1699 relocateable = FALSE;
1700 output_bfd = symbol->section->output_section->owner;
1702 ret = mips_elf64_final_gp (output_bfd, symbol, relocateable,
1703 error_message, &gp);
1704 if (ret != bfd_reloc_ok)
1705 return ret;
1708 if (bfd_is_com_section (symbol->section))
1709 relocation = 0;
1710 else
1711 relocation = symbol->value;
1713 relocation += symbol->section->output_section->vma;
1714 relocation += symbol->section->output_offset;
1716 if (reloc_entry->address > input_section->_cooked_size)
1717 return bfd_reloc_outofrange;
1719 if (reloc_entry->howto->src_mask == 0)
1721 /* This case arises with the 64-bit MIPS ELF ABI. */
1722 val = 0;
1724 else
1725 val = bfd_get_32 (abfd, (bfd_byte *) data + reloc_entry->address);
1727 /* Set val to the offset into the section or symbol. */
1728 val += reloc_entry->addend;
1730 /* Adjust val for the final section location and GP value. If we
1731 are producing relocateable output, we don't want to do this for
1732 an external symbol. */
1733 if (! relocateable
1734 || (symbol->flags & BSF_SECTION_SYM) != 0)
1735 val += relocation - gp;
1737 bfd_put_32 (abfd, val, (bfd_byte *) data + reloc_entry->address);
1739 if (relocateable)
1740 reloc_entry->address += input_section->output_offset;
1742 return bfd_reloc_ok;
1745 /* Do a R_MIPS_SHIFT6 relocation. The MSB of the shift is stored at bit 2,
1746 the rest is at bits 6-10. The bitpos already got right by the howto. */
1748 static bfd_reloc_status_type
1749 mips_elf64_shift6_reloc (abfd, reloc_entry, symbol, data, input_section,
1750 output_bfd, error_message)
1751 bfd *abfd ATTRIBUTE_UNUSED;
1752 arelent *reloc_entry;
1753 asymbol *symbol;
1754 PTR data ATTRIBUTE_UNUSED;
1755 asection *input_section;
1756 bfd *output_bfd;
1757 char **error_message ATTRIBUTE_UNUSED;
1759 /* If we're relocating, and this is an external symbol, we don't
1760 want to change anything. */
1761 if (output_bfd != (bfd *) NULL
1762 && (symbol->flags & BSF_SECTION_SYM) == 0
1763 && (! reloc_entry->howto->partial_inplace
1764 || reloc_entry->addend == 0))
1766 reloc_entry->address += input_section->output_offset;
1767 return bfd_reloc_ok;
1770 reloc_entry->addend = (reloc_entry->addend & 0x00007c0)
1771 | (reloc_entry->addend & 0x00000800) >> 9;
1773 return bfd_reloc_continue;
1776 /* Handle a mips16 jump. */
1778 static bfd_reloc_status_type
1779 mips16_jump_reloc (abfd, reloc_entry, symbol, data, input_section,
1780 output_bfd, error_message)
1781 bfd *abfd ATTRIBUTE_UNUSED;
1782 arelent *reloc_entry;
1783 asymbol *symbol;
1784 PTR data ATTRIBUTE_UNUSED;
1785 asection *input_section;
1786 bfd *output_bfd;
1787 char **error_message ATTRIBUTE_UNUSED;
1789 if (output_bfd != (bfd *) NULL
1790 && (symbol->flags & BSF_SECTION_SYM) == 0
1791 && (! reloc_entry->howto->partial_inplace
1792 || reloc_entry->addend == 0))
1794 reloc_entry->address += input_section->output_offset;
1795 return bfd_reloc_ok;
1798 /* FIXME. */
1800 static bfd_boolean warned;
1802 if (! warned)
1803 (*_bfd_error_handler)
1804 (_("Linking mips16 objects into %s format is not supported"),
1805 bfd_get_target (input_section->output_section->owner));
1806 warned = TRUE;
1809 return bfd_reloc_undefined;
1812 /* Handle a mips16 GP relative reloc. */
1814 static bfd_reloc_status_type
1815 mips16_gprel_reloc (abfd, reloc_entry, symbol, data, input_section,
1816 output_bfd, error_message)
1817 bfd *abfd;
1818 arelent *reloc_entry;
1819 asymbol *symbol;
1820 PTR data;
1821 asection *input_section;
1822 bfd *output_bfd;
1823 char **error_message;
1825 bfd_boolean relocateable;
1826 bfd_reloc_status_type ret;
1827 bfd_vma gp;
1828 unsigned short extend, insn;
1829 unsigned long final;
1831 /* If we're relocating, and this is an external symbol with no
1832 addend, we don't want to change anything. We will only have an
1833 addend if this is a newly created reloc, not read from an ELF
1834 file. */
1835 if (output_bfd != NULL
1836 && (symbol->flags & BSF_SECTION_SYM) == 0
1837 && reloc_entry->addend == 0)
1839 reloc_entry->address += input_section->output_offset;
1840 return bfd_reloc_ok;
1843 if (output_bfd != NULL)
1844 relocateable = TRUE;
1845 else
1847 relocateable = FALSE;
1848 output_bfd = symbol->section->output_section->owner;
1851 ret = mips_elf64_final_gp (output_bfd, symbol, relocateable, error_message,
1852 &gp);
1853 if (ret != bfd_reloc_ok)
1854 return ret;
1856 if (reloc_entry->address > input_section->_cooked_size)
1857 return bfd_reloc_outofrange;
1859 /* Pick up the mips16 extend instruction and the real instruction. */
1860 extend = bfd_get_16 (abfd, (bfd_byte *) data + reloc_entry->address);
1861 insn = bfd_get_16 (abfd, (bfd_byte *) data + reloc_entry->address + 2);
1863 /* Stuff the current addend back as a 32 bit value, do the usual
1864 relocation, and then clean up. */
1865 bfd_put_32 (abfd,
1866 (bfd_vma) (((extend & 0x1f) << 11)
1867 | (extend & 0x7e0)
1868 | (insn & 0x1f)),
1869 (bfd_byte *) data + reloc_entry->address);
1871 ret = _bfd_mips_elf_gprel16_with_gp (abfd, symbol, reloc_entry,
1872 input_section, relocateable, data, gp);
1874 final = bfd_get_32 (abfd, (bfd_byte *) data + reloc_entry->address);
1875 bfd_put_16 (abfd,
1876 (bfd_vma) ((extend & 0xf800)
1877 | ((final >> 11) & 0x1f)
1878 | (final & 0x7e0)),
1879 (bfd_byte *) data + reloc_entry->address);
1880 bfd_put_16 (abfd,
1881 (bfd_vma) ((insn & 0xffe0)
1882 | (final & 0x1f)),
1883 (bfd_byte *) data + reloc_entry->address + 2);
1885 return ret;
1888 /* A mapping from BFD reloc types to MIPS ELF reloc types. */
1890 struct elf_reloc_map {
1891 bfd_reloc_code_real_type bfd_val;
1892 enum elf_mips_reloc_type elf_val;
1895 static const struct elf_reloc_map mips_reloc_map[] =
1897 { BFD_RELOC_NONE, R_MIPS_NONE },
1898 { BFD_RELOC_16, R_MIPS_16 },
1899 { BFD_RELOC_32, R_MIPS_32 },
1900 /* There is no BFD reloc for R_MIPS_REL32. */
1901 { BFD_RELOC_64, R_MIPS_64 },
1902 { BFD_RELOC_CTOR, R_MIPS_64 },
1903 { BFD_RELOC_16_PCREL, R_MIPS_PC16 },
1904 { BFD_RELOC_HI16_S, R_MIPS_HI16 },
1905 { BFD_RELOC_LO16, R_MIPS_LO16 },
1906 { BFD_RELOC_GPREL16, R_MIPS_GPREL16 },
1907 { BFD_RELOC_GPREL32, R_MIPS_GPREL32 },
1908 { BFD_RELOC_MIPS_JMP, R_MIPS_26 },
1909 { BFD_RELOC_MIPS_LITERAL, R_MIPS_LITERAL },
1910 { BFD_RELOC_MIPS_GOT16, R_MIPS_GOT16 },
1911 { BFD_RELOC_MIPS_CALL16, R_MIPS_CALL16 },
1912 { BFD_RELOC_MIPS_SHIFT5, R_MIPS_SHIFT5 },
1913 { BFD_RELOC_MIPS_SHIFT6, R_MIPS_SHIFT6 },
1914 { BFD_RELOC_MIPS_GOT_DISP, R_MIPS_GOT_DISP },
1915 { BFD_RELOC_MIPS_GOT_PAGE, R_MIPS_GOT_PAGE },
1916 { BFD_RELOC_MIPS_GOT_OFST, R_MIPS_GOT_OFST },
1917 { BFD_RELOC_MIPS_GOT_HI16, R_MIPS_GOT_HI16 },
1918 { BFD_RELOC_MIPS_GOT_LO16, R_MIPS_GOT_LO16 },
1919 { BFD_RELOC_MIPS_SUB, R_MIPS_SUB },
1920 { BFD_RELOC_MIPS_INSERT_A, R_MIPS_INSERT_A },
1921 { BFD_RELOC_MIPS_INSERT_B, R_MIPS_INSERT_B },
1922 { BFD_RELOC_MIPS_DELETE, R_MIPS_DELETE },
1923 { BFD_RELOC_MIPS_HIGHEST, R_MIPS_HIGHEST },
1924 { BFD_RELOC_MIPS_HIGHER, R_MIPS_HIGHER },
1925 { BFD_RELOC_MIPS_CALL_HI16, R_MIPS_CALL_HI16 },
1926 { BFD_RELOC_MIPS_CALL_LO16, R_MIPS_CALL_LO16 },
1927 { BFD_RELOC_MIPS_SCN_DISP, R_MIPS_SCN_DISP },
1928 { BFD_RELOC_MIPS_REL16, R_MIPS_REL16 },
1929 /* Use of R_MIPS_ADD_IMMEDIATE and R_MIPS_PJUMP is deprecated. */
1930 { BFD_RELOC_MIPS_RELGOT, R_MIPS_RELGOT },
1931 { BFD_RELOC_MIPS_JALR, R_MIPS_JALR }
1934 /* Given a BFD reloc type, return a howto structure. */
1936 static reloc_howto_type *
1937 bfd_elf64_bfd_reloc_type_lookup (abfd, code)
1938 bfd *abfd ATTRIBUTE_UNUSED;
1939 bfd_reloc_code_real_type code;
1941 unsigned int i;
1942 /* FIXME: We default to RELA here instead of choosing the right
1943 relocation variant. */
1944 reloc_howto_type *howto_table = mips_elf64_howto_table_rela;
1946 for (i = 0; i < sizeof (mips_reloc_map) / sizeof (struct elf_reloc_map);
1947 i++)
1949 if (mips_reloc_map[i].bfd_val == code)
1950 return &howto_table[(int) mips_reloc_map[i].elf_val];
1953 switch (code)
1955 case BFD_RELOC_MIPS16_JMP:
1956 return &elf_mips16_jump_howto;
1957 case BFD_RELOC_MIPS16_GPREL:
1958 return &elf_mips16_gprel_howto;
1959 case BFD_RELOC_VTABLE_INHERIT:
1960 return &elf_mips_gnu_vtinherit_howto;
1961 case BFD_RELOC_VTABLE_ENTRY:
1962 return &elf_mips_gnu_vtentry_howto;
1963 default:
1964 bfd_set_error (bfd_error_bad_value);
1965 return NULL;
1969 /* Given a MIPS Elf_Internal_Rel, fill in an arelent structure. */
1971 static reloc_howto_type *
1972 mips_elf64_rtype_to_howto (r_type, rela_p)
1973 unsigned int r_type;
1974 bfd_boolean rela_p;
1976 switch (r_type)
1978 case R_MIPS16_26:
1979 return &elf_mips16_jump_howto;
1980 case R_MIPS16_GPREL:
1981 return &elf_mips16_gprel_howto;
1982 case R_MIPS_GNU_VTINHERIT:
1983 return &elf_mips_gnu_vtinherit_howto;
1984 case R_MIPS_GNU_VTENTRY:
1985 return &elf_mips_gnu_vtentry_howto;
1986 default:
1987 BFD_ASSERT (r_type < (unsigned int) R_MIPS_max);
1988 if (rela_p)
1989 return &mips_elf64_howto_table_rela[r_type];
1990 else
1991 return &mips_elf64_howto_table_rel[r_type];
1992 break;
1996 /* Prevent relocation handling by bfd for MIPS ELF64. */
1998 static void
1999 mips_elf64_info_to_howto_rel (abfd, cache_ptr, dst)
2000 bfd *abfd ATTRIBUTE_UNUSED;
2001 arelent *cache_ptr ATTRIBUTE_UNUSED;
2002 Elf_Internal_Rela *dst ATTRIBUTE_UNUSED;
2004 BFD_ASSERT (0);
2007 static void
2008 mips_elf64_info_to_howto_rela (abfd, cache_ptr, dst)
2009 bfd *abfd ATTRIBUTE_UNUSED;
2010 arelent *cache_ptr ATTRIBUTE_UNUSED;
2011 Elf_Internal_Rela *dst ATTRIBUTE_UNUSED;
2013 BFD_ASSERT (0);
2016 /* Since each entry in an SHT_REL or SHT_RELA section can represent up
2017 to three relocs, we must tell the user to allocate more space. */
2019 static long
2020 mips_elf64_get_reloc_upper_bound (abfd, sec)
2021 bfd *abfd ATTRIBUTE_UNUSED;
2022 asection *sec;
2024 return (sec->reloc_count * 3 + 1) * sizeof (arelent *);
2027 static long
2028 mips_elf64_get_dynamic_reloc_upper_bound (abfd)
2029 bfd *abfd;
2031 return _bfd_elf_get_dynamic_reloc_upper_bound (abfd) * 3;
2034 /* We must also copy more relocations than the corresponding functions
2035 in elf.c would, so the two following functions are slightly
2036 modified from elf.c, that multiply the external relocation count by
2037 3 to obtain the internal relocation count. */
2039 static long
2040 mips_elf64_canonicalize_reloc (abfd, section, relptr, symbols)
2041 bfd *abfd;
2042 sec_ptr section;
2043 arelent **relptr;
2044 asymbol **symbols;
2046 arelent *tblptr;
2047 unsigned int i;
2048 struct elf_backend_data *bed = get_elf_backend_data (abfd);
2050 if (! bed->s->slurp_reloc_table (abfd, section, symbols, FALSE))
2051 return -1;
2053 tblptr = section->relocation;
2054 for (i = 0; i < section->reloc_count * 3; i++)
2055 *relptr++ = tblptr++;
2057 *relptr = NULL;
2059 return section->reloc_count * 3;
2062 static long
2063 mips_elf64_canonicalize_dynamic_reloc (abfd, storage, syms)
2064 bfd *abfd;
2065 arelent **storage;
2066 asymbol **syms;
2068 bfd_boolean (*slurp_relocs)
2069 PARAMS ((bfd *, asection *, asymbol **, bfd_boolean));
2070 asection *s;
2071 long ret;
2073 if (elf_dynsymtab (abfd) == 0)
2075 bfd_set_error (bfd_error_invalid_operation);
2076 return -1;
2079 slurp_relocs = get_elf_backend_data (abfd)->s->slurp_reloc_table;
2080 ret = 0;
2081 for (s = abfd->sections; s != NULL; s = s->next)
2083 if (elf_section_data (s)->this_hdr.sh_link == elf_dynsymtab (abfd)
2084 && (elf_section_data (s)->this_hdr.sh_type == SHT_REL
2085 || elf_section_data (s)->this_hdr.sh_type == SHT_RELA))
2087 arelent *p;
2088 long count, i;
2090 if (! (*slurp_relocs) (abfd, s, syms, TRUE))
2091 return -1;
2092 count = s->_raw_size / elf_section_data (s)->this_hdr.sh_entsize * 3;
2093 p = s->relocation;
2094 for (i = 0; i < count; i++)
2095 *storage++ = p++;
2096 ret += count;
2100 *storage = NULL;
2102 return ret;
2105 /* Read the relocations from one reloc section. This is mostly copied
2106 from elfcode.h, except for the changes to expand one external
2107 relocation to 3 internal ones. We must unfortunately set
2108 reloc_count to the number of external relocations, because a lot of
2109 generic code seems to depend on this. */
2111 static bfd_boolean
2112 mips_elf64_slurp_one_reloc_table (abfd, asect, rel_hdr, reloc_count,
2113 relents, symbols, dynamic)
2114 bfd *abfd;
2115 asection *asect;
2116 Elf_Internal_Shdr *rel_hdr;
2117 bfd_size_type reloc_count;
2118 arelent *relents;
2119 asymbol **symbols;
2120 bfd_boolean dynamic;
2122 PTR allocated = NULL;
2123 bfd_byte *native_relocs;
2124 arelent *relent;
2125 bfd_vma i;
2126 int entsize;
2127 reloc_howto_type *howto_table;
2129 allocated = (PTR) bfd_malloc (rel_hdr->sh_size);
2130 if (allocated == NULL)
2131 return FALSE;
2133 if (bfd_seek (abfd, rel_hdr->sh_offset, SEEK_SET) != 0
2134 || (bfd_bread (allocated, rel_hdr->sh_size, abfd)
2135 != rel_hdr->sh_size))
2136 goto error_return;
2138 native_relocs = (bfd_byte *) allocated;
2140 entsize = rel_hdr->sh_entsize;
2141 BFD_ASSERT (entsize == sizeof (Elf64_Mips_External_Rel)
2142 || entsize == sizeof (Elf64_Mips_External_Rela));
2144 if (entsize == sizeof (Elf64_Mips_External_Rel))
2145 howto_table = mips_elf64_howto_table_rel;
2146 else
2147 howto_table = mips_elf64_howto_table_rela;
2149 for (i = 0, relent = relents;
2150 i < reloc_count;
2151 i++, native_relocs += entsize)
2153 Elf64_Mips_Internal_Rela rela;
2154 bfd_boolean used_sym, used_ssym;
2155 int ir;
2157 if (entsize == sizeof (Elf64_Mips_External_Rela))
2158 mips_elf64_swap_reloca_in (abfd,
2159 (Elf64_Mips_External_Rela *) native_relocs,
2160 &rela);
2161 else
2162 mips_elf64_swap_reloc_in (abfd,
2163 (Elf64_Mips_External_Rel *) native_relocs,
2164 &rela);
2166 /* Each entry represents exactly three actual relocations. */
2168 used_sym = FALSE;
2169 used_ssym = FALSE;
2170 for (ir = 0; ir < 3; ir++)
2172 enum elf_mips_reloc_type type;
2174 switch (ir)
2176 default:
2177 abort ();
2178 case 0:
2179 type = (enum elf_mips_reloc_type) rela.r_type;
2180 break;
2181 case 1:
2182 type = (enum elf_mips_reloc_type) rela.r_type2;
2183 break;
2184 case 2:
2185 type = (enum elf_mips_reloc_type) rela.r_type3;
2186 break;
2189 /* Some types require symbols, whereas some do not. */
2190 switch (type)
2192 case R_MIPS_NONE:
2193 case R_MIPS_LITERAL:
2194 case R_MIPS_INSERT_A:
2195 case R_MIPS_INSERT_B:
2196 case R_MIPS_DELETE:
2197 relent->sym_ptr_ptr = bfd_abs_section_ptr->symbol_ptr_ptr;
2198 break;
2200 default:
2201 if (! used_sym)
2203 if (rela.r_sym == 0)
2204 relent->sym_ptr_ptr = bfd_abs_section_ptr->symbol_ptr_ptr;
2205 else
2207 asymbol **ps, *s;
2209 ps = symbols + rela.r_sym - 1;
2210 s = *ps;
2211 if ((s->flags & BSF_SECTION_SYM) == 0)
2212 relent->sym_ptr_ptr = ps;
2213 else
2214 relent->sym_ptr_ptr = s->section->symbol_ptr_ptr;
2217 used_sym = TRUE;
2219 else if (! used_ssym)
2221 switch (rela.r_ssym)
2223 case RSS_UNDEF:
2224 relent->sym_ptr_ptr =
2225 bfd_abs_section_ptr->symbol_ptr_ptr;
2226 break;
2228 case RSS_GP:
2229 case RSS_GP0:
2230 case RSS_LOC:
2231 /* FIXME: I think these need to be handled using
2232 special howto structures. */
2233 BFD_ASSERT (0);
2234 break;
2236 default:
2237 BFD_ASSERT (0);
2238 break;
2241 used_ssym = TRUE;
2243 else
2244 relent->sym_ptr_ptr = bfd_abs_section_ptr->symbol_ptr_ptr;
2246 break;
2249 /* The address of an ELF reloc is section relative for an
2250 object file, and absolute for an executable file or
2251 shared library. The address of a BFD reloc is always
2252 section relative. */
2253 if ((abfd->flags & (EXEC_P | DYNAMIC)) == 0 || dynamic)
2254 relent->address = rela.r_offset;
2255 else
2256 relent->address = rela.r_offset - asect->vma;
2258 relent->addend = rela.r_addend;
2260 relent->howto = &howto_table[(int) type];
2262 ++relent;
2266 asect->reloc_count += (relent - relents) / 3;
2268 if (allocated != NULL)
2269 free (allocated);
2271 return TRUE;
2273 error_return:
2274 if (allocated != NULL)
2275 free (allocated);
2276 return FALSE;
2279 /* Read the relocations. On Irix 6, there can be two reloc sections
2280 associated with a single data section. This is copied from
2281 elfcode.h as well, with changes as small as accounting for 3
2282 internal relocs per external reloc and resetting reloc_count to
2283 zero before processing the relocs of a section. */
2285 static bfd_boolean
2286 mips_elf64_slurp_reloc_table (abfd, asect, symbols, dynamic)
2287 bfd *abfd;
2288 asection *asect;
2289 asymbol **symbols;
2290 bfd_boolean dynamic;
2292 struct bfd_elf_section_data * const d = elf_section_data (asect);
2293 Elf_Internal_Shdr *rel_hdr;
2294 Elf_Internal_Shdr *rel_hdr2;
2295 bfd_size_type reloc_count;
2296 bfd_size_type reloc_count2;
2297 arelent *relents;
2298 bfd_size_type amt;
2300 if (asect->relocation != NULL)
2301 return TRUE;
2303 if (! dynamic)
2305 if ((asect->flags & SEC_RELOC) == 0
2306 || asect->reloc_count == 0)
2307 return TRUE;
2309 rel_hdr = &d->rel_hdr;
2310 reloc_count = NUM_SHDR_ENTRIES (rel_hdr);
2311 rel_hdr2 = d->rel_hdr2;
2312 reloc_count2 = (rel_hdr2 ? NUM_SHDR_ENTRIES (rel_hdr2) : 0);
2314 BFD_ASSERT (asect->reloc_count == reloc_count + reloc_count2);
2315 BFD_ASSERT (asect->rel_filepos == rel_hdr->sh_offset
2316 || (rel_hdr2 && asect->rel_filepos == rel_hdr2->sh_offset));
2319 else
2321 /* Note that ASECT->RELOC_COUNT tends not to be accurate in this
2322 case because relocations against this section may use the
2323 dynamic symbol table, and in that case bfd_section_from_shdr
2324 in elf.c does not update the RELOC_COUNT. */
2325 if (asect->_raw_size == 0)
2326 return TRUE;
2328 rel_hdr = &d->this_hdr;
2329 reloc_count = NUM_SHDR_ENTRIES (rel_hdr);
2330 rel_hdr2 = NULL;
2331 reloc_count2 = 0;
2334 /* Allocate space for 3 arelent structures for each Rel structure. */
2335 amt = (reloc_count + reloc_count2) * 3 * sizeof (arelent);
2336 relents = (arelent *) bfd_alloc (abfd, amt);
2337 if (relents == NULL)
2338 return FALSE;
2340 /* The slurp_one_reloc_table routine increments reloc_count. */
2341 asect->reloc_count = 0;
2343 if (! mips_elf64_slurp_one_reloc_table (abfd, asect,
2344 rel_hdr, reloc_count,
2345 relents,
2346 symbols, dynamic))
2347 return FALSE;
2348 if (d->rel_hdr2 != NULL)
2350 if (! mips_elf64_slurp_one_reloc_table (abfd, asect,
2351 rel_hdr2, reloc_count2,
2352 relents + reloc_count * 3,
2353 symbols, dynamic))
2354 return FALSE;
2357 asect->relocation = relents;
2358 return TRUE;
2361 /* Write out the relocations. */
2363 static void
2364 mips_elf64_write_relocs (abfd, sec, data)
2365 bfd *abfd;
2366 asection *sec;
2367 PTR data;
2369 bfd_boolean *failedp = (bfd_boolean *) data;
2370 int count;
2371 Elf_Internal_Shdr *rel_hdr;
2372 unsigned int idx;
2374 /* If we have already failed, don't do anything. */
2375 if (*failedp)
2376 return;
2378 if ((sec->flags & SEC_RELOC) == 0)
2379 return;
2381 /* The linker backend writes the relocs out itself, and sets the
2382 reloc_count field to zero to inhibit writing them here. Also,
2383 sometimes the SEC_RELOC flag gets set even when there aren't any
2384 relocs. */
2385 if (sec->reloc_count == 0)
2386 return;
2388 /* We can combine up to three relocs that refer to the same address
2389 if the latter relocs have no associated symbol. */
2390 count = 0;
2391 for (idx = 0; idx < sec->reloc_count; idx++)
2393 bfd_vma addr;
2394 unsigned int i;
2396 ++count;
2398 addr = sec->orelocation[idx]->address;
2399 for (i = 0; i < 2; i++)
2401 arelent *r;
2403 if (idx + 1 >= sec->reloc_count)
2404 break;
2405 r = sec->orelocation[idx + 1];
2406 if (r->address != addr
2407 || ! bfd_is_abs_section ((*r->sym_ptr_ptr)->section)
2408 || (*r->sym_ptr_ptr)->value != 0)
2409 break;
2411 /* We can merge the reloc at IDX + 1 with the reloc at IDX. */
2413 ++idx;
2417 rel_hdr = &elf_section_data (sec)->rel_hdr;
2419 /* Do the actual relocation. */
2421 if (rel_hdr->sh_entsize == sizeof(Elf64_Mips_External_Rel))
2422 mips_elf64_write_rel (abfd, sec, rel_hdr, &count, data);
2423 else if (rel_hdr->sh_entsize == sizeof(Elf64_Mips_External_Rela))
2424 mips_elf64_write_rela (abfd, sec, rel_hdr, &count, data);
2425 else
2426 BFD_ASSERT (0);
2429 static void
2430 mips_elf64_write_rel (abfd, sec, rel_hdr, count, data)
2431 bfd *abfd;
2432 asection *sec;
2433 Elf_Internal_Shdr *rel_hdr;
2434 int *count;
2435 PTR data;
2437 bfd_boolean *failedp = (bfd_boolean *) data;
2438 Elf64_Mips_External_Rel *ext_rel;
2439 unsigned int idx;
2440 asymbol *last_sym = 0;
2441 int last_sym_idx = 0;
2443 rel_hdr->sh_size = (bfd_vma)(rel_hdr->sh_entsize * *count);
2444 rel_hdr->contents = (PTR) bfd_alloc (abfd, rel_hdr->sh_size);
2445 if (rel_hdr->contents == NULL)
2447 *failedp = TRUE;
2448 return;
2451 ext_rel = (Elf64_Mips_External_Rel *) rel_hdr->contents;
2452 for (idx = 0; idx < sec->reloc_count; idx++, ext_rel++)
2454 arelent *ptr;
2455 Elf64_Mips_Internal_Rela int_rel;
2456 asymbol *sym;
2457 int n;
2458 unsigned int i;
2460 ptr = sec->orelocation[idx];
2462 /* The address of an ELF reloc is section relative for an object
2463 file, and absolute for an executable file or shared library.
2464 The address of a BFD reloc is always section relative. */
2465 if ((abfd->flags & (EXEC_P | DYNAMIC)) == 0)
2466 int_rel.r_offset = ptr->address;
2467 else
2468 int_rel.r_offset = ptr->address + sec->vma;
2470 sym = *ptr->sym_ptr_ptr;
2471 if (sym == last_sym)
2472 n = last_sym_idx;
2473 else
2475 last_sym = sym;
2476 n = _bfd_elf_symbol_from_bfd_symbol (abfd, &sym);
2477 if (n < 0)
2479 *failedp = TRUE;
2480 return;
2482 last_sym_idx = n;
2485 int_rel.r_sym = n;
2486 int_rel.r_ssym = RSS_UNDEF;
2488 if ((*ptr->sym_ptr_ptr)->the_bfd->xvec != abfd->xvec
2489 && ! _bfd_elf_validate_reloc (abfd, ptr))
2491 *failedp = TRUE;
2492 return;
2495 int_rel.r_type = ptr->howto->type;
2496 int_rel.r_type2 = (int) R_MIPS_NONE;
2497 int_rel.r_type3 = (int) R_MIPS_NONE;
2499 for (i = 0; i < 2; i++)
2501 arelent *r;
2503 if (idx + 1 >= sec->reloc_count)
2504 break;
2505 r = sec->orelocation[idx + 1];
2506 if (r->address != ptr->address
2507 || ! bfd_is_abs_section ((*r->sym_ptr_ptr)->section)
2508 || (*r->sym_ptr_ptr)->value != 0)
2509 break;
2511 /* We can merge the reloc at IDX + 1 with the reloc at IDX. */
2513 if (i == 0)
2514 int_rel.r_type2 = r->howto->type;
2515 else
2516 int_rel.r_type3 = r->howto->type;
2518 ++idx;
2521 mips_elf64_swap_reloc_out (abfd, &int_rel, ext_rel);
2524 BFD_ASSERT (ext_rel - (Elf64_Mips_External_Rel *) rel_hdr->contents
2525 == *count);
2528 static void
2529 mips_elf64_write_rela (abfd, sec, rela_hdr, count, data)
2530 bfd *abfd;
2531 asection *sec;
2532 Elf_Internal_Shdr *rela_hdr;
2533 int *count;
2534 PTR data;
2536 bfd_boolean *failedp = (bfd_boolean *) data;
2537 Elf64_Mips_External_Rela *ext_rela;
2538 unsigned int idx;
2539 asymbol *last_sym = 0;
2540 int last_sym_idx = 0;
2542 rela_hdr->sh_size = (bfd_vma)(rela_hdr->sh_entsize * *count);
2543 rela_hdr->contents = (PTR) bfd_alloc (abfd, rela_hdr->sh_size);
2544 if (rela_hdr->contents == NULL)
2546 *failedp = TRUE;
2547 return;
2550 ext_rela = (Elf64_Mips_External_Rela *) rela_hdr->contents;
2551 for (idx = 0; idx < sec->reloc_count; idx++, ext_rela++)
2553 arelent *ptr;
2554 Elf64_Mips_Internal_Rela int_rela;
2555 asymbol *sym;
2556 int n;
2557 unsigned int i;
2559 ptr = sec->orelocation[idx];
2561 /* The address of an ELF reloc is section relative for an object
2562 file, and absolute for an executable file or shared library.
2563 The address of a BFD reloc is always section relative. */
2564 if ((abfd->flags & (EXEC_P | DYNAMIC)) == 0)
2565 int_rela.r_offset = ptr->address;
2566 else
2567 int_rela.r_offset = ptr->address + sec->vma;
2569 sym = *ptr->sym_ptr_ptr;
2570 if (sym == last_sym)
2571 n = last_sym_idx;
2572 else
2574 last_sym = sym;
2575 n = _bfd_elf_symbol_from_bfd_symbol (abfd, &sym);
2576 if (n < 0)
2578 *failedp = TRUE;
2579 return;
2581 last_sym_idx = n;
2584 int_rela.r_sym = n;
2585 int_rela.r_addend = ptr->addend;
2586 int_rela.r_ssym = RSS_UNDEF;
2588 if ((*ptr->sym_ptr_ptr)->the_bfd->xvec != abfd->xvec
2589 && ! _bfd_elf_validate_reloc (abfd, ptr))
2591 *failedp = TRUE;
2592 return;
2595 int_rela.r_type = ptr->howto->type;
2596 int_rela.r_type2 = (int) R_MIPS_NONE;
2597 int_rela.r_type3 = (int) R_MIPS_NONE;
2599 for (i = 0; i < 2; i++)
2601 arelent *r;
2603 if (idx + 1 >= sec->reloc_count)
2604 break;
2605 r = sec->orelocation[idx + 1];
2606 if (r->address != ptr->address
2607 || ! bfd_is_abs_section ((*r->sym_ptr_ptr)->section)
2608 || (*r->sym_ptr_ptr)->value != 0)
2609 break;
2611 /* We can merge the reloc at IDX + 1 with the reloc at IDX. */
2613 if (i == 0)
2614 int_rela.r_type2 = r->howto->type;
2615 else
2616 int_rela.r_type3 = r->howto->type;
2618 ++idx;
2621 mips_elf64_swap_reloca_out (abfd, &int_rela, ext_rela);
2624 BFD_ASSERT (ext_rela - (Elf64_Mips_External_Rela *) rela_hdr->contents
2625 == *count);
2628 /* Set the right machine number for a MIPS ELF file. */
2630 static bfd_boolean
2631 mips_elf64_object_p (abfd)
2632 bfd *abfd;
2634 unsigned long mach;
2636 /* Irix 6 is broken. Object file symbol tables are not always
2637 sorted correctly such that local symbols precede global symbols,
2638 and the sh_info field in the symbol table is not always right. */
2639 if (elf64_mips_irix_compat (abfd) != ict_none)
2640 elf_bad_symtab (abfd) = TRUE;
2642 mach = _bfd_elf_mips_mach (elf_elfheader (abfd)->e_flags);
2643 bfd_default_set_arch_mach (abfd, bfd_arch_mips, mach);
2644 return TRUE;
2647 /* Depending on the target vector we generate some version of Irix
2648 executables or "normal" MIPS ELF ABI executables. */
2649 static irix_compat_t
2650 elf64_mips_irix_compat (abfd)
2651 bfd *abfd;
2653 if ((abfd->xvec == &bfd_elf64_bigmips_vec)
2654 || (abfd->xvec == &bfd_elf64_littlemips_vec))
2655 return ict_irix6;
2656 else
2657 return ict_none;
2660 /* Support for core dump NOTE sections. */
2661 static bfd_boolean
2662 elf64_mips_grok_prstatus (abfd, note)
2663 bfd *abfd;
2664 Elf_Internal_Note *note;
2666 int offset;
2667 unsigned int raw_size;
2669 switch (note->descsz)
2671 default:
2672 return FALSE;
2674 case 480: /* Linux/MIPS - N64 kernel */
2675 /* pr_cursig */
2676 elf_tdata (abfd)->core_signal = bfd_get_16 (abfd, note->descdata + 12);
2678 /* pr_pid */
2679 elf_tdata (abfd)->core_pid = bfd_get_32 (abfd, note->descdata + 32);
2681 /* pr_reg */
2682 offset = 112;
2683 raw_size = 360;
2685 break;
2688 /* Make a ".reg/999" section. */
2689 return _bfd_elfcore_make_pseudosection (abfd, ".reg",
2690 raw_size, note->descpos + offset);
2693 static bfd_boolean
2694 elf64_mips_grok_psinfo (abfd, note)
2695 bfd *abfd;
2696 Elf_Internal_Note *note;
2698 switch (note->descsz)
2700 default:
2701 return FALSE;
2703 case 136: /* Linux/MIPS - N64 kernel elf_prpsinfo */
2704 elf_tdata (abfd)->core_program
2705 = _bfd_elfcore_strndup (abfd, note->descdata + 40, 16);
2706 elf_tdata (abfd)->core_command
2707 = _bfd_elfcore_strndup (abfd, note->descdata + 56, 80);
2710 /* Note that for some reason, a spurious space is tacked
2711 onto the end of the args in some (at least one anyway)
2712 implementations, so strip it off if it exists. */
2715 char *command = elf_tdata (abfd)->core_command;
2716 int n = strlen (command);
2718 if (0 < n && command[n - 1] == ' ')
2719 command[n - 1] = '\0';
2722 return TRUE;
2725 /* ECOFF swapping routines. These are used when dealing with the
2726 .mdebug section, which is in the ECOFF debugging format. */
2727 static const struct ecoff_debug_swap mips_elf64_ecoff_debug_swap =
2729 /* Symbol table magic number. */
2730 magicSym2,
2731 /* Alignment of debugging information. E.g., 4. */
2733 /* Sizes of external symbolic information. */
2734 sizeof (struct hdr_ext),
2735 sizeof (struct dnr_ext),
2736 sizeof (struct pdr_ext),
2737 sizeof (struct sym_ext),
2738 sizeof (struct opt_ext),
2739 sizeof (struct fdr_ext),
2740 sizeof (struct rfd_ext),
2741 sizeof (struct ext_ext),
2742 /* Functions to swap in external symbolic data. */
2743 ecoff_swap_hdr_in,
2744 ecoff_swap_dnr_in,
2745 ecoff_swap_pdr_in,
2746 ecoff_swap_sym_in,
2747 ecoff_swap_opt_in,
2748 ecoff_swap_fdr_in,
2749 ecoff_swap_rfd_in,
2750 ecoff_swap_ext_in,
2751 _bfd_ecoff_swap_tir_in,
2752 _bfd_ecoff_swap_rndx_in,
2753 /* Functions to swap out external symbolic data. */
2754 ecoff_swap_hdr_out,
2755 ecoff_swap_dnr_out,
2756 ecoff_swap_pdr_out,
2757 ecoff_swap_sym_out,
2758 ecoff_swap_opt_out,
2759 ecoff_swap_fdr_out,
2760 ecoff_swap_rfd_out,
2761 ecoff_swap_ext_out,
2762 _bfd_ecoff_swap_tir_out,
2763 _bfd_ecoff_swap_rndx_out,
2764 /* Function to read in symbolic data. */
2765 _bfd_mips_elf_read_ecoff_info
2768 /* Relocations in the 64 bit MIPS ELF ABI are more complex than in
2769 standard ELF. This structure is used to redirect the relocation
2770 handling routines. */
2772 const struct elf_size_info mips_elf64_size_info =
2774 sizeof (Elf64_External_Ehdr),
2775 sizeof (Elf64_External_Phdr),
2776 sizeof (Elf64_External_Shdr),
2777 sizeof (Elf64_Mips_External_Rel),
2778 sizeof (Elf64_Mips_External_Rela),
2779 sizeof (Elf64_External_Sym),
2780 sizeof (Elf64_External_Dyn),
2781 sizeof (Elf_External_Note),
2782 4, /* hash-table entry size */
2783 3, /* internal relocations per external relocations */
2784 64, /* arch_size */
2785 8, /* file_align */
2786 ELFCLASS64,
2787 EV_CURRENT,
2788 bfd_elf64_write_out_phdrs,
2789 bfd_elf64_write_shdrs_and_ehdr,
2790 mips_elf64_write_relocs,
2791 bfd_elf64_swap_symbol_in,
2792 bfd_elf64_swap_symbol_out,
2793 mips_elf64_slurp_reloc_table,
2794 bfd_elf64_slurp_symbol_table,
2795 bfd_elf64_swap_dyn_in,
2796 bfd_elf64_swap_dyn_out,
2797 mips_elf64_be_swap_reloc_in,
2798 mips_elf64_be_swap_reloc_out,
2799 mips_elf64_be_swap_reloca_in,
2800 mips_elf64_be_swap_reloca_out
2803 #define ELF_ARCH bfd_arch_mips
2804 #define ELF_MACHINE_CODE EM_MIPS
2806 /* The SVR4 MIPS ABI says that this should be 0x10000, but Irix 5 uses
2807 a value of 0x1000, and we are compatible.
2808 FIXME: How does this affect NewABI? */
2809 #define ELF_MAXPAGESIZE 0x1000
2811 #define elf_backend_collect TRUE
2812 #define elf_backend_type_change_ok TRUE
2813 #define elf_backend_can_gc_sections TRUE
2814 #define elf_info_to_howto mips_elf64_info_to_howto_rela
2815 #define elf_info_to_howto_rel mips_elf64_info_to_howto_rel
2816 #define elf_backend_object_p mips_elf64_object_p
2817 #define elf_backend_symbol_processing _bfd_mips_elf_symbol_processing
2818 #define elf_backend_section_processing _bfd_mips_elf_section_processing
2819 #define elf_backend_section_from_shdr _bfd_mips_elf_section_from_shdr
2820 #define elf_backend_fake_sections _bfd_mips_elf_fake_sections
2821 #define elf_backend_section_from_bfd_section \
2822 _bfd_mips_elf_section_from_bfd_section
2823 #define elf_backend_add_symbol_hook _bfd_mips_elf_add_symbol_hook
2824 #define elf_backend_link_output_symbol_hook \
2825 _bfd_mips_elf_link_output_symbol_hook
2826 #define elf_backend_create_dynamic_sections \
2827 _bfd_mips_elf_create_dynamic_sections
2828 #define elf_backend_check_relocs _bfd_mips_elf_check_relocs
2829 #define elf_backend_adjust_dynamic_symbol \
2830 _bfd_mips_elf_adjust_dynamic_symbol
2831 #define elf_backend_always_size_sections \
2832 _bfd_mips_elf_always_size_sections
2833 #define elf_backend_size_dynamic_sections \
2834 _bfd_mips_elf_size_dynamic_sections
2835 #define elf_backend_relocate_section _bfd_mips_elf_relocate_section
2836 #define elf_backend_finish_dynamic_symbol \
2837 _bfd_mips_elf_finish_dynamic_symbol
2838 #define elf_backend_finish_dynamic_sections \
2839 _bfd_mips_elf_finish_dynamic_sections
2840 #define elf_backend_final_write_processing \
2841 _bfd_mips_elf_final_write_processing
2842 #define elf_backend_additional_program_headers \
2843 _bfd_mips_elf_additional_program_headers
2844 #define elf_backend_modify_segment_map _bfd_mips_elf_modify_segment_map
2845 #define elf_backend_gc_mark_hook _bfd_mips_elf_gc_mark_hook
2846 #define elf_backend_gc_sweep_hook _bfd_mips_elf_gc_sweep_hook
2847 #define elf_backend_hide_symbol _bfd_mips_elf_hide_symbol
2848 #define elf_backend_ignore_discarded_relocs \
2849 _bfd_mips_elf_ignore_discarded_relocs
2850 #define elf_backend_mips_irix_compat elf64_mips_irix_compat
2851 #define elf_backend_mips_rtype_to_howto mips_elf64_rtype_to_howto
2852 #define elf_backend_ecoff_debug_swap &mips_elf64_ecoff_debug_swap
2853 #define elf_backend_size_info mips_elf64_size_info
2855 #define elf_backend_grok_prstatus elf64_mips_grok_prstatus
2856 #define elf_backend_grok_psinfo elf64_mips_grok_psinfo
2858 #define elf_backend_got_header_size (4 * MIPS_RESERVED_GOTNO)
2859 #define elf_backend_plt_header_size 0
2861 /* MIPS ELF64 can use a mixture of REL and RELA, but some Relocations
2862 work better/work only in RELA, so we default to this. */
2863 #define elf_backend_may_use_rel_p 1
2864 #define elf_backend_may_use_rela_p 1
2865 #define elf_backend_default_use_rela_p 1
2867 #define elf_backend_write_section _bfd_mips_elf_write_section
2869 /* We don't set bfd_elf64_bfd_is_local_label_name because the 32-bit
2870 MIPS-specific function only applies to IRIX5, which had no 64-bit
2871 ABI. */
2872 #define bfd_elf64_find_nearest_line _bfd_mips_elf_find_nearest_line
2873 #define bfd_elf64_new_section_hook _bfd_mips_elf_new_section_hook
2874 #define bfd_elf64_set_section_contents _bfd_mips_elf_set_section_contents
2875 #define bfd_elf64_bfd_get_relocated_section_contents \
2876 _bfd_elf_mips_get_relocated_section_contents
2877 #define bfd_elf64_bfd_link_hash_table_create \
2878 _bfd_mips_elf_link_hash_table_create
2879 #define bfd_elf64_bfd_final_link _bfd_mips_elf_final_link
2880 #define bfd_elf64_bfd_merge_private_bfd_data \
2881 _bfd_mips_elf_merge_private_bfd_data
2882 #define bfd_elf64_bfd_set_private_flags _bfd_mips_elf_set_private_flags
2883 #define bfd_elf64_bfd_print_private_bfd_data \
2884 _bfd_mips_elf_print_private_bfd_data
2886 #define bfd_elf64_get_reloc_upper_bound mips_elf64_get_reloc_upper_bound
2887 #define bfd_elf64_canonicalize_reloc mips_elf64_canonicalize_reloc
2888 #define bfd_elf64_get_dynamic_reloc_upper_bound mips_elf64_get_dynamic_reloc_upper_bound
2889 #define bfd_elf64_canonicalize_dynamic_reloc mips_elf64_canonicalize_dynamic_reloc
2890 #define bfd_elf64_bfd_relax_section _bfd_mips_relax_section
2892 /* MIPS ELF64 archive functions. */
2893 #define bfd_elf64_archive_functions
2894 extern bfd_boolean bfd_elf64_archive_slurp_armap
2895 PARAMS ((bfd *));
2896 extern bfd_boolean bfd_elf64_archive_write_armap
2897 PARAMS ((bfd *, unsigned int, struct orl *, unsigned int, int));
2898 #define bfd_elf64_archive_slurp_extended_name_table \
2899 _bfd_archive_coff_slurp_extended_name_table
2900 #define bfd_elf64_archive_construct_extended_name_table \
2901 _bfd_archive_coff_construct_extended_name_table
2902 #define bfd_elf64_archive_truncate_arname \
2903 _bfd_archive_coff_truncate_arname
2904 #define bfd_elf64_archive_read_ar_hdr _bfd_archive_coff_read_ar_hdr
2905 #define bfd_elf64_archive_openr_next_archived_file \
2906 _bfd_archive_coff_openr_next_archived_file
2907 #define bfd_elf64_archive_get_elt_at_index \
2908 _bfd_archive_coff_get_elt_at_index
2909 #define bfd_elf64_archive_generic_stat_arch_elt \
2910 _bfd_archive_coff_generic_stat_arch_elt
2911 #define bfd_elf64_archive_update_armap_timestamp \
2912 _bfd_archive_coff_update_armap_timestamp
2914 /* The SGI style (n)64 NewABI. */
2915 #define TARGET_LITTLE_SYM bfd_elf64_littlemips_vec
2916 #define TARGET_LITTLE_NAME "elf64-littlemips"
2917 #define TARGET_BIG_SYM bfd_elf64_bigmips_vec
2918 #define TARGET_BIG_NAME "elf64-bigmips"
2920 #include "elf64-target.h"
2922 #define INCLUDED_TARGET_FILE /* More a type of flag. */
2924 /* The SYSV-style 'traditional' (n)64 NewABI. */
2925 #undef TARGET_LITTLE_SYM
2926 #undef TARGET_LITTLE_NAME
2927 #undef TARGET_BIG_SYM
2928 #undef TARGET_BIG_NAME
2930 #define TARGET_LITTLE_SYM bfd_elf64_tradlittlemips_vec
2931 #define TARGET_LITTLE_NAME "elf64-tradlittlemips"
2932 #define TARGET_BIG_SYM bfd_elf64_tradbigmips_vec
2933 #define TARGET_BIG_NAME "elf64-tradbigmips"
2935 /* Include the target file again for this target. */
2936 #include "elf64-target.h"