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