[MCJIT] Remove JITEventListener's anchor until I can determine the right place
[oota-llvm.git] / lib / DebugInfo / DWARFContext.cpp
1 //===-- DWARFContext.cpp --------------------------------------------------===//
2 //
3 //                     The LLVM Compiler Infrastructure
4 //
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
9
10 #include "DWARFContext.h"
11 #include "DWARFDebugArangeSet.h"
12 #include "DWARFAcceleratorTable.h"
13
14 #include "llvm/ADT/SmallString.h"
15 #include "llvm/ADT/StringSwitch.h"
16 #include "llvm/Support/Compression.h"
17 #include "llvm/Support/Dwarf.h"
18 #include "llvm/Support/Format.h"
19 #include "llvm/Support/Path.h"
20 #include "llvm/Support/raw_ostream.h"
21 #include <algorithm>
22 using namespace llvm;
23 using namespace dwarf;
24 using namespace object;
25
26 #define DEBUG_TYPE "dwarf"
27
28 typedef DWARFDebugLine::LineTable DWARFLineTable;
29 typedef DILineInfoSpecifier::FileLineInfoKind FileLineInfoKind;
30 typedef DILineInfoSpecifier::FunctionNameKind FunctionNameKind;
31
32 static void dumpPubSection(raw_ostream &OS, StringRef Name, StringRef Data,
33                            bool LittleEndian, bool GnuStyle) {
34   OS << "\n." << Name << " contents:\n";
35   DataExtractor pubNames(Data, LittleEndian, 0);
36   uint32_t offset = 0;
37   while (pubNames.isValidOffset(offset)) {
38     OS << "length = " << format("0x%08x", pubNames.getU32(&offset));
39     OS << " version = " << format("0x%04x", pubNames.getU16(&offset));
40     OS << " unit_offset = " << format("0x%08x", pubNames.getU32(&offset));
41     OS << " unit_size = " << format("0x%08x", pubNames.getU32(&offset)) << '\n';
42     if (GnuStyle)
43       OS << "Offset     Linkage  Kind     Name\n";
44     else
45       OS << "Offset     Name\n";
46
47     while (offset < Data.size()) {
48       uint32_t dieRef = pubNames.getU32(&offset);
49       if (dieRef == 0)
50         break;
51       OS << format("0x%8.8x ", dieRef);
52       if (GnuStyle) {
53         PubIndexEntryDescriptor desc(pubNames.getU8(&offset));
54         OS << format("%-8s", dwarf::GDBIndexEntryLinkageString(desc.Linkage))
55            << ' ' << format("%-8s", dwarf::GDBIndexEntryKindString(desc.Kind))
56            << ' ';
57       }
58       OS << '\"' << pubNames.getCStr(&offset) << "\"\n";
59     }
60   }
61 }
62
63 static void dumpAccelSection(raw_ostream &OS, StringRef Name,
64                              const DWARFSection& Section, StringRef StringSection,
65                              bool LittleEndian) {
66   DataExtractor AccelSection(Section.Data, LittleEndian, 0);
67   DataExtractor StrData(StringSection, LittleEndian, 0);
68   OS << "\n." << Name << " contents:\n";
69   DWARFAcceleratorTable Accel(AccelSection, StrData, Section.Relocs);
70   if (!Accel.extract())
71     return;
72   Accel.dump(OS);
73 }
74
75 void DWARFContext::dump(raw_ostream &OS, DIDumpType DumpType) {
76   if (DumpType == DIDT_All || DumpType == DIDT_Abbrev) {
77     OS << ".debug_abbrev contents:\n";
78     getDebugAbbrev()->dump(OS);
79   }
80
81   if (DumpType == DIDT_All || DumpType == DIDT_AbbrevDwo)
82     if (const DWARFDebugAbbrev *D = getDebugAbbrevDWO()) {
83       OS << "\n.debug_abbrev.dwo contents:\n";
84       D->dump(OS);
85     }
86
87   if (DumpType == DIDT_All || DumpType == DIDT_Info) {
88     OS << "\n.debug_info contents:\n";
89     for (const auto &CU : compile_units())
90       CU->dump(OS);
91   }
92
93   if ((DumpType == DIDT_All || DumpType == DIDT_InfoDwo) &&
94       getNumDWOCompileUnits()) {
95     OS << "\n.debug_info.dwo contents:\n";
96     for (const auto &DWOCU : dwo_compile_units())
97       DWOCU->dump(OS);
98   }
99
100   if ((DumpType == DIDT_All || DumpType == DIDT_Types) && getNumTypeUnits()) {
101     OS << "\n.debug_types contents:\n";
102     for (const auto &TUS : type_unit_sections())
103       for (const auto &TU : TUS)
104         TU->dump(OS);
105   }
106
107   if ((DumpType == DIDT_All || DumpType == DIDT_TypesDwo) &&
108       getNumDWOTypeUnits()) {
109     OS << "\n.debug_types.dwo contents:\n";
110     for (const auto &DWOTUS : dwo_type_unit_sections())
111       for (const auto &DWOTU : DWOTUS)
112         DWOTU->dump(OS);
113   }
114
115   if (DumpType == DIDT_All || DumpType == DIDT_Loc) {
116     OS << "\n.debug_loc contents:\n";
117     getDebugLoc()->dump(OS);
118   }
119
120   if (DumpType == DIDT_All || DumpType == DIDT_LocDwo) {
121     OS << "\n.debug_loc.dwo contents:\n";
122     getDebugLocDWO()->dump(OS);
123   }
124
125   if (DumpType == DIDT_All || DumpType == DIDT_Frames) {
126     OS << "\n.debug_frame contents:\n";
127     getDebugFrame()->dump(OS);
128   }
129
130   uint32_t offset = 0;
131   if (DumpType == DIDT_All || DumpType == DIDT_Aranges) {
132     OS << "\n.debug_aranges contents:\n";
133     DataExtractor arangesData(getARangeSection(), isLittleEndian(), 0);
134     DWARFDebugArangeSet set;
135     while (set.extract(arangesData, &offset))
136       set.dump(OS);
137   }
138
139   uint8_t savedAddressByteSize = 0;
140   if (DumpType == DIDT_All || DumpType == DIDT_Line) {
141     OS << "\n.debug_line contents:\n";
142     for (const auto &CU : compile_units()) {
143       savedAddressByteSize = CU->getAddressByteSize();
144       unsigned stmtOffset =
145           CU->getCompileUnitDIE()->getAttributeValueAsSectionOffset(
146               CU.get(), DW_AT_stmt_list, -1U);
147       if (stmtOffset != -1U) {
148         DataExtractor lineData(getLineSection().Data, isLittleEndian(),
149                                savedAddressByteSize);
150         DWARFDebugLine::LineTable LineTable;
151         LineTable.parse(lineData, &getLineSection().Relocs, &stmtOffset);
152         LineTable.dump(OS);
153       }
154     }
155   }
156
157   if (DumpType == DIDT_All || DumpType == DIDT_LineDwo) {
158     OS << "\n.debug_line.dwo contents:\n";
159     unsigned stmtOffset = 0;
160     DataExtractor lineData(getLineDWOSection().Data, isLittleEndian(),
161                            savedAddressByteSize);
162     DWARFDebugLine::LineTable LineTable;
163     while (LineTable.Prologue.parse(lineData, &stmtOffset)) {
164       LineTable.dump(OS);
165       LineTable.clear();
166     }
167   }
168
169   if (DumpType == DIDT_All || DumpType == DIDT_Str) {
170     OS << "\n.debug_str contents:\n";
171     DataExtractor strData(getStringSection(), isLittleEndian(), 0);
172     offset = 0;
173     uint32_t strOffset = 0;
174     while (const char *s = strData.getCStr(&offset)) {
175       OS << format("0x%8.8x: \"%s\"\n", strOffset, s);
176       strOffset = offset;
177     }
178   }
179
180   if ((DumpType == DIDT_All || DumpType == DIDT_StrDwo) &&
181       !getStringDWOSection().empty()) {
182     OS << "\n.debug_str.dwo contents:\n";
183     DataExtractor strDWOData(getStringDWOSection(), isLittleEndian(), 0);
184     offset = 0;
185     uint32_t strDWOOffset = 0;
186     while (const char *s = strDWOData.getCStr(&offset)) {
187       OS << format("0x%8.8x: \"%s\"\n", strDWOOffset, s);
188       strDWOOffset = offset;
189     }
190   }
191
192   if (DumpType == DIDT_All || DumpType == DIDT_Ranges) {
193     OS << "\n.debug_ranges contents:\n";
194     // In fact, different compile units may have different address byte
195     // sizes, but for simplicity we just use the address byte size of the last
196     // compile unit (there is no easy and fast way to associate address range
197     // list and the compile unit it describes).
198     DataExtractor rangesData(getRangeSection(), isLittleEndian(),
199                              savedAddressByteSize);
200     offset = 0;
201     DWARFDebugRangeList rangeList;
202     while (rangeList.extract(rangesData, &offset))
203       rangeList.dump(OS);
204   }
205
206   if (DumpType == DIDT_All || DumpType == DIDT_Pubnames)
207     dumpPubSection(OS, "debug_pubnames", getPubNamesSection(),
208                    isLittleEndian(), false);
209
210   if (DumpType == DIDT_All || DumpType == DIDT_Pubtypes)
211     dumpPubSection(OS, "debug_pubtypes", getPubTypesSection(),
212                    isLittleEndian(), false);
213
214   if (DumpType == DIDT_All || DumpType == DIDT_GnuPubnames)
215     dumpPubSection(OS, "debug_gnu_pubnames", getGnuPubNamesSection(),
216                    isLittleEndian(), true /* GnuStyle */);
217
218   if (DumpType == DIDT_All || DumpType == DIDT_GnuPubtypes)
219     dumpPubSection(OS, "debug_gnu_pubtypes", getGnuPubTypesSection(),
220                    isLittleEndian(), true /* GnuStyle */);
221
222   if ((DumpType == DIDT_All || DumpType == DIDT_StrOffsetsDwo) &&
223       !getStringOffsetDWOSection().empty()) {
224     OS << "\n.debug_str_offsets.dwo contents:\n";
225     DataExtractor strOffsetExt(getStringOffsetDWOSection(), isLittleEndian(),
226                                0);
227     offset = 0;
228     uint64_t size = getStringOffsetDWOSection().size();
229     while (offset < size) {
230       OS << format("0x%8.8x: ", offset);
231       OS << format("%8.8x\n", strOffsetExt.getU32(&offset));
232     }
233   }
234
235   if (DumpType == DIDT_All || DumpType == DIDT_AppleNames)
236     dumpAccelSection(OS, "apple_names", getAppleNamesSection(),
237                      getStringSection(), isLittleEndian());
238
239   if (DumpType == DIDT_All || DumpType == DIDT_AppleTypes)
240     dumpAccelSection(OS, "apple_types", getAppleTypesSection(),
241                      getStringSection(), isLittleEndian());
242
243   if (DumpType == DIDT_All || DumpType == DIDT_AppleNamespaces)
244     dumpAccelSection(OS, "apple_namespaces", getAppleNamespacesSection(),
245                      getStringSection(), isLittleEndian());
246
247   if (DumpType == DIDT_All || DumpType == DIDT_AppleObjC)
248     dumpAccelSection(OS, "apple_objc", getAppleObjCSection(),
249                      getStringSection(), isLittleEndian());
250 }
251
252 const DWARFDebugAbbrev *DWARFContext::getDebugAbbrev() {
253   if (Abbrev)
254     return Abbrev.get();
255
256   DataExtractor abbrData(getAbbrevSection(), isLittleEndian(), 0);
257
258   Abbrev.reset(new DWARFDebugAbbrev());
259   Abbrev->extract(abbrData);
260   return Abbrev.get();
261 }
262
263 const DWARFDebugAbbrev *DWARFContext::getDebugAbbrevDWO() {
264   if (AbbrevDWO)
265     return AbbrevDWO.get();
266
267   DataExtractor abbrData(getAbbrevDWOSection(), isLittleEndian(), 0);
268   AbbrevDWO.reset(new DWARFDebugAbbrev());
269   AbbrevDWO->extract(abbrData);
270   return AbbrevDWO.get();
271 }
272
273 const DWARFDebugLoc *DWARFContext::getDebugLoc() {
274   if (Loc)
275     return Loc.get();
276
277   DataExtractor LocData(getLocSection().Data, isLittleEndian(), 0);
278   Loc.reset(new DWARFDebugLoc(getLocSection().Relocs));
279   // assume all compile units have the same address byte size
280   if (getNumCompileUnits())
281     Loc->parse(LocData, getCompileUnitAtIndex(0)->getAddressByteSize());
282   return Loc.get();
283 }
284
285 const DWARFDebugLocDWO *DWARFContext::getDebugLocDWO() {
286   if (LocDWO)
287     return LocDWO.get();
288
289   DataExtractor LocData(getLocDWOSection().Data, isLittleEndian(), 0);
290   LocDWO.reset(new DWARFDebugLocDWO());
291   LocDWO->parse(LocData);
292   return LocDWO.get();
293 }
294
295 const DWARFDebugAranges *DWARFContext::getDebugAranges() {
296   if (Aranges)
297     return Aranges.get();
298
299   Aranges.reset(new DWARFDebugAranges());
300   Aranges->generate(this);
301   return Aranges.get();
302 }
303
304 const DWARFDebugFrame *DWARFContext::getDebugFrame() {
305   if (DebugFrame)
306     return DebugFrame.get();
307
308   // There's a "bug" in the DWARFv3 standard with respect to the target address
309   // size within debug frame sections. While DWARF is supposed to be independent
310   // of its container, FDEs have fields with size being "target address size",
311   // which isn't specified in DWARF in general. It's only specified for CUs, but
312   // .eh_frame can appear without a .debug_info section. Follow the example of
313   // other tools (libdwarf) and extract this from the container (ObjectFile
314   // provides this information). This problem is fixed in DWARFv4
315   // See this dwarf-discuss discussion for more details:
316   // http://lists.dwarfstd.org/htdig.cgi/dwarf-discuss-dwarfstd.org/2011-December/001173.html
317   DataExtractor debugFrameData(getDebugFrameSection(), isLittleEndian(),
318                                getAddressSize());
319   DebugFrame.reset(new DWARFDebugFrame());
320   DebugFrame->parse(debugFrameData);
321   return DebugFrame.get();
322 }
323
324 const DWARFLineTable *
325 DWARFContext::getLineTableForUnit(DWARFUnit *cu) {
326   if (!Line)
327     Line.reset(new DWARFDebugLine(&getLineSection().Relocs));
328
329   unsigned stmtOffset =
330       cu->getCompileUnitDIE()->getAttributeValueAsSectionOffset(
331           cu, DW_AT_stmt_list, -1U);
332   if (stmtOffset == -1U)
333     return nullptr; // No line table for this compile unit.
334
335   // See if the line table is cached.
336   if (const DWARFLineTable *lt = Line->getLineTable(stmtOffset))
337     return lt;
338
339   // We have to parse it first.
340   DataExtractor lineData(getLineSection().Data, isLittleEndian(),
341                          cu->getAddressByteSize());
342   return Line->getOrParseLineTable(lineData, stmtOffset);
343 }
344
345 void DWARFContext::parseCompileUnits() {
346   CUs.parse(*this, getInfoSection());
347 }
348
349 void DWARFContext::parseTypeUnits() {
350   if (!TUs.empty())
351     return;
352   for (const auto &I : getTypesSections()) {
353     TUs.push_back(DWARFUnitSection<DWARFTypeUnit>());
354     TUs.back().parse(*this, I.second);
355   }
356 }
357
358 void DWARFContext::parseDWOCompileUnits() {
359   DWOCUs.parseDWO(*this, getInfoDWOSection());
360 }
361
362 void DWARFContext::parseDWOTypeUnits() {
363   if (!DWOTUs.empty())
364     return;
365   for (const auto &I : getTypesDWOSections()) {
366     DWOTUs.push_back(DWARFUnitSection<DWARFTypeUnit>());
367     DWOTUs.back().parseDWO(*this, I.second);
368   }
369 }
370
371 DWARFCompileUnit *DWARFContext::getCompileUnitForOffset(uint32_t Offset) {
372   parseCompileUnits();
373   return CUs.getUnitForOffset(Offset);
374 }
375
376 DWARFCompileUnit *DWARFContext::getCompileUnitForAddress(uint64_t Address) {
377   // First, get the offset of the compile unit.
378   uint32_t CUOffset = getDebugAranges()->findAddress(Address);
379   // Retrieve the compile unit.
380   return getCompileUnitForOffset(CUOffset);
381 }
382
383 static bool getFunctionNameForAddress(DWARFCompileUnit *CU, uint64_t Address,
384                                       FunctionNameKind Kind,
385                                       std::string &FunctionName) {
386   if (Kind == FunctionNameKind::None)
387     return false;
388   // The address may correspond to instruction in some inlined function,
389   // so we have to build the chain of inlined functions and take the
390   // name of the topmost function in it.
391   const DWARFDebugInfoEntryInlinedChain &InlinedChain =
392       CU->getInlinedChainForAddress(Address);
393   if (InlinedChain.DIEs.size() == 0)
394     return false;
395   const DWARFDebugInfoEntryMinimal &TopFunctionDIE = InlinedChain.DIEs[0];
396   if (const char *Name =
397           TopFunctionDIE.getSubroutineName(InlinedChain.U, Kind)) {
398     FunctionName = Name;
399     return true;
400   }
401   return false;
402 }
403
404 DILineInfo DWARFContext::getLineInfoForAddress(uint64_t Address,
405                                                DILineInfoSpecifier Spec) {
406   DILineInfo Result;
407
408   DWARFCompileUnit *CU = getCompileUnitForAddress(Address);
409   if (!CU)
410     return Result;
411   getFunctionNameForAddress(CU, Address, Spec.FNKind, Result.FunctionName);
412   if (Spec.FLIKind != FileLineInfoKind::None) {
413     if (const DWARFLineTable *LineTable = getLineTableForUnit(CU))
414       LineTable->getFileLineInfoForAddress(Address, CU->getCompilationDir(),
415                                            Spec.FLIKind, Result);
416   }
417   return Result;
418 }
419
420 DILineInfoTable
421 DWARFContext::getLineInfoForAddressRange(uint64_t Address, uint64_t Size,
422                                          DILineInfoSpecifier Spec) {
423   DILineInfoTable  Lines;
424   DWARFCompileUnit *CU = getCompileUnitForAddress(Address);
425   if (!CU)
426     return Lines;
427
428   std::string FunctionName = "<invalid>";
429   getFunctionNameForAddress(CU, Address, Spec.FNKind, FunctionName);
430
431   // If the Specifier says we don't need FileLineInfo, just
432   // return the top-most function at the starting address.
433   if (Spec.FLIKind == FileLineInfoKind::None) {
434     DILineInfo Result;
435     Result.FunctionName = FunctionName;
436     Lines.push_back(std::make_pair(Address, Result));
437     return Lines;
438   }
439
440   const DWARFLineTable *LineTable = getLineTableForUnit(CU);
441
442   // Get the index of row we're looking for in the line table.
443   std::vector<uint32_t> RowVector;
444   if (!LineTable->lookupAddressRange(Address, Size, RowVector))
445     return Lines;
446
447   for (uint32_t RowIndex : RowVector) {
448     // Take file number and line/column from the row.
449     const DWARFDebugLine::Row &Row = LineTable->Rows[RowIndex];
450     DILineInfo Result;
451     LineTable->getFileNameByIndex(Row.File, CU->getCompilationDir(),
452                                   Spec.FLIKind, Result.FileName);
453     Result.FunctionName = FunctionName;
454     Result.Line = Row.Line;
455     Result.Column = Row.Column;
456     Lines.push_back(std::make_pair(Row.Address, Result));
457   }
458
459   return Lines;
460 }
461
462 DIInliningInfo
463 DWARFContext::getInliningInfoForAddress(uint64_t Address,
464                                         DILineInfoSpecifier Spec) {
465   DIInliningInfo InliningInfo;
466
467   DWARFCompileUnit *CU = getCompileUnitForAddress(Address);
468   if (!CU)
469     return InliningInfo;
470
471   const DWARFLineTable *LineTable = nullptr;
472   const DWARFDebugInfoEntryInlinedChain &InlinedChain =
473       CU->getInlinedChainForAddress(Address);
474   if (InlinedChain.DIEs.size() == 0) {
475     // If there is no DIE for address (e.g. it is in unavailable .dwo file),
476     // try to at least get file/line info from symbol table.
477     if (Spec.FLIKind != FileLineInfoKind::None) {
478       DILineInfo Frame;
479       LineTable = getLineTableForUnit(CU);
480       if (LineTable &&
481           LineTable->getFileLineInfoForAddress(Address, CU->getCompilationDir(),
482                                                Spec.FLIKind, Frame))
483         InliningInfo.addFrame(Frame);
484     }
485     return InliningInfo;
486   }
487
488   uint32_t CallFile = 0, CallLine = 0, CallColumn = 0;
489   for (uint32_t i = 0, n = InlinedChain.DIEs.size(); i != n; i++) {
490     const DWARFDebugInfoEntryMinimal &FunctionDIE = InlinedChain.DIEs[i];
491     DILineInfo Frame;
492     // Get function name if necessary.
493     if (const char *Name =
494             FunctionDIE.getSubroutineName(InlinedChain.U, Spec.FNKind))
495       Frame.FunctionName = Name;
496     if (Spec.FLIKind != FileLineInfoKind::None) {
497       if (i == 0) {
498         // For the topmost frame, initialize the line table of this
499         // compile unit and fetch file/line info from it.
500         LineTable = getLineTableForUnit(CU);
501         // For the topmost routine, get file/line info from line table.
502         if (LineTable)
503           LineTable->getFileLineInfoForAddress(Address, CU->getCompilationDir(),
504                                                Spec.FLIKind, Frame);
505       } else {
506         // Otherwise, use call file, call line and call column from
507         // previous DIE in inlined chain.
508         if (LineTable)
509           LineTable->getFileNameByIndex(CallFile, CU->getCompilationDir(),
510                                         Spec.FLIKind, Frame.FileName);
511         Frame.Line = CallLine;
512         Frame.Column = CallColumn;
513       }
514       // Get call file/line/column of a current DIE.
515       if (i + 1 < n) {
516         FunctionDIE.getCallerFrame(InlinedChain.U, CallFile, CallLine,
517                                    CallColumn);
518       }
519     }
520     InliningInfo.addFrame(Frame);
521   }
522   return InliningInfo;
523 }
524
525 static bool consumeCompressedDebugSectionHeader(StringRef &data,
526                                                 uint64_t &OriginalSize) {
527   // Consume "ZLIB" prefix.
528   if (!data.startswith("ZLIB"))
529     return false;
530   data = data.substr(4);
531   // Consume uncompressed section size (big-endian 8 bytes).
532   DataExtractor extractor(data, false, 8);
533   uint32_t Offset = 0;
534   OriginalSize = extractor.getU64(&Offset);
535   if (Offset == 0)
536     return false;
537   data = data.substr(Offset);
538   return true;
539 }
540
541 DWARFContextInMemory::DWARFContextInMemory(const object::ObjectFile &Obj)
542     : IsLittleEndian(Obj.isLittleEndian()),
543       AddressSize(Obj.getBytesInAddress()) {
544   for (const SectionRef &Section : Obj.sections()) {
545     StringRef name;
546     Section.getName(name);
547     // Skip BSS and Virtual sections, they aren't interesting.
548     bool IsBSS = Section.isBSS();
549     if (IsBSS)
550       continue;
551     bool IsVirtual = Section.isVirtual();
552     if (IsVirtual)
553       continue;
554     StringRef data;
555     Section.getContents(data);
556
557     name = name.substr(name.find_first_not_of("._")); // Skip . and _ prefixes.
558
559     // Check if debug info section is compressed with zlib.
560     if (name.startswith("zdebug_")) {
561       uint64_t OriginalSize;
562       if (!zlib::isAvailable() ||
563           !consumeCompressedDebugSectionHeader(data, OriginalSize))
564         continue;
565       UncompressedSections.resize(UncompressedSections.size() + 1);
566       if (zlib::uncompress(data, UncompressedSections.back(), OriginalSize) !=
567           zlib::StatusOK) {
568         UncompressedSections.pop_back();
569         continue;
570       }
571       // Make data point to uncompressed section contents and save its contents.
572       name = name.substr(1);
573       data = UncompressedSections.back();
574     }
575
576     StringRef *SectionData =
577         StringSwitch<StringRef *>(name)
578             .Case("debug_info", &InfoSection.Data)
579             .Case("debug_abbrev", &AbbrevSection)
580             .Case("debug_loc", &LocSection.Data)
581             .Case("debug_line", &LineSection.Data)
582             .Case("debug_aranges", &ARangeSection)
583             .Case("debug_frame", &DebugFrameSection)
584             .Case("debug_str", &StringSection)
585             .Case("debug_ranges", &RangeSection)
586             .Case("debug_pubnames", &PubNamesSection)
587             .Case("debug_pubtypes", &PubTypesSection)
588             .Case("debug_gnu_pubnames", &GnuPubNamesSection)
589             .Case("debug_gnu_pubtypes", &GnuPubTypesSection)
590             .Case("debug_info.dwo", &InfoDWOSection.Data)
591             .Case("debug_abbrev.dwo", &AbbrevDWOSection)
592             .Case("debug_loc.dwo", &LocDWOSection.Data)
593             .Case("debug_line.dwo", &LineDWOSection.Data)
594             .Case("debug_str.dwo", &StringDWOSection)
595             .Case("debug_str_offsets.dwo", &StringOffsetDWOSection)
596             .Case("debug_addr", &AddrSection)
597             .Case("apple_names", &AppleNamesSection.Data)
598             .Case("apple_types", &AppleTypesSection.Data)
599             .Case("apple_namespaces", &AppleNamespacesSection.Data)
600             .Case("apple_namespac", &AppleNamespacesSection.Data)
601             .Case("apple_objc", &AppleObjCSection.Data)
602             // Any more debug info sections go here.
603             .Default(nullptr);
604     if (SectionData) {
605       *SectionData = data;
606       if (name == "debug_ranges") {
607         // FIXME: Use the other dwo range section when we emit it.
608         RangeDWOSection = data;
609       }
610     } else if (name == "debug_types") {
611       // Find debug_types data by section rather than name as there are
612       // multiple, comdat grouped, debug_types sections.
613       TypesSections[Section].Data = data;
614     } else if (name == "debug_types.dwo") {
615       TypesDWOSections[Section].Data = data;
616     }
617
618     section_iterator RelocatedSection = Section.getRelocatedSection();
619     if (RelocatedSection == Obj.section_end())
620       continue;
621
622     StringRef RelSecName;
623     RelocatedSection->getName(RelSecName);
624     RelSecName = RelSecName.substr(
625         RelSecName.find_first_not_of("._")); // Skip . and _ prefixes.
626
627     // TODO: Add support for relocations in other sections as needed.
628     // Record relocations for the debug_info and debug_line sections.
629     RelocAddrMap *Map = StringSwitch<RelocAddrMap*>(RelSecName)
630         .Case("debug_info", &InfoSection.Relocs)
631         .Case("debug_loc", &LocSection.Relocs)
632         .Case("debug_info.dwo", &InfoDWOSection.Relocs)
633         .Case("debug_line", &LineSection.Relocs)
634         .Case("apple_names", &AppleNamesSection.Relocs)
635         .Case("apple_types", &AppleTypesSection.Relocs)
636         .Case("apple_namespaces", &AppleNamespacesSection.Relocs)
637         .Case("apple_namespac", &AppleNamespacesSection.Relocs)
638         .Case("apple_objc", &AppleObjCSection.Relocs)
639         .Default(nullptr);
640     if (!Map) {
641       // Find debug_types relocs by section rather than name as there are
642       // multiple, comdat grouped, debug_types sections.
643       if (RelSecName == "debug_types")
644         Map = &TypesSections[*RelocatedSection].Relocs;
645       else if (RelSecName == "debug_types.dwo")
646         Map = &TypesDWOSections[*RelocatedSection].Relocs;
647       else
648         continue;
649     }
650
651     if (Section.relocation_begin() != Section.relocation_end()) {
652       uint64_t SectionSize = RelocatedSection->getSize();
653       for (const RelocationRef &Reloc : Section.relocations()) {
654         uint64_t Address;
655         Reloc.getOffset(Address);
656         uint64_t Type;
657         Reloc.getType(Type);
658         uint64_t SymAddr = 0;
659         object::symbol_iterator Sym = Reloc.getSymbol();
660         if (Sym != Obj.symbol_end())
661           Sym->getAddress(SymAddr);
662
663         object::RelocVisitor V(Obj);
664         object::RelocToApply R(V.visit(Type, Reloc, SymAddr));
665         if (V.error()) {
666           SmallString<32> Name;
667           std::error_code ec(Reloc.getTypeName(Name));
668           if (ec) {
669             errs() << "Aaaaaa! Nameless relocation! Aaaaaa!\n";
670           }
671           errs() << "error: failed to compute relocation: "
672                  << Name << "\n";
673           continue;
674         }
675
676         if (Address + R.Width > SectionSize) {
677           errs() << "error: " << R.Width << "-byte relocation starting "
678                  << Address << " bytes into section " << name << " which is "
679                  << SectionSize << " bytes long.\n";
680           continue;
681         }
682         if (R.Width > 8) {
683           errs() << "error: can't handle a relocation of more than 8 bytes at "
684                     "a time.\n";
685           continue;
686         }
687         DEBUG(dbgs() << "Writing " << format("%p", R.Value)
688                      << " at " << format("%p", Address)
689                      << " with width " << format("%d", R.Width)
690                      << "\n");
691         Map->insert(std::make_pair(Address, std::make_pair(R.Width, R.Value)));
692       }
693     }
694   }
695 }
696
697 void DWARFContextInMemory::anchor() { }