]> git.ipfire.org Git - thirdparty/elfutils.git/commitdiff
Merge commit 'origin/master' into dwarf
authorRoland McGrath <roland@redhat.com>
Thu, 7 Jan 2010 00:31:58 +0000 (16:31 -0800)
committerRoland McGrath <roland@redhat.com>
Thu, 7 Jan 2010 00:31:58 +0000 (16:31 -0800)
Conflicts:
src/ChangeLog
src/readelf.c

1  2 
libdw/ChangeLog
libdw/Makefile.am
libdw/libdwP.h
src/ChangeLog
src/readelf.c

diff --cc libdw/ChangeLog
Simple merge
index 519e621aacf461e0f5edf040dc29101f04b046d1,23896fa697897c00bc821551e893c49bc69d1905..a2097fba152df5674b790e6fca19650a3200805b
@@@ -98,17 -88,9 +98,18 @@@ libdw_a_SOURCES = dwarf_begin.c dwarf_b
                  cie.c fde.c cfi.c frame-cache.c \
                  dwarf_frame_info.c dwarf_frame_cfa.c dwarf_frame_register.c \
                  dwarf_cfi_addrframe.c \
-                 dwarf_getcfi.c dwarf_getcfi_elf.c dwarf_cfi_end.c
+                 dwarf_getcfi.c dwarf_getcfi_elf.c dwarf_cfi_end.c \
+                 dwarf_aggregate_size.c
  
 +# XXX need to figure out C++ dso crapola
 +lib_LIBRARIES += libdwpp.a
 +libdwpp_a_SOURCES = c++/values.cc \
 +                  c++/exception.cc \
 +                  c++/known.cc \
 +                  c++/line_info.cc \
 +                  c++/edit-values.cc \
 +                  c++/output-values.cc c++/output-shape.cc
 +
  if MAINTAINER_MODE
  BUILT_SOURCES = $(srcdir)/known-dwarf.h
  MAINTAINERCLEANFILES = $(srcdir)/known-dwarf.h
diff --cc libdw/libdwP.h
Simple merge
diff --cc src/ChangeLog
index 309db1272148dfca2997650700d6b7bd25bac44a,91a6450a137f6c863f835f31e7e79814ce7f6522..818b4ecf8658def56128d9b1fd593729938b249a
 +2009-10-02  Roland McGrath  <roland@redhat.com>
 +
 +      * dwarfcmp.cc (talker): Show missing/extra children, not just count.
 +      (noisy_compare): In explicit-offsets case, print for a positive match.
 +
 +      * dwarfcmp.cc (talker::print_one_reference_mismatch): Compare entries,
 +      not references.
 +
 +2009-10-01  Roland McGrath  <roland@redhat.com>
 +
 +      * dwarfcmp.cc: Support more than for arguments to compare multiple
 +      right-hand side entries against the same left-hand side.
 +
 +      * dwarfcmp.cc (talker): Describe reference mismatch details at the
 +      end, iterating when that mentions new mismatches.
 +
 +2009-09-30  Roland McGrath  <roland@redhat.com>
 +
 +      * dwarfcmp.cc: Support four-argument usage to compare specific entries.
 +
 +2009-09-15  Roland McGrath  <roland@redhat.com>
 +
 +      * dwarfcmp.cc (talker, noisy_cmp): Describe context mismatch details
 +      at the end.
 +
 +2009-08-27  Roland McGrath  <roland@redhat.com>
 +
 +      * dwarfcmp.cc (do_writer_test): New function, broken out of ...
 +      (main): ... here.
 +      [TEST]: Conditionalize -T and all its code on this.
 +
 +2009-08-25  Roland McGrath  <roland@redhat.com>
 +
 +      * dwarfcmp.cc (talker): Track real vs fake-positive match result
 +      and cache only real results in the real tracker.
 +
 +2009-08-20  Roland McGrath  <roland@redhat.com>
 +
 +      * dwarfcmp.cc (verbose): New variable.
 +      (options, parse_opt): Add --verbose/-l to set it.
 +      (talker): Keep going after mismatches when verbose.
 +
 +2009-08-19  Roland McGrath  <roland@redhat.com>
 +
 +      Diagnose reference mismatches with more detail.
 +      * dwarfcmp.cc (talker::reference_mismatch): New method.
 +      (talker::mismatch): Call it.
 +
 +      * dwarfcmp.cc (talker): Update constructor for tracker changes.
 +
 +2009-08-16  Roland McGrath  <roland@redhat.com>
 +
 +      * dwarfcmp.cc (main): Call dwarf_end before return, for happy valgrind.
 +
 +2009-07-06  Roland McGrath  <roland@redhat.com>
 +
 +      * dwarfcmp.cc (test_writer): Make it an int.
 +      (parse_opt): Make -T increment it.
 +      (main): Test only dwarf_output for -T, only dwarf_edit for -TT,
 +      both only for -TTT.
 +
 +2009-07-03  Roland McGrath  <roland@redhat.com>
 +
 +      * Makefile.am (AM_CXXFLAGS): Drop -Wno-unused-parameter.
 +
 +      * dwarfcmp.cc (open_file): Exit 77 for no DWARF under -T.
 +
 +2009-07-02  Roland McGrath  <roland@redhat.com>
 +
 +      * dwarflint-hl.cc (operator<<): dwarf::VS_unit_reference is gone.
 +
 +      * dwarfcmp.cc (main): Update -T constructors using tracker.
 +      Instantiate and test dwarf_output for -T too.
 +
 +2009-07-01  Roland McGrath  <roland@redhat.com>
 +
 +      * dwarfcmp.cc (talker): Update constructor parameters.
 +
 +2009-06-19  Roland McGrath  <roland@redhat.com>
 +
 +      * dwarfcmp.cc: Revamp using dwarf_comparator.
 +
 +      * dwarflint-expected-at.cc: Include <config.h> first.
 +      * dwarflint-expected.hh (expected_map::expectation_map):
 +      Use dwarf::tags.
 +      (to_string): Function removed.
 +      * dwarflint-hl.cc (recursively_validate): Don't use it.
 +
 +      * dwarflint.c (abbrev_table_load): No-op control flow fiddle
 +      silences gcc-4.4 -O3 warning.
 +
 +2009-04-02  Roland McGrath  <roland@redhat.com>
 +
 +      * Makefile.am (noinst_HEADERS): Add dwarfstrings.h here.
 +      (dwarflint_SOURCES): Add dwarflint-expected.hh and dwarflint.h here.
 +      (noinst_HEADERS): Add expr_opcodes.h too.
 +
 +2009-03-24  Roland McGrath  <roland@redhat.com>
 +
 +      * Makefile.am (libdwplusplus_SOURCES): Variable removed.
 +      (dwarfcmp_SOURCES, dwarflint_SOURCES): Don't use it.
 +      (libdwpp): New variable.
 +      (dwarfcmp_LDADD, dwarflint_LDADD): Use it.
 +
 +2009-03-05  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarflint.c: Add --nohl command line switch.
 +
 +2009-01-28  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarflint.c: Coding style cleanups.
 +      (found_hole): Tolerate zero-padding to given alignment.
 +
 +2009-01-27  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarflint.c: Implement validation of .debug_ranges and
 +      references from .debug_info to .debug_ranges.
 +
 +2009-01-27  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarflint.c: Check that the base address selection entry
 +      actually changes base address.
 +
 +2009-01-27  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarflint.c: Match the way dwarflint reports offsets with the
 +      way elfutils does it.
 +
 +2009-01-26  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarflint.c (check_aranges_structural): Check that each CU is
 +      referenced from one aranges section only.
 +      (check_pub_structural): Likewise for pubnames and pubtypes.
 +      (read_ctx_read_uleb128): Allow ten-byte ULEB128.
 +
 +2009-01-23  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarflint.c (check_debug_info_structural): Check that all CUs
 +      have the same address size.
 +
 +2009-01-17  Roland McGrath  <roland@redhat.com>
 +
 +      * expr_opcodes.h: Fix DW_OP_deref entry.
 +      Add DW_OP_GNU_push_tls_address, DW_OP_GNU_uninit.
 +
 +2009-01-17  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarflint.c: Better location handling: references now carry
 +      along where did they originate (i.e. which section, offset, etc.),
 +      all messages are location-aware.
 +      (struct where): New structure that captures location inside the
 +      Dwarf file.  Can be chained to achieve chains of "caused by this
 +      reference" messages ala GCC.
 +
 +2009-01-15  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarflint.c: Implement validation of .debug_loc and references
 +      from .debug_info to .debug_loc.
 +
 +2009-01-14  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarfstrings.h (dwarf_locexpr_opcode_string): New.
 +
 +2009-01-14  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarflint.c: Validation .debug_pubtypes.
 +
 +2009-01-13  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarflint.c: Adjust check_pubnames_structural to be able to
 +      validate also .debug_pubtypes.
 +
 +2009-01-13  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarflint.c: Rewrite message macros to functions.  This makes it
 +      possible to rewrite several other macros to functions.
 +
 +2009-01-12  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarflint.c: Implement validation of .debug_pubnames.
 +
 +2009-01-12  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarflint.c: Check padding between sections in .debug_aranges.
 +
 +2009-01-12  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarflint.c: For DIE references, remember both referrer and
 +      referree.  Add a new data structure ref_record to support that.
 +      Add new message category, mc_die_rel_ref.  Rename other DIE
 +      relationship categories to mc_die_rel_* pattern.
 +
 +2009-01-12  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarflint.c: Changes in data structures for recording DIEs and CUs.
 +
 +2009-01-12  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarflint.c: Implement validation of .debug_aranges.
 +
 +2009-01-11  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarflint.c (process_file): Handle absence of .debug_info,
 +      .debug_abbrev and .debug_str gracefully.
 +
 +2009-01-11  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarflint.c: A couple small fixes across the code.
 +      (check_debug_info_structural): Return bool.
 +      (check_cu_structural): Likewise.
 +      (check_addr_record_addr): Likewise.
 +      (check_die_references): Likewise.
 +
 +2009-01-10  Roland McGrath  <roland@redhat.com>
 +
 +      * dwarfcmp.cc (test_writer): New variable.
 +      (options, parse_opt): Grok -T/--test-writer to set it.
 +      (main): When set, exercise dwarf_output constructors and comparators.
 +
 +      * dwarflint.c (options, parse_opt): Replace --no-debug with
 +      -i/--ignore-missing, to match dwarfcmp.
 +
 +2009-01-10  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarflint.c: Implement --no-debug: silently accept file, if its
 +      debug info is not available.
 +
 +2009-01-10  Roland McGrath  <roland@redhat.com>
 +
 +      * dwarfcmp.cc: New file.
 +      * Makefile.am (bin_PROGRAMS): Add dwarfcmp.
 +      (dwarfcmp_SOURCES): New variable.
 +      (dwarfcmp_no_Wformat, dwarfcmp_LDADD): New variables.
 +
 +2009-01-10  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarflint.c: Implement fine-grained message selection.  Each
 +      message has a category, which is bitwise OR of category options.
 +      There are acceptance and rejection criteria for warnings and
 +      errors, which can be tuned using command-line options (currently
 +      --strict and --gnu).
 +      Use dwarfstrings.h in two messages.
 +
 +2009-01-10  Petr Machata  <pmachata@redhat.com>
 +
 +      * readelf.c: Extract functions that format dwarf enums into a file
 +      of its own, so it can be shared with dwarflint.
 +      * dwarfstrings.h: That file.
 +
 +2009-01-09  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarflint.c: Sort the abbrev tables and look up abbreviations
 +      with bisect search.
 +
 +2009-01-09  Petr Machata  <pmachata@redhat.com>
 +
 +      * dwarflint.c: Checking for zero padding and unreferenced bytes.
 +      CU size and padding at the end of CU are now checked.
 +
+ 2010-01-05  Roland McGrath  <roland@redhat.com>
+       * readelf.c (dwarf_attr_string): Match DW_AT_GNU_vector and
+       DW_AT_GNU_template_name.
+ 2010-01-04  Roland McGrath  <roland@redhat.com>
+       * readelf.c (handle_notes_data): Grab NT_AUXV only for name "CORE".
+       (handle_core_note): Pass NHDR and NAME to ebl_core_note.
+       (handle_core_item): Handle .format of '\n' as \n-separated strings.
+       * readelf.c (implicit_debug_sections): New variable.
+       (parse_opt): Set it instead of print_debug_sections for -a.
+       OR them together for print_debug check.
+       (print_debug): OR them together for section check.
+       * readelf.c (options): Repartition into set implied by -a and others.
+       Correct -a text to match reality.
+       * readelf.c (struct section_argument): Add bool member 'implicit'.
+       (parse_opt): Set it for -a cases, clear it for -x args.
+       (for_each_section_argument): Don't complain about a missing section by
+       name if it's implicit.
  2009-11-16  Roland McGrath  <roland@redhat.com>
  
        * readelf.c (print_string_section): Punt SHT_NOBITS like empty
diff --cc src/readelf.c
index b7fab2ab3b0d780c2f72b3372976ddf45d1698cf,19792acbf6578c38df3b22a01c3c7adde2766044..035042a7cba414302f5469e013d93150badeae2c
@@@ -3138,7 -3142,599 +3143,6 @@@ format_dwarf_addr (Dwfl_Module *dwflmod
    return result;
  }
  
 -static const char *
 -dwarf_tag_string (unsigned int tag)
 -{
 -  static const char *const known_tags[]  =
 -    {
 -      [DW_TAG_array_type] = "array_type",
 -      [DW_TAG_class_type] = "class_type",
 -      [DW_TAG_entry_point] = "entry_point",
 -      [DW_TAG_enumeration_type] = "enumeration_type",
 -      [DW_TAG_formal_parameter] = "formal_parameter",
 -      [DW_TAG_imported_declaration] = "imported_declaration",
 -      [DW_TAG_label] = "label",
 -      [DW_TAG_lexical_block] = "lexical_block",
 -      [DW_TAG_member] = "member",
 -      [DW_TAG_pointer_type] = "pointer_type",
 -      [DW_TAG_reference_type] = "reference_type",
 -      [DW_TAG_compile_unit] = "compile_unit",
 -      [DW_TAG_string_type] = "string_type",
 -      [DW_TAG_structure_type] = "structure_type",
 -      [DW_TAG_subroutine_type] = "subroutine_type",
 -      [DW_TAG_typedef] = "typedef",
 -      [DW_TAG_union_type] = "union_type",
 -      [DW_TAG_unspecified_parameters] = "unspecified_parameters",
 -      [DW_TAG_variant] = "variant",
 -      [DW_TAG_common_block] = "common_block",
 -      [DW_TAG_common_inclusion] = "common_inclusion",
 -      [DW_TAG_inheritance] = "inheritance",
 -      [DW_TAG_inlined_subroutine] = "inlined_subroutine",
 -      [DW_TAG_module] = "module",
 -      [DW_TAG_ptr_to_member_type] = "ptr_to_member_type",
 -      [DW_TAG_set_type] = "set_type",
 -      [DW_TAG_subrange_type] = "subrange_type",
 -      [DW_TAG_with_stmt] = "with_stmt",
 -      [DW_TAG_access_declaration] = "access_declaration",
 -      [DW_TAG_base_type] = "base_type",
 -      [DW_TAG_catch_block] = "catch_block",
 -      [DW_TAG_const_type] = "const_type",
 -      [DW_TAG_constant] = "constant",
 -      [DW_TAG_enumerator] = "enumerator",
 -      [DW_TAG_file_type] = "file_type",
 -      [DW_TAG_friend] = "friend",
 -      [DW_TAG_namelist] = "namelist",
 -      [DW_TAG_namelist_item] = "namelist_item",
 -      [DW_TAG_packed_type] = "packed_type",
 -      [DW_TAG_subprogram] = "subprogram",
 -      [DW_TAG_template_type_parameter] = "template_type_parameter",
 -      [DW_TAG_template_value_parameter] = "template_value_parameter",
 -      [DW_TAG_thrown_type] = "thrown_type",
 -      [DW_TAG_try_block] = "try_block",
 -      [DW_TAG_variant_part] = "variant_part",
 -      [DW_TAG_variable] = "variable",
 -      [DW_TAG_volatile_type] = "volatile_type",
 -      [DW_TAG_dwarf_procedure] = "dwarf_procedure",
 -      [DW_TAG_restrict_type] = "restrict_type",
 -      [DW_TAG_interface_type] = "interface_type",
 -      [DW_TAG_namespace] = "namespace",
 -      [DW_TAG_imported_module] = "imported_module",
 -      [DW_TAG_unspecified_type] = "unspecified_type",
 -      [DW_TAG_partial_unit] = "partial_unit",
 -      [DW_TAG_imported_unit] = "imported_unit",
 -      [DW_TAG_mutable_type] = "mutable_type",
 -      [DW_TAG_condition] = "condition",
 -      [DW_TAG_shared_type] = "shared_type",
 -    };
 -  const unsigned int nknown_tags = (sizeof (known_tags)
 -                                  / sizeof (known_tags[0]));
 -  static char buf[40];
 -  const char *result = NULL;
 -
 -  if (likely (tag < nknown_tags))
 -    result = known_tags[tag];
 -
 -  if (unlikely (result == NULL))
 -    /* There are a few known extensions.  */
 -    switch (tag)
 -      {
 -      case DW_TAG_MIPS_loop:
 -      result = "MIPS_loop";
 -      break;
 -
 -      case DW_TAG_format_label:
 -      result = "format_label";
 -      break;
 -
 -      case DW_TAG_function_template:
 -      result = "function_template";
 -      break;
 -
 -      case DW_TAG_class_template:
 -      result = "class_template";
 -      break;
 -
 -      default:
 -      if (tag < DW_TAG_lo_user)
 -        snprintf (buf, sizeof buf, gettext ("unknown tag %hx"), tag);
 -      else
 -        snprintf (buf, sizeof buf, gettext ("unknown user tag %hx"), tag);
 -      result = buf;
 -      break;
 -      }
 -
 -  return result;
 -}
 -
 -
 -static const char *
 -dwarf_attr_string (unsigned int attrnum)
 -{
 -  static const char *const known_attrs[] =
 -    {
 -      [DW_AT_sibling] = "sibling",
 -      [DW_AT_location] = "location",
 -      [DW_AT_name] = "name",
 -      [DW_AT_ordering] = "ordering",
 -      [DW_AT_subscr_data] = "subscr_data",
 -      [DW_AT_byte_size] = "byte_size",
 -      [DW_AT_bit_offset] = "bit_offset",
 -      [DW_AT_bit_size] = "bit_size",
 -      [DW_AT_element_list] = "element_list",
 -      [DW_AT_stmt_list] = "stmt_list",
 -      [DW_AT_low_pc] = "low_pc",
 -      [DW_AT_high_pc] = "high_pc",
 -      [DW_AT_language] = "language",
 -      [DW_AT_member] = "member",
 -      [DW_AT_discr] = "discr",
 -      [DW_AT_discr_value] = "discr_value",
 -      [DW_AT_visibility] = "visibility",
 -      [DW_AT_import] = "import",
 -      [DW_AT_string_length] = "string_length",
 -      [DW_AT_common_reference] = "common_reference",
 -      [DW_AT_comp_dir] = "comp_dir",
 -      [DW_AT_const_value] = "const_value",
 -      [DW_AT_containing_type] = "containing_type",
 -      [DW_AT_default_value] = "default_value",
 -      [DW_AT_inline] = "inline",
 -      [DW_AT_is_optional] = "is_optional",
 -      [DW_AT_lower_bound] = "lower_bound",
 -      [DW_AT_producer] = "producer",
 -      [DW_AT_prototyped] = "prototyped",
 -      [DW_AT_return_addr] = "return_addr",
 -      [DW_AT_start_scope] = "start_scope",
 -      [DW_AT_bit_stride] = "bit_stride",
 -      [DW_AT_upper_bound] = "upper_bound",
 -      [DW_AT_abstract_origin] = "abstract_origin",
 -      [DW_AT_accessibility] = "accessibility",
 -      [DW_AT_address_class] = "address_class",
 -      [DW_AT_artificial] = "artificial",
 -      [DW_AT_base_types] = "base_types",
 -      [DW_AT_calling_convention] = "calling_convention",
 -      [DW_AT_count] = "count",
 -      [DW_AT_data_member_location] = "data_member_location",
 -      [DW_AT_decl_column] = "decl_column",
 -      [DW_AT_decl_file] = "decl_file",
 -      [DW_AT_decl_line] = "decl_line",
 -      [DW_AT_declaration] = "declaration",
 -      [DW_AT_discr_list] = "discr_list",
 -      [DW_AT_encoding] = "encoding",
 -      [DW_AT_external] = "external",
 -      [DW_AT_frame_base] = "frame_base",
 -      [DW_AT_friend] = "friend",
 -      [DW_AT_identifier_case] = "identifier_case",
 -      [DW_AT_macro_info] = "macro_info",
 -      [DW_AT_namelist_item] = "namelist_item",
 -      [DW_AT_priority] = "priority",
 -      [DW_AT_segment] = "segment",
 -      [DW_AT_specification] = "specification",
 -      [DW_AT_static_link] = "static_link",
 -      [DW_AT_type] = "type",
 -      [DW_AT_use_location] = "use_location",
 -      [DW_AT_variable_parameter] = "variable_parameter",
 -      [DW_AT_virtuality] = "virtuality",
 -      [DW_AT_vtable_elem_location] = "vtable_elem_location",
 -      [DW_AT_allocated] = "allocated",
 -      [DW_AT_associated] = "associated",
 -      [DW_AT_data_location] = "data_location",
 -      [DW_AT_byte_stride] = "byte_stride",
 -      [DW_AT_entry_pc] = "entry_pc",
 -      [DW_AT_use_UTF8] = "use_UTF8",
 -      [DW_AT_extension] = "extension",
 -      [DW_AT_ranges] = "ranges",
 -      [DW_AT_trampoline] = "trampoline",
 -      [DW_AT_call_column] = "call_column",
 -      [DW_AT_call_file] = "call_file",
 -      [DW_AT_call_line] = "call_line",
 -      [DW_AT_description] = "description",
 -      [DW_AT_binary_scale] = "binary_scale",
 -      [DW_AT_decimal_scale] = "decimal_scale",
 -      [DW_AT_small] = "small",
 -      [DW_AT_decimal_sign] = "decimal_sign",
 -      [DW_AT_digit_count] = "digit_count",
 -      [DW_AT_picture_string] = "picture_string",
 -      [DW_AT_mutable] = "mutable",
 -      [DW_AT_threads_scaled] = "threads_scaled",
 -      [DW_AT_explicit] = "explicit",
 -      [DW_AT_object_pointer] = "object_pointer",
 -      [DW_AT_endianity] = "endianity",
 -      [DW_AT_elemental] = "elemental",
 -      [DW_AT_pure] = "pure",
 -      [DW_AT_recursive] = "recursive",
 -    };
 -  const unsigned int nknown_attrs = (sizeof (known_attrs)
 -                                   / sizeof (known_attrs[0]));
 -  static char buf[40];
 -  const char *result = NULL;
 -
 -  if (likely (attrnum < nknown_attrs))
 -    result = known_attrs[attrnum];
 -
 -  if (unlikely (result == NULL))
 -    /* There are a few known extensions.  */
 -    switch (attrnum)
 -      {
 -      case DW_AT_MIPS_fde:
 -      result = "MIPS_fde";
 -      break;
 -
 -      case DW_AT_MIPS_loop_begin:
 -      result = "MIPS_loop_begin";
 -      break;
 -
 -      case DW_AT_MIPS_tail_loop_begin:
 -      result = "MIPS_tail_loop_begin";
 -      break;
 -
 -      case DW_AT_MIPS_epilog_begin:
 -      result = "MIPS_epilog_begin";
 -      break;
 -
 -      case DW_AT_MIPS_loop_unroll_factor:
 -      result = "MIPS_loop_unroll_factor";
 -      break;
 -
 -      case DW_AT_MIPS_software_pipeline_depth:
 -      result = "MIPS_software_pipeline_depth";
 -      break;
 -
 -      case DW_AT_MIPS_linkage_name:
 -      result = "MIPS_linkage_name";
 -      break;
 -
 -      case DW_AT_MIPS_stride:
 -      result = "MIPS_stride";
 -      break;
 -
 -      case DW_AT_MIPS_abstract_name:
 -      result = "MIPS_abstract_name";
 -      break;
 -
 -      case DW_AT_MIPS_clone_origin:
 -      result = "MIPS_clone_origin";
 -      break;
 -
 -      case DW_AT_MIPS_has_inlines:
 -      result = "MIPS_has_inlines";
 -      break;
 -
 -      case DW_AT_MIPS_stride_byte:
 -      result = "MIPS_stride_byte";
 -      break;
 -
 -      case DW_AT_MIPS_stride_elem:
 -      result = "MIPS_stride_elem";
 -      break;
 -
 -      case DW_AT_MIPS_ptr_dopetype:
 -      result = "MIPS_ptr_dopetype";
 -      break;
 -
 -      case DW_AT_MIPS_allocatable_dopetype:
 -      result = "MIPS_allocatable_dopetype";
 -      break;
 -
 -      case DW_AT_MIPS_assumed_shape_dopetype:
 -      result = "MIPS_assumed_shape_dopetype";
 -      break;
 -
 -      case DW_AT_MIPS_assumed_size:
 -      result = "MIPS_assumed_size";
 -      break;
 -
 -      case DW_AT_sf_names:
 -      result = "sf_names";
 -      break;
 -
 -      case DW_AT_src_info:
 -      result = "src_info";
 -      break;
 -
 -      case DW_AT_mac_info:
 -      result = "mac_info";
 -      break;
 -
 -      case DW_AT_src_coords:
 -      result = "src_coords";
 -      break;
 -
 -      case DW_AT_body_begin:
 -      result = "body_begin";
 -      break;
 -
 -      case DW_AT_body_end:
 -      result = "body_end";
 -      break;
 -
 -      case DW_AT_GNU_vector:
 -      result = "GNU_vector";
 -      break;
 -
 -      case DW_AT_GNU_template_name:
 -      result = "GNU_template_name";
 -      break;
 -
 -      default:
 -      if (attrnum < DW_AT_lo_user)
 -        snprintf (buf, sizeof buf, gettext ("unknown attribute %hx"),
 -                  attrnum);
 -      else
 -        snprintf (buf, sizeof buf, gettext ("unknown user attribute %hx"),
 -                  attrnum);
 -      result = buf;
 -      break;
 -      }
 -
 -  return result;
 -}
 -
 -
 -static const char *
 -dwarf_form_string (unsigned int form)
 -{
 -  static const char *const known_forms[] =
 -    {
 -      [DW_FORM_addr] = "addr",
 -      [DW_FORM_block2] = "block2",
 -      [DW_FORM_block4] = "block4",
 -      [DW_FORM_data2] = "data2",
 -      [DW_FORM_data4] = "data4",
 -      [DW_FORM_data8] = "data8",
 -      [DW_FORM_string] = "string",
 -      [DW_FORM_block] = "block",
 -      [DW_FORM_block1] = "block1",
 -      [DW_FORM_data1] = "data1",
 -      [DW_FORM_flag] = "flag",
 -      [DW_FORM_sdata] = "sdata",
 -      [DW_FORM_strp] = "strp",
 -      [DW_FORM_udata] = "udata",
 -      [DW_FORM_ref_addr] = "ref_addr",
 -      [DW_FORM_ref1] = "ref1",
 -      [DW_FORM_ref2] = "ref2",
 -      [DW_FORM_ref4] = "ref4",
 -      [DW_FORM_ref8] = "ref8",
 -      [DW_FORM_ref_udata] = "ref_udata",
 -      [DW_FORM_indirect] = "indirect"
 -    };
 -  const unsigned int nknown_forms = (sizeof (known_forms)
 -                                   / sizeof (known_forms[0]));
 -  static char buf[40];
 -  const char *result = NULL;
 -
 -  if (likely (form < nknown_forms))
 -    result = known_forms[form];
 -
 -  if (unlikely (result == NULL))
 -    snprintf (buf, sizeof buf, gettext ("unknown form %" PRIx64),
 -            (uint64_t) form);
 -
 -  return result;
 -}
 -
 -
 -static const char *
 -dwarf_lang_string (unsigned int lang)
 -{
 -  static const char *const known[] =
 -    {
 -      [DW_LANG_C89] = "ISO C89",
 -      [DW_LANG_C] = "C",
 -      [DW_LANG_Ada83] = "Ada83",
 -      [DW_LANG_C_plus_plus] = "C++",
 -      [DW_LANG_Cobol74] = "Cobol74",
 -      [DW_LANG_Cobol85] = "Cobol85",
 -      [DW_LANG_Fortran77] = "Fortran77",
 -      [DW_LANG_Fortran90] = "Fortran90",
 -      [DW_LANG_Pascal83] = "Pascal83",
 -      [DW_LANG_Modula2] = "Modula2",
 -      [DW_LANG_Java] = "Java",
 -      [DW_LANG_C99] = "ISO C99",
 -      [DW_LANG_Ada95] = "Ada95",
 -      [DW_LANG_Fortran95] = "Fortran95",
 -      [DW_LANG_PL1] = "PL1",
 -      [DW_LANG_Objc] = "Objective C",
 -      [DW_LANG_ObjC_plus_plus] = "Objective C++",
 -      [DW_LANG_UPC] = "UPC",
 -      [DW_LANG_D] = "D",
 -    };
 -
 -  if (likely (lang < sizeof (known) / sizeof (known[0])))
 -    return known[lang];
 -  else if (lang == DW_LANG_Mips_Assembler)
 -    /* This language tag is used for assembler in general.  */
 -    return "Assembler";
 -
 -  if (lang >= DW_LANG_lo_user && lang <= DW_LANG_hi_user)
 -    {
 -      static char buf[30];
 -      snprintf (buf, sizeof (buf), "lo_user+%u", lang - DW_LANG_lo_user);
 -      return buf;
 -    }
 -
 -  return "???";
 -}
 -
 -
 -static const char *
 -dwarf_inline_string (unsigned int code)
 -{
 -  static const char *const known[] =
 -    {
 -      [DW_INL_not_inlined] = "not_inlined",
 -      [DW_INL_inlined] = "inlined",
 -      [DW_INL_declared_not_inlined] = "declared_not_inlined",
 -      [DW_INL_declared_inlined] = "declared_inlined"
 -    };
 -
 -  if (likely (code < sizeof (known) / sizeof (known[0])))
 -    return known[code];
 -
 -  return "???";
 -}
 -
 -
 -static const char *
 -dwarf_encoding_string (unsigned int code)
 -{
 -  static const char *const known[] =
 -    {
 -      [DW_ATE_void] = "void",
 -      [DW_ATE_address] = "address",
 -      [DW_ATE_boolean] = "boolean",
 -      [DW_ATE_complex_float] = "complex_float",
 -      [DW_ATE_float] = "float",
 -      [DW_ATE_signed] = "signed",
 -      [DW_ATE_signed_char] = "signed_char",
 -      [DW_ATE_unsigned] = "unsigned",
 -      [DW_ATE_unsigned_char] = "unsigned_char",
 -      [DW_ATE_imaginary_float] = "imaginary_float",
 -      [DW_ATE_packed_decimal] = "packed_decimal",
 -      [DW_ATE_numeric_string] = "numeric_string",
 -      [DW_ATE_edited] = "edited",
 -      [DW_ATE_signed_fixed] = "signed_fixed",
 -      [DW_ATE_unsigned_fixed] = "unsigned_fixed",
 -      [DW_ATE_decimal_float] = "decimal_float",
 -    };
 -
 -  if (likely (code < sizeof (known) / sizeof (known[0])))
 -    return known[code];
 -
 -  if (code >= DW_ATE_lo_user && code <= DW_ATE_hi_user)
 -    {
 -      static char buf[30];
 -      snprintf (buf, sizeof (buf), "lo_user+%u", code - DW_ATE_lo_user);
 -      return buf;
 -    }
 -
 -  return "???";
 -}
 -
 -
 -static const char *
 -dwarf_access_string (unsigned int code)
 -{
 -  static const char *const known[] =
 -    {
 -      [DW_ACCESS_public] = "public",
 -      [DW_ACCESS_protected] = "protected",
 -      [DW_ACCESS_private] = "private"
 -    };
 -
 -  if (likely (code < sizeof (known) / sizeof (known[0])))
 -    return known[code];
 -
 -  return "???";
 -}
 -
 -
 -static const char *
 -dwarf_visibility_string (unsigned int code)
 -{
 -  static const char *const known[] =
 -    {
 -      [DW_VIS_local] = "local",
 -      [DW_VIS_exported] = "exported",
 -      [DW_VIS_qualified] = "qualified"
 -    };
 -
 -  if (likely (code < sizeof (known) / sizeof (known[0])))
 -    return known[code];
 -
 -  return "???";
 -}
 -
 -
 -static const char *
 -dwarf_virtuality_string (unsigned int code)
 -{
 -  static const char *const known[] =
 -    {
 -      [DW_VIRTUALITY_none] = "none",
 -      [DW_VIRTUALITY_virtual] = "virtual",
 -      [DW_VIRTUALITY_pure_virtual] = "pure_virtual"
 -    };
 -
 -  if (likely (code < sizeof (known) / sizeof (known[0])))
 -    return known[code];
 -
 -  return "???";
 -}
 -
 -
 -static const char *
 -dwarf_identifier_case_string (unsigned int code)
 -{
 -  static const char *const known[] =
 -    {
 -      [DW_ID_case_sensitive] = "sensitive",
 -      [DW_ID_up_case] = "up_case",
 -      [DW_ID_down_case] = "down_case",
 -      [DW_ID_case_insensitive] = "insensitive"
 -    };
 -
 -  if (likely (code < sizeof (known) / sizeof (known[0])))
 -    return known[code];
 -
 -  return "???";
 -}
 -
 -
 -static const char *
 -dwarf_calling_convention_string (unsigned int code)
 -{
 -  static const char *const known[] =
 -    {
 -      [DW_CC_normal] = "normal",
 -      [DW_CC_program] = "program",
 -      [DW_CC_nocall] = "nocall",
 -    };
 -
 -  if (likely (code < sizeof (known) / sizeof (known[0])))
 -    return known[code];
 -
 -  if (code >= DW_CC_lo_user && code <= DW_CC_hi_user)
 -    {
 -      static char buf[30];
 -      snprintf (buf, sizeof (buf), "lo_user+%u", code - DW_CC_lo_user);
 -      return buf;
 -    }
 -
 -  return "???";
 -}
 -
 -
 -static const char *
 -dwarf_ordering_string (unsigned int code)
 -{
 -  static const char *const known[] =
 -    {
 -      [DW_ORD_row_major] = "row_major",
 -      [DW_ORD_col_major] = "col_major"
 -    };
 -
 -  if (likely (code < sizeof (known) / sizeof (known[0])))
 -    return known[code];
 -
 -  return "???";
 -}
 -
 -
 -static const char *
 -dwarf_discr_list_string (unsigned int code)
 -{
 -  static const char *const known[] =
 -    {
 -      [DW_DSC_label] = "label",
 -      [DW_DSC_range] = "range"
 -    };
 -
 -  if (likely (code < sizeof (known) / sizeof (known[0])))
 -    return known[code];
 -
 -  return "???";
 -}
 -
--
  static void
  print_block (size_t n, const void *block)
  {