lib/DebugInfo/DWARFDebugInfoEntry.cpp

   1 //===-- DWARFDebugInfoEntry.cpp -------------------------------------------===//
   2 //
   3 //                     The LLVM Compiler Infrastructure
   4 //
   5 // This file is distributed under the University of Illinois Open Source
   6 // License. See LICENSE.TXT for details.
   7 //
   8 //===----------------------------------------------------------------------===//
   9
  10 #include "DWARFDebugInfoEntry.h"
  11 #include "DWARFCompileUnit.h"
  12 #include "DWARFContext.h"
  13 #include "DWARFDebugAbbrev.h"
  14 #include "llvm/DebugInfo/DWARFFormValue.h"
  15 #include "llvm/Support/Debug.h"
  16 #include "llvm/Support/Dwarf.h"
  17 #include "llvm/Support/Format.h"
  18 #include "llvm/Support/raw_ostream.h"
  19 using namespace llvm;
  20 using namespace dwarf;
  21
  22 void DWARFDebugInfoEntryMinimal::dump(raw_ostream &OS, const DWARFUnit *u,
  23                                       unsigned recurseDepth,
  24                                       unsigned indent) const {
  25   DataExtractor debug_info_data = u->getDebugInfoExtractor();
  26   uint32_t offset = Offset;
  27
  28   if (debug_info_data.isValidOffset(offset)) {
  29     uint32_t abbrCode = debug_info_data.getULEB128(&offset);
  30
  31     OS << format("\n0x%8.8x: ", Offset);
  32     if (abbrCode) {
  33       if (AbbrevDecl) {
  34         const char *tagString = TagString(getTag());
  35         if (tagString)
  36           OS.indent(indent) << tagString;
  37         else
  38           OS.indent(indent) << format("DW_TAG_Unknown_%x", getTag());
  39         OS << format(" [%u] %c\n", abbrCode,
  40                      AbbrevDecl->hasChildren() ? '*' : ' ');
  41
  42         // Dump all data in the DIE for the attributes.
  43         const uint32_t numAttributes = AbbrevDecl->getNumAttributes();
  44         for (uint32_t i = 0; i != numAttributes; ++i) {
  45           uint16_t attr = AbbrevDecl->getAttrByIndex(i);
  46           uint16_t form = AbbrevDecl->getFormByIndex(i);
  47           dumpAttribute(OS, u, &offset, attr, form, indent);
  48         }
  49
  50         const DWARFDebugInfoEntryMinimal *child = getFirstChild();
  51         if (recurseDepth > 0 && child) {
  52           while (child) {
  53             child->dump(OS, u, recurseDepth-1, indent+2);
  54             child = child->getSibling();
  55           }
  56         }
  57       } else {
  58         OS << "Abbreviation code not found in 'debug_abbrev' class for code: "
  59            << abbrCode << '\n';
  60       }
  61     } else {
  62       OS.indent(indent) << "NULL\n";
  63     }
  64   }
  65 }
  66
  67 void DWARFDebugInfoEntryMinimal::dumpAttribute(raw_ostream &OS,
  68                                                const DWARFUnit *u,
  69                                                uint32_t *offset_ptr,
  70                                                uint16_t attr, uint16_t form,
  71                                                unsigned indent) const {
  72   OS << "            ";
  73   OS.indent(indent+2);
  74   const char *attrString = AttributeString(attr);
  75   if (attrString)
  76     OS << attrString;
  77   else
  78     OS << format("DW_AT_Unknown_%x", attr);
  79   const char *formString = FormEncodingString(form);
  80   if (formString)
  81     OS << " [" << formString << ']';
  82   else
  83     OS << format(" [DW_FORM_Unknown_%x]", form);
  84
  85   DWARFFormValue formValue(form);
  86
  87   if (!formValue.extractValue(u->getDebugInfoExtractor(), offset_ptr, u))
  88     return;
  89
  90   OS << "\t(";
  91   formValue.dump(OS, u);
  92   OS << ")\n";
  93 }
  94
  95 bool DWARFDebugInfoEntryMinimal::extractFast(const DWARFUnit *U,
  96                                              const uint8_t *FixedFormSizes,
  97                                              uint32_t *OffsetPtr) {
  98   Offset = *OffsetPtr;
  99   DataExtractor DebugInfoData = U->getDebugInfoExtractor();
 100   uint64_t AbbrCode = DebugInfoData.getULEB128(OffsetPtr);
 101   if (0 == AbbrCode) {
 102     // NULL debug tag entry.
 103     AbbrevDecl = NULL;
 104     return true;
 105   }
 106   AbbrevDecl = U->getAbbreviations()->getAbbreviationDeclaration(AbbrCode);
 107   assert(AbbrevDecl);
 108   assert(FixedFormSizes); // For best performance this should be specified!
 109
 110   // Skip all data in the .debug_info for the attributes
 111   for (uint32_t i = 0, n = AbbrevDecl->getNumAttributes(); i < n; ++i) {
 112     uint16_t Form = AbbrevDecl->getFormByIndex(i);
 113
 114     // FIXME: Currently we're checking if this is less than the last
 115     // entry in the fixed_form_sizes table, but this should be changed
 116     // to use dynamic dispatch.
 117     uint8_t FixedFormSize =
 118         (Form < DW_FORM_ref_sig8) ? FixedFormSizes[Form] : 0;
 119     if (FixedFormSize)
 120       *OffsetPtr += FixedFormSize;
 121     else if (!DWARFFormValue::skipValue(Form, DebugInfoData, OffsetPtr,
 122                                         U)) {
 123       // Restore the original offset.
 124       *OffsetPtr = Offset;
 125       return false;
 126     }
 127   }
 128   return true;
 129 }
 130
 131 bool DWARFDebugInfoEntryMinimal::extract(const DWARFUnit *U,
 132                                          uint32_t *OffsetPtr) {
 133   DataExtractor DebugInfoData = U->getDebugInfoExtractor();
 134   const uint32_t UEndOffset = U->getNextUnitOffset();
 135   Offset = *OffsetPtr;
 136   if ((Offset >= UEndOffset) || !DebugInfoData.isValidOffset(Offset))
 137     return false;
 138   uint64_t AbbrCode = DebugInfoData.getULEB128(OffsetPtr);
 139   if (0 == AbbrCode) {
 140     // NULL debug tag entry.
 141     AbbrevDecl = NULL;
 142     return true;
 143   }
 144   AbbrevDecl = U->getAbbreviations()->getAbbreviationDeclaration(AbbrCode);
 145   if (0 == AbbrevDecl) {
 146     // Restore the original offset.
 147     *OffsetPtr = Offset;
 148     return false;
 149   }
 150   bool IsCompileUnitTag = (AbbrevDecl->getTag() == DW_TAG_compile_unit);
 151   if (IsCompileUnitTag)
 152     const_cast<DWARFUnit *>(U)->setBaseAddress(0);
 153
 154   // Skip all data in the .debug_info for the attributes
 155   for (uint32_t i = 0, n = AbbrevDecl->getNumAttributes(); i < n; ++i) {
 156     uint16_t Attr = AbbrevDecl->getAttrByIndex(i);
 157     uint16_t Form = AbbrevDecl->getFormByIndex(i);
 158
 159     if (IsCompileUnitTag &&
 160         ((Attr == DW_AT_entry_pc) || (Attr == DW_AT_low_pc))) {
 161       DWARFFormValue FormValue(Form);
 162       if (FormValue.extractValue(DebugInfoData, OffsetPtr, U)) {
 163         if (Attr == DW_AT_low_pc || Attr == DW_AT_entry_pc)
 164           const_cast<DWARFUnit *>(U)->setBaseAddress(FormValue.getUnsigned());
 165       }
 166     } else if (!DWARFFormValue::skipValue(Form, DebugInfoData, OffsetPtr, U)) {
 167       // Restore the original offset.
 168       *OffsetPtr = Offset;
 169       return false;
 170     }
 171   }
 172   return true;
 173 }
 174
 175 bool DWARFDebugInfoEntryMinimal::isSubprogramDIE() const {
 176   return getTag() == DW_TAG_subprogram;
 177 }
 178
 179 bool DWARFDebugInfoEntryMinimal::isSubroutineDIE() const {
 180   uint32_t Tag = getTag();
 181   return Tag == DW_TAG_subprogram ||
 182          Tag == DW_TAG_inlined_subroutine;
 183 }
 184
 185 bool DWARFDebugInfoEntryMinimal::getAttributeValue(
 186     const DWARFUnit *U, const uint16_t Attr, DWARFFormValue &FormValue) const {
 187   if (!AbbrevDecl)
 188     return false;
 189
 190   uint32_t AttrIdx = AbbrevDecl->findAttributeIndex(Attr);
 191   if (AttrIdx == -1U)
 192     return false;
 193
 194   DataExtractor DebugInfoData = U->getDebugInfoExtractor();
 195   uint32_t DebugInfoOffset = getOffset();
 196
 197   // Skip the abbreviation code so we are at the data for the attributes
 198   DebugInfoData.getULEB128(&DebugInfoOffset);
 199
 200   // Skip preceding attribute values.
 201   for (uint32_t i = 0; i < AttrIdx; ++i) {
 202     DWARFFormValue::skipValue(AbbrevDecl->getFormByIndex(i),
 203                               DebugInfoData, &DebugInfoOffset, U);
 204   }
 205
 206   FormValue = DWARFFormValue(AbbrevDecl->getFormByIndex(AttrIdx));
 207   return FormValue.extractValue(DebugInfoData, &DebugInfoOffset, U);
 208 }
 209
 210 const char *DWARFDebugInfoEntryMinimal::getAttributeValueAsString(
 211     const DWARFUnit *U, const uint16_t Attr, const char *FailValue) const {
 212   DWARFFormValue FormValue;
 213   if (getAttributeValue(U, Attr, FormValue))
 214     return FormValue.getAsCString(U);
 215   return FailValue;
 216 }
 217
 218 uint64_t DWARFDebugInfoEntryMinimal::getAttributeValueAsAddress(
 219     const DWARFUnit *U, const uint16_t Attr, uint64_t FailValue) const {
 220   DWARFFormValue FormValue;
 221   if (getAttributeValue(U, Attr, FormValue))
 222     return FormValue.getAsAddress(U);
 223   return FailValue;
 224 }
 225
 226 uint64_t DWARFDebugInfoEntryMinimal::getAttributeValueAsUnsigned(
 227     const DWARFUnit *U, const uint16_t Attr, uint64_t FailValue) const {
 228   DWARFFormValue FormValue;
 229   if (getAttributeValue(U, Attr, FormValue))
 230     return FormValue.getUnsigned();
 231   return FailValue;
 232 }
 233
 234 uint64_t DWARFDebugInfoEntryMinimal::getAttributeValueAsReference(
 235     const DWARFUnit *U, const uint16_t Attr, uint64_t FailValue) const {
 236   DWARFFormValue FormValue;
 237   if (getAttributeValue(U, Attr, FormValue))
 238       return FormValue.getReference(U);
 239   return FailValue;
 240 }
 241
 242 bool DWARFDebugInfoEntryMinimal::getLowAndHighPC(const DWARFUnit *U,
 243                                                  uint64_t &LowPC,
 244                                                  uint64_t &HighPC) const {
 245   HighPC = -1ULL;
 246   LowPC = getAttributeValueAsAddress(U, DW_AT_low_pc, -1ULL);
 247   // FIXME: Check if HighPC is of class constant (it has different semantics).
 248   if (LowPC != -1ULL)
 249     HighPC = getAttributeValueAsAddress(U, DW_AT_high_pc, -1ULL);
 250   return (HighPC != -1ULL);
 251 }
 252
 253 void DWARFDebugInfoEntryMinimal::buildAddressRangeTable(
 254     const DWARFUnit *U, DWARFDebugAranges *DebugAranges,
 255     uint32_t UOffsetInAranges) const {
 256   if (AbbrevDecl) {
 257     if (isSubprogramDIE()) {
 258       uint64_t LowPC, HighPC;
 259       if (getLowAndHighPC(U, LowPC, HighPC))
 260         DebugAranges->appendRange(UOffsetInAranges, LowPC, HighPC);
 261       // FIXME: try to append ranges from .debug_ranges section.
 262     }
 263
 264     const DWARFDebugInfoEntryMinimal *Child = getFirstChild();
 265     while (Child) {
 266       Child->buildAddressRangeTable(U, DebugAranges, UOffsetInAranges);
 267       Child = Child->getSibling();
 268     }
 269   }
 270 }
 271
 272 bool DWARFDebugInfoEntryMinimal::addressRangeContainsAddress(
 273     const DWARFUnit *U, const uint64_t Address) const {
 274   if (isNULL())
 275     return false;
 276   uint64_t LowPC, HighPC;
 277   if (getLowAndHighPC(U, LowPC, HighPC))
 278     return (LowPC <= Address && Address <= HighPC);
 279   // Try to get address ranges from .debug_ranges section.
 280   uint32_t RangesOffset = getAttributeValueAsReference(U, DW_AT_ranges, -1U);
 281   if (RangesOffset != -1U) {
 282     DWARFDebugRangeList RangeList;
 283     if (U->extractRangeList(RangesOffset, RangeList))
 284       return RangeList.containsAddress(U->getBaseAddress(), Address);
 285   }
 286   return false;
 287 }
 288
 289 const char *
 290 DWARFDebugInfoEntryMinimal::getSubroutineName(const DWARFUnit *U) const {
 291   if (!isSubroutineDIE())
 292     return 0;
 293   // Try to get mangled name if possible.
 294   if (const char *name =
 295       getAttributeValueAsString(U, DW_AT_MIPS_linkage_name, 0))
 296     return name;
 297   if (const char *name = getAttributeValueAsString(U, DW_AT_linkage_name, 0))
 298     return name;
 299   if (const char *name = getAttributeValueAsString(U, DW_AT_name, 0))
 300     return name;
 301   // Try to get name from specification DIE.
 302   uint32_t spec_ref =
 303       getAttributeValueAsReference(U, DW_AT_specification, -1U);
 304   if (spec_ref != -1U) {
 305     DWARFDebugInfoEntryMinimal spec_die;
 306     if (spec_die.extract(U, &spec_ref)) {
 307       if (const char *name = spec_die.getSubroutineName(U))
 308         return name;
 309     }
 310   }
 311   // Try to get name from abstract origin DIE.
 312   uint32_t abs_origin_ref =
 313       getAttributeValueAsReference(U, DW_AT_abstract_origin, -1U);
 314   if (abs_origin_ref != -1U) {
 315     DWARFDebugInfoEntryMinimal abs_origin_die;
 316     if (abs_origin_die.extract(U, &abs_origin_ref)) {
 317       if (const char *name = abs_origin_die.getSubroutineName(U))
 318         return name;
 319     }
 320   }
 321   return 0;
 322 }
 323
 324 void DWARFDebugInfoEntryMinimal::getCallerFrame(const DWARFUnit *U,
 325                                                 uint32_t &CallFile,
 326                                                 uint32_t &CallLine,
 327                                                 uint32_t &CallColumn) const {
 328   CallFile = getAttributeValueAsUnsigned(U, DW_AT_call_file, 0);
 329   CallLine = getAttributeValueAsUnsigned(U, DW_AT_call_line, 0);
 330   CallColumn = getAttributeValueAsUnsigned(U, DW_AT_call_column, 0);
 331 }
 332
 333 DWARFDebugInfoEntryInlinedChain
 334 DWARFDebugInfoEntryMinimal::getInlinedChainForAddress(
 335     const DWARFUnit *U, const uint64_t Address) const {
 336   DWARFDebugInfoEntryInlinedChain InlinedChain;
 337   InlinedChain.U = U;
 338   if (isNULL())
 339     return InlinedChain;
 340   for (const DWARFDebugInfoEntryMinimal *DIE = this; DIE; ) {
 341     // Append current DIE to inlined chain only if it has correct tag
 342     // (e.g. it is not a lexical block).
 343     if (DIE->isSubroutineDIE()) {
 344       InlinedChain.DIEs.push_back(*DIE);
 345     }
 346     // Try to get child which also contains provided address.
 347     const DWARFDebugInfoEntryMinimal *Child = DIE->getFirstChild();
 348     while (Child) {
 349       if (Child->addressRangeContainsAddress(U, Address)) {
 350         // Assume there is only one such child.
 351         break;
 352       }
 353       Child = Child->getSibling();
 354     }
 355     DIE = Child;
 356   }
 357   // Reverse the obtained chain to make the root of inlined chain last.
 358   std::reverse(InlinedChain.DIEs.begin(), InlinedChain.DIEs.end());
 359   return InlinedChain;
 360 }