7fc125c9e0e77dfcc76defe89081d71996ba9f06
[deliverable/binutils-gdb.git] / bfd / elf32-mips.c
1 /* MIPS-specific support for 32-bit ELF
2 Copyright 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002,
3 2003, 2004 Free Software Foundation, Inc.
4
5 Most of the information added by Ian Lance Taylor, Cygnus Support,
6 <ian@cygnus.com>.
7 N32/64 ABI support added by Mark Mitchell, CodeSourcery, LLC.
8 <mark@codesourcery.com>
9 Traditional MIPS targets support added by Koundinya.K, Dansk Data
10 Elektronik & Operations Research Group. <kk@ddeorg.soft.net>
11
12 This file is part of BFD, the Binary File Descriptor library.
13
14 This program is free software; you can redistribute it and/or modify
15 it under the terms of the GNU General Public License as published by
16 the Free Software Foundation; either version 2 of the License, or
17 (at your option) any later version.
18
19 This program is distributed in the hope that it will be useful,
20 but WITHOUT ANY WARRANTY; without even the implied warranty of
21 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
22 GNU General Public License for more details.
23
24 You should have received a copy of the GNU General Public License
25 along with this program; if not, write to the Free Software
26 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
27
28 /* This file handles MIPS ELF targets. SGI Irix 5 uses a slightly
29 different MIPS ELF from other targets. This matters when linking.
30 This file supports both, switching at runtime. */
31
32 #include "bfd.h"
33 #include "sysdep.h"
34 #include "libbfd.h"
35 #include "bfdlink.h"
36 #include "genlink.h"
37 #include "elf-bfd.h"
38 #include "elfxx-mips.h"
39 #include "elf/mips.h"
40
41 /* Get the ECOFF swapping routines. */
42 #include "coff/sym.h"
43 #include "coff/symconst.h"
44 #include "coff/internal.h"
45 #include "coff/ecoff.h"
46 #include "coff/mips.h"
47 #define ECOFF_SIGNED_32
48 #include "ecoffswap.h"
49
50 static bfd_reloc_status_type gprel32_with_gp
51 (bfd *, asymbol *, arelent *, asection *, bfd_boolean, void *, bfd_vma);
52 static bfd_reloc_status_type mips_elf_gprel32_reloc
53 (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **);
54 static bfd_reloc_status_type mips32_64bit_reloc
55 (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **);
56 static reloc_howto_type *bfd_elf32_bfd_reloc_type_lookup
57 (bfd *, bfd_reloc_code_real_type);
58 static reloc_howto_type *mips_elf32_rtype_to_howto
59 (unsigned int, bfd_boolean);
60 static void mips_info_to_howto_rel
61 (bfd *, arelent *, Elf_Internal_Rela *);
62 static void mips_info_to_howto_rela
63 (bfd *, arelent *, Elf_Internal_Rela *);
64 static bfd_boolean mips_elf_sym_is_global
65 (bfd *, asymbol *);
66 static bfd_boolean mips_elf32_object_p
67 (bfd *);
68 static bfd_boolean mips_elf_is_local_label_name
69 (bfd *, const char *);
70 static bfd_reloc_status_type mips16_jump_reloc
71 (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **);
72 static bfd_reloc_status_type mips16_gprel_reloc
73 (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **);
74 static bfd_reloc_status_type mips_elf_final_gp
75 (bfd *, asymbol *, bfd_boolean, char **, bfd_vma *);
76 static bfd_boolean mips_elf_assign_gp
77 (bfd *, bfd_vma *);
78 static bfd_boolean elf32_mips_grok_prstatus
79 (bfd *, Elf_Internal_Note *);
80 static bfd_boolean elf32_mips_grok_psinfo
81 (bfd *, Elf_Internal_Note *);
82 static irix_compat_t elf32_mips_irix_compat
83 (bfd *);
84
85 extern const bfd_target bfd_elf32_bigmips_vec;
86 extern const bfd_target bfd_elf32_littlemips_vec;
87
88 /* Nonzero if ABFD is using the N32 ABI. */
89 #define ABI_N32_P(abfd) \
90 ((elf_elfheader (abfd)->e_flags & EF_MIPS_ABI2) != 0)
91
92 /* Whether we are trying to be compatible with IRIX at all. */
93 #define SGI_COMPAT(abfd) \
94 (elf32_mips_irix_compat (abfd) != ict_none)
95
96 /* The number of local .got entries we reserve. */
97 #define MIPS_RESERVED_GOTNO (2)
98
99 /* In case we're on a 32-bit machine, construct a 64-bit "-1" value
100 from smaller values. Start with zero, widen, *then* decrement. */
101 #define MINUS_ONE (((bfd_vma)0) - 1)
102
103 /* The relocation table used for SHT_REL sections. */
104
105 static reloc_howto_type elf_mips_howto_table_rel[] =
106 {
107 /* No relocation. */
108 HOWTO (R_MIPS_NONE, /* type */
109 0, /* rightshift */
110 0, /* size (0 = byte, 1 = short, 2 = long) */
111 0, /* bitsize */
112 FALSE, /* pc_relative */
113 0, /* bitpos */
114 complain_overflow_dont, /* complain_on_overflow */
115 _bfd_mips_elf_generic_reloc, /* special_function */
116 "R_MIPS_NONE", /* name */
117 FALSE, /* partial_inplace */
118 0, /* src_mask */
119 0, /* dst_mask */
120 FALSE), /* pcrel_offset */
121
122 /* 16 bit relocation. */
123 HOWTO (R_MIPS_16, /* type */
124 0, /* rightshift */
125 2, /* size (0 = byte, 1 = short, 2 = long) */
126 16, /* bitsize */
127 FALSE, /* pc_relative */
128 0, /* bitpos */
129 complain_overflow_signed, /* complain_on_overflow */
130 _bfd_mips_elf_generic_reloc, /* special_function */
131 "R_MIPS_16", /* name */
132 TRUE, /* partial_inplace */
133 0x0000ffff, /* src_mask */
134 0x0000ffff, /* dst_mask */
135 FALSE), /* pcrel_offset */
136
137 /* 32 bit relocation. */
138 HOWTO (R_MIPS_32, /* type */
139 0, /* rightshift */
140 2, /* size (0 = byte, 1 = short, 2 = long) */
141 32, /* bitsize */
142 FALSE, /* pc_relative */
143 0, /* bitpos */
144 complain_overflow_dont, /* complain_on_overflow */
145 _bfd_mips_elf_generic_reloc, /* special_function */
146 "R_MIPS_32", /* name */
147 TRUE, /* partial_inplace */
148 0xffffffff, /* src_mask */
149 0xffffffff, /* dst_mask */
150 FALSE), /* pcrel_offset */
151
152 /* 32 bit symbol relative relocation. */
153 HOWTO (R_MIPS_REL32, /* type */
154 0, /* rightshift */
155 2, /* size (0 = byte, 1 = short, 2 = long) */
156 32, /* bitsize */
157 FALSE, /* pc_relative */
158 0, /* bitpos */
159 complain_overflow_dont, /* complain_on_overflow */
160 _bfd_mips_elf_generic_reloc, /* special_function */
161 "R_MIPS_REL32", /* name */
162 TRUE, /* partial_inplace */
163 0xffffffff, /* src_mask */
164 0xffffffff, /* dst_mask */
165 FALSE), /* pcrel_offset */
166
167 /* 26 bit jump address. */
168 HOWTO (R_MIPS_26, /* type */
169 2, /* rightshift */
170 2, /* size (0 = byte, 1 = short, 2 = long) */
171 26, /* bitsize */
172 FALSE, /* pc_relative */
173 0, /* bitpos */
174 complain_overflow_dont, /* complain_on_overflow */
175 /* This needs complex overflow
176 detection, because the upper four
177 bits must match the PC + 4. */
178 _bfd_mips_elf_generic_reloc, /* special_function */
179 "R_MIPS_26", /* name */
180 TRUE, /* partial_inplace */
181 0x03ffffff, /* src_mask */
182 0x03ffffff, /* dst_mask */
183 FALSE), /* pcrel_offset */
184
185 /* High 16 bits of symbol value. */
186 HOWTO (R_MIPS_HI16, /* type */
187 16, /* rightshift */
188 2, /* size (0 = byte, 1 = short, 2 = long) */
189 16, /* bitsize */
190 FALSE, /* pc_relative */
191 0, /* bitpos */
192 complain_overflow_dont, /* complain_on_overflow */
193 _bfd_mips_elf_hi16_reloc, /* special_function */
194 "R_MIPS_HI16", /* name */
195 TRUE, /* partial_inplace */
196 0x0000ffff, /* src_mask */
197 0x0000ffff, /* dst_mask */
198 FALSE), /* pcrel_offset */
199
200 /* Low 16 bits of symbol value. */
201 HOWTO (R_MIPS_LO16, /* type */
202 0, /* rightshift */
203 2, /* size (0 = byte, 1 = short, 2 = long) */
204 16, /* bitsize */
205 FALSE, /* pc_relative */
206 0, /* bitpos */
207 complain_overflow_dont, /* complain_on_overflow */
208 _bfd_mips_elf_lo16_reloc, /* special_function */
209 "R_MIPS_LO16", /* name */
210 TRUE, /* partial_inplace */
211 0x0000ffff, /* src_mask */
212 0x0000ffff, /* dst_mask */
213 FALSE), /* pcrel_offset */
214
215 /* GP relative reference. */
216 HOWTO (R_MIPS_GPREL16, /* type */
217 0, /* rightshift */
218 2, /* size (0 = byte, 1 = short, 2 = long) */
219 16, /* bitsize */
220 FALSE, /* pc_relative */
221 0, /* bitpos */
222 complain_overflow_signed, /* complain_on_overflow */
223 _bfd_mips_elf32_gprel16_reloc, /* special_function */
224 "R_MIPS_GPREL16", /* name */
225 TRUE, /* partial_inplace */
226 0x0000ffff, /* src_mask */
227 0x0000ffff, /* dst_mask */
228 FALSE), /* pcrel_offset */
229
230 /* Reference to literal section. */
231 HOWTO (R_MIPS_LITERAL, /* type */
232 0, /* rightshift */
233 2, /* size (0 = byte, 1 = short, 2 = long) */
234 16, /* bitsize */
235 FALSE, /* pc_relative */
236 0, /* bitpos */
237 complain_overflow_signed, /* complain_on_overflow */
238 _bfd_mips_elf32_gprel16_reloc, /* special_function */
239 "R_MIPS_LITERAL", /* name */
240 TRUE, /* partial_inplace */
241 0x0000ffff, /* src_mask */
242 0x0000ffff, /* dst_mask */
243 FALSE), /* pcrel_offset */
244
245 /* Reference to global offset table. */
246 HOWTO (R_MIPS_GOT16, /* type */
247 0, /* rightshift */
248 2, /* size (0 = byte, 1 = short, 2 = long) */
249 16, /* bitsize */
250 FALSE, /* pc_relative */
251 0, /* bitpos */
252 complain_overflow_signed, /* complain_on_overflow */
253 _bfd_mips_elf_got16_reloc, /* special_function */
254 "R_MIPS_GOT16", /* name */
255 TRUE, /* partial_inplace */
256 0x0000ffff, /* src_mask */
257 0x0000ffff, /* dst_mask */
258 FALSE), /* pcrel_offset */
259
260 /* 16 bit PC relative reference. */
261 HOWTO (R_MIPS_PC16, /* type */
262 0, /* rightshift */
263 2, /* size (0 = byte, 1 = short, 2 = long) */
264 16, /* bitsize */
265 TRUE, /* pc_relative */
266 0, /* bitpos */
267 complain_overflow_signed, /* complain_on_overflow */
268 _bfd_mips_elf_generic_reloc, /* special_function */
269 "R_MIPS_PC16", /* name */
270 TRUE, /* partial_inplace */
271 0x0000ffff, /* src_mask */
272 0x0000ffff, /* dst_mask */
273 TRUE), /* pcrel_offset */
274
275 /* 16 bit call through global offset table. */
276 HOWTO (R_MIPS_CALL16, /* type */
277 0, /* rightshift */
278 2, /* size (0 = byte, 1 = short, 2 = long) */
279 16, /* bitsize */
280 FALSE, /* pc_relative */
281 0, /* bitpos */
282 complain_overflow_signed, /* complain_on_overflow */
283 _bfd_mips_elf_generic_reloc, /* special_function */
284 "R_MIPS_CALL16", /* name */
285 TRUE, /* partial_inplace */
286 0x0000ffff, /* src_mask */
287 0x0000ffff, /* dst_mask */
288 FALSE), /* pcrel_offset */
289
290 /* 32 bit GP relative reference. */
291 HOWTO (R_MIPS_GPREL32, /* type */
292 0, /* rightshift */
293 2, /* size (0 = byte, 1 = short, 2 = long) */
294 32, /* bitsize */
295 FALSE, /* pc_relative */
296 0, /* bitpos */
297 complain_overflow_dont, /* complain_on_overflow */
298 mips_elf_gprel32_reloc, /* special_function */
299 "R_MIPS_GPREL32", /* name */
300 TRUE, /* partial_inplace */
301 0xffffffff, /* src_mask */
302 0xffffffff, /* dst_mask */
303 FALSE), /* pcrel_offset */
304
305 /* The remaining relocs are defined on Irix 5, although they are
306 not defined by the ABI. */
307 EMPTY_HOWTO (13),
308 EMPTY_HOWTO (14),
309 EMPTY_HOWTO (15),
310
311 /* A 5 bit shift field. */
312 HOWTO (R_MIPS_SHIFT5, /* type */
313 0, /* rightshift */
314 2, /* size (0 = byte, 1 = short, 2 = long) */
315 5, /* bitsize */
316 FALSE, /* pc_relative */
317 6, /* bitpos */
318 complain_overflow_bitfield, /* complain_on_overflow */
319 _bfd_mips_elf_generic_reloc, /* special_function */
320 "R_MIPS_SHIFT5", /* name */
321 TRUE, /* partial_inplace */
322 0x000007c0, /* src_mask */
323 0x000007c0, /* dst_mask */
324 FALSE), /* pcrel_offset */
325
326 /* A 6 bit shift field. */
327 /* FIXME: This is not handled correctly; a special function is
328 needed to put the most significant bit in the right place. */
329 HOWTO (R_MIPS_SHIFT6, /* type */
330 0, /* rightshift */
331 2, /* size (0 = byte, 1 = short, 2 = long) */
332 6, /* bitsize */
333 FALSE, /* pc_relative */
334 6, /* bitpos */
335 complain_overflow_bitfield, /* complain_on_overflow */
336 _bfd_mips_elf_generic_reloc, /* special_function */
337 "R_MIPS_SHIFT6", /* name */
338 TRUE, /* partial_inplace */
339 0x000007c4, /* src_mask */
340 0x000007c4, /* dst_mask */
341 FALSE), /* pcrel_offset */
342
343 /* A 64 bit relocation. */
344 HOWTO (R_MIPS_64, /* type */
345 0, /* rightshift */
346 4, /* size (0 = byte, 1 = short, 2 = long) */
347 64, /* bitsize */
348 FALSE, /* pc_relative */
349 0, /* bitpos */
350 complain_overflow_dont, /* complain_on_overflow */
351 mips32_64bit_reloc, /* special_function */
352 "R_MIPS_64", /* name */
353 TRUE, /* partial_inplace */
354 MINUS_ONE, /* src_mask */
355 MINUS_ONE, /* dst_mask */
356 FALSE), /* pcrel_offset */
357
358 /* Displacement in the global offset table. */
359 HOWTO (R_MIPS_GOT_DISP, /* type */
360 0, /* rightshift */
361 2, /* size (0 = byte, 1 = short, 2 = long) */
362 16, /* bitsize */
363 FALSE, /* pc_relative */
364 0, /* bitpos */
365 complain_overflow_signed, /* complain_on_overflow */
366 _bfd_mips_elf_generic_reloc, /* special_function */
367 "R_MIPS_GOT_DISP", /* name */
368 TRUE, /* partial_inplace */
369 0x0000ffff, /* src_mask */
370 0x0000ffff, /* dst_mask */
371 FALSE), /* pcrel_offset */
372
373 /* Displacement to page pointer in the global offset table. */
374 HOWTO (R_MIPS_GOT_PAGE, /* type */
375 0, /* rightshift */
376 2, /* size (0 = byte, 1 = short, 2 = long) */
377 16, /* bitsize */
378 FALSE, /* pc_relative */
379 0, /* bitpos */
380 complain_overflow_signed, /* complain_on_overflow */
381 _bfd_mips_elf_generic_reloc, /* special_function */
382 "R_MIPS_GOT_PAGE", /* name */
383 TRUE, /* partial_inplace */
384 0x0000ffff, /* src_mask */
385 0x0000ffff, /* dst_mask */
386 FALSE), /* pcrel_offset */
387
388 /* Offset from page pointer in the global offset table. */
389 HOWTO (R_MIPS_GOT_OFST, /* 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_mips_elf_generic_reloc, /* special_function */
397 "R_MIPS_GOT_OFST", /* name */
398 TRUE, /* partial_inplace */
399 0x0000ffff, /* src_mask */
400 0x0000ffff, /* dst_mask */
401 FALSE), /* pcrel_offset */
402
403 /* High 16 bits of displacement in global offset table. */
404 HOWTO (R_MIPS_GOT_HI16, /* 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_dont, /* complain_on_overflow */
411 _bfd_mips_elf_generic_reloc, /* special_function */
412 "R_MIPS_GOT_HI16", /* name */
413 TRUE, /* partial_inplace */
414 0x0000ffff, /* src_mask */
415 0x0000ffff, /* dst_mask */
416 FALSE), /* pcrel_offset */
417
418 /* Low 16 bits of displacement in global offset table. */
419 HOWTO (R_MIPS_GOT_LO16, /* 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_dont, /* complain_on_overflow */
426 _bfd_mips_elf_generic_reloc, /* special_function */
427 "R_MIPS_GOT_LO16", /* name */
428 TRUE, /* partial_inplace */
429 0x0000ffff, /* src_mask */
430 0x0000ffff, /* dst_mask */
431 FALSE), /* pcrel_offset */
432
433 /* 64 bit subtraction. Used in the N32 ABI. */
434 HOWTO (R_MIPS_SUB, /* type */
435 0, /* rightshift */
436 4, /* size (0 = byte, 1 = short, 2 = long) */
437 64, /* bitsize */
438 FALSE, /* pc_relative */
439 0, /* bitpos */
440 complain_overflow_dont, /* complain_on_overflow */
441 _bfd_mips_elf_generic_reloc, /* special_function */
442 "R_MIPS_SUB", /* name */
443 TRUE, /* partial_inplace */
444 MINUS_ONE, /* src_mask */
445 MINUS_ONE, /* dst_mask */
446 FALSE), /* pcrel_offset */
447
448 /* Used to cause the linker to insert and delete instructions? */
449 EMPTY_HOWTO (R_MIPS_INSERT_A),
450 EMPTY_HOWTO (R_MIPS_INSERT_B),
451 EMPTY_HOWTO (R_MIPS_DELETE),
452
453 /* Get the higher value of a 64 bit addend. */
454 HOWTO (R_MIPS_HIGHER, /* type */
455 0, /* rightshift */
456 2, /* size (0 = byte, 1 = short, 2 = long) */
457 16, /* bitsize */
458 FALSE, /* pc_relative */
459 0, /* bitpos */
460 complain_overflow_dont, /* complain_on_overflow */
461 _bfd_mips_elf_generic_reloc, /* special_function */
462 "R_MIPS_HIGHER", /* name */
463 TRUE, /* partial_inplace */
464 0x0000ffff, /* src_mask */
465 0x0000ffff, /* dst_mask */
466 FALSE), /* pcrel_offset */
467
468 /* Get the highest value of a 64 bit addend. */
469 HOWTO (R_MIPS_HIGHEST, /* type */
470 0, /* rightshift */
471 2, /* size (0 = byte, 1 = short, 2 = long) */
472 16, /* bitsize */
473 FALSE, /* pc_relative */
474 0, /* bitpos */
475 complain_overflow_dont, /* complain_on_overflow */
476 _bfd_mips_elf_generic_reloc, /* special_function */
477 "R_MIPS_HIGHEST", /* name */
478 TRUE, /* partial_inplace */
479 0x0000ffff, /* src_mask */
480 0x0000ffff, /* dst_mask */
481 FALSE), /* pcrel_offset */
482
483 /* High 16 bits of displacement in global offset table. */
484 HOWTO (R_MIPS_CALL_HI16, /* type */
485 0, /* rightshift */
486 2, /* size (0 = byte, 1 = short, 2 = long) */
487 16, /* bitsize */
488 FALSE, /* pc_relative */
489 0, /* bitpos */
490 complain_overflow_dont, /* complain_on_overflow */
491 _bfd_mips_elf_generic_reloc, /* special_function */
492 "R_MIPS_CALL_HI16", /* name */
493 TRUE, /* partial_inplace */
494 0x0000ffff, /* src_mask */
495 0x0000ffff, /* dst_mask */
496 FALSE), /* pcrel_offset */
497
498 /* Low 16 bits of displacement in global offset table. */
499 HOWTO (R_MIPS_CALL_LO16, /* type */
500 0, /* rightshift */
501 2, /* size (0 = byte, 1 = short, 2 = long) */
502 16, /* bitsize */
503 FALSE, /* pc_relative */
504 0, /* bitpos */
505 complain_overflow_dont, /* complain_on_overflow */
506 _bfd_mips_elf_generic_reloc, /* special_function */
507 "R_MIPS_CALL_LO16", /* name */
508 TRUE, /* partial_inplace */
509 0x0000ffff, /* src_mask */
510 0x0000ffff, /* dst_mask */
511 FALSE), /* pcrel_offset */
512
513 /* Section displacement. */
514 HOWTO (R_MIPS_SCN_DISP, /* type */
515 0, /* rightshift */
516 2, /* size (0 = byte, 1 = short, 2 = long) */
517 32, /* bitsize */
518 FALSE, /* pc_relative */
519 0, /* bitpos */
520 complain_overflow_dont, /* complain_on_overflow */
521 _bfd_mips_elf_generic_reloc, /* special_function */
522 "R_MIPS_SCN_DISP", /* name */
523 TRUE, /* partial_inplace */
524 0xffffffff, /* src_mask */
525 0xffffffff, /* dst_mask */
526 FALSE), /* pcrel_offset */
527
528 EMPTY_HOWTO (R_MIPS_REL16),
529 EMPTY_HOWTO (R_MIPS_ADD_IMMEDIATE),
530 EMPTY_HOWTO (R_MIPS_PJUMP),
531 EMPTY_HOWTO (R_MIPS_RELGOT),
532
533 /* Protected jump conversion. This is an optimization hint. No
534 relocation is required for correctness. */
535 HOWTO (R_MIPS_JALR, /* type */
536 0, /* rightshift */
537 2, /* size (0 = byte, 1 = short, 2 = long) */
538 32, /* bitsize */
539 FALSE, /* pc_relative */
540 0, /* bitpos */
541 complain_overflow_dont, /* complain_on_overflow */
542 _bfd_mips_elf_generic_reloc, /* special_function */
543 "R_MIPS_JALR", /* name */
544 FALSE, /* partial_inplace */
545 0x00000000, /* src_mask */
546 0x00000000, /* dst_mask */
547 FALSE), /* pcrel_offset */
548 };
549
550 /* The reloc used for BFD_RELOC_CTOR when doing a 64 bit link. This
551 is a hack to make the linker think that we need 64 bit values. */
552 static reloc_howto_type elf_mips_ctor64_howto =
553 HOWTO (R_MIPS_64, /* type */
554 0, /* rightshift */
555 4, /* size (0 = byte, 1 = short, 2 = long) */
556 32, /* bitsize */
557 FALSE, /* pc_relative */
558 0, /* bitpos */
559 complain_overflow_signed, /* complain_on_overflow */
560 mips32_64bit_reloc, /* special_function */
561 "R_MIPS_64", /* name */
562 TRUE, /* partial_inplace */
563 0xffffffff, /* src_mask */
564 0xffffffff, /* dst_mask */
565 FALSE); /* pcrel_offset */
566
567 static reloc_howto_type elf_mips16_howto_table_rel[] =
568 {
569 /* The reloc used for the mips16 jump instruction. */
570 HOWTO (R_MIPS16_26, /* type */
571 2, /* rightshift */
572 2, /* size (0 = byte, 1 = short, 2 = long) */
573 26, /* bitsize */
574 FALSE, /* pc_relative */
575 0, /* bitpos */
576 complain_overflow_dont, /* complain_on_overflow */
577 /* This needs complex overflow
578 detection, because the upper four
579 bits must match the PC. */
580 mips16_jump_reloc, /* special_function */
581 "R_MIPS16_26", /* name */
582 TRUE, /* partial_inplace */
583 0x3ffffff, /* src_mask */
584 0x3ffffff, /* dst_mask */
585 FALSE), /* pcrel_offset */
586
587 /* The reloc used for the mips16 gprel instruction. */
588 HOWTO (R_MIPS16_GPREL, /* type */
589 0, /* rightshift */
590 2, /* size (0 = byte, 1 = short, 2 = long) */
591 16, /* bitsize */
592 FALSE, /* pc_relative */
593 0, /* bitpos */
594 complain_overflow_signed, /* complain_on_overflow */
595 mips16_gprel_reloc, /* special_function */
596 "R_MIPS16_GPREL", /* name */
597 TRUE, /* partial_inplace */
598 0x0000ffff, /* src_mask */
599 0x0000ffff, /* dst_mask */
600 FALSE), /* pcrel_offset */
601
602 /* A placeholder for MIPS16 reference to global offset table. */
603 EMPTY_HOWTO (R_MIPS16_GOT16),
604
605 /* A placeholder for MIPS16 16 bit call through global offset table. */
606 EMPTY_HOWTO (R_MIPS16_CALL16),
607
608 /* MIPS16 high 16 bits of symbol value. */
609 HOWTO (R_MIPS16_HI16, /* type */
610 16, /* rightshift */
611 2, /* size (0 = byte, 1 = short, 2 = long) */
612 16, /* bitsize */
613 FALSE, /* pc_relative */
614 0, /* bitpos */
615 complain_overflow_dont, /* complain_on_overflow */
616 _bfd_mips_elf_hi16_reloc, /* special_function */
617 "R_MIPS16_HI16", /* name */
618 TRUE, /* partial_inplace */
619 0x0000ffff, /* src_mask */
620 0x0000ffff, /* dst_mask */
621 FALSE), /* pcrel_offset */
622
623 /* MIPS16 low 16 bits of symbol value. */
624 HOWTO (R_MIPS16_LO16, /* type */
625 0, /* rightshift */
626 2, /* size (0 = byte, 1 = short, 2 = long) */
627 16, /* bitsize */
628 FALSE, /* pc_relative */
629 0, /* bitpos */
630 complain_overflow_dont, /* complain_on_overflow */
631 _bfd_mips_elf_lo16_reloc, /* special_function */
632 "R_MIPS16_LO16", /* name */
633 TRUE, /* partial_inplace */
634 0x0000ffff, /* src_mask */
635 0x0000ffff, /* dst_mask */
636 FALSE), /* pcrel_offset */
637 };
638
639 /* 16 bit offset for pc-relative branches. */
640 static reloc_howto_type elf_mips_gnu_rel16_s2 =
641 HOWTO (R_MIPS_GNU_REL16_S2, /* type */
642 2, /* rightshift */
643 2, /* size (0 = byte, 1 = short, 2 = long) */
644 16, /* bitsize */
645 TRUE, /* pc_relative */
646 0, /* bitpos */
647 complain_overflow_signed, /* complain_on_overflow */
648 _bfd_mips_elf_generic_reloc, /* special_function */
649 "R_MIPS_GNU_REL16_S2", /* name */
650 TRUE, /* partial_inplace */
651 0xffff, /* src_mask */
652 0xffff, /* dst_mask */
653 TRUE); /* pcrel_offset */
654
655 /* 32 bit pc-relative. This was a GNU extension used by embedded-PIC.
656 It was co-opted by mips-linux for exception-handling data. It is no
657 longer used, but should continue to be supported by the linker for
658 backward compatibility. (GCC stopped using it in May, 2004.) */
659 static reloc_howto_type elf_mips_gnu_pcrel32 =
660 HOWTO (R_MIPS_PC32, /* type */
661 0, /* rightshift */
662 2, /* size (0 = byte, 1 = short, 2 = long) */
663 32, /* bitsize */
664 TRUE, /* pc_relative */
665 0, /* bitpos */
666 complain_overflow_signed, /* complain_on_overflow */
667 _bfd_mips_elf_generic_reloc, /* special_function */
668 "R_MIPS_PC32", /* name */
669 TRUE, /* partial_inplace */
670 0xffffffff, /* src_mask */
671 0xffffffff, /* dst_mask */
672 TRUE); /* pcrel_offset */
673
674 /* GNU extension to record C++ vtable hierarchy */
675 static reloc_howto_type elf_mips_gnu_vtinherit_howto =
676 HOWTO (R_MIPS_GNU_VTINHERIT, /* type */
677 0, /* rightshift */
678 2, /* size (0 = byte, 1 = short, 2 = long) */
679 0, /* bitsize */
680 FALSE, /* pc_relative */
681 0, /* bitpos */
682 complain_overflow_dont, /* complain_on_overflow */
683 NULL, /* special_function */
684 "R_MIPS_GNU_VTINHERIT", /* name */
685 FALSE, /* partial_inplace */
686 0, /* src_mask */
687 0, /* dst_mask */
688 FALSE); /* pcrel_offset */
689
690 /* GNU extension to record C++ vtable member usage */
691 static reloc_howto_type elf_mips_gnu_vtentry_howto =
692 HOWTO (R_MIPS_GNU_VTENTRY, /* type */
693 0, /* rightshift */
694 2, /* size (0 = byte, 1 = short, 2 = long) */
695 0, /* bitsize */
696 FALSE, /* pc_relative */
697 0, /* bitpos */
698 complain_overflow_dont, /* complain_on_overflow */
699 _bfd_elf_rel_vtable_reloc_fn, /* special_function */
700 "R_MIPS_GNU_VTENTRY", /* name */
701 FALSE, /* partial_inplace */
702 0, /* src_mask */
703 0, /* dst_mask */
704 FALSE); /* pcrel_offset */
705
706 /* Set the GP value for OUTPUT_BFD. Returns FALSE if this is a
707 dangerous relocation. */
708
709 static bfd_boolean
710 mips_elf_assign_gp (bfd *output_bfd, bfd_vma *pgp)
711 {
712 unsigned int count;
713 asymbol **sym;
714 unsigned int i;
715
716 /* If we've already figured out what GP will be, just return it. */
717 *pgp = _bfd_get_gp_value (output_bfd);
718 if (*pgp)
719 return TRUE;
720
721 count = bfd_get_symcount (output_bfd);
722 sym = bfd_get_outsymbols (output_bfd);
723
724 /* The linker script will have created a symbol named `_gp' with the
725 appropriate value. */
726 if (sym == NULL)
727 i = count;
728 else
729 {
730 for (i = 0; i < count; i++, sym++)
731 {
732 register const char *name;
733
734 name = bfd_asymbol_name (*sym);
735 if (*name == '_' && strcmp (name, "_gp") == 0)
736 {
737 *pgp = bfd_asymbol_value (*sym);
738 _bfd_set_gp_value (output_bfd, *pgp);
739 break;
740 }
741 }
742 }
743
744 if (i >= count)
745 {
746 /* Only get the error once. */
747 *pgp = 4;
748 _bfd_set_gp_value (output_bfd, *pgp);
749 return FALSE;
750 }
751
752 return TRUE;
753 }
754
755 /* We have to figure out the gp value, so that we can adjust the
756 symbol value correctly. We look up the symbol _gp in the output
757 BFD. If we can't find it, we're stuck. We cache it in the ELF
758 target data. We don't need to adjust the symbol value for an
759 external symbol if we are producing relocatable output. */
760
761 static bfd_reloc_status_type
762 mips_elf_final_gp (bfd *output_bfd, asymbol *symbol, bfd_boolean relocatable,
763 char **error_message, bfd_vma *pgp)
764 {
765 if (bfd_is_und_section (symbol->section)
766 && ! relocatable)
767 {
768 *pgp = 0;
769 return bfd_reloc_undefined;
770 }
771
772 *pgp = _bfd_get_gp_value (output_bfd);
773 if (*pgp == 0
774 && (! relocatable
775 || (symbol->flags & BSF_SECTION_SYM) != 0))
776 {
777 if (relocatable)
778 {
779 /* Make up a value. */
780 *pgp = symbol->section->output_section->vma + 0x4000;
781 _bfd_set_gp_value (output_bfd, *pgp);
782 }
783 else if (!mips_elf_assign_gp (output_bfd, pgp))
784 {
785 *error_message =
786 (char *) _("GP relative relocation when _gp not defined");
787 return bfd_reloc_dangerous;
788 }
789 }
790
791 return bfd_reloc_ok;
792 }
793
794 /* Do a R_MIPS_GPREL16 relocation. This is a 16 bit value which must
795 become the offset from the gp register. This function also handles
796 R_MIPS_LITERAL relocations, although those can be handled more
797 cleverly because the entries in the .lit8 and .lit4 sections can be
798 merged. */
799
800 bfd_reloc_status_type
801 _bfd_mips_elf32_gprel16_reloc (bfd *abfd, arelent *reloc_entry,
802 asymbol *symbol, void *data,
803 asection *input_section, bfd *output_bfd,
804 char **error_message)
805 {
806 bfd_boolean relocatable;
807 bfd_reloc_status_type ret;
808 bfd_vma gp;
809
810 /* R_MIPS_LITERAL relocations are defined for local symbols only. */
811 if (reloc_entry->howto->type == R_MIPS_LITERAL
812 && output_bfd != NULL
813 && (symbol->flags & BSF_SECTION_SYM) == 0
814 && (symbol->flags & BSF_LOCAL) != 0)
815 {
816 *error_message = (char *)
817 _("literal relocation occurs for an external symbol");
818 return bfd_reloc_outofrange;
819 }
820
821 if (output_bfd != NULL)
822 relocatable = TRUE;
823 else
824 {
825 relocatable = FALSE;
826 output_bfd = symbol->section->output_section->owner;
827 }
828
829 ret = mips_elf_final_gp (output_bfd, symbol, relocatable, error_message,
830 &gp);
831 if (ret != bfd_reloc_ok)
832 return ret;
833
834 return _bfd_mips_elf_gprel16_with_gp (abfd, symbol, reloc_entry,
835 input_section, relocatable,
836 data, gp);
837 }
838
839 /* Do a R_MIPS_GPREL32 relocation. This is a 32 bit value which must
840 become the offset from the gp register. */
841
842 static bfd_reloc_status_type
843 mips_elf_gprel32_reloc (bfd *abfd, arelent *reloc_entry, asymbol *symbol,
844 void *data, asection *input_section, bfd *output_bfd,
845 char **error_message)
846 {
847 bfd_boolean relocatable;
848 bfd_reloc_status_type ret;
849 bfd_vma gp;
850
851 /* R_MIPS_GPREL32 relocations are defined for local symbols only. */
852 if (output_bfd != NULL
853 && (symbol->flags & BSF_SECTION_SYM) == 0
854 && (symbol->flags & BSF_LOCAL) != 0)
855 {
856 *error_message = (char *)
857 _("32bits gp relative relocation occurs for an external symbol");
858 return bfd_reloc_outofrange;
859 }
860
861 if (output_bfd != NULL)
862 relocatable = TRUE;
863 else
864 {
865 relocatable = FALSE;
866 output_bfd = symbol->section->output_section->owner;
867 }
868
869 ret = mips_elf_final_gp (output_bfd, symbol, relocatable,
870 error_message, &gp);
871 if (ret != bfd_reloc_ok)
872 return ret;
873
874 return gprel32_with_gp (abfd, symbol, reloc_entry, input_section,
875 relocatable, data, gp);
876 }
877
878 static bfd_reloc_status_type
879 gprel32_with_gp (bfd *abfd, asymbol *symbol, arelent *reloc_entry,
880 asection *input_section, bfd_boolean relocatable,
881 void *data, bfd_vma gp)
882 {
883 bfd_vma relocation;
884 bfd_vma val;
885
886 if (bfd_is_com_section (symbol->section))
887 relocation = 0;
888 else
889 relocation = symbol->value;
890
891 relocation += symbol->section->output_section->vma;
892 relocation += symbol->section->output_offset;
893
894 if (reloc_entry->address > bfd_get_section_limit (abfd, input_section))
895 return bfd_reloc_outofrange;
896
897 /* Set val to the offset into the section or symbol. */
898 val = reloc_entry->addend;
899
900 if (reloc_entry->howto->partial_inplace)
901 val += bfd_get_32 (abfd, (bfd_byte *) data + reloc_entry->address);
902
903 /* Adjust val for the final section location and GP value. If we
904 are producing relocatable output, we don't want to do this for
905 an external symbol. */
906 if (! relocatable
907 || (symbol->flags & BSF_SECTION_SYM) != 0)
908 val += relocation - gp;
909
910 if (reloc_entry->howto->partial_inplace)
911 bfd_put_32 (abfd, val, (bfd_byte *) data + reloc_entry->address);
912 else
913 reloc_entry->addend = val;
914
915 if (relocatable)
916 reloc_entry->address += input_section->output_offset;
917
918 return bfd_reloc_ok;
919 }
920
921 /* Handle a 64 bit reloc in a 32 bit MIPS ELF file. These are
922 generated when addresses are 64 bits. The upper 32 bits are a simple
923 sign extension. */
924
925 static bfd_reloc_status_type
926 mips32_64bit_reloc (bfd *abfd, arelent *reloc_entry,
927 asymbol *symbol ATTRIBUTE_UNUSED,
928 void *data, asection *input_section,
929 bfd *output_bfd, char **error_message)
930 {
931 bfd_reloc_status_type r;
932 arelent reloc32;
933 unsigned long val;
934 bfd_size_type addr;
935
936 /* Do a normal 32 bit relocation on the lower 32 bits. */
937 reloc32 = *reloc_entry;
938 if (bfd_big_endian (abfd))
939 reloc32.address += 4;
940 reloc32.howto = &elf_mips_howto_table_rel[R_MIPS_32];
941 r = bfd_perform_relocation (abfd, &reloc32, data, input_section,
942 output_bfd, error_message);
943
944 /* Sign extend into the upper 32 bits. */
945 val = bfd_get_32 (abfd, (bfd_byte *) data + reloc32.address);
946 if ((val & 0x80000000) != 0)
947 val = 0xffffffff;
948 else
949 val = 0;
950 addr = reloc_entry->address;
951 if (bfd_little_endian (abfd))
952 addr += 4;
953 bfd_put_32 (abfd, val, (bfd_byte *) data + addr);
954
955 return r;
956 }
957
958 /* Handle a mips16 jump. */
959
960 static bfd_reloc_status_type
961 mips16_jump_reloc (bfd *abfd ATTRIBUTE_UNUSED, arelent *reloc_entry,
962 asymbol *symbol, void *data ATTRIBUTE_UNUSED,
963 asection *input_section, bfd *output_bfd,
964 char **error_message ATTRIBUTE_UNUSED)
965 {
966 if (output_bfd != NULL
967 && (symbol->flags & BSF_SECTION_SYM) == 0
968 && reloc_entry->addend == 0)
969 {
970 reloc_entry->address += input_section->output_offset;
971 return bfd_reloc_ok;
972 }
973
974 /* FIXME. */
975 {
976 static bfd_boolean warned;
977
978 if (! warned)
979 (*_bfd_error_handler)
980 (_("Linking mips16 objects into %s format is not supported"),
981 bfd_get_target (input_section->output_section->owner));
982 warned = TRUE;
983 }
984
985 return bfd_reloc_undefined;
986 }
987
988 /* Handle a mips16 GP relative reloc. */
989
990 static bfd_reloc_status_type
991 mips16_gprel_reloc (bfd *abfd, arelent *reloc_entry, asymbol *symbol,
992 void *data, asection *input_section, bfd *output_bfd,
993 char **error_message)
994 {
995 bfd_boolean relocatable;
996 bfd_reloc_status_type ret;
997 bfd_byte *location;
998 bfd_vma gp;
999
1000 /* If we're relocating, and this is an external symbol, we don't want
1001 to change anything. */
1002 if (output_bfd != NULL
1003 && (symbol->flags & BSF_SECTION_SYM) == 0
1004 && (symbol->flags & BSF_LOCAL) != 0)
1005 {
1006 reloc_entry->address += input_section->output_offset;
1007 return bfd_reloc_ok;
1008 }
1009
1010 if (output_bfd != NULL)
1011 relocatable = TRUE;
1012 else
1013 {
1014 relocatable = FALSE;
1015 output_bfd = symbol->section->output_section->owner;
1016 }
1017
1018 ret = mips_elf_final_gp (output_bfd, symbol, relocatable, error_message,
1019 &gp);
1020 if (ret != bfd_reloc_ok)
1021 return ret;
1022
1023 location = (bfd_byte *) data + reloc_entry->address;
1024 _bfd_mips16_elf_reloc_unshuffle (abfd, reloc_entry->howto->type, FALSE,
1025 location);
1026 ret = _bfd_mips_elf_gprel16_with_gp (abfd, symbol, reloc_entry,
1027 input_section, relocatable,
1028 data, gp);
1029 _bfd_mips16_elf_reloc_shuffle (abfd, reloc_entry->howto->type, !relocatable,
1030 location);
1031
1032 return ret;
1033 }
1034
1035 /* A mapping from BFD reloc types to MIPS ELF reloc types. */
1036
1037 struct elf_reloc_map {
1038 bfd_reloc_code_real_type bfd_val;
1039 enum elf_mips_reloc_type elf_val;
1040 };
1041
1042 static const struct elf_reloc_map mips_reloc_map[] =
1043 {
1044 { BFD_RELOC_NONE, R_MIPS_NONE },
1045 { BFD_RELOC_16, R_MIPS_16 },
1046 { BFD_RELOC_32, R_MIPS_32 },
1047 /* There is no BFD reloc for R_MIPS_REL32. */
1048 { BFD_RELOC_64, R_MIPS_64 },
1049 { BFD_RELOC_MIPS_JMP, R_MIPS_26 },
1050 { BFD_RELOC_HI16_S, R_MIPS_HI16 },
1051 { BFD_RELOC_LO16, R_MIPS_LO16 },
1052 { BFD_RELOC_GPREL16, R_MIPS_GPREL16 },
1053 { BFD_RELOC_MIPS_LITERAL, R_MIPS_LITERAL },
1054 { BFD_RELOC_MIPS_GOT16, R_MIPS_GOT16 },
1055 { BFD_RELOC_16_PCREL, R_MIPS_PC16 },
1056 { BFD_RELOC_MIPS_CALL16, R_MIPS_CALL16 },
1057 { BFD_RELOC_GPREL32, R_MIPS_GPREL32 },
1058 { BFD_RELOC_MIPS_GOT_HI16, R_MIPS_GOT_HI16 },
1059 { BFD_RELOC_MIPS_GOT_LO16, R_MIPS_GOT_LO16 },
1060 { BFD_RELOC_MIPS_CALL_HI16, R_MIPS_CALL_HI16 },
1061 { BFD_RELOC_MIPS_CALL_LO16, R_MIPS_CALL_LO16 },
1062 { BFD_RELOC_MIPS_SUB, R_MIPS_SUB },
1063 { BFD_RELOC_MIPS_GOT_PAGE, R_MIPS_GOT_PAGE },
1064 { BFD_RELOC_MIPS_GOT_OFST, R_MIPS_GOT_OFST },
1065 { BFD_RELOC_MIPS_GOT_DISP, R_MIPS_GOT_DISP }
1066 };
1067
1068 static const struct elf_reloc_map mips16_reloc_map[] =
1069 {
1070 { BFD_RELOC_MIPS16_JMP, R_MIPS16_26 - R_MIPS16_min },
1071 { BFD_RELOC_MIPS16_GPREL, R_MIPS16_GPREL - R_MIPS16_min },
1072 { BFD_RELOC_MIPS16_HI16_S, R_MIPS16_HI16 - R_MIPS16_min },
1073 { BFD_RELOC_MIPS16_LO16, R_MIPS16_LO16 - R_MIPS16_min },
1074 };
1075
1076 /* Given a BFD reloc type, return a howto structure. */
1077
1078 static reloc_howto_type *
1079 bfd_elf32_bfd_reloc_type_lookup (bfd *abfd, bfd_reloc_code_real_type code)
1080 {
1081 unsigned int i;
1082 reloc_howto_type *howto_table = elf_mips_howto_table_rel;
1083 reloc_howto_type *howto16_table = elf_mips16_howto_table_rel;
1084
1085 for (i = 0; i < sizeof (mips_reloc_map) / sizeof (struct elf_reloc_map);
1086 i++)
1087 {
1088 if (mips_reloc_map[i].bfd_val == code)
1089 return &howto_table[(int) mips_reloc_map[i].elf_val];
1090 }
1091
1092 for (i = 0; i < sizeof (mips16_reloc_map) / sizeof (struct elf_reloc_map);
1093 i++)
1094 {
1095 if (mips16_reloc_map[i].bfd_val == code)
1096 return &howto16_table[(int) mips16_reloc_map[i].elf_val];
1097 }
1098
1099 switch (code)
1100 {
1101 default:
1102 bfd_set_error (bfd_error_bad_value);
1103 return NULL;
1104
1105 case BFD_RELOC_CTOR:
1106 /* We need to handle BFD_RELOC_CTOR specially.
1107 Select the right relocation (R_MIPS_32 or R_MIPS_64) based on the
1108 size of addresses of the ABI. */
1109 if ((elf_elfheader (abfd)->e_flags & (E_MIPS_ABI_O64
1110 | E_MIPS_ABI_EABI64)) != 0)
1111 return &elf_mips_ctor64_howto;
1112 else
1113 return &howto_table[(int) R_MIPS_32];
1114
1115 case BFD_RELOC_VTABLE_INHERIT:
1116 return &elf_mips_gnu_vtinherit_howto;
1117 case BFD_RELOC_VTABLE_ENTRY:
1118 return &elf_mips_gnu_vtentry_howto;
1119 case BFD_RELOC_16_PCREL_S2:
1120 return &elf_mips_gnu_rel16_s2;
1121 case BFD_RELOC_32_PCREL:
1122 return &elf_mips_gnu_pcrel32;
1123 }
1124 }
1125
1126 /* Given a MIPS Elf_Internal_Rel, fill in an arelent structure. */
1127
1128 static reloc_howto_type *
1129 mips_elf32_rtype_to_howto (unsigned int r_type,
1130 bfd_boolean rela_p ATTRIBUTE_UNUSED)
1131 {
1132 switch (r_type)
1133 {
1134 case R_MIPS_GNU_VTINHERIT:
1135 return &elf_mips_gnu_vtinherit_howto;
1136 case R_MIPS_GNU_VTENTRY:
1137 return &elf_mips_gnu_vtentry_howto;
1138 case R_MIPS_GNU_REL16_S2:
1139 return &elf_mips_gnu_rel16_s2;
1140 case R_MIPS_PC32:
1141 return &elf_mips_gnu_pcrel32;
1142 default:
1143 if (r_type >= R_MIPS16_min && r_type < R_MIPS16_max)
1144 return &elf_mips16_howto_table_rel[r_type - R_MIPS16_min];
1145 BFD_ASSERT (r_type < (unsigned int) R_MIPS_max);
1146 return &elf_mips_howto_table_rel[r_type];
1147 }
1148 }
1149
1150 /* Given a MIPS Elf_Internal_Rel, fill in an arelent structure. */
1151
1152 static void
1153 mips_info_to_howto_rel (bfd *abfd, arelent *cache_ptr, Elf_Internal_Rela *dst)
1154 {
1155 unsigned int r_type;
1156
1157 r_type = ELF32_R_TYPE (dst->r_info);
1158 cache_ptr->howto = mips_elf32_rtype_to_howto (r_type, FALSE);
1159
1160 /* The addend for a GPREL16 or LITERAL relocation comes from the GP
1161 value for the object file. We get the addend now, rather than
1162 when we do the relocation, because the symbol manipulations done
1163 by the linker may cause us to lose track of the input BFD. */
1164 if (((*cache_ptr->sym_ptr_ptr)->flags & BSF_SECTION_SYM) != 0
1165 && (r_type == (unsigned int) R_MIPS_GPREL16
1166 || r_type == (unsigned int) R_MIPS_LITERAL))
1167 cache_ptr->addend = elf_gp (abfd);
1168 }
1169
1170 /* Given a MIPS Elf_Internal_Rela, fill in an arelent structure. */
1171
1172 static void
1173 mips_info_to_howto_rela (bfd *abfd, arelent *cache_ptr, Elf_Internal_Rela *dst)
1174 {
1175 mips_info_to_howto_rel (abfd, cache_ptr, dst);
1176
1177 /* If we ever need to do any extra processing with dst->r_addend
1178 (the field omitted in an Elf_Internal_Rel) we can do it here. */
1179 }
1180 \f
1181 /* Determine whether a symbol is global for the purposes of splitting
1182 the symbol table into global symbols and local symbols. At least
1183 on Irix 5, this split must be between section symbols and all other
1184 symbols. On most ELF targets the split is between static symbols
1185 and externally visible symbols. */
1186
1187 static bfd_boolean
1188 mips_elf_sym_is_global (bfd *abfd ATTRIBUTE_UNUSED, asymbol *sym)
1189 {
1190 if (SGI_COMPAT (abfd))
1191 return (sym->flags & BSF_SECTION_SYM) == 0;
1192 else
1193 return ((sym->flags & (BSF_GLOBAL | BSF_WEAK)) != 0
1194 || bfd_is_und_section (bfd_get_section (sym))
1195 || bfd_is_com_section (bfd_get_section (sym)));
1196 }
1197 \f
1198 /* Set the right machine number for a MIPS ELF file. */
1199
1200 static bfd_boolean
1201 mips_elf32_object_p (bfd *abfd)
1202 {
1203 unsigned long mach;
1204
1205 /* Irix 5 and 6 are broken. Object file symbol tables are not always
1206 sorted correctly such that local symbols precede global symbols,
1207 and the sh_info field in the symbol table is not always right. */
1208 if (SGI_COMPAT (abfd))
1209 elf_bad_symtab (abfd) = TRUE;
1210
1211 if (ABI_N32_P (abfd))
1212 return FALSE;
1213
1214 mach = _bfd_elf_mips_mach (elf_elfheader (abfd)->e_flags);
1215 bfd_default_set_arch_mach (abfd, bfd_arch_mips, mach);
1216
1217 return TRUE;
1218 }
1219 \f
1220 /* MIPS ELF local labels start with '$', not 'L'. */
1221
1222 static bfd_boolean
1223 mips_elf_is_local_label_name (bfd *abfd, const char *name)
1224 {
1225 if (name[0] == '$')
1226 return TRUE;
1227
1228 /* On Irix 6, the labels go back to starting with '.', so we accept
1229 the generic ELF local label syntax as well. */
1230 return _bfd_elf_is_local_label_name (abfd, name);
1231 }
1232 \f
1233 /* Support for core dump NOTE sections. */
1234 static bfd_boolean
1235 elf32_mips_grok_prstatus (bfd *abfd, Elf_Internal_Note *note)
1236 {
1237 int offset;
1238 unsigned int size;
1239
1240 switch (note->descsz)
1241 {
1242 default:
1243 return FALSE;
1244
1245 case 256: /* Linux/MIPS */
1246 /* pr_cursig */
1247 elf_tdata (abfd)->core_signal = bfd_get_16 (abfd, note->descdata + 12);
1248
1249 /* pr_pid */
1250 elf_tdata (abfd)->core_pid = bfd_get_32 (abfd, note->descdata + 24);
1251
1252 /* pr_reg */
1253 offset = 72;
1254 size = 180;
1255
1256 break;
1257 }
1258
1259 /* Make a ".reg/999" section. */
1260 return _bfd_elfcore_make_pseudosection (abfd, ".reg",
1261 size, note->descpos + offset);
1262 }
1263
1264 static bfd_boolean
1265 elf32_mips_grok_psinfo (bfd *abfd, Elf_Internal_Note *note)
1266 {
1267 switch (note->descsz)
1268 {
1269 default:
1270 return FALSE;
1271
1272 case 128: /* Linux/MIPS elf_prpsinfo */
1273 elf_tdata (abfd)->core_program
1274 = _bfd_elfcore_strndup (abfd, note->descdata + 32, 16);
1275 elf_tdata (abfd)->core_command
1276 = _bfd_elfcore_strndup (abfd, note->descdata + 48, 80);
1277 }
1278
1279 /* Note that for some reason, a spurious space is tacked
1280 onto the end of the args in some (at least one anyway)
1281 implementations, so strip it off if it exists. */
1282
1283 {
1284 char *command = elf_tdata (abfd)->core_command;
1285 int n = strlen (command);
1286
1287 if (0 < n && command[n - 1] == ' ')
1288 command[n - 1] = '\0';
1289 }
1290
1291 return TRUE;
1292 }
1293 \f
1294 /* Depending on the target vector we generate some version of Irix
1295 executables or "normal" MIPS ELF ABI executables. */
1296 static irix_compat_t
1297 elf32_mips_irix_compat (bfd *abfd)
1298 {
1299 if ((abfd->xvec == &bfd_elf32_bigmips_vec)
1300 || (abfd->xvec == &bfd_elf32_littlemips_vec))
1301 return ict_irix5;
1302 else
1303 return ict_none;
1304 }
1305 \f
1306 /* ECOFF swapping routines. These are used when dealing with the
1307 .mdebug section, which is in the ECOFF debugging format. */
1308 static const struct ecoff_debug_swap mips_elf32_ecoff_debug_swap = {
1309 /* Symbol table magic number. */
1310 magicSym,
1311 /* Alignment of debugging information. E.g., 4. */
1312 4,
1313 /* Sizes of external symbolic information. */
1314 sizeof (struct hdr_ext),
1315 sizeof (struct dnr_ext),
1316 sizeof (struct pdr_ext),
1317 sizeof (struct sym_ext),
1318 sizeof (struct opt_ext),
1319 sizeof (struct fdr_ext),
1320 sizeof (struct rfd_ext),
1321 sizeof (struct ext_ext),
1322 /* Functions to swap in external symbolic data. */
1323 ecoff_swap_hdr_in,
1324 ecoff_swap_dnr_in,
1325 ecoff_swap_pdr_in,
1326 ecoff_swap_sym_in,
1327 ecoff_swap_opt_in,
1328 ecoff_swap_fdr_in,
1329 ecoff_swap_rfd_in,
1330 ecoff_swap_ext_in,
1331 _bfd_ecoff_swap_tir_in,
1332 _bfd_ecoff_swap_rndx_in,
1333 /* Functions to swap out external symbolic data. */
1334 ecoff_swap_hdr_out,
1335 ecoff_swap_dnr_out,
1336 ecoff_swap_pdr_out,
1337 ecoff_swap_sym_out,
1338 ecoff_swap_opt_out,
1339 ecoff_swap_fdr_out,
1340 ecoff_swap_rfd_out,
1341 ecoff_swap_ext_out,
1342 _bfd_ecoff_swap_tir_out,
1343 _bfd_ecoff_swap_rndx_out,
1344 /* Function to read in symbolic data. */
1345 _bfd_mips_elf_read_ecoff_info
1346 };
1347 \f
1348 #define ELF_ARCH bfd_arch_mips
1349 #define ELF_MACHINE_CODE EM_MIPS
1350
1351 #define elf_backend_collect TRUE
1352 #define elf_backend_type_change_ok TRUE
1353 #define elf_backend_can_gc_sections TRUE
1354 #define elf_info_to_howto mips_info_to_howto_rela
1355 #define elf_info_to_howto_rel mips_info_to_howto_rel
1356 #define elf_backend_sym_is_global mips_elf_sym_is_global
1357 #define elf_backend_object_p mips_elf32_object_p
1358 #define elf_backend_symbol_processing _bfd_mips_elf_symbol_processing
1359 #define elf_backend_section_processing _bfd_mips_elf_section_processing
1360 #define elf_backend_section_from_shdr _bfd_mips_elf_section_from_shdr
1361 #define elf_backend_fake_sections _bfd_mips_elf_fake_sections
1362 #define elf_backend_section_from_bfd_section \
1363 _bfd_mips_elf_section_from_bfd_section
1364 #define elf_backend_add_symbol_hook _bfd_mips_elf_add_symbol_hook
1365 #define elf_backend_link_output_symbol_hook \
1366 _bfd_mips_elf_link_output_symbol_hook
1367 #define elf_backend_create_dynamic_sections \
1368 _bfd_mips_elf_create_dynamic_sections
1369 #define elf_backend_check_relocs _bfd_mips_elf_check_relocs
1370 #define elf_backend_adjust_dynamic_symbol \
1371 _bfd_mips_elf_adjust_dynamic_symbol
1372 #define elf_backend_always_size_sections \
1373 _bfd_mips_elf_always_size_sections
1374 #define elf_backend_size_dynamic_sections \
1375 _bfd_mips_elf_size_dynamic_sections
1376 #define elf_backend_relocate_section _bfd_mips_elf_relocate_section
1377 #define elf_backend_finish_dynamic_symbol \
1378 _bfd_mips_elf_finish_dynamic_symbol
1379 #define elf_backend_finish_dynamic_sections \
1380 _bfd_mips_elf_finish_dynamic_sections
1381 #define elf_backend_final_write_processing \
1382 _bfd_mips_elf_final_write_processing
1383 #define elf_backend_additional_program_headers \
1384 _bfd_mips_elf_additional_program_headers
1385 #define elf_backend_modify_segment_map _bfd_mips_elf_modify_segment_map
1386 #define elf_backend_gc_mark_hook _bfd_mips_elf_gc_mark_hook
1387 #define elf_backend_gc_sweep_hook _bfd_mips_elf_gc_sweep_hook
1388 #define elf_backend_copy_indirect_symbol \
1389 _bfd_mips_elf_copy_indirect_symbol
1390 #define elf_backend_hide_symbol _bfd_mips_elf_hide_symbol
1391 #define elf_backend_grok_prstatus elf32_mips_grok_prstatus
1392 #define elf_backend_grok_psinfo elf32_mips_grok_psinfo
1393 #define elf_backend_ecoff_debug_swap &mips_elf32_ecoff_debug_swap
1394
1395 #define elf_backend_got_header_size (4 * MIPS_RESERVED_GOTNO)
1396 #define elf_backend_may_use_rel_p 1
1397 #define elf_backend_may_use_rela_p 0
1398 #define elf_backend_default_use_rela_p 0
1399 #define elf_backend_sign_extend_vma TRUE
1400
1401 #define elf_backend_discard_info _bfd_mips_elf_discard_info
1402 #define elf_backend_ignore_discarded_relocs \
1403 _bfd_mips_elf_ignore_discarded_relocs
1404 #define elf_backend_mips_irix_compat elf32_mips_irix_compat
1405 #define elf_backend_mips_rtype_to_howto mips_elf32_rtype_to_howto
1406 #define bfd_elf32_bfd_is_local_label_name \
1407 mips_elf_is_local_label_name
1408 #define bfd_elf32_find_nearest_line _bfd_mips_elf_find_nearest_line
1409 #define bfd_elf32_new_section_hook _bfd_mips_elf_new_section_hook
1410 #define bfd_elf32_set_section_contents _bfd_mips_elf_set_section_contents
1411 #define bfd_elf32_bfd_get_relocated_section_contents \
1412 _bfd_elf_mips_get_relocated_section_contents
1413 #define bfd_elf32_bfd_link_hash_table_create \
1414 _bfd_mips_elf_link_hash_table_create
1415 #define bfd_elf32_bfd_final_link _bfd_mips_elf_final_link
1416 #define bfd_elf32_bfd_merge_private_bfd_data \
1417 _bfd_mips_elf_merge_private_bfd_data
1418 #define bfd_elf32_bfd_set_private_flags _bfd_mips_elf_set_private_flags
1419 #define bfd_elf32_bfd_print_private_bfd_data \
1420 _bfd_mips_elf_print_private_bfd_data
1421
1422 /* Support for SGI-ish mips targets. */
1423 #define TARGET_LITTLE_SYM bfd_elf32_littlemips_vec
1424 #define TARGET_LITTLE_NAME "elf32-littlemips"
1425 #define TARGET_BIG_SYM bfd_elf32_bigmips_vec
1426 #define TARGET_BIG_NAME "elf32-bigmips"
1427
1428 /* The SVR4 MIPS ABI says that this should be 0x10000, but Irix 5 uses
1429 a value of 0x1000, and we are compatible. */
1430 #define ELF_MAXPAGESIZE 0x1000
1431
1432 #include "elf32-target.h"
1433
1434 /* Support for traditional mips targets. */
1435 #undef TARGET_LITTLE_SYM
1436 #undef TARGET_LITTLE_NAME
1437 #undef TARGET_BIG_SYM
1438 #undef TARGET_BIG_NAME
1439
1440 #undef ELF_MAXPAGESIZE
1441
1442 #define TARGET_LITTLE_SYM bfd_elf32_tradlittlemips_vec
1443 #define TARGET_LITTLE_NAME "elf32-tradlittlemips"
1444 #define TARGET_BIG_SYM bfd_elf32_tradbigmips_vec
1445 #define TARGET_BIG_NAME "elf32-tradbigmips"
1446
1447 /* The SVR4 MIPS ABI says that this should be 0x10000, and Linux uses
1448 page sizes of up to that limit, so we need to respect it. */
1449 #define ELF_MAXPAGESIZE 0x10000
1450 #define elf32_bed elf32_tradbed
1451
1452 /* Include the target file again for this target. */
1453 #include "elf32-target.h"
This page took 0.115941 seconds and 3 git commands to generate.