mirror of
https://sourceware.org/git/binutils-gdb.git
synced 2024-12-15 04:31:49 +08:00
1b2cb8e2ee
Add support for TLS in XCOFF. Amongst the things done by this commit: - Update XCOFF auxialiary header to match new version and allow TLS sections. - Add TLS sections (.tdata and .tbss) support in gas and ld. - Add support for the TLS relocations in gas and ld. Two different types BFD_RELOC are created for PPC and PPC64 as the size is a pointer, thus distinct in 32 or 64bit. The addresses given by ld to .tdata and .tbss is a bit special. In XCOFF, these addresses are actually offsets from the TLS pointer computed at runtime. AIX assembly and linker does the same. In top of that, the .tdata must be before .data (this is mandatory for AIX loader). Thus, the aix ld script is recomputing "." before .data to restore its original value. There might be a simpler way, but this one is working. Optimisation linked to TLS relocations aren't yet implemented. bfd/ * reloc.c (BFD_RELOC_PPC_TLS_LE, BFD_RELOC_PPC_TLS_IE, BFD_RELOC_PPC_TLS_M, BFD_RELOC_PPC_TLS_ML, BFD_RELOC_PPC64_TLS_GD, BFD_RELOC_PPC64_TLS_LD, BFD_RELOC_PPC64_TLS_LE, BFD_RELOC_PPC64_TLS_IE, BFD_RELOC_PPC64_TLS_M, BFD_RELOC_PPC64_TLS_ML): New relocations. * bfd-in2.h: Regenerate. * libbfd.h: Regenerate. * coff-rs6000.c (xcoff_calculate_relocation): Call xcoff_reloc_type_tls for TLS relocations. (xcoff_howto_table): Implement TLS relocations. (_bfd_xcoff_reloc_type_lookup): Add cases TLS relocations. (xcoff_reloc_type_tls): New function. * coff64-rs6000.c (xcoff_calculate_relocation): Likewise. (xcoff_howto_table): Likewise. (_bfd_xcoff_reloc_type_lookup): Likewise. * coffcode.h (sec_to_styp_flags): Handle TLS sections. (styp_to_sec_flags): Likewise. (coff_compute_section_file_positions): Avoid file offset optimisation for .data when the previous section is .tdata. (coff_write_object_contents): Handle TLS sections. * coffswap.h (coff_swap_aouthdr_out): Add support for new fields in aouthdr. * libxcoff.h (xcoff_reloc_type_tls): Add prototype. * xcofflink.c (xcoff_link_add_symbols): Handle XMC_UL. (xcoff_need_ldrel_p): Add cases for TLS relocations. (xcoff_create_ldrel): Add l_symndx for TLS sections. gas/ * config/tc-ppc.c (ppc_xcoff_text_section, ppc_xcoff_data_section, (ppc_xcoff_bss_section, ppc_xcoff_tdata_section, (ppc_xcoff_tbss_section): New variables. (ppc_text_subsegment, ppc_text_csects, ppc_data_subgments, (ppc_data_csects): Removed. (ppc_xcoff_section_is_initialized, ppc_init_xcoff_section, ppc_xcoff_parse_cons): New functions. (md_being): Initialize XCOFF sections. (ppc_xcoff_suffix): Add support for TLS relocations (fixup_size, md_apply_fix): Add support for new BFD_RELOC. (ppc_change_csect): Handle XMC_TL, XMC_UL. Correctly, add XMC_BS to .bss section. Handle new XCOFF section variables. (ppc_comm): Likewise. (ppc_toc): Likewise. (ppc_symbol_new_hook): Likewise. (ppc_frob_symbol): Likewise. (ppc_fix_adjustable): Add tbss support. * config/tc-ppc.h (TC_PARSE_CONS_EXPRESSION): New define. (ppc_xcoff_parse_cons): Add prototype. (struct ppc_xcoff_section): New structure. ld/ * emultempl/aix.em: Ensure .tdata section is removed if empty, even with -r flag. * scripttempl/aix.sc: Handle TLS sections. * testsuite/ld-powerpc/aix52.exp: Add new tests. * testsuite/ld-powerpc/aix-tls-reloc-32.d: New test. * testsuite/ld-powerpc/aix-tls-reloc-64.d: New test. * testsuite/ld-powerpc/aix-tls-reloc.ex: New test. * testsuite/ld-powerpc/aix-tls-reloc.s: New test. * testsuite/ld-powerpc/aix-tls-section-32.d: New test. * testsuite/ld-powerpc/aix-tls-section-64.d: New test. * testsuite/ld-powerpc/aix-tls-section.ex: New test. * testsuite/ld-powerpc/aix-tls-section.s: New test. include/ * coff/internal.h (struct internal_aouthdr): Add new fields. * coff/rs6000.h (AOUTHDRÃ): Add new fields. * coff/rs6k64.h (struct external_filehdr): Likewise. * coff/xcoff.h (_TDATA), _TBSS): New defines (RS6K_AOUTHDR_TLS_LE, RS6K_AOUTHDR_RAS, RS6K_AOUTHDR_ALGNTDATA, RS6K_AOUTHDR_SHR_SYMTAB, RS6K_AOUTHDR_FORK_POLICY, RS6K_AOUTHDR_FORK_COR): New defines. (XMC_TU): Removed. (XMC_UL): New define.
262 lines
9.8 KiB
C
262 lines
9.8 KiB
C
/* BFD XCOFF object file private structure.
|
|
Copyright (C) 2001-2021 Free Software Foundation, Inc.
|
|
Written by Tom Rix, Redhat.
|
|
|
|
This file is part of BFD, the Binary File Descriptor library.
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 3 of the License, or
|
|
(at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program; if not, write to the Free Software
|
|
Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
|
|
MA 02110-1301, USA. */
|
|
|
|
#ifndef LIBXCOFF_H
|
|
#define LIBXCOFF_H
|
|
|
|
/* This is the backend information kept for XCOFF files. This
|
|
structure is constant for a particular backend. The first element
|
|
is the COFF backend data structure, so that XCOFF targets can use
|
|
the generic COFF code. */
|
|
|
|
struct xcoff_backend_data_rec
|
|
{
|
|
/* COFF backend information. */
|
|
bfd_coff_backend_data coff;
|
|
|
|
/* Magic number. */
|
|
unsigned short _xcoff_magic_number;
|
|
|
|
/* Architecture and machine for coff_set_arch_mach_hook. */
|
|
enum bfd_architecture _xcoff_architecture;
|
|
long _xcoff_machine;
|
|
|
|
/* Function pointers to xcoff specific swap routines. */
|
|
void (* _xcoff_swap_ldhdr_in) (bfd *, const void *, struct internal_ldhdr *);
|
|
void (* _xcoff_swap_ldhdr_out)(bfd *, const struct internal_ldhdr *, void *);
|
|
void (* _xcoff_swap_ldsym_in) (bfd *, const void *, struct internal_ldsym *);
|
|
void (* _xcoff_swap_ldsym_out)(bfd *, const struct internal_ldsym *, void *);
|
|
void (* _xcoff_swap_ldrel_in) (bfd *, const void *, struct internal_ldrel *);
|
|
void (* _xcoff_swap_ldrel_out)(bfd *, const struct internal_ldrel *, void *);
|
|
|
|
/* Size of the external struct. */
|
|
unsigned int _xcoff_ldhdrsz;
|
|
unsigned int _xcoff_ldsymsz;
|
|
unsigned int _xcoff_ldrelsz;
|
|
|
|
/* Size an entry in a descriptor section. */
|
|
unsigned int _xcoff_function_descriptor_size;
|
|
|
|
/* Size of the small aout file header. */
|
|
unsigned int _xcoff_small_aout_header_size;
|
|
|
|
/* Loader version
|
|
1 : XCOFF32
|
|
2 : XCOFF64. */
|
|
unsigned long _xcoff_ldhdr_version;
|
|
|
|
bfd_boolean (* _xcoff_put_symbol_name)
|
|
(struct bfd_link_info *, struct bfd_strtab_hash *,
|
|
struct internal_syment *, const char *);
|
|
|
|
bfd_boolean (* _xcoff_put_ldsymbol_name)
|
|
(bfd *, struct xcoff_loader_info *, struct internal_ldsym *,
|
|
const char *);
|
|
|
|
reloc_howto_type *_xcoff_dynamic_reloc;
|
|
|
|
asection * (* _xcoff_create_csect_from_smclas)
|
|
(bfd *, union internal_auxent *, const char *);
|
|
|
|
/* Line number and relocation overflow.
|
|
XCOFF32 overflows to another section when the line number or the
|
|
relocation count exceeds 0xffff. XCOFF64 does not overflow. */
|
|
bfd_boolean (*_xcoff_is_lineno_count_overflow) (bfd *, bfd_vma);
|
|
bfd_boolean (*_xcoff_is_reloc_count_overflow) (bfd *, bfd_vma);
|
|
|
|
/* Loader section symbol and relocation table offset
|
|
XCOFF32 is after the .loader header
|
|
XCOFF64 is offset in .loader header. */
|
|
bfd_vma (*_xcoff_loader_symbol_offset) (bfd *, struct internal_ldhdr *);
|
|
bfd_vma (*_xcoff_loader_reloc_offset) (bfd *, struct internal_ldhdr *);
|
|
|
|
/* Global linkage. The first word of global linkage code must be be
|
|
modified by filling in the correct TOC offset. */
|
|
const unsigned long *_xcoff_glink_code;
|
|
|
|
/* Size of the global link code in bytes of the xcoff_glink_code table. */
|
|
unsigned long _xcoff_glink_size;
|
|
|
|
/* rtinit. */
|
|
unsigned int _xcoff_rtinit_size;
|
|
bfd_boolean (*_xcoff_generate_rtinit)
|
|
(bfd *, const char *, const char *, bfd_boolean);
|
|
};
|
|
|
|
/* Look up an entry in an XCOFF link hash table. */
|
|
#define xcoff_link_hash_lookup(table, string, create, copy, follow) \
|
|
((struct xcoff_link_hash_entry *) \
|
|
bfd_link_hash_lookup (&(table)->root, (string), (create), (copy),\
|
|
(follow)))
|
|
|
|
/* Traverse an XCOFF link hash table. */
|
|
#define xcoff_link_hash_traverse(table, func, info) \
|
|
(bfd_link_hash_traverse \
|
|
(&(table)->root, \
|
|
(bfd_boolean (*) (struct bfd_link_hash_entry *, void *)) (func), \
|
|
(info)))
|
|
|
|
/* Get the XCOFF link hash table from the info structure. This is
|
|
just a cast. */
|
|
#define xcoff_hash_table(p) ((struct xcoff_link_hash_table *) ((p)->hash))
|
|
|
|
|
|
#define xcoff_backend(abfd) \
|
|
((struct xcoff_backend_data_rec *) (abfd)->xvec->backend_data)
|
|
|
|
#define bfd_xcoff_magic_number(a) ((xcoff_backend (a)->_xcoff_magic_number))
|
|
#define bfd_xcoff_architecture(a) ((xcoff_backend (a)->_xcoff_architecture))
|
|
#define bfd_xcoff_machine(a) ((xcoff_backend (a)->_xcoff_machine))
|
|
|
|
#define bfd_xcoff_swap_ldhdr_in(a, b, c) \
|
|
((xcoff_backend (a)->_xcoff_swap_ldhdr_in) ((a), (b), (c)))
|
|
|
|
#define bfd_xcoff_swap_ldhdr_out(a, b, c) \
|
|
((xcoff_backend (a)->_xcoff_swap_ldhdr_out) ((a), (b), (c)))
|
|
|
|
#define bfd_xcoff_swap_ldsym_in(a, b, c) \
|
|
((xcoff_backend (a)->_xcoff_swap_ldsym_in) ((a), (b), (c)))
|
|
|
|
#define bfd_xcoff_swap_ldsym_out(a, b, c) \
|
|
((xcoff_backend (a)->_xcoff_swap_ldsym_out) ((a), (b), (c)))
|
|
|
|
#define bfd_xcoff_swap_ldrel_in(a, b, c) \
|
|
((xcoff_backend (a)->_xcoff_swap_ldrel_in) ((a), (b), (c)))
|
|
|
|
#define bfd_xcoff_swap_ldrel_out(a, b, c) \
|
|
((xcoff_backend (a)->_xcoff_swap_ldrel_out) ((a), (b), (c)))
|
|
|
|
#define bfd_xcoff_ldhdrsz(a) ((xcoff_backend (a)->_xcoff_ldhdrsz))
|
|
#define bfd_xcoff_ldsymsz(a) ((xcoff_backend (a)->_xcoff_ldsymsz))
|
|
#define bfd_xcoff_ldrelsz(a) ((xcoff_backend (a)->_xcoff_ldrelsz))
|
|
#define bfd_xcoff_function_descriptor_size(a) \
|
|
((xcoff_backend (a)->_xcoff_function_descriptor_size))
|
|
#define bfd_xcoff_small_aout_header_size(a) \
|
|
((xcoff_backend (a)->_xcoff_small_aout_header_size))
|
|
|
|
#define bfd_xcoff_ldhdr_version(a) ((xcoff_backend (a)->_xcoff_ldhdr_version))
|
|
|
|
#define bfd_xcoff_put_symbol_name(a, b, c, d, e) \
|
|
((xcoff_backend (a)->_xcoff_put_symbol_name) ((b), (c), (d), (e)))
|
|
|
|
#define bfd_xcoff_put_ldsymbol_name(a, b, c, d) \
|
|
((xcoff_backend (a)->_xcoff_put_ldsymbol_name) ((a), (b), (c), (d)))
|
|
|
|
/* Get the XCOFF hash table entries for a BFD. */
|
|
#define obj_xcoff_sym_hashes(bfd) \
|
|
((struct xcoff_link_hash_entry **) obj_coff_sym_hashes (bfd))
|
|
|
|
#define bfd_xcoff_dynamic_reloc_howto(a) \
|
|
((xcoff_backend (a)->_xcoff_dynamic_reloc))
|
|
|
|
#define bfd_xcoff_create_csect_from_smclas(a, b, c) \
|
|
((xcoff_backend (a)->_xcoff_create_csect_from_smclas((a), (b), (c))))
|
|
|
|
#define bfd_xcoff_is_lineno_count_overflow(a, b) \
|
|
((xcoff_backend (a)->_xcoff_is_lineno_count_overflow((a), (b))))
|
|
|
|
#define bfd_xcoff_is_reloc_count_overflow(a, b) \
|
|
((xcoff_backend (a)->_xcoff_is_reloc_count_overflow((a), (b))))
|
|
|
|
#define bfd_xcoff_loader_symbol_offset(a, b) \
|
|
((xcoff_backend (a)->_xcoff_loader_symbol_offset((a), (b))))
|
|
|
|
#define bfd_xcoff_loader_reloc_offset(a, b) \
|
|
((xcoff_backend (a)->_xcoff_loader_reloc_offset((a), (b))))
|
|
|
|
#define bfd_xcoff_glink_code(a, b) ((xcoff_backend (a)->_xcoff_glink_code[(b)]))
|
|
#define bfd_xcoff_glink_code_size(a) ((xcoff_backend (a)->_xcoff_glink_size))
|
|
|
|
/* Check for the magic number U803XTOCMAGIC or U64_TOCMAGIC for 64 bit
|
|
targets. */
|
|
#define bfd_xcoff_is_xcoff64(a) \
|
|
( (0x01EF == (bfd_xcoff_magic_number (a))) \
|
|
|| (0x01F7 == (bfd_xcoff_magic_number (a))))
|
|
|
|
/* Check for the magic number U802TOMAGIC for 32 bit targets. */
|
|
#define bfd_xcoff_is_xcoff32(a) (0x01DF == (bfd_xcoff_magic_number (a)))
|
|
|
|
#define bfd_xcoff_rtinit_size(a) ((xcoff_backend (a)->_xcoff_rtinit_size))
|
|
#define bfd_xcoff_generate_rtinit(a, b, c, d) ((xcoff_backend (a)->_xcoff_generate_rtinit ((a), (b), (c), (d))))
|
|
|
|
/* Accessor macros for tdata. */
|
|
#define bfd_xcoff_text_align_power(a) ((xcoff_data (a)->text_align_power))
|
|
#define bfd_xcoff_data_align_power(a) ((xcoff_data (a)->data_align_power))
|
|
|
|
/* xcoff*_ppc_relocate_section macros */
|
|
#define XCOFF_MAX_CALCULATE_RELOCATION (0x32)
|
|
#define XCOFF_MAX_COMPLAIN_OVERFLOW (4)
|
|
/* N_ONES produces N one bits, without overflowing machine arithmetic. */
|
|
#ifdef N_ONES
|
|
#undef N_ONES
|
|
#endif
|
|
#define N_ONES(n) (((((bfd_vma) 1 << ((n) - 1)) - 1) << 1) | 1)
|
|
|
|
typedef bfd_boolean xcoff_reloc_function (bfd *, asection *, bfd *,
|
|
struct internal_reloc *,
|
|
struct internal_syment *,
|
|
struct reloc_howto_struct *,
|
|
bfd_vma, bfd_vma,
|
|
bfd_vma *, bfd_byte *);
|
|
|
|
typedef bfd_boolean xcoff_complain_function (bfd *, bfd_vma, bfd_vma,
|
|
struct reloc_howto_struct *);
|
|
|
|
extern xcoff_reloc_function *const xcoff_calculate_relocation[];
|
|
extern xcoff_complain_function *const xcoff_complain_overflow[];
|
|
|
|
#define XCOFF_NO_LONG_SECTION_NAMES (FALSE), bfd_coff_set_long_section_names_disallowed
|
|
|
|
/* Relocation functions */
|
|
extern xcoff_reloc_function xcoff_reloc_type_noop;
|
|
extern xcoff_reloc_function xcoff_reloc_type_fail;
|
|
extern xcoff_reloc_function xcoff_reloc_type_pos;
|
|
extern xcoff_reloc_function xcoff_reloc_type_neg;
|
|
extern xcoff_reloc_function xcoff_reloc_type_rel;
|
|
extern xcoff_reloc_function xcoff_reloc_type_toc;
|
|
extern xcoff_reloc_function xcoff_reloc_type_ba;
|
|
extern xcoff_reloc_function xcoff_reloc_type_crel;
|
|
extern xcoff_reloc_function xcoff_reloc_type_tls;
|
|
|
|
/* Structure to describe dwarf sections.
|
|
Useful to convert from XCOFF section name to flag and vice-versa.
|
|
Also mark if section has a length field at the beginning. */
|
|
struct xcoff_dwsect_name {
|
|
/* A XCOFF dwarf section is identified by its name. */
|
|
unsigned int flag;
|
|
|
|
/* Corresponding XCOFF section name. */
|
|
const char *name;
|
|
|
|
/* True if size must be prepended. */
|
|
bfd_boolean def_size;
|
|
};
|
|
|
|
/* Number of entries in the array. The number is known and public so that user
|
|
can 'extend' this array by index. */
|
|
#define XCOFF_DWSECT_NBR_NAMES 8
|
|
|
|
/* The dwarf sections array. */
|
|
extern const struct xcoff_dwsect_name
|
|
xcoff_dwsect_names[XCOFF_DWSECT_NBR_NAMES];
|
|
|
|
#endif /* LIBXCOFF_H */
|