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