1 //===-- llvm/CodeGen/DwarfDebug.cpp - Dwarf Debug Framework ---------------===// 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 // This file contains support for writing dwarf debug info into asm files. 11 // 12 //===----------------------------------------------------------------------===// 13 14 #include "ByteStreamer.h" 15 #include "DwarfDebug.h" 16 #include "DIE.h" 17 #include "DIEHash.h" 18 #include "DwarfUnit.h" 19 #include "llvm/ADT/STLExtras.h" 20 #include "llvm/ADT/Statistic.h" 21 #include "llvm/ADT/StringExtras.h" 22 #include "llvm/ADT/Triple.h" 23 #include "llvm/CodeGen/MachineFunction.h" 24 #include "llvm/CodeGen/MachineModuleInfo.h" 25 #include "llvm/IR/Constants.h" 26 #include "llvm/IR/DIBuilder.h" 27 #include "llvm/IR/DataLayout.h" 28 #include "llvm/IR/DebugInfo.h" 29 #include "llvm/IR/Instructions.h" 30 #include "llvm/IR/Module.h" 31 #include "llvm/IR/ValueHandle.h" 32 #include "llvm/MC/MCAsmInfo.h" 33 #include "llvm/MC/MCSection.h" 34 #include "llvm/MC/MCStreamer.h" 35 #include "llvm/MC/MCSymbol.h" 36 #include "llvm/Support/CommandLine.h" 37 #include "llvm/Support/Debug.h" 38 #include "llvm/Support/Dwarf.h" 39 #include "llvm/Support/Endian.h" 40 #include "llvm/Support/ErrorHandling.h" 41 #include "llvm/Support/FormattedStream.h" 42 #include "llvm/Support/LEB128.h" 43 #include "llvm/Support/MD5.h" 44 #include "llvm/Support/Path.h" 45 #include "llvm/Support/Timer.h" 46 #include "llvm/Target/TargetFrameLowering.h" 47 #include "llvm/Target/TargetLoweringObjectFile.h" 48 #include "llvm/Target/TargetMachine.h" 49 #include "llvm/Target/TargetOptions.h" 50 #include "llvm/Target/TargetRegisterInfo.h" 51 using namespace llvm; 52 53 #define DEBUG_TYPE "dwarfdebug" 54 55 static cl::opt<bool> 56 DisableDebugInfoPrinting("disable-debug-info-print", cl::Hidden, 57 cl::desc("Disable debug info printing")); 58 59 static cl::opt<bool> UnknownLocations( 60 "use-unknown-locations", cl::Hidden, 61 cl::desc("Make an absence of debug location information explicit."), 62 cl::init(false)); 63 64 static cl::opt<bool> 65 GenerateGnuPubSections("generate-gnu-dwarf-pub-sections", cl::Hidden, 66 cl::desc("Generate GNU-style pubnames and pubtypes"), 67 cl::init(false)); 68 69 static cl::opt<bool> GenerateARangeSection("generate-arange-section", 70 cl::Hidden, 71 cl::desc("Generate dwarf aranges"), 72 cl::init(false)); 73 74 namespace { 75 enum DefaultOnOff { Default, Enable, Disable }; 76 } 77 78 static cl::opt<DefaultOnOff> 79 DwarfAccelTables("dwarf-accel-tables", cl::Hidden, 80 cl::desc("Output prototype dwarf accelerator tables."), 81 cl::values(clEnumVal(Default, "Default for platform"), 82 clEnumVal(Enable, "Enabled"), 83 clEnumVal(Disable, "Disabled"), clEnumValEnd), 84 cl::init(Default)); 85 86 static cl::opt<DefaultOnOff> 87 SplitDwarf("split-dwarf", cl::Hidden, 88 cl::desc("Output DWARF5 split debug info."), 89 cl::values(clEnumVal(Default, "Default for platform"), 90 clEnumVal(Enable, "Enabled"), 91 clEnumVal(Disable, "Disabled"), clEnumValEnd), 92 cl::init(Default)); 93 94 static cl::opt<DefaultOnOff> 95 DwarfPubSections("generate-dwarf-pub-sections", cl::Hidden, 96 cl::desc("Generate DWARF pubnames and pubtypes sections"), 97 cl::values(clEnumVal(Default, "Default for platform"), 98 clEnumVal(Enable, "Enabled"), 99 clEnumVal(Disable, "Disabled"), clEnumValEnd), 100 cl::init(Default)); 101 102 static const char *const DWARFGroupName = "DWARF Emission"; 103 static const char *const DbgTimerName = "DWARF Debug Writer"; 104 105 //===----------------------------------------------------------------------===// 106 107 /// resolve - Look in the DwarfDebug map for the MDNode that 108 /// corresponds to the reference. 109 template <typename T> T DbgVariable::resolve(DIRef<T> Ref) const { 110 return DD->resolve(Ref); 111 } 112 113 bool DbgVariable::isBlockByrefVariable() const { 114 assert(Var.isVariable() && "Invalid complex DbgVariable!"); 115 return Var.isBlockByrefVariable(DD->getTypeIdentifierMap()); 116 } 117 118 DIType DbgVariable::getType() const { 119 DIType Ty = Var.getType().resolve(DD->getTypeIdentifierMap()); 120 // FIXME: isBlockByrefVariable should be reformulated in terms of complex 121 // addresses instead. 122 if (Var.isBlockByrefVariable(DD->getTypeIdentifierMap())) { 123 /* Byref variables, in Blocks, are declared by the programmer as 124 "SomeType VarName;", but the compiler creates a 125 __Block_byref_x_VarName struct, and gives the variable VarName 126 either the struct, or a pointer to the struct, as its type. This 127 is necessary for various behind-the-scenes things the compiler 128 needs to do with by-reference variables in blocks. 129 130 However, as far as the original *programmer* is concerned, the 131 variable should still have type 'SomeType', as originally declared. 132 133 The following function dives into the __Block_byref_x_VarName 134 struct to find the original type of the variable. This will be 135 passed back to the code generating the type for the Debug 136 Information Entry for the variable 'VarName'. 'VarName' will then 137 have the original type 'SomeType' in its debug information. 138 139 The original type 'SomeType' will be the type of the field named 140 'VarName' inside the __Block_byref_x_VarName struct. 141 142 NOTE: In order for this to not completely fail on the debugger 143 side, the Debug Information Entry for the variable VarName needs to 144 have a DW_AT_location that tells the debugger how to unwind through 145 the pointers and __Block_byref_x_VarName struct to find the actual 146 value of the variable. The function addBlockByrefType does this. */ 147 DIType subType = Ty; 148 uint16_t tag = Ty.getTag(); 149 150 if (tag == dwarf::DW_TAG_pointer_type) 151 subType = resolve(DIDerivedType(Ty).getTypeDerivedFrom()); 152 153 DIArray Elements = DICompositeType(subType).getTypeArray(); 154 for (unsigned i = 0, N = Elements.getNumElements(); i < N; ++i) { 155 DIDerivedType DT(Elements.getElement(i)); 156 if (getName() == DT.getName()) 157 return (resolve(DT.getTypeDerivedFrom())); 158 } 159 } 160 return Ty; 161 } 162 163 static LLVM_CONSTEXPR DwarfAccelTable::Atom TypeAtoms[] = { 164 DwarfAccelTable::Atom(dwarf::DW_ATOM_die_offset, dwarf::DW_FORM_data4), 165 DwarfAccelTable::Atom(dwarf::DW_ATOM_die_tag, dwarf::DW_FORM_data2), 166 DwarfAccelTable::Atom(dwarf::DW_ATOM_type_flags, dwarf::DW_FORM_data1)}; 167 168 DwarfDebug::DwarfDebug(AsmPrinter *A, Module *M) 169 : Asm(A), MMI(Asm->MMI), FirstCU(nullptr), PrevLabel(nullptr), 170 GlobalRangeCount(0), InfoHolder(A, "info_string", DIEValueAllocator), 171 UsedNonDefaultText(false), 172 SkeletonHolder(A, "skel_string", DIEValueAllocator), 173 AccelNames(DwarfAccelTable::Atom(dwarf::DW_ATOM_die_offset, 174 dwarf::DW_FORM_data4)), 175 AccelObjC(DwarfAccelTable::Atom(dwarf::DW_ATOM_die_offset, 176 dwarf::DW_FORM_data4)), 177 AccelNamespace(DwarfAccelTable::Atom(dwarf::DW_ATOM_die_offset, 178 dwarf::DW_FORM_data4)), 179 AccelTypes(TypeAtoms) { 180 181 DwarfInfoSectionSym = DwarfAbbrevSectionSym = DwarfStrSectionSym = nullptr; 182 DwarfDebugRangeSectionSym = DwarfDebugLocSectionSym = nullptr; 183 DwarfLineSectionSym = nullptr; 184 DwarfAddrSectionSym = nullptr; 185 DwarfAbbrevDWOSectionSym = DwarfStrDWOSectionSym = nullptr; 186 FunctionBeginSym = FunctionEndSym = nullptr; 187 CurFn = nullptr; 188 CurMI = nullptr; 189 190 // Turn on accelerator tables for Darwin by default, pubnames by 191 // default for non-Darwin, and handle split dwarf. 192 bool IsDarwin = Triple(A->getTargetTriple()).isOSDarwin(); 193 194 if (DwarfAccelTables == Default) 195 HasDwarfAccelTables = IsDarwin; 196 else 197 HasDwarfAccelTables = DwarfAccelTables == Enable; 198 199 if (SplitDwarf == Default) 200 HasSplitDwarf = false; 201 else 202 HasSplitDwarf = SplitDwarf == Enable; 203 204 if (DwarfPubSections == Default) 205 HasDwarfPubSections = !IsDarwin; 206 else 207 HasDwarfPubSections = DwarfPubSections == Enable; 208 209 unsigned DwarfVersionNumber = Asm->TM.Options.MCOptions.DwarfVersion; 210 DwarfVersion = DwarfVersionNumber ? DwarfVersionNumber 211 : MMI->getModule()->getDwarfVersion(); 212 213 Asm->OutStreamer.getContext().setDwarfVersion(DwarfVersion); 214 215 { 216 NamedRegionTimer T(DbgTimerName, DWARFGroupName, TimePassesIsEnabled); 217 beginModule(); 218 } 219 } 220 221 // Define out of line so we don't have to include DwarfUnit.h in DwarfDebug.h. 222 DwarfDebug::~DwarfDebug() { } 223 224 // Switch to the specified MCSection and emit an assembler 225 // temporary label to it if SymbolStem is specified. 226 static MCSymbol *emitSectionSym(AsmPrinter *Asm, const MCSection *Section, 227 const char *SymbolStem = nullptr) { 228 Asm->OutStreamer.SwitchSection(Section); 229 if (!SymbolStem) 230 return nullptr; 231 232 MCSymbol *TmpSym = Asm->GetTempSymbol(SymbolStem); 233 Asm->OutStreamer.EmitLabel(TmpSym); 234 return TmpSym; 235 } 236 237 static bool isObjCClass(StringRef Name) { 238 return Name.startswith("+") || Name.startswith("-"); 239 } 240 241 static bool hasObjCCategory(StringRef Name) { 242 if (!isObjCClass(Name)) 243 return false; 244 245 return Name.find(") ") != StringRef::npos; 246 } 247 248 static void getObjCClassCategory(StringRef In, StringRef &Class, 249 StringRef &Category) { 250 if (!hasObjCCategory(In)) { 251 Class = In.slice(In.find('[') + 1, In.find(' ')); 252 Category = ""; 253 return; 254 } 255 256 Class = In.slice(In.find('[') + 1, In.find('(')); 257 Category = In.slice(In.find('[') + 1, In.find(' ')); 258 return; 259 } 260 261 static StringRef getObjCMethodName(StringRef In) { 262 return In.slice(In.find(' ') + 1, In.find(']')); 263 } 264 265 // Helper for sorting sections into a stable output order. 266 static bool SectionSort(const MCSection *A, const MCSection *B) { 267 std::string LA = (A ? A->getLabelBeginName() : ""); 268 std::string LB = (B ? B->getLabelBeginName() : ""); 269 return LA < LB; 270 } 271 272 // Add the various names to the Dwarf accelerator table names. 273 // TODO: Determine whether or not we should add names for programs 274 // that do not have a DW_AT_name or DW_AT_linkage_name field - this 275 // is only slightly different than the lookup of non-standard ObjC names. 276 void DwarfDebug::addSubprogramNames(DISubprogram SP, DIE &Die) { 277 if (!SP.isDefinition()) 278 return; 279 addAccelName(SP.getName(), Die); 280 281 // If the linkage name is different than the name, go ahead and output 282 // that as well into the name table. 283 if (SP.getLinkageName() != "" && SP.getName() != SP.getLinkageName()) 284 addAccelName(SP.getLinkageName(), Die); 285 286 // If this is an Objective-C selector name add it to the ObjC accelerator 287 // too. 288 if (isObjCClass(SP.getName())) { 289 StringRef Class, Category; 290 getObjCClassCategory(SP.getName(), Class, Category); 291 addAccelObjC(Class, Die); 292 if (Category != "") 293 addAccelObjC(Category, Die); 294 // Also add the base method name to the name table. 295 addAccelName(getObjCMethodName(SP.getName()), Die); 296 } 297 } 298 299 /// isSubprogramContext - Return true if Context is either a subprogram 300 /// or another context nested inside a subprogram. 301 bool DwarfDebug::isSubprogramContext(const MDNode *Context) { 302 if (!Context) 303 return false; 304 DIDescriptor D(Context); 305 if (D.isSubprogram()) 306 return true; 307 if (D.isType()) 308 return isSubprogramContext(resolve(DIType(Context).getContext())); 309 return false; 310 } 311 312 // Find DIE for the given subprogram and attach appropriate DW_AT_low_pc 313 // and DW_AT_high_pc attributes. If there are global variables in this 314 // scope then create and insert DIEs for these variables. 315 DIE &DwarfDebug::updateSubprogramScopeDIE(DwarfCompileUnit &SPCU, 316 DISubprogram SP) { 317 DIE *SPDie = SPCU.getOrCreateSubprogramDIE(SP); 318 319 attachLowHighPC(SPCU, *SPDie, FunctionBeginSym, FunctionEndSym); 320 321 const TargetRegisterInfo *RI = Asm->TM.getRegisterInfo(); 322 MachineLocation Location(RI->getFrameRegister(*Asm->MF)); 323 SPCU.addAddress(*SPDie, dwarf::DW_AT_frame_base, Location); 324 325 // Add name to the name table, we do this here because we're guaranteed 326 // to have concrete versions of our DW_TAG_subprogram nodes. 327 addSubprogramNames(SP, *SPDie); 328 329 return *SPDie; 330 } 331 332 /// Check whether we should create a DIE for the given Scope, return true 333 /// if we don't create a DIE (the corresponding DIE is null). 334 bool DwarfDebug::isLexicalScopeDIENull(LexicalScope *Scope) { 335 if (Scope->isAbstractScope()) 336 return false; 337 338 // We don't create a DIE if there is no Range. 339 const SmallVectorImpl<InsnRange> &Ranges = Scope->getRanges(); 340 if (Ranges.empty()) 341 return true; 342 343 if (Ranges.size() > 1) 344 return false; 345 346 // We don't create a DIE if we have a single Range and the end label 347 // is null. 348 SmallVectorImpl<InsnRange>::const_iterator RI = Ranges.begin(); 349 MCSymbol *End = getLabelAfterInsn(RI->second); 350 return !End; 351 } 352 353 static void addSectionLabel(AsmPrinter &Asm, DwarfUnit &U, DIE &D, 354 dwarf::Attribute A, const MCSymbol *L, 355 const MCSymbol *Sec) { 356 if (Asm.MAI->doesDwarfUseRelocationsAcrossSections()) 357 U.addSectionLabel(D, A, L); 358 else 359 U.addSectionDelta(D, A, L, Sec); 360 } 361 362 void DwarfDebug::addScopeRangeList(DwarfCompileUnit &TheCU, DIE &ScopeDIE, 363 const SmallVectorImpl<InsnRange> &Range) { 364 // Emit offset in .debug_range as a relocatable label. emitDIE will handle 365 // emitting it appropriately. 366 MCSymbol *RangeSym = Asm->GetTempSymbol("debug_ranges", GlobalRangeCount++); 367 368 // Under fission, ranges are specified by constant offsets relative to the 369 // CU's DW_AT_GNU_ranges_base. 370 if (useSplitDwarf()) 371 TheCU.addSectionDelta(ScopeDIE, dwarf::DW_AT_ranges, RangeSym, 372 DwarfDebugRangeSectionSym); 373 else 374 addSectionLabel(*Asm, TheCU, ScopeDIE, dwarf::DW_AT_ranges, RangeSym, 375 DwarfDebugRangeSectionSym); 376 377 RangeSpanList List(RangeSym); 378 for (const InsnRange &R : Range) { 379 RangeSpan Span(getLabelBeforeInsn(R.first), getLabelAfterInsn(R.second)); 380 List.addRange(std::move(Span)); 381 } 382 383 // Add the range list to the set of ranges to be emitted. 384 TheCU.addRangeList(std::move(List)); 385 } 386 387 void DwarfDebug::attachRangesOrLowHighPC(DwarfCompileUnit &TheCU, DIE &Die, 388 const SmallVectorImpl<InsnRange> &Ranges) { 389 assert(!Ranges.empty()); 390 if (Ranges.size() == 1) 391 attachLowHighPC(TheCU, Die, getLabelBeforeInsn(Ranges.front().first), 392 getLabelAfterInsn(Ranges.front().second)); 393 else 394 addScopeRangeList(TheCU, Die, Ranges); 395 } 396 397 // Construct new DW_TAG_lexical_block for this scope and attach 398 // DW_AT_low_pc/DW_AT_high_pc labels. 399 std::unique_ptr<DIE> 400 DwarfDebug::constructLexicalScopeDIE(DwarfCompileUnit &TheCU, 401 LexicalScope *Scope) { 402 if (isLexicalScopeDIENull(Scope)) 403 return nullptr; 404 405 auto ScopeDIE = make_unique<DIE>(dwarf::DW_TAG_lexical_block); 406 if (Scope->isAbstractScope()) 407 return ScopeDIE; 408 409 attachRangesOrLowHighPC(TheCU, *ScopeDIE, Scope->getRanges()); 410 411 return ScopeDIE; 412 } 413 414 // This scope represents inlined body of a function. Construct DIE to 415 // represent this concrete inlined copy of the function. 416 std::unique_ptr<DIE> 417 DwarfDebug::constructInlinedScopeDIE(DwarfCompileUnit &TheCU, 418 LexicalScope *Scope) { 419 assert(Scope->getScopeNode()); 420 DIScope DS(Scope->getScopeNode()); 421 DISubprogram InlinedSP = getDISubprogram(DS); 422 // Find the subprogram's DwarfCompileUnit in the SPMap in case the subprogram 423 // was inlined from another compile unit. 424 DIE *OriginDIE = AbstractSPDies[InlinedSP]; 425 assert(OriginDIE && "Unable to find original DIE for an inlined subprogram."); 426 427 auto ScopeDIE = make_unique<DIE>(dwarf::DW_TAG_inlined_subroutine); 428 TheCU.addDIEEntry(*ScopeDIE, dwarf::DW_AT_abstract_origin, *OriginDIE); 429 430 attachRangesOrLowHighPC(TheCU, *ScopeDIE, Scope->getRanges()); 431 432 InlinedSubprogramDIEs.insert(OriginDIE); 433 434 // Add the call site information to the DIE. 435 DILocation DL(Scope->getInlinedAt()); 436 TheCU.addUInt(*ScopeDIE, dwarf::DW_AT_call_file, None, 437 TheCU.getOrCreateSourceID(DL.getFilename(), DL.getDirectory())); 438 TheCU.addUInt(*ScopeDIE, dwarf::DW_AT_call_line, None, DL.getLineNumber()); 439 440 // Add name to the name table, we do this here because we're guaranteed 441 // to have concrete versions of our DW_TAG_inlined_subprogram nodes. 442 addSubprogramNames(InlinedSP, *ScopeDIE); 443 444 return ScopeDIE; 445 } 446 447 static std::unique_ptr<DIE> constructVariableDIE(DwarfCompileUnit &TheCU, 448 DbgVariable &DV, 449 const LexicalScope &Scope, 450 DIE *&ObjectPointer) { 451 auto Var = TheCU.constructVariableDIE(DV, Scope.isAbstractScope()); 452 if (DV.isObjectPointer()) 453 ObjectPointer = Var.get(); 454 return Var; 455 } 456 457 DIE *DwarfDebug::createScopeChildrenDIE( 458 DwarfCompileUnit &TheCU, LexicalScope *Scope, 459 SmallVectorImpl<std::unique_ptr<DIE>> &Children) { 460 DIE *ObjectPointer = nullptr; 461 462 // Collect arguments for current function. 463 if (LScopes.isCurrentFunctionScope(Scope)) { 464 for (DbgVariable *ArgDV : CurrentFnArguments) 465 if (ArgDV) 466 Children.push_back( 467 constructVariableDIE(TheCU, *ArgDV, *Scope, ObjectPointer)); 468 469 // If this is a variadic function, add an unspecified parameter. 470 DISubprogram SP(Scope->getScopeNode()); 471 DIArray FnArgs = SP.getType().getTypeArray(); 472 if (FnArgs.getElement(FnArgs.getNumElements() - 1) 473 .isUnspecifiedParameter()) { 474 Children.push_back( 475 make_unique<DIE>(dwarf::DW_TAG_unspecified_parameters)); 476 } 477 } 478 479 // Collect lexical scope children first. 480 for (DbgVariable *DV : ScopeVariables.lookup(Scope)) 481 Children.push_back(constructVariableDIE(TheCU, *DV, *Scope, ObjectPointer)); 482 483 for (LexicalScope *LS : Scope->getChildren()) 484 if (std::unique_ptr<DIE> Nested = constructScopeDIE(TheCU, LS)) 485 Children.push_back(std::move(Nested)); 486 return ObjectPointer; 487 } 488 489 void DwarfDebug::createAndAddScopeChildren(DwarfCompileUnit &TheCU, 490 LexicalScope *Scope, DIE &ScopeDIE) { 491 // We create children when the scope DIE is not null. 492 SmallVector<std::unique_ptr<DIE>, 8> Children; 493 if (DIE *ObjectPointer = createScopeChildrenDIE(TheCU, Scope, Children)) 494 TheCU.addDIEEntry(ScopeDIE, dwarf::DW_AT_object_pointer, *ObjectPointer); 495 496 // Add children 497 for (auto &I : Children) 498 ScopeDIE.addChild(std::move(I)); 499 } 500 501 void DwarfDebug::constructAbstractSubprogramScopeDIE(DwarfCompileUnit &TheCU, 502 LexicalScope *Scope) { 503 assert(Scope && Scope->getScopeNode()); 504 assert(Scope->isAbstractScope()); 505 assert(!Scope->getInlinedAt()); 506 507 DISubprogram SP(Scope->getScopeNode()); 508 509 ProcessedSPNodes.insert(SP); 510 511 DIE *&AbsDef = AbstractSPDies[SP]; 512 if (AbsDef) 513 return; 514 515 // Find the subprogram's DwarfCompileUnit in the SPMap in case the subprogram 516 // was inlined from another compile unit. 517 DwarfCompileUnit &SPCU = *SPMap[SP]; 518 DIE *ContextDIE; 519 520 // Some of this is duplicated from DwarfUnit::getOrCreateSubprogramDIE, with 521 // the important distinction that the DIDescriptor is not associated with the 522 // DIE (since the DIDescriptor will be associated with the concrete DIE, if 523 // any). It could be refactored to some common utility function. 524 if (DISubprogram SPDecl = SP.getFunctionDeclaration()) { 525 ContextDIE = &SPCU.getUnitDie(); 526 SPCU.getOrCreateSubprogramDIE(SPDecl); 527 } else 528 ContextDIE = SPCU.getOrCreateContextDIE(resolve(SP.getContext())); 529 530 // Passing null as the associated DIDescriptor because the abstract definition 531 // shouldn't be found by lookup. 532 AbsDef = &SPCU.createAndAddDIE(dwarf::DW_TAG_subprogram, *ContextDIE, 533 DIDescriptor()); 534 SPCU.applySubprogramAttributesToDefinition(SP, *AbsDef); 535 536 SPCU.addUInt(*AbsDef, dwarf::DW_AT_inline, None, dwarf::DW_INL_inlined); 537 createAndAddScopeChildren(SPCU, Scope, *AbsDef); 538 } 539 540 DIE &DwarfDebug::constructSubprogramScopeDIE(DwarfCompileUnit &TheCU, 541 LexicalScope *Scope) { 542 assert(Scope && Scope->getScopeNode()); 543 assert(!Scope->getInlinedAt()); 544 assert(!Scope->isAbstractScope()); 545 DISubprogram Sub(Scope->getScopeNode()); 546 547 assert(Sub.isSubprogram()); 548 549 ProcessedSPNodes.insert(Sub); 550 551 DIE &ScopeDIE = updateSubprogramScopeDIE(TheCU, Sub); 552 553 createAndAddScopeChildren(TheCU, Scope, ScopeDIE); 554 555 return ScopeDIE; 556 } 557 558 // Construct a DIE for this scope. 559 std::unique_ptr<DIE> DwarfDebug::constructScopeDIE(DwarfCompileUnit &TheCU, 560 LexicalScope *Scope) { 561 if (!Scope || !Scope->getScopeNode()) 562 return nullptr; 563 564 DIScope DS(Scope->getScopeNode()); 565 566 assert((Scope->getInlinedAt() || !DS.isSubprogram()) && 567 "Only handle inlined subprograms here, use " 568 "constructSubprogramScopeDIE for non-inlined " 569 "subprograms"); 570 571 SmallVector<std::unique_ptr<DIE>, 8> Children; 572 573 // We try to create the scope DIE first, then the children DIEs. This will 574 // avoid creating un-used children then removing them later when we find out 575 // the scope DIE is null. 576 std::unique_ptr<DIE> ScopeDIE; 577 if (Scope->getParent() && DS.isSubprogram()) { 578 ScopeDIE = constructInlinedScopeDIE(TheCU, Scope); 579 if (!ScopeDIE) 580 return nullptr; 581 // We create children when the scope DIE is not null. 582 createScopeChildrenDIE(TheCU, Scope, Children); 583 } else { 584 // Early exit when we know the scope DIE is going to be null. 585 if (isLexicalScopeDIENull(Scope)) 586 return nullptr; 587 588 // We create children here when we know the scope DIE is not going to be 589 // null and the children will be added to the scope DIE. 590 createScopeChildrenDIE(TheCU, Scope, Children); 591 592 // There is no need to emit empty lexical block DIE. 593 std::pair<ImportedEntityMap::const_iterator, 594 ImportedEntityMap::const_iterator> Range = 595 std::equal_range(ScopesWithImportedEntities.begin(), 596 ScopesWithImportedEntities.end(), 597 std::pair<const MDNode *, const MDNode *>(DS, nullptr), 598 less_first()); 599 if (Children.empty() && Range.first == Range.second) 600 return nullptr; 601 ScopeDIE = constructLexicalScopeDIE(TheCU, Scope); 602 assert(ScopeDIE && "Scope DIE should not be null."); 603 for (ImportedEntityMap::const_iterator i = Range.first; i != Range.second; 604 ++i) 605 constructImportedEntityDIE(TheCU, i->second, *ScopeDIE); 606 } 607 608 // Add children 609 for (auto &I : Children) 610 ScopeDIE->addChild(std::move(I)); 611 612 return ScopeDIE; 613 } 614 615 void DwarfDebug::addGnuPubAttributes(DwarfUnit &U, DIE &D) const { 616 if (!GenerateGnuPubSections) 617 return; 618 619 U.addFlag(D, dwarf::DW_AT_GNU_pubnames); 620 } 621 622 // Create new DwarfCompileUnit for the given metadata node with tag 623 // DW_TAG_compile_unit. 624 DwarfCompileUnit &DwarfDebug::constructDwarfCompileUnit(DICompileUnit DIUnit) { 625 StringRef FN = DIUnit.getFilename(); 626 CompilationDir = DIUnit.getDirectory(); 627 628 auto OwnedUnit = make_unique<DwarfCompileUnit>( 629 InfoHolder.getUnits().size(), DIUnit, Asm, this, &InfoHolder); 630 DwarfCompileUnit &NewCU = *OwnedUnit; 631 DIE &Die = NewCU.getUnitDie(); 632 InfoHolder.addUnit(std::move(OwnedUnit)); 633 634 // LTO with assembly output shares a single line table amongst multiple CUs. 635 // To avoid the compilation directory being ambiguous, let the line table 636 // explicitly describe the directory of all files, never relying on the 637 // compilation directory. 638 if (!Asm->OutStreamer.hasRawTextSupport() || SingleCU) 639 Asm->OutStreamer.getContext().setMCLineTableCompilationDir( 640 NewCU.getUniqueID(), CompilationDir); 641 642 NewCU.addString(Die, dwarf::DW_AT_producer, DIUnit.getProducer()); 643 NewCU.addUInt(Die, dwarf::DW_AT_language, dwarf::DW_FORM_data2, 644 DIUnit.getLanguage()); 645 NewCU.addString(Die, dwarf::DW_AT_name, FN); 646 647 if (!useSplitDwarf()) { 648 NewCU.initStmtList(DwarfLineSectionSym); 649 650 // If we're using split dwarf the compilation dir is going to be in the 651 // skeleton CU and so we don't need to duplicate it here. 652 if (!CompilationDir.empty()) 653 NewCU.addString(Die, dwarf::DW_AT_comp_dir, CompilationDir); 654 655 addGnuPubAttributes(NewCU, Die); 656 } 657 658 if (DIUnit.isOptimized()) 659 NewCU.addFlag(Die, dwarf::DW_AT_APPLE_optimized); 660 661 StringRef Flags = DIUnit.getFlags(); 662 if (!Flags.empty()) 663 NewCU.addString(Die, dwarf::DW_AT_APPLE_flags, Flags); 664 665 if (unsigned RVer = DIUnit.getRunTimeVersion()) 666 NewCU.addUInt(Die, dwarf::DW_AT_APPLE_major_runtime_vers, 667 dwarf::DW_FORM_data1, RVer); 668 669 if (!FirstCU) 670 FirstCU = &NewCU; 671 672 if (useSplitDwarf()) { 673 NewCU.initSection(Asm->getObjFileLowering().getDwarfInfoDWOSection(), 674 DwarfInfoDWOSectionSym); 675 NewCU.setSkeleton(constructSkeletonCU(NewCU)); 676 } else 677 NewCU.initSection(Asm->getObjFileLowering().getDwarfInfoSection(), 678 DwarfInfoSectionSym); 679 680 CUMap.insert(std::make_pair(DIUnit, &NewCU)); 681 CUDieMap.insert(std::make_pair(&Die, &NewCU)); 682 return NewCU; 683 } 684 685 void DwarfDebug::constructImportedEntityDIE(DwarfCompileUnit &TheCU, 686 const MDNode *N) { 687 DIImportedEntity Module(N); 688 assert(Module.Verify()); 689 if (DIE *D = TheCU.getOrCreateContextDIE(Module.getContext())) 690 constructImportedEntityDIE(TheCU, Module, *D); 691 } 692 693 void DwarfDebug::constructImportedEntityDIE(DwarfCompileUnit &TheCU, 694 const MDNode *N, DIE &Context) { 695 DIImportedEntity Module(N); 696 assert(Module.Verify()); 697 return constructImportedEntityDIE(TheCU, Module, Context); 698 } 699 700 void DwarfDebug::constructImportedEntityDIE(DwarfCompileUnit &TheCU, 701 const DIImportedEntity &Module, 702 DIE &Context) { 703 assert(Module.Verify() && 704 "Use one of the MDNode * overloads to handle invalid metadata"); 705 DIE &IMDie = TheCU.createAndAddDIE(Module.getTag(), Context, Module); 706 DIE *EntityDie; 707 DIDescriptor Entity = resolve(Module.getEntity()); 708 if (Entity.isNameSpace()) 709 EntityDie = TheCU.getOrCreateNameSpace(DINameSpace(Entity)); 710 else if (Entity.isSubprogram()) 711 EntityDie = TheCU.getOrCreateSubprogramDIE(DISubprogram(Entity)); 712 else if (Entity.isType()) 713 EntityDie = TheCU.getOrCreateTypeDIE(DIType(Entity)); 714 else 715 EntityDie = TheCU.getDIE(Entity); 716 TheCU.addSourceLine(IMDie, Module.getLineNumber(), 717 Module.getContext().getFilename(), 718 Module.getContext().getDirectory()); 719 TheCU.addDIEEntry(IMDie, dwarf::DW_AT_import, *EntityDie); 720 StringRef Name = Module.getName(); 721 if (!Name.empty()) 722 TheCU.addString(IMDie, dwarf::DW_AT_name, Name); 723 } 724 725 // Emit all Dwarf sections that should come prior to the content. Create 726 // global DIEs and emit initial debug info sections. This is invoked by 727 // the target AsmPrinter. 728 void DwarfDebug::beginModule() { 729 if (DisableDebugInfoPrinting) 730 return; 731 732 const Module *M = MMI->getModule(); 733 734 // If module has named metadata anchors then use them, otherwise scan the 735 // module using debug info finder to collect debug info. 736 NamedMDNode *CU_Nodes = M->getNamedMetadata("llvm.dbg.cu"); 737 if (!CU_Nodes) 738 return; 739 TypeIdentifierMap = generateDITypeIdentifierMap(CU_Nodes); 740 741 // Emit initial sections so we can reference labels later. 742 emitSectionLabels(); 743 744 SingleCU = CU_Nodes->getNumOperands() == 1; 745 746 for (MDNode *N : CU_Nodes->operands()) { 747 DICompileUnit CUNode(N); 748 DwarfCompileUnit &CU = constructDwarfCompileUnit(CUNode); 749 DIArray ImportedEntities = CUNode.getImportedEntities(); 750 for (unsigned i = 0, e = ImportedEntities.getNumElements(); i != e; ++i) 751 ScopesWithImportedEntities.push_back(std::make_pair( 752 DIImportedEntity(ImportedEntities.getElement(i)).getContext(), 753 ImportedEntities.getElement(i))); 754 std::sort(ScopesWithImportedEntities.begin(), 755 ScopesWithImportedEntities.end(), less_first()); 756 DIArray GVs = CUNode.getGlobalVariables(); 757 for (unsigned i = 0, e = GVs.getNumElements(); i != e; ++i) 758 CU.createGlobalVariableDIE(DIGlobalVariable(GVs.getElement(i))); 759 DIArray SPs = CUNode.getSubprograms(); 760 for (unsigned i = 0, e = SPs.getNumElements(); i != e; ++i) 761 SPMap.insert(std::make_pair(SPs.getElement(i), &CU)); 762 DIArray EnumTypes = CUNode.getEnumTypes(); 763 for (unsigned i = 0, e = EnumTypes.getNumElements(); i != e; ++i) 764 CU.getOrCreateTypeDIE(EnumTypes.getElement(i)); 765 DIArray RetainedTypes = CUNode.getRetainedTypes(); 766 for (unsigned i = 0, e = RetainedTypes.getNumElements(); i != e; ++i) { 767 DIType Ty(RetainedTypes.getElement(i)); 768 // The retained types array by design contains pointers to 769 // MDNodes rather than DIRefs. Unique them here. 770 DIType UniqueTy(resolve(Ty.getRef())); 771 CU.getOrCreateTypeDIE(UniqueTy); 772 } 773 // Emit imported_modules last so that the relevant context is already 774 // available. 775 for (unsigned i = 0, e = ImportedEntities.getNumElements(); i != e; ++i) 776 constructImportedEntityDIE(CU, ImportedEntities.getElement(i)); 777 } 778 779 // Tell MMI that we have debug info. 780 MMI->setDebugInfoAvailability(true); 781 782 // Prime section data. 783 SectionMap[Asm->getObjFileLowering().getTextSection()]; 784 } 785 786 void DwarfDebug::finishVariableDefinitions() { 787 for (const auto &Var : ConcreteVariables) { 788 DIE *VariableDie = Var->getDIE(); 789 // FIXME: There shouldn't be any variables without DIEs. 790 if (!VariableDie) 791 continue; 792 // FIXME: Consider the time-space tradeoff of just storing the unit pointer 793 // in the ConcreteVariables list, rather than looking it up again here. 794 // DIE::getUnit isn't simple - it walks parent pointers, etc. 795 DwarfCompileUnit *Unit = lookupUnit(VariableDie->getUnit()); 796 assert(Unit); 797 DbgVariable *AbsVar = getExistingAbstractVariable(Var->getVariable()); 798 if (AbsVar && AbsVar->getDIE()) { 799 Unit->addDIEEntry(*VariableDie, dwarf::DW_AT_abstract_origin, 800 *AbsVar->getDIE()); 801 } else 802 Unit->applyVariableAttributes(*Var, *VariableDie); 803 } 804 } 805 806 void DwarfDebug::finishSubprogramDefinitions() { 807 const Module *M = MMI->getModule(); 808 809 NamedMDNode *CU_Nodes = M->getNamedMetadata("llvm.dbg.cu"); 810 for (MDNode *N : CU_Nodes->operands()) { 811 DICompileUnit TheCU(N); 812 // Construct subprogram DIE and add variables DIEs. 813 DwarfCompileUnit *SPCU = 814 static_cast<DwarfCompileUnit *>(CUMap.lookup(TheCU)); 815 DIArray Subprograms = TheCU.getSubprograms(); 816 for (unsigned i = 0, e = Subprograms.getNumElements(); i != e; ++i) { 817 DISubprogram SP(Subprograms.getElement(i)); 818 // Perhaps the subprogram is in another CU (such as due to comdat 819 // folding, etc), in which case ignore it here. 820 if (SPMap[SP] != SPCU) 821 continue; 822 DIE *D = SPCU->getDIE(SP); 823 if (DIE *AbsSPDIE = AbstractSPDies.lookup(SP)) { 824 if (D) 825 // If this subprogram has an abstract definition, reference that 826 SPCU->addDIEEntry(*D, dwarf::DW_AT_abstract_origin, *AbsSPDIE); 827 } else { 828 if (!D) 829 // Lazily construct the subprogram if we didn't see either concrete or 830 // inlined versions during codegen. 831 D = SPCU->getOrCreateSubprogramDIE(SP); 832 // And attach the attributes 833 SPCU->applySubprogramAttributesToDefinition(SP, *D); 834 } 835 } 836 } 837 } 838 839 840 // Collect info for variables that were optimized out. 841 void DwarfDebug::collectDeadVariables() { 842 const Module *M = MMI->getModule(); 843 844 if (NamedMDNode *CU_Nodes = M->getNamedMetadata("llvm.dbg.cu")) { 845 for (MDNode *N : CU_Nodes->operands()) { 846 DICompileUnit TheCU(N); 847 // Construct subprogram DIE and add variables DIEs. 848 DwarfCompileUnit *SPCU = 849 static_cast<DwarfCompileUnit *>(CUMap.lookup(TheCU)); 850 assert(SPCU && "Unable to find Compile Unit!"); 851 DIArray Subprograms = TheCU.getSubprograms(); 852 for (unsigned i = 0, e = Subprograms.getNumElements(); i != e; ++i) { 853 DISubprogram SP(Subprograms.getElement(i)); 854 if (ProcessedSPNodes.count(SP) != 0) 855 continue; 856 assert(SP.isSubprogram() && 857 "CU's subprogram list contains a non-subprogram"); 858 assert(SP.isDefinition() && 859 "CU's subprogram list contains a subprogram declaration"); 860 DIArray Variables = SP.getVariables(); 861 if (Variables.getNumElements() == 0) 862 continue; 863 864 DIE *SPDIE = AbstractSPDies.lookup(SP); 865 if (!SPDIE) 866 SPDIE = SPCU->getDIE(SP); 867 assert(SPDIE); 868 for (unsigned vi = 0, ve = Variables.getNumElements(); vi != ve; ++vi) { 869 DIVariable DV(Variables.getElement(vi)); 870 assert(DV.isVariable()); 871 DbgVariable NewVar(DV, this); 872 auto VariableDie = SPCU->constructVariableDIE(NewVar); 873 SPCU->applyVariableAttributes(NewVar, *VariableDie); 874 SPDIE->addChild(std::move(VariableDie)); 875 } 876 } 877 } 878 } 879 } 880 881 void DwarfDebug::finalizeModuleInfo() { 882 finishSubprogramDefinitions(); 883 884 finishVariableDefinitions(); 885 886 // Collect info for variables that were optimized out. 887 collectDeadVariables(); 888 889 // Handle anything that needs to be done on a per-unit basis after 890 // all other generation. 891 for (const auto &TheU : getUnits()) { 892 // Emit DW_AT_containing_type attribute to connect types with their 893 // vtable holding type. 894 TheU->constructContainingTypeDIEs(); 895 896 // Add CU specific attributes if we need to add any. 897 if (TheU->getUnitDie().getTag() == dwarf::DW_TAG_compile_unit) { 898 // If we're splitting the dwarf out now that we've got the entire 899 // CU then add the dwo id to it. 900 DwarfCompileUnit *SkCU = 901 static_cast<DwarfCompileUnit *>(TheU->getSkeleton()); 902 if (useSplitDwarf()) { 903 // Emit a unique identifier for this CU. 904 uint64_t ID = DIEHash(Asm).computeCUSignature(TheU->getUnitDie()); 905 TheU->addUInt(TheU->getUnitDie(), dwarf::DW_AT_GNU_dwo_id, 906 dwarf::DW_FORM_data8, ID); 907 SkCU->addUInt(SkCU->getUnitDie(), dwarf::DW_AT_GNU_dwo_id, 908 dwarf::DW_FORM_data8, ID); 909 910 // We don't keep track of which addresses are used in which CU so this 911 // is a bit pessimistic under LTO. 912 if (!AddrPool.isEmpty()) 913 addSectionLabel(*Asm, *SkCU, SkCU->getUnitDie(), 914 dwarf::DW_AT_GNU_addr_base, DwarfAddrSectionSym, 915 DwarfAddrSectionSym); 916 if (!TheU->getRangeLists().empty()) 917 addSectionLabel(*Asm, *SkCU, SkCU->getUnitDie(), 918 dwarf::DW_AT_GNU_ranges_base, 919 DwarfDebugRangeSectionSym, DwarfDebugRangeSectionSym); 920 } 921 922 // If we have code split among multiple sections or non-contiguous 923 // ranges of code then emit a DW_AT_ranges attribute on the unit that will 924 // remain in the .o file, otherwise add a DW_AT_low_pc. 925 // FIXME: We should use ranges allow reordering of code ala 926 // .subsections_via_symbols in mach-o. This would mean turning on 927 // ranges for all subprogram DIEs for mach-o. 928 DwarfCompileUnit &U = 929 SkCU ? *SkCU : static_cast<DwarfCompileUnit &>(*TheU); 930 unsigned NumRanges = TheU->getRanges().size(); 931 if (NumRanges) { 932 if (NumRanges > 1) { 933 addSectionLabel(*Asm, U, U.getUnitDie(), dwarf::DW_AT_ranges, 934 Asm->GetTempSymbol("cu_ranges", U.getUniqueID()), 935 DwarfDebugRangeSectionSym); 936 937 // A DW_AT_low_pc attribute may also be specified in combination with 938 // DW_AT_ranges to specify the default base address for use in 939 // location lists (see Section 2.6.2) and range lists (see Section 940 // 2.17.3). 941 U.addUInt(U.getUnitDie(), dwarf::DW_AT_low_pc, dwarf::DW_FORM_addr, 942 0); 943 } else { 944 RangeSpan &Range = TheU->getRanges().back(); 945 U.addLocalLabelAddress(U.getUnitDie(), dwarf::DW_AT_low_pc, 946 Range.getStart()); 947 U.addLabelDelta(U.getUnitDie(), dwarf::DW_AT_high_pc, Range.getEnd(), 948 Range.getStart()); 949 } 950 } 951 } 952 } 953 954 // Compute DIE offsets and sizes. 955 InfoHolder.computeSizeAndOffsets(); 956 if (useSplitDwarf()) 957 SkeletonHolder.computeSizeAndOffsets(); 958 } 959 960 void DwarfDebug::endSections() { 961 // Filter labels by section. 962 for (const SymbolCU &SCU : ArangeLabels) { 963 if (SCU.Sym->isInSection()) { 964 // Make a note of this symbol and it's section. 965 const MCSection *Section = &SCU.Sym->getSection(); 966 if (!Section->getKind().isMetadata()) 967 SectionMap[Section].push_back(SCU); 968 } else { 969 // Some symbols (e.g. common/bss on mach-o) can have no section but still 970 // appear in the output. This sucks as we rely on sections to build 971 // arange spans. We can do it without, but it's icky. 972 SectionMap[nullptr].push_back(SCU); 973 } 974 } 975 976 // Build a list of sections used. 977 std::vector<const MCSection *> Sections; 978 for (const auto &it : SectionMap) { 979 const MCSection *Section = it.first; 980 Sections.push_back(Section); 981 } 982 983 // Sort the sections into order. 984 // This is only done to ensure consistent output order across different runs. 985 std::sort(Sections.begin(), Sections.end(), SectionSort); 986 987 // Add terminating symbols for each section. 988 for (unsigned ID = 0, E = Sections.size(); ID != E; ID++) { 989 const MCSection *Section = Sections[ID]; 990 MCSymbol *Sym = nullptr; 991 992 if (Section) { 993 // We can't call MCSection::getLabelEndName, as it's only safe to do so 994 // if we know the section name up-front. For user-created sections, the 995 // resulting label may not be valid to use as a label. (section names can 996 // use a greater set of characters on some systems) 997 Sym = Asm->GetTempSymbol("debug_end", ID); 998 Asm->OutStreamer.SwitchSection(Section); 999 Asm->OutStreamer.EmitLabel(Sym); 1000 } 1001 1002 // Insert a final terminator. 1003 SectionMap[Section].push_back(SymbolCU(nullptr, Sym)); 1004 } 1005 } 1006 1007 // Emit all Dwarf sections that should come after the content. 1008 void DwarfDebug::endModule() { 1009 assert(CurFn == nullptr); 1010 assert(CurMI == nullptr); 1011 1012 if (!FirstCU) 1013 return; 1014 1015 // End any existing sections. 1016 // TODO: Does this need to happen? 1017 endSections(); 1018 1019 // Finalize the debug info for the module. 1020 finalizeModuleInfo(); 1021 1022 emitDebugStr(); 1023 1024 // Emit all the DIEs into a debug info section. 1025 emitDebugInfo(); 1026 1027 // Corresponding abbreviations into a abbrev section. 1028 emitAbbreviations(); 1029 1030 // Emit info into a debug aranges section. 1031 if (GenerateARangeSection) 1032 emitDebugARanges(); 1033 1034 // Emit info into a debug ranges section. 1035 emitDebugRanges(); 1036 1037 if (useSplitDwarf()) { 1038 emitDebugStrDWO(); 1039 emitDebugInfoDWO(); 1040 emitDebugAbbrevDWO(); 1041 emitDebugLineDWO(); 1042 emitDebugLocDWO(); 1043 // Emit DWO addresses. 1044 AddrPool.emit(*Asm, Asm->getObjFileLowering().getDwarfAddrSection()); 1045 } else 1046 // Emit info into a debug loc section. 1047 emitDebugLoc(); 1048 1049 // Emit info into the dwarf accelerator table sections. 1050 if (useDwarfAccelTables()) { 1051 emitAccelNames(); 1052 emitAccelObjC(); 1053 emitAccelNamespaces(); 1054 emitAccelTypes(); 1055 } 1056 1057 // Emit the pubnames and pubtypes sections if requested. 1058 if (HasDwarfPubSections) { 1059 emitDebugPubNames(GenerateGnuPubSections); 1060 emitDebugPubTypes(GenerateGnuPubSections); 1061 } 1062 1063 // clean up. 1064 SPMap.clear(); 1065 AbstractVariables.clear(); 1066 1067 // Reset these for the next Module if we have one. 1068 FirstCU = nullptr; 1069 } 1070 1071 // Find abstract variable, if any, associated with Var. 1072 DbgVariable *DwarfDebug::getExistingAbstractVariable(const DIVariable &DV, 1073 DIVariable &Cleansed) { 1074 LLVMContext &Ctx = DV->getContext(); 1075 // More then one inlined variable corresponds to one abstract variable. 1076 // FIXME: This duplication of variables when inlining should probably be 1077 // removed. It's done to allow each DIVariable to describe its location 1078 // because the DebugLoc on the dbg.value/declare isn't accurate. We should 1079 // make it accurate then remove this duplication/cleansing stuff. 1080 Cleansed = cleanseInlinedVariable(DV, Ctx); 1081 auto I = AbstractVariables.find(Cleansed); 1082 if (I != AbstractVariables.end()) 1083 return I->second.get(); 1084 return nullptr; 1085 } 1086 1087 DbgVariable *DwarfDebug::getExistingAbstractVariable(const DIVariable &DV) { 1088 DIVariable Cleansed; 1089 return getExistingAbstractVariable(DV, Cleansed); 1090 } 1091 1092 void DwarfDebug::createAbstractVariable(const DIVariable &Var, 1093 LexicalScope *Scope) { 1094 auto AbsDbgVariable = make_unique<DbgVariable>(Var, this); 1095 addScopeVariable(Scope, AbsDbgVariable.get()); 1096 AbstractVariables[Var] = std::move(AbsDbgVariable); 1097 } 1098 1099 void DwarfDebug::ensureAbstractVariableIsCreated(const DIVariable &DV, 1100 const MDNode *ScopeNode) { 1101 DIVariable Cleansed = DV; 1102 if (getExistingAbstractVariable(DV, Cleansed)) 1103 return; 1104 1105 createAbstractVariable(Cleansed, LScopes.getOrCreateAbstractScope(ScopeNode)); 1106 } 1107 1108 void 1109 DwarfDebug::ensureAbstractVariableIsCreatedIfScoped(const DIVariable &DV, 1110 const MDNode *ScopeNode) { 1111 DIVariable Cleansed = DV; 1112 if (getExistingAbstractVariable(DV, Cleansed)) 1113 return; 1114 1115 if (LexicalScope *Scope = LScopes.findAbstractScope(ScopeNode)) 1116 createAbstractVariable(Cleansed, Scope); 1117 } 1118 1119 // If Var is a current function argument then add it to CurrentFnArguments list. 1120 bool DwarfDebug::addCurrentFnArgument(DbgVariable *Var, LexicalScope *Scope) { 1121 if (!LScopes.isCurrentFunctionScope(Scope)) 1122 return false; 1123 DIVariable DV = Var->getVariable(); 1124 if (DV.getTag() != dwarf::DW_TAG_arg_variable) 1125 return false; 1126 unsigned ArgNo = DV.getArgNumber(); 1127 if (ArgNo == 0) 1128 return false; 1129 1130 size_t Size = CurrentFnArguments.size(); 1131 if (Size == 0) 1132 CurrentFnArguments.resize(CurFn->getFunction()->arg_size()); 1133 // llvm::Function argument size is not good indicator of how many 1134 // arguments does the function have at source level. 1135 if (ArgNo > Size) 1136 CurrentFnArguments.resize(ArgNo * 2); 1137 CurrentFnArguments[ArgNo - 1] = Var; 1138 return true; 1139 } 1140 1141 // Collect variable information from side table maintained by MMI. 1142 void DwarfDebug::collectVariableInfoFromMMITable( 1143 SmallPtrSet<const MDNode *, 16> &Processed) { 1144 for (const auto &VI : MMI->getVariableDbgInfo()) { 1145 if (!VI.Var) 1146 continue; 1147 Processed.insert(VI.Var); 1148 DIVariable DV(VI.Var); 1149 LexicalScope *Scope = LScopes.findLexicalScope(VI.Loc); 1150 1151 // If variable scope is not found then skip this variable. 1152 if (!Scope) 1153 continue; 1154 1155 ensureAbstractVariableIsCreatedIfScoped(DV, Scope->getScopeNode()); 1156 ConcreteVariables.push_back(make_unique<DbgVariable>(DV, this)); 1157 DbgVariable *RegVar = ConcreteVariables.back().get(); 1158 RegVar->setFrameIndex(VI.Slot); 1159 addScopeVariable(Scope, RegVar); 1160 } 1161 } 1162 1163 // Get .debug_loc entry for the instruction range starting at MI. 1164 static DebugLocEntry::Value getDebugLocValue(const MachineInstr *MI) { 1165 const MDNode *Var = MI->getDebugVariable(); 1166 1167 assert(MI->getNumOperands() == 3); 1168 if (MI->getOperand(0).isReg()) { 1169 MachineLocation MLoc; 1170 // If the second operand is an immediate, this is a 1171 // register-indirect address. 1172 if (!MI->getOperand(1).isImm()) 1173 MLoc.set(MI->getOperand(0).getReg()); 1174 else 1175 MLoc.set(MI->getOperand(0).getReg(), MI->getOperand(1).getImm()); 1176 return DebugLocEntry::Value(Var, MLoc); 1177 } 1178 if (MI->getOperand(0).isImm()) 1179 return DebugLocEntry::Value(Var, MI->getOperand(0).getImm()); 1180 if (MI->getOperand(0).isFPImm()) 1181 return DebugLocEntry::Value(Var, MI->getOperand(0).getFPImm()); 1182 if (MI->getOperand(0).isCImm()) 1183 return DebugLocEntry::Value(Var, MI->getOperand(0).getCImm()); 1184 1185 llvm_unreachable("Unexpected 3 operand DBG_VALUE instruction!"); 1186 } 1187 1188 // Find variables for each lexical scope. 1189 void 1190 DwarfDebug::collectVariableInfo(SmallPtrSet<const MDNode *, 16> &Processed) { 1191 LexicalScope *FnScope = LScopes.getCurrentFunctionScope(); 1192 DwarfCompileUnit *TheCU = SPMap.lookup(FnScope->getScopeNode()); 1193 1194 // Grab the variable info that was squirreled away in the MMI side-table. 1195 collectVariableInfoFromMMITable(Processed); 1196 1197 for (const auto &I : DbgValues) { 1198 DIVariable DV(I.first); 1199 if (Processed.count(DV)) 1200 continue; 1201 1202 // Instruction ranges, specifying where DV is accessible. 1203 const auto &Ranges = I.second; 1204 if (Ranges.empty()) 1205 continue; 1206 1207 LexicalScope *Scope = nullptr; 1208 if (DV.getTag() == dwarf::DW_TAG_arg_variable && 1209 DISubprogram(DV.getContext()).describes(CurFn->getFunction())) 1210 Scope = LScopes.getCurrentFunctionScope(); 1211 else if (MDNode *IA = DV.getInlinedAt()) { 1212 DebugLoc DL = DebugLoc::getFromDILocation(IA); 1213 Scope = LScopes.findInlinedScope(DebugLoc::get( 1214 DL.getLine(), DL.getCol(), DV.getContext(), IA)); 1215 } else 1216 Scope = LScopes.findLexicalScope(DV.getContext()); 1217 // If variable scope is not found then skip this variable. 1218 if (!Scope) 1219 continue; 1220 1221 Processed.insert(DV); 1222 const MachineInstr *MInsn = Ranges.front().first; 1223 assert(MInsn->isDebugValue() && "History must begin with debug value"); 1224 ensureAbstractVariableIsCreatedIfScoped(DV, Scope->getScopeNode()); 1225 ConcreteVariables.push_back(make_unique<DbgVariable>(MInsn, this)); 1226 DbgVariable *RegVar = ConcreteVariables.back().get(); 1227 addScopeVariable(Scope, RegVar); 1228 1229 // Check if the first DBG_VALUE is valid for the rest of the function. 1230 if (Ranges.size() == 1 && Ranges.front().second == nullptr) 1231 continue; 1232 1233 // Handle multiple DBG_VALUE instructions describing one variable. 1234 RegVar->setDotDebugLocOffset(DotDebugLocEntries.size()); 1235 1236 DotDebugLocEntries.resize(DotDebugLocEntries.size() + 1); 1237 DebugLocList &LocList = DotDebugLocEntries.back(); 1238 LocList.Label = 1239 Asm->GetTempSymbol("debug_loc", DotDebugLocEntries.size() - 1); 1240 SmallVector<DebugLocEntry, 4> &DebugLoc = LocList.List; 1241 for (auto I = Ranges.begin(), E = Ranges.end(); I != E; ++I) { 1242 const MachineInstr *Begin = I->first; 1243 const MachineInstr *End = I->second; 1244 assert(Begin->isDebugValue() && "Invalid History entry"); 1245 1246 // Check if a variable is unaccessible in this range. 1247 if (Begin->getNumOperands() > 1 && Begin->getOperand(0).isReg() && 1248 !Begin->getOperand(0).getReg()) 1249 continue; 1250 DEBUG(dbgs() << "DotDebugLoc Pair:\n" << "\t" << *Begin); 1251 if (End != nullptr) 1252 DEBUG(dbgs() << "\t" << *End); 1253 else 1254 DEBUG(dbgs() << "\tNULL\n"); 1255 1256 const MCSymbol *StartLabel = getLabelBeforeInsn(Begin); 1257 assert(StartLabel && "Forgot label before DBG_VALUE starting a range!"); 1258 1259 const MCSymbol *EndLabel; 1260 if (End != nullptr) 1261 EndLabel = getLabelAfterInsn(End); 1262 else if (std::next(I) == Ranges.end()) 1263 EndLabel = FunctionEndSym; 1264 else 1265 EndLabel = getLabelBeforeInsn(std::next(I)->first); 1266 assert(EndLabel && "Forgot label after instruction ending a range!"); 1267 1268 DebugLocEntry Loc(StartLabel, EndLabel, getDebugLocValue(Begin), TheCU); 1269 if (DebugLoc.empty() || !DebugLoc.back().Merge(Loc)) 1270 DebugLoc.push_back(std::move(Loc)); 1271 } 1272 } 1273 1274 // Collect info for variables that were optimized out. 1275 DIArray Variables = DISubprogram(FnScope->getScopeNode()).getVariables(); 1276 for (unsigned i = 0, e = Variables.getNumElements(); i != e; ++i) { 1277 DIVariable DV(Variables.getElement(i)); 1278 assert(DV.isVariable()); 1279 if (!Processed.insert(DV)) 1280 continue; 1281 if (LexicalScope *Scope = LScopes.findLexicalScope(DV.getContext())) { 1282 ensureAbstractVariableIsCreatedIfScoped(DV, Scope->getScopeNode()); 1283 ConcreteVariables.push_back(make_unique<DbgVariable>(DV, this)); 1284 addScopeVariable(Scope, ConcreteVariables.back().get()); 1285 } 1286 } 1287 } 1288 1289 // Return Label preceding the instruction. 1290 MCSymbol *DwarfDebug::getLabelBeforeInsn(const MachineInstr *MI) { 1291 MCSymbol *Label = LabelsBeforeInsn.lookup(MI); 1292 assert(Label && "Didn't insert label before instruction"); 1293 return Label; 1294 } 1295 1296 // Return Label immediately following the instruction. 1297 MCSymbol *DwarfDebug::getLabelAfterInsn(const MachineInstr *MI) { 1298 return LabelsAfterInsn.lookup(MI); 1299 } 1300 1301 // Process beginning of an instruction. 1302 void DwarfDebug::beginInstruction(const MachineInstr *MI) { 1303 assert(CurMI == nullptr); 1304 CurMI = MI; 1305 // Check if source location changes, but ignore DBG_VALUE locations. 1306 if (!MI->isDebugValue()) { 1307 DebugLoc DL = MI->getDebugLoc(); 1308 if (DL != PrevInstLoc && (!DL.isUnknown() || UnknownLocations)) { 1309 unsigned Flags = 0; 1310 PrevInstLoc = DL; 1311 if (DL == PrologEndLoc) { 1312 Flags |= DWARF2_FLAG_PROLOGUE_END; 1313 PrologEndLoc = DebugLoc(); 1314 } 1315 if (PrologEndLoc.isUnknown()) 1316 Flags |= DWARF2_FLAG_IS_STMT; 1317 1318 if (!DL.isUnknown()) { 1319 const MDNode *Scope = DL.getScope(Asm->MF->getFunction()->getContext()); 1320 recordSourceLine(DL.getLine(), DL.getCol(), Scope, Flags); 1321 } else 1322 recordSourceLine(0, 0, nullptr, 0); 1323 } 1324 } 1325 1326 // Insert labels where requested. 1327 DenseMap<const MachineInstr *, MCSymbol *>::iterator I = 1328 LabelsBeforeInsn.find(MI); 1329 1330 // No label needed. 1331 if (I == LabelsBeforeInsn.end()) 1332 return; 1333 1334 // Label already assigned. 1335 if (I->second) 1336 return; 1337 1338 if (!PrevLabel) { 1339 PrevLabel = MMI->getContext().CreateTempSymbol(); 1340 Asm->OutStreamer.EmitLabel(PrevLabel); 1341 } 1342 I->second = PrevLabel; 1343 } 1344 1345 // Process end of an instruction. 1346 void DwarfDebug::endInstruction() { 1347 assert(CurMI != nullptr); 1348 // Don't create a new label after DBG_VALUE instructions. 1349 // They don't generate code. 1350 if (!CurMI->isDebugValue()) 1351 PrevLabel = nullptr; 1352 1353 DenseMap<const MachineInstr *, MCSymbol *>::iterator I = 1354 LabelsAfterInsn.find(CurMI); 1355 CurMI = nullptr; 1356 1357 // No label needed. 1358 if (I == LabelsAfterInsn.end()) 1359 return; 1360 1361 // Label already assigned. 1362 if (I->second) 1363 return; 1364 1365 // We need a label after this instruction. 1366 if (!PrevLabel) { 1367 PrevLabel = MMI->getContext().CreateTempSymbol(); 1368 Asm->OutStreamer.EmitLabel(PrevLabel); 1369 } 1370 I->second = PrevLabel; 1371 } 1372 1373 // Each LexicalScope has first instruction and last instruction to mark 1374 // beginning and end of a scope respectively. Create an inverse map that list 1375 // scopes starts (and ends) with an instruction. One instruction may start (or 1376 // end) multiple scopes. Ignore scopes that are not reachable. 1377 void DwarfDebug::identifyScopeMarkers() { 1378 SmallVector<LexicalScope *, 4> WorkList; 1379 WorkList.push_back(LScopes.getCurrentFunctionScope()); 1380 while (!WorkList.empty()) { 1381 LexicalScope *S = WorkList.pop_back_val(); 1382 1383 const SmallVectorImpl<LexicalScope *> &Children = S->getChildren(); 1384 if (!Children.empty()) 1385 WorkList.append(Children.begin(), Children.end()); 1386 1387 if (S->isAbstractScope()) 1388 continue; 1389 1390 for (const InsnRange &R : S->getRanges()) { 1391 assert(R.first && "InsnRange does not have first instruction!"); 1392 assert(R.second && "InsnRange does not have second instruction!"); 1393 requestLabelBeforeInsn(R.first); 1394 requestLabelAfterInsn(R.second); 1395 } 1396 } 1397 } 1398 1399 static DebugLoc findPrologueEndLoc(const MachineFunction *MF) { 1400 // First known non-DBG_VALUE and non-frame setup location marks 1401 // the beginning of the function body. 1402 for (const auto &MBB : *MF) 1403 for (const auto &MI : MBB) 1404 if (!MI.isDebugValue() && !MI.getFlag(MachineInstr::FrameSetup) && 1405 !MI.getDebugLoc().isUnknown()) 1406 return MI.getDebugLoc(); 1407 return DebugLoc(); 1408 } 1409 1410 // Gather pre-function debug information. Assumes being called immediately 1411 // after the function entry point has been emitted. 1412 void DwarfDebug::beginFunction(const MachineFunction *MF) { 1413 CurFn = MF; 1414 1415 // If there's no debug info for the function we're not going to do anything. 1416 if (!MMI->hasDebugInfo()) 1417 return; 1418 1419 // Grab the lexical scopes for the function, if we don't have any of those 1420 // then we're not going to be able to do anything. 1421 LScopes.initialize(*MF); 1422 if (LScopes.empty()) 1423 return; 1424 1425 assert(DbgValues.empty() && "DbgValues map wasn't cleaned!"); 1426 1427 // Make sure that each lexical scope will have a begin/end label. 1428 identifyScopeMarkers(); 1429 1430 // Set DwarfDwarfCompileUnitID in MCContext to the Compile Unit this function 1431 // belongs to so that we add to the correct per-cu line table in the 1432 // non-asm case. 1433 LexicalScope *FnScope = LScopes.getCurrentFunctionScope(); 1434 DwarfCompileUnit *TheCU = SPMap.lookup(FnScope->getScopeNode()); 1435 assert(TheCU && "Unable to find compile unit!"); 1436 if (Asm->OutStreamer.hasRawTextSupport()) 1437 // Use a single line table if we are generating assembly. 1438 Asm->OutStreamer.getContext().setDwarfCompileUnitID(0); 1439 else 1440 Asm->OutStreamer.getContext().setDwarfCompileUnitID(TheCU->getUniqueID()); 1441 1442 // Emit a label for the function so that we have a beginning address. 1443 FunctionBeginSym = Asm->GetTempSymbol("func_begin", Asm->getFunctionNumber()); 1444 // Assumes in correct section after the entry point. 1445 Asm->OutStreamer.EmitLabel(FunctionBeginSym); 1446 1447 // Calculate history for local variables. 1448 calculateDbgValueHistory(MF, Asm->TM.getRegisterInfo(), DbgValues); 1449 1450 // Request labels for the full history. 1451 for (const auto &I : DbgValues) { 1452 const auto &Ranges = I.second; 1453 if (Ranges.empty()) 1454 continue; 1455 1456 // The first mention of a function argument gets the FunctionBeginSym 1457 // label, so arguments are visible when breaking at function entry. 1458 DIVariable DV(I.first); 1459 if (DV.isVariable() && DV.getTag() == dwarf::DW_TAG_arg_variable && 1460 getDISubprogram(DV.getContext()).describes(MF->getFunction())) 1461 LabelsBeforeInsn[Ranges.front().first] = FunctionBeginSym; 1462 1463 for (const auto &Range : Ranges) { 1464 requestLabelBeforeInsn(Range.first); 1465 if (Range.second) 1466 requestLabelAfterInsn(Range.second); 1467 } 1468 } 1469 1470 PrevInstLoc = DebugLoc(); 1471 PrevLabel = FunctionBeginSym; 1472 1473 // Record beginning of function. 1474 PrologEndLoc = findPrologueEndLoc(MF); 1475 if (!PrologEndLoc.isUnknown()) { 1476 DebugLoc FnStartDL = 1477 PrologEndLoc.getFnDebugLoc(MF->getFunction()->getContext()); 1478 recordSourceLine( 1479 FnStartDL.getLine(), FnStartDL.getCol(), 1480 FnStartDL.getScope(MF->getFunction()->getContext()), 1481 // We'd like to list the prologue as "not statements" but GDB behaves 1482 // poorly if we do that. Revisit this with caution/GDB (7.5+) testing. 1483 DWARF2_FLAG_IS_STMT); 1484 } 1485 } 1486 1487 void DwarfDebug::addScopeVariable(LexicalScope *LS, DbgVariable *Var) { 1488 if (addCurrentFnArgument(Var, LS)) 1489 return; 1490 SmallVectorImpl<DbgVariable *> &Vars = ScopeVariables[LS]; 1491 DIVariable DV = Var->getVariable(); 1492 // Variables with positive arg numbers are parameters. 1493 if (unsigned ArgNum = DV.getArgNumber()) { 1494 // Keep all parameters in order at the start of the variable list to ensure 1495 // function types are correct (no out-of-order parameters) 1496 // 1497 // This could be improved by only doing it for optimized builds (unoptimized 1498 // builds have the right order to begin with), searching from the back (this 1499 // would catch the unoptimized case quickly), or doing a binary search 1500 // rather than linear search. 1501 SmallVectorImpl<DbgVariable *>::iterator I = Vars.begin(); 1502 while (I != Vars.end()) { 1503 unsigned CurNum = (*I)->getVariable().getArgNumber(); 1504 // A local (non-parameter) variable has been found, insert immediately 1505 // before it. 1506 if (CurNum == 0) 1507 break; 1508 // A later indexed parameter has been found, insert immediately before it. 1509 if (CurNum > ArgNum) 1510 break; 1511 ++I; 1512 } 1513 Vars.insert(I, Var); 1514 return; 1515 } 1516 1517 Vars.push_back(Var); 1518 } 1519 1520 // Gather and emit post-function debug information. 1521 void DwarfDebug::endFunction(const MachineFunction *MF) { 1522 // Every beginFunction(MF) call should be followed by an endFunction(MF) call, 1523 // though the beginFunction may not be called at all. 1524 // We should handle both cases. 1525 if (!CurFn) 1526 CurFn = MF; 1527 else 1528 assert(CurFn == MF); 1529 assert(CurFn != nullptr); 1530 1531 if (!MMI->hasDebugInfo() || LScopes.empty()) { 1532 // If we don't have a lexical scope for this function then there will 1533 // be a hole in the range information. Keep note of this by setting the 1534 // previously used section to nullptr. 1535 PrevSection = nullptr; 1536 PrevCU = nullptr; 1537 CurFn = nullptr; 1538 return; 1539 } 1540 1541 // Define end label for subprogram. 1542 FunctionEndSym = Asm->GetTempSymbol("func_end", Asm->getFunctionNumber()); 1543 // Assumes in correct section after the entry point. 1544 Asm->OutStreamer.EmitLabel(FunctionEndSym); 1545 1546 // Set DwarfDwarfCompileUnitID in MCContext to default value. 1547 Asm->OutStreamer.getContext().setDwarfCompileUnitID(0); 1548 1549 SmallPtrSet<const MDNode *, 16> ProcessedVars; 1550 collectVariableInfo(ProcessedVars); 1551 1552 LexicalScope *FnScope = LScopes.getCurrentFunctionScope(); 1553 DwarfCompileUnit &TheCU = *SPMap.lookup(FnScope->getScopeNode()); 1554 1555 // Construct abstract scopes. 1556 for (LexicalScope *AScope : LScopes.getAbstractScopesList()) { 1557 DISubprogram SP(AScope->getScopeNode()); 1558 assert(SP.isSubprogram()); 1559 // Collect info for variables that were optimized out. 1560 DIArray Variables = SP.getVariables(); 1561 for (unsigned i = 0, e = Variables.getNumElements(); i != e; ++i) { 1562 DIVariable DV(Variables.getElement(i)); 1563 assert(DV && DV.isVariable()); 1564 if (!ProcessedVars.insert(DV)) 1565 continue; 1566 ensureAbstractVariableIsCreated(DV, DV.getContext()); 1567 } 1568 constructAbstractSubprogramScopeDIE(TheCU, AScope); 1569 } 1570 1571 DIE &CurFnDIE = constructSubprogramScopeDIE(TheCU, FnScope); 1572 if (!CurFn->getTarget().Options.DisableFramePointerElim(*CurFn)) 1573 TheCU.addFlag(CurFnDIE, dwarf::DW_AT_APPLE_omit_frame_ptr); 1574 1575 // Add the range of this function to the list of ranges for the CU. 1576 RangeSpan Span(FunctionBeginSym, FunctionEndSym); 1577 TheCU.addRange(std::move(Span)); 1578 PrevSection = Asm->getCurrentSection(); 1579 PrevCU = &TheCU; 1580 1581 // Clear debug info 1582 // Ownership of DbgVariables is a bit subtle - ScopeVariables owns all the 1583 // DbgVariables except those that are also in AbstractVariables (since they 1584 // can be used cross-function) 1585 ScopeVariables.clear(); 1586 CurrentFnArguments.clear(); 1587 DbgValues.clear(); 1588 LabelsBeforeInsn.clear(); 1589 LabelsAfterInsn.clear(); 1590 PrevLabel = nullptr; 1591 CurFn = nullptr; 1592 } 1593 1594 // Register a source line with debug info. Returns the unique label that was 1595 // emitted and which provides correspondence to the source line list. 1596 void DwarfDebug::recordSourceLine(unsigned Line, unsigned Col, const MDNode *S, 1597 unsigned Flags) { 1598 StringRef Fn; 1599 StringRef Dir; 1600 unsigned Src = 1; 1601 unsigned Discriminator = 0; 1602 if (DIScope Scope = DIScope(S)) { 1603 assert(Scope.isScope()); 1604 Fn = Scope.getFilename(); 1605 Dir = Scope.getDirectory(); 1606 if (Scope.isLexicalBlock()) 1607 Discriminator = DILexicalBlock(S).getDiscriminator(); 1608 1609 unsigned CUID = Asm->OutStreamer.getContext().getDwarfCompileUnitID(); 1610 Src = static_cast<DwarfCompileUnit &>(*InfoHolder.getUnits()[CUID]) 1611 .getOrCreateSourceID(Fn, Dir); 1612 } 1613 Asm->OutStreamer.EmitDwarfLocDirective(Src, Line, Col, Flags, 0, 1614 Discriminator, Fn); 1615 } 1616 1617 //===----------------------------------------------------------------------===// 1618 // Emit Methods 1619 //===----------------------------------------------------------------------===// 1620 1621 // Emit initial Dwarf sections with a label at the start of each one. 1622 void DwarfDebug::emitSectionLabels() { 1623 const TargetLoweringObjectFile &TLOF = Asm->getObjFileLowering(); 1624 1625 // Dwarf sections base addresses. 1626 DwarfInfoSectionSym = 1627 emitSectionSym(Asm, TLOF.getDwarfInfoSection(), "section_info"); 1628 if (useSplitDwarf()) 1629 DwarfInfoDWOSectionSym = 1630 emitSectionSym(Asm, TLOF.getDwarfInfoDWOSection(), "section_info_dwo"); 1631 DwarfAbbrevSectionSym = 1632 emitSectionSym(Asm, TLOF.getDwarfAbbrevSection(), "section_abbrev"); 1633 if (useSplitDwarf()) 1634 DwarfAbbrevDWOSectionSym = emitSectionSym( 1635 Asm, TLOF.getDwarfAbbrevDWOSection(), "section_abbrev_dwo"); 1636 if (GenerateARangeSection) 1637 emitSectionSym(Asm, TLOF.getDwarfARangesSection()); 1638 1639 DwarfLineSectionSym = 1640 emitSectionSym(Asm, TLOF.getDwarfLineSection(), "section_line"); 1641 if (GenerateGnuPubSections) { 1642 DwarfGnuPubNamesSectionSym = 1643 emitSectionSym(Asm, TLOF.getDwarfGnuPubNamesSection()); 1644 DwarfGnuPubTypesSectionSym = 1645 emitSectionSym(Asm, TLOF.getDwarfGnuPubTypesSection()); 1646 } else if (HasDwarfPubSections) { 1647 emitSectionSym(Asm, TLOF.getDwarfPubNamesSection()); 1648 emitSectionSym(Asm, TLOF.getDwarfPubTypesSection()); 1649 } 1650 1651 DwarfStrSectionSym = 1652 emitSectionSym(Asm, TLOF.getDwarfStrSection(), "info_string"); 1653 if (useSplitDwarf()) { 1654 DwarfStrDWOSectionSym = 1655 emitSectionSym(Asm, TLOF.getDwarfStrDWOSection(), "skel_string"); 1656 DwarfAddrSectionSym = 1657 emitSectionSym(Asm, TLOF.getDwarfAddrSection(), "addr_sec"); 1658 DwarfDebugLocSectionSym = 1659 emitSectionSym(Asm, TLOF.getDwarfLocDWOSection(), "skel_loc"); 1660 } else 1661 DwarfDebugLocSectionSym = 1662 emitSectionSym(Asm, TLOF.getDwarfLocSection(), "section_debug_loc"); 1663 DwarfDebugRangeSectionSym = 1664 emitSectionSym(Asm, TLOF.getDwarfRangesSection(), "debug_range"); 1665 } 1666 1667 // Recursively emits a debug information entry. 1668 void DwarfDebug::emitDIE(DIE &Die) { 1669 // Get the abbreviation for this DIE. 1670 const DIEAbbrev &Abbrev = Die.getAbbrev(); 1671 1672 // Emit the code (index) for the abbreviation. 1673 if (Asm->isVerbose()) 1674 Asm->OutStreamer.AddComment("Abbrev [" + Twine(Abbrev.getNumber()) + 1675 "] 0x" + Twine::utohexstr(Die.getOffset()) + 1676 ":0x" + Twine::utohexstr(Die.getSize()) + " " + 1677 dwarf::TagString(Abbrev.getTag())); 1678 Asm->EmitULEB128(Abbrev.getNumber()); 1679 1680 const SmallVectorImpl<DIEValue *> &Values = Die.getValues(); 1681 const SmallVectorImpl<DIEAbbrevData> &AbbrevData = Abbrev.getData(); 1682 1683 // Emit the DIE attribute values. 1684 for (unsigned i = 0, N = Values.size(); i < N; ++i) { 1685 dwarf::Attribute Attr = AbbrevData[i].getAttribute(); 1686 dwarf::Form Form = AbbrevData[i].getForm(); 1687 assert(Form && "Too many attributes for DIE (check abbreviation)"); 1688 1689 if (Asm->isVerbose()) { 1690 Asm->OutStreamer.AddComment(dwarf::AttributeString(Attr)); 1691 if (Attr == dwarf::DW_AT_accessibility) 1692 Asm->OutStreamer.AddComment(dwarf::AccessibilityString( 1693 cast<DIEInteger>(Values[i])->getValue())); 1694 } 1695 1696 // Emit an attribute using the defined form. 1697 Values[i]->EmitValue(Asm, Form); 1698 } 1699 1700 // Emit the DIE children if any. 1701 if (Abbrev.hasChildren()) { 1702 for (auto &Child : Die.getChildren()) 1703 emitDIE(*Child); 1704 1705 Asm->OutStreamer.AddComment("End Of Children Mark"); 1706 Asm->EmitInt8(0); 1707 } 1708 } 1709 1710 // Emit the debug info section. 1711 void DwarfDebug::emitDebugInfo() { 1712 DwarfFile &Holder = useSplitDwarf() ? SkeletonHolder : InfoHolder; 1713 1714 Holder.emitUnits(this, DwarfAbbrevSectionSym); 1715 } 1716 1717 // Emit the abbreviation section. 1718 void DwarfDebug::emitAbbreviations() { 1719 DwarfFile &Holder = useSplitDwarf() ? SkeletonHolder : InfoHolder; 1720 1721 Holder.emitAbbrevs(Asm->getObjFileLowering().getDwarfAbbrevSection()); 1722 } 1723 1724 // Emit the last address of the section and the end of the line matrix. 1725 void DwarfDebug::emitEndOfLineMatrix(unsigned SectionEnd) { 1726 // Define last address of section. 1727 Asm->OutStreamer.AddComment("Extended Op"); 1728 Asm->EmitInt8(0); 1729 1730 Asm->OutStreamer.AddComment("Op size"); 1731 Asm->EmitInt8(Asm->getDataLayout().getPointerSize() + 1); 1732 Asm->OutStreamer.AddComment("DW_LNE_set_address"); 1733 Asm->EmitInt8(dwarf::DW_LNE_set_address); 1734 1735 Asm->OutStreamer.AddComment("Section end label"); 1736 1737 Asm->OutStreamer.EmitSymbolValue( 1738 Asm->GetTempSymbol("section_end", SectionEnd), 1739 Asm->getDataLayout().getPointerSize()); 1740 1741 // Mark end of matrix. 1742 Asm->OutStreamer.AddComment("DW_LNE_end_sequence"); 1743 Asm->EmitInt8(0); 1744 Asm->EmitInt8(1); 1745 Asm->EmitInt8(1); 1746 } 1747 1748 // Emit visible names into a hashed accelerator table section. 1749 void DwarfDebug::emitAccelNames() { 1750 AccelNames.FinalizeTable(Asm, "Names"); 1751 Asm->OutStreamer.SwitchSection( 1752 Asm->getObjFileLowering().getDwarfAccelNamesSection()); 1753 MCSymbol *SectionBegin = Asm->GetTempSymbol("names_begin"); 1754 Asm->OutStreamer.EmitLabel(SectionBegin); 1755 1756 // Emit the full data. 1757 AccelNames.Emit(Asm, SectionBegin, &InfoHolder); 1758 } 1759 1760 // Emit objective C classes and categories into a hashed accelerator table 1761 // section. 1762 void DwarfDebug::emitAccelObjC() { 1763 AccelObjC.FinalizeTable(Asm, "ObjC"); 1764 Asm->OutStreamer.SwitchSection( 1765 Asm->getObjFileLowering().getDwarfAccelObjCSection()); 1766 MCSymbol *SectionBegin = Asm->GetTempSymbol("objc_begin"); 1767 Asm->OutStreamer.EmitLabel(SectionBegin); 1768 1769 // Emit the full data. 1770 AccelObjC.Emit(Asm, SectionBegin, &InfoHolder); 1771 } 1772 1773 // Emit namespace dies into a hashed accelerator table. 1774 void DwarfDebug::emitAccelNamespaces() { 1775 AccelNamespace.FinalizeTable(Asm, "namespac"); 1776 Asm->OutStreamer.SwitchSection( 1777 Asm->getObjFileLowering().getDwarfAccelNamespaceSection()); 1778 MCSymbol *SectionBegin = Asm->GetTempSymbol("namespac_begin"); 1779 Asm->OutStreamer.EmitLabel(SectionBegin); 1780 1781 // Emit the full data. 1782 AccelNamespace.Emit(Asm, SectionBegin, &InfoHolder); 1783 } 1784 1785 // Emit type dies into a hashed accelerator table. 1786 void DwarfDebug::emitAccelTypes() { 1787 1788 AccelTypes.FinalizeTable(Asm, "types"); 1789 Asm->OutStreamer.SwitchSection( 1790 Asm->getObjFileLowering().getDwarfAccelTypesSection()); 1791 MCSymbol *SectionBegin = Asm->GetTempSymbol("types_begin"); 1792 Asm->OutStreamer.EmitLabel(SectionBegin); 1793 1794 // Emit the full data. 1795 AccelTypes.Emit(Asm, SectionBegin, &InfoHolder); 1796 } 1797 1798 // Public name handling. 1799 // The format for the various pubnames: 1800 // 1801 // dwarf pubnames - offset/name pairs where the offset is the offset into the CU 1802 // for the DIE that is named. 1803 // 1804 // gnu pubnames - offset/index value/name tuples where the offset is the offset 1805 // into the CU and the index value is computed according to the type of value 1806 // for the DIE that is named. 1807 // 1808 // For type units the offset is the offset of the skeleton DIE. For split dwarf 1809 // it's the offset within the debug_info/debug_types dwo section, however, the 1810 // reference in the pubname header doesn't change. 1811 1812 /// computeIndexValue - Compute the gdb index value for the DIE and CU. 1813 static dwarf::PubIndexEntryDescriptor computeIndexValue(DwarfUnit *CU, 1814 const DIE *Die) { 1815 dwarf::GDBIndexEntryLinkage Linkage = dwarf::GIEL_STATIC; 1816 1817 // We could have a specification DIE that has our most of our knowledge, 1818 // look for that now. 1819 DIEValue *SpecVal = Die->findAttribute(dwarf::DW_AT_specification); 1820 if (SpecVal) { 1821 DIE &SpecDIE = cast<DIEEntry>(SpecVal)->getEntry(); 1822 if (SpecDIE.findAttribute(dwarf::DW_AT_external)) 1823 Linkage = dwarf::GIEL_EXTERNAL; 1824 } else if (Die->findAttribute(dwarf::DW_AT_external)) 1825 Linkage = dwarf::GIEL_EXTERNAL; 1826 1827 switch (Die->getTag()) { 1828 case dwarf::DW_TAG_class_type: 1829 case dwarf::DW_TAG_structure_type: 1830 case dwarf::DW_TAG_union_type: 1831 case dwarf::DW_TAG_enumeration_type: 1832 return dwarf::PubIndexEntryDescriptor( 1833 dwarf::GIEK_TYPE, CU->getLanguage() != dwarf::DW_LANG_C_plus_plus 1834 ? dwarf::GIEL_STATIC 1835 : dwarf::GIEL_EXTERNAL); 1836 case dwarf::DW_TAG_typedef: 1837 case dwarf::DW_TAG_base_type: 1838 case dwarf::DW_TAG_subrange_type: 1839 return dwarf::PubIndexEntryDescriptor(dwarf::GIEK_TYPE, dwarf::GIEL_STATIC); 1840 case dwarf::DW_TAG_namespace: 1841 return dwarf::GIEK_TYPE; 1842 case dwarf::DW_TAG_subprogram: 1843 return dwarf::PubIndexEntryDescriptor(dwarf::GIEK_FUNCTION, Linkage); 1844 case dwarf::DW_TAG_constant: 1845 case dwarf::DW_TAG_variable: 1846 return dwarf::PubIndexEntryDescriptor(dwarf::GIEK_VARIABLE, Linkage); 1847 case dwarf::DW_TAG_enumerator: 1848 return dwarf::PubIndexEntryDescriptor(dwarf::GIEK_VARIABLE, 1849 dwarf::GIEL_STATIC); 1850 default: 1851 return dwarf::GIEK_NONE; 1852 } 1853 } 1854 1855 /// emitDebugPubNames - Emit visible names into a debug pubnames section. 1856 /// 1857 void DwarfDebug::emitDebugPubNames(bool GnuStyle) { 1858 const MCSection *PSec = 1859 GnuStyle ? Asm->getObjFileLowering().getDwarfGnuPubNamesSection() 1860 : Asm->getObjFileLowering().getDwarfPubNamesSection(); 1861 1862 emitDebugPubSection(GnuStyle, PSec, "Names", &DwarfUnit::getGlobalNames); 1863 } 1864 1865 void DwarfDebug::emitDebugPubSection( 1866 bool GnuStyle, const MCSection *PSec, StringRef Name, 1867 const StringMap<const DIE *> &(DwarfUnit::*Accessor)() const) { 1868 for (const auto &NU : CUMap) { 1869 DwarfCompileUnit *TheU = NU.second; 1870 1871 const auto &Globals = (TheU->*Accessor)(); 1872 1873 if (Globals.empty()) 1874 continue; 1875 1876 if (auto Skeleton = static_cast<DwarfCompileUnit *>(TheU->getSkeleton())) 1877 TheU = Skeleton; 1878 unsigned ID = TheU->getUniqueID(); 1879 1880 // Start the dwarf pubnames section. 1881 Asm->OutStreamer.SwitchSection(PSec); 1882 1883 // Emit the header. 1884 Asm->OutStreamer.AddComment("Length of Public " + Name + " Info"); 1885 MCSymbol *BeginLabel = Asm->GetTempSymbol("pub" + Name + "_begin", ID); 1886 MCSymbol *EndLabel = Asm->GetTempSymbol("pub" + Name + "_end", ID); 1887 Asm->EmitLabelDifference(EndLabel, BeginLabel, 4); 1888 1889 Asm->OutStreamer.EmitLabel(BeginLabel); 1890 1891 Asm->OutStreamer.AddComment("DWARF Version"); 1892 Asm->EmitInt16(dwarf::DW_PUBNAMES_VERSION); 1893 1894 Asm->OutStreamer.AddComment("Offset of Compilation Unit Info"); 1895 Asm->EmitSectionOffset(TheU->getLabelBegin(), TheU->getSectionSym()); 1896 1897 Asm->OutStreamer.AddComment("Compilation Unit Length"); 1898 Asm->EmitLabelDifference(TheU->getLabelEnd(), TheU->getLabelBegin(), 4); 1899 1900 // Emit the pubnames for this compilation unit. 1901 for (const auto &GI : Globals) { 1902 const char *Name = GI.getKeyData(); 1903 const DIE *Entity = GI.second; 1904 1905 Asm->OutStreamer.AddComment("DIE offset"); 1906 Asm->EmitInt32(Entity->getOffset()); 1907 1908 if (GnuStyle) { 1909 dwarf::PubIndexEntryDescriptor Desc = computeIndexValue(TheU, Entity); 1910 Asm->OutStreamer.AddComment( 1911 Twine("Kind: ") + dwarf::GDBIndexEntryKindString(Desc.Kind) + ", " + 1912 dwarf::GDBIndexEntryLinkageString(Desc.Linkage)); 1913 Asm->EmitInt8(Desc.toBits()); 1914 } 1915 1916 Asm->OutStreamer.AddComment("External Name"); 1917 Asm->OutStreamer.EmitBytes(StringRef(Name, GI.getKeyLength() + 1)); 1918 } 1919 1920 Asm->OutStreamer.AddComment("End Mark"); 1921 Asm->EmitInt32(0); 1922 Asm->OutStreamer.EmitLabel(EndLabel); 1923 } 1924 } 1925 1926 void DwarfDebug::emitDebugPubTypes(bool GnuStyle) { 1927 const MCSection *PSec = 1928 GnuStyle ? Asm->getObjFileLowering().getDwarfGnuPubTypesSection() 1929 : Asm->getObjFileLowering().getDwarfPubTypesSection(); 1930 1931 emitDebugPubSection(GnuStyle, PSec, "Types", &DwarfUnit::getGlobalTypes); 1932 } 1933 1934 // Emit visible names into a debug str section. 1935 void DwarfDebug::emitDebugStr() { 1936 DwarfFile &Holder = useSplitDwarf() ? SkeletonHolder : InfoHolder; 1937 Holder.emitStrings(Asm->getObjFileLowering().getDwarfStrSection()); 1938 } 1939 1940 void DwarfDebug::emitDebugLocEntry(ByteStreamer &Streamer, 1941 const DebugLocEntry &Entry) { 1942 assert(Entry.getValues().size() == 1 && 1943 "multi-value entries are not supported yet."); 1944 const DebugLocEntry::Value Value = Entry.getValues()[0]; 1945 DIVariable DV(Value.getVariable()); 1946 if (Value.isInt()) { 1947 DIBasicType BTy(resolve(DV.getType())); 1948 if (BTy.Verify() && (BTy.getEncoding() == dwarf::DW_ATE_signed || 1949 BTy.getEncoding() == dwarf::DW_ATE_signed_char)) { 1950 Streamer.EmitInt8(dwarf::DW_OP_consts, "DW_OP_consts"); 1951 Streamer.EmitSLEB128(Value.getInt()); 1952 } else { 1953 Streamer.EmitInt8(dwarf::DW_OP_constu, "DW_OP_constu"); 1954 Streamer.EmitULEB128(Value.getInt()); 1955 } 1956 } else if (Value.isLocation()) { 1957 MachineLocation Loc = Value.getLoc(); 1958 if (!DV.hasComplexAddress()) 1959 // Regular entry. 1960 Asm->EmitDwarfRegOp(Streamer, Loc, DV.isIndirect()); 1961 else { 1962 // Complex address entry. 1963 unsigned N = DV.getNumAddrElements(); 1964 unsigned i = 0; 1965 if (N >= 2 && DV.getAddrElement(0) == DIBuilder::OpPlus) { 1966 if (Loc.getOffset()) { 1967 i = 2; 1968 Asm->EmitDwarfRegOp(Streamer, Loc, DV.isIndirect()); 1969 Streamer.EmitInt8(dwarf::DW_OP_deref, "DW_OP_deref"); 1970 Streamer.EmitInt8(dwarf::DW_OP_plus_uconst, "DW_OP_plus_uconst"); 1971 Streamer.EmitSLEB128(DV.getAddrElement(1)); 1972 } else { 1973 // If first address element is OpPlus then emit 1974 // DW_OP_breg + Offset instead of DW_OP_reg + Offset. 1975 MachineLocation TLoc(Loc.getReg(), DV.getAddrElement(1)); 1976 Asm->EmitDwarfRegOp(Streamer, TLoc, DV.isIndirect()); 1977 i = 2; 1978 } 1979 } else { 1980 Asm->EmitDwarfRegOp(Streamer, Loc, DV.isIndirect()); 1981 } 1982 1983 // Emit remaining complex address elements. 1984 for (; i < N; ++i) { 1985 uint64_t Element = DV.getAddrElement(i); 1986 if (Element == DIBuilder::OpPlus) { 1987 Streamer.EmitInt8(dwarf::DW_OP_plus_uconst, "DW_OP_plus_uconst"); 1988 Streamer.EmitULEB128(DV.getAddrElement(++i)); 1989 } else if (Element == DIBuilder::OpDeref) { 1990 if (!Loc.isReg()) 1991 Streamer.EmitInt8(dwarf::DW_OP_deref, "DW_OP_deref"); 1992 } else 1993 llvm_unreachable("unknown Opcode found in complex address"); 1994 } 1995 } 1996 } 1997 // else ... ignore constant fp. There is not any good way to 1998 // to represent them here in dwarf. 1999 // FIXME: ^ 2000 } 2001 2002 void DwarfDebug::emitDebugLocEntryLocation(const DebugLocEntry &Entry) { 2003 Asm->OutStreamer.AddComment("Loc expr size"); 2004 MCSymbol *begin = Asm->OutStreamer.getContext().CreateTempSymbol(); 2005 MCSymbol *end = Asm->OutStreamer.getContext().CreateTempSymbol(); 2006 Asm->EmitLabelDifference(end, begin, 2); 2007 Asm->OutStreamer.EmitLabel(begin); 2008 // Emit the entry. 2009 APByteStreamer Streamer(*Asm); 2010 emitDebugLocEntry(Streamer, Entry); 2011 // Close the range. 2012 Asm->OutStreamer.EmitLabel(end); 2013 } 2014 2015 // Emit locations into the debug loc section. 2016 void DwarfDebug::emitDebugLoc() { 2017 // Start the dwarf loc section. 2018 Asm->OutStreamer.SwitchSection( 2019 Asm->getObjFileLowering().getDwarfLocSection()); 2020 unsigned char Size = Asm->getDataLayout().getPointerSize(); 2021 for (const auto &DebugLoc : DotDebugLocEntries) { 2022 Asm->OutStreamer.EmitLabel(DebugLoc.Label); 2023 for (const auto &Entry : DebugLoc.List) { 2024 // Set up the range. This range is relative to the entry point of the 2025 // compile unit. This is a hard coded 0 for low_pc when we're emitting 2026 // ranges, or the DW_AT_low_pc on the compile unit otherwise. 2027 const DwarfCompileUnit *CU = Entry.getCU(); 2028 if (CU->getRanges().size() == 1) { 2029 // Grab the begin symbol from the first range as our base. 2030 const MCSymbol *Base = CU->getRanges()[0].getStart(); 2031 Asm->EmitLabelDifference(Entry.getBeginSym(), Base, Size); 2032 Asm->EmitLabelDifference(Entry.getEndSym(), Base, Size); 2033 } else { 2034 Asm->OutStreamer.EmitSymbolValue(Entry.getBeginSym(), Size); 2035 Asm->OutStreamer.EmitSymbolValue(Entry.getEndSym(), Size); 2036 } 2037 2038 emitDebugLocEntryLocation(Entry); 2039 } 2040 Asm->OutStreamer.EmitIntValue(0, Size); 2041 Asm->OutStreamer.EmitIntValue(0, Size); 2042 } 2043 } 2044 2045 void DwarfDebug::emitDebugLocDWO() { 2046 Asm->OutStreamer.SwitchSection( 2047 Asm->getObjFileLowering().getDwarfLocDWOSection()); 2048 for (const auto &DebugLoc : DotDebugLocEntries) { 2049 Asm->OutStreamer.EmitLabel(DebugLoc.Label); 2050 for (const auto &Entry : DebugLoc.List) { 2051 // Just always use start_length for now - at least that's one address 2052 // rather than two. We could get fancier and try to, say, reuse an 2053 // address we know we've emitted elsewhere (the start of the function? 2054 // The start of the CU or CU subrange that encloses this range?) 2055 Asm->EmitInt8(dwarf::DW_LLE_start_length_entry); 2056 unsigned idx = AddrPool.getIndex(Entry.getBeginSym()); 2057 Asm->EmitULEB128(idx); 2058 Asm->EmitLabelDifference(Entry.getEndSym(), Entry.getBeginSym(), 4); 2059 2060 emitDebugLocEntryLocation(Entry); 2061 } 2062 Asm->EmitInt8(dwarf::DW_LLE_end_of_list_entry); 2063 } 2064 } 2065 2066 struct ArangeSpan { 2067 const MCSymbol *Start, *End; 2068 }; 2069 2070 // Emit a debug aranges section, containing a CU lookup for any 2071 // address we can tie back to a CU. 2072 void DwarfDebug::emitDebugARanges() { 2073 // Start the dwarf aranges section. 2074 Asm->OutStreamer.SwitchSection( 2075 Asm->getObjFileLowering().getDwarfARangesSection()); 2076 2077 typedef DenseMap<DwarfCompileUnit *, std::vector<ArangeSpan>> SpansType; 2078 2079 SpansType Spans; 2080 2081 // Build a list of sections used. 2082 std::vector<const MCSection *> Sections; 2083 for (const auto &it : SectionMap) { 2084 const MCSection *Section = it.first; 2085 Sections.push_back(Section); 2086 } 2087 2088 // Sort the sections into order. 2089 // This is only done to ensure consistent output order across different runs. 2090 std::sort(Sections.begin(), Sections.end(), SectionSort); 2091 2092 // Build a set of address spans, sorted by CU. 2093 for (const MCSection *Section : Sections) { 2094 SmallVector<SymbolCU, 8> &List = SectionMap[Section]; 2095 if (List.size() < 2) 2096 continue; 2097 2098 // Sort the symbols by offset within the section. 2099 std::sort(List.begin(), List.end(), 2100 [&](const SymbolCU &A, const SymbolCU &B) { 2101 unsigned IA = A.Sym ? Asm->OutStreamer.GetSymbolOrder(A.Sym) : 0; 2102 unsigned IB = B.Sym ? Asm->OutStreamer.GetSymbolOrder(B.Sym) : 0; 2103 2104 // Symbols with no order assigned should be placed at the end. 2105 // (e.g. section end labels) 2106 if (IA == 0) 2107 return false; 2108 if (IB == 0) 2109 return true; 2110 return IA < IB; 2111 }); 2112 2113 // If we have no section (e.g. common), just write out 2114 // individual spans for each symbol. 2115 if (!Section) { 2116 for (const SymbolCU &Cur : List) { 2117 ArangeSpan Span; 2118 Span.Start = Cur.Sym; 2119 Span.End = nullptr; 2120 if (Cur.CU) 2121 Spans[Cur.CU].push_back(Span); 2122 } 2123 } else { 2124 // Build spans between each label. 2125 const MCSymbol *StartSym = List[0].Sym; 2126 for (size_t n = 1, e = List.size(); n < e; n++) { 2127 const SymbolCU &Prev = List[n - 1]; 2128 const SymbolCU &Cur = List[n]; 2129 2130 // Try and build the longest span we can within the same CU. 2131 if (Cur.CU != Prev.CU) { 2132 ArangeSpan Span; 2133 Span.Start = StartSym; 2134 Span.End = Cur.Sym; 2135 Spans[Prev.CU].push_back(Span); 2136 StartSym = Cur.Sym; 2137 } 2138 } 2139 } 2140 } 2141 2142 unsigned PtrSize = Asm->getDataLayout().getPointerSize(); 2143 2144 // Build a list of CUs used. 2145 std::vector<DwarfCompileUnit *> CUs; 2146 for (const auto &it : Spans) { 2147 DwarfCompileUnit *CU = it.first; 2148 CUs.push_back(CU); 2149 } 2150 2151 // Sort the CU list (again, to ensure consistent output order). 2152 std::sort(CUs.begin(), CUs.end(), [](const DwarfUnit *A, const DwarfUnit *B) { 2153 return A->getUniqueID() < B->getUniqueID(); 2154 }); 2155 2156 // Emit an arange table for each CU we used. 2157 for (DwarfCompileUnit *CU : CUs) { 2158 std::vector<ArangeSpan> &List = Spans[CU]; 2159 2160 // Emit size of content not including length itself. 2161 unsigned ContentSize = 2162 sizeof(int16_t) + // DWARF ARange version number 2163 sizeof(int32_t) + // Offset of CU in the .debug_info section 2164 sizeof(int8_t) + // Pointer Size (in bytes) 2165 sizeof(int8_t); // Segment Size (in bytes) 2166 2167 unsigned TupleSize = PtrSize * 2; 2168 2169 // 7.20 in the Dwarf specs requires the table to be aligned to a tuple. 2170 unsigned Padding = 2171 OffsetToAlignment(sizeof(int32_t) + ContentSize, TupleSize); 2172 2173 ContentSize += Padding; 2174 ContentSize += (List.size() + 1) * TupleSize; 2175 2176 // For each compile unit, write the list of spans it covers. 2177 Asm->OutStreamer.AddComment("Length of ARange Set"); 2178 Asm->EmitInt32(ContentSize); 2179 Asm->OutStreamer.AddComment("DWARF Arange version number"); 2180 Asm->EmitInt16(dwarf::DW_ARANGES_VERSION); 2181 Asm->OutStreamer.AddComment("Offset Into Debug Info Section"); 2182 Asm->EmitSectionOffset(CU->getLocalLabelBegin(), CU->getLocalSectionSym()); 2183 Asm->OutStreamer.AddComment("Address Size (in bytes)"); 2184 Asm->EmitInt8(PtrSize); 2185 Asm->OutStreamer.AddComment("Segment Size (in bytes)"); 2186 Asm->EmitInt8(0); 2187 2188 Asm->OutStreamer.EmitFill(Padding, 0xff); 2189 2190 for (const ArangeSpan &Span : List) { 2191 Asm->EmitLabelReference(Span.Start, PtrSize); 2192 2193 // Calculate the size as being from the span start to it's end. 2194 if (Span.End) { 2195 Asm->EmitLabelDifference(Span.End, Span.Start, PtrSize); 2196 } else { 2197 // For symbols without an end marker (e.g. common), we 2198 // write a single arange entry containing just that one symbol. 2199 uint64_t Size = SymSize[Span.Start]; 2200 if (Size == 0) 2201 Size = 1; 2202 2203 Asm->OutStreamer.EmitIntValue(Size, PtrSize); 2204 } 2205 } 2206 2207 Asm->OutStreamer.AddComment("ARange terminator"); 2208 Asm->OutStreamer.EmitIntValue(0, PtrSize); 2209 Asm->OutStreamer.EmitIntValue(0, PtrSize); 2210 } 2211 } 2212 2213 // Emit visible names into a debug ranges section. 2214 void DwarfDebug::emitDebugRanges() { 2215 // Start the dwarf ranges section. 2216 Asm->OutStreamer.SwitchSection( 2217 Asm->getObjFileLowering().getDwarfRangesSection()); 2218 2219 // Size for our labels. 2220 unsigned char Size = Asm->getDataLayout().getPointerSize(); 2221 2222 // Grab the specific ranges for the compile units in the module. 2223 for (const auto &I : CUMap) { 2224 DwarfCompileUnit *TheCU = I.second; 2225 2226 // Iterate over the misc ranges for the compile units in the module. 2227 for (const RangeSpanList &List : TheCU->getRangeLists()) { 2228 // Emit our symbol so we can find the beginning of the range. 2229 Asm->OutStreamer.EmitLabel(List.getSym()); 2230 2231 for (const RangeSpan &Range : List.getRanges()) { 2232 const MCSymbol *Begin = Range.getStart(); 2233 const MCSymbol *End = Range.getEnd(); 2234 assert(Begin && "Range without a begin symbol?"); 2235 assert(End && "Range without an end symbol?"); 2236 if (TheCU->getRanges().size() == 1) { 2237 // Grab the begin symbol from the first range as our base. 2238 const MCSymbol *Base = TheCU->getRanges()[0].getStart(); 2239 Asm->EmitLabelDifference(Begin, Base, Size); 2240 Asm->EmitLabelDifference(End, Base, Size); 2241 } else { 2242 Asm->OutStreamer.EmitSymbolValue(Begin, Size); 2243 Asm->OutStreamer.EmitSymbolValue(End, Size); 2244 } 2245 } 2246 2247 // And terminate the list with two 0 values. 2248 Asm->OutStreamer.EmitIntValue(0, Size); 2249 Asm->OutStreamer.EmitIntValue(0, Size); 2250 } 2251 2252 // Now emit a range for the CU itself. 2253 if (TheCU->getRanges().size() > 1) { 2254 Asm->OutStreamer.EmitLabel( 2255 Asm->GetTempSymbol("cu_ranges", TheCU->getUniqueID())); 2256 for (const RangeSpan &Range : TheCU->getRanges()) { 2257 const MCSymbol *Begin = Range.getStart(); 2258 const MCSymbol *End = Range.getEnd(); 2259 assert(Begin && "Range without a begin symbol?"); 2260 assert(End && "Range without an end symbol?"); 2261 Asm->OutStreamer.EmitSymbolValue(Begin, Size); 2262 Asm->OutStreamer.EmitSymbolValue(End, Size); 2263 } 2264 // And terminate the list with two 0 values. 2265 Asm->OutStreamer.EmitIntValue(0, Size); 2266 Asm->OutStreamer.EmitIntValue(0, Size); 2267 } 2268 } 2269 } 2270 2271 // DWARF5 Experimental Separate Dwarf emitters. 2272 2273 void DwarfDebug::initSkeletonUnit(const DwarfUnit &U, DIE &Die, 2274 std::unique_ptr<DwarfUnit> NewU) { 2275 NewU->addLocalString(Die, dwarf::DW_AT_GNU_dwo_name, 2276 U.getCUNode().getSplitDebugFilename()); 2277 2278 if (!CompilationDir.empty()) 2279 NewU->addLocalString(Die, dwarf::DW_AT_comp_dir, CompilationDir); 2280 2281 addGnuPubAttributes(*NewU, Die); 2282 2283 SkeletonHolder.addUnit(std::move(NewU)); 2284 } 2285 2286 // This DIE has the following attributes: DW_AT_comp_dir, DW_AT_stmt_list, 2287 // DW_AT_low_pc, DW_AT_high_pc, DW_AT_ranges, DW_AT_dwo_name, DW_AT_dwo_id, 2288 // DW_AT_addr_base, DW_AT_ranges_base. 2289 DwarfCompileUnit &DwarfDebug::constructSkeletonCU(const DwarfCompileUnit &CU) { 2290 2291 auto OwnedUnit = make_unique<DwarfCompileUnit>( 2292 CU.getUniqueID(), CU.getCUNode(), Asm, this, &SkeletonHolder); 2293 DwarfCompileUnit &NewCU = *OwnedUnit; 2294 NewCU.initSection(Asm->getObjFileLowering().getDwarfInfoSection(), 2295 DwarfInfoSectionSym); 2296 2297 NewCU.initStmtList(DwarfLineSectionSym); 2298 2299 initSkeletonUnit(CU, NewCU.getUnitDie(), std::move(OwnedUnit)); 2300 2301 return NewCU; 2302 } 2303 2304 // This DIE has the following attributes: DW_AT_comp_dir, DW_AT_dwo_name, 2305 // DW_AT_addr_base. 2306 DwarfTypeUnit &DwarfDebug::constructSkeletonTU(DwarfTypeUnit &TU) { 2307 DwarfCompileUnit &CU = static_cast<DwarfCompileUnit &>( 2308 *SkeletonHolder.getUnits()[TU.getCU().getUniqueID()]); 2309 2310 auto OwnedUnit = make_unique<DwarfTypeUnit>(TU.getUniqueID(), CU, Asm, this, 2311 &SkeletonHolder); 2312 DwarfTypeUnit &NewTU = *OwnedUnit; 2313 NewTU.setTypeSignature(TU.getTypeSignature()); 2314 NewTU.setType(nullptr); 2315 NewTU.initSection( 2316 Asm->getObjFileLowering().getDwarfTypesSection(TU.getTypeSignature())); 2317 2318 initSkeletonUnit(TU, NewTU.getUnitDie(), std::move(OwnedUnit)); 2319 return NewTU; 2320 } 2321 2322 // Emit the .debug_info.dwo section for separated dwarf. This contains the 2323 // compile units that would normally be in debug_info. 2324 void DwarfDebug::emitDebugInfoDWO() { 2325 assert(useSplitDwarf() && "No split dwarf debug info?"); 2326 // Don't pass an abbrev symbol, using a constant zero instead so as not to 2327 // emit relocations into the dwo file. 2328 InfoHolder.emitUnits(this, /* AbbrevSymbol */ nullptr); 2329 } 2330 2331 // Emit the .debug_abbrev.dwo section for separated dwarf. This contains the 2332 // abbreviations for the .debug_info.dwo section. 2333 void DwarfDebug::emitDebugAbbrevDWO() { 2334 assert(useSplitDwarf() && "No split dwarf?"); 2335 InfoHolder.emitAbbrevs(Asm->getObjFileLowering().getDwarfAbbrevDWOSection()); 2336 } 2337 2338 void DwarfDebug::emitDebugLineDWO() { 2339 assert(useSplitDwarf() && "No split dwarf?"); 2340 Asm->OutStreamer.SwitchSection( 2341 Asm->getObjFileLowering().getDwarfLineDWOSection()); 2342 SplitTypeUnitFileTable.Emit(Asm->OutStreamer); 2343 } 2344 2345 // Emit the .debug_str.dwo section for separated dwarf. This contains the 2346 // string section and is identical in format to traditional .debug_str 2347 // sections. 2348 void DwarfDebug::emitDebugStrDWO() { 2349 assert(useSplitDwarf() && "No split dwarf?"); 2350 const MCSection *OffSec = 2351 Asm->getObjFileLowering().getDwarfStrOffDWOSection(); 2352 const MCSymbol *StrSym = DwarfStrSectionSym; 2353 InfoHolder.emitStrings(Asm->getObjFileLowering().getDwarfStrDWOSection(), 2354 OffSec, StrSym); 2355 } 2356 2357 MCDwarfDwoLineTable *DwarfDebug::getDwoLineTable(const DwarfCompileUnit &CU) { 2358 if (!useSplitDwarf()) 2359 return nullptr; 2360 if (SingleCU) 2361 SplitTypeUnitFileTable.setCompilationDir(CU.getCUNode().getDirectory()); 2362 return &SplitTypeUnitFileTable; 2363 } 2364 2365 static uint64_t makeTypeSignature(StringRef Identifier) { 2366 MD5 Hash; 2367 Hash.update(Identifier); 2368 // ... take the least significant 8 bytes and return those. Our MD5 2369 // implementation always returns its results in little endian, swap bytes 2370 // appropriately. 2371 MD5::MD5Result Result; 2372 Hash.final(Result); 2373 return *reinterpret_cast<support::ulittle64_t *>(Result + 8); 2374 } 2375 2376 void DwarfDebug::addDwarfTypeUnitType(DwarfCompileUnit &CU, 2377 StringRef Identifier, DIE &RefDie, 2378 DICompositeType CTy) { 2379 // Fast path if we're building some type units and one has already used the 2380 // address pool we know we're going to throw away all this work anyway, so 2381 // don't bother building dependent types. 2382 if (!TypeUnitsUnderConstruction.empty() && AddrPool.hasBeenUsed()) 2383 return; 2384 2385 const DwarfTypeUnit *&TU = DwarfTypeUnits[CTy]; 2386 if (TU) { 2387 CU.addDIETypeSignature(RefDie, *TU); 2388 return; 2389 } 2390 2391 bool TopLevelType = TypeUnitsUnderConstruction.empty(); 2392 AddrPool.resetUsedFlag(); 2393 2394 auto OwnedUnit = 2395 make_unique<DwarfTypeUnit>(InfoHolder.getUnits().size(), CU, Asm, this, 2396 &InfoHolder, getDwoLineTable(CU)); 2397 DwarfTypeUnit &NewTU = *OwnedUnit; 2398 DIE &UnitDie = NewTU.getUnitDie(); 2399 TU = &NewTU; 2400 TypeUnitsUnderConstruction.push_back( 2401 std::make_pair(std::move(OwnedUnit), CTy)); 2402 2403 NewTU.addUInt(UnitDie, dwarf::DW_AT_language, dwarf::DW_FORM_data2, 2404 CU.getLanguage()); 2405 2406 uint64_t Signature = makeTypeSignature(Identifier); 2407 NewTU.setTypeSignature(Signature); 2408 2409 if (!useSplitDwarf()) 2410 CU.applyStmtList(UnitDie); 2411 2412 // FIXME: Skip using COMDAT groups for type units in the .dwo file once tools 2413 // such as DWP ( http://gcc.gnu.org/wiki/DebugFissionDWP ) can cope with it. 2414 NewTU.initSection( 2415 useSplitDwarf() 2416 ? Asm->getObjFileLowering().getDwarfTypesDWOSection(Signature) 2417 : Asm->getObjFileLowering().getDwarfTypesSection(Signature)); 2418 2419 NewTU.setType(NewTU.createTypeDIE(CTy)); 2420 2421 if (TopLevelType) { 2422 auto TypeUnitsToAdd = std::move(TypeUnitsUnderConstruction); 2423 TypeUnitsUnderConstruction.clear(); 2424 2425 // Types referencing entries in the address table cannot be placed in type 2426 // units. 2427 if (AddrPool.hasBeenUsed()) { 2428 2429 // Remove all the types built while building this type. 2430 // This is pessimistic as some of these types might not be dependent on 2431 // the type that used an address. 2432 for (const auto &TU : TypeUnitsToAdd) 2433 DwarfTypeUnits.erase(TU.second); 2434 2435 // Construct this type in the CU directly. 2436 // This is inefficient because all the dependent types will be rebuilt 2437 // from scratch, including building them in type units, discovering that 2438 // they depend on addresses, throwing them out and rebuilding them. 2439 CU.constructTypeDIE(RefDie, CTy); 2440 return; 2441 } 2442 2443 // If the type wasn't dependent on fission addresses, finish adding the type 2444 // and all its dependent types. 2445 for (auto &TU : TypeUnitsToAdd) { 2446 if (useSplitDwarf()) 2447 TU.first->setSkeleton(constructSkeletonTU(*TU.first)); 2448 InfoHolder.addUnit(std::move(TU.first)); 2449 } 2450 } 2451 CU.addDIETypeSignature(RefDie, NewTU); 2452 } 2453 2454 void DwarfDebug::attachLowHighPC(DwarfCompileUnit &Unit, DIE &D, 2455 MCSymbol *Begin, MCSymbol *End) { 2456 assert(Begin && "Begin label should not be null!"); 2457 assert(End && "End label should not be null!"); 2458 assert(Begin->isDefined() && "Invalid starting label"); 2459 assert(End->isDefined() && "Invalid end label"); 2460 2461 Unit.addLabelAddress(D, dwarf::DW_AT_low_pc, Begin); 2462 if (DwarfVersion < 4) 2463 Unit.addLabelAddress(D, dwarf::DW_AT_high_pc, End); 2464 else 2465 Unit.addLabelDelta(D, dwarf::DW_AT_high_pc, End, Begin); 2466 } 2467 2468 // Accelerator table mutators - add each name along with its companion 2469 // DIE to the proper table while ensuring that the name that we're going 2470 // to reference is in the string table. We do this since the names we 2471 // add may not only be identical to the names in the DIE. 2472 void DwarfDebug::addAccelName(StringRef Name, const DIE &Die) { 2473 if (!useDwarfAccelTables()) 2474 return; 2475 AccelNames.AddName(Name, InfoHolder.getStringPool().getSymbol(*Asm, Name), 2476 &Die); 2477 } 2478 2479 void DwarfDebug::addAccelObjC(StringRef Name, const DIE &Die) { 2480 if (!useDwarfAccelTables()) 2481 return; 2482 AccelObjC.AddName(Name, InfoHolder.getStringPool().getSymbol(*Asm, Name), 2483 &Die); 2484 } 2485 2486 void DwarfDebug::addAccelNamespace(StringRef Name, const DIE &Die) { 2487 if (!useDwarfAccelTables()) 2488 return; 2489 AccelNamespace.AddName(Name, InfoHolder.getStringPool().getSymbol(*Asm, Name), 2490 &Die); 2491 } 2492 2493 void DwarfDebug::addAccelType(StringRef Name, const DIE &Die, char Flags) { 2494 if (!useDwarfAccelTables()) 2495 return; 2496 AccelTypes.AddName(Name, InfoHolder.getStringPool().getSymbol(*Asm, Name), 2497 &Die); 2498 } 2499