| blob | 7d04739c8a9ea7a53c79fd23a88e17c43b938717 |
1 /* BFD back-end for IBM RS/6000 "XCOFF" files.
2 Copyright (C) 1990-2024 Free Software Foundation, Inc.
3 Written by Metin G. Ozisik, Mimi Phuong-Thao Vo, and John Gilmore.
4 Archive support from Damon A. Permezel.
5 Contributed by IBM Corporation and Cygnus Support.
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 3 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., 51 Franklin Street - Fifth Floor, Boston,
22 MA 02110-1301, USA. */
57 /* Forward declare xcoff_rtype2howto for coffcode.h macro. */
60 /* coffcode.h needs these to be defined. */
61 #define RS6000COFF_C 1
63 #define SELECT_RELOC(internal, howto) \
64 { \
65 internal.r_type = howto->type; \
66 internal.r_size = \
67 ((howto->complain_on_overflow == complain_overflow_signed \
68 ? 0x80 \
69 : 0) \
70 | (howto->bitsize - 1)); \
71 }
73 #define COFF_DEFAULT_SECTION_ALIGNMENT_POWER (3)
74 #define COFF_LONG_FILENAMES
75 #define NO_COFF_SYMBOLS
76 #define RTYPE2HOWTO(cache_ptr, dst) xcoff_rtype2howto (cache_ptr, dst)
77 #define coff_mkobject _bfd_xcoff_mkobject
78 #define coff_bfd_is_local_label_name _bfd_xcoff_is_local_label_name
79 #ifdef AIX_CORE
85 #define CORE_FILE_P rs6000coff_core_p
86 #define coff_core_file_failing_command \
87 rs6000coff_core_file_failing_command
88 #define coff_core_file_failing_signal \
89 rs6000coff_core_file_failing_signal
90 #define coff_core_file_matches_executable_p \
91 rs6000coff_core_file_matches_executable_p
92 #define coff_core_file_pid \
93 _bfd_nocore_core_file_pid
94 #else
95 #define CORE_FILE_P _bfd_dummy_target
96 #define coff_core_file_failing_command \
97 _bfd_nocore_core_file_failing_command
98 #define coff_core_file_failing_signal \
99 _bfd_nocore_core_file_failing_signal
100 #define coff_core_file_matches_executable_p \
101 _bfd_nocore_core_file_matches_executable_p
102 #define coff_core_file_pid \
103 _bfd_nocore_core_file_pid
104 #endif
105 #define coff_SWAP_sym_in _bfd_xcoff_swap_sym_in
106 #define coff_SWAP_sym_out _bfd_xcoff_swap_sym_out
107 #define coff_SWAP_aux_in _bfd_xcoff_swap_aux_in
108 #define coff_SWAP_aux_out _bfd_xcoff_swap_aux_out
109 #define coff_swap_reloc_in xcoff_swap_reloc_in
110 #define coff_swap_reloc_out xcoff_swap_reloc_out
111 #define NO_COFF_RELOCS
113 #ifndef bfd_pe_print_pdata
114 #define bfd_pe_print_pdata NULL
115 #endif
119 /* The main body of code is in coffcode.h. */
122 static bool xcoff_write_armap_old
124 static bool xcoff_write_armap_big
134 static bool xcoff_ppc_relocate_section
137 static bool _bfd_xcoff_put_ldsymbol_name
145 static bool xcoff_generate_rtinit
150 /* Relocation functions */
160 {
211 };
215 {
216 xcoff_complain_overflow_dont_func,
217 xcoff_complain_overflow_bitfield_func,
218 xcoff_complain_overflow_signed_func,
219 xcoff_complain_overflow_unsigned_func,
220 };
222 /* Information about one member of an archive. */
223 struct member_layout
224 {
225 /* The archive member that this structure describes. */
228 /* The number of bytes of padding that must be inserted before the
229 start of the member in order to ensure that the section contents
230 are correctly aligned. */
233 /* The offset of MEMBER from the start of the archive (i.e. the end
234 of the leading padding). */
235 file_ptr offset;
237 /* The normalized name of MEMBER. */
240 /* The length of NAME, without padding. */
241 bfd_size_type namlen;
243 /* The length of NAME, with padding. */
244 bfd_size_type padded_namlen;
246 /* The size of MEMBER's header, including the name and magic sequence. */
247 bfd_size_type header_size;
249 /* The size of the MEMBER's contents. */
250 bfd_size_type contents_size;
252 /* The number of bytes of padding that must be inserted after MEMBER
253 in order to preserve even alignment. */
254 bfd_size_type trailing_padding;
255 };
257 /* A structure used for iterating over the members of an archive. */
258 struct archive_iterator
259 {
260 /* The archive itself. */
263 /* Information about the current archive member. */
266 /* Information about the next archive member. MEMBER is null if there
267 are no more archive members, in which case OFFSET is the offset of
268 the first unused byte. */
270 };
272 /* Initialize INFO so that it describes member MEMBER of archive ARCHIVE.
273 OFFSET is the even-padded offset of MEMBER, not including any leading
274 padding needed for section alignment. */
276 static void
279 {
283 {
289 else
298 info->leading_padding
301 }
303 }
305 /* Set up ITERATOR to iterate through archive ARCHIVE. */
307 static void
310 {
314 ? SIZEOF_AR_FILE_HDR_BIG
316 }
318 /* Make ITERATOR visit the first unvisited archive member. Return true
319 on success; return false if all members have been visited. */
321 static bool
323 {
335 }
337 /* We use our own tdata type. Its first field is the COFF tdata type,
338 so the COFF routines are compatible. */
340 bool
342 {
357 /* We set cputype to -1 to indicate that it has not been
358 initialized. */
364 /* text section alignment is different than the default */
368 }
370 /* Copy XCOFF data from one BFD to another. */
372 bool
374 {
386 else
387 {
391 else
393 }
396 else
397 {
401 else
403 }
411 }
413 /* I don't think XCOFF really has a notion of local labels based on
414 name. This will mean that ld -X doesn't actually strip anything.
415 The AIX native linker does not have a -X option, and it ignores the
416 -x option. */
418 bool
421 {
423 }
424 \f
425 void
427 {
432 {
434 }
435 else
436 {
439 }
446 }
448 unsigned int
450 {
455 {
457 }
458 else
459 {
462 }
470 }
472 void
475 {
480 {
482 _bfd_error_handler
483 /* xgettext: c-format */
491 {
495 }
496 else
501 /* RS/6000 "csect" auxents.
502 There is always a CSECT auxiliary entry. But functions can
503 have FCN ones too. In this case, CSECT is always the last
504 one. */
509 {
513 /* We don't have to hack bitfields in x_smtyp because it's
514 defined by shifts-and-ands, which are equivalent on all
515 byte orders. */
520 }
521 else
522 {
523 /* x_exptr isn't supported. */
530 }
537 /* PE defines some extra fields; we zero them out for
538 safety. */
555 }
556 }
558 unsigned int
561 {
567 {
569 _bfd_error_handler
570 /* xgettext: c-format */
578 {
582 }
583 else
588 /* RS/6000 "csect" auxents */
593 {
597 /* We don't have to hack bitfields in x_smtyp because it's
598 defined by shifts-and-ands, which are equivalent on all
599 byte orders. */
604 }
605 else
606 {
612 }
630 }
633 }
634 \f
635 /* The XCOFF reloc table.
636 XCOFF relocations aren't defined only by the type field r_type.
637 The bitsize and whether they are signed or not, are defined by
638 r_size field. Thus, it's complicated to create a constant
639 table reference every possible relocation.
640 This table contains the "default" relocation and few modified
641 relocations what were already there. It's enough when
642 xcoff_rtype2howto is called.
643 For relocations from an input bfd to an output bfd, the default
644 relocation is retrieved and when manually adapted.
646 For now, it seems to be enought. */
648 reloc_howto_type xcoff_howto_table[] =
649 {
650 /* 0x00: Standard 32 bit relocation. */
665 /* 0x01: 32 bit relocation, but store negative value. */
680 /* 0x02: 32 bit PC relative relocation. */
695 /* 0x03: 16 bit TOC relative relocation. */
710 /* 0x04: Same as R_TOC */
725 /* 0x05: External TOC relative symbol. */
740 /* 0x06: Local TOC relative symbol. */
757 /* 0x08: Same as R_RBA. */
774 /* 0x0a: Same as R_RBR. */
791 /* 0x0c: Same as R_POS. */
806 /* 0x0d: Same as R_POS. */
823 /* 0x0f: Non-relocating reference. Bitsize is 1 so that r_rsize is 0. */
842 /* 0x13: Same as R_TOC. */
857 /* 0x14: Modifiable relative branch. */
872 /* 0x15: Modifiable absolute branch. */
887 /* 0x16: Modifiable call absolute indirect. */
902 /* 0x17: Modifiable call relative. */
917 /* 0x18: Modifiable branch absolute. */
932 /* 0x19: Modifiable branch absolute. */
947 /* 0x1a: Modifiable branch relative. */
962 /* 0x1b: Modifiable branch absolute. */
977 /* 0x1c: 16 bit Non modifiable absolute branch. */
992 /* 0x1d: Modifiable branch relative. */
1007 /* 0x1e: Modifiable branch relative. */
1024 /* 0x20: General-dynamic TLS relocation. */
1039 /* 0x21: Initial-exec TLS relocation. */
1054 /* 0x22: Local-dynamic TLS relocation. */
1069 /* 0x23: Local-exec TLS relocation. */
1084 /* 0x24: TLS relocation. */
1100 /* 0x25: TLS module relocation. */
1126 /* 0x30: High-order 16 bit TOC relative relocation. */
1141 /* 0x31: Low-order 16 bit TOC relative relocation. */
1156 };
1158 void
1160 {
1164 /* Default howto layout works most of the time */
1167 /* Special case some 16 bit reloc */
1169 {
1176 }
1178 /* The r_size field of an XCOFF reloc encodes the bitsize of the
1179 relocation, as well as indicating whether it is signed or not.
1180 Doublecheck that the relocation information gathered from the
1181 type matches this information. The bitsize is not significant
1182 for R_REF relocs. */
1187 }
1189 reloc_howto_type *
1191 bfd_reloc_code_real_type code)
1192 {
1194 {
1230 }
1231 }
1236 {
1241 i++)
1247 }
1248 \f
1249 /* XCOFF archive support. The original version of this code was by
1250 Damon A. Permezel. It was enhanced to permit cross support, and
1251 writing archive files, by Ian Lance Taylor, Cygnus Support.
1253 XCOFF uses its own archive format. Everything is hooked together
1254 with file offset links, so it is possible to rapidly update an
1255 archive in place. Of course, we don't do that. An XCOFF archive
1256 has a real file header, not just an ARMAG string. The structure of
1257 the file header and of each archive header appear below.
1259 An XCOFF archive also has a member table, which is a list of
1260 elements in the archive (you can get that by looking through the
1261 linked list, but you have to read a lot more of the file). The
1262 member table has a normal archive header with an empty name. It is
1263 normally (and perhaps must be) the second to last entry in the
1264 archive. The member table data is almost printable ASCII. It
1265 starts with a 12 character decimal string which is the number of
1266 entries in the table. For each entry it has a 12 character decimal
1267 string which is the offset in the archive of that member. These
1268 entries are followed by a series of null terminated strings which
1269 are the member names for each entry.
1271 Finally, an XCOFF archive has a global symbol table, which is what
1272 we call the armap. The global symbol table has a normal archive
1273 header with an empty name. It is normally (and perhaps must be)
1274 the last entry in the archive. The contents start with a four byte
1275 binary number which is the number of entries. This is followed by
1276 a that many four byte binary numbers; each is the file offset of an
1277 entry in the archive. These numbers are followed by a series of
1278 null terminated strings, which are symbol names.
1280 AIX 4.3 introduced a new archive format which can handle larger
1281 files and also 32- and 64-bit objects in the same archive. The
1282 things said above remain true except that there is now more than
1283 one global symbol table. The one is used to index 32-bit objects,
1284 the other for 64-bit objects.
1286 The new archives (recognizable by the new ARMAG string) has larger
1287 field lengths so that we cannot really share any code. Also we have
1288 to take care that we are not generating the new form of archives
1289 on AIX 4.2 or earlier systems. */
1291 /* PR 21786: The PE/COFF standard does not require NUL termination for any of
1292 the ASCII fields in the archive headers. So in order to be able to extract
1293 numerical values we provide our own versions of strtol and strtoll which
1294 take a maximum length as an additional parameter. Also - just to save space,
1295 we omit the endptr return parameter, since we know that it is never used. */
1297 static unsigned long
1299 {
1307 }
1309 static unsigned long long
1311 {
1319 }
1321 /* Macro to read an ASCII value stored in an archive header field. */
1322 #define GET_VALUE_IN_FIELD(VAR, FIELD, BASE) \
1323 do \
1324 { \
1325 (VAR) = (sizeof (VAR) > sizeof (long) \
1326 ? _bfd_strntoll (FIELD, BASE, sizeof FIELD) \
1327 : _bfd_strntol (FIELD, BASE, sizeof FIELD)); \
1328 } \
1329 while (0)
1331 #define EQ_VALUE_IN_FIELD(VAR, FIELD, BASE) \
1332 (sizeof (VAR) > sizeof (long) \
1333 ? (VAR) == _bfd_strntoll (FIELD, BASE, sizeof FIELD) \
1334 : (VAR) == _bfd_strntol (FIELD, BASE, sizeof FIELD))
1336 /* Read in the armap of an XCOFF archive. */
1338 bool
1340 {
1341 ufile_ptr off;
1343 bfd_size_type sz;
1350 {
1353 }
1356 {
1357 /* This is for the old format. */
1362 {
1365 }
1370 /* The symbol table starts with a normal archive header. */
1374 /* Skip the name (normally empty). */
1382 {
1385 }
1387 /* Read in the entire symbol table. */
1392 /* Ensure strings are NULL terminated so we don't wander off the
1393 end of the buffer. */
1396 /* The symbol table starts with a four byte count. */
1400 {
1403 }
1410 /* After the count comes a list of four byte file offsets. */
1415 }
1416 else
1417 {
1418 /* This is for the new format. */
1423 {
1426 }
1431 /* The symbol table starts with a normal archive header. */
1435 /* Skip the name (normally empty). */
1443 {
1446 }
1448 /* Read in the entire symbol table. */
1453 /* Ensure strings are NULL terminated so we don't wander off the
1454 end of the buffer. */
1457 /* The symbol table starts with an eight byte count. */
1461 {
1464 }
1471 /* After the count comes a list of eight byte file offsets. */
1476 }
1478 /* After the file offsets come null terminated symbol names. */
1483 {
1485 {
1488 }
1490 }
1496 }
1498 /* See if this is an XCOFF archive. */
1500 bfd_cleanup
1502 {
1508 {
1512 }
1516 {
1519 }
1528 /* Now handle the two formats. */
1530 {
1531 /* This is the old format. */
1534 /* Copy over the magic string. */
1537 /* Now read the rest of the file header. */
1540 {
1544 }
1555 }
1556 else
1557 {
1558 /* This is the new format. */
1561 /* Copy over the magic string. */
1564 /* Now read the rest of the file header. */
1567 {
1571 }
1583 }
1586 {
1587 error_ret:
1589 error_ret_restore:
1592 }
1595 }
1597 /* Track file ranges occupied by elements. Add [START,END) to the
1598 list of ranges and return TRUE if there is no overlap between the
1599 new and any other element or the archive file header. This is
1600 aimed at preventing infinite looping on malformed archives, for
1601 "ar" and similar which typically use code like:
1602 . for (last = bfd_openr_next_archived_file (archive, NULL);
1603 . last;
1604 . last = next)
1605 . {
1606 . do_something_with (last);
1607 . next = bfd_openr_next_archived_file (archive, last);
1608 . bfd_close (last);
1609 . }
1610 The check implemented here is only possible due to the fact that
1611 for XCOFF archives bfd_openr_next_archived_file is the only code
1612 path leading to _bfd_read_ar_hdr. _bfd_read_ar_hdr is not called
1613 when reading the armap, nor do XCOFF archives use the extended name
1614 scheme implemented in archive.c.
1616 Note that the check relies on the previous element being closed,
1617 and there is one case where add_range might fail but I think it is
1618 sufficently unusual that it doesn't warrant fixing:
1619 If the loop body above called bfd_openr_next_archived_file twice
1620 with the same arguments and the element returned is bfd_close'd
1621 between those calls then we'll return false here for the second
1622 call. (For why this is so see _bfd_look_for_bfd_in_cache in
1623 _bfd_get_elt_at_filepos, and know that bfd_close removes elements
1624 from the cache.) */
1626 static bool
1628 {
1630 {
1631 err:
1634 }
1636 /* This list is kept sorted by address. Find the highest address
1637 range on the list that ends before the new range starts. Exit
1638 the loop with that range in LO, and the mext higher range in HI. */
1642 {
1645 }
1648 /* Start overlaps the file header or elements adjacent to it. */
1652 /* Overlap with another element. */
1655 /* A zero size element with a one char name is this big. */
1658 {
1659 /* Merge into an existing range. */
1662 {
1663 /* In fact, we can merge two ranges. */
1666 /* The list uses bfd_alloc so don't free HI. */
1667 }
1669 }
1672 {
1673 /* Merge into an existing range. */
1676 }
1686 }
1688 /* Read the archive header in an XCOFF archive. */
1692 {
1693 bfd_size_type namlen;
1695 bfd_size_type amt;
1699 {
1717 {
1720 }
1726 }
1727 else
1728 {
1746 {
1749 }
1755 }
1757 /* Size occupied by the header above that covered in the fixed
1758 SIZEOF_AR_HDR or SIZEOF_AR_HDR_BIG. */
1761 /* Skip over the XCOFFARFMAG at the end of the file name. */
1764 {
1767 }
1770 }
1772 /* Open the next element in an XCOFF archive. */
1774 bfd *
1776 {
1777 ufile_ptr filestart;
1780 {
1783 }
1786 {
1788 {
1789 /* If we are scanning over elements twice in an open archive,
1790 which can happen in gdb after a fork, ensure we start the
1791 second scan with clean ranges. */
1797 }
1798 else
1806 {
1809 }
1810 }
1811 else
1812 {
1814 {
1820 }
1821 else
1829 {
1832 }
1833 }
1835 /* Check that we aren't pointing back at the last element. This is
1836 necessary depite the add_range checking in _bfd_xcoff_read_ar_hdr
1837 because archive.c leaves the last element open and thus in the
1838 archive element cache until the next element is opened. */
1840 {
1845 {
1848 }
1849 }
1852 }
1854 /* Stat an element in an XCOFF archive. */
1856 int
1858 {
1860 {
1863 }
1866 {
1874 }
1875 else
1876 {
1884 }
1887 }
1889 /* Normalize a file name for inclusion in an archive. */
1893 {
1900 filename++;
1901 else
1904 }
1906 /* Write out an XCOFF armap. */
1908 static bool
1911 {
1922 XCOFFARMAG_ELEMENT_SIZE);
1929 /* We need spaces, not null bytes, in the header. */
1946 {
1951 }
1954 {
1962 }
1965 {
1971 }
1974 }
1981 #define PRINT20(d, v) \
1982 sprintf (buff20, FMT20, (uint64_t) (v)), \
1983 memcpy ((void *) (d), buff20, 20)
1985 #define PRINT12(d, v) \
1986 sprintf (buff20, FMT12, (int)(v)), \
1987 memcpy ((void *) (d), buff20, 12)
1989 #define PRINT12_OCTAL(d, v) \
1990 sprintf (buff20, FMT12_OCTAL, (unsigned int)(v)), \
1991 memcpy ((void *) (d), buff20, 12)
1993 #define PRINT4(d, v) \
1994 sprintf (buff20, FMT4, (int)(v)), \
1995 memcpy ((void *) (d), buff20, 4)
1997 #define READ20(d, v) \
1998 buff20[20] = 0, \
1999 memcpy (buff20, (d), 20), \
2000 (v) = bfd_scan_vma (buff20, (const char **) NULL, 10)
2002 static bool
2004 {
2007 /* Limit pad to <= 4096. */
2016 }
2018 static bool
2020 {
2021 bfd_size_type remaining;
2030 {
2036 }
2039 {
2043 }
2046 }
2048 static bool
2051 {
2060 /* First, we look through the symbols and work out which are
2061 from 32-bit objects and which from 64-bit ones. */
2068 {
2071 {
2074 {
2075 sym_64++;
2077 }
2078 else
2079 {
2080 sym_32++;
2082 }
2083 i++;
2084 }
2085 }
2087 /* A quick sanity check... */
2089 /* Explicit cast to int for compiler. */
2094 /* xcoff_write_archive_contents_big passes nextoff in symoff. */
2100 /* Write out the symbol table.
2101 Layout :
2103 standard big archive header
2104 0x0000 ar_size [0x14]
2105 0x0014 ar_nxtmem [0x14]
2106 0x0028 ar_prvmem [0x14]
2107 0x003C ar_date [0x0C]
2108 0x0048 ar_uid [0x0C]
2109 0x0054 ar_gid [0x0C]
2110 0x0060 ar_mod [0x0C]
2111 0x006C ar_namelen[0x04]
2112 0x0070 ar_fmag [SXCOFFARFMAG]
2114 Symbol table
2115 0x0072 num_syms [0x08], binary
2116 0x0078 offsets [0x08 * num_syms], binary
2117 0x0086 + 0x08 * num_syms names [??]
2118 ?? pad to even bytes.
2119 */
2122 {
2127 bfd_vma symbol_table_size =
2128 SIZEOF_AR_HDR_BIG
2129 + SXCOFFARFMAG
2144 else
2161 /* loop over the 32 bit offsets */
2165 {
2168 {
2170 {
2173 }
2174 i++;
2175 }
2176 }
2178 /* loop over the 32 bit symbol names */
2183 {
2186 {
2188 {
2191 }
2192 i++;
2193 }
2194 }
2198 {
2201 }
2206 }
2207 else
2211 {
2216 bfd_vma symbol_table_size =
2217 SIZEOF_AR_HDR_BIG
2218 + SXCOFFARFMAG
2245 /* loop over the 64 bit offsets */
2249 {
2252 {
2254 {
2257 }
2258 i++;
2259 }
2260 }
2262 /* loop over the 64 bit symbol names */
2267 {
2270 {
2272 {
2275 }
2276 i++;
2277 }
2278 }
2282 {
2285 }
2289 }
2290 else
2294 }
2296 bool
2299 {
2302 else
2304 }
2306 /* Write out an XCOFF archive. We always write an entire archive,
2307 rather than fussing with the freelist and so forth. */
2309 static bool
2311 {
2315 bfd_size_type count;
2316 bfd_size_type total_namlen;
2324 bfd_size_type size;
2336 {
2340 {
2344 }
2346 {
2351 {
2352 /* Assume we just "made" the member, and fake it. */
2360 }
2362 {
2365 }
2368 {
2373 }
2387 }
2388 }
2401 i++)
2402 {
2403 bfd_size_type namlen;
2407 {
2410 }
2417 /* We need spaces, not null bytes, in the header. */
2437 }
2441 /* Write out the member table. */
2458 size = (SIZEOF_AR_HDR
2459 + XCOFFARMAG_ELEMENT_SIZE
2461 + total_namlen
2469 else
2472 /* We need spaces, not null bytes, in the header. */
2486 {
2491 }
2493 {
2495 bfd_size_type namlen;
2501 }
2506 /* Write out the armap, if appropriate. */
2509 else
2510 {
2518 }
2520 /* Write out the archive file header. */
2522 /* We need spaces, not null bytes, in the header. */
2532 }
2534 static bool
2536 {
2539 bfd_size_type count;
2540 bfd_size_type total_namlen;
2548 bfd_size_type size;
2550 bfd_vma member_table_size;
2559 /* Calculate count and total_namlen. */
2565 {
2569 && ! hasobjects
2574 {
2579 }
2582 {
2587 {
2588 /* Assume we just "made" the member, and fake it. */
2596 }
2598 {
2601 }
2604 {
2609 }
2623 }
2624 }
2628 {
2632 }
2637 i++)
2638 {
2639 bfd_size_type namlen;
2648 {
2651 }
2661 {
2664 }
2668 }
2671 {
2674 }
2676 /* Write out the member table.
2677 Layout :
2679 standard big archive header
2680 0x0000 ar_size [0x14]
2681 0x0014 ar_nxtmem [0x14]
2682 0x0028 ar_prvmem [0x14]
2683 0x003C ar_date [0x0C]
2684 0x0048 ar_uid [0x0C]
2685 0x0054 ar_gid [0x0C]
2686 0x0060 ar_mod [0x0C]
2687 0x006C ar_namelen[0x04]
2688 0x0070 ar_fmag [0x02]
2690 Member table
2691 0x0072 count [0x14]
2692 0x0086 offsets [0x14 * counts]
2693 0x0086 + 0x14 * counts names [??]
2694 ?? pad to even bytes.
2695 */
2700 member_table_size = (SIZEOF_AR_HDR_BIG
2701 + SXCOFFARFMAG
2702 + XCOFFARMAGBIG_ELEMENT_SIZE
2709 {
2712 }
2721 else
2737 {
2740 }
2743 {
2746 }
2751 {
2758 }
2770 /* Write out the armap, if appropriate. */
2774 else
2775 {
2778 /* Save nextoff in fhdr->symoff so the armap routine can use it. */
2786 }
2788 /* Write out the archive file header. */
2796 }
2798 bool
2800 {
2803 else
2805 }
2806 \f
2807 /* We can't use the usual coff_sizeof_headers routine, because AIX
2808 always uses an a.out header. */
2810 int
2813 {
2819 else
2824 {
2825 /* There can be additional sections just for dealing with overflow in
2826 reloc and lineno counts. But the numbers of relocs and lineno aren't
2827 known when bfd_sizeof_headers is called, so we compute them by
2828 summing the numbers from input sections. */
2829 struct nbr_reloc_lineno
2830 {
2833 };
2839 /* Although the number of sections is known, the maximum value of
2840 section->index isn't (because some sections may have been removed).
2841 Don't try to renumber sections, just compute the upper bound. */
2847 /* Allocate the per section counters. It could be possible to use a
2848 preallocated array as the number of sections is limited on XCOFF,
2849 but this creates a maintainance issue. */
2854 /* Sum. */
2859 {
2863 }
2865 /* Add the size of a section for each section with an overflow. */
2867 {
2873 }
2876 }
2879 }
2880 \f
2881 /* Routines to swap information in the XCOFF .loader section. If we
2882 ever need to write an XCOFF loader, this stuff will need to be
2883 moved to another file shared by the linker (which XCOFF calls the
2884 ``binder'') and the loader. */
2886 /* Swap in the ldhdr structure. */
2888 static void
2890 {
2901 }
2903 /* Swap out the ldhdr structure. */
2905 static void
2907 {
2918 }
2920 /* Swap in the ldsym structure. */
2922 static void
2924 {
2932 }
2939 }
2941 /* Swap out the ldsym structure. */
2943 static void
2945 {
2950 else
2951 {
2955 }
2962 }
2964 static void
2966 {
2976 }
2978 static unsigned int
2980 {
2990 }
2992 /* Swap in the ldrel structure. */
2994 static void
2996 {
3003 }
3005 /* Swap out the ldrel structure. */
3007 static void
3009 {
3016 }
3017 \f
3019 bool
3026 bfd_vma val ATTRIBUTE_UNUSED,
3027 bfd_vma addend ATTRIBUTE_UNUSED,
3031 {
3033 }
3035 bool
3042 bfd_vma val ATTRIBUTE_UNUSED,
3043 bfd_vma addend ATTRIBUTE_UNUSED,
3047 {
3048 _bfd_error_handler
3049 /* xgettext: c-format */
3054 }
3056 bool
3063 bfd_vma val,
3064 bfd_vma addend,
3068 {
3071 }
3073 bool
3080 bfd_vma val,
3081 bfd_vma addend,
3085 {
3088 }
3090 bool
3097 bfd_vma val,
3098 bfd_vma addend,
3102 {
3105 /* A PC relative reloc includes the section address. */
3112 }
3114 bool
3121 bfd_vma val,
3122 bfd_vma addend ATTRIBUTE_UNUSED,
3126 {
3135 {
3137 {
3138 _bfd_error_handler
3139 /* xgettext: c-format */
3144 }
3149 }
3151 /* We can't use the preexisting value written down by the
3152 assembly, as R_TOCU needs to be adjusted when the final
3153 R_TOCL value is signed. */
3162 }
3164 bool
3171 bfd_vma val,
3172 bfd_vma addend,
3176 {
3183 }
3185 static bool
3192 bfd_vma val,
3193 bfd_vma addend,
3197 {
3199 bfd_vma section_offset;
3209 /* If we see an R_BR or R_RBR reloc which is jumping to global
3210 linkage code, and it is followed by an appropriate cror nop
3211 instruction, we replace the cror with lwz r2,20(r1). This
3212 restores the TOC after the glink code. Contrariwise, if the
3213 call is followed by a lwz r2,20(r1), but the call is not
3214 going to global linkage code, we can replace the load with a
3215 cror. */
3220 {
3227 /* The _ptrgl function is magic. It is used by the AIX
3228 compiler to call a function through a pointer. */
3230 {
3236 }
3237 else
3238 {
3241 }
3242 }
3244 {
3245 /* Normally, this relocation is against a defined symbol. In the
3246 case where this is a partial link and the output section offset
3247 is greater than 2^25, the linker will return an invalid error
3248 message that the relocation has been truncated. Yes it has been
3249 truncated but no it not important. For this case, disable the
3250 overflow checking. */
3253 }
3255 /* Check if a stub is needed. */
3258 {
3263 {
3268 }
3274 }
3276 /* The original PC-relative relocation is biased by -r_vaddr, so adding
3277 the value below will give the absolute target address. */
3288 {
3290 bfd_vma insn;
3292 /* Turn the relative branch into an absolute one by setting the
3293 AA bit. */
3299 /* Make the howto absolute too. */
3302 }
3303 else
3304 {
3305 /* Use a PC-relative howto and subtract the instruction's address
3306 from the target address we calculated above. */
3311 }
3313 }
3315 bool
3322 bfd_vma val ATTRIBUTE_UNUSED,
3323 bfd_vma addend,
3327 {
3332 /* A PC relative reloc includes the section address. */
3339 }
3341 bool
3348 bfd_vma val,
3349 bfd_vma addend,
3353 {
3361 /* R_TLSML is handled by the loader but must be from a
3362 TOC entry targeting itslef. This is already verified in
3363 xcoff_link_add_symbols.
3364 The value must be 0. */
3366 {
3369 }
3371 /* The target symbol should always be available even if it's not
3372 exported. */
3375 /* TLS relocations must target a TLS symbol. */
3377 {
3378 _bfd_error_handler
3382 }
3384 /* Local TLS relocations must target a local symbol, ie
3385 non-imported. */
3390 {
3391 _bfd_error_handler
3395 }
3397 /* R_TLSM are relocations used by the loader.
3398 The value must be 0. */
3400 {
3403 }
3405 /* Other TLS relocations aims to put offsets from TLS pointers
3406 starting at -0x7c00 (or -0x7800 in XCOFF64). It becomes a
3407 simple R_POS relocation as long as .tdata and .tbss addresses
3408 start at the same value. This is done in aix ld scripts.
3409 TODO: implement optimization when tls size is < 62K. */
3413 }
3415 static bool
3417 bfd_vma val ATTRIBUTE_UNUSED,
3418 bfd_vma relocation ATTRIBUTE_UNUSED,
3420 howto ATTRIBUTE_UNUSED)
3421 {
3423 }
3425 static bool
3427 bfd_vma val,
3428 bfd_vma relocation,
3430 {
3434 /* Get the values to be added together. For signed and unsigned
3435 relocations, we assume that all values should be truncated to
3436 the size of an address. For bitfields, all the bits matter.
3437 See also bfd_check_overflow. */
3442 /* Much like unsigned, except no trimming with addrmask. In
3443 addition, the sum overflows if there is a carry out of
3444 the bfd_vma, i.e., the sum is less than either input
3445 operand. */
3449 /* Bitfields are sometimes used for signed numbers; for
3450 example, a 13-bit field sometimes represents values in
3451 0..8191 and sometimes represents values in -4096..4095.
3452 If the field is signed and a is -4095 (0x1001) and b is
3453 -1 (0x1fff), the sum is -4096 (0x1000), but (0x1001 +
3454 0x1fff is 0x3000). It's not clear how to handle this
3455 everywhere, since there is not way to know how many bits
3456 are significant in the relocation, but the original code
3457 assumed that it was fully sign extended, and we will keep
3458 that assumption. */
3462 {
3463 /* Some bits out of the field are set. This might not
3464 be a problem: if this is a signed bitfield, it is OK
3465 iff all the high bits are set, including the sign
3466 bit. We'll try setting all but the most significant
3467 bit in the original relocation value: if this is all
3468 ones, we are OK, assuming a signed bitfield. */
3473 }
3475 /* We just assume (b & ~ fieldmask) == 0. */
3477 /* We explicitly permit wrap around if this relocation
3478 covers the high bit of an address. The Linux kernel
3479 relies on it, and it is the only way to write assembler
3480 code which can run when loaded at a location 0x80000000
3481 away from the location at which it is linked. */
3488 {
3489 /* There was a carry out, or the field overflow. Test
3490 for signed operands again. Here is the overflow test
3491 is as for complain_overflow_signed. */
3494 }
3497 }
3499 static bool
3501 bfd_vma val,
3502 bfd_vma relocation,
3504 {
3508 /* Get the values to be added together. For signed and unsigned
3509 relocations, we assume that all values should be truncated to
3510 the size of an address. For bitfields, all the bits matter.
3511 See also bfd_check_overflow. */
3519 /* If any sign bits are set, all sign bits must be set.
3520 That is, A must be a valid negative address after
3521 shifting. */
3527 /* We only need this next bit of code if the sign bit of B
3528 is below the sign bit of A. This would only happen if
3529 SRC_MASK had fewer bits than BITSIZE. Note that if
3530 SRC_MASK has more bits than BITSIZE, we can get into
3531 trouble; we would need to verify that B is in range, as
3532 we do for A above. */
3535 {
3536 /* Set all the bits above the sign bit. */
3538 }
3542 /* Now we can do the addition. */
3545 /* See if the result has the correct sign. Bits above the
3546 sign bit are junk now; ignore them. If the sum is
3547 positive, make sure we did not have all negative inputs;
3548 if the sum is negative, make sure we did not have all
3549 positive inputs. The test below looks only at the sign
3550 bits, and it really just
3551 SIGN (A) == SIGN (B) && SIGN (A) != SIGN (SUM)
3552 */
3558 }
3560 static bool
3562 bfd_vma val,
3563 bfd_vma relocation,
3565 {
3569 /* Get the values to be added together. For signed and unsigned
3570 relocations, we assume that all values should be truncated to
3571 the size of an address. For bitfields, all the bits matter.
3572 See also bfd_check_overflow. */
3578 /* Checking for an unsigned overflow is relatively easy:
3579 trim the addresses and add, and trim the result as well.
3580 Overflow is normally indicated when the result does not
3581 fit in the field. However, we also need to consider the
3582 case when, e.g., fieldmask is 0x7fffffff or smaller, an
3583 input is 0x80000000, and bfd_vma is only 32 bits; then we
3584 will get sum == 0, but there is an overflow, since the
3585 inputs did not fit in the field. Instead of doing a
3586 separate test, we can check for this by or-ing in the
3587 operands when testing for the sum overflowing its final
3588 field. */
3596 }
3598 /* This is the relocation function for the RS/6000/POWER/PowerPC.
3599 This is currently the only processor which uses XCOFF; I hope that
3600 will never change.
3602 The original version was based on two documents:
3603 the PowerPC AIX Version 4 Application Binary Interface, First
3604 Edition (April 1992), and the PowerOpen ABI, Big-Endian
3605 32-Bit Hardware Implementation (June 30, 1994). Differences
3606 between the documents are noted below.
3607 Now, IBM has released an official documentation about XCOFF
3608 format:
3609 https://www.ibm.com/support/knowledgecenter/ssw_aix_72/filesreference/XCOFF.html
3611 Unsupported r_type's
3613 R_RTB:
3614 R_RRTBI:
3615 R_RRTBA:
3617 These relocs are defined by the PowerPC ABI to be
3618 relative branches which use half of the difference
3619 between the symbol and the program counter. I can't
3620 quite figure out when this is useful. These relocs are
3621 not defined by the PowerOpen ABI.
3623 Supported r_type's
3625 R_POS:
3626 Simple positive relocation.
3628 R_NEG:
3629 Simple negative relocation.
3631 R_REL:
3632 Simple PC relative relocation.
3634 R_TOC:
3635 TOC relative relocation. The value in the instruction in
3636 the input file is the offset from the input file TOC to
3637 the desired location. We want the offset from the final
3638 TOC to the desired location. We have:
3639 isym = iTOC + in
3640 iinsn = in + o
3641 osym = oTOC + on
3642 oinsn = on + o
3643 so we must change insn by on - in.
3644 This relocation allows the linker to perform optimizations
3645 by transforming a load instruction into a add-immediate
3646 when possible. The relocation is, then, changed to R_TRLA
3647 in the output file.
3648 TODO: Currently, the optimisation isn't implemented.
3650 R_TRL:
3651 TOC relative relocation. Same as R_TOC, except that
3652 the optimization isn't allowed
3654 R_TRLA:
3655 TOC relative relocation. This is a TOC relative load
3656 address instruction which have been changed to an add-
3657 immediate instruction.
3659 R_GL:
3660 GL linkage relocation. The value of this relocation
3661 is the address of the external symbol in the TOC
3662 section.
3664 R_TCL:
3665 Local object TOC address. I can't figure out the
3666 difference between this and case R_GL.
3668 R_RL:
3669 The PowerPC AIX ABI describes this as a load which may be
3670 changed to a load address. The PowerOpen ABI says this
3671 is the same as case R_POS.
3673 R_RLA:
3674 The PowerPC AIX ABI describes this as a load address
3675 which may be changed to a load. The PowerOpen ABI says
3676 this is the same as R_POS.
3678 R_REF:
3679 Not a relocation but a way to prevent the garbage
3680 collector of AIX linker to remove symbols.
3681 This is not needed in our case.
3683 R_BA:
3684 The PowerOpen ABI says this is the same as R_RBA.
3686 R_RBA:
3687 Absolute branch which may be modified to become a
3688 relative branch.
3690 R_BR:
3691 The PowerOpen ABI says this is the same as R_RBR.
3693 R_RBR:
3694 A relative branch which may be modified to become an
3695 absolute branch.
3697 R_CAI:
3698 The PowerPC ABI defines this as an absolute call which
3699 may be modified to become a relative call. The PowerOpen
3700 ABI does not define this relocation type.
3702 R_CREL:
3703 The PowerPC ABI defines this as a relative call which may
3704 be modified to become an absolute call. The PowerOpen
3705 ABI does not define this relocation type.
3707 R_RBAC:
3708 The PowerPC ABI defines this as an absolute branch to a
3709 fixed address which may be modified to an absolute branch
3710 to a symbol. The PowerOpen ABI does not define this
3711 relocation type.
3713 R_RBRC:
3714 The PowerPC ABI defines this as an absolute branch to a
3715 fixed address which may be modified to a relative branch.
3716 The PowerOpen ABI does not define this relocation type.
3718 R_TLS:
3719 Thread-local storage relocation using general-dynamic
3720 model.
3722 R_TLS_IE:
3723 Thread-local storage relocation using initial-exec model.
3725 R_TLS_LD:
3726 Thread-local storage relocation using local-dynamic model.
3728 R_TLS_LE:
3729 Thread-local storage relocation using local-exec model.
3731 R_TLSM:
3732 Tread-local storage relocation used by the loader.
3734 R_TLSML:
3735 Tread-local storage relocation used by the loader.
3737 R_TOCU:
3738 Upper TOC relative relocation. The value is the
3739 high-order 16 bit of a TOC relative relocation.
3741 R_TOCL:
3742 Lower TOC relative relocation. The value is the
3743 low-order 16 bit of a TOC relative relocation.
3744 */
3746 bool
3755 {
3762 {
3766 bfd_vma addend;
3767 bfd_vma val;
3769 bfd_vma relocation;
3770 bfd_vma value_to_relocate;
3771 bfd_vma address;
3774 /* Relocation type R_REF is a special relocation type which is
3775 merely used to prevent garbage collection from occurring for
3776 the csect including the symbol which it references. */
3780 /* Retrieve default value in HOWTO table and fix up according
3781 to r_size field, if it can be different.
3782 This should be made during relocation reading but the algorithms
3783 are expecting constant howtos. */
3786 {
3788 {
3797 _bfd_error_handler
3801 }
3802 }
3805 ? complain_overflow_signed
3808 /* symbol */
3816 {
3824 {
3826 /* Hack to make sure we use the right TOC anchor value
3827 if this reloc is against the TOC anchor. */
3831 else
3836 }
3837 else
3838 {
3850 {
3855 }
3857 {
3862 }
3863 else
3864 {
3870 }
3871 }
3872 }
3880 /* address */
3887 /* Get the value we are going to relocate. */
3890 else
3893 /* overflow.
3895 FIXME: We may drop bits during the addition
3896 which we don't check for. We must either check at every single
3897 operation, which would be tedious, or we must do the computations
3898 in a type larger than bfd_vma, which would be inefficient. */
3902 {
3908 {
3910 }
3912 {
3914 }
3915 else
3916 {
3920 }
3927 }
3929 /* Add RELOCATION to the right bits of VALUE_TO_RELOCATE. */
3934 /* Put the value back in the object file. */
3937 else
3939 }
3942 }
3944 /* gcc-8 warns (*) on all the strncpy calls in this function about
3945 possible string truncation. The "truncation" is not a bug. We
3946 have an external representation of structs with fields that are not
3947 necessarily NULL terminated and corresponding internal
3948 representation fields that are one larger so that they can always
3949 be NULL terminated.
3950 gcc versions between 4.2 and 4.6 do not allow pragma control of
3951 diagnostics inside functions, giving a hard error if you try to use
3952 the finer control available with later versions.
3953 gcc prior to 4.2 warns about diagnostic push and pop.
3954 gcc-5, gcc-6 and gcc-7 warn that -Wstringop-truncation is unknown,
3955 unless you also add #pragma GCC diagnostic ignored "-Wpragma".
3956 (*) Depending on your system header files! */
3957 #if GCC_VERSION >= 8000
3958 # pragma GCC diagnostic push
3960 #endif
3961 static bool
3966 {
3972 else
3973 {
3975 {
3976 bfd_size_type newalc;
3987 {
3990 }
3993 }
4001 }
4004 }
4006 static bool
4011 {
4013 {
4015 }
4016 else
4017 {
4019 bfd_size_type indx;
4027 }
4029 }
4030 #if GCC_VERSION >= 8000
4031 # pragma GCC diagnostic pop
4032 #endif
4038 {
4041 /* .sv64 = x_smclas == 17
4042 This is an invalid csect for 32 bit apps. */
4044 {
4048 };
4052 {
4053 return_value = bfd_make_section_anyway
4055 }
4056 else
4057 {
4058 _bfd_error_handler
4059 /* xgettext: c-format */
4063 }
4066 }
4068 static bool
4070 {
4075 }
4077 static bool
4079 {
4084 }
4086 static bfd_vma
4089 {
4091 }
4093 static bfd_vma
4095 {
4097 }
4099 static bool
4102 {
4108 bfd_size_type data_buffer_size;
4110 bfd_size_type string_table_size;
4111 bfd_vma val;
4129 /* file header */
4140 /* section header */
4154 /* .data
4155 0x0000 0x00000000 : rtl
4156 0x0004 0x00000010 : offset to init, or 0
4157 0x0008 0x00000028 : offset to fini, or 0
4158 0x000C 0x0000000C : size of descriptor
4159 0x0010 0x00000000 : init, needs a reloc
4160 0x0014 0x00000040 : offset to init name
4161 0x0018 0x00000000 : flags, padded to a word
4162 0x001C 0x00000000 : empty init
4163 0x0020 0x00000000 :
4164 0x0024 0x00000000 :
4165 0x0028 0x00000000 : fini, needs a reloc
4166 0x002C 0x00000??? : offset to fini name
4167 0x0030 0x00000000 : flags, padded to a word
4168 0x0034 0x00000000 : empty fini
4169 0x0038 0x00000000 :
4170 0x003C 0x00000000 :
4171 0x0040 init name
4172 0x0040 + initsz fini name */
4182 {
4188 }
4191 {
4197 }
4204 /* string table */
4211 {
4215 {
4218 }
4223 }
4225 /* symbols
4226 0. .data csect
4227 2. __rtinit
4228 4. init function
4229 6. fini function
4230 8. __rtld */
4234 /* .data csect */
4251 /* __rtinit */
4267 /* init */
4269 {
4274 {
4278 }
4279 else
4290 /* reloc */
4300 }
4302 /* fini */
4304 {
4309 {
4313 }
4314 else
4325 /* reloc */
4336 }
4339 {
4351 /* reloc */
4362 }
4383 }
4401 /* Indirect call stub
4402 The first word of the code must be modified by filling in
4403 the correct TOC offset. */
4406 {
4411 };
4413 /* Shared call stub
4414 The first word of the code must be modified by filling in
4415 the correct TOC offset.
4416 This is exactly as the glink code but without the traceback,
4417 as it won't be an independent function. */
4420 {
4427 };
4429 /* glink
4431 The first word of global linkage code must be modified by filling in
4432 the correct TOC offset. */
4435 {
4445 };
4447 /* Table to convert DWARF flags to section names.
4448 Remember to update binutils/dwarf.c:debug_displays
4449 if new DWARF sections are supported by XCOFF. */
4463 };
4465 /* For generic entry points. */
4466 #define _bfd_xcoff_close_and_cleanup coff_close_and_cleanup
4467 #define _bfd_xcoff_bfd_free_cached_info coff_bfd_free_cached_info
4468 #define _bfd_xcoff_new_section_hook coff_new_section_hook
4469 #define _bfd_xcoff_get_section_contents _bfd_generic_get_section_contents
4470 #define _bfd_xcoff_get_section_contents_in_window \
4471 _bfd_generic_get_section_contents_in_window
4473 /* For copy private data entry points. */
4474 #define _bfd_xcoff_init_private_section_data \
4475 _bfd_generic_init_private_section_data
4476 #define _bfd_xcoff_bfd_copy_private_bfd_data \
4477 _bfd_xcoff_copy_private_bfd_data
4478 #define _bfd_xcoff_bfd_merge_private_bfd_data \
4479 _bfd_generic_bfd_merge_private_bfd_data
4480 #define _bfd_xcoff_bfd_copy_private_section_data \
4481 _bfd_generic_bfd_copy_private_section_data
4482 #define _bfd_xcoff_bfd_copy_private_symbol_data \
4483 _bfd_generic_bfd_copy_private_symbol_data
4484 #define _bfd_xcoff_bfd_copy_private_header_data \
4485 _bfd_generic_bfd_copy_private_header_data
4486 #define _bfd_xcoff_bfd_set_private_flags \
4487 _bfd_generic_bfd_set_private_flags
4488 #define _bfd_xcoff_bfd_print_private_bfd_data \
4489 _bfd_generic_bfd_print_private_bfd_data
4491 /* For archive entry points. */
4492 #define _bfd_xcoff_slurp_extended_name_table \
4493 _bfd_noarchive_slurp_extended_name_table
4494 #define _bfd_xcoff_construct_extended_name_table \
4495 _bfd_noarchive_construct_extended_name_table
4496 #define _bfd_xcoff_truncate_arname bfd_dont_truncate_arname
4497 #define _bfd_xcoff_write_ar_hdr _bfd_generic_write_ar_hdr
4498 #define _bfd_xcoff_get_elt_at_index _bfd_generic_get_elt_at_index
4499 #define _bfd_xcoff_generic_stat_arch_elt _bfd_xcoff_stat_arch_elt
4500 #define _bfd_xcoff_update_armap_timestamp _bfd_bool_bfd_true
4502 /* For symbols entry points. */
4503 #define _bfd_xcoff_get_symtab_upper_bound coff_get_symtab_upper_bound
4504 #define _bfd_xcoff_canonicalize_symtab coff_canonicalize_symtab
4505 #define _bfd_xcoff_make_empty_symbol coff_make_empty_symbol
4506 #define _bfd_xcoff_print_symbol coff_print_symbol
4507 #define _bfd_xcoff_get_symbol_info coff_get_symbol_info
4508 #define _bfd_xcoff_get_symbol_version_string \
4509 _bfd_nosymbols_get_symbol_version_string
4510 #define _bfd_xcoff_bfd_is_local_label_name _bfd_xcoff_is_local_label_name
4511 #define _bfd_xcoff_bfd_is_target_special_symbol \
4512 coff_bfd_is_target_special_symbol
4513 #define _bfd_xcoff_get_lineno coff_get_lineno
4514 #define _bfd_xcoff_find_nearest_line coff_find_nearest_line
4515 #define _bfd_xcoff_find_nearest_line_with_alt \
4516 coff_find_nearest_line_with_alt
4517 #define _bfd_xcoff_find_line coff_find_line
4518 #define _bfd_xcoff_find_inliner_info coff_find_inliner_info
4519 #define _bfd_xcoff_bfd_make_debug_symbol coff_bfd_make_debug_symbol
4520 #define _bfd_xcoff_read_minisymbols _bfd_generic_read_minisymbols
4521 #define _bfd_xcoff_minisymbol_to_symbol _bfd_generic_minisymbol_to_symbol
4523 /* For reloc entry points. */
4524 #define _bfd_xcoff_get_reloc_upper_bound coff_get_reloc_upper_bound
4525 #define _bfd_xcoff_canonicalize_reloc coff_canonicalize_reloc
4526 #define _bfd_xcoff_set_reloc _bfd_generic_set_reloc
4527 #define _bfd_xcoff_bfd_reloc_type_lookup _bfd_xcoff_reloc_type_lookup
4528 #define _bfd_xcoff_bfd_reloc_name_lookup _bfd_xcoff_reloc_name_lookup
4530 /* For link entry points. */
4531 #define _bfd_xcoff_bfd_get_relocated_section_contents \
4532 bfd_generic_get_relocated_section_contents
4533 #define _bfd_xcoff_bfd_relax_section bfd_generic_relax_section
4534 #define _bfd_xcoff_bfd_link_hash_table_free _bfd_generic_link_hash_table_free
4535 #define _bfd_xcoff_bfd_link_just_syms _bfd_generic_link_just_syms
4536 #define _bfd_xcoff_bfd_copy_link_hash_symbol_type \
4537 _bfd_generic_copy_link_hash_symbol_type
4538 #define _bfd_xcoff_bfd_link_split_section _bfd_generic_link_split_section
4539 #define _bfd_xcoff_bfd_gc_sections bfd_generic_gc_sections
4540 #define _bfd_xcoff_bfd_lookup_section_flags bfd_generic_lookup_section_flags
4541 #define _bfd_xcoff_bfd_merge_sections bfd_generic_merge_sections
4542 #define _bfd_xcoff_bfd_is_group_section bfd_generic_is_group_section
4543 #define _bfd_xcoff_bfd_group_name bfd_generic_group_name
4544 #define _bfd_xcoff_bfd_discard_group bfd_generic_discard_group
4545 #define _bfd_xcoff_section_already_linked _bfd_generic_section_already_linked
4546 #define _bfd_xcoff_bfd_define_common_symbol _bfd_xcoff_define_common_symbol
4547 #define _bfd_xcoff_bfd_link_hide_symbol _bfd_generic_link_hide_symbol
4548 #define _bfd_xcoff_bfd_define_start_stop bfd_generic_define_start_stop
4549 #define _bfd_xcoff_bfd_link_check_relocs _bfd_generic_link_check_relocs
4551 /* For dynamic symbols and relocs entry points. */
4552 #define _bfd_xcoff_get_synthetic_symtab _bfd_nodynamic_get_synthetic_symtab
4555 {
4557 _bfd_xcoff_swap_aux_in,
4558 _bfd_xcoff_swap_sym_in,
4559 coff_swap_lineno_in,
4560 _bfd_xcoff_swap_aux_out,
4561 _bfd_xcoff_swap_sym_out,
4562 coff_swap_lineno_out,
4563 xcoff_swap_reloc_out,
4564 coff_swap_filehdr_out,
4565 coff_swap_aouthdr_out,
4566 coff_swap_scnhdr_out,
4567 FILHSZ,
4568 AOUTSZ,
4569 SCNHSZ,
4570 SYMESZ,
4571 AUXESZ,
4572 RELSZ,
4573 LINESZ,
4574 FILNMLEN,
4581 coff_swap_filehdr_in,
4582 coff_swap_aouthdr_in,
4583 coff_swap_scnhdr_in,
4584 xcoff_swap_reloc_in,
4585 coff_bad_format_hook,
4586 coff_set_arch_mach_hook,
4587 coff_mkobject_hook,
4588 styp_to_sec_flags,
4589 coff_set_alignment_hook,
4590 coff_slurp_symbol_table,
4591 symname_in_debug_hook,
4592 coff_pointerize_aux_hook,
4593 coff_print_aux,
4594 dummy_reloc16_extra_cases,
4595 dummy_reloc16_estimate,
4597 coff_compute_section_file_positions,
4599 xcoff_ppc_relocate_section,
4600 coff_rtype_to_howto,
4602 _bfd_generic_link_add_one_symbol,
4603 coff_link_output_has_begun,
4604 coff_final_link_postscript,
4605 NULL /* print_pdata. */
4606 },
4609 bfd_arch_rs6000,
4610 bfd_mach_rs6k,
4612 /* Function pointers to xcoff specific swap routines. */
4613 xcoff_swap_ldhdr_in,
4614 xcoff_swap_ldhdr_out,
4615 xcoff_swap_ldsym_in,
4616 xcoff_swap_ldsym_out,
4617 xcoff_swap_ldrel_in,
4618 xcoff_swap_ldrel_out,
4620 /* Sizes. */
4621 LDHDRSZ,
4622 LDSYMSZ,
4623 LDRELSZ,
4625 SMALL_AOUTSZ,
4627 /* Versions. */
4630 _bfd_xcoff_put_symbol_name,
4631 _bfd_xcoff_put_ldsymbol_name,
4633 xcoff_create_csect_from_smclas,
4635 /* Lineno and reloc count overflow. */
4636 xcoff_is_lineno_count_overflow,
4637 xcoff_is_reloc_count_overflow,
4639 xcoff_loader_symbol_offset,
4640 xcoff_loader_reloc_offset,
4642 /* glink. */
4646 /* rtinit */
4648 xcoff_generate_rtinit,
4650 /* Stub indirect call. */
4654 /* Stub shared call. */
4657 };
4659 /* The transfer vector that leads the outside world to all of the above. */
4661 {
4663 bfd_target_xcoff_flavour,
4677 /* data */
4678 bfd_getb64,
4679 bfd_getb_signed_64,
4680 bfd_putb64,
4681 bfd_getb32,
4682 bfd_getb_signed_32,
4683 bfd_putb32,
4684 bfd_getb16,
4685 bfd_getb_signed_16,
4686 bfd_putb16,
4688 /* hdrs */
4689 bfd_getb64,
4690 bfd_getb_signed_64,
4691 bfd_putb64,
4692 bfd_getb32,
4693 bfd_getb_signed_32,
4694 bfd_putb32,
4695 bfd_getb16,
4696 bfd_getb_signed_16,
4697 bfd_putb16,
4700 _bfd_dummy_target,
4701 coff_object_p,
4702 _bfd_xcoff_archive_p,
4703 CORE_FILE_P
4704 },
4707 _bfd_bool_bfd_false_error,
4708 coff_mkobject,
4709 _bfd_generic_mkarchive,
4710 _bfd_bool_bfd_false_error
4711 },
4714 _bfd_bool_bfd_false_error,
4715 coff_write_object_contents,
4716 _bfd_xcoff_write_archive_contents,
4717 _bfd_bool_bfd_false_error
4718 },
4730 /* Opposite endian version, none exists */
4731 NULL,
4734 };
4736 /* xcoff-powermac target
4737 Old target.
4738 Only difference between this target and the rs6000 target is the
4739 the default architecture and machine type used in coffcode.h
4741 PowerPC Macs use the same magic numbers as RS/6000
4742 (because that's how they were bootstrapped originally),
4743 but they are always PowerPC architecture. */
4745 {
4747 _bfd_xcoff_swap_aux_in,
4748 _bfd_xcoff_swap_sym_in,
4749 coff_swap_lineno_in,
4750 _bfd_xcoff_swap_aux_out,
4751 _bfd_xcoff_swap_sym_out,
4752 coff_swap_lineno_out,
4753 xcoff_swap_reloc_out,
4754 coff_swap_filehdr_out,
4755 coff_swap_aouthdr_out,
4756 coff_swap_scnhdr_out,
4757 FILHSZ,
4758 AOUTSZ,
4759 SCNHSZ,
4760 SYMESZ,
4761 AUXESZ,
4762 RELSZ,
4763 LINESZ,
4764 FILNMLEN,
4771 coff_swap_filehdr_in,
4772 coff_swap_aouthdr_in,
4773 coff_swap_scnhdr_in,
4774 xcoff_swap_reloc_in,
4775 coff_bad_format_hook,
4776 coff_set_arch_mach_hook,
4777 coff_mkobject_hook,
4778 styp_to_sec_flags,
4779 coff_set_alignment_hook,
4780 coff_slurp_symbol_table,
4781 symname_in_debug_hook,
4782 coff_pointerize_aux_hook,
4783 coff_print_aux,
4784 dummy_reloc16_extra_cases,
4785 dummy_reloc16_estimate,
4787 coff_compute_section_file_positions,
4789 xcoff_ppc_relocate_section,
4790 coff_rtype_to_howto,
4792 _bfd_generic_link_add_one_symbol,
4793 coff_link_output_has_begun,
4794 coff_final_link_postscript,
4795 NULL /* print_pdata. */
4796 },
4799 bfd_arch_powerpc,
4800 bfd_mach_ppc,
4802 /* Function pointers to xcoff specific swap routines. */
4803 xcoff_swap_ldhdr_in,
4804 xcoff_swap_ldhdr_out,
4805 xcoff_swap_ldsym_in,
4806 xcoff_swap_ldsym_out,
4807 xcoff_swap_ldrel_in,
4808 xcoff_swap_ldrel_out,
4810 /* Sizes. */
4811 LDHDRSZ,
4812 LDSYMSZ,
4813 LDRELSZ,
4815 SMALL_AOUTSZ,
4817 /* Versions. */
4820 _bfd_xcoff_put_symbol_name,
4821 _bfd_xcoff_put_ldsymbol_name,
4823 xcoff_create_csect_from_smclas,
4825 /* Lineno and reloc count overflow. */
4826 xcoff_is_lineno_count_overflow,
4827 xcoff_is_reloc_count_overflow,
4829 xcoff_loader_symbol_offset,
4830 xcoff_loader_reloc_offset,
4832 /* glink. */
4836 /* rtinit */
4838 xcoff_generate_rtinit,
4840 /* Stub indirect call. */
4844 /* Stub shared call. */
4847 };
4849 /* The transfer vector that leads the outside world to all of the above. */
4851 {
4853 bfd_target_xcoff_flavour,
4867 /* data */
4868 bfd_getb64,
4869 bfd_getb_signed_64,
4870 bfd_putb64,
4871 bfd_getb32,
4872 bfd_getb_signed_32,
4873 bfd_putb32,
4874 bfd_getb16,
4875 bfd_getb_signed_16,
4876 bfd_putb16,
4878 /* hdrs */
4879 bfd_getb64,
4880 bfd_getb_signed_64,
4881 bfd_putb64,
4882 bfd_getb32,
4883 bfd_getb_signed_32,
4884 bfd_putb32,
4885 bfd_getb16,
4886 bfd_getb_signed_16,
4887 bfd_putb16,
4890 _bfd_dummy_target,
4891 coff_object_p,
4892 _bfd_xcoff_archive_p,
4893 CORE_FILE_P
4894 },
4897 _bfd_bool_bfd_false_error,
4898 coff_mkobject,
4899 _bfd_generic_mkarchive,
4900 _bfd_bool_bfd_false_error
4901 },
4904 _bfd_bool_bfd_false_error,
4905 coff_write_object_contents,
4906 _bfd_xcoff_write_archive_contents,
4907 _bfd_bool_bfd_false_error
4908 },
4920 /* Opposite endian version, none exists */
4921 NULL,
4924 };