/* dw2gencfi.c - Support for generating Dwarf2 CFI information.
- Copyright (C) 2003-2017 Free Software Foundation, Inc.
+ Copyright (C) 2003-2018 Free Software Foundation, Inc.
Contributed by Michal Ludvig <mludvig@suse.cz>
This file is part of GAS, the GNU Assembler.
output_leb128 (frag_more (sizeof_leb128 (value, 1)), value, 1);
}
-static offsetT
+static unsigned int
encoding_size (unsigned char encoding)
{
if (encoding == DW_EH_PE_omit)
static void
emit_expr_encoded (expressionS *exp, int encoding, bfd_boolean emit_encoding)
{
- offsetT size = encoding_size (encoding);
+ unsigned int size = encoding_size (encoding);
bfd_reloc_code_real_type code;
if (encoding == DW_EH_PE_omit)
{
reloc_howto_type *howto = bfd_reloc_type_lookup (stdoutput, code);
char *p = frag_more (size);
+ gas_assert (size == howto->bitsize / 8);
md_number_to_chars (p, 0, size);
fix_new (frag_now, p - frag_now->fr_literal, size, exp->X_add_symbol,
exp->X_add_number, howto->pc_relative, code);
/* If the last address was not at the current PC, advance to current. */
if (symbol_get_frag (frchain_now->frch_cfi_data->last_address) != frag_now
- || S_GET_VALUE (frchain_now->frch_cfi_data->last_address)
- != frag_now_fix ())
+ || (S_GET_VALUE (frchain_now->frch_cfi_data->last_address)
+ != frag_now_fix ()))
cfi_add_advance_loc (symbol_temp_new_now ());
switch (arg)
/* If the last address was not at the current PC, advance to current. */
if (symbol_get_frag (frchain_now->frch_cfi_data->last_address) != frag_now
- || S_GET_VALUE (frchain_now->frch_cfi_data->last_address)
- != frag_now_fix ())
+ || (S_GET_VALUE (frchain_now->frch_cfi_data->last_address)
+ != frag_now_fix ()))
cfi_add_advance_loc (symbol_temp_new_now ());
tail = &head;
if ((encoding & 0xff) != encoding
|| ((((encoding & 0x70) != 0
#if CFI_DIFF_EXPR_OK || defined tc_cfi_emit_pcrel_expr
- && (encoding & 0x70) != DW_EH_PE_pcrel
+ && (encoding & 0x70) != DW_EH_PE_pcrel
#endif
- )
- /* leb128 can be handled, but does something actually need it? */
+ )
+ /* leb128 can be handled, but does something actually need it? */
|| (encoding & 7) == DW_EH_PE_uleb128
|| (encoding & 7) > DW_EH_PE_udata8)
- && tc_cfi_reloc_for_encoding (encoding) == BFD_RELOC_NONE))
+ && tc_cfi_reloc_for_encoding (encoding) == BFD_RELOC_NONE))
{
as_bad (_("invalid or unsupported encoding in .cfi_personality"));
ignore_rest_of_line ();
#if CFI_DIFF_LSDA_OK || defined tc_cfi_emit_pcrel_expr
&& (encoding & 0x70) != DW_EH_PE_pcrel
#endif
- )
- /* leb128 can be handled, but does something actually need it? */
+ )
+ /* leb128 can be handled, but does something actually need it? */
|| (encoding & 7) == DW_EH_PE_uleb128
|| (encoding & 7) > DW_EH_PE_udata8)
&& tc_cfi_reloc_for_encoding (encoding) == BFD_RELOC_NONE))
/* If the last address was not at the current PC, advance to current. */
if (symbol_get_frag (frchain_now->frch_cfi_data->last_address) != frag_now
- || S_GET_VALUE (frchain_now->frch_cfi_data->last_address)
- != frag_now_fix ())
+ || (S_GET_VALUE (frchain_now->frch_cfi_data->last_address)
+ != frag_now_fix ()))
cfi_add_advance_loc (symbol_temp_new_now ());
insn_ptr = alloc_cfi_insn_data ();
&& (encoding & 0x70) != DW_EH_PE_pcrel
#endif
)
- /* leb128 can be handled, but does something actually need it? */
+ /* leb128 can be handled, but does something actually need it? */
|| (encoding & 7) == DW_EH_PE_uleb128
|| (encoding & 7) > DW_EH_PE_udata8)
{
/* If the last address was not at the current PC, advance to current. */
if (symbol_get_frag (frchain_now->frch_cfi_data->last_address) != frag_now
- || S_GET_VALUE (frchain_now->frch_cfi_data->last_address)
- != frag_now_fix ())
+ || (S_GET_VALUE (frchain_now->frch_cfi_data->last_address)
+ != frag_now_fix ()))
cfi_add_advance_loc (symbol_temp_new_now ());
cfi_add_label (name);
else if (strncmp (name, ".debug_frame", sizeof ".debug_frame") == 0)
sections |= CFI_EMIT_debug_frame;
#if SUPPORT_COMPACT_EH
- else if (strncmp (name, ".eh_frame_entry", sizeof ".eh_frame_entry") == 0)
+ else if (strncmp (name, ".eh_frame_entry",
+ sizeof ".eh_frame_entry") == 0)
{
compact_eh = TRUE;
sections |= CFI_EMIT_eh_frame_compact;
{
name = input_line_pointer++;
SKIP_WHITESPACE ();
- if (!is_name_beginner (*input_line_pointer) && *input_line_pointer != '"')
+ if (!is_name_beginner (*input_line_pointer)
+ && *input_line_pointer != '"')
{
input_line_pointer = name;
break;
}
}
- else if (is_name_beginner (*input_line_pointer) || *input_line_pointer == '"')
+ else if (is_name_beginner (*input_line_pointer)
+ || *input_line_pointer == '"')
break;
}
demand_empty_rest_of_line ();
if (cfi_sections_set
&& (sections & (CFI_EMIT_eh_frame | CFI_EMIT_eh_frame_compact))
- && (cfi_sections & (CFI_EMIT_eh_frame | CFI_EMIT_eh_frame_compact))
- != (sections & (CFI_EMIT_eh_frame | CFI_EMIT_eh_frame_compact)))
+ && ((cfi_sections & (CFI_EMIT_eh_frame | CFI_EMIT_eh_frame_compact))
+ != (sections & (CFI_EMIT_eh_frame | CFI_EMIT_eh_frame_compact))))
as_bad (_("inconsistent uses of .cfi_sections"));
cfi_sections = sections;
}
expressionS exp;
offsetT augmentation_size;
enum dwarf2_format fmt = DWARF2_FORMAT (now_seg);
- int offset_size;
- int addr_size;
+ unsigned int offset_size;
+ unsigned int addr_size;
after_size_address = symbol_temp_make ();
end_address = symbol_temp_make ();
{
bfd_reloc_code_real_type code
= tc_cfi_reloc_for_encoding (cie->fde_encoding);
+ addr_size = DWARF2_FDE_RELOC_SIZE;
if (code != BFD_RELOC_NONE)
{
reloc_howto_type *howto = bfd_reloc_type_lookup (stdoutput, code);
- char *p = frag_more (4);
- md_number_to_chars (p, 0, 4);
- fix_new (frag_now, p - frag_now->fr_literal, 4, fde->start_address,
- 0, howto->pc_relative, code);
+ char *p = frag_more (addr_size);
+ gas_assert (addr_size == howto->bitsize / 8);
+ md_number_to_chars (p, 0, addr_size);
+ fix_new (frag_now, p - frag_now->fr_literal, addr_size,
+ fde->start_address, 0, howto->pc_relative, code);
}
else
{
#if CFI_DIFF_EXPR_OK
exp.X_add_symbol = fde->start_address;
exp.X_op_symbol = symbol_temp_new_now ();
- emit_expr (&exp, DWARF2_FDE_RELOC_SIZE); /* Code offset. */
+ emit_expr (&exp, addr_size); /* Code offset. */
#else
exp.X_op = O_symbol;
exp.X_add_symbol = fde->start_address;
#if defined(tc_cfi_emit_pcrel_expr)
- tc_cfi_emit_pcrel_expr (&exp, DWARF2_FDE_RELOC_SIZE); /* Code offset. */
+ tc_cfi_emit_pcrel_expr (&exp, addr_size); /* Code offset. */
#else
- emit_expr (&exp, DWARF2_FDE_RELOC_SIZE); /* Code offset. */
+ emit_expr (&exp, addr_size); /* Code offset. */
#endif
#endif
}
- addr_size = DWARF2_FDE_RELOC_SIZE;
}
else
{
if (cie->per_encoding != DW_EH_PE_omit)
{
if (cie->personality.X_op != fde->personality.X_op
- || cie->personality.X_add_number
- != fde->personality.X_add_number)
+ || (cie->personality.X_add_number
+ != fde->personality.X_add_number))
continue;
switch (cie->personality.X_op)
{
#if SUPPORT_COMPACT_EH
/* Emit a LEGACY format header if we have processed all
- of the .cfi directives without encountering either inline or
+ of the .cfi directives without encountering either inline or
out-of-line compact unwinding opcodes. */
if (fde->eh_header_type == EH_COMPACT_HAS_LSDA
|| fde->eh_header_type == EH_COMPACT_UNKNOWN)
if (fde->end_address == NULL)
{
- as_bad (_("open CFI at the end of file; missing .cfi_endproc directive"));
+ as_bad (_("open CFI at the end of file; "
+ "missing .cfi_endproc directive"));
fde->end_address = fde->start_address;
}
}
if (fde->end_address == NULL)
{
- as_bad (_("open CFI at the end of file; missing .cfi_endproc directive"));
+ as_bad (_("open CFI at the end of file; "
+ "missing .cfi_endproc directive"));
fde->end_address = fde->start_address;
}
projects / deliverable / binutils-gdb.git / blobdiff