X-Git-Url: https://git.libre-soc.org/?a=blobdiff_plain;ds=sidebyside;f=bfd%2Felf-eh-frame.c;h=2e22d0c92158da5a53fb9e6ef60954ab92272f99;hb=13835d88dc51497b9bd68dc1f394ca0de099a380;hp=e787ee9f1b4efcdee6848d9443aad7c4a088f639;hpb=83da6e748c8f105f07e17f53aa6b99ed7867ff5f;p=binutils-gdb.git diff --git a/bfd/elf-eh-frame.c b/bfd/elf-eh-frame.c index e787ee9f1b4..2e22d0c9215 100644 --- a/bfd/elf-eh-frame.c +++ b/bfd/elf-eh-frame.c @@ -1,5 +1,5 @@ /* .eh_frame section optimization. - Copyright (C) 2001-2016 Free Software Foundation, Inc. + Copyright (C) 2001-2022 Free Software Foundation, Inc. Written by Jakub Jelinek . This file is part of BFD, the Binary File Descriptor library. @@ -60,81 +60,81 @@ struct cie /* If *ITER hasn't reached END yet, read the next byte into *RESULT and move onto the next byte. Return true on success. */ -static inline bfd_boolean +static inline bool read_byte (bfd_byte **iter, bfd_byte *end, unsigned char *result) { if (*iter >= end) - return FALSE; + return false; *result = *((*iter)++); - return TRUE; + return true; } /* Move *ITER over LENGTH bytes, or up to END, whichever is closer. Return true it was possible to move LENGTH bytes. */ -static inline bfd_boolean +static inline bool skip_bytes (bfd_byte **iter, bfd_byte *end, bfd_size_type length) { if ((bfd_size_type) (end - *iter) < length) { *iter = end; - return FALSE; + return false; } *iter += length; - return TRUE; + return true; } /* Move *ITER over an leb128, stopping at END. Return true if the end of the leb128 was found. */ -static bfd_boolean +static bool skip_leb128 (bfd_byte **iter, bfd_byte *end) { unsigned char byte; do if (!read_byte (iter, end, &byte)) - return FALSE; + return false; while (byte & 0x80); - return TRUE; + return true; } /* Like skip_leb128, but treat the leb128 as an unsigned value and store it in *VALUE. */ -static bfd_boolean +static bool read_uleb128 (bfd_byte **iter, bfd_byte *end, bfd_vma *value) { bfd_byte *start, *p; start = *iter; if (!skip_leb128 (iter, end)) - return FALSE; + return false; p = *iter; *value = *--p; while (p > start) *value = (*value << 7) | (*--p & 0x7f); - return TRUE; + return true; } /* Like read_uleb128, but for signed values. */ -static bfd_boolean +static bool read_sleb128 (bfd_byte **iter, bfd_byte *end, bfd_signed_vma *value) { bfd_byte *start, *p; start = *iter; if (!skip_leb128 (iter, end)) - return FALSE; + return false; p = *iter; *value = ((*--p & 0x7f) ^ 0x40) - 0x40; while (p > start) *value = (*value << 7) | (*--p & 0x7f); - return TRUE; + return true; } /* Return 0 if either encoding is variable width, or not yet known to bfd. */ @@ -282,7 +282,7 @@ cie_compute_hash (struct cie *c) /* Return the number of extra bytes that we'll be inserting into ENTRY's augmentation string. */ -static INLINE unsigned int +static inline unsigned int extra_augmentation_string_bytes (struct eh_cie_fde *entry) { unsigned int size = 0; @@ -298,7 +298,7 @@ extra_augmentation_string_bytes (struct eh_cie_fde *entry) /* Likewise ENTRY's augmentation data. */ -static INLINE unsigned int +static inline unsigned int extra_augmentation_data_bytes (struct eh_cie_fde *entry) { unsigned int size = 0; @@ -309,11 +309,10 @@ extra_augmentation_data_bytes (struct eh_cie_fde *entry) return size; } -/* Return the size that ENTRY will have in the output. ALIGNMENT is the - required alignment of ENTRY in bytes. */ +/* Return the size that ENTRY will have in the output. */ static unsigned int -size_of_output_cie_fde (struct eh_cie_fde *entry, unsigned int alignment) +size_of_output_cie_fde (struct eh_cie_fde *entry) { if (entry->removed) return 0; @@ -321,22 +320,36 @@ size_of_output_cie_fde (struct eh_cie_fde *entry, unsigned int alignment) return 4; return (entry->size + extra_augmentation_string_bytes (entry) - + extra_augmentation_data_bytes (entry) - + alignment - 1) & -alignment; + + extra_augmentation_data_bytes (entry)); +} + +/* Return the offset of the FDE or CIE after ENT. */ + +static unsigned int +next_cie_fde_offset (const struct eh_cie_fde *ent, + const struct eh_cie_fde *last, + const asection *sec) +{ + while (++ent < last) + { + if (!ent->removed) + return ent->new_offset; + } + return sec->size; } /* Assume that the bytes between *ITER and END are CFA instructions. Try to move *ITER past the first instruction and return true on success. ENCODED_PTR_WIDTH gives the width of pointer entries. */ -static bfd_boolean +static bool skip_cfa_op (bfd_byte **iter, bfd_byte *end, unsigned int encoded_ptr_width) { bfd_byte op; bfd_vma length; if (!read_byte (iter, end, &op)) - return FALSE; + return false; switch (op & 0xc0 ? op & 0xc0 : op) { @@ -347,7 +360,7 @@ skip_cfa_op (bfd_byte **iter, bfd_byte *end, unsigned int encoded_ptr_width) case DW_CFA_restore_state: case DW_CFA_GNU_window_save: /* No arguments. */ - return TRUE; + return true; case DW_CFA_offset: case DW_CFA_restore_extended: @@ -400,7 +413,7 @@ skip_cfa_op (bfd_byte **iter, bfd_byte *end, unsigned int encoded_ptr_width) return skip_bytes (iter, end, 8); default: - return FALSE; + return false; } } @@ -470,7 +483,7 @@ bfd_elf_discard_eh_frame_entry (struct eh_frame_hdr_info *hdr_info) hdr_info->array_count--; hdr_info->u.compact.entries[hdr_info->array_count] = NULL; i--; - } + } } } @@ -484,7 +497,7 @@ bfd_elf_record_eh_frame_entry (struct eh_frame_hdr_info *hdr_info, { if (hdr_info->u.compact.allocated_entries == 0) { - hdr_info->frame_hdr_is_compact = TRUE; + hdr_info->frame_hdr_is_compact = true; hdr_info->u.compact.allocated_entries = 2; hdr_info->u.compact.entries = bfd_malloc (hdr_info->u.compact.allocated_entries @@ -508,7 +521,7 @@ bfd_elf_record_eh_frame_entry (struct eh_frame_hdr_info *hdr_info, /* Parse a .eh_frame_entry section. Figure out which text section it references. */ -bfd_boolean +bool _bfd_elf_parse_eh_frame_entry (struct bfd_link_info *info, asection *sec, struct elf_reloc_cookie *cookie) { @@ -523,28 +536,28 @@ _bfd_elf_parse_eh_frame_entry (struct bfd_link_info *info, if (sec->size == 0 || sec->sec_info_type != SEC_INFO_TYPE_NONE) { - return TRUE; + return true; } if (sec->output_section && bfd_is_abs_section (sec->output_section)) { /* At least one of the sections is being discarded from the link, so we should just ignore them. */ - return TRUE; + return true; } if (cookie->rel == cookie->relend) - return FALSE; + return false; /* The first relocation is the function start. */ r_symndx = cookie->rel->r_info >> cookie->r_sym_shift; if (r_symndx == STN_UNDEF) - return FALSE; + return false; - text_sec = _bfd_elf_section_for_symbol (cookie, r_symndx, FALSE); + text_sec = _bfd_elf_section_for_symbol (cookie, r_symndx, false); if (text_sec == NULL) - return FALSE; + return false; elf_section_eh_frame_entry (text_sec) = sec; if (text_sec->output_section @@ -554,7 +567,7 @@ _bfd_elf_parse_eh_frame_entry (struct bfd_link_info *info, sec->sec_info_type = SEC_INFO_TYPE_EH_FRAME_ENTRY; elf_section_data (sec)->sec_info = text_sec; bfd_elf_record_eh_frame_entry (hdr_info, sec); - return TRUE; + return true; } /* Try to parse .eh_frame section SEC, which belongs to ABFD. Store the @@ -606,15 +619,6 @@ _bfd_elf_parse_eh_frame (bfd *abfd, struct bfd_link_info *info, REQUIRE (bfd_malloc_and_get_section (abfd, sec, &ehbuf)); - if (sec->size >= 4 - && bfd_get_32 (abfd, ehbuf) == 0 - && cookie->rel == cookie->relend) - { - /* Empty .eh_frame section. */ - free (ehbuf); - return; - } - /* If .eh_frame section size doesn't fit into int, we cannot handle it (it would need to use 64-bit .eh_frame format anyway). */ REQUIRE (sec->size == (unsigned int) sec->size); @@ -652,12 +656,15 @@ _bfd_elf_parse_eh_frame (bfd *abfd, struct bfd_link_info *info, sec_info = (struct eh_frame_sec_info *) bfd_zmalloc (sizeof (struct eh_frame_sec_info) - + (num_entries - 1) * sizeof (struct eh_cie_fde)); + + (num_entries - 1) * sizeof (struct eh_cie_fde)); REQUIRE (sec_info); /* We need to have a "struct cie" for each CIE in this section. */ - local_cies = (struct cie *) bfd_zmalloc (num_cies * sizeof (*local_cies)); - REQUIRE (local_cies); + if (num_cies) + { + local_cies = (struct cie *) bfd_zmalloc (num_cies * sizeof (*local_cies)); + REQUIRE (local_cies); + } /* FIXME: octets_per_byte. */ #define ENSURE_NO_RELOCS(buf) \ @@ -711,7 +718,9 @@ _bfd_elf_parse_eh_frame (bfd *abfd, struct bfd_link_info *info, if (hdr_length == 0) { /* A zero-length CIE should only be found at the end of - the section. */ + the section, but allow multiple terminators. */ + while (skip_bytes (&buf, ehbuf + sec->size, 4)) + REQUIRE (bfd_get_32 (abfd, buf - 4) == 0); REQUIRE ((bfd_size_type) (buf - ehbuf) == sec->size); ENSURE_NO_RELOCS (buf); sec_info->count++; @@ -744,6 +753,7 @@ _bfd_elf_parse_eh_frame (bfd *abfd, struct bfd_link_info *info, strcpy (cie->augmentation, (char *) buf); buf = (bfd_byte *) strchr ((char *) buf, '\0') + 1; + this_inf->u.cie.aug_str_len = buf - start - 1; ENSURE_NO_RELOCS (buf); if (buf[0] == 'e' && buf[1] == 'h') { @@ -781,12 +791,14 @@ _bfd_elf_parse_eh_frame (bfd *abfd, struct bfd_link_info *info, { aug++; REQUIRE (read_uleb128 (&buf, end, &cie->augmentation_size)); - ENSURE_NO_RELOCS (buf); + ENSURE_NO_RELOCS (buf); } while (*aug != '\0') switch (*aug++) { + case 'B': + break; case 'L': REQUIRE (read_byte (&buf, end, &cie->lsda_encoding)); ENSURE_NO_RELOCS (buf); @@ -811,6 +823,8 @@ _bfd_elf_parse_eh_frame (bfd *abfd, struct bfd_link_info *info, { length = -(buf - ehbuf) & (per_width - 1); REQUIRE (skip_bytes (&buf, end, length)); + if (per_width == 8) + this_inf->u.cie.per_encoding_aligned8 = 1; } this_inf->u.cie.personality_offset = buf - start; ENSURE_NO_RELOCS (buf); @@ -830,6 +844,8 @@ _bfd_elf_parse_eh_frame (bfd *abfd, struct bfd_link_info *info, goto free_no_table; } } + this_inf->u.cie.aug_data_len + = buf - start - 1 - this_inf->u.cie.aug_str_len; /* For shared libraries, try to get rid of as many RELATIVE relocs as possible. */ @@ -921,10 +937,11 @@ _bfd_elf_parse_eh_frame (bfd *abfd, struct bfd_link_info *info, SKIP_RELOCS (buf - length); if (!GET_RELOC (buf - length) - && read_value (abfd, buf - length, length, FALSE) == 0) + && read_value (abfd, buf - length, length, false) == 0) { (*info->callbacks->minfo) - (_("discarding zero address range FDE in %B(%A).\n"), + /* xgettext:c-format */ + (_("discarding zero address range FDE in %pB(%pA).\n"), abfd, sec); this_inf->u.fde.cie_inf = NULL; } @@ -995,7 +1012,7 @@ _bfd_elf_parse_eh_frame (bfd *abfd, struct bfd_link_info *info, bfd_byte *p; this_inf->set_loc = (unsigned int *) - bfd_malloc ((set_loc_count + 1) * sizeof (unsigned int)); + bfd_malloc ((set_loc_count + 1) * sizeof (unsigned int)); REQUIRE (this_inf->set_loc); this_inf->set_loc[0] = set_loc_count; p = insns; @@ -1027,17 +1044,15 @@ _bfd_elf_parse_eh_frame (bfd *abfd, struct bfd_link_info *info, goto success; free_no_table: - (*info->callbacks->einfo) - (_("%P: error in %B(%A); no .eh_frame_hdr table will be created.\n"), + _bfd_error_handler + /* xgettext:c-format */ + (_("error in %pB(%pA); no .eh_frame_hdr table will be created"), abfd, sec); - hdr_info->u.dwarf.table = FALSE; - if (sec_info) - free (sec_info); + hdr_info->u.dwarf.table = false; + free (sec_info); success: - if (ehbuf) - free (ehbuf); - if (local_cies) - free (local_cies); + free (ehbuf); + free (local_cies); #undef REQUIRE } @@ -1091,12 +1106,12 @@ add_eh_frame_hdr_terminator (asection *sec, if (!sec->rawsize) sec->rawsize = sec->size; - bfd_set_section_size (sec->owner, sec, sec->size + 8); + bfd_set_section_size (sec, sec->size + 8); } /* Finish a pass over all .eh_frame_entry sections. */ -bfd_boolean +bool _bfd_elf_end_eh_frame_parsing (struct bfd_link_info *info) { struct eh_frame_hdr_info *hdr_info; @@ -1106,7 +1121,7 @@ _bfd_elf_end_eh_frame_parsing (struct bfd_link_info *info) if (info->eh_frame_hdr_type != COMPACT_EH_HDR || hdr_info->array_count == 0) - return FALSE; + return false; bfd_elf_discard_eh_frame_entry (hdr_info); @@ -1121,14 +1136,14 @@ _bfd_elf_end_eh_frame_parsing (struct bfd_link_info *info) /* Add a CANTUNWIND terminator after the last entry. */ add_eh_frame_hdr_terminator (hdr_info->u.compact.entries[i], NULL); - return TRUE; + return true; } /* Mark all relocations against CIE or FDE ENT, which occurs in .eh_frame section SEC. COOKIE describes the relocations in SEC; its "rel" field can be changed freely. */ -static bfd_boolean +static bool mark_entry (struct bfd_link_info *info, asection *sec, struct eh_cie_fde *ent, elf_gc_mark_hook_fn gc_mark_hook, struct elf_reloc_cookie *cookie) @@ -1139,16 +1154,16 @@ mark_entry (struct bfd_link_info *info, asection *sec, && cookie->rel->r_offset < ent->offset + ent->size; cookie->rel++) if (!_bfd_elf_gc_mark_reloc (info, sec, gc_mark_hook, cookie)) - return FALSE; + return false; - return TRUE; + return true; } /* Mark all the relocations against FDEs that relate to code in input section SEC. The FDEs belong to .eh_frame section EH_FRAME, whose relocations are described by COOKIE. */ -bfd_boolean +bool _bfd_elf_gc_mark_fdes (struct bfd_link_info *info, asection *sec, asection *eh_frame, elf_gc_mark_hook_fn gc_mark_hook, struct elf_reloc_cookie *cookie) @@ -1158,7 +1173,7 @@ _bfd_elf_gc_mark_fdes (struct bfd_link_info *info, asection *sec, for (fde = elf_fde_list (sec); fde; fde = fde->u.fde.next_for_section) { if (!mark_entry (info, eh_frame, fde, gc_mark_hook, cookie)) - return FALSE; + return false; /* At this stage, all cie_inf fields point to local CIEs, so we can use the same cookie to refer to them. */ @@ -1167,10 +1182,10 @@ _bfd_elf_gc_mark_fdes (struct bfd_link_info *info, asection *sec, { cie->u.cie.gc_mark = 1; if (!mark_entry (info, eh_frame, cie, gc_mark_hook, cookie)) - return FALSE; + return false; } } - return TRUE; + return true; } /* Input section SEC of ABFD is an .eh_frame section that contains the @@ -1211,7 +1226,7 @@ find_merged_cie (bfd *abfd, struct bfd_link_info *info, asection *sec, if (cie->per_encoding != DW_EH_PE_omit) { - bfd_boolean per_binds_local; + bool per_binds_local; /* Work out the address of personality routine, or at least enough info that we could calculate the address had we made a @@ -1260,7 +1275,7 @@ find_merged_cie (bfd *abfd, struct bfd_link_info *info, asection *sec, cie->local_personality = 1; cie->personality.sym.bfd_id = abfd->id; cie->personality.sym.index = r_symndx; - per_binds_local = TRUE; + per_binds_local = true; } if (per_binds_local @@ -1310,28 +1325,168 @@ find_merged_cie (bfd *abfd, struct bfd_link_info *info, asection *sec, return new_cie->cie_inf; } +/* For a given OFFSET in SEC, return the delta to the new location + after .eh_frame editing. */ + +static bfd_signed_vma +offset_adjust (bfd_vma offset, const asection *sec) +{ + struct eh_frame_sec_info *sec_info + = (struct eh_frame_sec_info *) elf_section_data (sec)->sec_info; + unsigned int lo, hi, mid; + struct eh_cie_fde *ent = NULL; + bfd_signed_vma delta; + + lo = 0; + hi = sec_info->count; + if (hi == 0) + return 0; + + while (lo < hi) + { + mid = (lo + hi) / 2; + ent = &sec_info->entry[mid]; + if (offset < ent->offset) + hi = mid; + else if (mid + 1 >= hi) + break; + else if (offset >= ent[1].offset) + lo = mid + 1; + else + break; + } + + if (!ent->removed) + delta = (bfd_vma) ent->new_offset - (bfd_vma) ent->offset; + else if (ent->cie && ent->u.cie.merged) + { + struct eh_cie_fde *cie = ent->u.cie.u.merged_with; + delta = ((bfd_vma) cie->new_offset + cie->u.cie.u.sec->output_offset + - (bfd_vma) ent->offset - sec->output_offset); + } + else + { + /* Is putting the symbol on the next entry best for a deleted + CIE/FDE? */ + struct eh_cie_fde *last = sec_info->entry + sec_info->count; + delta = ((bfd_vma) next_cie_fde_offset (ent, last, sec) + - (bfd_vma) ent->offset); + return delta; + } + + /* Account for editing within this CIE/FDE. */ + offset -= ent->offset; + if (ent->cie) + { + unsigned int extra + = ent->add_augmentation_size + ent->u.cie.add_fde_encoding; + if (extra == 0 + || offset <= 9u + ent->u.cie.aug_str_len) + return delta; + delta += extra; + if (offset <= 9u + ent->u.cie.aug_str_len + ent->u.cie.aug_data_len) + return delta; + delta += extra; + } + else + { + unsigned int ptr_size, width, extra = ent->add_augmentation_size; + if (offset <= 12 || extra == 0) + return delta; + ptr_size = (get_elf_backend_data (sec->owner) + ->elf_backend_eh_frame_address_size (sec->owner, sec)); + width = get_DW_EH_PE_width (ent->fde_encoding, ptr_size); + if (offset <= 8 + 2 * width) + return delta; + delta += extra; + } + + return delta; +} + +/* Adjust a global symbol defined in .eh_frame, so that it stays + relative to its original CIE/FDE. It is assumed that a symbol + defined at the beginning of a CIE/FDE belongs to that CIE/FDE + rather than marking the end of the previous CIE/FDE. This matters + when a CIE is merged with a previous CIE, since the symbol is + moved to the merged CIE. */ + +bool +_bfd_elf_adjust_eh_frame_global_symbol (struct elf_link_hash_entry *h, + void *arg ATTRIBUTE_UNUSED) +{ + asection *sym_sec; + bfd_signed_vma delta; + + if (h->root.type != bfd_link_hash_defined + && h->root.type != bfd_link_hash_defweak) + return true; + + sym_sec = h->root.u.def.section; + if (sym_sec->sec_info_type != SEC_INFO_TYPE_EH_FRAME + || elf_section_data (sym_sec)->sec_info == NULL) + return true; + + delta = offset_adjust (h->root.u.def.value, sym_sec); + h->root.u.def.value += delta; + + return true; +} + +/* The same for all local symbols defined in .eh_frame. Returns true + if any symbol was changed. */ + +static int +adjust_eh_frame_local_symbols (const asection *sec, + struct elf_reloc_cookie *cookie) +{ + int adjusted = 0; + + if (cookie->locsymcount > 1) + { + unsigned int shndx = elf_section_data (sec)->this_idx; + Elf_Internal_Sym *end_sym = cookie->locsyms + cookie->locsymcount; + Elf_Internal_Sym *sym; + + for (sym = cookie->locsyms + 1; sym < end_sym; ++sym) + if (sym->st_info <= ELF_ST_INFO (STB_LOCAL, STT_OBJECT) + && sym->st_shndx == shndx) + { + bfd_signed_vma delta = offset_adjust (sym->st_value, sec); + + if (delta != 0) + { + adjusted = 1; + sym->st_value += delta; + } + } + } + return adjusted; +} + /* This function is called for each input file before the .eh_frame section is relocated. It discards duplicate CIEs and FDEs for discarded functions. The function returns TRUE iff any entries have been deleted. */ -bfd_boolean +bool _bfd_elf_discard_section_eh_frame (bfd *abfd, struct bfd_link_info *info, asection *sec, - bfd_boolean (*reloc_symbol_deleted_p) (bfd_vma, void *), + bool (*reloc_symbol_deleted_p) (bfd_vma, void *), struct elf_reloc_cookie *cookie) { struct eh_cie_fde *ent; struct eh_frame_sec_info *sec_info; struct eh_frame_hdr_info *hdr_info; - unsigned int ptr_size, offset; + unsigned int ptr_size, offset, eh_alignment; + int changed; if (sec->sec_info_type != SEC_INFO_TYPE_EH_FRAME) - return FALSE; + return false; sec_info = (struct eh_frame_sec_info *) elf_section_data (sec)->sec_info; if (sec_info == NULL) - return FALSE; + return false; ptr_size = (get_elf_backend_data (sec->owner) ->elf_backend_eh_frame_address_size (sec->owner, sec)); @@ -1344,7 +1499,7 @@ _bfd_elf_discard_section_eh_frame ent->removed = sec->map_head.s != NULL; else if (!ent->cie && ent->u.fde.cie_inf != NULL) { - bfd_boolean keep; + bool keep; if ((sec->flags & SEC_LINKER_CREATED) != 0 && cookie->rels == NULL) { unsigned int width @@ -1375,19 +1530,24 @@ _bfd_elf_discard_section_eh_frame which we cannot turn into PC relative, don't create the binary search table, since it is affected by runtime relocations. */ - hdr_info->u.dwarf.table = FALSE; - if (num_warnings_issued < 10) - { - (*info->callbacks->einfo) - (_("%P: FDE encoding in %B(%A) prevents .eh_frame_hdr" - " table being created.\n"), abfd, sec); - num_warnings_issued ++; - } - else if (num_warnings_issued == 10) + hdr_info->u.dwarf.table = false; + /* Only warn if --eh-frame-hdr was specified. */ + if (info->eh_frame_hdr_type != 0) { - (*info->callbacks->einfo) - (_("%P: Further warnings about FDE encoding preventing .eh_frame_hdr generation dropped.\n")); - num_warnings_issued ++; + if (num_warnings_issued < 10) + { + _bfd_error_handler + /* xgettext:c-format */ + (_("FDE encoding in %pB(%pA) prevents .eh_frame_hdr" + " table being created"), abfd, sec); + num_warnings_issued ++; + } + else if (num_warnings_issued == 10) + { + _bfd_error_handler + (_("further warnings about FDE encoding preventing .eh_frame_hdr generation dropped")); + num_warnings_issued ++; + } } } ent->removed = 0; @@ -1397,31 +1557,62 @@ _bfd_elf_discard_section_eh_frame } } - if (sec_info->cies) - { - free (sec_info->cies); - sec_info->cies = NULL; - } + free (sec_info->cies); + sec_info->cies = NULL; + /* It may be that some .eh_frame input section has greater alignment + than other .eh_frame sections. In that case we run the risk of + padding with zeros before that section, which would be seen as a + zero terminator. Alignment padding must be added *inside* the + last FDE instead. For other FDEs we align according to their + encoding, in order to align FDE address range entries naturally. */ offset = 0; + changed = 0; for (ent = sec_info->entry; ent < sec_info->entry + sec_info->count; ++ent) if (!ent->removed) { + eh_alignment = 4; + if (ent->size == 4) + ; + else if (ent->cie) + { + if (ent->u.cie.per_encoding_aligned8) + eh_alignment = 8; + } + else + { + eh_alignment = get_DW_EH_PE_width (ent->fde_encoding, ptr_size); + if (eh_alignment < 4) + eh_alignment = 4; + } + offset = (offset + eh_alignment - 1) & -eh_alignment; ent->new_offset = offset; - offset += size_of_output_cie_fde (ent, ptr_size); + if (ent->new_offset != ent->offset) + changed = 1; + offset += size_of_output_cie_fde (ent); } + eh_alignment = 4; + offset = (offset + eh_alignment - 1) & -eh_alignment; sec->rawsize = sec->size; sec->size = offset; - return offset != sec->rawsize; + if (sec->size != sec->rawsize) + changed = 1; + + if (changed && adjust_eh_frame_local_symbols (sec, cookie)) + { + Elf_Internal_Shdr *symtab_hdr = &elf_tdata (abfd)->symtab_hdr; + symtab_hdr->contents = (unsigned char *) cookie->locsyms; + } + return changed; } /* This function is called for .eh_frame_hdr section after _bfd_elf_discard_section_eh_frame has been called on all .eh_frame input sections. It finalizes the size of .eh_frame_hdr section. */ -bfd_boolean -_bfd_elf_discard_section_eh_frame_hdr (bfd *abfd, struct bfd_link_info *info) +bool +_bfd_elf_discard_section_eh_frame_hdr (struct bfd_link_info *info) { struct elf_link_hash_table *htab; struct eh_frame_hdr_info *hdr_info; @@ -1438,12 +1629,12 @@ _bfd_elf_discard_section_eh_frame_hdr (bfd *abfd, struct bfd_link_info *info) sec = hdr_info->hdr_sec; if (sec == NULL) - return FALSE; + return false; if (info->eh_frame_hdr_type == COMPACT_EH_HDR) { /* For compact frames we only add the header. The actual table comes - from the .eh_frame_entry sections. */ + from the .eh_frame_entry sections. */ sec->size = 8; } else @@ -1453,35 +1644,34 @@ _bfd_elf_discard_section_eh_frame_hdr (bfd *abfd, struct bfd_link_info *info) sec->size += 4 + hdr_info->u.dwarf.fde_count * 8; } - elf_eh_frame_hdr (abfd) = sec; - return TRUE; + return true; } /* Return true if there is at least one non-empty .eh_frame section in input files. Can only be called after ld has mapped input to output sections, and before sections are stripped. */ -bfd_boolean +bool _bfd_elf_eh_frame_present (struct bfd_link_info *info) { asection *eh = bfd_get_section_by_name (info->output_bfd, ".eh_frame"); if (eh == NULL) - return FALSE; + return false; /* Count only sections which have at least a single CIE or FDE. There cannot be any CIE or FDE <= 8 bytes. */ for (eh = eh->map_head.s; eh != NULL; eh = eh->map_head.s) if (eh->size > 8) - return TRUE; + return true; - return FALSE; + return false; } /* Return true if there is at least one .eh_frame_entry section in input files. */ -bfd_boolean +bool _bfd_elf_eh_frame_entry_present (struct bfd_link_info *info) { asection *o; @@ -1491,14 +1681,14 @@ _bfd_elf_eh_frame_entry_present (struct bfd_link_info *info) { for (o = abfd->sections; o; o = o->next) { - const char *name = bfd_get_section_name (abfd, o); + const char *name = bfd_section_name (o); if (strcmp (name, ".eh_frame_entry") && !bfd_is_abs_section (o->output_section)) - return TRUE; + return true; } } - return FALSE; + return false; } /* This function is called from size_dynamic_sections. @@ -1506,7 +1696,7 @@ _bfd_elf_eh_frame_entry_present (struct bfd_link_info *info) because when the dynamic symbol table has been sized it is too late to strip sections. */ -bfd_boolean +bool _bfd_elf_maybe_strip_eh_frame_hdr (struct bfd_link_info *info) { struct elf_link_hash_table *htab; @@ -1517,7 +1707,7 @@ _bfd_elf_maybe_strip_eh_frame_hdr (struct bfd_link_info *info) htab = elf_hash_table (info); hdr_info = &htab->eh_info; if (hdr_info->hdr_sec == NULL) - return TRUE; + return true; if (bfd_is_abs_section (hdr_info->hdr_sec->output_section) || info->eh_frame_hdr_type == 0 @@ -1528,25 +1718,25 @@ _bfd_elf_maybe_strip_eh_frame_hdr (struct bfd_link_info *info) { hdr_info->hdr_sec->flags |= SEC_EXCLUDE; hdr_info->hdr_sec = NULL; - return TRUE; + return true; } /* Add a hidden symbol so that systems without access to PHDRs can find the table. */ if (! (_bfd_generic_link_add_one_symbol (info, info->output_bfd, "__GNU_EH_FRAME_HDR", BSF_LOCAL, - hdr_info->hdr_sec, 0, NULL, FALSE, FALSE, &bh))) - return FALSE; + hdr_info->hdr_sec, 0, NULL, false, false, &bh))) + return false; h = (struct elf_link_hash_entry *) bh; h->def_regular = 1; h->other = STV_HIDDEN; get_elf_backend_data - (info->output_bfd)->elf_backend_hide_symbol (info, h, TRUE); + (info->output_bfd)->elf_backend_hide_symbol (info, h, true); if (!hdr_info->frame_hdr_is_compact) - hdr_info->u.dwarf.table = TRUE; - return TRUE; + hdr_info->u.dwarf.table = true; + return true; } /* Adjust an address in the .eh_frame section. Given OFFSET within @@ -1639,7 +1829,7 @@ _bfd_elf_eh_frame_section_offset (bfd *output_bfd ATTRIBUTE_UNUSED, /* Write out .eh_frame_entry section. Add CANTUNWIND terminator if needed. Also check that the contents look sane. */ -bfd_boolean +bool _bfd_elf_write_section_eh_frame_entry (bfd *abfd, struct bfd_link_info *info, asection *sec, bfd_byte *contents) { @@ -1660,11 +1850,11 @@ _bfd_elf_write_section_eh_frame_entry (bfd *abfd, struct bfd_link_info *info, excluded outside of the normal process. */ if (sec->flags & SEC_EXCLUDE || text_sec->flags & SEC_EXCLUDE) - return TRUE; + return true; if (!bfd_set_section_contents (abfd, sec->output_section, contents, sec->output_offset, sec->rawsize)) - return FALSE; + return false; last_addr = bfd_get_signed_32 (abfd, contents); /* Check that all the entries are in order. */ @@ -1673,8 +1863,9 @@ _bfd_elf_write_section_eh_frame_entry (bfd *abfd, struct bfd_link_info *info, addr = bfd_get_signed_32 (abfd, contents + offset) + offset; if (addr <= last_addr) { - (*_bfd_error_handler) (_("%B: %s not in order"), sec->owner, sec->name); - return FALSE; + /* xgettext:c-format */ + _bfd_error_handler (_("%pB: %pA not in order"), sec->owner, sec); + return false; } last_addr = addr; @@ -1686,21 +1877,23 @@ _bfd_elf_write_section_eh_frame_entry (bfd *abfd, struct bfd_link_info *info, addr -= (sec->output_section->vma + sec->output_offset + sec->rawsize); if (addr & 1) { - (*_bfd_error_handler) (_("%B: %s invalid input section size"), - sec->owner, sec->name); + /* xgettext:c-format */ + _bfd_error_handler (_("%pB: %pA invalid input section size"), + sec->owner, sec); bfd_set_error (bfd_error_bad_value); - return FALSE; + return false; } if (last_addr >= addr + sec->rawsize) { - (*_bfd_error_handler) (_("%B: %s points past end of text section"), - sec->owner, sec->name); + /* xgettext:c-format */ + _bfd_error_handler (_("%pB: %pA points past end of text section"), + sec->owner, sec); bfd_set_error (bfd_error_bad_value); - return FALSE; + return false; } if (sec->size == sec->rawsize) - return TRUE; + return true; bed = get_elf_backend_data (abfd); BFD_ASSERT (sec->size == sec->rawsize + 8); @@ -1716,7 +1909,7 @@ _bfd_elf_write_section_eh_frame_entry (bfd *abfd, struct bfd_link_info *info, /* Write out .eh_frame section. This is called with the relocated contents. */ -bfd_boolean +bool _bfd_elf_write_section_eh_frame (bfd *abfd, struct bfd_link_info *info, asection *sec, @@ -1726,8 +1919,7 @@ _bfd_elf_write_section_eh_frame (bfd *abfd, struct elf_link_hash_table *htab; struct eh_frame_hdr_info *hdr_info; unsigned int ptr_size; - struct eh_cie_fde *ent; - bfd_size_type sec_size; + struct eh_cie_fde *ent, *last_ent; if (sec->sec_info_type != SEC_INFO_TYPE_EH_FRAME) /* FIXME: octets_per_byte. */ @@ -1744,9 +1936,9 @@ _bfd_elf_write_section_eh_frame (bfd *abfd, if (hdr_info->u.dwarf.table && hdr_info->u.dwarf.array == NULL) { - hdr_info->frame_hdr_is_compact = FALSE; + hdr_info->frame_hdr_is_compact = false; hdr_info->u.dwarf.array = (struct eh_frame_array_ent *) - bfd_malloc (hdr_info->u.dwarf.fde_count + bfd_malloc (hdr_info->u.dwarf.fde_count * sizeof (*hdr_info->u.dwarf.array)); } if (hdr_info->u.dwarf.array == NULL) @@ -1765,7 +1957,8 @@ _bfd_elf_write_section_eh_frame (bfd *abfd, if (!ent->removed && ent->new_offset < ent->offset) memmove (contents + ent->new_offset, contents + ent->offset, ent->size); - for (ent = sec_info->entry; ent < sec_info->entry + sec_info->count; ++ent) + last_ent = sec_info->entry + sec_info->count; + for (ent = sec_info->entry; ent < last_ent; ++ent) { unsigned char *buf, *end; unsigned int new_size; @@ -1776,13 +1969,13 @@ _bfd_elf_write_section_eh_frame (bfd *abfd, if (ent->size == 4) { /* Any terminating FDE must be at the end of the section. */ - BFD_ASSERT (ent == sec_info->entry + sec_info->count - 1); + BFD_ASSERT (ent == last_ent - 1); continue; } buf = contents + ent->new_offset; end = buf + ent->size; - new_size = size_of_output_cie_fde (ent, ptr_size); + new_size = next_cie_fde_offset (ent, last_ent, sec) - ent->new_offset; /* Update the size. It may be shrinked. */ bfd_put_32 (abfd, new_size - 4, buf); @@ -1799,7 +1992,7 @@ _bfd_elf_write_section_eh_frame (bfd *abfd, || ent->u.cie.per_encoding_relative) { char *aug; - unsigned int action, extra_string, extra_data; + unsigned int version, action, extra_string, extra_data; unsigned int per_width, per_encoding; /* Need to find 'R' or 'L' augmentation's argument and modify @@ -1810,13 +2003,17 @@ _bfd_elf_write_section_eh_frame (bfd *abfd, extra_string = extra_augmentation_string_bytes (ent); extra_data = extra_augmentation_data_bytes (ent); - /* Skip length, id and version. */ - buf += 9; + /* Skip length, id. */ + buf += 8; + version = *buf++; aug = (char *) buf; buf += strlen (aug) + 1; skip_leb128 (&buf, end); skip_leb128 (&buf, end); - skip_leb128 (&buf, end); + if (version == 1) + skip_bytes (&buf, end, 1); + else + skip_leb128 (&buf, end); if (*aug == 'z') { /* The uleb128 will always be a single byte for the kind @@ -1941,12 +2138,13 @@ _bfd_elf_write_section_eh_frame (bfd *abfd, address += elf_gp (abfd); break; default: - (*info->callbacks->einfo) - (_("%P: DW_EH_PE_datarel unspecified" - " for this architecture.\n")); + _bfd_error_handler + (_("DW_EH_PE_datarel unspecified" + " for this architecture")); /* Fall thru */ case bfd_arch_frv: case bfd_arch_i386: + case bfd_arch_nios2: BFD_ASSERT (htab->hgot != NULL && ((htab->hgot->root.type == bfd_link_hash_defined) @@ -1987,7 +2185,7 @@ _bfd_elf_write_section_eh_frame (bfd *abfd, hdr_info->u.dwarf.array[hdr_info->array_count].initial_loc = address; hdr_info->u.dwarf.array[hdr_info->array_count].range - = read_value (abfd, buf + width, width, FALSE); + = read_value (abfd, buf + width, width, false); hdr_info->u.dwarf.array[hdr_info->array_count++].fde = (sec->output_section->vma + sec->output_offset @@ -2053,18 +2251,6 @@ _bfd_elf_write_section_eh_frame (bfd *abfd, } } - /* We don't align the section to its section alignment since the - runtime library only expects all CIE/FDE records aligned at - the pointer size. _bfd_elf_discard_section_eh_frame should - have padded CIE/FDE records to multiple of pointer size with - size_of_output_cie_fde. */ - sec_size = sec->size; - if (sec_info->count != 0 - && sec_info->entry[sec_info->count - 1].size == 4) - sec_size -= 4; - if ((sec_size % ptr_size) != 0) - abort (); - /* FIXME: octets_per_byte. */ return bfd_set_section_contents (abfd, sec->output_section, contents, (file_ptr) sec->output_offset, @@ -2098,7 +2284,7 @@ vma_compare (const void *a, const void *b) invalid for a linker script to try to force a particular order of .eh_frame_entry sections. */ -bfd_boolean +bool _bfd_elf_fixup_eh_frame_hdr (struct bfd_link_info *info) { asection *sec = NULL; @@ -2113,7 +2299,7 @@ _bfd_elf_fixup_eh_frame_hdr (struct bfd_link_info *info) if (hdr_info->hdr_sec == NULL || info->eh_frame_hdr_type != COMPACT_EH_HDR || hdr_info->array_count == 0) - return TRUE; + return true; /* Change section output offsets to be in text section order. */ offset = 8; @@ -2123,10 +2309,10 @@ _bfd_elf_fixup_eh_frame_hdr (struct bfd_link_info *info) sec = hdr_info->u.compact.entries[i]; if (sec->output_section != osec) { - (*_bfd_error_handler) - (_("Invalid output section for .eh_frame_entry: %s"), - sec->output_section->name); - return FALSE; + _bfd_error_handler + (_("invalid output section for .eh_frame_entry: %pA"), + sec->output_section); + return false; } sec->output_offset = offset; offset += sec->size; @@ -2141,17 +2327,17 @@ _bfd_elf_fixup_eh_frame_hdr (struct bfd_link_info *info) p->offset = p->u.indirect.section->output_offset; if (p->next != NULL) - i--; + i--; } if (i != 0) { - (*_bfd_error_handler) - (_("Invalid contents in %s section"), osec->name); - return FALSE; + _bfd_error_handler + (_("invalid contents in %pA section"), osec); + return false; } - return TRUE; + return true; } /* The .eh_frame_hdr format for Compact EH frames: @@ -2160,7 +2346,7 @@ _bfd_elf_fixup_eh_frame_hdr (struct bfd_link_info *info) uint32_t count (Number of entries in table) [array from .eh_frame_entry sections] */ -static bfd_boolean +static bool write_compact_eh_frame_hdr (bfd *abfd, struct bfd_link_info *info) { struct elf_link_hash_table *htab; @@ -2196,7 +2382,7 @@ write_compact_eh_frame_hdr (bfd *abfd, struct bfd_link_info *info) /* The .eh_frame_hdr format for DWARF frames: ubyte version (currently 1) - ubyte eh_frame_ptr_enc (DW_EH_PE_* encoding of pointer to start of + ubyte eh_frame_ptr_enc (DW_EH_PE_* encoding of pointer to start of .eh_frame section) ubyte fde_count_enc (DW_EH_PE_* encoding of total FDE count number (or DW_EH_PE_omit if there is no @@ -2213,13 +2399,13 @@ write_compact_eh_frame_hdr (bfd *abfd, struct bfd_link_info *info) FDE initial_location field and FDE address, sorted by increasing initial_loc). */ -static bfd_boolean +static bool write_dwarf_eh_frame_hdr (bfd *abfd, struct bfd_link_info *info) { struct elf_link_hash_table *htab; struct eh_frame_hdr_info *hdr_info; asection *sec; - bfd_boolean retval = TRUE; + bool retval = true; htab = elf_hash_table (info); hdr_info = &htab->eh_info; @@ -2235,13 +2421,13 @@ write_dwarf_eh_frame_hdr (bfd *abfd, struct bfd_link_info *info) size += 4 + hdr_info->u.dwarf.fde_count * 8; contents = (bfd_byte *) bfd_malloc (size); if (contents == NULL) - return FALSE; + return false; eh_frame_sec = bfd_get_section_by_name (abfd, ".eh_frame"); if (eh_frame_sec == NULL) { free (contents); - return FALSE; + return false; } memset (contents, 0, EH_FRAME_HDR_SIZE); @@ -2269,14 +2455,14 @@ write_dwarf_eh_frame_hdr (bfd *abfd, struct bfd_link_info *info) if (contents[2] != DW_EH_PE_omit) { unsigned int i; - bfd_boolean overlap, overflow; + bool overlap, overflow; bfd_put_32 (abfd, hdr_info->u.dwarf.fde_count, contents + EH_FRAME_HDR_SIZE); qsort (hdr_info->u.dwarf.array, hdr_info->u.dwarf.fde_count, sizeof (*hdr_info->u.dwarf.array), vma_compare); - overlap = FALSE; - overflow = FALSE; + overlap = false; + overflow = false; for (i = 0; i < hdr_info->u.dwarf.fde_count; i++) { bfd_vma val; @@ -2287,30 +2473,29 @@ write_dwarf_eh_frame_hdr (bfd *abfd, struct bfd_link_info *info) if (elf_elfheader (abfd)->e_ident[EI_CLASS] == ELFCLASS64 && (hdr_info->u.dwarf.array[i].initial_loc != sec->output_section->vma + val)) - overflow = TRUE; + overflow = true; bfd_put_32 (abfd, val, contents + EH_FRAME_HDR_SIZE + i * 8 + 4); val = hdr_info->u.dwarf.array[i].fde - sec->output_section->vma; val = ((val & 0xffffffff) ^ 0x80000000) - 0x80000000; if (elf_elfheader (abfd)->e_ident[EI_CLASS] == ELFCLASS64 && (hdr_info->u.dwarf.array[i].fde != sec->output_section->vma + val)) - overflow = TRUE; + overflow = true; bfd_put_32 (abfd, val, contents + EH_FRAME_HDR_SIZE + i * 8 + 8); if (i != 0 && (hdr_info->u.dwarf.array[i].initial_loc < (hdr_info->u.dwarf.array[i - 1].initial_loc + hdr_info->u.dwarf.array[i - 1].range))) - overlap = TRUE; + overlap = true; } if (overflow) - (*info->callbacks->einfo) (_("%P: .eh_frame_hdr entry overflow.\n")); + _bfd_error_handler (_(".eh_frame_hdr entry overflow")); if (overlap) - (*info->callbacks->einfo) - (_("%P: .eh_frame_hdr refers to overlapping FDEs.\n")); + _bfd_error_handler (_(".eh_frame_hdr refers to overlapping FDEs")); if (overflow || overlap) { bfd_set_error (bfd_error_bad_value); - retval = FALSE; + retval = false; } } @@ -2318,11 +2503,10 @@ write_dwarf_eh_frame_hdr (bfd *abfd, struct bfd_link_info *info) if (!bfd_set_section_contents (abfd, sec->output_section, contents, (file_ptr) sec->output_offset, sec->size)) - retval = FALSE; + retval = false; free (contents); - if (hdr_info->u.dwarf.array != NULL) - free (hdr_info->u.dwarf.array); + free (hdr_info->u.dwarf.array); return retval; } @@ -2330,7 +2514,7 @@ write_dwarf_eh_frame_hdr (bfd *abfd, struct bfd_link_info *info) _bfd_elf_write_section_eh_frame has been called on all input .eh_frame sections. */ -bfd_boolean +bool _bfd_elf_write_section_eh_frame_hdr (bfd *abfd, struct bfd_link_info *info) { struct elf_link_hash_table *htab; @@ -2342,7 +2526,7 @@ _bfd_elf_write_section_eh_frame_hdr (bfd *abfd, struct bfd_link_info *info) sec = hdr_info->hdr_sec; if (info->eh_frame_hdr_type == 0 || sec == NULL) - return TRUE; + return true; if (info->eh_frame_hdr_type == COMPACT_EH_HDR) return write_compact_eh_frame_hdr (abfd, info); @@ -2353,7 +2537,7 @@ _bfd_elf_write_section_eh_frame_hdr (bfd *abfd, struct bfd_link_info *info) /* Return the width of FDE addresses. This is the default implementation. */ unsigned int -_bfd_elf_eh_frame_address_size (bfd *abfd, asection *sec ATTRIBUTE_UNUSED) +_bfd_elf_eh_frame_address_size (bfd *abfd, const asection *sec ATTRIBUTE_UNUSED) { return elf_elfheader (abfd)->e_ident[EI_CLASS] == ELFCLASS64 ? 8 : 4; } @@ -2361,12 +2545,12 @@ _bfd_elf_eh_frame_address_size (bfd *abfd, asection *sec ATTRIBUTE_UNUSED) /* Decide whether we can use a PC-relative encoding within the given EH frame section. This is the default implementation. */ -bfd_boolean +bool _bfd_elf_can_make_relative (bfd *input_bfd ATTRIBUTE_UNUSED, struct bfd_link_info *info ATTRIBUTE_UNUSED, asection *eh_frame_section ATTRIBUTE_UNUSED) { - return TRUE; + return true; } /* Select an encoding for the given address. Preference is given to