diff options
Diffstat (limited to 'gnu/llvm/lib/BinaryFormat/Dwarf.cpp')
| -rw-r--r-- | gnu/llvm/lib/BinaryFormat/Dwarf.cpp | 725 |
1 files changed, 0 insertions, 725 deletions
diff --git a/gnu/llvm/lib/BinaryFormat/Dwarf.cpp b/gnu/llvm/lib/BinaryFormat/Dwarf.cpp deleted file mode 100644 index 46f8056774b..00000000000 --- a/gnu/llvm/lib/BinaryFormat/Dwarf.cpp +++ /dev/null @@ -1,725 +0,0 @@ -//===-- llvm/BinaryFormat/Dwarf.cpp - Dwarf Framework ------------*- C++-*-===// -// -// The LLVM Compiler Infrastructure -// -// This file is distributed under the University of Illinois Open Source -// License. See LICENSE.TXT for details. -// -//===----------------------------------------------------------------------===// -// -// This file contains support for generic dwarf information. -// -//===----------------------------------------------------------------------===// - -#include "llvm/BinaryFormat/Dwarf.h" -#include "llvm/ADT/StringSwitch.h" -#include "llvm/ADT/Triple.h" -#include "llvm/Support/ErrorHandling.h" - -using namespace llvm; -using namespace dwarf; - -StringRef llvm::dwarf::TagString(unsigned Tag) { - switch (Tag) { - default: - return StringRef(); -#define HANDLE_DW_TAG(ID, NAME, VERSION, VENDOR) \ - case DW_TAG_##NAME: \ - return "DW_TAG_" #NAME; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -unsigned llvm::dwarf::getTag(StringRef TagString) { - return StringSwitch<unsigned>(TagString) -#define HANDLE_DW_TAG(ID, NAME, VERSION, VENDOR) \ - .Case("DW_TAG_" #NAME, DW_TAG_##NAME) -#include "llvm/BinaryFormat/Dwarf.def" - .Default(DW_TAG_invalid); -} - -unsigned llvm::dwarf::TagVersion(dwarf::Tag Tag) { - switch (Tag) { - default: - return 0; -#define HANDLE_DW_TAG(ID, NAME, VERSION, VENDOR) \ - case DW_TAG_##NAME: \ - return VERSION; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -unsigned llvm::dwarf::TagVendor(dwarf::Tag Tag) { - switch (Tag) { - default: - return 0; -#define HANDLE_DW_TAG(ID, NAME, VERSION, VENDOR) \ - case DW_TAG_##NAME: \ - return DWARF_VENDOR_##VENDOR; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -StringRef llvm::dwarf::ChildrenString(unsigned Children) { - switch (Children) { - case DW_CHILDREN_no: - return "DW_CHILDREN_no"; - case DW_CHILDREN_yes: - return "DW_CHILDREN_yes"; - } - return StringRef(); -} - -StringRef llvm::dwarf::AttributeString(unsigned Attribute) { - switch (Attribute) { - default: - return StringRef(); -#define HANDLE_DW_AT(ID, NAME, VERSION, VENDOR) \ - case DW_AT_##NAME: \ - return "DW_AT_" #NAME; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -unsigned llvm::dwarf::AttributeVersion(dwarf::Attribute Attribute) { - switch (Attribute) { - default: - return 0; -#define HANDLE_DW_AT(ID, NAME, VERSION, VENDOR) \ - case DW_AT_##NAME: \ - return VERSION; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -unsigned llvm::dwarf::AttributeVendor(dwarf::Attribute Attribute) { - switch (Attribute) { - default: - return 0; -#define HANDLE_DW_AT(ID, NAME, VERSION, VENDOR) \ - case DW_AT_##NAME: \ - return DWARF_VENDOR_##VENDOR; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -StringRef llvm::dwarf::FormEncodingString(unsigned Encoding) { - switch (Encoding) { - default: - return StringRef(); -#define HANDLE_DW_FORM(ID, NAME, VERSION, VENDOR) \ - case DW_FORM_##NAME: \ - return "DW_FORM_" #NAME; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -unsigned llvm::dwarf::FormVersion(dwarf::Form Form) { - switch (Form) { - default: - return 0; -#define HANDLE_DW_FORM(ID, NAME, VERSION, VENDOR) \ - case DW_FORM_##NAME: \ - return VERSION; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -unsigned llvm::dwarf::FormVendor(dwarf::Form Form) { - switch (Form) { - default: - return 0; -#define HANDLE_DW_FORM(ID, NAME, VERSION, VENDOR) \ - case DW_FORM_##NAME: \ - return DWARF_VENDOR_##VENDOR; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -StringRef llvm::dwarf::OperationEncodingString(unsigned Encoding) { - switch (Encoding) { - default: - return StringRef(); -#define HANDLE_DW_OP(ID, NAME, VERSION, VENDOR) \ - case DW_OP_##NAME: \ - return "DW_OP_" #NAME; -#include "llvm/BinaryFormat/Dwarf.def" - case DW_OP_LLVM_fragment: - return "DW_OP_LLVM_fragment"; - } -} - -unsigned llvm::dwarf::getOperationEncoding(StringRef OperationEncodingString) { - return StringSwitch<unsigned>(OperationEncodingString) -#define HANDLE_DW_OP(ID, NAME, VERSION, VENDOR) \ - .Case("DW_OP_" #NAME, DW_OP_##NAME) -#include "llvm/BinaryFormat/Dwarf.def" - .Case("DW_OP_LLVM_fragment", DW_OP_LLVM_fragment) - .Default(0); -} - -unsigned llvm::dwarf::OperationVersion(dwarf::LocationAtom Op) { - switch (Op) { - default: - return 0; -#define HANDLE_DW_OP(ID, NAME, VERSION, VENDOR) \ - case DW_OP_##NAME: \ - return VERSION; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -unsigned llvm::dwarf::OperationVendor(dwarf::LocationAtom Op) { - switch (Op) { - default: - return 0; -#define HANDLE_DW_OP(ID, NAME, VERSION, VENDOR) \ - case DW_OP_##NAME: \ - return DWARF_VENDOR_##VENDOR; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -StringRef llvm::dwarf::AttributeEncodingString(unsigned Encoding) { - switch (Encoding) { - default: - return StringRef(); -#define HANDLE_DW_ATE(ID, NAME, VERSION, VENDOR) \ - case DW_ATE_##NAME: \ - return "DW_ATE_" #NAME; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -unsigned llvm::dwarf::getAttributeEncoding(StringRef EncodingString) { - return StringSwitch<unsigned>(EncodingString) -#define HANDLE_DW_ATE(ID, NAME, VERSION, VENDOR) \ - .Case("DW_ATE_" #NAME, DW_ATE_##NAME) -#include "llvm/BinaryFormat/Dwarf.def" - .Default(0); -} - -unsigned llvm::dwarf::AttributeEncodingVersion(dwarf::TypeKind ATE) { - switch (ATE) { - default: - return 0; -#define HANDLE_DW_ATE(ID, NAME, VERSION, VENDOR) \ - case DW_ATE_##NAME: \ - return VERSION; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -unsigned llvm::dwarf::AttributeEncodingVendor(dwarf::TypeKind ATE) { - switch (ATE) { - default: - return 0; -#define HANDLE_DW_ATE(ID, NAME, VERSION, VENDOR) \ - case DW_ATE_##NAME: \ - return DWARF_VENDOR_##VENDOR; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -StringRef llvm::dwarf::DecimalSignString(unsigned Sign) { - switch (Sign) { - case DW_DS_unsigned: - return "DW_DS_unsigned"; - case DW_DS_leading_overpunch: - return "DW_DS_leading_overpunch"; - case DW_DS_trailing_overpunch: - return "DW_DS_trailing_overpunch"; - case DW_DS_leading_separate: - return "DW_DS_leading_separate"; - case DW_DS_trailing_separate: - return "DW_DS_trailing_separate"; - } - return StringRef(); -} - -StringRef llvm::dwarf::EndianityString(unsigned Endian) { - switch (Endian) { - case DW_END_default: - return "DW_END_default"; - case DW_END_big: - return "DW_END_big"; - case DW_END_little: - return "DW_END_little"; - case DW_END_lo_user: - return "DW_END_lo_user"; - case DW_END_hi_user: - return "DW_END_hi_user"; - } - return StringRef(); -} - -StringRef llvm::dwarf::AccessibilityString(unsigned Access) { - switch (Access) { - // Accessibility codes - case DW_ACCESS_public: - return "DW_ACCESS_public"; - case DW_ACCESS_protected: - return "DW_ACCESS_protected"; - case DW_ACCESS_private: - return "DW_ACCESS_private"; - } - return StringRef(); -} - -StringRef llvm::dwarf::VisibilityString(unsigned Visibility) { - switch (Visibility) { - case DW_VIS_local: - return "DW_VIS_local"; - case DW_VIS_exported: - return "DW_VIS_exported"; - case DW_VIS_qualified: - return "DW_VIS_qualified"; - } - return StringRef(); -} - -StringRef llvm::dwarf::VirtualityString(unsigned Virtuality) { - switch (Virtuality) { - default: - return StringRef(); -#define HANDLE_DW_VIRTUALITY(ID, NAME) \ - case DW_VIRTUALITY_##NAME: \ - return "DW_VIRTUALITY_" #NAME; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -unsigned llvm::dwarf::getVirtuality(StringRef VirtualityString) { - return StringSwitch<unsigned>(VirtualityString) -#define HANDLE_DW_VIRTUALITY(ID, NAME) \ - .Case("DW_VIRTUALITY_" #NAME, DW_VIRTUALITY_##NAME) -#include "llvm/BinaryFormat/Dwarf.def" - .Default(DW_VIRTUALITY_invalid); -} - -StringRef llvm::dwarf::LanguageString(unsigned Language) { - switch (Language) { - default: - return StringRef(); -#define HANDLE_DW_LANG(ID, NAME, LOWER_BOUND, VERSION, VENDOR) \ - case DW_LANG_##NAME: \ - return "DW_LANG_" #NAME; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -unsigned llvm::dwarf::getLanguage(StringRef LanguageString) { - return StringSwitch<unsigned>(LanguageString) -#define HANDLE_DW_LANG(ID, NAME, LOWER_BOUND, VERSION, VENDOR) \ - .Case("DW_LANG_" #NAME, DW_LANG_##NAME) -#include "llvm/BinaryFormat/Dwarf.def" - .Default(0); -} - -unsigned llvm::dwarf::LanguageVersion(dwarf::SourceLanguage Lang) { - switch (Lang) { - default: - return 0; -#define HANDLE_DW_LANG(ID, NAME, LOWER_BOUND, VERSION, VENDOR) \ - case DW_LANG_##NAME: \ - return VERSION; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -unsigned llvm::dwarf::LanguageVendor(dwarf::SourceLanguage Lang) { - switch (Lang) { - default: - return 0; -#define HANDLE_DW_LANG(ID, NAME, LOWER_BOUND, VERSION, VENDOR) \ - case DW_LANG_##NAME: \ - return DWARF_VENDOR_##VENDOR; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -Optional<unsigned> llvm::dwarf::LanguageLowerBound(dwarf::SourceLanguage Lang) { - switch (Lang) { - default: - return None; -#define HANDLE_DW_LANG(ID, NAME, LOWER_BOUND, VERSION, VENDOR) \ - case DW_LANG_##NAME: \ - return LOWER_BOUND; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -StringRef llvm::dwarf::CaseString(unsigned Case) { - switch (Case) { - case DW_ID_case_sensitive: - return "DW_ID_case_sensitive"; - case DW_ID_up_case: - return "DW_ID_up_case"; - case DW_ID_down_case: - return "DW_ID_down_case"; - case DW_ID_case_insensitive: - return "DW_ID_case_insensitive"; - } - return StringRef(); -} - -StringRef llvm::dwarf::ConventionString(unsigned CC) { - switch (CC) { - default: - return StringRef(); -#define HANDLE_DW_CC(ID, NAME) \ - case DW_CC_##NAME: \ - return "DW_CC_" #NAME; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -unsigned llvm::dwarf::getCallingConvention(StringRef CCString) { - return StringSwitch<unsigned>(CCString) -#define HANDLE_DW_CC(ID, NAME) .Case("DW_CC_" #NAME, DW_CC_##NAME) -#include "llvm/BinaryFormat/Dwarf.def" - .Default(0); -} - -StringRef llvm::dwarf::InlineCodeString(unsigned Code) { - switch (Code) { - case DW_INL_not_inlined: - return "DW_INL_not_inlined"; - case DW_INL_inlined: - return "DW_INL_inlined"; - case DW_INL_declared_not_inlined: - return "DW_INL_declared_not_inlined"; - case DW_INL_declared_inlined: - return "DW_INL_declared_inlined"; - } - return StringRef(); -} - -StringRef llvm::dwarf::ArrayOrderString(unsigned Order) { - switch (Order) { - case DW_ORD_row_major: - return "DW_ORD_row_major"; - case DW_ORD_col_major: - return "DW_ORD_col_major"; - } - return StringRef(); -} - -StringRef llvm::dwarf::LNStandardString(unsigned Standard) { - switch (Standard) { - default: - return StringRef(); -#define HANDLE_DW_LNS(ID, NAME) \ - case DW_LNS_##NAME: \ - return "DW_LNS_" #NAME; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -StringRef llvm::dwarf::LNExtendedString(unsigned Encoding) { - switch (Encoding) { - default: - return StringRef(); -#define HANDLE_DW_LNE(ID, NAME) \ - case DW_LNE_##NAME: \ - return "DW_LNE_" #NAME; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -StringRef llvm::dwarf::MacinfoString(unsigned Encoding) { - switch (Encoding) { - // Macinfo Type Encodings - case DW_MACINFO_define: - return "DW_MACINFO_define"; - case DW_MACINFO_undef: - return "DW_MACINFO_undef"; - case DW_MACINFO_start_file: - return "DW_MACINFO_start_file"; - case DW_MACINFO_end_file: - return "DW_MACINFO_end_file"; - case DW_MACINFO_vendor_ext: - return "DW_MACINFO_vendor_ext"; - case DW_MACINFO_invalid: - return "DW_MACINFO_invalid"; - } - return StringRef(); -} - -unsigned llvm::dwarf::getMacinfo(StringRef MacinfoString) { - return StringSwitch<unsigned>(MacinfoString) - .Case("DW_MACINFO_define", DW_MACINFO_define) - .Case("DW_MACINFO_undef", DW_MACINFO_undef) - .Case("DW_MACINFO_start_file", DW_MACINFO_start_file) - .Case("DW_MACINFO_end_file", DW_MACINFO_end_file) - .Case("DW_MACINFO_vendor_ext", DW_MACINFO_vendor_ext) - .Default(DW_MACINFO_invalid); -} - -StringRef llvm::dwarf::RangeListEncodingString(unsigned Encoding) { - switch (Encoding) { - default: - return StringRef(); -#define HANDLE_DW_RLE(ID, NAME) \ - case DW_RLE_##NAME: \ - return "DW_RLE_" #NAME; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -StringRef llvm::dwarf::CallFrameString(unsigned Encoding, - Triple::ArchType Arch) { - assert(Arch != llvm::Triple::ArchType::UnknownArch); -#define SELECT_AARCH64 (Arch == llvm::Triple::aarch64_be || Arch == llvm::Triple::aarch64) -#define SELECT_MIPS64 Arch == llvm::Triple::mips64 -#define SELECT_SPARC (Arch == llvm::Triple::sparc || Arch == llvm::Triple::sparcv9) -#define SELECT_X86 (Arch == llvm::Triple::x86 || Arch == llvm::Triple::x86_64) -#define HANDLE_DW_CFA(ID, NAME) -#define HANDLE_DW_CFA_PRED(ID, NAME, PRED) \ - if (ID == Encoding && PRED) \ - return "DW_CFA_" #NAME; -#include "llvm/BinaryFormat/Dwarf.def" - - switch (Encoding) { - default: - return StringRef(); -#define HANDLE_DW_CFA_PRED(ID, NAME, PRED) -#define HANDLE_DW_CFA(ID, NAME) \ - case DW_CFA_##NAME: \ - return "DW_CFA_" #NAME; -#include "llvm/BinaryFormat/Dwarf.def" - -#undef SELECT_X86 -#undef SELECT_SPARC -#undef SELECT_MIPS64 -#undef SELECT_AARCH64 - } -} - -StringRef llvm::dwarf::ApplePropertyString(unsigned Prop) { - switch (Prop) { - default: - return StringRef(); -#define HANDLE_DW_APPLE_PROPERTY(ID, NAME) \ - case DW_APPLE_PROPERTY_##NAME: \ - return "DW_APPLE_PROPERTY_" #NAME; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -StringRef llvm::dwarf::UnitTypeString(unsigned UT) { - switch (UT) { - default: - return StringRef(); -#define HANDLE_DW_UT(ID, NAME) \ - case DW_UT_##NAME: \ - return "DW_UT_" #NAME; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -StringRef llvm::dwarf::AtomTypeString(unsigned AT) { - switch (AT) { - case dwarf::DW_ATOM_null: - return "DW_ATOM_null"; - case dwarf::DW_ATOM_die_offset: - return "DW_ATOM_die_offset"; - case DW_ATOM_cu_offset: - return "DW_ATOM_cu_offset"; - case DW_ATOM_die_tag: - return "DW_ATOM_die_tag"; - case DW_ATOM_type_flags: - case DW_ATOM_type_type_flags: - return "DW_ATOM_type_flags"; - case DW_ATOM_qual_name_hash: - return "DW_ATOM_qual_name_hash"; - } - return StringRef(); -} - -StringRef llvm::dwarf::GDBIndexEntryKindString(GDBIndexEntryKind Kind) { - switch (Kind) { - case GIEK_NONE: - return "NONE"; - case GIEK_TYPE: - return "TYPE"; - case GIEK_VARIABLE: - return "VARIABLE"; - case GIEK_FUNCTION: - return "FUNCTION"; - case GIEK_OTHER: - return "OTHER"; - case GIEK_UNUSED5: - return "UNUSED5"; - case GIEK_UNUSED6: - return "UNUSED6"; - case GIEK_UNUSED7: - return "UNUSED7"; - } - llvm_unreachable("Unknown GDBIndexEntryKind value"); -} - -StringRef -llvm::dwarf::GDBIndexEntryLinkageString(GDBIndexEntryLinkage Linkage) { - switch (Linkage) { - case GIEL_EXTERNAL: - return "EXTERNAL"; - case GIEL_STATIC: - return "STATIC"; - } - llvm_unreachable("Unknown GDBIndexEntryLinkage value"); -} - -StringRef llvm::dwarf::AttributeValueString(uint16_t Attr, unsigned Val) { - switch (Attr) { - case DW_AT_accessibility: - return AccessibilityString(Val); - case DW_AT_virtuality: - return VirtualityString(Val); - case DW_AT_language: - return LanguageString(Val); - case DW_AT_encoding: - return AttributeEncodingString(Val); - case DW_AT_decimal_sign: - return DecimalSignString(Val); - case DW_AT_endianity: - return EndianityString(Val); - case DW_AT_visibility: - return VisibilityString(Val); - case DW_AT_identifier_case: - return CaseString(Val); - case DW_AT_calling_convention: - return ConventionString(Val); - case DW_AT_inline: - return InlineCodeString(Val); - case DW_AT_ordering: - return ArrayOrderString(Val); - case DW_AT_APPLE_runtime_class: - return LanguageString(Val); - } - - return StringRef(); -} - -StringRef llvm::dwarf::AtomValueString(uint16_t Atom, unsigned Val) { - switch (Atom) { - case DW_ATOM_null: - return "NULL"; - case DW_ATOM_die_tag: - return TagString(Val); - } - - return StringRef(); -} - -StringRef llvm::dwarf::IndexString(unsigned Idx) { - switch (Idx) { - default: - return StringRef(); -#define HANDLE_DW_IDX(ID, NAME) \ - case DW_IDX_##NAME: \ - return "DW_IDX_" #NAME; -#include "llvm/BinaryFormat/Dwarf.def" - } -} - -Optional<uint8_t> llvm::dwarf::getFixedFormByteSize(dwarf::Form Form, - FormParams Params) { - switch (Form) { - case DW_FORM_addr: - if (Params) - return Params.AddrSize; - return None; - - case DW_FORM_block: // ULEB128 length L followed by L bytes. - case DW_FORM_block1: // 1 byte length L followed by L bytes. - case DW_FORM_block2: // 2 byte length L followed by L bytes. - case DW_FORM_block4: // 4 byte length L followed by L bytes. - case DW_FORM_string: // C-string with null terminator. - case DW_FORM_sdata: // SLEB128. - case DW_FORM_udata: // ULEB128. - case DW_FORM_ref_udata: // ULEB128. - case DW_FORM_indirect: // ULEB128. - case DW_FORM_exprloc: // ULEB128 length L followed by L bytes. - case DW_FORM_strx: // ULEB128. - case DW_FORM_addrx: // ULEB128. - case DW_FORM_loclistx: // ULEB128. - case DW_FORM_rnglistx: // ULEB128. - case DW_FORM_GNU_addr_index: // ULEB128. - case DW_FORM_GNU_str_index: // ULEB128. - return None; - - case DW_FORM_ref_addr: - if (Params) - return Params.getRefAddrByteSize(); - return None; - - case DW_FORM_flag: - case DW_FORM_data1: - case DW_FORM_ref1: - case DW_FORM_strx1: - case DW_FORM_addrx1: - return 1; - - case DW_FORM_data2: - case DW_FORM_ref2: - case DW_FORM_strx2: - case DW_FORM_addrx2: - return 2; - - case DW_FORM_strx3: - return 3; - - case DW_FORM_data4: - case DW_FORM_ref4: - case DW_FORM_ref_sup4: - case DW_FORM_strx4: - case DW_FORM_addrx4: - return 4; - - case DW_FORM_strp: - case DW_FORM_GNU_ref_alt: - case DW_FORM_GNU_strp_alt: - case DW_FORM_line_strp: - case DW_FORM_sec_offset: - case DW_FORM_strp_sup: - if (Params) - return Params.getDwarfOffsetByteSize(); - return None; - - case DW_FORM_data8: - case DW_FORM_ref8: - case DW_FORM_ref_sig8: - case DW_FORM_ref_sup8: - return 8; - - case DW_FORM_flag_present: - return 0; - - case DW_FORM_data16: - return 16; - - case DW_FORM_implicit_const: - // The implicit value is stored in the abbreviation as a SLEB128, and - // there no data in debug info. - return 0; - - default: - break; - } - return None; -} - -bool llvm::dwarf::isValidFormForVersion(Form F, unsigned Version, - bool ExtensionsOk) { - if (FormVendor(F) == DWARF_VENDOR_DWARF) { - unsigned FV = FormVersion(F); - return FV > 0 && FV <= Version; - } - return ExtensionsOk; -} - -constexpr char llvm::dwarf::EnumTraits<Attribute>::Type[]; -constexpr char llvm::dwarf::EnumTraits<Form>::Type[]; -constexpr char llvm::dwarf::EnumTraits<Index>::Type[]; -constexpr char llvm::dwarf::EnumTraits<Tag>::Type[]; |