* config/tc-alpha.c (alpha_cur_ent_sym): Remove.
[binutils.git] / bfd / elf64-mips.c
bloba43b3da9f706daf88903e9a3b656a748ddb95422
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 /* 16 bit offset for pc-relative branches. */
1231 static reloc_howto_type elf_mips_gnu_rel16_s2 =
1232 HOWTO (R_MIPS_GNU_REL16_S2, /* type */
1233 2, /* rightshift */
1234 2, /* size (0 = byte, 1 = short, 2 = long) */
1235 16, /* bitsize */
1236 TRUE, /* pc_relative */
1237 0, /* bitpos */
1238 complain_overflow_signed, /* complain_on_overflow */
1239 bfd_elf_generic_reloc, /* special_function */
1240 "R_MIPS_GNU_REL16_S2", /* name */
1241 TRUE, /* partial_inplace */
1242 0x0000ffff, /* src_mask */
1243 0x0000ffff, /* dst_mask */
1244 TRUE); /* pcrel_offset */
1246 /* 16 bit offset for pc-relative branches. */
1247 static reloc_howto_type elf_mips_gnu_rela16_s2 =
1248 HOWTO (R_MIPS_GNU_REL16_S2, /* type */
1249 2, /* rightshift */
1250 2, /* size (0 = byte, 1 = short, 2 = long) */
1251 16, /* bitsize */
1252 TRUE, /* pc_relative */
1253 0, /* bitpos */
1254 complain_overflow_signed, /* complain_on_overflow */
1255 bfd_elf_generic_reloc, /* special_function */
1256 "R_MIPS_GNU_REL16_S2", /* name */
1257 FALSE, /* partial_inplace */
1258 0, /* src_mask */
1259 0x0000ffff, /* dst_mask */
1260 TRUE); /* pcrel_offset */
1262 /* Swap in a MIPS 64-bit Rel reloc. */
1264 static void
1265 mips_elf64_swap_reloc_in (abfd, src, dst)
1266 bfd *abfd;
1267 const Elf64_Mips_External_Rel *src;
1268 Elf64_Mips_Internal_Rela *dst;
1270 dst->r_offset = H_GET_64 (abfd, src->r_offset);
1271 dst->r_sym = H_GET_32 (abfd, src->r_sym);
1272 dst->r_ssym = H_GET_8 (abfd, src->r_ssym);
1273 dst->r_type3 = H_GET_8 (abfd, src->r_type3);
1274 dst->r_type2 = H_GET_8 (abfd, src->r_type2);
1275 dst->r_type = H_GET_8 (abfd, src->r_type);
1276 dst->r_addend = 0;
1279 /* Swap in a MIPS 64-bit Rela reloc. */
1281 static void
1282 mips_elf64_swap_reloca_in (abfd, src, dst)
1283 bfd *abfd;
1284 const Elf64_Mips_External_Rela *src;
1285 Elf64_Mips_Internal_Rela *dst;
1287 dst->r_offset = H_GET_64 (abfd, src->r_offset);
1288 dst->r_sym = H_GET_32 (abfd, src->r_sym);
1289 dst->r_ssym = H_GET_8 (abfd, src->r_ssym);
1290 dst->r_type3 = H_GET_8 (abfd, src->r_type3);
1291 dst->r_type2 = H_GET_8 (abfd, src->r_type2);
1292 dst->r_type = H_GET_8 (abfd, src->r_type);
1293 dst->r_addend = H_GET_S64 (abfd, src->r_addend);
1296 /* Swap out a MIPS 64-bit Rel reloc. */
1298 static void
1299 mips_elf64_swap_reloc_out (abfd, src, dst)
1300 bfd *abfd;
1301 const Elf64_Mips_Internal_Rela *src;
1302 Elf64_Mips_External_Rel *dst;
1304 H_PUT_64 (abfd, src->r_offset, dst->r_offset);
1305 H_PUT_32 (abfd, src->r_sym, dst->r_sym);
1306 H_PUT_8 (abfd, src->r_ssym, dst->r_ssym);
1307 H_PUT_8 (abfd, src->r_type3, dst->r_type3);
1308 H_PUT_8 (abfd, src->r_type2, dst->r_type2);
1309 H_PUT_8 (abfd, src->r_type, dst->r_type);
1312 /* Swap out a MIPS 64-bit Rela reloc. */
1314 static void
1315 mips_elf64_swap_reloca_out (abfd, src, dst)
1316 bfd *abfd;
1317 const Elf64_Mips_Internal_Rela *src;
1318 Elf64_Mips_External_Rela *dst;
1320 H_PUT_64 (abfd, src->r_offset, dst->r_offset);
1321 H_PUT_32 (abfd, src->r_sym, dst->r_sym);
1322 H_PUT_8 (abfd, src->r_ssym, dst->r_ssym);
1323 H_PUT_8 (abfd, src->r_type3, dst->r_type3);
1324 H_PUT_8 (abfd, src->r_type2, dst->r_type2);
1325 H_PUT_8 (abfd, src->r_type, dst->r_type);
1326 H_PUT_S64 (abfd, src->r_addend, dst->r_addend);
1329 /* Swap in a MIPS 64-bit Rel reloc. */
1331 static void
1332 mips_elf64_be_swap_reloc_in (abfd, src, dst)
1333 bfd *abfd;
1334 const bfd_byte *src;
1335 Elf_Internal_Rela *dst;
1337 Elf64_Mips_Internal_Rela mirel;
1339 mips_elf64_swap_reloc_in (abfd,
1340 (const Elf64_Mips_External_Rel *) src,
1341 &mirel);
1343 dst[0].r_offset = mirel.r_offset;
1344 dst[0].r_info = ELF64_R_INFO (mirel.r_sym, mirel.r_type);
1345 dst[0].r_addend = 0;
1346 dst[1].r_offset = mirel.r_offset;
1347 dst[1].r_info = ELF64_R_INFO (mirel.r_ssym, mirel.r_type2);
1348 dst[1].r_addend = 0;
1349 dst[2].r_offset = mirel.r_offset;
1350 dst[2].r_info = ELF64_R_INFO (STN_UNDEF, mirel.r_type3);
1351 dst[2].r_addend = 0;
1354 /* Swap in a MIPS 64-bit Rela reloc. */
1356 static void
1357 mips_elf64_be_swap_reloca_in (abfd, src, dst)
1358 bfd *abfd;
1359 const bfd_byte *src;
1360 Elf_Internal_Rela *dst;
1362 Elf64_Mips_Internal_Rela mirela;
1364 mips_elf64_swap_reloca_in (abfd,
1365 (const Elf64_Mips_External_Rela *) src,
1366 &mirela);
1368 dst[0].r_offset = mirela.r_offset;
1369 dst[0].r_info = ELF64_R_INFO (mirela.r_sym, mirela.r_type);
1370 dst[0].r_addend = mirela.r_addend;
1371 dst[1].r_offset = mirela.r_offset;
1372 dst[1].r_info = ELF64_R_INFO (mirela.r_ssym, mirela.r_type2);
1373 dst[1].r_addend = 0;
1374 dst[2].r_offset = mirela.r_offset;
1375 dst[2].r_info = ELF64_R_INFO (STN_UNDEF, mirela.r_type3);
1376 dst[2].r_addend = 0;
1379 /* Swap out a MIPS 64-bit Rel reloc. */
1381 static void
1382 mips_elf64_be_swap_reloc_out (abfd, src, dst)
1383 bfd *abfd;
1384 const Elf_Internal_Rela *src;
1385 bfd_byte *dst;
1387 Elf64_Mips_Internal_Rela mirel;
1389 mirel.r_offset = src[0].r_offset;
1390 BFD_ASSERT(src[0].r_offset == src[1].r_offset);
1391 #if 0
1392 BFD_ASSERT(src[0].r_offset == src[2].r_offset);
1393 #endif
1395 mirel.r_type = ELF64_MIPS_R_TYPE (src[0].r_info);
1396 mirel.r_sym = ELF64_R_SYM (src[0].r_info);
1397 mirel.r_type2 = ELF64_MIPS_R_TYPE (src[1].r_info);
1398 mirel.r_ssym = ELF64_MIPS_R_SSYM (src[1].r_info);
1399 mirel.r_type3 = ELF64_MIPS_R_TYPE (src[2].r_info);
1401 mips_elf64_swap_reloc_out (abfd, &mirel,
1402 (Elf64_Mips_External_Rel *) dst);
1405 /* Swap out a MIPS 64-bit Rela reloc. */
1407 static void
1408 mips_elf64_be_swap_reloca_out (abfd, src, dst)
1409 bfd *abfd;
1410 const Elf_Internal_Rela *src;
1411 bfd_byte *dst;
1413 Elf64_Mips_Internal_Rela mirela;
1415 mirela.r_offset = src[0].r_offset;
1416 BFD_ASSERT(src[0].r_offset == src[1].r_offset);
1417 BFD_ASSERT(src[0].r_offset == src[2].r_offset);
1419 mirela.r_type = ELF64_MIPS_R_TYPE (src[0].r_info);
1420 mirela.r_sym = ELF64_R_SYM (src[0].r_info);
1421 mirela.r_addend = src[0].r_addend;
1422 BFD_ASSERT(src[1].r_addend == 0);
1423 BFD_ASSERT(src[2].r_addend == 0);
1425 mirela.r_type2 = ELF64_MIPS_R_TYPE (src[1].r_info);
1426 mirela.r_ssym = ELF64_MIPS_R_SSYM (src[1].r_info);
1427 mirela.r_type3 = ELF64_MIPS_R_TYPE (src[2].r_info);
1429 mips_elf64_swap_reloca_out (abfd, &mirela,
1430 (Elf64_Mips_External_Rela *) dst);
1433 /* Do a R_MIPS_HI16 relocation. */
1435 static bfd_reloc_status_type
1436 mips_elf64_hi16_reloc (abfd, reloc_entry, symbol, data, input_section,
1437 output_bfd, error_message)
1438 bfd *abfd ATTRIBUTE_UNUSED;
1439 arelent *reloc_entry;
1440 asymbol *symbol;
1441 PTR data ATTRIBUTE_UNUSED;
1442 asection *input_section;
1443 bfd *output_bfd;
1444 char **error_message ATTRIBUTE_UNUSED;
1446 /* If we're relocating, and this is an external symbol, we don't
1447 want to change anything. */
1448 if (output_bfd != (bfd *) NULL
1449 && (symbol->flags & BSF_SECTION_SYM) == 0
1450 && (! reloc_entry->howto->partial_inplace
1451 || reloc_entry->addend == 0))
1453 reloc_entry->address += input_section->output_offset;
1454 return bfd_reloc_ok;
1457 if (((reloc_entry->addend & 0xffff) + 0x8000) & ~0xffff)
1458 reloc_entry->addend += 0x8000;
1460 return bfd_reloc_continue;
1463 /* Do a R_MIPS_GOT16 reloc. This is a reloc against the global offset
1464 table used for PIC code. If the symbol is an external symbol, the
1465 instruction is modified to contain the offset of the appropriate
1466 entry in the global offset table. If the symbol is a section
1467 symbol, the next reloc is a R_MIPS_LO16 reloc. The two 16 bit
1468 addends are combined to form the real addend against the section
1469 symbol; the GOT16 is modified to contain the offset of an entry in
1470 the global offset table, and the LO16 is modified to offset it
1471 appropriately. Thus an offset larger than 16 bits requires a
1472 modified value in the global offset table.
1474 This implementation suffices for the assembler, but the linker does
1475 not yet know how to create global offset tables. */
1477 static bfd_reloc_status_type
1478 mips_elf64_got16_reloc (abfd, reloc_entry, symbol, data, input_section,
1479 output_bfd, error_message)
1480 bfd *abfd;
1481 arelent *reloc_entry;
1482 asymbol *symbol;
1483 PTR data;
1484 asection *input_section;
1485 bfd *output_bfd;
1486 char **error_message;
1488 /* If we're relocating, and this is a local symbol, we can handle it
1489 just like an R_MIPS_HI16. */
1490 if (output_bfd != (bfd *) NULL
1491 && (symbol->flags & BSF_SECTION_SYM) != 0)
1492 return mips_elf64_hi16_reloc (abfd, reloc_entry, symbol, data,
1493 input_section, output_bfd, error_message);
1496 /* Otherwise we try to handle it as R_MIPS_GOT_DISP. */
1497 return bfd_elf_generic_reloc (abfd, reloc_entry, symbol, data,
1498 input_section, output_bfd, error_message);
1501 /* Set the GP value for OUTPUT_BFD. Returns FALSE if this is a
1502 dangerous relocation. */
1504 static bfd_boolean
1505 mips_elf64_assign_gp (output_bfd, pgp)
1506 bfd *output_bfd;
1507 bfd_vma *pgp;
1509 unsigned int count;
1510 asymbol **sym;
1511 unsigned int i;
1513 /* If we've already figured out what GP will be, just return it. */
1514 *pgp = _bfd_get_gp_value (output_bfd);
1515 if (*pgp)
1516 return TRUE;
1518 count = bfd_get_symcount (output_bfd);
1519 sym = bfd_get_outsymbols (output_bfd);
1521 /* The linker script will have created a symbol named `_gp' with the
1522 appropriate value. */
1523 if (sym == (asymbol **) NULL)
1524 i = count;
1525 else
1527 for (i = 0; i < count; i++, sym++)
1529 register const char *name;
1531 name = bfd_asymbol_name (*sym);
1532 if (*name == '_' && strcmp (name, "_gp") == 0)
1534 *pgp = bfd_asymbol_value (*sym);
1535 _bfd_set_gp_value (output_bfd, *pgp);
1536 break;
1541 if (i >= count)
1543 /* Only get the error once. */
1544 *pgp = 4;
1545 _bfd_set_gp_value (output_bfd, *pgp);
1546 return FALSE;
1549 return TRUE;
1552 /* We have to figure out the gp value, so that we can adjust the
1553 symbol value correctly. We look up the symbol _gp in the output
1554 BFD. If we can't find it, we're stuck. We cache it in the ELF
1555 target data. We don't need to adjust the symbol value for an
1556 external symbol if we are producing relocateable output. */
1558 static bfd_reloc_status_type
1559 mips_elf64_final_gp (output_bfd, symbol, relocateable, error_message, pgp)
1560 bfd *output_bfd;
1561 asymbol *symbol;
1562 bfd_boolean relocateable;
1563 char **error_message;
1564 bfd_vma *pgp;
1566 if (bfd_is_und_section (symbol->section)
1567 && ! relocateable)
1569 *pgp = 0;
1570 return bfd_reloc_undefined;
1573 *pgp = _bfd_get_gp_value (output_bfd);
1574 if (*pgp == 0
1575 && (! relocateable
1576 || (symbol->flags & BSF_SECTION_SYM) != 0))
1578 if (relocateable)
1580 /* Make up a value. */
1581 *pgp = symbol->section->output_section->vma /*+ 0x4000*/;
1582 _bfd_set_gp_value (output_bfd, *pgp);
1584 else if (!mips_elf64_assign_gp (output_bfd, pgp))
1586 *error_message =
1587 (char *) _("GP relative relocation when _gp not defined");
1588 return bfd_reloc_dangerous;
1592 return bfd_reloc_ok;
1595 /* Do a R_MIPS_GPREL16 relocation. This is a 16 bit value which must
1596 become the offset from the gp register. */
1598 static bfd_reloc_status_type
1599 mips_elf64_gprel16_reloc (abfd, reloc_entry, symbol, data, input_section,
1600 output_bfd, error_message)
1601 bfd *abfd;
1602 arelent *reloc_entry;
1603 asymbol *symbol;
1604 PTR data;
1605 asection *input_section;
1606 bfd *output_bfd;
1607 char **error_message;
1609 bfd_boolean relocateable;
1610 bfd_reloc_status_type ret;
1611 bfd_vma gp;
1613 /* If we're relocating, and this is an external symbol with no
1614 addend, we don't want to change anything. We will only have an
1615 addend if this is a newly created reloc, not read from an ELF
1616 file. */
1617 if (output_bfd != (bfd *) NULL
1618 && (symbol->flags & BSF_SECTION_SYM) == 0
1619 && (! reloc_entry->howto->partial_inplace
1620 || reloc_entry->addend == 0))
1622 reloc_entry->address += input_section->output_offset;
1623 return bfd_reloc_ok;
1626 if (output_bfd != (bfd *) NULL)
1627 relocateable = TRUE;
1628 else
1630 relocateable = FALSE;
1631 output_bfd = symbol->section->output_section->owner;
1634 ret = mips_elf64_final_gp (output_bfd, symbol, relocateable, error_message,
1635 &gp);
1636 if (ret != bfd_reloc_ok)
1637 return ret;
1639 return _bfd_mips_elf_gprel16_with_gp (abfd, symbol, reloc_entry,
1640 input_section, relocateable,
1641 data, gp);
1644 /* Do a R_MIPS_LITERAL relocation. */
1646 static bfd_reloc_status_type
1647 mips_elf64_literal_reloc (abfd, reloc_entry, symbol, data, input_section,
1648 output_bfd, error_message)
1649 bfd *abfd;
1650 arelent *reloc_entry;
1651 asymbol *symbol;
1652 PTR data;
1653 asection *input_section;
1654 bfd *output_bfd;
1655 char **error_message;
1657 bfd_boolean relocateable;
1658 bfd_reloc_status_type ret;
1659 bfd_vma gp;
1661 /* If we're relocating, and this is an external symbol, we don't
1662 want to change anything. */
1663 if (output_bfd != (bfd *) NULL
1664 && (symbol->flags & BSF_SECTION_SYM) == 0
1665 && (! reloc_entry->howto->partial_inplace
1666 || reloc_entry->addend == 0))
1668 reloc_entry->address += input_section->output_offset;
1669 return bfd_reloc_ok;
1672 /* FIXME: The entries in the .lit8 and .lit4 sections should be merged. */
1673 if (output_bfd != (bfd *) NULL)
1674 relocateable = TRUE;
1675 else
1677 relocateable = FALSE;
1678 output_bfd = symbol->section->output_section->owner;
1681 ret = mips_elf64_final_gp (output_bfd, symbol, relocateable, error_message,
1682 &gp);
1683 if (ret != bfd_reloc_ok)
1684 return ret;
1686 return _bfd_mips_elf_gprel16_with_gp (abfd, symbol, reloc_entry,
1687 input_section, relocateable,
1688 data, gp);
1691 /* Do a R_MIPS_GPREL32 relocation. This is a 32 bit value which must
1692 become the offset from the gp register. */
1694 static bfd_reloc_status_type
1695 mips_elf64_gprel32_reloc (abfd, reloc_entry, symbol, data, input_section,
1696 output_bfd, error_message)
1697 bfd *abfd;
1698 arelent *reloc_entry;
1699 asymbol *symbol;
1700 PTR data;
1701 asection *input_section;
1702 bfd *output_bfd;
1703 char **error_message;
1705 bfd_boolean relocateable;
1706 bfd_reloc_status_type ret;
1707 bfd_vma gp;
1708 bfd_vma relocation;
1709 unsigned long val;
1711 /* If we're relocating, and this is an external symbol with no
1712 addend, we don't want to change anything. We will only have an
1713 addend if this is a newly created reloc, not read from an ELF
1714 file. */
1715 if (output_bfd != (bfd *) NULL
1716 && (symbol->flags & BSF_SECTION_SYM) == 0
1717 && reloc_entry->addend == 0)
1719 *error_message = (char *)
1720 _("32bits gp relative relocation occurs for an external symbol");
1721 return bfd_reloc_outofrange;
1724 if (output_bfd != (bfd *) NULL)
1726 relocateable = TRUE;
1727 gp = _bfd_get_gp_value (output_bfd);
1729 else
1731 relocateable = FALSE;
1732 output_bfd = symbol->section->output_section->owner;
1734 ret = mips_elf64_final_gp (output_bfd, symbol, relocateable,
1735 error_message, &gp);
1736 if (ret != bfd_reloc_ok)
1737 return ret;
1740 if (bfd_is_com_section (symbol->section))
1741 relocation = 0;
1742 else
1743 relocation = symbol->value;
1745 relocation += symbol->section->output_section->vma;
1746 relocation += symbol->section->output_offset;
1748 if (reloc_entry->address > input_section->_cooked_size)
1749 return bfd_reloc_outofrange;
1751 if (reloc_entry->howto->src_mask == 0)
1753 /* This case arises with the 64-bit MIPS ELF ABI. */
1754 val = 0;
1756 else
1757 val = bfd_get_32 (abfd, (bfd_byte *) data + reloc_entry->address);
1759 /* Set val to the offset into the section or symbol. */
1760 val += reloc_entry->addend;
1762 /* Adjust val for the final section location and GP value. If we
1763 are producing relocateable output, we don't want to do this for
1764 an external symbol. */
1765 if (! relocateable
1766 || (symbol->flags & BSF_SECTION_SYM) != 0)
1767 val += relocation - gp;
1769 bfd_put_32 (abfd, val, (bfd_byte *) data + reloc_entry->address);
1771 if (relocateable)
1772 reloc_entry->address += input_section->output_offset;
1774 return bfd_reloc_ok;
1777 /* Do a R_MIPS_SHIFT6 relocation. The MSB of the shift is stored at bit 2,
1778 the rest is at bits 6-10. The bitpos already got right by the howto. */
1780 static bfd_reloc_status_type
1781 mips_elf64_shift6_reloc (abfd, reloc_entry, symbol, data, input_section,
1782 output_bfd, error_message)
1783 bfd *abfd ATTRIBUTE_UNUSED;
1784 arelent *reloc_entry;
1785 asymbol *symbol;
1786 PTR data ATTRIBUTE_UNUSED;
1787 asection *input_section;
1788 bfd *output_bfd;
1789 char **error_message ATTRIBUTE_UNUSED;
1791 /* If we're relocating, and this is an external symbol, we don't
1792 want to change anything. */
1793 if (output_bfd != (bfd *) NULL
1794 && (symbol->flags & BSF_SECTION_SYM) == 0
1795 && (! reloc_entry->howto->partial_inplace
1796 || reloc_entry->addend == 0))
1798 reloc_entry->address += input_section->output_offset;
1799 return bfd_reloc_ok;
1802 reloc_entry->addend = (reloc_entry->addend & 0x00007c0)
1803 | (reloc_entry->addend & 0x00000800) >> 9;
1805 return bfd_reloc_continue;
1808 /* Handle a mips16 jump. */
1810 static bfd_reloc_status_type
1811 mips16_jump_reloc (abfd, reloc_entry, symbol, data, input_section,
1812 output_bfd, error_message)
1813 bfd *abfd ATTRIBUTE_UNUSED;
1814 arelent *reloc_entry;
1815 asymbol *symbol;
1816 PTR data ATTRIBUTE_UNUSED;
1817 asection *input_section;
1818 bfd *output_bfd;
1819 char **error_message ATTRIBUTE_UNUSED;
1821 if (output_bfd != (bfd *) NULL
1822 && (symbol->flags & BSF_SECTION_SYM) == 0
1823 && (! reloc_entry->howto->partial_inplace
1824 || reloc_entry->addend == 0))
1826 reloc_entry->address += input_section->output_offset;
1827 return bfd_reloc_ok;
1830 /* FIXME. */
1832 static bfd_boolean warned;
1834 if (! warned)
1835 (*_bfd_error_handler)
1836 (_("Linking mips16 objects into %s format is not supported"),
1837 bfd_get_target (input_section->output_section->owner));
1838 warned = TRUE;
1841 return bfd_reloc_undefined;
1844 /* Handle a mips16 GP relative reloc. */
1846 static bfd_reloc_status_type
1847 mips16_gprel_reloc (abfd, reloc_entry, symbol, data, input_section,
1848 output_bfd, error_message)
1849 bfd *abfd;
1850 arelent *reloc_entry;
1851 asymbol *symbol;
1852 PTR data;
1853 asection *input_section;
1854 bfd *output_bfd;
1855 char **error_message;
1857 bfd_boolean relocateable;
1858 bfd_reloc_status_type ret;
1859 bfd_vma gp;
1860 unsigned short extend, insn;
1861 unsigned long final;
1863 /* If we're relocating, and this is an external symbol with no
1864 addend, we don't want to change anything. We will only have an
1865 addend if this is a newly created reloc, not read from an ELF
1866 file. */
1867 if (output_bfd != NULL
1868 && (symbol->flags & BSF_SECTION_SYM) == 0
1869 && reloc_entry->addend == 0)
1871 reloc_entry->address += input_section->output_offset;
1872 return bfd_reloc_ok;
1875 if (output_bfd != NULL)
1876 relocateable = TRUE;
1877 else
1879 relocateable = FALSE;
1880 output_bfd = symbol->section->output_section->owner;
1883 ret = mips_elf64_final_gp (output_bfd, symbol, relocateable, error_message,
1884 &gp);
1885 if (ret != bfd_reloc_ok)
1886 return ret;
1888 if (reloc_entry->address > input_section->_cooked_size)
1889 return bfd_reloc_outofrange;
1891 /* Pick up the mips16 extend instruction and the real instruction. */
1892 extend = bfd_get_16 (abfd, (bfd_byte *) data + reloc_entry->address);
1893 insn = bfd_get_16 (abfd, (bfd_byte *) data + reloc_entry->address + 2);
1895 /* Stuff the current addend back as a 32 bit value, do the usual
1896 relocation, and then clean up. */
1897 bfd_put_32 (abfd,
1898 (bfd_vma) (((extend & 0x1f) << 11)
1899 | (extend & 0x7e0)
1900 | (insn & 0x1f)),
1901 (bfd_byte *) data + reloc_entry->address);
1903 ret = _bfd_mips_elf_gprel16_with_gp (abfd, symbol, reloc_entry,
1904 input_section, relocateable, data, gp);
1906 final = bfd_get_32 (abfd, (bfd_byte *) data + reloc_entry->address);
1907 bfd_put_16 (abfd,
1908 (bfd_vma) ((extend & 0xf800)
1909 | ((final >> 11) & 0x1f)
1910 | (final & 0x7e0)),
1911 (bfd_byte *) data + reloc_entry->address);
1912 bfd_put_16 (abfd,
1913 (bfd_vma) ((insn & 0xffe0)
1914 | (final & 0x1f)),
1915 (bfd_byte *) data + reloc_entry->address + 2);
1917 return ret;
1920 /* A mapping from BFD reloc types to MIPS ELF reloc types. */
1922 struct elf_reloc_map {
1923 bfd_reloc_code_real_type bfd_val;
1924 enum elf_mips_reloc_type elf_val;
1927 static const struct elf_reloc_map mips_reloc_map[] =
1929 { BFD_RELOC_NONE, R_MIPS_NONE },
1930 { BFD_RELOC_16, R_MIPS_16 },
1931 { BFD_RELOC_32, R_MIPS_32 },
1932 /* There is no BFD reloc for R_MIPS_REL32. */
1933 { BFD_RELOC_64, R_MIPS_64 },
1934 { BFD_RELOC_CTOR, R_MIPS_64 },
1935 { BFD_RELOC_16_PCREL, R_MIPS_PC16 },
1936 { BFD_RELOC_HI16_S, R_MIPS_HI16 },
1937 { BFD_RELOC_LO16, R_MIPS_LO16 },
1938 { BFD_RELOC_GPREL16, R_MIPS_GPREL16 },
1939 { BFD_RELOC_GPREL32, R_MIPS_GPREL32 },
1940 { BFD_RELOC_MIPS_JMP, R_MIPS_26 },
1941 { BFD_RELOC_MIPS_LITERAL, R_MIPS_LITERAL },
1942 { BFD_RELOC_MIPS_GOT16, R_MIPS_GOT16 },
1943 { BFD_RELOC_MIPS_CALL16, R_MIPS_CALL16 },
1944 { BFD_RELOC_MIPS_SHIFT5, R_MIPS_SHIFT5 },
1945 { BFD_RELOC_MIPS_SHIFT6, R_MIPS_SHIFT6 },
1946 { BFD_RELOC_MIPS_GOT_DISP, R_MIPS_GOT_DISP },
1947 { BFD_RELOC_MIPS_GOT_PAGE, R_MIPS_GOT_PAGE },
1948 { BFD_RELOC_MIPS_GOT_OFST, R_MIPS_GOT_OFST },
1949 { BFD_RELOC_MIPS_GOT_HI16, R_MIPS_GOT_HI16 },
1950 { BFD_RELOC_MIPS_GOT_LO16, R_MIPS_GOT_LO16 },
1951 { BFD_RELOC_MIPS_SUB, R_MIPS_SUB },
1952 { BFD_RELOC_MIPS_INSERT_A, R_MIPS_INSERT_A },
1953 { BFD_RELOC_MIPS_INSERT_B, R_MIPS_INSERT_B },
1954 { BFD_RELOC_MIPS_DELETE, R_MIPS_DELETE },
1955 { BFD_RELOC_MIPS_HIGHEST, R_MIPS_HIGHEST },
1956 { BFD_RELOC_MIPS_HIGHER, R_MIPS_HIGHER },
1957 { BFD_RELOC_MIPS_CALL_HI16, R_MIPS_CALL_HI16 },
1958 { BFD_RELOC_MIPS_CALL_LO16, R_MIPS_CALL_LO16 },
1959 { BFD_RELOC_MIPS_SCN_DISP, R_MIPS_SCN_DISP },
1960 { BFD_RELOC_MIPS_REL16, R_MIPS_REL16 },
1961 /* Use of R_MIPS_ADD_IMMEDIATE and R_MIPS_PJUMP is deprecated. */
1962 { BFD_RELOC_MIPS_RELGOT, R_MIPS_RELGOT },
1963 { BFD_RELOC_MIPS_JALR, R_MIPS_JALR }
1966 /* Given a BFD reloc type, return a howto structure. */
1968 static reloc_howto_type *
1969 bfd_elf64_bfd_reloc_type_lookup (abfd, code)
1970 bfd *abfd ATTRIBUTE_UNUSED;
1971 bfd_reloc_code_real_type code;
1973 unsigned int i;
1974 /* FIXME: We default to RELA here instead of choosing the right
1975 relocation variant. */
1976 reloc_howto_type *howto_table = mips_elf64_howto_table_rela;
1978 for (i = 0; i < sizeof (mips_reloc_map) / sizeof (struct elf_reloc_map);
1979 i++)
1981 if (mips_reloc_map[i].bfd_val == code)
1982 return &howto_table[(int) mips_reloc_map[i].elf_val];
1985 switch (code)
1987 case BFD_RELOC_MIPS16_JMP:
1988 return &elf_mips16_jump_howto;
1989 case BFD_RELOC_MIPS16_GPREL:
1990 return &elf_mips16_gprel_howto;
1991 case BFD_RELOC_VTABLE_INHERIT:
1992 return &elf_mips_gnu_vtinherit_howto;
1993 case BFD_RELOC_VTABLE_ENTRY:
1994 return &elf_mips_gnu_vtentry_howto;
1995 case BFD_RELOC_16_PCREL_S2:
1996 return &elf_mips_gnu_rela16_s2;
1997 default:
1998 bfd_set_error (bfd_error_bad_value);
1999 return NULL;
2003 /* Given a MIPS Elf_Internal_Rel, fill in an arelent structure. */
2005 static reloc_howto_type *
2006 mips_elf64_rtype_to_howto (r_type, rela_p)
2007 unsigned int r_type;
2008 bfd_boolean rela_p;
2010 switch (r_type)
2012 case R_MIPS16_26:
2013 return &elf_mips16_jump_howto;
2014 case R_MIPS16_GPREL:
2015 return &elf_mips16_gprel_howto;
2016 case R_MIPS_GNU_VTINHERIT:
2017 return &elf_mips_gnu_vtinherit_howto;
2018 case R_MIPS_GNU_VTENTRY:
2019 return &elf_mips_gnu_vtentry_howto;
2020 case R_MIPS_GNU_REL16_S2:
2021 if (rela_p)
2022 return &elf_mips_gnu_rela16_s2;
2023 else
2024 return &elf_mips_gnu_rel16_s2;
2025 default:
2026 BFD_ASSERT (r_type < (unsigned int) R_MIPS_max);
2027 if (rela_p)
2028 return &mips_elf64_howto_table_rela[r_type];
2029 else
2030 return &mips_elf64_howto_table_rel[r_type];
2031 break;
2035 /* Prevent relocation handling by bfd for MIPS ELF64. */
2037 static void
2038 mips_elf64_info_to_howto_rel (abfd, cache_ptr, dst)
2039 bfd *abfd ATTRIBUTE_UNUSED;
2040 arelent *cache_ptr ATTRIBUTE_UNUSED;
2041 Elf_Internal_Rela *dst ATTRIBUTE_UNUSED;
2043 BFD_ASSERT (0);
2046 static void
2047 mips_elf64_info_to_howto_rela (abfd, cache_ptr, dst)
2048 bfd *abfd ATTRIBUTE_UNUSED;
2049 arelent *cache_ptr ATTRIBUTE_UNUSED;
2050 Elf_Internal_Rela *dst ATTRIBUTE_UNUSED;
2052 BFD_ASSERT (0);
2055 /* Since each entry in an SHT_REL or SHT_RELA section can represent up
2056 to three relocs, we must tell the user to allocate more space. */
2058 static long
2059 mips_elf64_get_reloc_upper_bound (abfd, sec)
2060 bfd *abfd ATTRIBUTE_UNUSED;
2061 asection *sec;
2063 return (sec->reloc_count * 3 + 1) * sizeof (arelent *);
2066 static long
2067 mips_elf64_get_dynamic_reloc_upper_bound (abfd)
2068 bfd *abfd;
2070 return _bfd_elf_get_dynamic_reloc_upper_bound (abfd) * 3;
2073 /* We must also copy more relocations than the corresponding functions
2074 in elf.c would, so the two following functions are slightly
2075 modified from elf.c, that multiply the external relocation count by
2076 3 to obtain the internal relocation count. */
2078 static long
2079 mips_elf64_canonicalize_reloc (abfd, section, relptr, symbols)
2080 bfd *abfd;
2081 sec_ptr section;
2082 arelent **relptr;
2083 asymbol **symbols;
2085 arelent *tblptr;
2086 unsigned int i;
2087 struct elf_backend_data *bed = get_elf_backend_data (abfd);
2089 if (! bed->s->slurp_reloc_table (abfd, section, symbols, FALSE))
2090 return -1;
2092 tblptr = section->relocation;
2093 for (i = 0; i < section->reloc_count * 3; i++)
2094 *relptr++ = tblptr++;
2096 *relptr = NULL;
2098 return section->reloc_count * 3;
2101 static long
2102 mips_elf64_canonicalize_dynamic_reloc (abfd, storage, syms)
2103 bfd *abfd;
2104 arelent **storage;
2105 asymbol **syms;
2107 bfd_boolean (*slurp_relocs)
2108 PARAMS ((bfd *, asection *, asymbol **, bfd_boolean));
2109 asection *s;
2110 long ret;
2112 if (elf_dynsymtab (abfd) == 0)
2114 bfd_set_error (bfd_error_invalid_operation);
2115 return -1;
2118 slurp_relocs = get_elf_backend_data (abfd)->s->slurp_reloc_table;
2119 ret = 0;
2120 for (s = abfd->sections; s != NULL; s = s->next)
2122 if (elf_section_data (s)->this_hdr.sh_link == elf_dynsymtab (abfd)
2123 && (elf_section_data (s)->this_hdr.sh_type == SHT_REL
2124 || elf_section_data (s)->this_hdr.sh_type == SHT_RELA))
2126 arelent *p;
2127 long count, i;
2129 if (! (*slurp_relocs) (abfd, s, syms, TRUE))
2130 return -1;
2131 count = s->_raw_size / elf_section_data (s)->this_hdr.sh_entsize * 3;
2132 p = s->relocation;
2133 for (i = 0; i < count; i++)
2134 *storage++ = p++;
2135 ret += count;
2139 *storage = NULL;
2141 return ret;
2144 /* Read the relocations from one reloc section. This is mostly copied
2145 from elfcode.h, except for the changes to expand one external
2146 relocation to 3 internal ones. We must unfortunately set
2147 reloc_count to the number of external relocations, because a lot of
2148 generic code seems to depend on this. */
2150 static bfd_boolean
2151 mips_elf64_slurp_one_reloc_table (abfd, asect, rel_hdr, reloc_count,
2152 relents, symbols, dynamic)
2153 bfd *abfd;
2154 asection *asect;
2155 Elf_Internal_Shdr *rel_hdr;
2156 bfd_size_type reloc_count;
2157 arelent *relents;
2158 asymbol **symbols;
2159 bfd_boolean dynamic;
2161 PTR allocated = NULL;
2162 bfd_byte *native_relocs;
2163 arelent *relent;
2164 bfd_vma i;
2165 int entsize;
2166 reloc_howto_type *howto_table;
2168 allocated = (PTR) bfd_malloc (rel_hdr->sh_size);
2169 if (allocated == NULL)
2170 return FALSE;
2172 if (bfd_seek (abfd, rel_hdr->sh_offset, SEEK_SET) != 0
2173 || (bfd_bread (allocated, rel_hdr->sh_size, abfd)
2174 != rel_hdr->sh_size))
2175 goto error_return;
2177 native_relocs = (bfd_byte *) allocated;
2179 entsize = rel_hdr->sh_entsize;
2180 BFD_ASSERT (entsize == sizeof (Elf64_Mips_External_Rel)
2181 || entsize == sizeof (Elf64_Mips_External_Rela));
2183 if (entsize == sizeof (Elf64_Mips_External_Rel))
2184 howto_table = mips_elf64_howto_table_rel;
2185 else
2186 howto_table = mips_elf64_howto_table_rela;
2188 for (i = 0, relent = relents;
2189 i < reloc_count;
2190 i++, native_relocs += entsize)
2192 Elf64_Mips_Internal_Rela rela;
2193 bfd_boolean used_sym, used_ssym;
2194 int ir;
2196 if (entsize == sizeof (Elf64_Mips_External_Rela))
2197 mips_elf64_swap_reloca_in (abfd,
2198 (Elf64_Mips_External_Rela *) native_relocs,
2199 &rela);
2200 else
2201 mips_elf64_swap_reloc_in (abfd,
2202 (Elf64_Mips_External_Rel *) native_relocs,
2203 &rela);
2205 /* Each entry represents exactly three actual relocations. */
2207 used_sym = FALSE;
2208 used_ssym = FALSE;
2209 for (ir = 0; ir < 3; ir++)
2211 enum elf_mips_reloc_type type;
2213 switch (ir)
2215 default:
2216 abort ();
2217 case 0:
2218 type = (enum elf_mips_reloc_type) rela.r_type;
2219 break;
2220 case 1:
2221 type = (enum elf_mips_reloc_type) rela.r_type2;
2222 break;
2223 case 2:
2224 type = (enum elf_mips_reloc_type) rela.r_type3;
2225 break;
2228 /* Some types require symbols, whereas some do not. */
2229 switch (type)
2231 case R_MIPS_NONE:
2232 case R_MIPS_LITERAL:
2233 case R_MIPS_INSERT_A:
2234 case R_MIPS_INSERT_B:
2235 case R_MIPS_DELETE:
2236 relent->sym_ptr_ptr = bfd_abs_section_ptr->symbol_ptr_ptr;
2237 break;
2239 default:
2240 if (! used_sym)
2242 if (rela.r_sym == 0)
2243 relent->sym_ptr_ptr = bfd_abs_section_ptr->symbol_ptr_ptr;
2244 else
2246 asymbol **ps, *s;
2248 ps = symbols + rela.r_sym - 1;
2249 s = *ps;
2250 if ((s->flags & BSF_SECTION_SYM) == 0)
2251 relent->sym_ptr_ptr = ps;
2252 else
2253 relent->sym_ptr_ptr = s->section->symbol_ptr_ptr;
2256 used_sym = TRUE;
2258 else if (! used_ssym)
2260 switch (rela.r_ssym)
2262 case RSS_UNDEF:
2263 relent->sym_ptr_ptr =
2264 bfd_abs_section_ptr->symbol_ptr_ptr;
2265 break;
2267 case RSS_GP:
2268 case RSS_GP0:
2269 case RSS_LOC:
2270 /* FIXME: I think these need to be handled using
2271 special howto structures. */
2272 BFD_ASSERT (0);
2273 break;
2275 default:
2276 BFD_ASSERT (0);
2277 break;
2280 used_ssym = TRUE;
2282 else
2283 relent->sym_ptr_ptr = bfd_abs_section_ptr->symbol_ptr_ptr;
2285 break;
2288 /* The address of an ELF reloc is section relative for an
2289 object file, and absolute for an executable file or
2290 shared library. The address of a BFD reloc is always
2291 section relative. */
2292 if ((abfd->flags & (EXEC_P | DYNAMIC)) == 0 || dynamic)
2293 relent->address = rela.r_offset;
2294 else
2295 relent->address = rela.r_offset - asect->vma;
2297 relent->addend = rela.r_addend;
2299 relent->howto = &howto_table[(int) type];
2301 ++relent;
2305 asect->reloc_count += (relent - relents) / 3;
2307 if (allocated != NULL)
2308 free (allocated);
2310 return TRUE;
2312 error_return:
2313 if (allocated != NULL)
2314 free (allocated);
2315 return FALSE;
2318 /* Read the relocations. On Irix 6, there can be two reloc sections
2319 associated with a single data section. This is copied from
2320 elfcode.h as well, with changes as small as accounting for 3
2321 internal relocs per external reloc and resetting reloc_count to
2322 zero before processing the relocs of a section. */
2324 static bfd_boolean
2325 mips_elf64_slurp_reloc_table (abfd, asect, symbols, dynamic)
2326 bfd *abfd;
2327 asection *asect;
2328 asymbol **symbols;
2329 bfd_boolean dynamic;
2331 struct bfd_elf_section_data * const d = elf_section_data (asect);
2332 Elf_Internal_Shdr *rel_hdr;
2333 Elf_Internal_Shdr *rel_hdr2;
2334 bfd_size_type reloc_count;
2335 bfd_size_type reloc_count2;
2336 arelent *relents;
2337 bfd_size_type amt;
2339 if (asect->relocation != NULL)
2340 return TRUE;
2342 if (! dynamic)
2344 if ((asect->flags & SEC_RELOC) == 0
2345 || asect->reloc_count == 0)
2346 return TRUE;
2348 rel_hdr = &d->rel_hdr;
2349 reloc_count = NUM_SHDR_ENTRIES (rel_hdr);
2350 rel_hdr2 = d->rel_hdr2;
2351 reloc_count2 = (rel_hdr2 ? NUM_SHDR_ENTRIES (rel_hdr2) : 0);
2353 BFD_ASSERT (asect->reloc_count == reloc_count + reloc_count2);
2354 BFD_ASSERT (asect->rel_filepos == rel_hdr->sh_offset
2355 || (rel_hdr2 && asect->rel_filepos == rel_hdr2->sh_offset));
2358 else
2360 /* Note that ASECT->RELOC_COUNT tends not to be accurate in this
2361 case because relocations against this section may use the
2362 dynamic symbol table, and in that case bfd_section_from_shdr
2363 in elf.c does not update the RELOC_COUNT. */
2364 if (asect->_raw_size == 0)
2365 return TRUE;
2367 rel_hdr = &d->this_hdr;
2368 reloc_count = NUM_SHDR_ENTRIES (rel_hdr);
2369 rel_hdr2 = NULL;
2370 reloc_count2 = 0;
2373 /* Allocate space for 3 arelent structures for each Rel structure. */
2374 amt = (reloc_count + reloc_count2) * 3 * sizeof (arelent);
2375 relents = (arelent *) bfd_alloc (abfd, amt);
2376 if (relents == NULL)
2377 return FALSE;
2379 /* The slurp_one_reloc_table routine increments reloc_count. */
2380 asect->reloc_count = 0;
2382 if (! mips_elf64_slurp_one_reloc_table (abfd, asect,
2383 rel_hdr, reloc_count,
2384 relents,
2385 symbols, dynamic))
2386 return FALSE;
2387 if (d->rel_hdr2 != NULL)
2389 if (! mips_elf64_slurp_one_reloc_table (abfd, asect,
2390 rel_hdr2, reloc_count2,
2391 relents + reloc_count * 3,
2392 symbols, dynamic))
2393 return FALSE;
2396 asect->relocation = relents;
2397 return TRUE;
2400 /* Write out the relocations. */
2402 static void
2403 mips_elf64_write_relocs (abfd, sec, data)
2404 bfd *abfd;
2405 asection *sec;
2406 PTR data;
2408 bfd_boolean *failedp = (bfd_boolean *) data;
2409 int count;
2410 Elf_Internal_Shdr *rel_hdr;
2411 unsigned int idx;
2413 /* If we have already failed, don't do anything. */
2414 if (*failedp)
2415 return;
2417 if ((sec->flags & SEC_RELOC) == 0)
2418 return;
2420 /* The linker backend writes the relocs out itself, and sets the
2421 reloc_count field to zero to inhibit writing them here. Also,
2422 sometimes the SEC_RELOC flag gets set even when there aren't any
2423 relocs. */
2424 if (sec->reloc_count == 0)
2425 return;
2427 /* We can combine up to three relocs that refer to the same address
2428 if the latter relocs have no associated symbol. */
2429 count = 0;
2430 for (idx = 0; idx < sec->reloc_count; idx++)
2432 bfd_vma addr;
2433 unsigned int i;
2435 ++count;
2437 addr = sec->orelocation[idx]->address;
2438 for (i = 0; i < 2; i++)
2440 arelent *r;
2442 if (idx + 1 >= sec->reloc_count)
2443 break;
2444 r = sec->orelocation[idx + 1];
2445 if (r->address != addr
2446 || ! bfd_is_abs_section ((*r->sym_ptr_ptr)->section)
2447 || (*r->sym_ptr_ptr)->value != 0)
2448 break;
2450 /* We can merge the reloc at IDX + 1 with the reloc at IDX. */
2452 ++idx;
2456 rel_hdr = &elf_section_data (sec)->rel_hdr;
2458 /* Do the actual relocation. */
2460 if (rel_hdr->sh_entsize == sizeof(Elf64_Mips_External_Rel))
2461 mips_elf64_write_rel (abfd, sec, rel_hdr, &count, data);
2462 else if (rel_hdr->sh_entsize == sizeof(Elf64_Mips_External_Rela))
2463 mips_elf64_write_rela (abfd, sec, rel_hdr, &count, data);
2464 else
2465 BFD_ASSERT (0);
2468 static void
2469 mips_elf64_write_rel (abfd, sec, rel_hdr, count, data)
2470 bfd *abfd;
2471 asection *sec;
2472 Elf_Internal_Shdr *rel_hdr;
2473 int *count;
2474 PTR data;
2476 bfd_boolean *failedp = (bfd_boolean *) data;
2477 Elf64_Mips_External_Rel *ext_rel;
2478 unsigned int idx;
2479 asymbol *last_sym = 0;
2480 int last_sym_idx = 0;
2482 rel_hdr->sh_size = (bfd_vma)(rel_hdr->sh_entsize * *count);
2483 rel_hdr->contents = (PTR) bfd_alloc (abfd, rel_hdr->sh_size);
2484 if (rel_hdr->contents == NULL)
2486 *failedp = TRUE;
2487 return;
2490 ext_rel = (Elf64_Mips_External_Rel *) rel_hdr->contents;
2491 for (idx = 0; idx < sec->reloc_count; idx++, ext_rel++)
2493 arelent *ptr;
2494 Elf64_Mips_Internal_Rela int_rel;
2495 asymbol *sym;
2496 int n;
2497 unsigned int i;
2499 ptr = sec->orelocation[idx];
2501 /* The address of an ELF reloc is section relative for an object
2502 file, and absolute for an executable file or shared library.
2503 The address of a BFD reloc is always section relative. */
2504 if ((abfd->flags & (EXEC_P | DYNAMIC)) == 0)
2505 int_rel.r_offset = ptr->address;
2506 else
2507 int_rel.r_offset = ptr->address + sec->vma;
2509 sym = *ptr->sym_ptr_ptr;
2510 if (sym == last_sym)
2511 n = last_sym_idx;
2512 else
2514 last_sym = sym;
2515 n = _bfd_elf_symbol_from_bfd_symbol (abfd, &sym);
2516 if (n < 0)
2518 *failedp = TRUE;
2519 return;
2521 last_sym_idx = n;
2524 int_rel.r_sym = n;
2525 int_rel.r_ssym = RSS_UNDEF;
2527 if ((*ptr->sym_ptr_ptr)->the_bfd->xvec != abfd->xvec
2528 && ! _bfd_elf_validate_reloc (abfd, ptr))
2530 *failedp = TRUE;
2531 return;
2534 int_rel.r_type = ptr->howto->type;
2535 int_rel.r_type2 = (int) R_MIPS_NONE;
2536 int_rel.r_type3 = (int) R_MIPS_NONE;
2538 for (i = 0; i < 2; i++)
2540 arelent *r;
2542 if (idx + 1 >= sec->reloc_count)
2543 break;
2544 r = sec->orelocation[idx + 1];
2545 if (r->address != ptr->address
2546 || ! bfd_is_abs_section ((*r->sym_ptr_ptr)->section)
2547 || (*r->sym_ptr_ptr)->value != 0)
2548 break;
2550 /* We can merge the reloc at IDX + 1 with the reloc at IDX. */
2552 if (i == 0)
2553 int_rel.r_type2 = r->howto->type;
2554 else
2555 int_rel.r_type3 = r->howto->type;
2557 ++idx;
2560 mips_elf64_swap_reloc_out (abfd, &int_rel, ext_rel);
2563 BFD_ASSERT (ext_rel - (Elf64_Mips_External_Rel *) rel_hdr->contents
2564 == *count);
2567 static void
2568 mips_elf64_write_rela (abfd, sec, rela_hdr, count, data)
2569 bfd *abfd;
2570 asection *sec;
2571 Elf_Internal_Shdr *rela_hdr;
2572 int *count;
2573 PTR data;
2575 bfd_boolean *failedp = (bfd_boolean *) data;
2576 Elf64_Mips_External_Rela *ext_rela;
2577 unsigned int idx;
2578 asymbol *last_sym = 0;
2579 int last_sym_idx = 0;
2581 rela_hdr->sh_size = (bfd_vma)(rela_hdr->sh_entsize * *count);
2582 rela_hdr->contents = (PTR) bfd_alloc (abfd, rela_hdr->sh_size);
2583 if (rela_hdr->contents == NULL)
2585 *failedp = TRUE;
2586 return;
2589 ext_rela = (Elf64_Mips_External_Rela *) rela_hdr->contents;
2590 for (idx = 0; idx < sec->reloc_count; idx++, ext_rela++)
2592 arelent *ptr;
2593 Elf64_Mips_Internal_Rela int_rela;
2594 asymbol *sym;
2595 int n;
2596 unsigned int i;
2598 ptr = sec->orelocation[idx];
2600 /* The address of an ELF reloc is section relative for an object
2601 file, and absolute for an executable file or shared library.
2602 The address of a BFD reloc is always section relative. */
2603 if ((abfd->flags & (EXEC_P | DYNAMIC)) == 0)
2604 int_rela.r_offset = ptr->address;
2605 else
2606 int_rela.r_offset = ptr->address + sec->vma;
2608 sym = *ptr->sym_ptr_ptr;
2609 if (sym == last_sym)
2610 n = last_sym_idx;
2611 else
2613 last_sym = sym;
2614 n = _bfd_elf_symbol_from_bfd_symbol (abfd, &sym);
2615 if (n < 0)
2617 *failedp = TRUE;
2618 return;
2620 last_sym_idx = n;
2623 int_rela.r_sym = n;
2624 int_rela.r_addend = ptr->addend;
2625 int_rela.r_ssym = RSS_UNDEF;
2627 if ((*ptr->sym_ptr_ptr)->the_bfd->xvec != abfd->xvec
2628 && ! _bfd_elf_validate_reloc (abfd, ptr))
2630 *failedp = TRUE;
2631 return;
2634 int_rela.r_type = ptr->howto->type;
2635 int_rela.r_type2 = (int) R_MIPS_NONE;
2636 int_rela.r_type3 = (int) R_MIPS_NONE;
2638 for (i = 0; i < 2; i++)
2640 arelent *r;
2642 if (idx + 1 >= sec->reloc_count)
2643 break;
2644 r = sec->orelocation[idx + 1];
2645 if (r->address != ptr->address
2646 || ! bfd_is_abs_section ((*r->sym_ptr_ptr)->section)
2647 || (*r->sym_ptr_ptr)->value != 0)
2648 break;
2650 /* We can merge the reloc at IDX + 1 with the reloc at IDX. */
2652 if (i == 0)
2653 int_rela.r_type2 = r->howto->type;
2654 else
2655 int_rela.r_type3 = r->howto->type;
2657 ++idx;
2660 mips_elf64_swap_reloca_out (abfd, &int_rela, ext_rela);
2663 BFD_ASSERT (ext_rela - (Elf64_Mips_External_Rela *) rela_hdr->contents
2664 == *count);
2667 /* Set the right machine number for a MIPS ELF file. */
2669 static bfd_boolean
2670 mips_elf64_object_p (abfd)
2671 bfd *abfd;
2673 unsigned long mach;
2675 /* Irix 6 is broken. Object file symbol tables are not always
2676 sorted correctly such that local symbols precede global symbols,
2677 and the sh_info field in the symbol table is not always right. */
2678 if (elf64_mips_irix_compat (abfd) != ict_none)
2679 elf_bad_symtab (abfd) = TRUE;
2681 mach = _bfd_elf_mips_mach (elf_elfheader (abfd)->e_flags);
2682 bfd_default_set_arch_mach (abfd, bfd_arch_mips, mach);
2683 return TRUE;
2686 /* Depending on the target vector we generate some version of Irix
2687 executables or "normal" MIPS ELF ABI executables. */
2688 static irix_compat_t
2689 elf64_mips_irix_compat (abfd)
2690 bfd *abfd;
2692 if ((abfd->xvec == &bfd_elf64_bigmips_vec)
2693 || (abfd->xvec == &bfd_elf64_littlemips_vec))
2694 return ict_irix6;
2695 else
2696 return ict_none;
2699 /* Support for core dump NOTE sections. */
2700 static bfd_boolean
2701 elf64_mips_grok_prstatus (abfd, note)
2702 bfd *abfd;
2703 Elf_Internal_Note *note;
2705 int offset;
2706 unsigned int raw_size;
2708 switch (note->descsz)
2710 default:
2711 return FALSE;
2713 case 480: /* Linux/MIPS - N64 kernel */
2714 /* pr_cursig */
2715 elf_tdata (abfd)->core_signal = bfd_get_16 (abfd, note->descdata + 12);
2717 /* pr_pid */
2718 elf_tdata (abfd)->core_pid = bfd_get_32 (abfd, note->descdata + 32);
2720 /* pr_reg */
2721 offset = 112;
2722 raw_size = 360;
2724 break;
2727 /* Make a ".reg/999" section. */
2728 return _bfd_elfcore_make_pseudosection (abfd, ".reg",
2729 raw_size, note->descpos + offset);
2732 static bfd_boolean
2733 elf64_mips_grok_psinfo (abfd, note)
2734 bfd *abfd;
2735 Elf_Internal_Note *note;
2737 switch (note->descsz)
2739 default:
2740 return FALSE;
2742 case 136: /* Linux/MIPS - N64 kernel elf_prpsinfo */
2743 elf_tdata (abfd)->core_program
2744 = _bfd_elfcore_strndup (abfd, note->descdata + 40, 16);
2745 elf_tdata (abfd)->core_command
2746 = _bfd_elfcore_strndup (abfd, note->descdata + 56, 80);
2749 /* Note that for some reason, a spurious space is tacked
2750 onto the end of the args in some (at least one anyway)
2751 implementations, so strip it off if it exists. */
2754 char *command = elf_tdata (abfd)->core_command;
2755 int n = strlen (command);
2757 if (0 < n && command[n - 1] == ' ')
2758 command[n - 1] = '\0';
2761 return TRUE;
2764 /* ECOFF swapping routines. These are used when dealing with the
2765 .mdebug section, which is in the ECOFF debugging format. */
2766 static const struct ecoff_debug_swap mips_elf64_ecoff_debug_swap =
2768 /* Symbol table magic number. */
2769 magicSym2,
2770 /* Alignment of debugging information. E.g., 4. */
2772 /* Sizes of external symbolic information. */
2773 sizeof (struct hdr_ext),
2774 sizeof (struct dnr_ext),
2775 sizeof (struct pdr_ext),
2776 sizeof (struct sym_ext),
2777 sizeof (struct opt_ext),
2778 sizeof (struct fdr_ext),
2779 sizeof (struct rfd_ext),
2780 sizeof (struct ext_ext),
2781 /* Functions to swap in external symbolic data. */
2782 ecoff_swap_hdr_in,
2783 ecoff_swap_dnr_in,
2784 ecoff_swap_pdr_in,
2785 ecoff_swap_sym_in,
2786 ecoff_swap_opt_in,
2787 ecoff_swap_fdr_in,
2788 ecoff_swap_rfd_in,
2789 ecoff_swap_ext_in,
2790 _bfd_ecoff_swap_tir_in,
2791 _bfd_ecoff_swap_rndx_in,
2792 /* Functions to swap out external symbolic data. */
2793 ecoff_swap_hdr_out,
2794 ecoff_swap_dnr_out,
2795 ecoff_swap_pdr_out,
2796 ecoff_swap_sym_out,
2797 ecoff_swap_opt_out,
2798 ecoff_swap_fdr_out,
2799 ecoff_swap_rfd_out,
2800 ecoff_swap_ext_out,
2801 _bfd_ecoff_swap_tir_out,
2802 _bfd_ecoff_swap_rndx_out,
2803 /* Function to read in symbolic data. */
2804 _bfd_mips_elf_read_ecoff_info
2807 /* Relocations in the 64 bit MIPS ELF ABI are more complex than in
2808 standard ELF. This structure is used to redirect the relocation
2809 handling routines. */
2811 const struct elf_size_info mips_elf64_size_info =
2813 sizeof (Elf64_External_Ehdr),
2814 sizeof (Elf64_External_Phdr),
2815 sizeof (Elf64_External_Shdr),
2816 sizeof (Elf64_Mips_External_Rel),
2817 sizeof (Elf64_Mips_External_Rela),
2818 sizeof (Elf64_External_Sym),
2819 sizeof (Elf64_External_Dyn),
2820 sizeof (Elf_External_Note),
2821 4, /* hash-table entry size */
2822 3, /* internal relocations per external relocations */
2823 64, /* arch_size */
2824 3, /* log_file_align */
2825 ELFCLASS64,
2826 EV_CURRENT,
2827 bfd_elf64_write_out_phdrs,
2828 bfd_elf64_write_shdrs_and_ehdr,
2829 mips_elf64_write_relocs,
2830 bfd_elf64_swap_symbol_in,
2831 bfd_elf64_swap_symbol_out,
2832 mips_elf64_slurp_reloc_table,
2833 bfd_elf64_slurp_symbol_table,
2834 bfd_elf64_swap_dyn_in,
2835 bfd_elf64_swap_dyn_out,
2836 mips_elf64_be_swap_reloc_in,
2837 mips_elf64_be_swap_reloc_out,
2838 mips_elf64_be_swap_reloca_in,
2839 mips_elf64_be_swap_reloca_out
2842 #define ELF_ARCH bfd_arch_mips
2843 #define ELF_MACHINE_CODE EM_MIPS
2845 /* The SVR4 MIPS ABI says that this should be 0x10000, but Irix 5 uses
2846 a value of 0x1000, and we are compatible.
2847 FIXME: How does this affect NewABI? */
2848 #define ELF_MAXPAGESIZE 0x1000
2850 #define elf_backend_collect TRUE
2851 #define elf_backend_type_change_ok TRUE
2852 #define elf_backend_can_gc_sections TRUE
2853 #define elf_info_to_howto mips_elf64_info_to_howto_rela
2854 #define elf_info_to_howto_rel mips_elf64_info_to_howto_rel
2855 #define elf_backend_object_p mips_elf64_object_p
2856 #define elf_backend_symbol_processing _bfd_mips_elf_symbol_processing
2857 #define elf_backend_section_processing _bfd_mips_elf_section_processing
2858 #define elf_backend_section_from_shdr _bfd_mips_elf_section_from_shdr
2859 #define elf_backend_fake_sections _bfd_mips_elf_fake_sections
2860 #define elf_backend_section_from_bfd_section \
2861 _bfd_mips_elf_section_from_bfd_section
2862 #define elf_backend_add_symbol_hook _bfd_mips_elf_add_symbol_hook
2863 #define elf_backend_link_output_symbol_hook \
2864 _bfd_mips_elf_link_output_symbol_hook
2865 #define elf_backend_create_dynamic_sections \
2866 _bfd_mips_elf_create_dynamic_sections
2867 #define elf_backend_check_relocs _bfd_mips_elf_check_relocs
2868 #define elf_backend_adjust_dynamic_symbol \
2869 _bfd_mips_elf_adjust_dynamic_symbol
2870 #define elf_backend_always_size_sections \
2871 _bfd_mips_elf_always_size_sections
2872 #define elf_backend_size_dynamic_sections \
2873 _bfd_mips_elf_size_dynamic_sections
2874 #define elf_backend_relocate_section _bfd_mips_elf_relocate_section
2875 #define elf_backend_finish_dynamic_symbol \
2876 _bfd_mips_elf_finish_dynamic_symbol
2877 #define elf_backend_finish_dynamic_sections \
2878 _bfd_mips_elf_finish_dynamic_sections
2879 #define elf_backend_final_write_processing \
2880 _bfd_mips_elf_final_write_processing
2881 #define elf_backend_additional_program_headers \
2882 _bfd_mips_elf_additional_program_headers
2883 #define elf_backend_modify_segment_map _bfd_mips_elf_modify_segment_map
2884 #define elf_backend_gc_mark_hook _bfd_mips_elf_gc_mark_hook
2885 #define elf_backend_gc_sweep_hook _bfd_mips_elf_gc_sweep_hook
2886 #define elf_backend_hide_symbol _bfd_mips_elf_hide_symbol
2887 #define elf_backend_ignore_discarded_relocs \
2888 _bfd_mips_elf_ignore_discarded_relocs
2889 #define elf_backend_mips_irix_compat elf64_mips_irix_compat
2890 #define elf_backend_mips_rtype_to_howto mips_elf64_rtype_to_howto
2891 #define elf_backend_ecoff_debug_swap &mips_elf64_ecoff_debug_swap
2892 #define elf_backend_size_info mips_elf64_size_info
2894 #define elf_backend_grok_prstatus elf64_mips_grok_prstatus
2895 #define elf_backend_grok_psinfo elf64_mips_grok_psinfo
2897 #define elf_backend_got_header_size (4 * MIPS_RESERVED_GOTNO)
2898 #define elf_backend_plt_header_size 0
2900 /* MIPS ELF64 can use a mixture of REL and RELA, but some Relocations
2901 work better/work only in RELA, so we default to this. */
2902 #define elf_backend_may_use_rel_p 1
2903 #define elf_backend_may_use_rela_p 1
2904 #define elf_backend_default_use_rela_p 1
2906 #define elf_backend_write_section _bfd_mips_elf_write_section
2908 /* We don't set bfd_elf64_bfd_is_local_label_name because the 32-bit
2909 MIPS-specific function only applies to IRIX5, which had no 64-bit
2910 ABI. */
2911 #define bfd_elf64_find_nearest_line _bfd_mips_elf_find_nearest_line
2912 #define bfd_elf64_new_section_hook _bfd_mips_elf_new_section_hook
2913 #define bfd_elf64_set_section_contents _bfd_mips_elf_set_section_contents
2914 #define bfd_elf64_bfd_get_relocated_section_contents \
2915 _bfd_elf_mips_get_relocated_section_contents
2916 #define bfd_elf64_bfd_link_hash_table_create \
2917 _bfd_mips_elf_link_hash_table_create
2918 #define bfd_elf64_bfd_final_link _bfd_mips_elf_final_link
2919 #define bfd_elf64_bfd_merge_private_bfd_data \
2920 _bfd_mips_elf_merge_private_bfd_data
2921 #define bfd_elf64_bfd_set_private_flags _bfd_mips_elf_set_private_flags
2922 #define bfd_elf64_bfd_print_private_bfd_data \
2923 _bfd_mips_elf_print_private_bfd_data
2925 #define bfd_elf64_get_reloc_upper_bound mips_elf64_get_reloc_upper_bound
2926 #define bfd_elf64_canonicalize_reloc mips_elf64_canonicalize_reloc
2927 #define bfd_elf64_get_dynamic_reloc_upper_bound mips_elf64_get_dynamic_reloc_upper_bound
2928 #define bfd_elf64_canonicalize_dynamic_reloc mips_elf64_canonicalize_dynamic_reloc
2929 #define bfd_elf64_bfd_relax_section _bfd_mips_relax_section
2931 /* MIPS ELF64 archive functions. */
2932 #define bfd_elf64_archive_functions
2933 extern bfd_boolean bfd_elf64_archive_slurp_armap
2934 PARAMS ((bfd *));
2935 extern bfd_boolean bfd_elf64_archive_write_armap
2936 PARAMS ((bfd *, unsigned int, struct orl *, unsigned int, int));
2937 #define bfd_elf64_archive_slurp_extended_name_table \
2938 _bfd_archive_coff_slurp_extended_name_table
2939 #define bfd_elf64_archive_construct_extended_name_table \
2940 _bfd_archive_coff_construct_extended_name_table
2941 #define bfd_elf64_archive_truncate_arname \
2942 _bfd_archive_coff_truncate_arname
2943 #define bfd_elf64_archive_read_ar_hdr _bfd_archive_coff_read_ar_hdr
2944 #define bfd_elf64_archive_openr_next_archived_file \
2945 _bfd_archive_coff_openr_next_archived_file
2946 #define bfd_elf64_archive_get_elt_at_index \
2947 _bfd_archive_coff_get_elt_at_index
2948 #define bfd_elf64_archive_generic_stat_arch_elt \
2949 _bfd_archive_coff_generic_stat_arch_elt
2950 #define bfd_elf64_archive_update_armap_timestamp \
2951 _bfd_archive_coff_update_armap_timestamp
2953 /* The SGI style (n)64 NewABI. */
2954 #define TARGET_LITTLE_SYM bfd_elf64_littlemips_vec
2955 #define TARGET_LITTLE_NAME "elf64-littlemips"
2956 #define TARGET_BIG_SYM bfd_elf64_bigmips_vec
2957 #define TARGET_BIG_NAME "elf64-bigmips"
2959 #include "elf64-target.h"
2961 #define INCLUDED_TARGET_FILE /* More a type of flag. */
2963 /* The SYSV-style 'traditional' (n)64 NewABI. */
2964 #undef TARGET_LITTLE_SYM
2965 #undef TARGET_LITTLE_NAME
2966 #undef TARGET_BIG_SYM
2967 #undef TARGET_BIG_NAME
2969 #define TARGET_LITTLE_SYM bfd_elf64_tradlittlemips_vec
2970 #define TARGET_LITTLE_NAME "elf64-tradlittlemips"
2971 #define TARGET_BIG_SYM bfd_elf64_tradbigmips_vec
2972 #define TARGET_BIG_NAME "elf64-tradbigmips"
2974 /* Include the target file again for this target. */
2975 #include "elf64-target.h"