2001-12-13 12:09:34 +01:00
|
|
|
/* .eh_frame section optimization.
|
bfd
* elf-bfd.h (enum elf_link_info_type): Remove.
(struct bfd_elf_section_data): Move sec_info_type, use_rela_p fields
to struct sec. Remove linkonce_p field.
(elf_linkonce_p): Delete.
(elf_discarded_section): Update for sec_info_type change.
* section.c (struct sec): Add sec_info_type, use_rela_p, has_tls_reloc,
flag11, flag12, flag13, flag14, flag15, flag16, flag20, flag24.
(ELF_INFO_TYPE_NONE): Define.
(ELF_INFO_TYPE_STABS): Define.
(ELF_INFO_TYPE_MERGE): Define.
(ELF_INFO_TYPE_EH_FRAME): Define.
(ELF_INFO_TYPE_JUST_SYMS): Define.
(STD_SECTION): Update struct sec initializer.
* ecoff.c (bfd_debug_section): Likewise.
* elf.c: Likewise. Update occurrences of sec_info_type and use_rela_p.
* elflink.h: Likewise.
* elf-eh-frame.c: Likewise.
* elf64-alpha.c: Likewise.
* elfxx-ia64.c: Likewise.
* elfxx-mips.c: Likewise.
* bfd-in2.h: Regenerate.
* elf32-sparc.c (sec_do_relax): Use elf_section_data macro rather than
referring to used_by_bfd.
* elf64-sparc.c (sec_do_relax): Likewise.
* elf64-mmix.c (mmix_elf_section_data): Likewise.
* elfxx-mips.c (mips_elf_section_data): Likewise.
* ieee.c (ieee_slurp_section_data): Use ieee_per_section macro.
(ieee_get_section_contents): Likewise.
(ieee_new_section_hook): Formatting.
(ieee_canonicalize_reloc): Remove commented out code.
* mmo.c (mmo_section_data): Define. Use throughout file.
* oasys.c (oasys_get_section_contents): Use oasys_per_section macro.
gas
* config/obj-elf.c (obj_elf_change_section): Set SEC_LINK_ONCE and
SEC_LINK_DUPLICATES_DISCARD directly rather than using elf_linkonce_p.
2003-02-04 13:34:08 +01:00
|
|
|
Copyright 2001, 2002, 2003 Free Software Foundation, Inc.
|
2001-12-13 12:09:34 +01:00
|
|
|
Written by Jakub Jelinek <jakub@redhat.com>.
|
|
|
|
|
|
|
|
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 2 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
|
|
|
|
|
|
|
#include "bfd.h"
|
|
|
|
#include "sysdep.h"
|
|
|
|
#include "libbfd.h"
|
|
|
|
#include "elf-bfd.h"
|
|
|
|
#include "elf/dwarf2.h"
|
|
|
|
|
|
|
|
#define EH_FRAME_HDR_SIZE 8
|
|
|
|
|
|
|
|
static bfd_vma read_unsigned_leb128
|
|
|
|
PARAMS ((bfd *, char *, unsigned int *));
|
|
|
|
static bfd_signed_vma read_signed_leb128
|
|
|
|
PARAMS ((bfd *, char *, unsigned int *));
|
|
|
|
static int get_DW_EH_PE_width
|
|
|
|
PARAMS ((int, int));
|
2001-12-18 12:49:52 +01:00
|
|
|
static bfd_vma read_value
|
2003-02-07 00:01:04 +01:00
|
|
|
PARAMS ((bfd *, bfd_byte *, int, int));
|
2001-12-18 12:49:52 +01:00
|
|
|
static void write_value
|
|
|
|
PARAMS ((bfd *, bfd_byte *, bfd_vma, int));
|
2001-12-13 12:09:34 +01:00
|
|
|
static int cie_compare
|
|
|
|
PARAMS ((struct cie *, struct cie *));
|
|
|
|
static int vma_compare
|
|
|
|
PARAMS ((const PTR a, const PTR b));
|
|
|
|
|
|
|
|
/* Helper function for reading uleb128 encoded data. */
|
|
|
|
|
|
|
|
static bfd_vma
|
|
|
|
read_unsigned_leb128 (abfd, buf, bytes_read_ptr)
|
|
|
|
bfd *abfd ATTRIBUTE_UNUSED;
|
|
|
|
char *buf;
|
|
|
|
unsigned int *bytes_read_ptr;
|
|
|
|
{
|
|
|
|
bfd_vma result;
|
|
|
|
unsigned int num_read;
|
|
|
|
int shift;
|
|
|
|
unsigned char byte;
|
|
|
|
|
|
|
|
result = 0;
|
|
|
|
shift = 0;
|
|
|
|
num_read = 0;
|
|
|
|
do
|
|
|
|
{
|
|
|
|
byte = bfd_get_8 (abfd, (bfd_byte *) buf);
|
|
|
|
buf ++;
|
|
|
|
num_read ++;
|
|
|
|
result |= (((bfd_vma) byte & 0x7f) << shift);
|
|
|
|
shift += 7;
|
|
|
|
}
|
|
|
|
while (byte & 0x80);
|
|
|
|
* bytes_read_ptr = num_read;
|
|
|
|
return result;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Helper function for reading sleb128 encoded data. */
|
|
|
|
|
|
|
|
static bfd_signed_vma
|
|
|
|
read_signed_leb128 (abfd, buf, bytes_read_ptr)
|
|
|
|
bfd *abfd ATTRIBUTE_UNUSED;
|
|
|
|
char *buf;
|
|
|
|
unsigned int * bytes_read_ptr;
|
|
|
|
{
|
|
|
|
bfd_vma result;
|
|
|
|
int shift;
|
|
|
|
int num_read;
|
|
|
|
unsigned char byte;
|
|
|
|
|
|
|
|
result = 0;
|
|
|
|
shift = 0;
|
|
|
|
num_read = 0;
|
|
|
|
do
|
|
|
|
{
|
|
|
|
byte = bfd_get_8 (abfd, (bfd_byte *) buf);
|
|
|
|
buf ++;
|
|
|
|
num_read ++;
|
|
|
|
result |= (((bfd_vma) byte & 0x7f) << shift);
|
|
|
|
shift += 7;
|
|
|
|
}
|
|
|
|
while (byte & 0x80);
|
|
|
|
if (byte & 0x40)
|
|
|
|
result |= (((bfd_vma) -1) << (shift - 7)) << 7;
|
|
|
|
* bytes_read_ptr = num_read;
|
|
|
|
return result;
|
|
|
|
}
|
|
|
|
|
|
|
|
#define read_uleb128(VAR, BUF) \
|
|
|
|
do \
|
|
|
|
{ \
|
|
|
|
(VAR) = read_unsigned_leb128 (abfd, buf, &leb128_tmp); \
|
|
|
|
(BUF) += leb128_tmp; \
|
|
|
|
} \
|
|
|
|
while (0)
|
|
|
|
|
|
|
|
#define read_sleb128(VAR, BUF) \
|
|
|
|
do \
|
|
|
|
{ \
|
|
|
|
(VAR) = read_signed_leb128 (abfd, buf, &leb128_tmp); \
|
|
|
|
(BUF) += leb128_tmp; \
|
|
|
|
} \
|
|
|
|
while (0)
|
|
|
|
|
|
|
|
/* Return 0 if either encoding is variable width, or not yet known to bfd. */
|
|
|
|
|
|
|
|
static
|
|
|
|
int get_DW_EH_PE_width (encoding, ptr_size)
|
|
|
|
int encoding, ptr_size;
|
|
|
|
{
|
|
|
|
/* DW_EH_PE_ values of 0x60 and 0x70 weren't defined at the time .eh_frame
|
|
|
|
was added to bfd. */
|
|
|
|
if ((encoding & 0x60) == 0x60)
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
switch (encoding & 7)
|
|
|
|
{
|
|
|
|
case DW_EH_PE_udata2: return 2;
|
|
|
|
case DW_EH_PE_udata4: return 4;
|
|
|
|
case DW_EH_PE_udata8: return 8;
|
|
|
|
case DW_EH_PE_absptr: return ptr_size;
|
|
|
|
default:
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2003-02-07 00:01:04 +01:00
|
|
|
#define get_DW_EH_PE_signed(encoding) (((encoding) & DW_EH_PE_signed) != 0)
|
|
|
|
|
2001-12-18 12:49:52 +01:00
|
|
|
/* Read a width sized value from memory. */
|
|
|
|
|
|
|
|
static bfd_vma
|
2003-02-07 00:01:04 +01:00
|
|
|
read_value (abfd, buf, width, is_signed)
|
2001-12-18 12:49:52 +01:00
|
|
|
bfd *abfd;
|
|
|
|
bfd_byte *buf;
|
|
|
|
int width;
|
2003-02-07 00:01:04 +01:00
|
|
|
int is_signed;
|
2001-12-18 12:49:52 +01:00
|
|
|
{
|
|
|
|
bfd_vma value;
|
|
|
|
|
|
|
|
switch (width)
|
|
|
|
{
|
2003-02-07 00:01:04 +01:00
|
|
|
case 2:
|
|
|
|
if (is_signed)
|
|
|
|
value = bfd_get_signed_16 (abfd, buf);
|
|
|
|
else
|
|
|
|
value = bfd_get_16 (abfd, buf);
|
|
|
|
break;
|
|
|
|
case 4:
|
|
|
|
if (is_signed)
|
|
|
|
value = bfd_get_signed_32 (abfd, buf);
|
|
|
|
else
|
|
|
|
value = bfd_get_32 (abfd, buf);
|
|
|
|
break;
|
|
|
|
case 8:
|
|
|
|
if (is_signed)
|
|
|
|
value = bfd_get_signed_64 (abfd, buf);
|
|
|
|
else
|
|
|
|
value = bfd_get_64 (abfd, buf);
|
|
|
|
break;
|
|
|
|
default:
|
|
|
|
BFD_FAIL ();
|
|
|
|
return 0;
|
2001-12-18 12:49:52 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
return value;
|
|
|
|
}
|
2002-11-30 09:39:46 +01:00
|
|
|
|
2001-12-18 12:49:52 +01:00
|
|
|
/* Store a width sized value to memory. */
|
|
|
|
|
|
|
|
static void
|
|
|
|
write_value (abfd, buf, value, width)
|
|
|
|
bfd *abfd;
|
|
|
|
bfd_byte *buf;
|
|
|
|
bfd_vma value;
|
|
|
|
int width;
|
|
|
|
{
|
|
|
|
switch (width)
|
|
|
|
{
|
|
|
|
case 2: bfd_put_16 (abfd, value, buf); break;
|
|
|
|
case 4: bfd_put_32 (abfd, value, buf); break;
|
|
|
|
case 8: bfd_put_64 (abfd, value, buf); break;
|
|
|
|
default: BFD_FAIL ();
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2001-12-13 12:09:34 +01:00
|
|
|
/* Return zero if C1 and C2 CIEs can be merged. */
|
|
|
|
|
|
|
|
static
|
|
|
|
int cie_compare (c1, c2)
|
|
|
|
struct cie *c1, *c2;
|
|
|
|
{
|
|
|
|
if (c1->hdr.length == c2->hdr.length
|
|
|
|
&& c1->version == c2->version
|
|
|
|
&& strcmp (c1->augmentation, c2->augmentation) == 0
|
|
|
|
&& strcmp (c1->augmentation, "eh") != 0
|
|
|
|
&& c1->code_align == c2->code_align
|
|
|
|
&& c1->data_align == c2->data_align
|
|
|
|
&& c1->ra_column == c2->ra_column
|
|
|
|
&& c1->augmentation_size == c2->augmentation_size
|
|
|
|
&& c1->personality == c2->personality
|
|
|
|
&& c1->per_encoding == c2->per_encoding
|
|
|
|
&& c1->lsda_encoding == c2->lsda_encoding
|
|
|
|
&& c1->fde_encoding == c2->fde_encoding
|
|
|
|
&& (c1->initial_insn_length
|
|
|
|
== c2->initial_insn_length)
|
|
|
|
&& memcmp (c1->initial_instructions,
|
|
|
|
c2->initial_instructions,
|
|
|
|
c1->initial_insn_length) == 0)
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* This function is called for each input file before the .eh_frame
|
|
|
|
section is relocated. It discards duplicate CIEs and FDEs for discarded
|
2002-11-30 09:39:46 +01:00
|
|
|
functions. The function returns TRUE iff any entries have been
|
2001-12-13 12:09:34 +01:00
|
|
|
deleted. */
|
|
|
|
|
2002-11-30 09:39:46 +01:00
|
|
|
bfd_boolean
|
2002-11-12 08:35:26 +01:00
|
|
|
_bfd_elf_discard_section_eh_frame (abfd, info, sec,
|
2001-12-13 12:09:34 +01:00
|
|
|
reloc_symbol_deleted_p, cookie)
|
|
|
|
bfd *abfd;
|
|
|
|
struct bfd_link_info *info;
|
2002-11-12 08:35:26 +01:00
|
|
|
asection *sec;
|
2002-11-30 09:39:46 +01:00
|
|
|
bfd_boolean (*reloc_symbol_deleted_p) PARAMS ((bfd_vma, PTR));
|
2001-12-13 12:09:34 +01:00
|
|
|
struct elf_reloc_cookie *cookie;
|
|
|
|
{
|
|
|
|
bfd_byte *ehbuf = NULL, *buf;
|
|
|
|
bfd_byte *last_cie, *last_fde;
|
|
|
|
struct cie_header hdr;
|
|
|
|
struct cie cie;
|
2002-11-12 08:35:26 +01:00
|
|
|
struct elf_link_hash_table *htab;
|
2001-12-13 12:09:34 +01:00
|
|
|
struct eh_frame_hdr_info *hdr_info;
|
2001-12-15 09:54:13 +01:00
|
|
|
struct eh_frame_sec_info *sec_info = NULL;
|
2001-12-13 12:09:34 +01:00
|
|
|
unsigned int leb128_tmp;
|
2001-12-18 12:49:52 +01:00
|
|
|
unsigned int cie_usage_count, last_cie_ndx, i, offset;
|
|
|
|
unsigned int make_relative, make_lsda_relative;
|
2001-12-13 12:09:34 +01:00
|
|
|
bfd_size_type new_size;
|
|
|
|
unsigned int ptr_size;
|
|
|
|
|
|
|
|
if (sec->_raw_size == 0)
|
|
|
|
{
|
|
|
|
/* This file does not contain .eh_frame information. */
|
2002-11-30 09:39:46 +01:00
|
|
|
return FALSE;
|
2001-12-13 12:09:34 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
if ((sec->output_section != NULL
|
|
|
|
&& 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. */
|
2002-11-30 09:39:46 +01:00
|
|
|
return FALSE;
|
2001-12-13 12:09:34 +01:00
|
|
|
}
|
|
|
|
|
2002-11-12 08:35:26 +01:00
|
|
|
htab = elf_hash_table (info);
|
|
|
|
hdr_info = &htab->eh_info;
|
2001-12-15 09:54:13 +01:00
|
|
|
|
2001-12-13 12:09:34 +01:00
|
|
|
/* Read the frame unwind information from abfd. */
|
|
|
|
|
|
|
|
ehbuf = (bfd_byte *) bfd_malloc (sec->_raw_size);
|
2001-12-15 09:54:13 +01:00
|
|
|
if (ehbuf == NULL)
|
|
|
|
goto free_no_table;
|
|
|
|
|
|
|
|
if (! bfd_get_section_contents (abfd, sec, ehbuf, (bfd_vma) 0,
|
|
|
|
sec->_raw_size))
|
|
|
|
goto free_no_table;
|
2001-12-13 12:09:34 +01:00
|
|
|
|
|
|
|
if (sec->_raw_size >= 4
|
|
|
|
&& bfd_get_32 (abfd, ehbuf) == 0
|
|
|
|
&& cookie->rel == cookie->relend)
|
|
|
|
{
|
|
|
|
/* Empty .eh_frame section. */
|
|
|
|
free (ehbuf);
|
2002-11-30 09:39:46 +01:00
|
|
|
return FALSE;
|
2001-12-13 12:09:34 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
/* 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). */
|
|
|
|
if (sec->_raw_size != (unsigned int) sec->_raw_size)
|
2001-12-15 09:54:13 +01:00
|
|
|
goto free_no_table;
|
2001-12-13 12:09:34 +01:00
|
|
|
|
|
|
|
ptr_size = (elf_elfheader (abfd)->e_ident[EI_CLASS]
|
|
|
|
== ELFCLASS64) ? 8 : 4;
|
|
|
|
buf = ehbuf;
|
|
|
|
last_cie = NULL;
|
|
|
|
last_cie_ndx = 0;
|
|
|
|
memset (&cie, 0, sizeof (cie));
|
|
|
|
cie_usage_count = 0;
|
|
|
|
new_size = sec->_raw_size;
|
|
|
|
make_relative = hdr_info->last_cie.make_relative;
|
2001-12-18 12:49:52 +01:00
|
|
|
make_lsda_relative = hdr_info->last_cie.make_lsda_relative;
|
2001-12-13 12:09:34 +01:00
|
|
|
sec_info = bfd_zmalloc (sizeof (struct eh_frame_sec_info)
|
|
|
|
+ 99 * sizeof (struct eh_cie_fde));
|
|
|
|
if (sec_info == NULL)
|
|
|
|
goto free_no_table;
|
|
|
|
sec_info->alloced = 100;
|
|
|
|
|
|
|
|
#define ENSURE_NO_RELOCS(buf) \
|
|
|
|
if (cookie->rel < cookie->relend \
|
|
|
|
&& (cookie->rel->r_offset \
|
2002-11-26 12:54:02 +01:00
|
|
|
< (bfd_size_type) ((buf) - ehbuf)) \
|
|
|
|
&& cookie->rel->r_info != 0) \
|
2001-12-13 12:09:34 +01:00
|
|
|
goto free_no_table
|
|
|
|
|
|
|
|
#define SKIP_RELOCS(buf) \
|
|
|
|
while (cookie->rel < cookie->relend \
|
|
|
|
&& (cookie->rel->r_offset \
|
|
|
|
< (bfd_size_type) ((buf) - ehbuf))) \
|
|
|
|
cookie->rel++
|
|
|
|
|
|
|
|
#define GET_RELOC(buf) \
|
|
|
|
((cookie->rel < cookie->relend \
|
|
|
|
&& (cookie->rel->r_offset \
|
|
|
|
== (bfd_size_type) ((buf) - ehbuf))) \
|
|
|
|
? cookie->rel : NULL)
|
|
|
|
|
|
|
|
for (;;)
|
|
|
|
{
|
|
|
|
unsigned char *aug;
|
|
|
|
|
|
|
|
if (sec_info->count == sec_info->alloced)
|
|
|
|
{
|
|
|
|
sec_info = bfd_realloc (sec_info,
|
|
|
|
sizeof (struct eh_frame_sec_info)
|
|
|
|
+ (sec_info->alloced + 99)
|
|
|
|
* sizeof (struct eh_cie_fde));
|
|
|
|
if (sec_info == NULL)
|
|
|
|
goto free_no_table;
|
|
|
|
|
|
|
|
memset (&sec_info->entry[sec_info->alloced], 0,
|
|
|
|
100 * sizeof (struct eh_cie_fde));
|
|
|
|
sec_info->alloced += 100;
|
|
|
|
}
|
|
|
|
|
|
|
|
last_fde = buf;
|
|
|
|
/* If we are at the end of the section, we still need to decide
|
|
|
|
on whether to output or discard last encountered CIE (if any). */
|
|
|
|
if ((bfd_size_type) (buf - ehbuf) == sec->_raw_size)
|
|
|
|
hdr.id = (unsigned int) -1;
|
|
|
|
else
|
|
|
|
{
|
|
|
|
if ((bfd_size_type) (buf + 4 - ehbuf) > sec->_raw_size)
|
|
|
|
/* No space for CIE/FDE header length. */
|
|
|
|
goto free_no_table;
|
|
|
|
|
|
|
|
hdr.length = bfd_get_32 (abfd, buf);
|
|
|
|
if (hdr.length == 0xffffffff)
|
|
|
|
/* 64-bit .eh_frame is not supported. */
|
|
|
|
goto free_no_table;
|
|
|
|
buf += 4;
|
2002-10-31 10:18:48 +01:00
|
|
|
if ((bfd_size_type) (buf - ehbuf) + hdr.length > sec->_raw_size)
|
2001-12-13 12:09:34 +01:00
|
|
|
/* CIE/FDE not contained fully in this .eh_frame input section. */
|
|
|
|
goto free_no_table;
|
|
|
|
|
|
|
|
sec_info->entry[sec_info->count].offset = last_fde - ehbuf;
|
|
|
|
sec_info->entry[sec_info->count].size = 4 + hdr.length;
|
|
|
|
|
|
|
|
if (hdr.length == 0)
|
|
|
|
{
|
|
|
|
/* CIE with length 0 must be only the last in the section. */
|
|
|
|
if ((bfd_size_type) (buf - ehbuf) < sec->_raw_size)
|
|
|
|
goto free_no_table;
|
|
|
|
ENSURE_NO_RELOCS (buf);
|
|
|
|
sec_info->count++;
|
|
|
|
/* Now just finish last encountered CIE processing and break
|
|
|
|
the loop. */
|
|
|
|
hdr.id = (unsigned int) -1;
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
hdr.id = bfd_get_32 (abfd, buf);
|
|
|
|
buf += 4;
|
|
|
|
if (hdr.id == (unsigned int) -1)
|
|
|
|
goto free_no_table;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
if (hdr.id == 0 || hdr.id == (unsigned int) -1)
|
|
|
|
{
|
|
|
|
unsigned int initial_insn_length;
|
|
|
|
|
|
|
|
/* CIE */
|
|
|
|
if (last_cie != NULL)
|
|
|
|
{
|
2002-11-26 12:54:02 +01:00
|
|
|
/* Now check if this CIE is identical to the last CIE,
|
|
|
|
in which case we can remove it provided we adjust
|
|
|
|
all FDEs. Also, it can be removed if we have removed
|
|
|
|
all FDEs using it. */
|
|
|
|
if ((!info->relocateable
|
|
|
|
&& cie_compare (&cie, &hdr_info->last_cie) == 0)
|
2001-12-13 12:09:34 +01:00
|
|
|
|| cie_usage_count == 0)
|
|
|
|
{
|
|
|
|
new_size -= cie.hdr.length + 4;
|
|
|
|
sec_info->entry[last_cie_ndx].removed = 1;
|
|
|
|
sec_info->entry[last_cie_ndx].sec = hdr_info->last_cie_sec;
|
|
|
|
sec_info->entry[last_cie_ndx].new_offset
|
|
|
|
= hdr_info->last_cie_offset;
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
hdr_info->last_cie = cie;
|
|
|
|
hdr_info->last_cie_sec = sec;
|
|
|
|
hdr_info->last_cie_offset = last_cie - ehbuf;
|
|
|
|
sec_info->entry[last_cie_ndx].make_relative
|
|
|
|
= cie.make_relative;
|
2001-12-18 12:49:52 +01:00
|
|
|
sec_info->entry[last_cie_ndx].make_lsda_relative
|
|
|
|
= cie.make_lsda_relative;
|
2002-04-22 14:06:01 +02:00
|
|
|
sec_info->entry[last_cie_ndx].per_encoding_relative
|
|
|
|
= (cie.per_encoding & 0x70) == DW_EH_PE_pcrel;
|
2001-12-13 12:09:34 +01:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
if (hdr.id == (unsigned int) -1)
|
|
|
|
break;
|
|
|
|
|
|
|
|
last_cie_ndx = sec_info->count;
|
|
|
|
sec_info->entry[sec_info->count].cie = 1;
|
|
|
|
|
|
|
|
cie_usage_count = 0;
|
|
|
|
memset (&cie, 0, sizeof (cie));
|
|
|
|
cie.hdr = hdr;
|
|
|
|
cie.version = *buf++;
|
|
|
|
|
|
|
|
/* Cannot handle unknown versions. */
|
|
|
|
if (cie.version != 1)
|
|
|
|
goto free_no_table;
|
|
|
|
if (strlen (buf) > sizeof (cie.augmentation) - 1)
|
|
|
|
goto free_no_table;
|
|
|
|
|
|
|
|
strcpy (cie.augmentation, buf);
|
|
|
|
buf = strchr (buf, '\0') + 1;
|
|
|
|
ENSURE_NO_RELOCS (buf);
|
|
|
|
if (buf[0] == 'e' && buf[1] == 'h')
|
|
|
|
{
|
|
|
|
/* GCC < 3.0 .eh_frame CIE */
|
|
|
|
/* We cannot merge "eh" CIEs because __EXCEPTION_TABLE__
|
|
|
|
is private to each CIE, so we don't need it for anything.
|
|
|
|
Just skip it. */
|
|
|
|
buf += ptr_size;
|
|
|
|
SKIP_RELOCS (buf);
|
|
|
|
}
|
|
|
|
read_uleb128 (cie.code_align, buf);
|
|
|
|
read_sleb128 (cie.data_align, buf);
|
2002-08-23 11:42:21 +02:00
|
|
|
/* Note - in DWARF2 the return address column is an unsigned byte.
|
|
|
|
In DWARF3 it is a ULEB128. We are following DWARF3. For most
|
|
|
|
ports this will not matter as the value will be less than 128.
|
|
|
|
For the others (eg FRV, SH, MMIX, IA64) they need a fixed GCC
|
|
|
|
which conforms to the DWARF3 standard. */
|
|
|
|
read_uleb128 (cie.ra_column, buf);
|
2001-12-13 12:09:34 +01:00
|
|
|
ENSURE_NO_RELOCS (buf);
|
|
|
|
cie.lsda_encoding = DW_EH_PE_omit;
|
|
|
|
cie.fde_encoding = DW_EH_PE_omit;
|
|
|
|
cie.per_encoding = DW_EH_PE_omit;
|
|
|
|
aug = cie.augmentation;
|
|
|
|
if (aug[0] != 'e' || aug[1] != 'h')
|
|
|
|
{
|
|
|
|
if (*aug == 'z')
|
|
|
|
{
|
|
|
|
aug++;
|
|
|
|
read_uleb128 (cie.augmentation_size, buf);
|
|
|
|
ENSURE_NO_RELOCS (buf);
|
|
|
|
}
|
|
|
|
|
|
|
|
while (*aug != '\0')
|
|
|
|
switch (*aug++)
|
|
|
|
{
|
|
|
|
case 'L':
|
|
|
|
cie.lsda_encoding = *buf++;
|
|
|
|
ENSURE_NO_RELOCS (buf);
|
|
|
|
if (get_DW_EH_PE_width (cie.lsda_encoding, ptr_size) == 0)
|
|
|
|
goto free_no_table;
|
|
|
|
break;
|
|
|
|
case 'R':
|
|
|
|
cie.fde_encoding = *buf++;
|
|
|
|
ENSURE_NO_RELOCS (buf);
|
|
|
|
if (get_DW_EH_PE_width (cie.fde_encoding, ptr_size) == 0)
|
|
|
|
goto free_no_table;
|
|
|
|
break;
|
|
|
|
case 'P':
|
|
|
|
{
|
|
|
|
int per_width;
|
|
|
|
|
|
|
|
cie.per_encoding = *buf++;
|
|
|
|
per_width = get_DW_EH_PE_width (cie.per_encoding,
|
|
|
|
ptr_size);
|
|
|
|
if (per_width == 0)
|
|
|
|
goto free_no_table;
|
|
|
|
if ((cie.per_encoding & 0xf0) == DW_EH_PE_aligned)
|
|
|
|
buf = (ehbuf
|
|
|
|
+ ((buf - ehbuf + per_width - 1)
|
|
|
|
& ~((bfd_size_type) per_width - 1)));
|
|
|
|
ENSURE_NO_RELOCS (buf);
|
|
|
|
/* Ensure we have a reloc here, against
|
|
|
|
a global symbol. */
|
2002-11-12 07:21:05 +01:00
|
|
|
if (GET_RELOC (buf) != NULL)
|
2001-12-13 12:09:34 +01:00
|
|
|
{
|
|
|
|
unsigned long r_symndx;
|
|
|
|
|
|
|
|
#ifdef BFD64
|
|
|
|
if (ptr_size == 8)
|
|
|
|
r_symndx = ELF64_R_SYM (cookie->rel->r_info);
|
|
|
|
else
|
|
|
|
#endif
|
|
|
|
r_symndx = ELF32_R_SYM (cookie->rel->r_info);
|
|
|
|
if (r_symndx >= cookie->locsymcount)
|
|
|
|
{
|
|
|
|
struct elf_link_hash_entry *h;
|
|
|
|
|
|
|
|
r_symndx -= cookie->extsymoff;
|
|
|
|
h = cookie->sym_hashes[r_symndx];
|
|
|
|
|
|
|
|
while (h->root.type == bfd_link_hash_indirect
|
|
|
|
|| h->root.type == bfd_link_hash_warning)
|
|
|
|
h = (struct elf_link_hash_entry *)
|
|
|
|
h->root.u.i.link;
|
|
|
|
|
|
|
|
cie.personality = h;
|
|
|
|
}
|
|
|
|
cookie->rel++;
|
|
|
|
}
|
|
|
|
buf += per_width;
|
|
|
|
}
|
|
|
|
break;
|
|
|
|
default:
|
|
|
|
/* Unrecognized augmentation. Better bail out. */
|
|
|
|
goto free_no_table;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
/* For shared libraries, try to get rid of as many RELATIVE relocs
|
2002-02-19 13:40:32 +01:00
|
|
|
as possible. */
|
|
|
|
if (info->shared
|
2001-12-13 12:09:34 +01:00
|
|
|
&& (cie.fde_encoding & 0xf0) == DW_EH_PE_absptr)
|
|
|
|
cie.make_relative = 1;
|
|
|
|
|
2002-02-19 13:40:32 +01:00
|
|
|
if (info->shared
|
2001-12-18 12:49:52 +01:00
|
|
|
&& (cie.lsda_encoding & 0xf0) == DW_EH_PE_absptr)
|
|
|
|
cie.make_lsda_relative = 1;
|
|
|
|
|
2001-12-13 12:09:34 +01:00
|
|
|
/* If FDE encoding was not specified, it defaults to
|
|
|
|
DW_EH_absptr. */
|
|
|
|
if (cie.fde_encoding == DW_EH_PE_omit)
|
|
|
|
cie.fde_encoding = DW_EH_PE_absptr;
|
|
|
|
|
|
|
|
initial_insn_length = cie.hdr.length - (buf - last_fde - 4);
|
|
|
|
if (initial_insn_length <= 50)
|
|
|
|
{
|
|
|
|
cie.initial_insn_length = initial_insn_length;
|
|
|
|
memcpy (cie.initial_instructions, buf, initial_insn_length);
|
|
|
|
}
|
|
|
|
buf += initial_insn_length;
|
|
|
|
ENSURE_NO_RELOCS (buf);
|
|
|
|
last_cie = last_fde;
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
/* Ensure this FDE uses the last CIE encountered. */
|
|
|
|
if (last_cie == NULL
|
|
|
|
|| hdr.id != (unsigned int) (buf - 4 - last_cie))
|
|
|
|
goto free_no_table;
|
|
|
|
|
|
|
|
ENSURE_NO_RELOCS (buf);
|
2002-11-12 07:21:05 +01:00
|
|
|
if (GET_RELOC (buf) == NULL)
|
2001-12-13 12:09:34 +01:00
|
|
|
/* This should not happen. */
|
|
|
|
goto free_no_table;
|
|
|
|
if ((*reloc_symbol_deleted_p) (buf - ehbuf, cookie))
|
|
|
|
{
|
2002-11-26 12:54:02 +01:00
|
|
|
/* This is a FDE against a discarded section. It should
|
2001-12-13 12:09:34 +01:00
|
|
|
be deleted. */
|
|
|
|
new_size -= hdr.length + 4;
|
|
|
|
sec_info->entry[sec_info->count].removed = 1;
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
2002-02-19 13:40:32 +01:00
|
|
|
if (info->shared
|
2002-04-22 23:37:48 +02:00
|
|
|
&& (((cie.fde_encoding & 0xf0) == DW_EH_PE_absptr
|
|
|
|
&& cie.make_relative == 0)
|
|
|
|
|| (cie.fde_encoding & 0xf0) == DW_EH_PE_aligned))
|
2002-02-19 13:40:32 +01:00
|
|
|
{
|
2002-11-26 12:54:02 +01:00
|
|
|
/* If a shared library uses absolute pointers
|
2002-02-19 13:40:32 +01:00
|
|
|
which we cannot turn into PC relative,
|
|
|
|
don't create the binary search table,
|
|
|
|
since it is affected by runtime relocations. */
|
2002-11-30 09:39:46 +01:00
|
|
|
hdr_info->table = FALSE;
|
2002-02-19 13:40:32 +01:00
|
|
|
}
|
2001-12-13 12:09:34 +01:00
|
|
|
cie_usage_count++;
|
|
|
|
hdr_info->fde_count++;
|
|
|
|
}
|
2001-12-18 12:49:52 +01:00
|
|
|
if (cie.lsda_encoding != DW_EH_PE_omit)
|
|
|
|
{
|
|
|
|
unsigned int dummy;
|
|
|
|
|
|
|
|
aug = buf;
|
|
|
|
buf += 2 * get_DW_EH_PE_width (cie.fde_encoding, ptr_size);
|
|
|
|
if (cie.augmentation[0] == 'z')
|
|
|
|
read_uleb128 (dummy, buf);
|
|
|
|
/* If some new augmentation data is added before LSDA
|
|
|
|
in FDE augmentation area, this need to be adjusted. */
|
|
|
|
sec_info->entry[sec_info->count].lsda_offset = (buf - aug);
|
|
|
|
}
|
2001-12-13 12:09:34 +01:00
|
|
|
buf = last_fde + 4 + hdr.length;
|
|
|
|
SKIP_RELOCS (buf);
|
|
|
|
}
|
|
|
|
|
|
|
|
sec_info->entry[sec_info->count].fde_encoding = cie.fde_encoding;
|
2001-12-18 12:49:52 +01:00
|
|
|
sec_info->entry[sec_info->count].lsda_encoding = cie.lsda_encoding;
|
2001-12-13 12:09:34 +01:00
|
|
|
sec_info->count++;
|
|
|
|
}
|
|
|
|
|
|
|
|
elf_section_data (sec)->sec_info = sec_info;
|
bfd
* elf-bfd.h (enum elf_link_info_type): Remove.
(struct bfd_elf_section_data): Move sec_info_type, use_rela_p fields
to struct sec. Remove linkonce_p field.
(elf_linkonce_p): Delete.
(elf_discarded_section): Update for sec_info_type change.
* section.c (struct sec): Add sec_info_type, use_rela_p, has_tls_reloc,
flag11, flag12, flag13, flag14, flag15, flag16, flag20, flag24.
(ELF_INFO_TYPE_NONE): Define.
(ELF_INFO_TYPE_STABS): Define.
(ELF_INFO_TYPE_MERGE): Define.
(ELF_INFO_TYPE_EH_FRAME): Define.
(ELF_INFO_TYPE_JUST_SYMS): Define.
(STD_SECTION): Update struct sec initializer.
* ecoff.c (bfd_debug_section): Likewise.
* elf.c: Likewise. Update occurrences of sec_info_type and use_rela_p.
* elflink.h: Likewise.
* elf-eh-frame.c: Likewise.
* elf64-alpha.c: Likewise.
* elfxx-ia64.c: Likewise.
* elfxx-mips.c: Likewise.
* bfd-in2.h: Regenerate.
* elf32-sparc.c (sec_do_relax): Use elf_section_data macro rather than
referring to used_by_bfd.
* elf64-sparc.c (sec_do_relax): Likewise.
* elf64-mmix.c (mmix_elf_section_data): Likewise.
* elfxx-mips.c (mips_elf_section_data): Likewise.
* ieee.c (ieee_slurp_section_data): Use ieee_per_section macro.
(ieee_get_section_contents): Likewise.
(ieee_new_section_hook): Formatting.
(ieee_canonicalize_reloc): Remove commented out code.
* mmo.c (mmo_section_data): Define. Use throughout file.
* oasys.c (oasys_get_section_contents): Use oasys_per_section macro.
gas
* config/obj-elf.c (obj_elf_change_section): Set SEC_LINK_ONCE and
SEC_LINK_DUPLICATES_DISCARD directly rather than using elf_linkonce_p.
2003-02-04 13:34:08 +01:00
|
|
|
sec->sec_info_type = ELF_INFO_TYPE_EH_FRAME;
|
2001-12-13 12:09:34 +01:00
|
|
|
|
|
|
|
/* Ok, now we can assign new offsets. */
|
|
|
|
offset = 0;
|
|
|
|
last_cie_ndx = 0;
|
|
|
|
for (i = 0; i < sec_info->count; i++)
|
|
|
|
{
|
|
|
|
if (! sec_info->entry[i].removed)
|
|
|
|
{
|
|
|
|
sec_info->entry[i].new_offset = offset;
|
|
|
|
offset += sec_info->entry[i].size;
|
|
|
|
if (sec_info->entry[i].cie)
|
|
|
|
{
|
|
|
|
last_cie_ndx = i;
|
|
|
|
make_relative = sec_info->entry[i].make_relative;
|
2001-12-18 12:49:52 +01:00
|
|
|
make_lsda_relative = sec_info->entry[i].make_lsda_relative;
|
2001-12-13 12:09:34 +01:00
|
|
|
}
|
|
|
|
else
|
2001-12-18 12:49:52 +01:00
|
|
|
{
|
|
|
|
sec_info->entry[i].make_relative = make_relative;
|
|
|
|
sec_info->entry[i].make_lsda_relative = make_lsda_relative;
|
2002-04-22 14:06:01 +02:00
|
|
|
sec_info->entry[i].per_encoding_relative = 0;
|
2001-12-18 12:49:52 +01:00
|
|
|
}
|
2001-12-13 12:09:34 +01:00
|
|
|
}
|
|
|
|
else if (sec_info->entry[i].cie && sec_info->entry[i].sec == sec)
|
|
|
|
{
|
|
|
|
/* Need to adjust new_offset too. */
|
|
|
|
BFD_ASSERT (sec_info->entry[last_cie_ndx].offset
|
|
|
|
== sec_info->entry[i].new_offset);
|
|
|
|
sec_info->entry[i].new_offset
|
|
|
|
= sec_info->entry[last_cie_ndx].new_offset;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
if (hdr_info->last_cie_sec == sec)
|
|
|
|
{
|
|
|
|
BFD_ASSERT (sec_info->entry[last_cie_ndx].offset
|
|
|
|
== hdr_info->last_cie_offset);
|
|
|
|
hdr_info->last_cie_offset = sec_info->entry[last_cie_ndx].new_offset;
|
|
|
|
}
|
|
|
|
|
2001-12-19 12:48:15 +01:00
|
|
|
/* FIXME: Currently it is not possible to shrink sections to zero size at
|
|
|
|
this point, so build a fake minimal CIE. */
|
|
|
|
if (new_size == 0)
|
|
|
|
new_size = 16;
|
|
|
|
|
2001-12-13 12:09:34 +01:00
|
|
|
/* Shrink the sec as needed. */
|
|
|
|
sec->_cooked_size = new_size;
|
|
|
|
if (sec->_cooked_size == 0)
|
|
|
|
sec->flags |= SEC_EXCLUDE;
|
|
|
|
|
2001-12-15 09:54:13 +01:00
|
|
|
free (ehbuf);
|
2001-12-13 12:09:34 +01:00
|
|
|
return new_size != sec->_raw_size;
|
|
|
|
|
|
|
|
free_no_table:
|
2001-12-15 09:54:13 +01:00
|
|
|
if (ehbuf)
|
|
|
|
free (ehbuf);
|
2001-12-13 12:09:34 +01:00
|
|
|
if (sec_info)
|
|
|
|
free (sec_info);
|
2002-11-30 09:39:46 +01:00
|
|
|
hdr_info->table = FALSE;
|
2001-12-13 12:09:34 +01:00
|
|
|
hdr_info->last_cie.hdr.length = 0;
|
2002-11-30 09:39:46 +01:00
|
|
|
return FALSE;
|
2001-12-13 12:09:34 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
/* 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. */
|
|
|
|
|
2002-11-30 09:39:46 +01:00
|
|
|
bfd_boolean
|
2002-11-12 08:35:26 +01:00
|
|
|
_bfd_elf_discard_section_eh_frame_hdr (abfd, info)
|
2001-12-13 12:09:34 +01:00
|
|
|
bfd *abfd;
|
|
|
|
struct bfd_link_info *info;
|
|
|
|
{
|
2002-11-12 08:35:26 +01:00
|
|
|
struct elf_link_hash_table *htab;
|
2001-12-13 12:09:34 +01:00
|
|
|
struct eh_frame_hdr_info *hdr_info;
|
2002-11-12 08:35:26 +01:00
|
|
|
asection *sec;
|
2001-12-13 12:09:34 +01:00
|
|
|
|
2002-11-12 08:35:26 +01:00
|
|
|
htab = elf_hash_table (info);
|
|
|
|
hdr_info = &htab->eh_info;
|
|
|
|
sec = hdr_info->hdr_sec;
|
|
|
|
if (sec == NULL)
|
2002-11-30 09:39:46 +01:00
|
|
|
return FALSE;
|
2002-11-12 08:35:26 +01:00
|
|
|
|
2001-12-13 12:09:34 +01:00
|
|
|
sec->_cooked_size = EH_FRAME_HDR_SIZE;
|
|
|
|
if (hdr_info->table)
|
|
|
|
sec->_cooked_size += 4 + hdr_info->fde_count * 8;
|
|
|
|
|
|
|
|
/* Request program headers to be recalculated. */
|
|
|
|
elf_tdata (abfd)->program_header_size = 0;
|
2002-11-12 08:35:26 +01:00
|
|
|
elf_tdata (abfd)->eh_frame_hdr = sec;
|
2002-11-30 09:39:46 +01:00
|
|
|
return TRUE;
|
2001-12-13 12:09:34 +01:00
|
|
|
}
|
|
|
|
|
2001-12-15 09:54:13 +01:00
|
|
|
/* This function is called from size_dynamic_sections.
|
|
|
|
It needs to decide whether .eh_frame_hdr should be output or not,
|
|
|
|
because later on it is too late for calling _bfd_strip_section_from_output,
|
|
|
|
since dynamic symbol table has been sized. */
|
|
|
|
|
2002-11-30 09:39:46 +01:00
|
|
|
bfd_boolean
|
2001-12-15 09:54:13 +01:00
|
|
|
_bfd_elf_maybe_strip_eh_frame_hdr (info)
|
|
|
|
struct bfd_link_info *info;
|
|
|
|
{
|
2002-11-12 08:35:26 +01:00
|
|
|
asection *o;
|
2001-12-15 09:54:13 +01:00
|
|
|
bfd *abfd;
|
2002-11-12 08:35:26 +01:00
|
|
|
struct elf_link_hash_table *htab;
|
2001-12-15 09:54:13 +01:00
|
|
|
struct eh_frame_hdr_info *hdr_info;
|
|
|
|
|
2002-11-12 08:35:26 +01:00
|
|
|
htab = elf_hash_table (info);
|
|
|
|
hdr_info = &htab->eh_info;
|
|
|
|
if (hdr_info->hdr_sec == NULL)
|
2002-11-30 09:39:46 +01:00
|
|
|
return TRUE;
|
2001-12-15 09:54:13 +01:00
|
|
|
|
2002-11-12 08:35:26 +01:00
|
|
|
if (bfd_is_abs_section (hdr_info->hdr_sec->output_section))
|
|
|
|
{
|
|
|
|
hdr_info->hdr_sec = NULL;
|
2002-11-30 09:39:46 +01:00
|
|
|
return TRUE;
|
2002-11-12 08:35:26 +01:00
|
|
|
}
|
2001-12-15 09:54:13 +01:00
|
|
|
|
|
|
|
abfd = NULL;
|
|
|
|
if (info->eh_frame_hdr)
|
|
|
|
for (abfd = info->input_bfds; abfd != NULL; abfd = abfd->link_next)
|
|
|
|
{
|
|
|
|
/* Count only sections which have at least a single CIE or FDE.
|
|
|
|
There cannot be any CIE or FDE <= 8 bytes. */
|
|
|
|
o = bfd_get_section_by_name (abfd, ".eh_frame");
|
2002-05-15 02:18:58 +02:00
|
|
|
if (o && o->_raw_size > 8 && !bfd_is_abs_section (o->output_section))
|
2001-12-15 09:54:13 +01:00
|
|
|
break;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (abfd == NULL)
|
|
|
|
{
|
2002-11-12 08:35:26 +01:00
|
|
|
_bfd_strip_section_from_output (info, hdr_info->hdr_sec);
|
|
|
|
hdr_info->hdr_sec = NULL;
|
2002-11-30 09:39:46 +01:00
|
|
|
return TRUE;
|
2001-12-15 09:54:13 +01:00
|
|
|
}
|
2002-11-12 08:35:26 +01:00
|
|
|
|
2002-11-30 09:39:46 +01:00
|
|
|
hdr_info->table = TRUE;
|
|
|
|
return TRUE;
|
2001-12-15 09:54:13 +01:00
|
|
|
}
|
|
|
|
|
2001-12-13 12:09:34 +01:00
|
|
|
/* Adjust an address in the .eh_frame section. Given OFFSET within
|
|
|
|
SEC, this returns the new offset in the adjusted .eh_frame section,
|
|
|
|
or -1 if the address refers to a CIE/FDE which has been removed
|
|
|
|
or to offset with dynamic relocation which is no longer needed. */
|
|
|
|
|
|
|
|
bfd_vma
|
|
|
|
_bfd_elf_eh_frame_section_offset (output_bfd, sec, offset)
|
|
|
|
bfd *output_bfd ATTRIBUTE_UNUSED;
|
|
|
|
asection *sec;
|
|
|
|
bfd_vma offset;
|
|
|
|
{
|
|
|
|
struct eh_frame_sec_info *sec_info;
|
|
|
|
unsigned int lo, hi, mid;
|
|
|
|
|
bfd
* elf-bfd.h (enum elf_link_info_type): Remove.
(struct bfd_elf_section_data): Move sec_info_type, use_rela_p fields
to struct sec. Remove linkonce_p field.
(elf_linkonce_p): Delete.
(elf_discarded_section): Update for sec_info_type change.
* section.c (struct sec): Add sec_info_type, use_rela_p, has_tls_reloc,
flag11, flag12, flag13, flag14, flag15, flag16, flag20, flag24.
(ELF_INFO_TYPE_NONE): Define.
(ELF_INFO_TYPE_STABS): Define.
(ELF_INFO_TYPE_MERGE): Define.
(ELF_INFO_TYPE_EH_FRAME): Define.
(ELF_INFO_TYPE_JUST_SYMS): Define.
(STD_SECTION): Update struct sec initializer.
* ecoff.c (bfd_debug_section): Likewise.
* elf.c: Likewise. Update occurrences of sec_info_type and use_rela_p.
* elflink.h: Likewise.
* elf-eh-frame.c: Likewise.
* elf64-alpha.c: Likewise.
* elfxx-ia64.c: Likewise.
* elfxx-mips.c: Likewise.
* bfd-in2.h: Regenerate.
* elf32-sparc.c (sec_do_relax): Use elf_section_data macro rather than
referring to used_by_bfd.
* elf64-sparc.c (sec_do_relax): Likewise.
* elf64-mmix.c (mmix_elf_section_data): Likewise.
* elfxx-mips.c (mips_elf_section_data): Likewise.
* ieee.c (ieee_slurp_section_data): Use ieee_per_section macro.
(ieee_get_section_contents): Likewise.
(ieee_new_section_hook): Formatting.
(ieee_canonicalize_reloc): Remove commented out code.
* mmo.c (mmo_section_data): Define. Use throughout file.
* oasys.c (oasys_get_section_contents): Use oasys_per_section macro.
gas
* config/obj-elf.c (obj_elf_change_section): Set SEC_LINK_ONCE and
SEC_LINK_DUPLICATES_DISCARD directly rather than using elf_linkonce_p.
2003-02-04 13:34:08 +01:00
|
|
|
if (sec->sec_info_type != ELF_INFO_TYPE_EH_FRAME)
|
2001-12-13 12:09:34 +01:00
|
|
|
return offset;
|
|
|
|
sec_info = (struct eh_frame_sec_info *)
|
|
|
|
elf_section_data (sec)->sec_info;
|
|
|
|
|
|
|
|
if (offset >= sec->_raw_size)
|
|
|
|
return offset - (sec->_cooked_size - sec->_raw_size);
|
|
|
|
|
|
|
|
lo = 0;
|
|
|
|
hi = sec_info->count;
|
|
|
|
mid = 0;
|
|
|
|
while (lo < hi)
|
|
|
|
{
|
|
|
|
mid = (lo + hi) / 2;
|
|
|
|
if (offset < sec_info->entry[mid].offset)
|
|
|
|
hi = mid;
|
|
|
|
else if (offset
|
|
|
|
>= sec_info->entry[mid].offset + sec_info->entry[mid].size)
|
|
|
|
lo = mid + 1;
|
|
|
|
else
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
|
|
|
|
BFD_ASSERT (lo < hi);
|
|
|
|
|
|
|
|
/* FDE or CIE was removed. */
|
|
|
|
if (sec_info->entry[mid].removed)
|
|
|
|
return (bfd_vma) -1;
|
|
|
|
|
|
|
|
/* If converting to DW_EH_PE_pcrel, there will be no need for run-time
|
|
|
|
relocation against FDE's initial_location field. */
|
|
|
|
if (sec_info->entry[mid].make_relative
|
|
|
|
&& ! sec_info->entry[mid].cie
|
|
|
|
&& offset == sec_info->entry[mid].offset + 8)
|
2002-02-19 13:40:32 +01:00
|
|
|
return (bfd_vma) -2;
|
2001-12-13 12:09:34 +01:00
|
|
|
|
2001-12-18 12:49:52 +01:00
|
|
|
/* If converting LSDA pointers to DW_EH_PE_pcrel, there will be no need
|
|
|
|
for run-time relocation against LSDA field. */
|
|
|
|
if (sec_info->entry[mid].make_lsda_relative
|
|
|
|
&& ! sec_info->entry[mid].cie
|
2002-11-12 08:35:26 +01:00
|
|
|
&& (offset == (sec_info->entry[mid].offset + 8
|
|
|
|
+ sec_info->entry[mid].lsda_offset)))
|
2002-02-19 13:40:32 +01:00
|
|
|
return (bfd_vma) -2;
|
2001-12-18 12:49:52 +01:00
|
|
|
|
2002-01-25 07:24:34 +01:00
|
|
|
return (offset + sec_info->entry[mid].new_offset
|
|
|
|
- sec_info->entry[mid].offset);
|
2001-12-13 12:09:34 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
/* Write out .eh_frame section. This is called with the relocated
|
|
|
|
contents. */
|
|
|
|
|
2002-11-30 09:39:46 +01:00
|
|
|
bfd_boolean
|
2002-11-12 08:35:26 +01:00
|
|
|
_bfd_elf_write_section_eh_frame (abfd, info, sec, contents)
|
2001-12-13 12:09:34 +01:00
|
|
|
bfd *abfd;
|
2002-11-12 08:35:26 +01:00
|
|
|
struct bfd_link_info *info;
|
|
|
|
asection *sec;
|
2001-12-13 12:09:34 +01:00
|
|
|
bfd_byte *contents;
|
|
|
|
{
|
|
|
|
struct eh_frame_sec_info *sec_info;
|
2002-11-12 08:35:26 +01:00
|
|
|
struct elf_link_hash_table *htab;
|
2001-12-13 12:09:34 +01:00
|
|
|
struct eh_frame_hdr_info *hdr_info;
|
|
|
|
unsigned int i;
|
|
|
|
bfd_byte *p, *buf;
|
|
|
|
unsigned int leb128_tmp;
|
|
|
|
unsigned int cie_offset = 0;
|
|
|
|
unsigned int ptr_size;
|
|
|
|
|
|
|
|
ptr_size = (elf_elfheader (sec->owner)->e_ident[EI_CLASS]
|
|
|
|
== ELFCLASS64) ? 8 : 4;
|
|
|
|
|
bfd
* elf-bfd.h (enum elf_link_info_type): Remove.
(struct bfd_elf_section_data): Move sec_info_type, use_rela_p fields
to struct sec. Remove linkonce_p field.
(elf_linkonce_p): Delete.
(elf_discarded_section): Update for sec_info_type change.
* section.c (struct sec): Add sec_info_type, use_rela_p, has_tls_reloc,
flag11, flag12, flag13, flag14, flag15, flag16, flag20, flag24.
(ELF_INFO_TYPE_NONE): Define.
(ELF_INFO_TYPE_STABS): Define.
(ELF_INFO_TYPE_MERGE): Define.
(ELF_INFO_TYPE_EH_FRAME): Define.
(ELF_INFO_TYPE_JUST_SYMS): Define.
(STD_SECTION): Update struct sec initializer.
* ecoff.c (bfd_debug_section): Likewise.
* elf.c: Likewise. Update occurrences of sec_info_type and use_rela_p.
* elflink.h: Likewise.
* elf-eh-frame.c: Likewise.
* elf64-alpha.c: Likewise.
* elfxx-ia64.c: Likewise.
* elfxx-mips.c: Likewise.
* bfd-in2.h: Regenerate.
* elf32-sparc.c (sec_do_relax): Use elf_section_data macro rather than
referring to used_by_bfd.
* elf64-sparc.c (sec_do_relax): Likewise.
* elf64-mmix.c (mmix_elf_section_data): Likewise.
* elfxx-mips.c (mips_elf_section_data): Likewise.
* ieee.c (ieee_slurp_section_data): Use ieee_per_section macro.
(ieee_get_section_contents): Likewise.
(ieee_new_section_hook): Formatting.
(ieee_canonicalize_reloc): Remove commented out code.
* mmo.c (mmo_section_data): Define. Use throughout file.
* oasys.c (oasys_get_section_contents): Use oasys_per_section macro.
gas
* config/obj-elf.c (obj_elf_change_section): Set SEC_LINK_ONCE and
SEC_LINK_DUPLICATES_DISCARD directly rather than using elf_linkonce_p.
2003-02-04 13:34:08 +01:00
|
|
|
if (sec->sec_info_type != ELF_INFO_TYPE_EH_FRAME)
|
2001-12-13 12:09:34 +01:00
|
|
|
return bfd_set_section_contents (abfd, sec->output_section,
|
|
|
|
contents,
|
|
|
|
(file_ptr) sec->output_offset,
|
|
|
|
sec->_raw_size);
|
|
|
|
sec_info = (struct eh_frame_sec_info *)
|
|
|
|
elf_section_data (sec)->sec_info;
|
2002-11-12 08:35:26 +01:00
|
|
|
htab = elf_hash_table (info);
|
|
|
|
hdr_info = &htab->eh_info;
|
|
|
|
if (hdr_info->table && hdr_info->array == NULL)
|
|
|
|
hdr_info->array
|
|
|
|
= bfd_malloc (hdr_info->fde_count * sizeof(*hdr_info->array));
|
|
|
|
if (hdr_info->array == NULL)
|
|
|
|
hdr_info = NULL;
|
2001-12-13 12:09:34 +01:00
|
|
|
|
|
|
|
p = contents;
|
|
|
|
for (i = 0; i < sec_info->count; ++i)
|
|
|
|
{
|
|
|
|
if (sec_info->entry[i].removed)
|
|
|
|
{
|
|
|
|
if (sec_info->entry[i].cie)
|
|
|
|
{
|
2002-01-04 18:02:30 +01:00
|
|
|
/* If CIE is removed due to no remaining FDEs referencing it
|
|
|
|
and there were no CIEs kept before it, sec_info->entry[i].sec
|
|
|
|
will be zero. */
|
|
|
|
if (sec_info->entry[i].sec == NULL)
|
|
|
|
cie_offset = 0;
|
|
|
|
else
|
|
|
|
{
|
|
|
|
cie_offset = sec_info->entry[i].new_offset;
|
|
|
|
cie_offset += (sec_info->entry[i].sec->output_section->vma
|
|
|
|
+ sec_info->entry[i].sec->output_offset
|
|
|
|
- sec->output_section->vma
|
|
|
|
- sec->output_offset);
|
|
|
|
}
|
2001-12-13 12:09:34 +01:00
|
|
|
}
|
|
|
|
continue;
|
|
|
|
}
|
2002-01-04 18:02:30 +01:00
|
|
|
|
2001-12-13 12:09:34 +01:00
|
|
|
if (sec_info->entry[i].cie)
|
|
|
|
{
|
|
|
|
/* CIE */
|
|
|
|
cie_offset = sec_info->entry[i].new_offset;
|
2001-12-18 12:49:52 +01:00
|
|
|
if (sec_info->entry[i].make_relative
|
2002-04-22 14:06:01 +02:00
|
|
|
|| sec_info->entry[i].make_lsda_relative
|
|
|
|
|| sec_info->entry[i].per_encoding_relative)
|
2001-12-13 12:09:34 +01:00
|
|
|
{
|
|
|
|
unsigned char *aug;
|
2001-12-18 12:49:52 +01:00
|
|
|
unsigned int action;
|
2001-12-13 12:09:34 +01:00
|
|
|
unsigned int dummy, per_width, per_encoding;
|
|
|
|
|
2001-12-18 12:49:52 +01:00
|
|
|
/* Need to find 'R' or 'L' augmentation's argument and modify
|
2001-12-13 12:09:34 +01:00
|
|
|
DW_EH_PE_* value. */
|
2001-12-18 12:49:52 +01:00
|
|
|
action = (sec_info->entry[i].make_relative ? 1 : 0)
|
2002-04-22 14:06:01 +02:00
|
|
|
| (sec_info->entry[i].make_lsda_relative ? 2 : 0)
|
|
|
|
| (sec_info->entry[i].per_encoding_relative ? 4 : 0);
|
2001-12-13 12:09:34 +01:00
|
|
|
buf = contents + sec_info->entry[i].offset;
|
|
|
|
/* Skip length, id and version. */
|
|
|
|
buf += 9;
|
|
|
|
aug = buf;
|
|
|
|
buf = strchr (buf, '\0') + 1;
|
|
|
|
read_uleb128 (dummy, buf);
|
|
|
|
read_sleb128 (dummy, buf);
|
|
|
|
read_uleb128 (dummy, buf);
|
|
|
|
if (*aug == 'z')
|
|
|
|
{
|
|
|
|
read_uleb128 (dummy, buf);
|
|
|
|
aug++;
|
|
|
|
}
|
|
|
|
|
2001-12-18 12:49:52 +01:00
|
|
|
while (action)
|
2001-12-13 12:09:34 +01:00
|
|
|
switch (*aug++)
|
|
|
|
{
|
|
|
|
case 'L':
|
2001-12-18 12:49:52 +01:00
|
|
|
if (action & 2)
|
|
|
|
{
|
|
|
|
BFD_ASSERT (*buf == sec_info->entry[i].lsda_encoding);
|
|
|
|
*buf |= DW_EH_PE_pcrel;
|
|
|
|
action &= ~2;
|
|
|
|
}
|
2001-12-13 12:09:34 +01:00
|
|
|
buf++;
|
|
|
|
break;
|
|
|
|
case 'P':
|
|
|
|
per_encoding = *buf++;
|
|
|
|
per_width = get_DW_EH_PE_width (per_encoding,
|
|
|
|
ptr_size);
|
|
|
|
BFD_ASSERT (per_width != 0);
|
2002-04-22 14:06:01 +02:00
|
|
|
BFD_ASSERT (((per_encoding & 0x70) == DW_EH_PE_pcrel)
|
|
|
|
== sec_info->entry[i].per_encoding_relative);
|
2001-12-13 12:09:34 +01:00
|
|
|
if ((per_encoding & 0xf0) == DW_EH_PE_aligned)
|
|
|
|
buf = (contents
|
|
|
|
+ ((buf - contents + per_width - 1)
|
|
|
|
& ~((bfd_size_type) per_width - 1)));
|
2002-04-22 14:06:01 +02:00
|
|
|
if (action & 4)
|
|
|
|
{
|
|
|
|
bfd_vma value;
|
|
|
|
|
2003-02-07 00:01:04 +01:00
|
|
|
value = read_value (abfd, buf, per_width,
|
|
|
|
get_DW_EH_PE_signed
|
|
|
|
(per_encoding));
|
2002-04-22 14:06:01 +02:00
|
|
|
value += (sec_info->entry[i].offset
|
|
|
|
- sec_info->entry[i].new_offset);
|
|
|
|
write_value (abfd, buf, value, per_width);
|
|
|
|
action &= ~4;
|
|
|
|
}
|
2001-12-13 12:09:34 +01:00
|
|
|
buf += per_width;
|
|
|
|
break;
|
2001-12-18 12:49:52 +01:00
|
|
|
case 'R':
|
|
|
|
if (action & 1)
|
|
|
|
{
|
|
|
|
BFD_ASSERT (*buf == sec_info->entry[i].fde_encoding);
|
|
|
|
*buf |= DW_EH_PE_pcrel;
|
|
|
|
action &= ~1;
|
|
|
|
}
|
|
|
|
buf++;
|
|
|
|
break;
|
2001-12-13 12:09:34 +01:00
|
|
|
default:
|
|
|
|
BFD_FAIL ();
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
2002-04-22 23:37:48 +02:00
|
|
|
else if (sec_info->entry[i].size > 4)
|
2001-12-13 12:09:34 +01:00
|
|
|
{
|
|
|
|
/* FDE */
|
|
|
|
bfd_vma value = 0, address;
|
2001-12-18 12:49:52 +01:00
|
|
|
unsigned int width;
|
2001-12-13 12:09:34 +01:00
|
|
|
|
|
|
|
buf = contents + sec_info->entry[i].offset;
|
2002-11-30 09:39:46 +01:00
|
|
|
/* Skip length. */
|
2001-12-13 12:09:34 +01:00
|
|
|
buf += 4;
|
|
|
|
bfd_put_32 (abfd,
|
|
|
|
sec_info->entry[i].new_offset + 4 - cie_offset, buf);
|
|
|
|
buf += 4;
|
2001-12-18 12:49:52 +01:00
|
|
|
width = get_DW_EH_PE_width (sec_info->entry[i].fde_encoding,
|
|
|
|
ptr_size);
|
2003-02-07 00:01:04 +01:00
|
|
|
address = value = read_value (abfd, buf, width,
|
|
|
|
get_DW_EH_PE_signed
|
|
|
|
(sec_info->entry[i].fde_encoding));
|
2001-12-18 12:49:52 +01:00
|
|
|
if (value)
|
2001-12-13 12:09:34 +01:00
|
|
|
{
|
2001-12-18 12:49:52 +01:00
|
|
|
switch (sec_info->entry[i].fde_encoding & 0xf0)
|
|
|
|
{
|
|
|
|
case DW_EH_PE_indirect:
|
|
|
|
case DW_EH_PE_textrel:
|
|
|
|
BFD_ASSERT (hdr_info == NULL);
|
|
|
|
break;
|
|
|
|
case DW_EH_PE_datarel:
|
|
|
|
{
|
|
|
|
asection *got = bfd_get_section_by_name (abfd, ".got");
|
|
|
|
|
|
|
|
BFD_ASSERT (got != NULL);
|
|
|
|
address += got->vma;
|
|
|
|
}
|
|
|
|
break;
|
|
|
|
case DW_EH_PE_pcrel:
|
|
|
|
value += (sec_info->entry[i].offset
|
|
|
|
- sec_info->entry[i].new_offset);
|
|
|
|
address += (sec->output_section->vma + sec->output_offset
|
|
|
|
+ sec_info->entry[i].offset + 8);
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
if (sec_info->entry[i].make_relative)
|
|
|
|
value -= (sec->output_section->vma + sec->output_offset
|
2001-12-13 12:09:34 +01:00
|
|
|
+ sec_info->entry[i].new_offset + 8);
|
2001-12-18 12:49:52 +01:00
|
|
|
write_value (abfd, buf, value, width);
|
2001-12-13 12:09:34 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
if (hdr_info)
|
|
|
|
{
|
|
|
|
hdr_info->array[hdr_info->array_count].initial_loc = address;
|
|
|
|
hdr_info->array[hdr_info->array_count++].fde
|
|
|
|
= (sec->output_section->vma + sec->output_offset
|
|
|
|
+ sec_info->entry[i].new_offset);
|
|
|
|
}
|
2001-12-18 12:49:52 +01:00
|
|
|
|
|
|
|
if ((sec_info->entry[i].lsda_encoding & 0xf0) == DW_EH_PE_pcrel
|
|
|
|
|| sec_info->entry[i].make_lsda_relative)
|
|
|
|
{
|
|
|
|
buf += sec_info->entry[i].lsda_offset;
|
|
|
|
width = get_DW_EH_PE_width (sec_info->entry[i].lsda_encoding,
|
|
|
|
ptr_size);
|
2003-02-07 00:01:04 +01:00
|
|
|
value = read_value (abfd, buf, width,
|
|
|
|
get_DW_EH_PE_signed
|
|
|
|
(sec_info->entry[i].lsda_encoding));
|
2001-12-18 12:49:52 +01:00
|
|
|
if (value)
|
|
|
|
{
|
|
|
|
if ((sec_info->entry[i].lsda_encoding & 0xf0)
|
|
|
|
== DW_EH_PE_pcrel)
|
|
|
|
value += (sec_info->entry[i].offset
|
|
|
|
- sec_info->entry[i].new_offset);
|
|
|
|
else if (sec_info->entry[i].make_lsda_relative)
|
|
|
|
value -= (sec->output_section->vma + sec->output_offset
|
|
|
|
+ sec_info->entry[i].new_offset + 8
|
|
|
|
+ sec_info->entry[i].lsda_offset);
|
|
|
|
write_value (abfd, buf, value, width);
|
|
|
|
}
|
|
|
|
}
|
2001-12-13 12:09:34 +01:00
|
|
|
}
|
2002-04-22 23:37:48 +02:00
|
|
|
else
|
|
|
|
/* Terminating FDE must be at the end of .eh_frame section only. */
|
|
|
|
BFD_ASSERT (i == sec_info->count - 1);
|
2001-12-13 12:09:34 +01:00
|
|
|
|
|
|
|
BFD_ASSERT (p == contents + sec_info->entry[i].new_offset);
|
|
|
|
memmove (p, contents + sec_info->entry[i].offset,
|
|
|
|
sec_info->entry[i].size);
|
|
|
|
p += sec_info->entry[i].size;
|
|
|
|
}
|
|
|
|
|
2001-12-19 12:48:15 +01:00
|
|
|
/* FIXME: Once _bfd_elf_discard_section_eh_frame will be able to
|
|
|
|
shrink sections to zero size, this won't be needed any more. */
|
|
|
|
if (p == contents && sec->_cooked_size == 16)
|
|
|
|
{
|
|
|
|
bfd_put_32 (abfd, 12, p); /* Fake CIE length */
|
|
|
|
bfd_put_32 (abfd, 0, p + 4); /* Fake CIE id */
|
|
|
|
p[8] = 1; /* Fake CIE version */
|
|
|
|
memset (p + 9, 0, 7); /* Fake CIE augmentation, 3xleb128
|
|
|
|
and 3xDW_CFA_nop as pad */
|
|
|
|
p += 16;
|
|
|
|
}
|
|
|
|
|
2001-12-13 12:09:34 +01:00
|
|
|
BFD_ASSERT ((bfd_size_type) (p - contents) == sec->_cooked_size);
|
|
|
|
|
|
|
|
return bfd_set_section_contents (abfd, sec->output_section,
|
|
|
|
contents, (file_ptr) sec->output_offset,
|
|
|
|
sec->_cooked_size);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Helper function used to sort .eh_frame_hdr search table by increasing
|
|
|
|
VMA of FDE initial location. */
|
|
|
|
|
|
|
|
static int
|
|
|
|
vma_compare (a, b)
|
|
|
|
const PTR a;
|
|
|
|
const PTR b;
|
|
|
|
{
|
|
|
|
struct eh_frame_array_ent *p = (struct eh_frame_array_ent *) a;
|
|
|
|
struct eh_frame_array_ent *q = (struct eh_frame_array_ent *) b;
|
|
|
|
if (p->initial_loc > q->initial_loc)
|
|
|
|
return 1;
|
|
|
|
if (p->initial_loc < q->initial_loc)
|
|
|
|
return -1;
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Write out .eh_frame_hdr section. This must be called after
|
|
|
|
_bfd_elf_write_section_eh_frame has been called on all input
|
|
|
|
.eh_frame sections.
|
|
|
|
.eh_frame_hdr format:
|
|
|
|
ubyte version (currently 1)
|
|
|
|
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
|
|
|
|
binary search table computed))
|
|
|
|
ubyte table_enc (DW_EH_PE_* encoding of binary search table,
|
|
|
|
or DW_EH_PE_omit if not present.
|
|
|
|
DW_EH_PE_datarel is using address of
|
|
|
|
.eh_frame_hdr section start as base)
|
|
|
|
[encoded] eh_frame_ptr (pointer to start of .eh_frame section)
|
|
|
|
optionally followed by:
|
|
|
|
[encoded] fde_count (total number of FDEs in .eh_frame section)
|
|
|
|
fde_count x [encoded] initial_loc, fde
|
|
|
|
(array of encoded pairs containing
|
|
|
|
FDE initial_location field and FDE address,
|
|
|
|
sorted by increasing initial_loc) */
|
|
|
|
|
2002-11-30 09:39:46 +01:00
|
|
|
bfd_boolean
|
2002-11-12 08:35:26 +01:00
|
|
|
_bfd_elf_write_section_eh_frame_hdr (abfd, info)
|
2001-12-13 12:09:34 +01:00
|
|
|
bfd *abfd;
|
2002-11-12 08:35:26 +01:00
|
|
|
struct bfd_link_info *info;
|
2001-12-13 12:09:34 +01:00
|
|
|
{
|
2002-11-12 08:35:26 +01:00
|
|
|
struct elf_link_hash_table *htab;
|
2001-12-13 12:09:34 +01:00
|
|
|
struct eh_frame_hdr_info *hdr_info;
|
2002-11-12 08:35:26 +01:00
|
|
|
asection *sec;
|
2001-12-13 12:09:34 +01:00
|
|
|
bfd_byte *contents;
|
|
|
|
asection *eh_frame_sec;
|
|
|
|
bfd_size_type size;
|
|
|
|
|
2002-11-12 08:35:26 +01:00
|
|
|
htab = elf_hash_table (info);
|
|
|
|
hdr_info = &htab->eh_info;
|
|
|
|
sec = hdr_info->hdr_sec;
|
|
|
|
if (sec == NULL)
|
2002-11-30 09:39:46 +01:00
|
|
|
return TRUE;
|
2001-12-31 12:49:10 +01:00
|
|
|
|
2001-12-13 12:09:34 +01:00
|
|
|
size = EH_FRAME_HDR_SIZE;
|
|
|
|
if (hdr_info->array && hdr_info->array_count == hdr_info->fde_count)
|
|
|
|
size += 4 + hdr_info->fde_count * 8;
|
|
|
|
contents = bfd_malloc (size);
|
|
|
|
if (contents == NULL)
|
2002-11-30 09:39:46 +01:00
|
|
|
return FALSE;
|
2001-12-13 12:09:34 +01:00
|
|
|
|
|
|
|
eh_frame_sec = bfd_get_section_by_name (abfd, ".eh_frame");
|
|
|
|
if (eh_frame_sec == NULL)
|
2002-11-30 09:39:46 +01:00
|
|
|
return FALSE;
|
2001-12-13 12:09:34 +01:00
|
|
|
|
|
|
|
memset (contents, 0, EH_FRAME_HDR_SIZE);
|
|
|
|
contents[0] = 1; /* Version */
|
|
|
|
contents[1] = DW_EH_PE_pcrel | DW_EH_PE_sdata4; /* .eh_frame offset */
|
|
|
|
if (hdr_info->array && hdr_info->array_count == hdr_info->fde_count)
|
|
|
|
{
|
|
|
|
contents[2] = DW_EH_PE_udata4; /* FDE count encoding */
|
|
|
|
contents[3] = DW_EH_PE_datarel | DW_EH_PE_sdata4; /* search table enc */
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
contents[2] = DW_EH_PE_omit;
|
|
|
|
contents[3] = DW_EH_PE_omit;
|
|
|
|
}
|
|
|
|
bfd_put_32 (abfd, eh_frame_sec->vma - sec->output_section->vma - 4,
|
|
|
|
contents + 4);
|
|
|
|
if (contents[2] != DW_EH_PE_omit)
|
|
|
|
{
|
|
|
|
unsigned int i;
|
|
|
|
|
|
|
|
bfd_put_32 (abfd, hdr_info->fde_count, contents + EH_FRAME_HDR_SIZE);
|
|
|
|
qsort (hdr_info->array, hdr_info->fde_count, sizeof (*hdr_info->array),
|
|
|
|
vma_compare);
|
|
|
|
for (i = 0; i < hdr_info->fde_count; i++)
|
|
|
|
{
|
|
|
|
bfd_put_32 (abfd,
|
|
|
|
hdr_info->array[i].initial_loc
|
|
|
|
- sec->output_section->vma,
|
|
|
|
contents + EH_FRAME_HDR_SIZE + i * 8 + 4);
|
|
|
|
bfd_put_32 (abfd,
|
|
|
|
hdr_info->array[i].fde - sec->output_section->vma,
|
|
|
|
contents + EH_FRAME_HDR_SIZE + i * 8 + 8);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
return bfd_set_section_contents (abfd, sec->output_section,
|
|
|
|
contents, (file_ptr) sec->output_offset,
|
|
|
|
sec->_cooked_size);
|
|
|
|
}
|