| blob | 958529125bb2611f09d112f9d5b2d60ecd6a7611 |
1 /* MIPS-specific support for 32-bit ELF
2 Copyright 1993, 94, 95, 96, 97, 98, 1999 Free Software Foundation, Inc.
4 Most of the information added by Ian Lance Taylor, Cygnus Support,
5 <ian@cygnus.com>.
7 This file is part of BFD, the Binary File Descriptor library.
9 This program is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 2 of the License, or
12 (at your option) any later version.
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
19 You should have received a copy of the GNU General Public License
20 along with this program; if not, write to the Free Software
21 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
23 /* This file handles MIPS ELF targets. SGI Irix 5 uses a slightly
24 different MIPS ELF from other targets. This matters when linking.
25 This file supports both, switching at runtime. */
35 /* Get the ECOFF swapping routines. */
41 #define ECOFF_32
44 /* This structure is used to hold .got information when linking. It
45 is stored in the tdata field of the bfd_elf_section_data structure. */
47 struct mips_got_info
48 {
49 /* The global symbol in the GOT with the lowest index in the dynamic
50 symbol table. */
52 /* The number of local .got entries. */
54 /* The number of local .got entries we have used. */
56 };
58 /* The MIPS ELF linker needs additional information for each symbol in
59 the global hash table. */
61 struct mips_elf_link_hash_entry
62 {
65 /* External symbol information. */
66 EXTR esym;
68 /* Number of MIPS_32 or MIPS_REL32 relocs against this symbol. */
71 /* The index of the first dynamic relocation (in the .rel.dyn
72 section) against this symbol. */
75 /* If there is a stub that 32 bit functions should use to call this
76 16 bit function, this points to the section containing the stub. */
79 /* Whether we need the fn_stub; this is set if this symbol appears
80 in any relocs other than a 16 bit call. */
81 boolean need_fn_stub;
83 /* If there is a stub that 16 bit functions should use to call this
84 32 bit function, this points to the section containing the stub. */
87 /* This is like the call_stub field, but it is used if the function
88 being called returns a floating point value. */
90 };
92 static bfd_reloc_status_type mips32_64bit_reloc
96 static void mips_info_to_howto_rel
98 static void mips_info_to_howto_rela
100 static void bfd_mips_elf32_swap_gptab_in
102 static void bfd_mips_elf32_swap_gptab_out
104 static void bfd_mips_elf_swap_msym_in
106 static void bfd_mips_elf_swap_msym_out
110 static boolean mips_elf_create_procedure_table
118 static boolean mips_elf32_section_from_shdr
120 static boolean mips_elf32_section_processing
122 static boolean mips_elf_is_local_label_name
129 static boolean mips_elf_final_link
131 static void mips_elf_relocate_hi16
133 bfd_vma));
134 static boolean mips_elf_relocate_got_local
137 static void mips_elf_relocate_global_got
139 static bfd_reloc_status_type mips16_jump_reloc
141 static bfd_reloc_status_type mips16_gprel_reloc
143 static boolean mips_elf_relocate_section
146 static boolean mips_elf_link_output_symbol_hook
148 asection *));
149 static boolean mips_elf_create_dynamic_sections
151 static boolean mips_elf_create_compact_rel_section
153 static boolean mips_elf_create_got_section
155 static boolean mips_elf_check_relocs
158 static boolean mips_elf_adjust_dynamic_symbol
160 static boolean mips_elf_always_size_sections
162 static boolean mips_elf_size_dynamic_sections
164 static boolean mips_elf_finish_dynamic_symbol
166 Elf_Internal_Sym *));
167 static boolean mips_elf_finish_dynamic_sections
169 static boolean mips_elf_add_symbol_hook
172 static bfd_reloc_status_type mips_elf_final_gp
179 static void mips_elf_irix6_finish_dynamic_symbol
186 static bfd_vma mips_elf_global_got_index
188 static bfd_vma mips_elf_local_got_index
190 static bfd_vma mips_elf_got_offset_from_index
192 static boolean mips_elf_record_global_got_symbol
195 static bfd_vma mips_elf_got_page
197 static boolean mips_elf_next_lo16_addend
199 static bfd_reloc_status_type mips_elf_calculate_relocation
204 static bfd_vma mips_elf_obtain_contents
206 static void mips_elf_perform_relocation
210 static boolean mips_elf_sort_hash_table_f
212 static boolean mips_elf_sort_hash_table
217 static bfd_vma mips_elf_create_local_got_entry
219 static bfd_vma mips_elf_got16_entry
221 static unsigned int mips_elf_create_dynamic_relocation
225 /* The level of IRIX compatibility we're striving for. */
228 ict_none,
229 ict_irix5,
230 ict_irix6
233 /* Nonzero if ABFD is using the N32 ABI. */
235 #define ABI_N32_P(abfd) \
236 ((elf_elfheader (abfd)->e_flags & EF_MIPS_ABI2) != 0)
238 /* What version of Irix we are trying to be compatible with. FIXME:
239 At the moment, we never generate "normal" MIPS ELF ABI executables;
240 we always use some version of Irix. */
242 #define IRIX_COMPAT(abfd) \
243 (ABI_N32_P (abfd) ? ict_irix6 : ict_irix5)
245 /* Whether we are trying to be compatible with IRIX at all. */
247 #define SGI_COMPAT(abfd) \
248 (IRIX_COMPAT (abfd) != ict_none)
250 /* The name of the msym section. */
253 /* The name of the srdata section. */
256 /* The name of the options section. */
257 #define MIPS_ELF_OPTIONS_SECTION_NAME(abfd) \
260 /* The name of the stub section. */
261 #define MIPS_ELF_STUB_SECTION_NAME(abfd) \
264 /* The number of local .got entries we reserve. */
265 #define MIPS_RESERVED_GOTNO (2)
267 /* Instructions which appear in a stub. For some reason the stub is
268 slightly different on an SGI system. */
269 #define ELF_MIPS_GP_OFFSET(abfd) (SGI_COMPAT (abfd) ? 0x7ff0 : 0x8000)
270 #define STUB_LW(abfd) \
271 (SGI_COMPAT (abfd) \
277 #define MIPS_FUNCTION_STUB_SIZE (16)
279 #if 0
280 /* We no longer try to identify particular sections for the .dynsym
281 section. When we do, we wind up crashing if there are other random
282 sections with relocations. */
284 /* Names of sections which appear in the .dynsym section in an Irix 5
285 executable. */
288 {
297 NULL
298 };
300 #define SIZEOF_MIPS_DYNSYM_SECNAMES \
301 (sizeof mips_elf_dynsym_sec_names / sizeof mips_elf_dynsym_sec_names[0])
303 /* The number of entries in mips_elf_dynsym_sec_names which go in the
304 text segment. */
306 #define MIPS_TEXT_DYNSYM_SECNO (3)
310 /* The names of the runtime procedure table symbols used on Irix 5. */
313 {
317 NULL
318 };
320 /* These structures are used to generate the .compact_rel section on
321 Irix 5. */
324 {
334 {
344 {
354 {
363 {
370 {
375 /* These are the constants used to swap the bitfields in a crinfo. */
377 #define CRINFO_CTYPE (0x1)
378 #define CRINFO_CTYPE_SH (31)
379 #define CRINFO_RTYPE (0xf)
380 #define CRINFO_RTYPE_SH (27)
381 #define CRINFO_DIST2TO (0xff)
382 #define CRINFO_DIST2TO_SH (19)
383 #define CRINFO_RELVADDR (0x7ffff)
384 #define CRINFO_RELVADDR_SH (0)
386 /* A compact relocation info has long (3 words) or short (2 words)
387 formats. A short format doesn't have VADDR field and relvaddr
388 fields contains ((VADDR - vaddr of the previous entry) >> 2). */
389 #define CRF_MIPS_LONG 1
390 #define CRF_MIPS_SHORT 0
392 /* There are 4 types of compact relocation at least. The value KONST
393 has different meaning for each type:
395 (type) (konst)
396 CT_MIPS_REL32 Address in data
397 CT_MIPS_WORD Address in word (XXX)
398 CT_MIPS_GPHI_LO GP - vaddr
399 CT_MIPS_JMPAD Address to jump
400 */
402 #define CRT_MIPS_REL32 0xa
403 #define CRT_MIPS_WORD 0xb
404 #define CRT_MIPS_GPHI_LO 0xc
405 #define CRT_MIPS_JMPAD 0xd
407 #define mips_elf_set_cr_format(x,format) ((x).ctype = (format))
408 #define mips_elf_set_cr_type(x,type) ((x).rtype = (type))
409 #define mips_elf_set_cr_dist2to(x,v) ((x).dist2to = (v))
410 #define mips_elf_set_cr_relvaddr(x,d) ((x).relvaddr = (d)<<2)
412 static void bfd_elf32_swap_compact_rel_out
414 static void bfd_elf32_swap_crinfo_out
419 /* In case we're on a 32-bit machine, construct a 64-bit "-1" value
420 from smaller values. Start with zero, widen, *then* decrement. */
421 #define MINUS_ONE (((bfd_vma)0) - 1)
424 {
425 /* No relocation. */
440 /* 16 bit relocation. */
455 /* 32 bit relocation. */
470 /* 32 bit symbol relative relocation. */
485 /* 26 bit branch address. */
493 /* This needs complex overflow
494 detection, because the upper four
495 bits must match the PC. */
503 /* High 16 bits of symbol value. */
518 /* Low 16 bits of symbol value. */
533 /* GP relative reference. */
548 /* Reference to literal section. */
563 /* Reference to global offset table. */
578 /* 16 bit PC relative reference. */
593 /* 16 bit call through global offset table. */
608 /* 32 bit GP relative reference. */
623 /* The remaining relocs are defined on Irix 5, although they are
624 not defined by the ABI. */
629 /* A 5 bit shift field. */
644 /* A 6 bit shift field. */
645 /* FIXME: This is not handled correctly; a special function is
646 needed to put the most significant bit in the right place. */
661 /* A 64 bit relocation. This is used in 32 bit ELF when addresses
662 are 64 bits long; the upper 32 bits are simply a sign extension.
663 The fields of the howto should be the same as for R_MIPS_32,
664 other than the type, name, and special_function. */
679 /* Displacement in the global offset table. */
694 /* Displacement to page pointer in the global offset table. */
709 /* Offset from page pointer in the global offset table. */
724 /* High 16 bits of displacement in global offset table. */
739 /* Low 16 bits of displacement in global offset table. */
754 /* 64 bit subtraction. Used in the N32 ABI. */
769 /* Used to cause the linker to insert and delete instructions? */
774 /* Get the higher values of a 64 bit addend. Presumably not used in
775 32 bit ELF. */
779 /* High 16 bits of displacement in global offset table. */
794 /* Low 16 bits of displacement in global offset table. */
809 /* Section displacement. */
829 /* Protected jump conversion. This is an optimization hint. No
830 relocation is required for correctness. */
844 };
846 /* The reloc used for BFD_RELOC_CTOR when doing a 64 bit link. This
847 is a hack to make the linker think that we need 64 bit values. */
863 /* The reloc used for the mips16 jump instruction. */
872 /* This needs complex overflow
873 detection, because the upper four
874 bits must match the PC. */
882 /* The reloc used for the mips16 gprel instruction. The src_mask and
883 dsk_mask for this howto do not reflect the actual instruction, in
884 which the value is not contiguous; the masks are for the
885 convenience of the relocate_section routine. */
902 /* GNU extension to record C++ vtable hierarchy */
918 /* GNU extension to record C++ vtable member usage */
934 /* Do a R_MIPS_HI16 relocation. This has to be done in combination
935 with a R_MIPS_LO16 reloc, because there is a carry from the LO16 to
936 the HI16. Here we just save the information we need; we do the
937 actual relocation when we see the LO16. MIPS ELF requires that the
938 LO16 immediately follow the HI16. As a GNU extension, we permit an
939 arbitrary number of HI16 relocs to be associated with a single LO16
940 reloc. This extension permits gcc to output the HI and LO relocs
941 itself. */
943 struct mips_hi16
944 {
947 bfd_vma addend;
948 };
950 /* FIXME: This should not be a static variable. */
954 bfd_reloc_status_type
956 reloc_entry,
957 symbol,
958 data,
959 input_section,
960 output_bfd,
961 error_message)
965 PTR data;
969 {
970 bfd_reloc_status_type ret;
971 bfd_vma relocation;
974 /* If we're relocating, and this an external symbol, we don't want
975 to change anything. */
979 {
982 }
987 {
988 boolean relocateable;
989 bfd_vma gp;
996 else
997 {
1000 }
1008 }
1009 else
1010 {
1017 else
1019 }
1028 /* Save the information, and let LO16 do the actual relocation. */
1041 }
1043 /* Do a R_MIPS_LO16 relocation. This is a straightforward 16 bit
1044 inplace relocation; this function exists in order to do the
1045 R_MIPS_HI16 relocation described above. */
1047 bfd_reloc_status_type
1049 reloc_entry,
1050 symbol,
1051 data,
1052 input_section,
1053 output_bfd,
1054 error_message)
1058 PTR data;
1062 {
1063 arelent gp_disp_relent;
1066 {
1071 {
1077 /* Do the HI16 relocation. Note that we actually don't need
1078 to know anything about the LO16 itself, except where to
1079 find the low 16 bits of the addend needed by the LO16. */
1086 /* The low order 16 bits are always treated as a signed
1087 value. Therefore, a negative value in the low order bits
1088 requires an adjustment in the high order bits. We need
1089 to make this adjustment in two ways: once for the bits we
1090 took from the data, and once for the bits we are putting
1091 back in to the data. */
1101 {
1105 }
1110 }
1113 }
1115 {
1116 bfd_reloc_status_type ret;
1119 /* FIXME: Does this case ever occur? */
1136 }
1138 /* Now do the LO16 reloc in the usual way. */
1141 }
1143 /* Do a R_MIPS_GOT16 reloc. This is a reloc against the global offset
1144 table used for PIC code. If the symbol is an external symbol, the
1145 instruction is modified to contain the offset of the appropriate
1146 entry in the global offset table. If the symbol is a section
1147 symbol, the next reloc is a R_MIPS_LO16 reloc. The two 16 bit
1148 addends are combined to form the real addend against the section
1149 symbol; the GOT16 is modified to contain the offset of an entry in
1150 the global offset table, and the LO16 is modified to offset it
1151 appropriately. Thus an offset larger than 16 bits requires a
1152 modified value in the global offset table.
1154 This implementation suffices for the assembler, but the linker does
1155 not yet know how to create global offset tables. */
1157 bfd_reloc_status_type
1159 reloc_entry,
1160 symbol,
1161 data,
1162 input_section,
1163 output_bfd,
1164 error_message)
1168 PTR data;
1172 {
1173 /* If we're relocating, and this an external symbol, we don't want
1174 to change anything. */
1178 {
1181 }
1183 /* If we're relocating, and this is a local symbol, we can handle it
1184 just like HI16. */
1191 }
1193 /* Set the GP value for OUTPUT_BFD. Returns false if this is a
1194 dangerous relocation. */
1196 static boolean
1200 {
1205 /* If we've already figured out what GP will be, just return it. */
1213 /* The linker script will have created a symbol named `_gp' with the
1214 appropriate value. */
1217 else
1218 {
1220 {
1225 {
1229 }
1230 }
1231 }
1234 {
1235 /* Only get the error once. */
1239 }
1242 }
1244 /* We have to figure out the gp value, so that we can adjust the
1245 symbol value correctly. We look up the symbol _gp in the output
1246 BFD. If we can't find it, we're stuck. We cache it in the ELF
1247 target data. We don't need to adjust the symbol value for an
1248 external symbol if we are producing relocateable output. */
1250 static bfd_reloc_status_type
1254 boolean relocateable;
1257 {
1260 {
1263 }
1267 && (! relocateable
1269 {
1271 {
1272 /* Make up a value. */
1275 }
1277 {
1281 }
1282 }
1285 }
1287 /* Do a R_MIPS_GPREL16 relocation. This is a 16 bit value which must
1288 become the offset from the gp register. This function also handles
1289 R_MIPS_LITERAL relocations, although those can be handled more
1290 cleverly because the entries in the .lit8 and .lit4 sections can be
1291 merged. */
1297 bfd_reloc_status_type
1303 PTR data;
1307 {
1308 boolean relocateable;
1309 bfd_reloc_status_type ret;
1310 bfd_vma gp;
1312 /* If we're relocating, and this is an external symbol with no
1313 addend, we don't want to change anything. We will only have an
1314 addend if this is a newly created reloc, not read from an ELF
1315 file. */
1319 {
1322 }
1326 else
1327 {
1330 }
1339 }
1341 static bfd_reloc_status_type
1343 gp)
1348 boolean relocateable;
1349 PTR data;
1350 bfd_vma gp;
1351 {
1352 bfd_vma relocation;
1358 else
1369 /* Set val to the offset into the section or symbol. */
1371 {
1372 /* This case occurs with the 64-bit MIPS ELF ABI. */
1374 }
1375 else
1376 {
1380 }
1382 /* Adjust val for the final section location and GP value. If we
1383 are producing relocateable output, we don't want to do this for
1384 an external symbol. */
1395 /* Make sure it fit in 16 bits. */
1400 }
1402 /* Do a R_MIPS_GPREL32 relocation. Is this 32 bit value the offset
1403 from the gp register? XXX */
1409 bfd_reloc_status_type
1411 reloc_entry,
1412 symbol,
1413 data,
1414 input_section,
1415 output_bfd,
1416 error_message)
1420 PTR data;
1424 {
1425 boolean relocateable;
1426 bfd_reloc_status_type ret;
1427 bfd_vma gp;
1429 /* If we're relocating, and this is an external symbol with no
1430 addend, we don't want to change anything. We will only have an
1431 addend if this is a newly created reloc, not read from an ELF
1432 file. */
1436 {
1440 }
1443 {
1446 }
1447 else
1448 {
1456 }
1460 }
1462 static bfd_reloc_status_type
1464 gp)
1469 boolean relocateable;
1470 PTR data;
1471 bfd_vma gp;
1472 {
1473 bfd_vma relocation;
1478 else
1488 {
1489 /* This case arises with the 64-bit MIPS ELF ABI. */
1491 }
1492 else
1495 /* Set val to the offset into the section or symbol. */
1498 /* Adjust val for the final section location and GP value. If we
1499 are producing relocateable output, we don't want to do this for
1500 an external symbol. */
1511 }
1513 /* Handle a 64 bit reloc in a 32 bit MIPS ELF file. These are
1514 generated when addreses are 64 bits. The upper 32 bits are a simle
1515 sign extension. */
1517 static bfd_reloc_status_type
1523 PTR data;
1527 {
1528 bfd_reloc_status_type r;
1529 arelent reloc32;
1531 bfd_size_type addr;
1538 /* Do a normal 32 bit relocation on the lower 32 bits. */
1546 /* Sign extend into the upper 32 bits. */
1550 else
1558 }
1560 /* Handle a mips16 jump. */
1562 static bfd_reloc_status_type
1568 PTR data;
1572 {
1576 {
1579 }
1581 /* FIXME. */
1582 {
1590 }
1593 }
1595 /* Handle a mips16 GP relative reloc. */
1597 static bfd_reloc_status_type
1603 PTR data;
1607 {
1608 boolean relocateable;
1609 bfd_reloc_status_type ret;
1610 bfd_vma gp;
1614 /* If we're relocating, and this is an external symbol with no
1615 addend, we don't want to change anything. We will only have an
1616 addend if this is a newly created reloc, not read from an ELF
1617 file. */
1621 {
1624 }
1628 else
1629 {
1632 }
1642 /* Pick up the mips16 extend instruction and the real instruction. */
1646 /* Stuff the current addend back as a 32 bit value, do the usual
1647 relocation, and then clean up. */
1669 }
1671 /* Return the ISA for a MIPS e_flags value. */
1675 flagword flags;
1676 {
1678 {
1687 }
1689 }
1691 /* Return the MACH for a MIPS e_flags value. */
1695 flagword flags;
1696 {
1698 {
1716 {
1733 }
1734 }
1737 }
1739 /* Return printable name for ABI from flagword. */
1743 flagword flags;
1744 {
1746 {
1759 }
1760 }
1762 /* A mapping from BFD reloc types to MIPS ELF reloc types. */
1765 bfd_reloc_code_real_type bfd_reloc_val;
1767 };
1770 {
1792 };
1794 /* Given a BFD reloc type, return a howto structure. */
1799 bfd_reloc_code_real_type code;
1800 {
1804 {
1807 }
1810 {
1816 /* We need to handle BFD_RELOC_CTOR specially.
1817 Select the right relocation (R_MIPS_32 or R_MIPS_64) based on the
1818 size of addresses on this architecture. */
1821 else
1832 }
1833 }
1835 /* Given a MIPS Elf32_Internal_Rel, fill in an arelent structure. */
1837 static void
1842 {
1847 {
1865 }
1867 /* The addend for a GPREL16 or LITERAL relocation comes from the GP
1868 value for the object file. We get the addend now, rather than
1869 when we do the relocation, because the symbol manipulations done
1870 by the linker may cause us to lose track of the input BFD. */
1875 }
1877 /* Given a MIPS Elf32_Internal_Rela, fill in an arelent structure. */
1879 static void
1884 {
1885 /* Since an Elf32_Internal_Rel is an initial prefix of an
1886 Elf32_Internal_Rela, we can just use mips_info_to_howto_rel
1887 above. */
1890 /* If we ever need to do any extra processing with dst->r_addend
1891 (the field omitted in an Elf32_Internal_Rel) we can do it here. */
1892 }
1893 \f
1894 /* A .reginfo section holds a single Elf32_RegInfo structure. These
1895 routines swap this structure in and out. They are used outside of
1896 BFD, so they are globally visible. */
1898 void
1903 {
1910 }
1912 void
1917 {
1930 }
1932 /* In the 64 bit ABI, the .MIPS.options section holds register
1933 information in an Elf64_Reginfo structure. These routines swap
1934 them in and out. They are globally visible because they are used
1935 outside of BFD. These routines are here so that gas can call them
1936 without worrying about whether the 64 bit ABI has been included. */
1938 void
1943 {
1951 }
1953 void
1958 {
1973 }
1975 /* Swap an entry in a .gptab section. Note that these routines rely
1976 on the equivalence of the two elements of the union. */
1978 static void
1983 {
1986 }
1988 static void
1993 {
1998 }
2000 static void
2005 {
2012 }
2014 static void
2019 {
2029 }
2031 /* Swap in an options header. */
2033 void
2038 {
2043 }
2045 /* Swap out an options header. */
2047 void
2052 {
2057 }
2059 /* Swap in an MSYM entry. */
2061 static void
2066 {
2069 }
2071 /* Swap out an MSYM entry. */
2073 static void
2078 {
2081 }
2083 \f
2084 /* Determine whether a symbol is global for the purposes of splitting
2085 the symbol table into global symbols and local symbols. At least
2086 on Irix 5, this split must be between section symbols and all other
2087 symbols. On most ELF targets the split is between static symbols
2088 and externally visible symbols. */
2090 /*ARGSUSED*/
2091 static boolean
2095 {
2097 }
2098 \f
2099 /* Set the right machine number for a MIPS ELF file. This is used for
2100 both the 32-bit and the 64-bit ABI. */
2102 boolean
2105 {
2109 }
2111 /* Set the right machine number for a 32-bit MIPS ELF file. */
2113 static boolean
2116 {
2117 /* Irix 5 is broken. Object file symbol tables are not always
2118 sorted correctly such that local symbols precede global symbols,
2119 and the sh_info field in the symbol table is not always right. */
2123 }
2125 /* The final processing done just before writing out a MIPS ELF object
2126 file. This gets the MIPS architecture right based on the machine
2127 number. This is used by both the 32-bit and the 64-bit ABI. */
2129 /*ARGSUSED*/
2130 void
2133 boolean linker;
2134 {
2142 {
2180 }
2185 /* Set the sh_info field for .gptab sections and other appropriate
2186 info for each special section. */
2190 {
2192 {
2238 else
2239 {
2243 (name
2245 }
2250 }
2251 }
2252 }
2253 \f
2254 /* Function to keep MIPS specific file flags like as EF_MIPS_PIC. */
2256 boolean
2259 flagword flags;
2260 {
2267 }
2269 /* Copy backend specific data from one object module to another */
2271 boolean
2275 {
2288 }
2290 /* Merge backend specific data from an object file to the output
2291 object file when linking. */
2293 boolean
2297 {
2298 flagword old_flags;
2299 flagword new_flags;
2300 boolean ok;
2302 /* Check if we have the same endianess */
2305 {
2310 else
2317 }
2328 {
2334 {
2338 }
2341 }
2343 /* Check flag compatibility. */
2354 {
2361 }
2364 {
2371 }
2373 /* Compare the ISA's. */
2376 {
2382 /* If either has no machine specified, just compare the general isa's.
2383 Some combinations of machines are ok, if the isa's match. */
2385 || ! old_mach
2387 )
2388 {
2389 /* Don't warn about mixing -mips1 and -mips2 code, or mixing -mips3
2390 and -mips4 code. They will normally use the same data sizes and
2391 calling conventions. */
2396 {
2401 }
2402 }
2404 else
2405 {
2412 }
2416 }
2418 /* Compare ABI's */
2420 {
2421 /* Only error if both are set (to different values). */
2424 {
2431 }
2434 }
2436 /* Warn about any other mismatches */
2438 {
2444 }
2447 {
2450 }
2453 }
2454 \f
2455 static boolean
2458 PTR ptr;
2459 {
2464 /* Print normal ELF private data. */
2467 /* xgettext:c-format */
2482 else
2493 else
2498 else
2504 }
2505 \f
2506 /* Handle a MIPS specific section when reading an object file. This
2507 is called when elfcode.h finds a section with an unknown type.
2508 This routine supports both the 32-bit and 64-bit ELF ABI.
2510 FIXME: We need to handle the SHF_MIPS_GPREL flag, but I'm not sure
2511 how to. */
2513 boolean
2518 {
2521 /* There ought to be a place to keep ELF backend specific flags, but
2522 at the moment there isn't one. We just keep track of the
2523 sections by their name, instead. Fortunately, the ABI gives
2524 suggested names for all the MIPS specific sections, so we will
2525 probably get away with this. */
2527 {
2587 }
2593 {
2599 }
2602 }
2604 /* Handle a 32-bit MIPS ELF specific section. */
2606 static boolean
2611 {
2615 /* FIXME: We should record sh_info for a .gptab section. */
2617 /* For a .reginfo section, set the gp value in the tdata information
2618 from the contents of this section. We need the gp value while
2619 processing relocs, so we just get it now. The .reginfo section
2620 is not used in the 64-bit MIPS ELF ABI. */
2622 {
2623 Elf32_External_RegInfo ext;
2624 Elf32_RegInfo s;
2631 }
2633 /* For a SHT_MIPS_OPTIONS section, look for a ODK_REGINFO entry, and
2634 set the gp value based on what we find. We may see both
2635 SHT_MIPS_REGINFO and SHT_MIPS_OPTIONS/ODK_REGINFO; in that case,
2636 they should agree. */
2638 {
2646 {
2649 }
2653 {
2654 Elf_Internal_Options intopt;
2659 {
2660 Elf32_RegInfo intreg;
2662 bfd_mips_elf32_swap_reginfo_in
2668 }
2670 }
2672 }
2675 }
2677 /* Set the correct type for a MIPS ELF section. We do this by the
2678 section name, which is a hack, but ought to work. This routine is
2679 used by both the 32-bit and the 64-bit ABI. */
2681 boolean
2686 {
2692 {
2695 /* The sh_link field is set in final_write_processing. */
2696 }
2698 {
2701 /* FIXME: Set the sh_info field. */
2702 }
2706 {
2709 /* The sh_info field is set in final_write_processing. */
2710 }
2714 {
2716 /* In a shared object on Irix 5.3, the .mdebug section has an
2717 entsize of 0. FIXME: Does this matter? */
2720 else
2722 }
2724 {
2726 /* In a shared object on Irix 5.3, the .reginfo section has an
2727 entsize of 0x18. FIXME: Does this matter? */
2730 else
2732 }
2737 {
2739 #if 0
2740 /* This isn't how the Irix 6 linker behaves. */
2742 #endif
2743 }
2752 {
2755 }
2757 {
2760 /* The sh_info field is set in final_write_processing. */
2761 }
2763 {
2767 }
2771 {
2773 /* The sh_link and sh_info fields are set in
2774 final_write_processing. */
2775 }
2779 {
2782 /* The sh_link field is set in final_write_processing. */
2783 }
2785 {
2789 }
2792 }
2794 /* Given a BFD section, try to locate the corresponding ELF section
2795 index. This is used by both the 32-bit and the 64-bit ABI.
2796 Actually, it's not clear to me that the 64-bit ABI supports these,
2797 but for non-PIC objects we will certainly want support for at least
2798 the .scommon section. */
2800 boolean
2806 {
2808 {
2811 }
2813 {
2816 }
2818 }
2820 /* When are writing out the .options or .MIPS.options section,
2821 remember the bytes we are writing out, so that we can install the
2822 GP value in the section_processing routine. */
2824 boolean
2827 sec_ptr section;
2828 PTR location;
2829 file_ptr offset;
2830 bfd_size_type count;
2831 {
2833 {
2837 {
2842 }
2845 {
2846 bfd_size_type size;
2850 else
2856 }
2859 }
2862 count);
2863 }
2865 /* Work over a section just before writing it out. This routine is
2866 used by both the 32-bit and the 64-bit ABI. FIXME: We recognize
2867 sections that need the SHF_MIPS_GPREL flag by name; there has to be
2868 a better way. */
2870 boolean
2874 {
2876 {
2882 {
2885 }
2887 {
2890 }
2892 {
2895 }
2897 {
2900 }
2902 {
2904 {
2910 }
2911 }
2912 }
2915 }
2917 /* Work over a section just before writing it out. We update the GP
2918 value in the SHT_MIPS_REGINFO and SHT_MIPS_OPTIONS sections based
2919 on the value we are using. */
2921 static boolean
2925 {
2928 {
2941 }
2947 {
2950 /* We stored the section contents in the elf_section_data tdata
2951 field in the set_section_contents routine. We save the
2952 section contents so that we don't have to read them again.
2953 At this point we know that elf_gp is set, so we can look
2954 through the section contents to see if there is an
2955 ODK_REGINFO structure. */
2961 {
2962 Elf_Internal_Options intopt;
2967 {
2980 }
2982 }
2983 }
2986 }
2987 \f
2988 /* MIPS ELF uses two common sections. One is the usual one, and the
2989 other is for small objects. All the small objects are kept
2990 together, and then referenced via the gp pointer, which yields
2991 faster assembler code. This is what we use for the small common
2992 section. This approach is copied from ecoff.c. */
2997 /* MIPS ELF also uses an acommon section, which represents an
2998 allocated common symbol which may be overridden by a
2999 definition in a shared library. */
3004 /* The Irix 5 support uses two virtual sections, which represent
3005 text/data symbols defined in dynamic objects. */
3016 /* Handle the special MIPS section numbers that a symbol may use.
3017 This is used for both the 32-bit and the 64-bit ABI. */
3019 void
3023 {
3028 {
3030 /* This section is used in a dynamically linked executable file.
3031 It is an allocated common section. The dynamic linker can
3032 either resolve these symbols to something in a shared
3033 library, or it can just leave them here. For our purposes,
3034 we can consider these symbols to be in a new section. */
3036 {
3037 /* Initialize the acommon section. */
3047 }
3052 /* Common symbols less than the GP size are automatically
3053 treated as SHN_MIPS_SCOMMON symbols on IRIX5. */
3057 /* Fall through. */
3060 {
3061 /* Initialize the small common section. */
3071 }
3088 #endif
3089 }
3090 }
3091 \f
3092 /* When creating an Irix 5 executable, we need REGINFO and RTPROC
3093 segments. */
3095 static int
3098 {
3105 /* See if we need a PT_MIPS_REGINFO segment. */
3110 /* See if we need a PT_MIPS_OPTIONS segment. */
3116 /* See if we need a PT_MIPS_RTPROC segment. */
3123 }
3125 /* Modify the segment map for an Irix 5 executable. */
3127 static boolean
3130 {
3137 /* If there is a .reginfo section, we need a PT_MIPS_REGINFO
3138 segment. */
3141 {
3146 {
3155 /* We want to put it after the PHDR and INTERP segments. */
3164 }
3165 }
3167 /* For IRIX 6, we don't have .mdebug sections, nor does anything but
3168 .dynamic end up in PT_DYNAMIC. However, we do have to insert a
3169 PT_OPTIONS segement immediately following the program header
3170 table. */
3172 {
3180 {
3187 /* There should always be a program header table. */
3200 }
3201 }
3202 else
3203 {
3204 /* If there are .dynamic and .mdebug sections, we make a room
3205 for the RTPROC header. FIXME: Rewrite without section names. */
3209 {
3214 {
3223 {
3227 }
3228 else
3229 {
3232 }
3234 /* We want to put it after the DYNAMIC segment. */
3243 }
3244 }
3246 /* On Irix 5, the PT_DYNAMIC segment includes the .dynamic,
3247 .dynstr, .dynsym, and .hash sections, and everything in
3248 between. */
3256 {
3266 {
3269 {
3270 bfd_size_type sz;
3279 }
3280 }
3300 {
3307 {
3310 }
3311 }
3314 }
3315 }
3318 }
3319 \f
3320 /* The structure of the runtime procedure descriptor created by the
3321 loader for use by the static exception system. */
3336 #define cbRPDR sizeof(RPDR)
3337 #define rpdNil ((pRPDR) 0)
3339 /* Swap RPDR (runtime procedure table entry) for output. */
3341 static void ecoff_swap_rpdr_out
3344 static void
3349 {
3350 /* ecoff_put_off was defined in ecoffswap.h. */
3364 #endif
3365 }
3366 \f
3367 /* Read ECOFF debugging information from a .mdebug section into a
3368 ecoff_debug_info structure. */
3370 boolean
3375 {
3395 /* The symbolic header contains absolute file offsets and sizes to
3396 read. */
3397 #define READ(ptr, offset, count, size, type) \
3398 if (symhdr->count == 0) \
3399 debug->ptr = NULL; \
3400 else \
3401 { \
3402 debug->ptr = (type) bfd_malloc ((size_t) (size * symhdr->count)); \
3403 if (debug->ptr == NULL) \
3404 goto error_return; \
3405 if (bfd_seek (abfd, (file_ptr) symhdr->offset, SEEK_SET) != 0 \
3406 || (bfd_read (debug->ptr, size, symhdr->count, \
3407 abfd) != size * symhdr->count)) \
3408 goto error_return; \
3409 }
3423 #undef READ
3430 error_return:
3456 }
3457 \f
3458 /* MIPS ELF local labels start with '$', not 'L'. */
3460 /*ARGSUSED*/
3461 static boolean
3465 {
3469 /* On Irix 6, the labels go back to starting with '.', so we accept
3470 the generic ELF local label syntax as well. */
3472 }
3474 /* MIPS ELF uses a special find_nearest_line routine in order the
3475 handle the ECOFF debugging information. */
3477 struct mips_elf_find_line
3478 {
3481 };
3483 boolean
3489 bfd_vma offset;
3493 {
3498 line_ptr))
3503 line_ptr))
3508 {
3509 flagword origflags;
3514 /* If we are called during a link, mips_elf_final_link may have
3515 cleared the SEC_HAS_CONTENTS field. We force it back on here
3516 if appropriate (which it normally will be). */
3523 {
3524 bfd_size_type external_fdr_size;
3532 {
3535 }
3538 {
3541 }
3543 /* Swap in the FDR information. */
3549 {
3552 }
3556 fraw_end = (fraw_src
3563 /* Note that we don't bother to ever free this information.
3564 find_nearest_line is either called all the time, as in
3565 objdump -l, so the information should be saved, or it is
3566 rarely called, as in ld error messages, so the memory
3567 wasted is unimportant. Still, it would probably be a
3568 good idea for free_cached_info to throw it away. */
3569 }
3573 line_ptr))
3574 {
3577 }
3580 }
3582 /* Fall back on the generic ELF find_nearest_line routine. */
3586 line_ptr);
3587 }
3588 \f
3589 /* The mips16 compiler uses a couple of special sections to handle
3590 floating point arguments.
3592 Section names that look like .mips16.fn.FNNAME contain stubs that
3593 copy floating point arguments from the fp regs to the gp regs and
3594 then jump to FNNAME. If any 32 bit function calls FNNAME, the
3595 call should be redirected to the stub instead. If no 32 bit
3596 function calls FNNAME, the stub should be discarded. We need to
3597 consider any reference to the function, not just a call, because
3598 if the address of the function is taken we will need the stub,
3599 since the address might be passed to a 32 bit function.
3601 Section names that look like .mips16.call.FNNAME contain stubs
3602 that copy floating point arguments from the gp regs to the fp
3603 regs and then jump to FNNAME. If FNNAME is a 32 bit function,
3604 then any 16 bit function that calls FNNAME should be redirected
3605 to the stub instead. If FNNAME is not a 32 bit function, the
3606 stub should be discarded.
3608 .mips16.call.fp.FNNAME sections are similar, but contain stubs
3609 which call FNNAME and then copy the return value from the fp regs
3610 to the gp regs. These stubs store the return value in $18 while
3611 calling FNNAME; any function which might call one of these stubs
3612 must arrange to save $18 around the call. (This case is not
3613 needed for 32 bit functions that call 16 bit functions, because
3614 16 bit functions always return floating point values in both
3615 $f0/$f1 and $2/$3.)
3617 Note that in all cases FNNAME might be defined statically.
3618 Therefore, FNNAME is not used literally. Instead, the relocation
3619 information will indicate which symbol the section is for.
3621 We record any stubs that we find in the symbol table. */
3627 /* MIPS ELF linker hash table. */
3629 struct mips_elf_link_hash_table
3630 {
3632 #if 0
3633 /* We no longer use this. */
3634 /* String section indices for the dynamic section symbols. */
3636 #endif
3637 /* The number of .rtproc entries. */
3638 bfd_size_type procedure_count;
3639 /* The size of the .compact_rel section (if SGI_COMPAT). */
3640 bfd_size_type compact_rel_size;
3641 /* This flag indicates that the value of DT_MIPS_RLD_MAP dynamic
3642 entry is set to the address of __rld_obj_head as in Irix 5. */
3643 boolean use_rld_obj_head;
3644 /* This is the value of the __rld_map or __rld_obj_head symbol. */
3645 bfd_vma rld_value;
3646 /* This is set if we see any mips16 stub sections. */
3647 boolean mips16_stubs_seen;
3648 };
3650 /* Look up an entry in a MIPS ELF linker hash table. */
3652 #define mips_elf_link_hash_lookup(table, string, create, copy, follow) \
3653 ((struct mips_elf_link_hash_entry *) \
3654 elf_link_hash_lookup (&(table)->root, (string), (create), \
3655 (copy), (follow)))
3657 /* Traverse a MIPS ELF linker hash table. */
3659 #define mips_elf_link_hash_traverse(table, func, info) \
3660 (elf_link_hash_traverse \
3661 (&(table)->root, \
3662 (boolean (*) PARAMS ((struct elf_link_hash_entry *, PTR))) (func), \
3663 (info)))
3665 /* Get the MIPS ELF linker hash table from a link_info structure. */
3667 #define mips_elf_hash_table(p) \
3668 ((struct mips_elf_link_hash_table *) ((p)->hash))
3670 static boolean mips_elf_output_extsym
3673 /* Create an entry in a MIPS ELF linker hash table. */
3680 {
3684 /* Allocate the structure if it has not already been allocated by a
3685 subclass. */
3693 /* Call the allocation method of the superclass. */
3698 {
3699 /* Set local fields. */
3701 /* We use -2 as a marker to indicate that the information has
3702 not been set. -1 means there is no associated ifd. */
3710 }
3713 }
3715 /* Create a MIPS ELF linker hash table. */
3720 {
3729 mips_elf_link_hash_newfunc))
3730 {
3733 }
3735 #if 0
3736 /* We no longer use this. */
3739 #endif
3747 }
3749 /* Hook called by the linker routine which adds symbols from an object
3750 file. We must handle the special MIPS section numbers here. */
3752 /*ARGSUSED*/
3753 static boolean
3762 {
3766 {
3767 /* Skip Irix 5 rld entry name. */
3770 }
3773 {
3775 /* Common symbols less than the GP size are automatically
3776 treated as SHN_MIPS_SCOMMON symbols. */
3780 /* Fall through. */
3788 /* This section is used in a shared object. */
3790 {
3791 /* Initialize the section. */
3802 }
3803 /* This code used to do *secp = bfd_und_section_ptr if
3804 info->shared. I don't know why, and that doesn't make sense,
3805 so I took it out. */
3810 /* Fall through. XXX Can we treat this as allocated data? */
3812 /* This section is used in a shared object. */
3814 {
3815 /* Initialize the section. */
3826 }
3827 /* This code used to do *secp = bfd_und_section_ptr if
3828 info->shared. I don't know why, and that doesn't make sense,
3829 so I took it out. */
3836 }
3842 {
3845 /* Mark __rld_obj_head as dynamic. */
3861 }
3863 /* If this is a mips16 text symbol, add 1 to the value to make it
3864 odd. This will cause something like .word SYM to come up with
3865 the right value when it is loaded into the PC. */
3870 }
3872 /* Structure used to pass information to mips_elf_output_extsym. */
3874 struct extsym_info
3875 {
3880 boolean failed;
3881 };
3883 /* This routine is used to write out ECOFF debugging external symbol
3884 information. It is called via mips_elf_link_hash_traverse. The
3885 ECOFF external symbol information must match the ELF external
3886 symbol information. Unfortunately, at this point we don't know
3887 whether a symbol is required by reloc information, so the two
3888 tables may wind up being different. We must sort out the external
3889 symbol information before we can set the final size of the .mdebug
3890 section, and we must set the size of the .mdebug section before we
3891 can relocate any sections, and we can't know which symbols are
3892 required by relocation until we relocate the sections.
3893 Fortunately, it is relatively unlikely that any symbol will be
3894 stripped but required by a reloc. In particular, it can not happen
3895 when generating a final executable. */
3897 static boolean
3900 PTR data;
3901 {
3903 boolean strip;
3919 else
3926 {
3938 {
3941 /* Use undefined class. Also, set class and type for some
3942 special symbols. */
3946 {
3950 }
3952 {
3957 }
3959 {
3963 }
3964 else
3966 }
3970 else
3971 {
3977 /* When making a shared library and symbol h is the one from
3978 the another shared library, OUTPUT_SECTION may be null. */
3981 else
3982 {
4002 else
4004 }
4005 }
4009 }
4015 {
4027 else
4029 }
4031 {
4032 /* Set type and value for a symbol with a function stub. */
4037 else
4038 {
4044 else
4046 }
4049 #endif
4050 }
4055 {
4058 }
4061 }
4063 /* Create a runtime procedure table from the .mdebug section. */
4065 static boolean
4067 PTR handle;
4072 {
4077 PTR rtproc;
4085 PDR pdr;
4086 SYMR sym;
4100 {
4137 {
4151 }
4152 }
4158 {
4161 }
4167 erp++;
4172 {
4176 }
4179 /* Set the size and contents of .rtproc section. */
4183 /* Skip this section later on (I don't think this currently
4184 matters, but someday it might). */
4200 error_return:
4212 }
4214 /* A comparison routine used to sort .gptab entries. */
4216 static int
4220 {
4225 }
4227 /* We need to use a special link routine to handle the .reginfo and
4228 the .mdebug sections. We need to merge all instances of these
4229 sections together, not write them all out sequentially. */
4231 static boolean
4235 {
4241 Elf32_RegInfo reginfo;
4248 /* If all the things we linked together were PIC, but we're
4249 producing an executable (rather than a shared object), then the
4250 resulting file is CPIC (i.e., it calls PIC code.) */
4254 {
4257 }
4259 /* On IRIX5, we omit the .options section. On IRIX6, however, we
4260 include it, even though we don't process it quite right. (Some
4261 entries are supposed to be merged.) Empirically, we seem to be
4262 better off including it then not. */
4265 {
4267 {
4276 }
4277 }
4279 /* Get a value for the GP register. */
4281 {
4291 {
4292 bfd_vma lo;
4294 /* Find the GP-relative section with the lowest offset. */
4301 /* And calculate GP relative to that. */
4303 }
4304 else
4305 {
4306 /* If the relocate_section function needs to do a reloc
4307 involving the GP value, it should make a reloc_dangerous
4308 callback to warn that GP is not defined. */
4309 }
4310 }
4312 /* Go through the sections and collect the .reginfo and .mdebug
4313 information. */
4319 {
4321 {
4324 /* We have found the .reginfo section in the output file.
4325 Look through all the link_orders comprising it and merge
4326 the information together. */
4330 {
4333 Elf32_External_RegInfo ext;
4334 Elf32_RegInfo sub;
4337 {
4341 }
4346 /* The linker emulation code has probably clobbered the
4347 size to be zero bytes. */
4365 /* ri_gp_value is set by the function
4366 mips_elf32_section_processing when the section is
4367 finally written out. */
4369 /* Hack: reset the SEC_HAS_CONTENTS flag so that
4370 elf_link_input_bfd ignores this section. */
4372 }
4374 /* Size has been set in mips_elf_always_size_sections */
4377 /* Skip this section later on (I don't think this currently
4378 matters, but someday it might). */
4382 }
4385 {
4388 /* We have found the .mdebug section in the output file.
4389 Look through all the link_orders comprising it and merge
4390 the information together. */
4392 /* FIXME: What should the version stamp be? */
4407 /* We accumulate the debugging information itself in the
4408 debug_info structure. */
4426 {
4428 EXTR esym;
4429 bfd_vma last;
4448 {
4452 {
4455 }
4456 else
4462 }
4463 }
4468 {
4477 {
4481 }
4489 {
4490 /* I don't know what a non MIPS ELF bfd would be
4491 doing with a .mdebug section, but I don't really
4492 want to deal with it. */
4494 }
4501 /* The ECOFF linking code expects that we have already
4502 read in the debugging information and set up an
4503 ecoff_debug_info structure, so we do that now. */
4513 /* Loop through the external symbols. For each one with
4514 interesting information, try to find the symbol in
4515 the linker global hash table and save the information
4516 for the output external symbols. */
4518 eraw_end = (eraw_src
4524 {
4525 EXTR ext;
4542 {
4546 }
4549 }
4551 /* Free up the information we just read. */
4564 /* Hack: reset the SEC_HAS_CONTENTS flag so that
4565 elf_link_input_bfd ignores this section. */
4567 }
4570 {
4571 /* Create .rtproc section. */
4574 {
4583 }
4588 }
4590 /* Build the external symbol information. */
4597 mips_elf_output_extsym,
4602 /* Set the size of the .mdebug section. */
4605 /* Skip this section later on (I don't think this currently
4606 matters, but someday it might). */
4610 }
4613 {
4620 /* The .gptab.sdata and .gptab.sbss sections hold
4621 information describing how the small data area would
4622 change depending upon the -G switch. These sections
4623 not used in executables files. */
4625 {
4631 {
4635 {
4639 }
4643 /* Hack: reset the SEC_HAS_CONTENTS flag so that
4644 elf_link_input_bfd ignores this section. */
4646 }
4648 /* Skip this section later on (I don't think this
4649 currently matters, but someday it might). */
4652 /* Really remove the section. */
4656 ;
4661 }
4663 /* There is one gptab for initialized data, and one for
4664 uninitialized data. */
4669 else
4670 {
4676 }
4678 /* The linker script always combines .gptab.data and
4679 .gptab.sdata into .gptab.sdata, and likewise for
4680 .gptab.bss and .gptab.sbss. It is possible that there is
4681 no .sdata or .sbss section in the output file, in which
4682 case we must change the name of the output section. */
4685 {
4688 else
4692 }
4694 /* Set up the first entry. */
4702 /* Combine the input sections. */
4706 {
4709 bfd_size_type size;
4711 bfd_size_type gpentry;
4714 {
4718 }
4723 /* Combine the gptab entries for this input section one
4724 by one. We know that the input gptab entries are
4725 sorted by ascending -G value. */
4731 {
4732 Elf32_External_gptab ext_gptab;
4733 Elf32_gptab int_gptab;
4736 boolean exact;
4742 {
4745 }
4754 {
4760 }
4763 {
4767 /* We need a new table entry. */
4772 {
4775 }
4780 /* Merge in the size for the next smallest -G
4781 value, since that will be implied by this new
4782 value. */
4785 {
4791 }
4797 }
4800 }
4802 /* Hack: reset the SEC_HAS_CONTENTS flag so that
4803 elf_link_input_bfd ignores this section. */
4805 }
4807 /* The table must be sorted by -G value. */
4811 /* Swap out the table. */
4815 {
4818 }
4827 /* Skip this section later on (I don't think this currently
4828 matters, but someday it might). */
4830 }
4831 }
4833 /* Invoke the regular ELF backend linker to do all the work. */
4837 /* Now write out the computed sections. */
4840 {
4841 Elf32_External_RegInfo ext;
4847 }
4850 {
4858 }
4861 {
4867 }
4870 {
4876 }
4879 {
4882 {
4888 }
4889 }
4892 }
4894 /* Handle a MIPS ELF HI16 reloc. */
4896 static void
4902 bfd_vma addend;
4903 {
4904 bfd_vma insn;
4905 bfd_vma addlo;
4922 }
4924 /* Handle a MIPS ELF local GOT16 reloc. */
4926 static boolean
4935 bfd_vma addend;
4936 {
4939 bfd_vma insn;
4940 bfd_vma addlo;
4941 bfd_vma address;
4942 bfd_vma hipage;
4958 /* Get a got entry representing requested hipage. */
4968 {
4972 }
4975 {
4977 {
4982 }
4986 }
4993 }
4995 /* Handle MIPS ELF CALL16 reloc and global GOT16 reloc. */
4997 static void
5002 bfd_vma offset;
5003 {
5004 bfd_vma insn;
5010 }
5012 /* Returns the GOT section for ABFD. */
5017 {
5019 }
5021 /* Returns the GOT information associated with the link indicated by
5022 INFO. If SGOTP is non-NULL, it is filled in with the GOT
5023 section. */
5029 {
5042 }
5044 /* Sign-extend VALUE, which has the indicated number of BITS. */
5046 static bfd_vma
5048 bfd_vma value;
5050 {
5052 /* VALUE is negative. */
5056 }
5058 /* Return non-zero if the indicated VALUE has overflowed the maximum
5059 range expressable by a signed number with the indicated number of
5060 BITS. */
5062 static boolean
5064 bfd_vma value;
5066 {
5070 /* The value is too big. */
5073 /* The value is too small. */
5076 /* All is well. */
5078 }
5080 /* Calculate the %high function. */
5082 static bfd_vma
5084 bfd_vma value;
5085 {
5087 }
5089 /* Calculate the %higher function. */
5091 static bfd_vma
5093 bfd_vma value;
5094 {
5095 #ifdef BFD64
5097 #else
5100 #endif
5101 }
5103 /* Calculate the %highest function. */
5105 static bfd_vma
5107 bfd_vma value;
5108 {
5109 #ifdef BFD64
5111 #else
5114 #endif
5115 }
5117 /* Returns the GOT index for the global symbol indicated by H. */
5119 static bfd_vma
5123 {
5124 bfd_vma index;
5130 /* Once we determine the global GOT entry with the lowest dynamic
5131 symbol table index, we must put all dynamic symbols with greater
5132 indices into the GOT. That makes it easy to calculate the GOT
5133 offset. */
5139 }
5141 /* Returns the offset for the entry at the INDEXth position
5142 in the GOT. */
5144 static bfd_vma
5148 bfd_vma index;
5149 {
5151 bfd_vma gp;
5157 gp);
5158 }
5160 /* If H is a symbol that needs a global GOT entry, but has a dynamic
5161 symbol table index lower than any we've seen to date, record it for
5162 posterity. */
5164 static boolean
5169 {
5170 /* A global symbol in the GOT must also be in the dynamic symbol
5171 table. */
5176 /* If we've already marked this entry as need GOT space, we don't
5177 need to do it again. */
5181 /* By setting this to a value other than -1, we are indicating that
5182 there needs to be a GOT entry for H. */
5186 }
5188 /* This structure is passed to mips_elf_sort_hash_table_f when sorting
5189 the dynamic symbols. */
5191 struct mips_elf_hash_sort_data
5192 {
5193 /* The symbol in the global GOT with the lowest dynamic symbol table
5194 index. */
5196 /* The least dynamic symbol table index corresponding to a symbol
5197 with a GOT entry. */
5199 /* The greatest dynamic symbol table index not corresponding to a
5200 symbol without a GOT entry. */
5202 };
5204 /* If H needs a GOT entry, assign it the highest available dynamic
5205 index. Otherwise, assign it the lowest available dynamic
5206 index. */
5208 static boolean
5211 PTR data;
5212 {
5216 /* Symbols without dynamic symbol table entries aren't interesting
5217 at all. */
5223 else
5224 {
5227 }
5230 }
5232 /* Sort the dynamic symbol table so that symbols that need GOT entries
5233 appear towards the end. This reduces the amount of GOT space
5234 required. */
5236 static boolean
5239 {
5251 mips_elf_sort_hash_table_f,
5254 /* There shoud have been enough room in the symbol table to
5255 accomodate both the GOT and non-GOT symbols. */
5258 /* Now we know which dynamic symbol has the lowest dynamic symbol
5259 table index in the GOT. */
5264 }
5266 /* Create a local GOT entry for VALUE. Return the index of the entry,
5267 or -1 if it could not be created. */
5269 static bfd_vma
5274 bfd_vma value;
5275 {
5277 {
5278 /* We didn't allocate enough space in the GOT. */
5283 }
5287 }
5289 /* Returns the GOT offset at which the indicated address can be found.
5290 If there is not yet a GOT entry for this value, create one. Returns
5291 -1 if no satisfactory GOT offset can be found. */
5293 static bfd_vma
5297 bfd_vma value;
5298 {
5305 /* Look to see if we already have an appropriate entry. */
5309 {
5314 }
5317 }
5319 /* Find a GOT entry that is within 32KB of the VALUE. These entries
5320 are supposed to be placed at small offsets in the GOT, i.e.,
5321 within 32KB of GP. Return the index into the GOT for this page,
5322 and store the offset from this entry to the desired address in
5323 OFFSETP, if it is non-NULL. */
5325 static bfd_vma
5329 bfd_vma value;
5331 {
5336 bfd_vma index;
5337 bfd_vma address;
5341 /* Look to see if we aleady have an appropriate entry. */
5346 {
5349 {
5350 /* This entry will serve as the page pointer. We can add a
5351 16-bit number to it to get the actual address. */
5354 }
5355 }
5357 /* If we didn't have an appropriate entry, we create one now. */
5362 {
5365 }
5368 }
5370 /* Find a GOT entry whose higher-order 16 bits are the same as those
5371 for value. Return the index into the GOT for this entry. */
5373 static bfd_vma
5377 bfd_vma value;
5378 {
5383 bfd_vma index;
5384 bfd_vma address;
5389 /* Look to see if we already have an appropriate entry. */
5394 {
5397 {
5398 /* This entry has the right high-order 16 bits. */
5401 }
5402 }
5404 /* If we didn't have an appropriate entry, we create one now. */
5409 }
5411 /* Sets *ADDENDP to the addend for the first R_MIPS_LO16 relocation
5412 found, beginning with RELOCATION. RELEND is one-past-the-end of
5413 the relocation table. */
5415 static boolean
5420 {
5421 /* According to the MIPS ELF ABI, the R_MIPS_LO16 relocation must be
5422 immediately following. However, for the IRIX6 ABI, the next
5423 relocation may be a composed relocation consisting of several
5424 relocations for the same address. In that case, the R_MIPS_LO16
5425 relo!scation may occur as one of these. We permit a similar
5426 extension in general, as that is useful for GCC. */
5428 {
5430 {
5433 }
5436 }
5438 /* We didn't find it. */
5440 }
5442 /* Create a rel.dyn relocation for the dynamic linker to resolve. The
5443 relocatin is against the symbol with the dynamic symbol table index
5444 DYNINDX. REL is the original relocation, which is now being made
5445 dynamic. */
5447 static unsigned int
5454 bfd_vma addend;
5456 {
5457 Elf_Internal_Rel outrel;
5458 boolean skip;
5470 /* The symbol for the relocation is the same as it was for the
5471 original relocation. */
5474 /* The offset for the dynamic relocation is the same as for the
5475 original relocation, adjusted by the offset at which the original
5476 section is output. */
5479 else
5480 {
5481 bfd_vma off;
5483 off = (_bfd_stab_section_offset
5485 input_section,
5491 }
5495 /* If we've decided to skip this relocation, just output an emtpy
5496 record. */
5506 /* Make sure the output section is writable. The dynamic linker
5507 will be writing to it. */
5511 /* On IRIX5, make an entry of compact relocation info. */
5513 {
5518 {
5519 Elf32_crinfo cptrel;
5527 else
5538 }
5539 }
5542 }
5544 /* Calculate the value produced by the RELOCATION (which comes from
5545 the INPUT_BFD). The ADDEND is the addend to use for this
5546 RELOCATION; RELOCATION->R_ADDEND is ignored.
5548 The result of the relocation calculation is stored in VALUEP.
5550 This function returns bfd_reloc_continue if the caller need take no
5551 further action regarding this relocation, bfd_reloc_notsupported if
5552 something goes dramatically wrong, bfd_reloc_overflow if an
5553 overflow occurs, and bfd_reloc_ok to indicate success. */
5555 static bfd_reloc_status_type
5557 input_bfd,
5558 input_section,
5559 info,
5560 relocation,
5561 addend,
5562 howto,
5563 relend,
5564 local_syms,
5565 local_sections,
5566 valuep,
5567 namep)
5573 bfd_vma addend;
5580 {
5581 /* The eventual value we will return. */
5582 bfd_vma value;
5583 /* The address of the symbol against which the relocation is
5584 occurring. */
5586 /* The final GP value to be used for the relocatable, executable, or
5587 shared object file being produced. */
5589 /* The place (section offset or address) of the storage unit being
5590 relocated. */
5591 bfd_vma p;
5592 /* The value of GP used to create the relocatable object. */
5594 /* The offset into the global offset table at which the address of
5595 the relocation entry symbol, adjusted by the addend, resides
5596 during execution. */
5598 /* The section in which the symbol referenced by the relocation is
5599 located. */
5603 boolean local_p;
5608 boolean overflowed_p;
5610 /* Parse the relocation. */
5617 /* Assume that there will be no overflow. */
5620 /* Figure out whether or not the symbol is local. */
5623 {
5624 /* The symbol table does not follow the rule that local symbols
5625 must come before globals. */
5628 }
5629 else
5630 {
5633 }
5635 /* Figure out the value of the symbol. */
5637 {
5647 /* MIPS16 text labels should be treated as odd. */
5651 /* Record the name of this symbol, for our caller. */
5657 }
5658 else
5659 {
5660 /* For global symbols we look up the symbol in the hash-table. */
5663 /* Find the real hash-table entry for this symbol. */
5668 /* Record the name of this symbol, for our caller. */
5671 /* See if this is the special _gp_disp symbol. Note that such a
5672 symbol must always be a global symbol. */
5674 {
5675 /* Relocations against _gp_disp are permitted only with
5676 R_MIPS_HI16 and R_MIPS_LO16 relocations. */
5681 }
5683 /* If this symbol is defined, calculate its address. */
5687 {
5693 else
5695 }
5696 else
5697 {
5702 }
5703 }
5705 /* If we haven't already determined the GOT offset, or the GP value,
5706 and we're going to need it, get it now. */
5708 {
5715 /* Find the index into the GOT where this value is located. */
5717 {
5719 g = mips_elf_global_got_index
5722 }
5723 else
5724 {
5728 }
5730 /* Convert GOT indices to actual offsets. */
5745 }
5747 /* Figure out what kind of relocation is being performed. */
5749 {
5760 /* If we're creating a shared library, or this relocation is
5761 against a symbol in a shared library, then we can't know
5762 where the symbol will end up. So, we create a relocation
5763 record in the output, and leave the job up to the dynamic
5764 linker. */
5766 {
5770 reloc_index
5772 info,
5773 relocation,
5775 addend,
5776 input_section);
5781 }
5782 else
5783 {
5786 else
5788 }
5795 else
5802 {
5805 }
5806 else
5807 {
5810 }
5816 else
5817 {
5820 }
5824 /* Because we don't merge literal sections, we can handle this
5825 just like R_MIPS_GPREL16. In the long run, we should merge
5826 shared literals, and then we will need to additional work
5827 here. */
5829 /* Fall through. */
5834 else
5841 {
5845 value
5847 abfd,
5848 value);
5851 }
5853 /* Fall through. */
5872 /* We're allowed to handle these two relocations identically.
5873 The dynamic linker is allowed to handle the CALL relocations
5874 differently by creating a lazy evaluation stub. */
5894 abfd,
5895 value);
5926 /* Both of these may be ignored. R_MIPS_JALR is an optimization
5927 hint; we could improve performance by honoring that hint. */
5932 /* We don't do anything with these at present. */
5937 /* These relocations, used for MIPS16, are not clearly
5938 documented anywhere. What do they do? */
5942 /* An unrecognized relocation type. */
5944 }
5946 /* Store the VALUE for our caller. */
5949 }
5951 /* Obtain the field relocated by RELOCATION. */
5953 static bfd_vma
5959 {
5960 bfd_vma x;
5964 {
5982 #ifdef BFD64
5984 #else
5986 #endif
5992 }
5995 }
5997 /* It has been determined that the result of the RELOCATION is the
5998 VALUE. Use HOWTO to place VALUE into the output file at the
5999 appropriate position. The SECTION is the section to which the
6000 relocatin applies.
6002 Returns false if anything goes wrong. */
6004 static void
6008 bfd_vma value;
6011 {
6012 bfd_vma x;
6015 /* Obtain the current value. */
6018 /* Clear the field we are setting. */
6021 /* Set the field. */
6024 /* Put the value into the output. */
6026 {
6044 #ifdef BFD64
6046 #else
6048 #endif
6054 }
6055 }
6057 /* Relocate a MIPS ELF section. */
6059 static boolean
6070 {
6076 bfd_vma gp;
6080 bfd_vma addend;
6081 bfd_vma last_hi16_addend;
6093 else
6098 {
6101 }
6102 else
6103 {
6106 }
6112 {
6114 bfd_vma value;
6118 /* Find the relocation howto for this relocation. */
6122 {
6125 /* If these relocations were originally of the REL variety,
6126 we must pull the addend out of the field that will be
6127 relocated. Otherwise, we simply use the contents of the
6128 RELA relocation. To determine which flavor or relocation
6129 this is, we depend on the fact that the INPUT_SECTION's
6130 REL_HDR is read before its REL_HDR2. */
6135 {
6139 rel,
6140 input_bfd,
6141 contents);
6144 /* For some kinds of relocations, the ADDEND is a
6145 combination of the addend stored in two different
6146 relocations. */
6148 {
6149 /* Scan ahead to find a matching R_MIPS_LO16
6150 relocation. */
6151 bfd_vma l;
6156 /* Save the high-order bit for later. When we
6157 encounter the R_MIPS_LO16 relocation we will need
6158 them again. */
6163 /* Compute the combined addend. */
6165 }
6167 {
6168 /* Used the saved HI16 addend. */
6172 }
6173 }
6174 else
6176 }
6178 /* In the N32 and 64-bit ABIs there may be multiple consecutive
6179 relocations for the same offset. In that case we are
6180 supposed to treat the output of each relocation as the addend
6181 for the next. */
6184 else
6187 /* Figure out what value we are supposed to relocate. */
6189 input_bfd,
6190 input_section,
6191 info,
6192 rel,
6193 addend,
6194 howto,
6195 relend,
6196 local_syms,
6197 local_sections,
6200 {
6202 /* There's nothing to do. */
6214 /* Ignore overflow until we reach the last relocation for
6215 a given location. */
6216 ;
6231 }
6233 /* If we've got another relocation for the address, keep going
6234 until we reach the last one. */
6236 {
6239 }
6241 /* Actually perform the relocation. */
6243 contents);
6244 }
6247 }
6249 /* This hook function is called before the linker writes out a global
6250 symbol. We mark symbols as small common if appropriate. This is
6251 also where we undo the increment of the value for a mips16 symbol. */
6253 /*ARGSIGNORED*/
6254 static boolean
6261 {
6262 /* If we see a common symbol, which implies a relocatable link, then
6263 if a symbol was small common in an input file, mark it as small
6264 common in the output file. */
6274 }
6275 \f
6276 /* Functions for the dynamic linker. */
6278 /* The name of the dynamic interpreter. This is put in the .interp
6279 section. */
6281 #define ELF_DYNAMIC_INTERPRETER(abfd) \
6284 /* Create dynamic sections when linking against a dynamic object. */
6286 static boolean
6290 {
6292 flagword flags;
6299 /* Mips ABI requests the .dynamic section to be read only. */
6302 {
6305 }
6307 /* We need to create .got section. */
6311 /* Create the .msym section on IRIX6. It is used by the dynamic
6312 linker to speed up dynamic relocations, and to avoid computing
6313 the ELF hash for symbols. */
6318 /* Create .stub section. */
6321 {
6327 }
6332 {
6338 }
6340 /* On IRIX5, we adjust add some additional symbols and change the
6341 alignments of several sections. There is no ABI documentation
6342 indicating that this is necessary on IRIX6, nor any evidence that
6343 the linker takes such action. */
6345 {
6347 {
6361 }
6363 /* We need to create a .compact_rel section. */
6367 /* Change aligments of some sections. */
6383 }
6386 {
6402 {
6403 /* __rld_map is a four byte word located in the .data section
6404 and is filled in by the rtld to contain a pointer to
6405 the _r_debug structure. Its symbol value will be set in
6406 mips_elf_finish_dynamic_symbol. */
6423 }
6424 }
6427 }
6429 /* Create the .compact_rel section. */
6431 static boolean
6435 {
6436 flagword flags;
6440 {
6451 }
6454 }
6456 /* Create the .got section to hold the global offset table. */
6458 static boolean
6462 {
6463 flagword flags;
6468 /* This function may be called more than once. */
6481 /* Define the symbol _GLOBAL_OFFSET_TABLE_. We don't do this in the
6482 linker script because we don't want to define the symbol if we
6483 are not creating a global offset table. */
6499 /* The first several global offset table entries are reserved. */
6510 {
6515 }
6521 }
6523 /* Returns the .msym section for ABFD, creating it if it does not
6524 already exist. Returns NULL to indicate error. */
6529 {
6534 {
6538 SEC_ALLOC
6539 | SEC_LOAD
6540 | SEC_HAS_CONTENTS
6541 | SEC_LINKER_CREATED
6545 }
6548 }
6550 /* Look through the relocs for a section during the first phase, and
6551 allocate space in the global offset table. */
6553 static boolean
6559 {
6579 /* Check for the mips16 stub sections. */
6583 {
6586 /* Look at the relocation information to figure out which symbol
6587 this is for. */
6593 {
6596 /* This stub is for a local symbol. This stub will only be
6597 needed if there is some relocation in this BFD, other
6598 than a 16 bit function call, which refers to this symbol. */
6600 {
6604 /* We can ignore stub sections when looking for relocs. */
6615 sec_relocs = (_bfd_elf32_link_read_relocs
6633 }
6636 {
6637 /* There is no non-call reloc for this stub, so we do
6638 not need it. Since this function is called before
6639 the linker maps input sections to output sections, we
6640 can easily discard it by setting the SEC_EXCLUDE
6641 flag. */
6644 }
6646 /* Record this stub in an array of local symbol stubs for
6647 this BFD. */
6649 {
6655 else
6662 }
6666 /* We don't need to set mips16_stubs_seen in this case.
6667 That flag is used to see whether we need to look through
6668 the global symbol table for stubs. We don't need to set
6669 it here, because we just have a local stub. */
6670 }
6671 else
6672 {
6678 /* H is the symbol this stub is for. */
6682 }
6683 }
6686 {
6691 /* Look at the relocation information to figure out which symbol
6692 this is for. */
6698 {
6699 /* This stub was actually built for a static symbol defined
6700 in the same file. We assume that all static symbols in
6701 mips16 code are themselves mips16, so we can simply
6702 discard this stub. Since this function is called before
6703 the linker maps input sections to output sections, we can
6704 easily discard it by setting the SEC_EXCLUDE flag. */
6707 }
6712 /* H is the symbol this stub is for. */
6716 else
6719 /* If we already have an appropriate stub for this function, we
6720 don't need another one, so we can discard this one. Since
6721 this function is called before the linker maps input sections
6722 to output sections, we can easily discard it by setting the
6723 SEC_EXCLUDE flag. We can also discard this section if we
6724 happen to already know that this is a mips16 function; it is
6725 not necessary to check this here, as it is checked later, but
6726 it is slightly faster to check now. */
6728 {
6731 }
6735 }
6738 {
6741 }
6742 else
6743 {
6747 else
6748 {
6752 }
6753 }
6759 {
6769 else
6770 {
6773 /* This may be an indirect symbol created because of a version. */
6775 {
6778 }
6779 }
6781 /* Some relocs require a global offset table. */
6783 {
6785 {
6809 }
6810 }
6815 {
6816 /* We may need a local GOT entry for this relocation. We
6817 don't count R_MIPS_HI16 or R_MIPS_GOT16 relocations
6818 because they are always followed by a R_MIPS_LO16
6819 relocation for the value. We don't R_MIPS_GOT_PAGE
6820 because we can estimate the maximum number of pages
6821 needed by looking at the size of the segment.
6823 This estimation is very conservative since we can merge
6824 duplicate entries in the GOT. In order to be less
6825 conservative, we could actually build the GOT here,
6826 rather than in relocate_section. */
6829 }
6832 {
6835 {
6841 }
6842 /* Fall through. */
6846 /* This symbol requires a global offset table entry. */
6850 /* We need a stub, not a plt entry for the undefined
6851 function. But we record it as if it needs plt. See
6852 elf_adjust_dynamic_symbol in elflink.h. */
6862 /* This symbol requires a global offset table entry. */
6871 {
6873 {
6878 {
6882 (SEC_ALLOC
6883 | SEC_LOAD
6884 | SEC_HAS_CONTENTS
6885 | SEC_IN_MEMORY
6886 | SEC_LINKER_CREATED
6891 }
6892 }
6894 {
6895 /* When creating a shared object, we must copy these
6896 reloc types into the output file as R_MIPS_REL32
6897 relocs. We make room for this reloc in the
6898 .rel.dyn reloc section */
6900 {
6901 /* Add a null element. */
6904 }
6906 }
6907 else
6908 {
6911 /* We only need to copy this reloc if the symbol is
6912 defined in a dynamic object. */
6915 }
6917 /* Even though we don't directly need a GOT entry for
6918 this symbol, a symbol must have a dynamic symbol
6919 table index greater that DT_GOTSYM if there are
6920 dynamic relocations against it. */
6923 }
6940 /* This relocation describes the C++ object vtable hierarchy.
6941 Reconstruct it for later use during GC. */
6947 /* This relocation describes which C++ vtable entries are actually
6948 used. Record for later use during GC. */
6956 }
6958 /* If this reloc is not a 16 bit call, and it has a global
6959 symbol, then we will need the fn_stub if there is one.
6960 References from a stub section do not count. */
6969 {
6974 }
6975 }
6978 }
6980 /* Return the section that should be marked against GC for a given
6981 relocation. */
6990 {
6991 /* ??? Do mips16 stub sections need to be handled special? */
6994 {
6996 {
7003 {
7013 }
7014 }
7015 }
7016 else
7017 {
7022 {
7024 }
7025 }
7028 }
7030 /* Update the got entry reference counts for the section being removed. */
7032 static boolean
7038 {
7039 #if 0
7054 {
7061 /* ??? It would seem that the existing MIPS code does no sort
7062 of reference counting or whatnot on its GOT and PLT entries,
7063 so it is not possible to garbage collect them at this time. */
7068 }
7069 #endif
7072 }
7075 /* Adjust a symbol defined by a dynamic object and referenced by a
7076 regular object. The current definition is in some section of the
7077 dynamic object, but we're not including those sections. We have to
7078 change the definition to something the rest of the link can
7079 understand. */
7081 static boolean
7085 {
7092 /* Make sure we know what is going on here. */
7103 /* If this symbol is defined in a dynamic object, we need to copy
7104 any R_MIPS_32 or R_MIPS_REL32 relocs against it into the output
7105 file. */
7110 {
7115 {
7116 /* Make room for a null element. */
7119 }
7121 }
7123 /* For a function, create a stub, if needed. */
7126 {
7130 /* If this symbol is not defined in a regular file, then set
7131 the symbol to the stub location. This is required to make
7132 function pointers compare as equal between the normal
7133 executable and the shared library. */
7135 {
7136 /* We need .stub section. */
7144 /* XXX Write this stub address somewhere. */
7147 /* Make room for this stub code. */
7150 /* The last half word of the stub will be filled with the index
7151 of this symbol in .dynsym section. */
7153 }
7154 }
7156 /* If this is a weak symbol, and there is a real definition, the
7157 processor independent code will have arranged for us to see the
7158 real definition first, and we can just use the same value. */
7160 {
7166 }
7168 /* This is a reference to a symbol defined by a dynamic object which
7169 is not a function. */
7172 }
7174 /* This function is called after all the input files have been read,
7175 and the input sections have been assigned to output sections. We
7176 check for any mips16 stub sections that we can discard. */
7178 static boolean mips_elf_check_mips16_stubs
7181 static boolean
7185 {
7188 /* The .reginfo section has a fixed size. */
7198 mips_elf_check_mips16_stubs,
7202 }
7204 /* Check the mips16 stubs for a particular symbol, and see if we can
7205 discard them. */
7207 /*ARGSUSED*/
7208 static boolean
7211 PTR data;
7212 {
7215 {
7216 /* We don't need the fn_stub; the only references to this symbol
7217 are 16 bit calls. Clobber the size to 0 to prevent it from
7218 being included in the link. */
7224 }
7228 {
7229 /* We don't need the call_stub; this is a 16 bit function, so
7230 calls from other 16 bit functions are OK. Clobber the size
7231 to 0 to prevent it from being included in the link. */
7237 }
7241 {
7242 /* We don't need the call_stub; this is a 16 bit function, so
7243 calls from other 16 bit functions are OK. Clobber the size
7244 to 0 to prevent it from being included in the link. */
7250 }
7253 }
7255 /* Set the sizes of the dynamic sections. */
7257 static boolean
7261 {
7264 boolean reltext;
7271 {
7272 /* Set the contents of the .interp section to the interpreter. */
7274 {
7277 s->_raw_size
7279 s->contents
7281 }
7282 }
7284 /* The check_relocs and adjust_dynamic_symbol entry points have
7285 determined the sizes of the various dynamic sections. Allocate
7286 memory for them. */
7289 {
7291 boolean strip;
7293 /* It's OK to base decisions on the section name, because none
7294 of the dynobj section names depend upon the input files. */
7303 {
7305 {
7306 /* We only strip the section if the output section name
7307 has the same name. Otherwise, there might be several
7308 input sections for this output section. FIXME: This
7309 code is probably not needed these days anyhow, since
7310 the linker now does not create empty output sections. */
7316 }
7317 else
7318 {
7322 /* If this relocation section applies to a read only
7323 section, then we probably need a DT_TEXTREL entry.
7324 If the relocation section is .rel.dyn, we always
7325 assert a DT_TEXTREL entry rather than testing whether
7326 there exists a relocation to a read only section or
7327 not. */
7337 /* We use the reloc_count field as a counter if we need
7338 to copy relocs into the output file. */
7341 }
7342 }
7344 {
7347 bfd_size_type local_gotno;
7354 /* Calculate the total loadable size of the output. That
7355 will give us the maximum number of GOT_PAGE entries
7356 required. */
7358 {
7362 subsection;
7364 {
7368 }
7369 }
7372 /* Assume there are two loadable segments consisting of
7373 contiguous sections. Is 5 enough? */
7378 /* There has to be a global GOT entry for every symbol with
7379 a dynamic symbol table index of DT_MIPS_GOTSYM or
7380 higher. Therefore, it make sense to put those symbols
7381 that need GOT entries at the end of the symbol table. We
7382 do that here. */
7388 }
7390 {
7391 /* Irix rld assumes that the function stub isn't at the end
7392 of .text section. So put a dummy. XXX */
7394 }
7398 {
7399 /* We add a room for __rld_map. It will be filled in by the
7400 rtld to contain a pointer to the _r_debug structure. */
7402 }
7412 {
7413 /* It's not one of our sections, so don't allocate space. */
7415 }
7418 {
7421 }
7423 /* Allocate memory for the section contents. */
7426 {
7429 }
7430 }
7433 {
7434 /* Add some entries to the .dynamic section. We fill in the
7435 values later, in elf_mips_finish_dynamic_sections, but we
7436 must add the entries now so that we get the correct size for
7437 the .dynamic section. The DT_DEBUG entry is filled in by the
7438 dynamic linker and used by the debugger. */
7440 {
7442 {
7443 /* SGI object has the equivalence of DT_DEBUG in the
7444 DT_MIPS_RLD_MAP entry. */
7447 }
7448 else
7451 }
7454 {
7457 }
7463 {
7472 }
7481 {
7490 }
7498 #if 0
7499 /* Time stamps in executable files are a bad idea. */
7502 #endif
7507 #endif
7512 #endif
7534 && (bfd_get_section_by_name
7543 }
7545 /* If we use dynamic linking, we generate a section symbol for each
7546 output section. These are local symbols, which means that they
7547 must come first in the dynamic symbol table.
7548 That means we must increment the dynamic symbol index of every
7549 other dynamic symbol. */
7550 {
7556 {
7557 #if 0
7558 /* We no longer try to restrict the set of sections which get
7559 dynamic symbol table entries, since it fails if we have
7560 other random sections which need dynamic relocations. */
7562 bfd_size_type strindex;
7566 {
7569 mips_elf_adjust_dynindx,
7579 {
7589 }
7590 }
7591 else
7593 {
7596 _bfd_elf_link_adjust_dynindx,
7601 {
7603 /* These symbols will have no names, so we don't need to
7604 fiddle with dynstr_index. */
7605 }
7606 }
7607 }
7608 }
7611 }
7613 /* If NAME is one of the special IRIX6 symbols defined by the linker,
7614 adjust it appropriately now. */
7616 static void
7621 {
7622 /* The linker script takes care of providing names and values for
7623 these, but we must place them into the right sections. */
7630 NULL
7631 };
7638 NULL
7639 };
7649 {
7650 /* All of these symbols are given type STT_SECTION by the
7651 IRIX6 linker. */
7654 /* The IRIX linker puts these symbols in special sections. */
7657 else
7661 }
7662 }
7664 /* Finish up dynamic symbol handling. We set the contents of various
7665 dynamic sections here. */
7667 static boolean
7673 {
7675 bfd_vma gval;
7687 {
7692 /* This symbol has a stub. Set it up. */
7700 /* Fill the stub. */
7707 /* FIXME: Can h->dynindex be more than 64K? */
7718 /* Mark the symbol as undefined. plt.offset != -1 occurs
7719 only for the referenced symbol. */
7722 /* The run-time linker uses the st_value field of the symbol
7723 to reset the global offset table entry for this external
7724 to its stub address when unlinking a shared object. */
7727 }
7737 /* Run through the global symbol table, creating GOT entries for all
7738 the symbols that need them. */
7740 {
7741 bfd_vma offset;
7742 bfd_vma value;
7746 else
7747 /* For an entity defined in a shared object, this will be
7748 NULL. (For functions in shared objects for
7749 which we have created stubs, ST_VALUE will be non-NULL.
7750 That's because such the functions are now no longer defined
7751 in a shared object.) */
7756 }
7758 /* Create a .msym entry, if appropriate. */
7762 {
7763 Elf32_Internal_Msym msym;
7766 /* It is undocumented what the `1' indicates, but IRIX6 uses
7767 this value. */
7769 bfd_mips_elf_swap_msym_out
7772 }
7774 /* Mark _DYNAMIC and _GLOBAL_OFFSET_TABLE_ as absolute. */
7780 {
7784 }
7786 {
7788 {
7792 }
7795 {
7800 }
7802 {
7807 }
7809 {
7814 }
7815 }
7817 /* Handle the IRIX6-specific symbols. */
7823 {
7826 {
7833 }
7836 {
7837 /* IRIX6 does not use a .rld_map section. */
7842 }
7843 }
7845 /* If this is a mips16 symbol, force the value to be even. */
7851 }
7853 /* Finish up the dynamic sections. */
7855 static boolean
7859 {
7872 else
7873 {
7877 }
7880 {
7889 {
7890 Elf_Internal_Dyn dyn;
7898 {
7910 /* Rewrite DT_STRSZ. */
7924 get_vma:
7949 set_elemno:
7952 {
7955 else
7957 }
7958 else
7970 /* XXX FIXME: */
7974 /* XXX FIXME: */
7997 else
8003 /* The index into the dynamic symbol table which is the
8004 entry of the first external symbol that is not
8005 referenced within the same object. */
8026 s = (bfd_get_section_by_name
8033 s = (bfd_get_section_by_name
8038 }
8039 }
8040 }
8042 /* The first entry of the global offset table will be filled at
8043 runtime. The second entry will be used by some runtime loaders.
8044 This isn't the case of Irix rld. */
8046 {
8049 }
8054 {
8058 Elf_Internal_Sym sym;
8059 Elf32_compact_rel cpt;
8061 /* Set up the section symbols for the output sections. SGI sets
8062 the STT_NOTYPE attribute for these symbols. Should we do so? */
8068 {
8069 #if 0
8073 bfd_vma last;
8076 /* We no longer try to restrict the set of sections which get
8077 dynamic symbol table entries, since it fails if we have
8078 other random sections which need dynamic relocations. */
8080 {
8090 {
8093 {
8097 }
8098 else
8099 {
8101 dindx++;
8102 }
8105 ? SHN_MIPS_TEXT
8115 }
8117 /* Set the sh_info field of the output .dynsym section to
8118 the index of the first global symbol. */
8120 SIZEOF_MIPS_DYNSYM_SECNAMES;
8121 }
8122 else
8124 {
8125 Elf32_Internal_Msym msym;
8136 {
8148 bfd_elf32_swap_symbol_out
8154 bfd_mips_elf_swap_msym_out
8158 }
8160 /* Set the sh_info field of the output .dynsym section to
8161 the index of the first global symbol. */
8164 }
8165 }
8168 {
8169 /* Write .compact_rel section out. */
8172 {
8184 /* Clean up a dummy stub function entry in .text. */
8188 {
8189 file_ptr dummy_offset;
8194 MIPS_FUNCTION_STUB_SIZE);
8195 }
8196 }
8197 }
8199 /* Clean up a first relocation in .rel.dyn. */
8203 }
8206 }
8207 \f
8208 /* This is almost identical to bfd_generic_get_... except that some
8209 MIPS relocations need to be handled specially. Sigh. */
8218 boolean relocateable;
8220 {
8221 /* Get enough memory to hold the stuff */
8236 /* read in the section */
8238 input_section,
8244 /* We're not relaxing the section, so just copy the size info */
8249 input_section,
8250 reloc_vector,
8251 symbols);
8256 {
8258 /* for mips */
8262 {
8265 /* Skip all this stuff if we aren't mixing formats. */
8269 else
8270 {
8273 }
8274 lookup:
8276 {
8278 {
8292 /* @@FIXME ignoring warning for now */
8297 }
8298 }
8299 else
8301 }
8302 /* end mips */
8304 parent++)
8305 {
8307 bfd_reloc_status_type r;
8309 /* Specific to MIPS: Deal with relocation types that require
8310 knowing the gp of the output bfd. */
8313 {
8314 /* The special_function wouldn't get called anyways. */
8315 }
8317 {
8318 /* The gp isn't there; let the special function code
8319 fall over on its own. */
8320 }
8323 {
8324 /* bypass special_function call */
8328 }
8329 /* end mips specific stuff */
8334 input_section,
8337 skip_bfd_perform_relocation:
8340 {
8343 /* A partial link, so keep the relocs */
8346 }
8349 {
8351 {
8376 }
8378 }
8379 }
8380 }
8385 error_return:
8389 }
8390 #define bfd_elf32_bfd_get_relocated_section_contents \
8391 elf32_mips_get_relocated_section_contents
8392 \f
8393 /* ECOFF swapping routines. These are used when dealing with the
8394 .mdebug section, which is in the ECOFF debugging format. */
8396 {
8397 /* Symbol table magic number. */
8398 magicSym,
8399 /* Alignment of debugging information. E.g., 4. */
8401 /* Sizes of external symbolic information. */
8410 /* Functions to swap in external symbolic data. */
8411 ecoff_swap_hdr_in,
8412 ecoff_swap_dnr_in,
8413 ecoff_swap_pdr_in,
8414 ecoff_swap_sym_in,
8415 ecoff_swap_opt_in,
8416 ecoff_swap_fdr_in,
8417 ecoff_swap_rfd_in,
8418 ecoff_swap_ext_in,
8419 _bfd_ecoff_swap_tir_in,
8420 _bfd_ecoff_swap_rndx_in,
8421 /* Functions to swap out external symbolic data. */
8422 ecoff_swap_hdr_out,
8423 ecoff_swap_dnr_out,
8424 ecoff_swap_pdr_out,
8425 ecoff_swap_sym_out,
8426 ecoff_swap_opt_out,
8427 ecoff_swap_fdr_out,
8428 ecoff_swap_rfd_out,
8429 ecoff_swap_ext_out,
8430 _bfd_ecoff_swap_tir_out,
8431 _bfd_ecoff_swap_rndx_out,
8432 /* Function to read in symbolic data. */
8433 _bfd_mips_elf_read_ecoff_info
8434 };
8435 \f
8436 #define TARGET_LITTLE_SYM bfd_elf32_littlemips_vec
8438 #define TARGET_BIG_SYM bfd_elf32_bigmips_vec
8440 #define ELF_ARCH bfd_arch_mips
8441 #define ELF_MACHINE_CODE EM_MIPS
8443 /* The SVR4 MIPS ABI says that this should be 0x10000, but Irix 5 uses
8444 a value of 0x1000, and we are compatible. */
8445 #define ELF_MAXPAGESIZE 0x1000
8447 #define elf_backend_collect true
8448 #define elf_backend_type_change_ok true
8449 #define elf_backend_can_gc_sections true
8450 #define elf_info_to_howto mips_info_to_howto_rela
8451 #define elf_info_to_howto_rel mips_info_to_howto_rel
8452 #define elf_backend_sym_is_global mips_elf_sym_is_global
8453 #define elf_backend_object_p mips_elf32_object_p
8454 #define elf_backend_section_from_shdr mips_elf32_section_from_shdr
8455 #define elf_backend_fake_sections _bfd_mips_elf_fake_sections
8456 #define elf_backend_section_from_bfd_section \
8457 _bfd_mips_elf_section_from_bfd_section
8458 #define elf_backend_section_processing mips_elf32_section_processing
8459 #define elf_backend_symbol_processing _bfd_mips_elf_symbol_processing
8460 #define elf_backend_additional_program_headers \
8461 mips_elf_additional_program_headers
8462 #define elf_backend_modify_segment_map mips_elf_modify_segment_map
8463 #define elf_backend_final_write_processing \
8464 _bfd_mips_elf_final_write_processing
8465 #define elf_backend_ecoff_debug_swap &mips_elf32_ecoff_debug_swap
8467 #define bfd_elf32_bfd_is_local_label_name \
8468 mips_elf_is_local_label_name
8469 #define bfd_elf32_find_nearest_line _bfd_mips_elf_find_nearest_line
8470 #define bfd_elf32_set_section_contents _bfd_mips_elf_set_section_contents
8471 #define bfd_elf32_bfd_link_hash_table_create \
8472 mips_elf_link_hash_table_create
8473 #define bfd_elf32_bfd_final_link mips_elf_final_link
8474 #define bfd_elf32_bfd_copy_private_bfd_data \
8475 _bfd_mips_elf_copy_private_bfd_data
8476 #define bfd_elf32_bfd_merge_private_bfd_data \
8477 _bfd_mips_elf_merge_private_bfd_data
8478 #define bfd_elf32_bfd_set_private_flags _bfd_mips_elf_set_private_flags
8479 #define bfd_elf32_bfd_print_private_bfd_data \
8480 _bfd_mips_elf_print_private_bfd_data
8481 #define elf_backend_add_symbol_hook mips_elf_add_symbol_hook
8482 #define elf_backend_create_dynamic_sections \
8483 mips_elf_create_dynamic_sections
8484 #define elf_backend_check_relocs mips_elf_check_relocs
8485 #define elf_backend_adjust_dynamic_symbol \
8486 mips_elf_adjust_dynamic_symbol
8487 #define elf_backend_always_size_sections \
8488 mips_elf_always_size_sections
8489 #define elf_backend_size_dynamic_sections \
8490 mips_elf_size_dynamic_sections
8491 #define elf_backend_relocate_section mips_elf_relocate_section
8492 #define elf_backend_link_output_symbol_hook \
8493 mips_elf_link_output_symbol_hook
8494 #define elf_backend_finish_dynamic_symbol \
8495 mips_elf_finish_dynamic_symbol
8496 #define elf_backend_finish_dynamic_sections \
8497 mips_elf_finish_dynamic_sections
8498 #define elf_backend_gc_mark_hook mips_elf_gc_mark_hook
8499 #define elf_backend_gc_sweep_hook mips_elf_gc_sweep_hook
8501 #define elf_backend_got_header_size (4*MIPS_RESERVED_GOTNO)
8502 #define elf_backend_plt_header_size 0