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