From 6174d9c85e9c00fcbf75f23e81064d2bcadb6d10 Mon Sep 17 00:00:00 2001 From: Richard Henderson Date: Tue, 11 Mar 2003 22:00:33 +0000 Subject: [PATCH] * dwarf2dbg.c (generic_dwarf2_emit_offset): New. (TC_DWARF2_EMIT_OFFSET): Provide default. (out_debug_aranges, out_debug_info): Use it. * config/tc-ia64.c (ia64_dwarf2_emit_offset): New. (ia64_cons_fix_new): Move FUNC_DTP_RELATIVE handling ... (ia64_gen_real_reloc_type): ... here. * config/tc-ia64.h (TC_DWARF2_EMIT_OFFSET): New. --- gas/ChangeLog | 10 ++++++++++ gas/config/tc-ia64.c | 33 +++++++++++++++++++++------------ gas/config/tc-ia64.h | 2 ++ gas/dwarf2dbg.c | 36 ++++++++++++++++++++++++------------ 4 files changed, 57 insertions(+), 24 deletions(-) diff --git a/gas/ChangeLog b/gas/ChangeLog index b61b4d0c24c..715bbb5b8b6 100644 --- a/gas/ChangeLog +++ b/gas/ChangeLog @@ -1,3 +1,13 @@ +2003-03-11 Steve Ellcey + + * dwarf2dbg.c (generic_dwarf2_emit_offset): New. + (TC_DWARF2_EMIT_OFFSET): Provide default. + (out_debug_aranges, out_debug_info): Use it. + * config/tc-ia64.c (ia64_dwarf2_emit_offset): New. + (ia64_cons_fix_new): Move FUNC_DTP_RELATIVE handling ... + (ia64_gen_real_reloc_type): ... here. + * config/tc-ia64.h (TC_DWARF2_EMIT_OFFSET): New. + 2003-03-09 Thiemo Seufer * config/tc-mips.c (s_mips_end): Remove !BFD_ASSEMBLER case. diff --git a/gas/config/tc-ia64.c b/gas/config/tc-ia64.c index a3945649c5a..875f4fd86fd 100644 --- a/gas/config/tc-ia64.c +++ b/gas/config/tc-ia64.c @@ -10033,6 +10033,20 @@ ia64_pcrel_from_section (fix, sec) return off; } + +/* Used to emit section-relative relocs for the dwarf2 debug data. */ +void +ia64_dwarf2_emit_offset (symbolS *symbol, unsigned int size) +{ + expressionS expr; + + expr.X_op = O_pseudo_fixup; + expr.X_op_symbol = pseudo_func[FUNC_SEC_RELATIVE].u.sym; + expr.X_add_number = 0; + expr.X_add_symbol = symbol; + emit_expr (&expr, size); +} + /* This is called whenever some data item (not an instruction) needs a fixup. We pick the right reloc code depending on the byteorder currently in effect. */ @@ -10074,16 +10088,6 @@ ia64_cons_fix_new (f, where, nbytes, exp) exp->X_op = O_symbol; break; } - else if (exp->X_op == O_pseudo_fixup - && exp->X_op_symbol - && S_GET_VALUE (exp->X_op_symbol) == FUNC_DTP_RELATIVE) - { - if (target_big_endian) - code = BFD_RELOC_IA64_DTPREL64MSB; - else - code = BFD_RELOC_IA64_DTPREL64LSB; - break; - } else { if (target_big_endian) @@ -10102,7 +10106,6 @@ ia64_cons_fix_new (f, where, nbytes, exp) code = BFD_RELOC_IA64_IPLTMSB; else code = BFD_RELOC_IA64_IPLTLSB; - exp->X_op = O_symbol; break; } @@ -10113,11 +10116,12 @@ ia64_cons_fix_new (f, where, nbytes, exp) ignore_rest_of_line (); return; } + if (exp->X_op == O_pseudo_fixup) { - /* ??? */ exp->X_op = O_symbol; code = ia64_gen_real_reloc_type (exp->X_op_symbol, code); + /* ??? If code unchanged, unsupported. */ } fix = fix_new_exp (f, where, nbytes, exp, 0, code); @@ -10293,6 +10297,10 @@ ia64_gen_real_reloc_type (sym, r_type) case FUNC_DTP_RELATIVE: switch (r_type) { + case BFD_RELOC_IA64_DIR64MSB: + new = BFD_RELOC_IA64_DTPREL64MSB; break; + case BFD_RELOC_IA64_DIR64LSB: + new = BFD_RELOC_IA64_DTPREL64LSB; break; case BFD_RELOC_IA64_IMM14: new = BFD_RELOC_IA64_DTPREL14; break; case BFD_RELOC_IA64_IMM22: @@ -10320,6 +10328,7 @@ ia64_gen_real_reloc_type (sym, r_type) default: abort (); } + /* Hmmmm. Should this ever occur? */ if (new) return new; diff --git a/gas/config/tc-ia64.h b/gas/config/tc-ia64.h index b066807bc3f..1853943dd23 100644 --- a/gas/config/tc-ia64.h +++ b/gas/config/tc-ia64.h @@ -89,6 +89,7 @@ extern long ia64_pcrel_from_section PARAMS ((struct fix *fix, segT sec)); extern void ia64_md_do_align PARAMS ((int, const char *, int, int)); extern void ia64_handle_align PARAMS ((fragS *f)); extern void ia64_after_parse_args PARAMS ((void)); +extern void ia64_dwarf2_emit_offset PARAMS ((symbolS *, unsigned int)); #define md_end() ia64_end_of_source () #define md_start_line_hook() ia64_start_line () @@ -119,6 +120,7 @@ extern void ia64_after_parse_args PARAMS ((void)); #define HANDLE_ALIGN(f) ia64_handle_align (f) #define md_elf_section_type(str,len) ia64_elf_section_type (str, len) #define md_after_parse_args() ia64_after_parse_args () +#define TC_DWARF2_EMIT_OFFSET ia64_dwarf2_emit_offset #define MAX_MEM_FOR_RS_ALIGN_CODE (15 + 16) diff --git a/gas/dwarf2dbg.c b/gas/dwarf2dbg.c index 58ac0f57852..3b863cd2ec0 100644 --- a/gas/dwarf2dbg.c +++ b/gas/dwarf2dbg.c @@ -52,6 +52,9 @@ # define DWARF2_ADDR_SIZE(bfd) (bfd_arch_bits_per_address (bfd) / 8); #endif +#ifndef TC_DWARF2_EMIT_OFFSET +# define TC_DWARF2_EMIT_OFFSET generic_dwarf2_emit_offset +#endif #ifdef BFD_ASSEMBLER @@ -160,6 +163,7 @@ static char const fake_label_name[] = ".L0\001"; /* The size of an address on the target. */ static unsigned int sizeof_address; +static void generic_dwarf2_emit_offset PARAMS((symbolS *, unsigned int)); static struct line_subseg *get_line_subseg PARAMS ((segT, subsegT)); static unsigned int get_filenum PARAMS ((const char *, unsigned int)); static struct frag *first_frag_for_seg PARAMS ((segT)); @@ -186,6 +190,21 @@ static void out_debug_aranges PARAMS ((segT, segT)); static void out_debug_abbrev PARAMS ((segT)); static void out_debug_info PARAMS ((segT, segT, segT)); +/* Create an offset to .dwarf2_*. */ + +static void +generic_dwarf2_emit_offset (symbol, size) + symbolS *symbol; + unsigned int size; +{ + expressionS expr; + + expr.X_op = O_symbol; + expr.X_add_symbol = symbol; + expr.X_add_number = 0; + emit_expr (&expr, size); +} + /* Find or create an entry for SEG+SUBSEG in ALL_SEGS. */ static struct line_subseg * @@ -1209,10 +1228,8 @@ out_debug_aranges (aranges_seg, info_seg) out_two (2); /* Offset to .debug_info. */ - expr.X_op = O_symbol; - expr.X_add_symbol = section_symbol (info_seg); - expr.X_add_number = 0; - emit_expr (&expr, 4); + /* ??? sizeof_offset */ + TC_DWARF2_EMIT_OFFSET (section_symbol (info_seg), 4); /* Size of an address (offset portion). */ out_byte (addr_size); @@ -1339,10 +1356,7 @@ out_debug_info (info_seg, abbrev_seg, line_seg) out_two (2); /* .debug_abbrev offset */ - expr.X_op = O_symbol; - expr.X_add_symbol = section_symbol (abbrev_seg); - expr.X_add_number = 0; - emit_expr (&expr, sizeof_offset); + TC_DWARF2_EMIT_OFFSET (section_symbol (abbrev_seg), sizeof_offset); /* Target address size. */ out_byte (sizeof_address); @@ -1351,10 +1365,8 @@ out_debug_info (info_seg, abbrev_seg, line_seg) out_uleb128 (1); /* DW_AT_stmt_list */ - expr.X_op = O_symbol; - expr.X_add_symbol = section_symbol (line_seg); - expr.X_add_number = 0; - emit_expr (&expr, 4); + /* ??? sizeof_offset */ + TC_DWARF2_EMIT_OFFSET (section_symbol (line_seg), 4); /* These two attributes may only be emitted if all of the code is contiguous. Multiple sections are not that. */ -- 2.30.2