1 //===-- llvm/BinaryFormat/Dwarf.cpp - Dwarf Framework ------------*- C++-*-===//
3 // The LLVM Compiler Infrastructure
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
8 //===----------------------------------------------------------------------===//
10 // This file contains support for generic dwarf information.
12 //===----------------------------------------------------------------------===//
14 #include "llvm/BinaryFormat/Dwarf.h"
15 #include "llvm/ADT/StringSwitch.h"
16 #include "llvm/Support/ErrorHandling.h"
19 using namespace dwarf;
21 StringRef llvm::dwarf::TagString(unsigned Tag) {
25 #define HANDLE_DW_TAG(ID, NAME, VERSION, VENDOR) \
27 return "DW_TAG_" #NAME;
28 #include "llvm/BinaryFormat/Dwarf.def"
32 unsigned llvm::dwarf::getTag(StringRef TagString) {
33 return StringSwitch<unsigned>(TagString)
34 #define HANDLE_DW_TAG(ID, NAME, VERSION, VENDOR) \
35 .Case("DW_TAG_" #NAME, DW_TAG_##NAME)
36 #include "llvm/BinaryFormat/Dwarf.def"
37 .Default(DW_TAG_invalid);
40 unsigned llvm::dwarf::TagVersion(dwarf::Tag Tag) {
44 #define HANDLE_DW_TAG(ID, NAME, VERSION, VENDOR) \
47 #include "llvm/BinaryFormat/Dwarf.def"
51 unsigned llvm::dwarf::TagVendor(dwarf::Tag Tag) {
55 #define HANDLE_DW_TAG(ID, NAME, VERSION, VENDOR) \
57 return DWARF_VENDOR_##VENDOR;
58 #include "llvm/BinaryFormat/Dwarf.def"
62 StringRef llvm::dwarf::ChildrenString(unsigned Children) {
65 return "DW_CHILDREN_no";
67 return "DW_CHILDREN_yes";
72 StringRef llvm::dwarf::AttributeString(unsigned Attribute) {
76 #define HANDLE_DW_AT(ID, NAME, VERSION, VENDOR) \
78 return "DW_AT_" #NAME;
79 #include "llvm/BinaryFormat/Dwarf.def"
83 unsigned llvm::dwarf::AttributeVersion(dwarf::Attribute Attribute) {
87 #define HANDLE_DW_AT(ID, NAME, VERSION, VENDOR) \
90 #include "llvm/BinaryFormat/Dwarf.def"
94 unsigned llvm::dwarf::AttributeVendor(dwarf::Attribute Attribute) {
98 #define HANDLE_DW_AT(ID, NAME, VERSION, VENDOR) \
100 return DWARF_VENDOR_##VENDOR;
101 #include "llvm/BinaryFormat/Dwarf.def"
105 StringRef llvm::dwarf::FormEncodingString(unsigned Encoding) {
109 #define HANDLE_DW_FORM(ID, NAME, VERSION, VENDOR) \
110 case DW_FORM_##NAME: \
111 return "DW_FORM_" #NAME;
112 #include "llvm/BinaryFormat/Dwarf.def"
116 unsigned llvm::dwarf::FormVersion(dwarf::Form Form) {
120 #define HANDLE_DW_FORM(ID, NAME, VERSION, VENDOR) \
121 case DW_FORM_##NAME: \
123 #include "llvm/BinaryFormat/Dwarf.def"
127 unsigned llvm::dwarf::FormVendor(dwarf::Form Form) {
131 #define HANDLE_DW_FORM(ID, NAME, VERSION, VENDOR) \
132 case DW_FORM_##NAME: \
133 return DWARF_VENDOR_##VENDOR;
134 #include "llvm/BinaryFormat/Dwarf.def"
138 StringRef llvm::dwarf::OperationEncodingString(unsigned Encoding) {
142 #define HANDLE_DW_OP(ID, NAME, VERSION, VENDOR) \
144 return "DW_OP_" #NAME;
145 #include "llvm/BinaryFormat/Dwarf.def"
146 case DW_OP_LLVM_fragment:
147 return "DW_OP_LLVM_fragment";
151 unsigned llvm::dwarf::getOperationEncoding(StringRef OperationEncodingString) {
152 return StringSwitch<unsigned>(OperationEncodingString)
153 #define HANDLE_DW_OP(ID, NAME, VERSION, VENDOR) \
154 .Case("DW_OP_" #NAME, DW_OP_##NAME)
155 #include "llvm/BinaryFormat/Dwarf.def"
156 .Case("DW_OP_LLVM_fragment", DW_OP_LLVM_fragment)
160 unsigned llvm::dwarf::OperationVersion(dwarf::LocationAtom Op) {
164 #define HANDLE_DW_OP(ID, NAME, VERSION, VENDOR) \
167 #include "llvm/BinaryFormat/Dwarf.def"
171 unsigned llvm::dwarf::OperationVendor(dwarf::LocationAtom Op) {
175 #define HANDLE_DW_OP(ID, NAME, VERSION, VENDOR) \
177 return DWARF_VENDOR_##VENDOR;
178 #include "llvm/BinaryFormat/Dwarf.def"
182 StringRef llvm::dwarf::AttributeEncodingString(unsigned Encoding) {
186 #define HANDLE_DW_ATE(ID, NAME, VERSION, VENDOR) \
187 case DW_ATE_##NAME: \
188 return "DW_ATE_" #NAME;
189 #include "llvm/BinaryFormat/Dwarf.def"
193 unsigned llvm::dwarf::getAttributeEncoding(StringRef EncodingString) {
194 return StringSwitch<unsigned>(EncodingString)
195 #define HANDLE_DW_ATE(ID, NAME, VERSION, VENDOR) \
196 .Case("DW_ATE_" #NAME, DW_ATE_##NAME)
197 #include "llvm/BinaryFormat/Dwarf.def"
201 unsigned llvm::dwarf::AttributeEncodingVersion(dwarf::TypeKind ATE) {
205 #define HANDLE_DW_ATE(ID, NAME, VERSION, VENDOR) \
206 case DW_ATE_##NAME: \
208 #include "llvm/BinaryFormat/Dwarf.def"
212 unsigned llvm::dwarf::AttributeEncodingVendor(dwarf::TypeKind ATE) {
216 #define HANDLE_DW_ATE(ID, NAME, VERSION, VENDOR) \
217 case DW_ATE_##NAME: \
218 return DWARF_VENDOR_##VENDOR;
219 #include "llvm/BinaryFormat/Dwarf.def"
223 StringRef llvm::dwarf::DecimalSignString(unsigned Sign) {
226 return "DW_DS_unsigned";
227 case DW_DS_leading_overpunch:
228 return "DW_DS_leading_overpunch";
229 case DW_DS_trailing_overpunch:
230 return "DW_DS_trailing_overpunch";
231 case DW_DS_leading_separate:
232 return "DW_DS_leading_separate";
233 case DW_DS_trailing_separate:
234 return "DW_DS_trailing_separate";
239 StringRef llvm::dwarf::EndianityString(unsigned Endian) {
242 return "DW_END_default";
246 return "DW_END_little";
248 return "DW_END_lo_user";
250 return "DW_END_hi_user";
255 StringRef llvm::dwarf::AccessibilityString(unsigned Access) {
257 // Accessibility codes
258 case DW_ACCESS_public:
259 return "DW_ACCESS_public";
260 case DW_ACCESS_protected:
261 return "DW_ACCESS_protected";
262 case DW_ACCESS_private:
263 return "DW_ACCESS_private";
268 StringRef llvm::dwarf::VisibilityString(unsigned Visibility) {
269 switch (Visibility) {
271 return "DW_VIS_local";
272 case DW_VIS_exported:
273 return "DW_VIS_exported";
274 case DW_VIS_qualified:
275 return "DW_VIS_qualified";
280 StringRef llvm::dwarf::VirtualityString(unsigned Virtuality) {
281 switch (Virtuality) {
284 #define HANDLE_DW_VIRTUALITY(ID, NAME) \
285 case DW_VIRTUALITY_##NAME: \
286 return "DW_VIRTUALITY_" #NAME;
287 #include "llvm/BinaryFormat/Dwarf.def"
291 unsigned llvm::dwarf::getVirtuality(StringRef VirtualityString) {
292 return StringSwitch<unsigned>(VirtualityString)
293 #define HANDLE_DW_VIRTUALITY(ID, NAME) \
294 .Case("DW_VIRTUALITY_" #NAME, DW_VIRTUALITY_##NAME)
295 #include "llvm/BinaryFormat/Dwarf.def"
296 .Default(DW_VIRTUALITY_invalid);
299 StringRef llvm::dwarf::LanguageString(unsigned Language) {
303 #define HANDLE_DW_LANG(ID, NAME, VERSION, VENDOR) \
304 case DW_LANG_##NAME: \
305 return "DW_LANG_" #NAME;
306 #include "llvm/BinaryFormat/Dwarf.def"
310 unsigned llvm::dwarf::getLanguage(StringRef LanguageString) {
311 return StringSwitch<unsigned>(LanguageString)
312 #define HANDLE_DW_LANG(ID, NAME, VERSION, VENDOR) \
313 .Case("DW_LANG_" #NAME, DW_LANG_##NAME)
314 #include "llvm/BinaryFormat/Dwarf.def"
318 unsigned llvm::dwarf::LanguageVersion(dwarf::SourceLanguage Lang) {
322 #define HANDLE_DW_LANG(ID, NAME, VERSION, VENDOR) \
323 case DW_LANG_##NAME: \
325 #include "llvm/BinaryFormat/Dwarf.def"
329 unsigned llvm::dwarf::LanguageVendor(dwarf::SourceLanguage Lang) {
333 #define HANDLE_DW_LANG(ID, NAME, VERSION, VENDOR) \
334 case DW_LANG_##NAME: \
335 return DWARF_VENDOR_##VENDOR;
336 #include "llvm/BinaryFormat/Dwarf.def"
340 StringRef llvm::dwarf::CaseString(unsigned Case) {
342 case DW_ID_case_sensitive:
343 return "DW_ID_case_sensitive";
345 return "DW_ID_up_case";
346 case DW_ID_down_case:
347 return "DW_ID_down_case";
348 case DW_ID_case_insensitive:
349 return "DW_ID_case_insensitive";
354 StringRef llvm::dwarf::ConventionString(unsigned CC) {
358 #define HANDLE_DW_CC(ID, NAME) \
360 return "DW_CC_" #NAME;
361 #include "llvm/BinaryFormat/Dwarf.def"
365 unsigned llvm::dwarf::getCallingConvention(StringRef CCString) {
366 return StringSwitch<unsigned>(CCString)
367 #define HANDLE_DW_CC(ID, NAME) .Case("DW_CC_" #NAME, DW_CC_##NAME)
368 #include "llvm/BinaryFormat/Dwarf.def"
372 StringRef llvm::dwarf::InlineCodeString(unsigned Code) {
374 case DW_INL_not_inlined:
375 return "DW_INL_not_inlined";
377 return "DW_INL_inlined";
378 case DW_INL_declared_not_inlined:
379 return "DW_INL_declared_not_inlined";
380 case DW_INL_declared_inlined:
381 return "DW_INL_declared_inlined";
386 StringRef llvm::dwarf::ArrayOrderString(unsigned Order) {
388 case DW_ORD_row_major:
389 return "DW_ORD_row_major";
390 case DW_ORD_col_major:
391 return "DW_ORD_col_major";
396 StringRef llvm::dwarf::DiscriminantString(unsigned Discriminant) {
397 switch (Discriminant) {
399 return "DW_DSC_label";
401 return "DW_DSC_range";
406 StringRef llvm::dwarf::LNStandardString(unsigned Standard) {
410 #define HANDLE_DW_LNS(ID, NAME) \
411 case DW_LNS_##NAME: \
412 return "DW_LNS_" #NAME;
413 #include "llvm/BinaryFormat/Dwarf.def"
417 StringRef llvm::dwarf::LNExtendedString(unsigned Encoding) {
421 #define HANDLE_DW_LNE(ID, NAME) \
422 case DW_LNE_##NAME: \
423 return "DW_LNE_" #NAME;
424 #include "llvm/BinaryFormat/Dwarf.def"
428 StringRef llvm::dwarf::MacinfoString(unsigned Encoding) {
430 // Macinfo Type Encodings
431 case DW_MACINFO_define:
432 return "DW_MACINFO_define";
433 case DW_MACINFO_undef:
434 return "DW_MACINFO_undef";
435 case DW_MACINFO_start_file:
436 return "DW_MACINFO_start_file";
437 case DW_MACINFO_end_file:
438 return "DW_MACINFO_end_file";
439 case DW_MACINFO_vendor_ext:
440 return "DW_MACINFO_vendor_ext";
441 case DW_MACINFO_invalid:
442 return "DW_MACINFO_invalid";
447 unsigned llvm::dwarf::getMacinfo(StringRef MacinfoString) {
448 return StringSwitch<unsigned>(MacinfoString)
449 .Case("DW_MACINFO_define", DW_MACINFO_define)
450 .Case("DW_MACINFO_undef", DW_MACINFO_undef)
451 .Case("DW_MACINFO_start_file", DW_MACINFO_start_file)
452 .Case("DW_MACINFO_end_file", DW_MACINFO_end_file)
453 .Case("DW_MACINFO_vendor_ext", DW_MACINFO_vendor_ext)
454 .Default(DW_MACINFO_invalid);
457 StringRef llvm::dwarf::CallFrameString(unsigned Encoding) {
461 #define HANDLE_DW_CFA(ID, NAME) \
462 case DW_CFA_##NAME: \
463 return "DW_CFA_" #NAME;
464 #include "llvm/BinaryFormat/Dwarf.def"
468 StringRef llvm::dwarf::ApplePropertyString(unsigned Prop) {
472 #define HANDLE_DW_APPLE_PROPERTY(ID, NAME) \
473 case DW_APPLE_PROPERTY_##NAME: \
474 return "DW_APPLE_PROPERTY_" #NAME;
475 #include "llvm/BinaryFormat/Dwarf.def"
479 StringRef llvm::dwarf::UnitTypeString(unsigned UT) {
483 #define HANDLE_DW_UT(ID, NAME) \
485 return "DW_UT_" #NAME;
486 #include "llvm/BinaryFormat/Dwarf.def"
490 StringRef llvm::dwarf::AtomTypeString(unsigned AT) {
492 case dwarf::DW_ATOM_null:
493 return "DW_ATOM_null";
494 case dwarf::DW_ATOM_die_offset:
495 return "DW_ATOM_die_offset";
496 case DW_ATOM_cu_offset:
497 return "DW_ATOM_cu_offset";
498 case DW_ATOM_die_tag:
499 return "DW_ATOM_die_tag";
500 case DW_ATOM_type_flags:
501 return "DW_ATOM_type_flags";
506 StringRef llvm::dwarf::GDBIndexEntryKindString(GDBIndexEntryKind Kind) {
525 llvm_unreachable("Unknown GDBIndexEntryKind value");
529 llvm::dwarf::GDBIndexEntryLinkageString(GDBIndexEntryLinkage Linkage) {
536 llvm_unreachable("Unknown GDBIndexEntryLinkage value");
539 StringRef llvm::dwarf::AttributeValueString(uint16_t Attr, unsigned Val) {
541 case DW_AT_accessibility:
542 return AccessibilityString(Val);
543 case DW_AT_virtuality:
544 return VirtualityString(Val);
546 return LanguageString(Val);
548 return AttributeEncodingString(Val);
549 case DW_AT_decimal_sign:
550 return DecimalSignString(Val);
551 case DW_AT_endianity:
552 return EndianityString(Val);
553 case DW_AT_visibility:
554 return VisibilityString(Val);
555 case DW_AT_identifier_case:
556 return CaseString(Val);
557 case DW_AT_calling_convention:
558 return ConventionString(Val);
560 return InlineCodeString(Val);
562 return ArrayOrderString(Val);
563 case DW_AT_discr_value:
564 return DiscriminantString(Val);
570 bool llvm::dwarf::isValidFormForVersion(Form F, unsigned Version,
572 if (FormVendor(F) == DWARF_VENDOR_DWARF) {
573 unsigned FV = FormVersion(F);
574 return FV > 0 && FV <= Version;