/* Generic BFD library interface and support routines.
- Copyright (C) 1990-2020 Free Software Foundation, Inc.
+ Copyright (C) 1990-2022 Free Software Foundation, Inc.
Written by Cygnus Support.
This file is part of BFD, the Binary File Descriptor library.
. {* The number of sections. *}
. unsigned int section_count;
.
+. {* The archive plugin file descriptor. *}
+. int archive_plugin_fd;
+.
+. {* The number of opens on the archive plugin file descriptor. *}
+. unsigned int archive_plugin_fd_open_count;
+.
. {* A field used by _bfd_generic_link_add_archive_symbols. This will
. be used only for archive elements. *}
. int archive_pass;
.
+. {* The total size of memory from bfd_alloc. *}
+. bfd_size_type alloc_size;
+.
. {* Stuff only useful for object files:
. The start address. *}
. bfd_vma start_address;
. return abfd->filename;
.}
.
-.static inline bfd_boolean
+.static inline bool
.bfd_get_cacheable (const bfd *abfd)
.{
. return abfd->cacheable;
. return abfd->section_count;
.}
.
-.static inline bfd_boolean
+.static inline bool
.bfd_has_map (const bfd *abfd)
.{
. return abfd->has_armap;
.}
.
-.static inline bfd_boolean
+.static inline bool
.bfd_is_thin_archive (const bfd *abfd)
.{
. return abfd->is_thin_archive;
.}
.
.{* See note beside bfd_set_section_userdata. *}
-.static inline bfd_boolean
-.bfd_set_cacheable (bfd * abfd, bfd_boolean val)
+.static inline bool
+.bfd_set_cacheable (bfd * abfd, bool val)
.{
. abfd->cacheable = val;
-. return TRUE;
+. return true;
.}
.
.static inline void
-.bfd_set_thin_archive (bfd *abfd, bfd_boolean val)
+.bfd_set_thin_archive (bfd *abfd, bool val)
.{
. abfd->is_thin_archive = val;
.}
. abfd->sections = s;
.}
.
-.static inline bfd_boolean
+.static inline bool
.bfd_section_removed_from_list (const bfd *abfd, const asection *s)
.{
. return s->next ? s->next->prev != s : abfd->section_last != s;
*sptr++ = ptr[-1];
*sptr = '\0';
#endif
-#if defined (__GNUC__) || defined (HAVE_LONG_LONG)
PRINT_TYPE (long long, ll);
-#else
- /* Fake it and hope for the best. */
- PRINT_TYPE (long, l);
-#endif
break;
}
}
if (wide_width == 0)
PRINT_TYPE (double, d);
else
- {
-#if defined (__GNUC__) || defined (HAVE_LONG_DOUBLE)
- PRINT_TYPE (long double, ld);
-#else
- /* Fake it and hope for the best. */
- PRINT_TYPE (double, d);
-#endif
- }
+ PRINT_TYPE (long double, ld);
}
break;
case 's':
break;
case 2:
default:
-#if defined (__GNUC__) || defined (HAVE_LONG_LONG)
arg_type = LongLong;
-#else
- arg_type = Long;
-#endif
break;
}
}
if (wide_width == 0)
arg_type = Double;
else
- {
-#if defined (__GNUC__) || defined (HAVE_LONG_DOUBLE)
- arg_type = LongDouble;
-#else
- arg_type = Double;
-#endif
- }
+ arg_type = LongDouble;
}
break;
case 's':
bfd_set_file_flags
SYNOPSIS
- bfd_boolean bfd_set_file_flags (bfd *abfd, flagword flags);
+ bool bfd_set_file_flags (bfd *abfd, flagword flags);
DESCRIPTION
Set the flag word in the BFD @var{abfd} to the value @var{flags}.
*/
-bfd_boolean
+bool
bfd_set_file_flags (bfd *abfd, flagword flags)
{
if (abfd->format != bfd_object)
{
bfd_set_error (bfd_error_wrong_format);
- return FALSE;
+ return false;
}
if (bfd_read_p (abfd))
{
bfd_set_error (bfd_error_invalid_operation);
- return FALSE;
+ return false;
}
abfd->flags = flags;
if ((flags & bfd_applicable_file_flags (abfd)) != flags)
{
bfd_set_error (bfd_error_invalid_operation);
- return FALSE;
+ return false;
}
- return TRUE;
+ return true;
}
void
no place to store this information in the COFF back end.
Should enough other COFF targets add support for DWARF2,
a place will have to be found. Until then, this hack will do. */
- if (CONST_STRNEQ (name, "coff-go32")
+ if (startswith (name, "coff-go32")
|| strcmp (name, "pe-i386") == 0
|| strcmp (name, "pei-i386") == 0
|| strcmp (name, "pe-x86-64") == 0
|| strcmp (name, "pei-x86-64") == 0
+ || strcmp (name, "pei-aarch64-little") == 0
|| strcmp (name, "pe-arm-wince-little") == 0
|| strcmp (name, "pei-arm-wince-little") == 0
|| strcmp (name, "aixcoff-rs6000") == 0
|| strcmp (name, "aix5coff64-rs6000") == 0)
return 1;
- if (CONST_STRNEQ (name, "mach-o"))
+ if (startswith (name, "mach-o"))
return 0;
bfd_set_error (bfd_error_wrong_format);
bfd_set_start_address
SYNOPSIS
- bfd_boolean bfd_set_start_address (bfd *abfd, bfd_vma vma);
+ bool bfd_set_start_address (bfd *abfd, bfd_vma vma);
DESCRIPTION
Make @var{vma} the entry point of output BFD @var{abfd}.
Returns <<TRUE>> on success, <<FALSE>> otherwise.
*/
-bfd_boolean
+bool
bfd_set_start_address (bfd *abfd, bfd_vma vma)
{
abfd->start_address = vma;
- return TRUE;
+ return true;
}
/*
elf_gp (abfd) = v;
}
+/*
+FUNCTION
+ bfd_set_gp_value
+
+SYNOPSIS
+ void bfd_set_gp_value (bfd *abfd, bfd_vma v);
+
+DESCRIPTION
+ Allow external access to the fucntion to set the GP value.
+ This is specifically added for gdb-compile support.
+*/
+
+void
+bfd_set_gp_value (bfd *abfd, bfd_vma v)
+{
+ _bfd_set_gp_value (abfd, v);
+}
+
/*
FUNCTION
bfd_scan_vma
if (sizeof (bfd_vma) <= sizeof (unsigned long))
return strtoul (string, (char **) end, base);
-#if defined (HAVE_STRTOULL) && defined (HAVE_LONG_LONG)
if (sizeof (bfd_vma) <= sizeof (unsigned long long))
return strtoull (string, (char **) end, base);
-#endif
if (base == 0)
{
bfd_copy_private_header_data
SYNOPSIS
- bfd_boolean bfd_copy_private_header_data (bfd *ibfd, bfd *obfd);
+ bool bfd_copy_private_header_data (bfd *ibfd, bfd *obfd);
DESCRIPTION
Copy private BFD header information from the BFD @var{ibfd} to the
bfd_copy_private_bfd_data
SYNOPSIS
- bfd_boolean bfd_copy_private_bfd_data (bfd *ibfd, bfd *obfd);
+ bool bfd_copy_private_bfd_data (bfd *ibfd, bfd *obfd);
DESCRIPTION
Copy private BFD information from the BFD @var{ibfd} to the
bfd_set_private_flags
SYNOPSIS
- bfd_boolean bfd_set_private_flags (bfd *abfd, flagword flags);
+ bool bfd_set_private_flags (bfd *abfd, flagword flags);
DESCRIPTION
Set private BFD flag information in the BFD @var{abfd}.
.
.extern bfd_byte *bfd_get_relocated_section_contents
. (bfd *, struct bfd_link_info *, struct bfd_link_order *, bfd_byte *,
-. bfd_boolean, asymbol **);
+. bool, asymbol **);
.
*/
struct bfd_link_info *link_info,
struct bfd_link_order *link_order,
bfd_byte *data,
- bfd_boolean relocatable,
+ bool relocatable,
asymbol **symbols)
{
bfd *abfd2;
bfd_byte *(*fn) (bfd *, struct bfd_link_info *, struct bfd_link_order *,
- bfd_byte *, bfd_boolean, asymbol **);
+ bfd_byte *, bool, asymbol **);
if (link_order->type == bfd_indirect_link_order)
{
/* Record information about an ELF program header. */
-bfd_boolean
+bool
bfd_record_phdr (bfd *abfd,
unsigned long type,
- bfd_boolean flags_valid,
+ bool flags_valid,
flagword flags,
- bfd_boolean at_valid,
+ bool at_valid,
bfd_vma at, /* Bytes. */
- bfd_boolean includes_filehdr,
- bfd_boolean includes_phdrs,
+ bool includes_filehdr,
+ bool includes_phdrs,
unsigned int count,
asection **secs)
{
unsigned int opb = bfd_octets_per_byte (abfd, NULL);
if (bfd_get_flavour (abfd) != bfd_target_elf_flavour)
- return TRUE;
+ return true;
amt = sizeof (struct elf_segment_map);
amt += ((bfd_size_type) count - 1) * sizeof (asection *);
m = (struct elf_segment_map *) bfd_zalloc (abfd, amt);
if (m == NULL)
- return FALSE;
+ return false;
m->p_type = type;
m->p_flags = flags;
;
*pm = m;
- return TRUE;
+ return true;
}
#ifdef BFD64
/* Return true iff this target is 32-bit. */
-static bfd_boolean
+static bool
is32bit (bfd *abfd)
{
if (bfd_get_flavour (abfd) == bfd_target_elf_flavour)
bfd_alt_mach_code
SYNOPSIS
- bfd_boolean bfd_alt_mach_code (bfd *abfd, int alternative);
+ bool bfd_alt_mach_code (bfd *abfd, int alternative);
DESCRIPTION
machine codes.
*/
-bfd_boolean
+bool
bfd_alt_mach_code (bfd *abfd, int alternative)
{
if (bfd_get_flavour (abfd) == bfd_target_elf_flavour)
case 1:
code = get_elf_backend_data (abfd)->elf_machine_alt1;
if (code == 0)
- return FALSE;
+ return false;
break;
case 2:
code = get_elf_backend_data (abfd)->elf_machine_alt2;
if (code == 0)
- return FALSE;
+ return false;
break;
default:
- return FALSE;
+ return false;
}
elf_elfheader (abfd)->e_machine = code;
- return TRUE;
+ return true;
}
- return FALSE;
+ return false;
}
/*
return 0;
}
-static void
-bfd_elf_set_pagesize (const bfd_target *target, bfd_vma size,
- int offset, const bfd_target *orig_target)
-{
- if (target->flavour == bfd_target_elf_flavour)
- {
- const struct elf_backend_data *bed;
-
- bed = xvec_get_elf_backend_data (target);
- *((bfd_vma *) ((char *) bed + offset)) = size;
- }
-
- if (target->alternative_target
- && target->alternative_target != orig_target)
- bfd_elf_set_pagesize (target->alternative_target, size, offset,
- orig_target);
-}
-
-/*
-FUNCTION
- bfd_emul_set_maxpagesize
-
-SYNOPSIS
- void bfd_emul_set_maxpagesize (const char *, bfd_vma);
-
-DESCRIPTION
- For ELF, set the maximum page size for the emulation. It is
- a no-op for other formats.
-
-*/
-
-void
-bfd_emul_set_maxpagesize (const char *emul, bfd_vma size)
-{
- const bfd_target *target;
-
- target = bfd_find_target (emul, NULL);
- if (target)
- bfd_elf_set_pagesize (target, size,
- offsetof (struct elf_backend_data,
- maxpagesize), target);
-}
-
/*
FUNCTION
bfd_emul_get_commonpagesize
SYNOPSIS
- bfd_vma bfd_emul_get_commonpagesize (const char *, bfd_boolean);
+ bfd_vma bfd_emul_get_commonpagesize (const char *);
DESCRIPTION
Returns the common page size, in bytes, as determined by
*/
bfd_vma
-bfd_emul_get_commonpagesize (const char *emul, bfd_boolean relro)
+bfd_emul_get_commonpagesize (const char *emul)
{
const bfd_target *target;
const struct elf_backend_data *bed;
bed = xvec_get_elf_backend_data (target);
- if (relro)
- return bed->relropagesize;
- else
- return bed->commonpagesize;
+ return bed->commonpagesize;
}
return 0;
}
-/*
-FUNCTION
- bfd_emul_set_commonpagesize
-
-SYNOPSIS
- void bfd_emul_set_commonpagesize (const char *, bfd_vma);
-
-DESCRIPTION
- For ELF, set the common page size for the emulation. It is
- a no-op for other formats.
-
-*/
-
-void
-bfd_emul_set_commonpagesize (const char *emul, bfd_vma size)
-{
- const bfd_target *target;
-
- target = bfd_find_target (emul, NULL);
- if (target)
- bfd_elf_set_pagesize (target, size,
- offsetof (struct elf_backend_data,
- commonpagesize), target);
-}
-
/*
FUNCTION
bfd_demangle
char *res, *alloc;
const char *pre, *suf;
size_t pre_len;
- bfd_boolean skip_lead;
+ bool skip_lead;
skip_lead = (abfd != NULL
&& *name != '\0'
Elf32_External_Chdr *echdr = (Elf32_External_Chdr *) contents;
bfd_put_32 (abfd, ELFCOMPRESS_ZLIB, &echdr->ch_type);
bfd_put_32 (abfd, sec->size, &echdr->ch_size);
- bfd_put_32 (abfd, 1 << sec->alignment_power,
+ bfd_put_32 (abfd, 1u << sec->alignment_power,
&echdr->ch_addralign);
/* bfd_log2 (alignof (Elf32_Chdr)) */
bfd_set_section_alignment (sec, 2);
bfd_put_32 (abfd, ELFCOMPRESS_ZLIB, &echdr->ch_type);
bfd_put_32 (abfd, 0, &echdr->ch_reserved);
bfd_put_64 (abfd, sec->size, &echdr->ch_size);
- bfd_put_64 (abfd, 1 << sec->alignment_power,
+ bfd_put_64 (abfd, UINT64_C (1) << sec->alignment_power,
&echdr->ch_addralign);
/* bfd_log2 (alignof (Elf64_Chdr)) */
bfd_set_section_alignment (sec, 3);
bfd_check_compression_header
SYNOPSIS
- bfd_boolean bfd_check_compression_header
+ bool bfd_check_compression_header
(bfd *abfd, bfd_byte *contents, asection *sec,
bfd_size_type *uncompressed_size,
unsigned int *uncompressed_alignment_power);
Return TRUE if the compression header is valid.
*/
-bfd_boolean
+bool
bfd_check_compression_header (bfd *abfd, bfd_byte *contents,
asection *sec,
bfd_size_type *uncompressed_size,
{
*uncompressed_size = chdr.ch_size;
*uncompressed_alignment_power = bfd_log2 (chdr.ch_addralign);
- return TRUE;
+ return true;
}
}
- return FALSE;
+ return false;
}
/*
return size;
/* Convert GNU property size. */
- if (CONST_STRNEQ (isec->name, NOTE_GNU_PROPERTY_SECTION_NAME))
+ if (startswith (isec->name, NOTE_GNU_PROPERTY_SECTION_NAME))
return _bfd_elf_convert_gnu_property_size (ibfd, obfd);
/* Do nothing if input file will be decompressed. */
bfd_convert_section_contents
SYNOPSIS
- bfd_boolean bfd_convert_section_contents
+ bool bfd_convert_section_contents
(bfd *ibfd, asection *isec, bfd *obfd,
bfd_byte **ptr, bfd_size_type *ptr_size);
function, and the new size written to @var{ptr_size}.
*/
-bfd_boolean
+bool
bfd_convert_section_contents (bfd *ibfd, sec_ptr isec, bfd *obfd,
bfd_byte **ptr, bfd_size_type *ptr_size)
{
bfd_byte *contents;
bfd_size_type ihdr_size, ohdr_size, size;
Elf_Internal_Chdr chdr;
- bfd_boolean use_memmove;
+ bool use_memmove;
/* Do nothing if either input or output aren't ELF. */
if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour
|| bfd_get_flavour (obfd) != bfd_target_elf_flavour)
- return TRUE;
+ return true;
/* Do nothing if ELF classes of input and output are the same. */
if (get_elf_backend_data (ibfd)->s->elfclass
== get_elf_backend_data (obfd)->s->elfclass)
- return TRUE;
+ return true;
/* Convert GNU properties. */
- if (CONST_STRNEQ (isec->name, NOTE_GNU_PROPERTY_SECTION_NAME))
+ if (startswith (isec->name, NOTE_GNU_PROPERTY_SECTION_NAME))
return _bfd_elf_convert_gnu_properties (ibfd, isec, obfd, ptr,
ptr_size);
/* Do nothing if input file will be decompressed. */
if ((ibfd->flags & BFD_DECOMPRESS))
- return TRUE;
+ return true;
/* Do nothing if the input section isn't a SHF_COMPRESSED section. */
ihdr_size = bfd_get_compression_header_size (ibfd, isec);
if (ihdr_size == 0)
- return TRUE;
+ return true;
/* PR 25221. Check for corrupt input sections. */
if (ihdr_size > bfd_get_section_limit (ibfd, isec))
/* FIXME: Issue a warning about a corrupt
compression header size field ? */
- return FALSE;
+ return false;
contents = *ptr;
ohdr_size = sizeof (Elf64_External_Chdr);
- use_memmove = FALSE;
+ use_memmove = false;
}
else if (ihdr_size != sizeof (Elf64_External_Chdr))
{
/* FIXME: Issue a warning about a corrupt
compression header size field ? */
- return FALSE;
+ return false;
}
else
{
chdr.ch_addralign = bfd_get_64 (ibfd, &echdr->ch_addralign);
ohdr_size = sizeof (Elf32_External_Chdr);
- use_memmove = TRUE;
+ use_memmove = true;
}
size = bfd_section_size (isec) - ihdr_size + ohdr_size;
{
contents = (bfd_byte *) bfd_malloc (size);
if (contents == NULL)
- return FALSE;
+ return false;
}
/* Write out the output compression header. */
}
*ptr_size = size;
- return TRUE;
+ return true;
+}
+
+/* Get the linker information. */
+
+struct bfd_link_info *
+_bfd_get_link_info (bfd *abfd)
+{
+ if (bfd_get_flavour (abfd) != bfd_target_elf_flavour)
+ return NULL;
+
+ return elf_link_info (abfd);
}