1 //===--- lib/CodeGen/DIE.cpp - DWARF Info Entries -------------------------===//
2 //
3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4 // See https://llvm.org/LICENSE.txt for license information.
5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6 //
7 //===----------------------------------------------------------------------===//
8 //
9 // Data structures for DWARF info entries.
10 //
11 //===----------------------------------------------------------------------===//
12 
13 #include "llvm/CodeGen/DIE.h"
14 #include "DwarfCompileUnit.h"
15 #include "DwarfDebug.h"
16 #include "DwarfUnit.h"
17 #include "llvm/ADT/Twine.h"
18 #include "llvm/CodeGen/AsmPrinter.h"
19 #include "llvm/Config/llvm-config.h"
20 #include "llvm/IR/DataLayout.h"
21 #include "llvm/MC/MCAsmInfo.h"
22 #include "llvm/MC/MCContext.h"
23 #include "llvm/MC/MCStreamer.h"
24 #include "llvm/MC/MCSymbol.h"
25 #include "llvm/Support/Debug.h"
26 #include "llvm/Support/ErrorHandling.h"
27 #include "llvm/Support/Format.h"
28 #include "llvm/Support/FormattedStream.h"
29 #include "llvm/Support/LEB128.h"
30 #include "llvm/Support/MD5.h"
31 #include "llvm/Support/raw_ostream.h"
32 using namespace llvm;
33 
34 #define DEBUG_TYPE "dwarfdebug"
35 
36 //===----------------------------------------------------------------------===//
37 // DIEAbbrevData Implementation
38 //===----------------------------------------------------------------------===//
39 
40 /// Profile - Used to gather unique data for the abbreviation folding set.
41 ///
42 void DIEAbbrevData::Profile(FoldingSetNodeID &ID) const {
43   // Explicitly cast to an integer type for which FoldingSetNodeID has
44   // overloads.  Otherwise MSVC 2010 thinks this call is ambiguous.
45   ID.AddInteger(unsigned(Attribute));
46   ID.AddInteger(unsigned(Form));
47   if (Form == dwarf::DW_FORM_implicit_const)
48     ID.AddInteger(Value);
49 }
50 
51 //===----------------------------------------------------------------------===//
52 // DIEAbbrev Implementation
53 //===----------------------------------------------------------------------===//
54 
55 /// Profile - Used to gather unique data for the abbreviation folding set.
56 ///
57 void DIEAbbrev::Profile(FoldingSetNodeID &ID) const {
58   ID.AddInteger(unsigned(Tag));
59   ID.AddInteger(unsigned(Children));
60 
61   // For each attribute description.
62   for (unsigned i = 0, N = Data.size(); i < N; ++i)
63     Data[i].Profile(ID);
64 }
65 
66 /// Emit - Print the abbreviation using the specified asm printer.
67 ///
68 void DIEAbbrev::Emit(const AsmPrinter *AP) const {
69   // Emit its Dwarf tag type.
70   AP->emitULEB128(Tag, dwarf::TagString(Tag).data());
71 
72   // Emit whether it has children DIEs.
73   AP->emitULEB128((unsigned)Children, dwarf::ChildrenString(Children).data());
74 
75   // For each attribute description.
76   for (unsigned i = 0, N = Data.size(); i < N; ++i) {
77     const DIEAbbrevData &AttrData = Data[i];
78 
79     // Emit attribute type.
80     AP->emitULEB128(AttrData.getAttribute(),
81                     dwarf::AttributeString(AttrData.getAttribute()).data());
82 
83     // Emit form type.
84 #ifndef NDEBUG
85     // Could be an assertion, but this way we can see the failing form code
86     // easily, which helps track down where it came from.
87     if (!dwarf::isValidFormForVersion(AttrData.getForm(),
88                                       AP->getDwarfVersion())) {
89       LLVM_DEBUG(dbgs() << "Invalid form " << format("0x%x", AttrData.getForm())
90                         << " for DWARF version " << AP->getDwarfVersion()
91                         << "\n");
92       llvm_unreachable("Invalid form for specified DWARF version");
93     }
94 #endif
95     AP->emitULEB128(AttrData.getForm(),
96                     dwarf::FormEncodingString(AttrData.getForm()).data());
97 
98     // Emit value for DW_FORM_implicit_const.
99     if (AttrData.getForm() == dwarf::DW_FORM_implicit_const)
100       AP->emitSLEB128(AttrData.getValue());
101   }
102 
103   // Mark end of abbreviation.
104   AP->emitULEB128(0, "EOM(1)");
105   AP->emitULEB128(0, "EOM(2)");
106 }
107 
108 LLVM_DUMP_METHOD
109 void DIEAbbrev::print(raw_ostream &O) const {
110   O << "Abbreviation @"
111     << format("0x%lx", (long)(intptr_t)this)
112     << "  "
113     << dwarf::TagString(Tag)
114     << " "
115     << dwarf::ChildrenString(Children)
116     << '\n';
117 
118   for (unsigned i = 0, N = Data.size(); i < N; ++i) {
119     O << "  "
120       << dwarf::AttributeString(Data[i].getAttribute())
121       << "  "
122       << dwarf::FormEncodingString(Data[i].getForm());
123 
124     if (Data[i].getForm() == dwarf::DW_FORM_implicit_const)
125       O << " " << Data[i].getValue();
126 
127     O << '\n';
128   }
129 }
130 
131 #if !defined(NDEBUG) || defined(LLVM_ENABLE_DUMP)
132 LLVM_DUMP_METHOD void DIEAbbrev::dump() const {
133   print(dbgs());
134 }
135 #endif
136 
137 //===----------------------------------------------------------------------===//
138 // DIEAbbrevSet Implementation
139 //===----------------------------------------------------------------------===//
140 
141 DIEAbbrevSet::~DIEAbbrevSet() {
142   for (DIEAbbrev *Abbrev : Abbreviations)
143     Abbrev->~DIEAbbrev();
144 }
145 
146 DIEAbbrev &DIEAbbrevSet::uniqueAbbreviation(DIE &Die) {
147 
148   FoldingSetNodeID ID;
149   DIEAbbrev Abbrev = Die.generateAbbrev();
150   Abbrev.Profile(ID);
151 
152   void *InsertPos;
153   if (DIEAbbrev *Existing =
154           AbbreviationsSet.FindNodeOrInsertPos(ID, InsertPos)) {
155     Die.setAbbrevNumber(Existing->getNumber());
156     return *Existing;
157   }
158 
159   // Move the abbreviation to the heap and assign a number.
160   DIEAbbrev *New = new (Alloc) DIEAbbrev(std::move(Abbrev));
161   Abbreviations.push_back(New);
162   New->setNumber(Abbreviations.size());
163   Die.setAbbrevNumber(Abbreviations.size());
164 
165   // Store it for lookup.
166   AbbreviationsSet.InsertNode(New, InsertPos);
167   return *New;
168 }
169 
170 void DIEAbbrevSet::Emit(const AsmPrinter *AP, MCSection *Section) const {
171   if (!Abbreviations.empty()) {
172     // Start the debug abbrev section.
173     AP->OutStreamer->SwitchSection(Section);
174     AP->emitDwarfAbbrevs(Abbreviations);
175   }
176 }
177 
178 //===----------------------------------------------------------------------===//
179 // DIE Implementation
180 //===----------------------------------------------------------------------===//
181 
182 DIE *DIE::getParent() const {
183   return Owner.dyn_cast<DIE*>();
184 }
185 
186 DIEAbbrev DIE::generateAbbrev() const {
187   DIEAbbrev Abbrev(Tag, hasChildren());
188   for (const DIEValue &V : values())
189     if (V.getForm() == dwarf::DW_FORM_implicit_const)
190       Abbrev.AddImplicitConstAttribute(V.getAttribute(),
191                                        V.getDIEInteger().getValue());
192     else
193       Abbrev.AddAttribute(V.getAttribute(), V.getForm());
194   return Abbrev;
195 }
196 
197 unsigned DIE::getDebugSectionOffset() const {
198   const DIEUnit *Unit = getUnit();
199   assert(Unit && "DIE must be owned by a DIEUnit to get its absolute offset");
200   return Unit->getDebugSectionOffset() + getOffset();
201 }
202 
203 const DIE *DIE::getUnitDie() const {
204   const DIE *p = this;
205   while (p) {
206     if (p->getTag() == dwarf::DW_TAG_compile_unit ||
207         p->getTag() == dwarf::DW_TAG_type_unit)
208       return p;
209     p = p->getParent();
210   }
211   return nullptr;
212 }
213 
214 DIEUnit *DIE::getUnit() const {
215   const DIE *UnitDie = getUnitDie();
216   if (UnitDie)
217     return UnitDie->Owner.dyn_cast<DIEUnit*>();
218   return nullptr;
219 }
220 
221 DIEValue DIE::findAttribute(dwarf::Attribute Attribute) const {
222   // Iterate through all the attributes until we find the one we're
223   // looking for, if we can't find it return NULL.
224   for (const auto &V : values())
225     if (V.getAttribute() == Attribute)
226       return V;
227   return DIEValue();
228 }
229 
230 LLVM_DUMP_METHOD
231 static void printValues(raw_ostream &O, const DIEValueList &Values,
232                         StringRef Type, unsigned Size, unsigned IndentCount) {
233   O << Type << ": Size: " << Size << "\n";
234 
235   unsigned I = 0;
236   const std::string Indent(IndentCount, ' ');
237   for (const auto &V : Values.values()) {
238     O << Indent;
239     O << "Blk[" << I++ << "]";
240     O << "  " << dwarf::FormEncodingString(V.getForm()) << " ";
241     V.print(O);
242     O << "\n";
243   }
244 }
245 
246 LLVM_DUMP_METHOD
247 void DIE::print(raw_ostream &O, unsigned IndentCount) const {
248   const std::string Indent(IndentCount, ' ');
249   O << Indent << "Die: " << format("0x%lx", (long)(intptr_t) this)
250     << ", Offset: " << Offset << ", Size: " << Size << "\n";
251 
252   O << Indent << dwarf::TagString(getTag()) << " "
253     << dwarf::ChildrenString(hasChildren()) << "\n";
254 
255   IndentCount += 2;
256   for (const auto &V : values()) {
257     O << Indent;
258     O << dwarf::AttributeString(V.getAttribute());
259     O << "  " << dwarf::FormEncodingString(V.getForm()) << " ";
260     V.print(O);
261     O << "\n";
262   }
263   IndentCount -= 2;
264 
265   for (const auto &Child : children())
266     Child.print(O, IndentCount + 4);
267 
268   O << "\n";
269 }
270 
271 #if !defined(NDEBUG) || defined(LLVM_ENABLE_DUMP)
272 LLVM_DUMP_METHOD void DIE::dump() const {
273   print(dbgs());
274 }
275 #endif
276 
277 unsigned DIE::computeOffsetsAndAbbrevs(const AsmPrinter *AP,
278                                        DIEAbbrevSet &AbbrevSet,
279                                        unsigned CUOffset) {
280   // Unique the abbreviation and fill in the abbreviation number so this DIE
281   // can be emitted.
282   const DIEAbbrev &Abbrev = AbbrevSet.uniqueAbbreviation(*this);
283 
284   // Set compile/type unit relative offset of this DIE.
285   setOffset(CUOffset);
286 
287   // Add the byte size of the abbreviation code.
288   CUOffset += getULEB128Size(getAbbrevNumber());
289 
290   // Add the byte size of all the DIE attribute values.
291   for (const auto &V : values())
292     CUOffset += V.SizeOf(AP);
293 
294   // Let the children compute their offsets and abbreviation numbers.
295   if (hasChildren()) {
296     (void)Abbrev;
297     assert(Abbrev.hasChildren() && "Children flag not set");
298 
299     for (auto &Child : children())
300       CUOffset = Child.computeOffsetsAndAbbrevs(AP, AbbrevSet, CUOffset);
301 
302     // Each child chain is terminated with a zero byte, adjust the offset.
303     CUOffset += sizeof(int8_t);
304   }
305 
306   // Compute the byte size of this DIE and all of its children correctly. This
307   // is needed so that top level DIE can help the compile unit set its length
308   // correctly.
309   setSize(CUOffset - getOffset());
310   return CUOffset;
311 }
312 
313 //===----------------------------------------------------------------------===//
314 // DIEUnit Implementation
315 //===----------------------------------------------------------------------===//
316 DIEUnit::DIEUnit(uint16_t V, uint8_t A, dwarf::Tag UnitTag)
317     : Die(UnitTag), Section(nullptr), Offset(0), Length(0), Version(V),
318       AddrSize(A)
319 {
320   Die.Owner = this;
321   assert((UnitTag == dwarf::DW_TAG_compile_unit ||
322           UnitTag == dwarf::DW_TAG_skeleton_unit ||
323           UnitTag == dwarf::DW_TAG_type_unit ||
324           UnitTag == dwarf::DW_TAG_partial_unit) &&
325          "expected a unit TAG");
326 }
327 
328 void DIEValue::emitValue(const AsmPrinter *AP) const {
329   switch (Ty) {
330   case isNone:
331     llvm_unreachable("Expected valid DIEValue");
332 #define HANDLE_DIEVALUE(T)                                                     \
333   case is##T:                                                                  \
334     getDIE##T().emitValue(AP, Form);                                           \
335     break;
336 #include "llvm/CodeGen/DIEValue.def"
337   }
338 }
339 
340 unsigned DIEValue::SizeOf(const AsmPrinter *AP) const {
341   switch (Ty) {
342   case isNone:
343     llvm_unreachable("Expected valid DIEValue");
344 #define HANDLE_DIEVALUE(T)                                                     \
345   case is##T:                                                                  \
346     return getDIE##T().SizeOf(AP, Form);
347 #include "llvm/CodeGen/DIEValue.def"
348   }
349   llvm_unreachable("Unknown DIE kind");
350 }
351 
352 LLVM_DUMP_METHOD
353 void DIEValue::print(raw_ostream &O) const {
354   switch (Ty) {
355   case isNone:
356     llvm_unreachable("Expected valid DIEValue");
357 #define HANDLE_DIEVALUE(T)                                                     \
358   case is##T:                                                                  \
359     getDIE##T().print(O);                                                      \
360     break;
361 #include "llvm/CodeGen/DIEValue.def"
362   }
363 }
364 
365 #if !defined(NDEBUG) || defined(LLVM_ENABLE_DUMP)
366 LLVM_DUMP_METHOD void DIEValue::dump() const {
367   print(dbgs());
368 }
369 #endif
370 
371 //===----------------------------------------------------------------------===//
372 // DIEInteger Implementation
373 //===----------------------------------------------------------------------===//
374 
375 /// EmitValue - Emit integer of appropriate size.
376 ///
377 void DIEInteger::emitValue(const AsmPrinter *Asm, dwarf::Form Form) const {
378   switch (Form) {
379   case dwarf::DW_FORM_implicit_const:
380   case dwarf::DW_FORM_flag_present:
381     // Emit something to keep the lines and comments in sync.
382     // FIXME: Is there a better way to do this?
383     Asm->OutStreamer->AddBlankLine();
384     return;
385   case dwarf::DW_FORM_flag:
386   case dwarf::DW_FORM_ref1:
387   case dwarf::DW_FORM_data1:
388   case dwarf::DW_FORM_strx1:
389   case dwarf::DW_FORM_addrx1:
390   case dwarf::DW_FORM_ref2:
391   case dwarf::DW_FORM_data2:
392   case dwarf::DW_FORM_strx2:
393   case dwarf::DW_FORM_addrx2:
394   case dwarf::DW_FORM_strx3:
395   case dwarf::DW_FORM_strp:
396   case dwarf::DW_FORM_ref4:
397   case dwarf::DW_FORM_data4:
398   case dwarf::DW_FORM_ref_sup4:
399   case dwarf::DW_FORM_strx4:
400   case dwarf::DW_FORM_addrx4:
401   case dwarf::DW_FORM_ref8:
402   case dwarf::DW_FORM_ref_sig8:
403   case dwarf::DW_FORM_data8:
404   case dwarf::DW_FORM_ref_sup8:
405   case dwarf::DW_FORM_GNU_ref_alt:
406   case dwarf::DW_FORM_GNU_strp_alt:
407   case dwarf::DW_FORM_line_strp:
408   case dwarf::DW_FORM_sec_offset:
409   case dwarf::DW_FORM_strp_sup:
410   case dwarf::DW_FORM_addr:
411   case dwarf::DW_FORM_ref_addr:
412     Asm->OutStreamer->emitIntValue(Integer, SizeOf(Asm, Form));
413     return;
414   case dwarf::DW_FORM_GNU_str_index:
415   case dwarf::DW_FORM_GNU_addr_index:
416   case dwarf::DW_FORM_ref_udata:
417   case dwarf::DW_FORM_strx:
418   case dwarf::DW_FORM_addrx:
419   case dwarf::DW_FORM_rnglistx:
420   case dwarf::DW_FORM_udata:
421     Asm->emitULEB128(Integer);
422     return;
423   case dwarf::DW_FORM_sdata:
424     Asm->emitSLEB128(Integer);
425     return;
426   default: llvm_unreachable("DIE Value form not supported yet");
427   }
428 }
429 
430 /// SizeOf - Determine size of integer value in bytes.
431 ///
432 unsigned DIEInteger::SizeOf(const AsmPrinter *AP, dwarf::Form Form) const {
433   dwarf::FormParams Params = {0, 0, dwarf::DWARF32};
434   if (AP)
435     Params = {AP->getDwarfVersion(), uint8_t(AP->getPointerSize()),
436               AP->OutStreamer->getContext().getDwarfFormat()};
437 
438   if (Optional<uint8_t> FixedSize = dwarf::getFixedFormByteSize(Form, Params))
439     return *FixedSize;
440 
441   switch (Form) {
442   case dwarf::DW_FORM_GNU_str_index:
443   case dwarf::DW_FORM_GNU_addr_index:
444   case dwarf::DW_FORM_ref_udata:
445   case dwarf::DW_FORM_strx:
446   case dwarf::DW_FORM_addrx:
447   case dwarf::DW_FORM_rnglistx:
448   case dwarf::DW_FORM_udata:
449     return getULEB128Size(Integer);
450   case dwarf::DW_FORM_sdata:
451     return getSLEB128Size(Integer);
452   default: llvm_unreachable("DIE Value form not supported yet");
453   }
454 }
455 
456 LLVM_DUMP_METHOD
457 void DIEInteger::print(raw_ostream &O) const {
458   O << "Int: " << (int64_t)Integer << "  0x";
459   O.write_hex(Integer);
460 }
461 
462 //===----------------------------------------------------------------------===//
463 // DIEExpr Implementation
464 //===----------------------------------------------------------------------===//
465 
466 /// EmitValue - Emit expression value.
467 ///
468 void DIEExpr::emitValue(const AsmPrinter *AP, dwarf::Form Form) const {
469   AP->emitDebugValue(Expr, SizeOf(AP, Form));
470 }
471 
472 /// SizeOf - Determine size of expression value in bytes.
473 ///
474 unsigned DIEExpr::SizeOf(const AsmPrinter *AP, dwarf::Form Form) const {
475   switch (Form) {
476   case dwarf::DW_FORM_data4:
477     return 4;
478   case dwarf::DW_FORM_data8:
479     return 8;
480   case dwarf::DW_FORM_sec_offset:
481     // FIXME: add support for DWARF64
482     return 4;
483   default:
484     llvm_unreachable("DIE Value form not supported yet");
485   }
486 }
487 
488 LLVM_DUMP_METHOD
489 void DIEExpr::print(raw_ostream &O) const { O << "Expr: " << *Expr; }
490 
491 //===----------------------------------------------------------------------===//
492 // DIELabel Implementation
493 //===----------------------------------------------------------------------===//
494 
495 /// EmitValue - Emit label value.
496 ///
497 void DIELabel::emitValue(const AsmPrinter *AP, dwarf::Form Form) const {
498   bool IsSectionRelative = Form != dwarf::DW_FORM_addr;
499   AP->emitLabelReference(Label, SizeOf(AP, Form), IsSectionRelative);
500 }
501 
502 /// SizeOf - Determine size of label value in bytes.
503 ///
504 unsigned DIELabel::SizeOf(const AsmPrinter *AP, dwarf::Form Form) const {
505   switch (Form) {
506   case dwarf::DW_FORM_data4:
507     return 4;
508   case dwarf::DW_FORM_sec_offset:
509   case dwarf::DW_FORM_strp:
510     // FIXME: add support for DWARF64
511     return 4;
512   case dwarf::DW_FORM_addr:
513     return AP->MAI->getCodePointerSize();
514   default:
515     llvm_unreachable("DIE Value form not supported yet");
516   }
517 }
518 
519 LLVM_DUMP_METHOD
520 void DIELabel::print(raw_ostream &O) const { O << "Lbl: " << Label->getName(); }
521 
522 //===----------------------------------------------------------------------===//
523 // DIEBaseTypeRef Implementation
524 //===----------------------------------------------------------------------===//
525 
526 void DIEBaseTypeRef::emitValue(const AsmPrinter *AP, dwarf::Form Form) const {
527   uint64_t Offset = CU->ExprRefedBaseTypes[Index].Die->getOffset();
528   assert(Offset < (1ULL << (ULEB128PadSize * 7)) && "Offset wont fit");
529   AP->emitULEB128(Offset, nullptr, ULEB128PadSize);
530 }
531 
532 unsigned DIEBaseTypeRef::SizeOf(const AsmPrinter *AP, dwarf::Form Form) const {
533   return ULEB128PadSize;
534 }
535 
536 LLVM_DUMP_METHOD
537 void DIEBaseTypeRef::print(raw_ostream &O) const { O << "BaseTypeRef: " << Index; }
538 
539 //===----------------------------------------------------------------------===//
540 // DIEDelta Implementation
541 //===----------------------------------------------------------------------===//
542 
543 /// EmitValue - Emit delta value.
544 ///
545 void DIEDelta::emitValue(const AsmPrinter *AP, dwarf::Form Form) const {
546   AP->emitLabelDifference(LabelHi, LabelLo, SizeOf(AP, Form));
547 }
548 
549 /// SizeOf - Determine size of delta value in bytes.
550 ///
551 unsigned DIEDelta::SizeOf(const AsmPrinter *AP, dwarf::Form Form) const {
552   switch (Form) {
553   case dwarf::DW_FORM_data4:
554     return 4;
555   case dwarf::DW_FORM_sec_offset:
556     // FIXME: add support for DWARF64
557     return 4;
558   default:
559     llvm_unreachable("DIE Value form not supported yet");
560   }
561 }
562 
563 LLVM_DUMP_METHOD
564 void DIEDelta::print(raw_ostream &O) const {
565   O << "Del: " << LabelHi->getName() << "-" << LabelLo->getName();
566 }
567 
568 //===----------------------------------------------------------------------===//
569 // DIEString Implementation
570 //===----------------------------------------------------------------------===//
571 
572 /// EmitValue - Emit string value.
573 ///
574 void DIEString::emitValue(const AsmPrinter *AP, dwarf::Form Form) const {
575   // Index of string in symbol table.
576   switch (Form) {
577   case dwarf::DW_FORM_GNU_str_index:
578   case dwarf::DW_FORM_strx:
579   case dwarf::DW_FORM_strx1:
580   case dwarf::DW_FORM_strx2:
581   case dwarf::DW_FORM_strx3:
582   case dwarf::DW_FORM_strx4:
583     DIEInteger(S.getIndex()).emitValue(AP, Form);
584     return;
585   case dwarf::DW_FORM_strp:
586     if (AP->MAI->doesDwarfUseRelocationsAcrossSections())
587       DIELabel(S.getSymbol()).emitValue(AP, Form);
588     else
589       DIEInteger(S.getOffset()).emitValue(AP, Form);
590     return;
591   default:
592     llvm_unreachable("Expected valid string form");
593   }
594 }
595 
596 /// SizeOf - Determine size of delta value in bytes.
597 ///
598 unsigned DIEString::SizeOf(const AsmPrinter *AP, dwarf::Form Form) const {
599   // Index of string in symbol table.
600   switch (Form) {
601   case dwarf::DW_FORM_GNU_str_index:
602   case dwarf::DW_FORM_strx:
603   case dwarf::DW_FORM_strx1:
604   case dwarf::DW_FORM_strx2:
605   case dwarf::DW_FORM_strx3:
606   case dwarf::DW_FORM_strx4:
607     return DIEInteger(S.getIndex()).SizeOf(AP, Form);
608   case dwarf::DW_FORM_strp:
609     if (AP->MAI->doesDwarfUseRelocationsAcrossSections())
610       return DIELabel(S.getSymbol()).SizeOf(AP, Form);
611     return DIEInteger(S.getOffset()).SizeOf(AP, Form);
612   default:
613     llvm_unreachable("Expected valid string form");
614   }
615 }
616 
617 LLVM_DUMP_METHOD
618 void DIEString::print(raw_ostream &O) const {
619   O << "String: " << S.getString();
620 }
621 
622 //===----------------------------------------------------------------------===//
623 // DIEInlineString Implementation
624 //===----------------------------------------------------------------------===//
625 void DIEInlineString::emitValue(const AsmPrinter *AP, dwarf::Form Form) const {
626   if (Form == dwarf::DW_FORM_string) {
627     AP->OutStreamer->emitBytes(S);
628     AP->emitInt8(0);
629     return;
630   }
631   llvm_unreachable("Expected valid string form");
632 }
633 
634 unsigned DIEInlineString::SizeOf(const AsmPrinter *AP, dwarf::Form Form) const {
635   // Emit string bytes + NULL byte.
636   return S.size() + 1;
637 }
638 
639 LLVM_DUMP_METHOD
640 void DIEInlineString::print(raw_ostream &O) const {
641   O << "InlineString: " << S;
642 }
643 
644 //===----------------------------------------------------------------------===//
645 // DIEEntry Implementation
646 //===----------------------------------------------------------------------===//
647 
648 /// EmitValue - Emit debug information entry offset.
649 ///
650 void DIEEntry::emitValue(const AsmPrinter *AP, dwarf::Form Form) const {
651 
652   switch (Form) {
653   case dwarf::DW_FORM_ref1:
654   case dwarf::DW_FORM_ref2:
655   case dwarf::DW_FORM_ref4:
656   case dwarf::DW_FORM_ref8:
657     AP->OutStreamer->emitIntValue(Entry->getOffset(), SizeOf(AP, Form));
658     return;
659 
660   case dwarf::DW_FORM_ref_udata:
661     AP->emitULEB128(Entry->getOffset());
662     return;
663 
664   case dwarf::DW_FORM_ref_addr: {
665     // Get the absolute offset for this DIE within the debug info/types section.
666     unsigned Addr = Entry->getDebugSectionOffset();
667     if (const MCSymbol *SectionSym =
668             Entry->getUnit()->getCrossSectionRelativeBaseAddress()) {
669       AP->emitLabelPlusOffset(SectionSym, Addr, SizeOf(AP, Form), true);
670       return;
671     }
672 
673     AP->OutStreamer->emitIntValue(Addr, SizeOf(AP, Form));
674     return;
675   }
676   default:
677     llvm_unreachable("Improper form for DIE reference");
678   }
679 }
680 
681 unsigned DIEEntry::SizeOf(const AsmPrinter *AP, dwarf::Form Form) const {
682   switch (Form) {
683   case dwarf::DW_FORM_ref1:
684     return 1;
685   case dwarf::DW_FORM_ref2:
686     return 2;
687   case dwarf::DW_FORM_ref4:
688     return 4;
689   case dwarf::DW_FORM_ref8:
690     return 8;
691   case dwarf::DW_FORM_ref_udata:
692     return getULEB128Size(Entry->getOffset());
693   case dwarf::DW_FORM_ref_addr:
694     if (AP->getDwarfVersion() == 2)
695       return AP->MAI->getCodePointerSize();
696     switch (AP->OutStreamer->getContext().getDwarfFormat()) {
697     case dwarf::DWARF32:
698       return 4;
699     case dwarf::DWARF64:
700       return 8;
701     }
702     llvm_unreachable("Invalid DWARF format");
703 
704   default:
705     llvm_unreachable("Improper form for DIE reference");
706   }
707 }
708 
709 LLVM_DUMP_METHOD
710 void DIEEntry::print(raw_ostream &O) const {
711   O << format("Die: 0x%lx", (long)(intptr_t)&Entry);
712 }
713 
714 //===----------------------------------------------------------------------===//
715 // DIELoc Implementation
716 //===----------------------------------------------------------------------===//
717 
718 /// ComputeSize - calculate the size of the location expression.
719 ///
720 unsigned DIELoc::ComputeSize(const AsmPrinter *AP) const {
721   if (!Size) {
722     for (const auto &V : values())
723       Size += V.SizeOf(AP);
724   }
725 
726   return Size;
727 }
728 
729 /// EmitValue - Emit location data.
730 ///
731 void DIELoc::emitValue(const AsmPrinter *Asm, dwarf::Form Form) const {
732   switch (Form) {
733   default: llvm_unreachable("Improper form for block");
734   case dwarf::DW_FORM_block1: Asm->emitInt8(Size);    break;
735   case dwarf::DW_FORM_block2: Asm->emitInt16(Size);   break;
736   case dwarf::DW_FORM_block4: Asm->emitInt32(Size);   break;
737   case dwarf::DW_FORM_block:
738   case dwarf::DW_FORM_exprloc:
739     Asm->emitULEB128(Size);
740     break;
741   }
742 
743   for (const auto &V : values())
744     V.emitValue(Asm);
745 }
746 
747 /// SizeOf - Determine size of location data in bytes.
748 ///
749 unsigned DIELoc::SizeOf(const AsmPrinter *AP, dwarf::Form Form) const {
750   switch (Form) {
751   case dwarf::DW_FORM_block1: return Size + sizeof(int8_t);
752   case dwarf::DW_FORM_block2: return Size + sizeof(int16_t);
753   case dwarf::DW_FORM_block4: return Size + sizeof(int32_t);
754   case dwarf::DW_FORM_block:
755   case dwarf::DW_FORM_exprloc:
756     return Size + getULEB128Size(Size);
757   default: llvm_unreachable("Improper form for block");
758   }
759 }
760 
761 LLVM_DUMP_METHOD
762 void DIELoc::print(raw_ostream &O) const {
763   printValues(O, *this, "ExprLoc", Size, 5);
764 }
765 
766 //===----------------------------------------------------------------------===//
767 // DIEBlock Implementation
768 //===----------------------------------------------------------------------===//
769 
770 /// ComputeSize - calculate the size of the block.
771 ///
772 unsigned DIEBlock::ComputeSize(const AsmPrinter *AP) const {
773   if (!Size) {
774     for (const auto &V : values())
775       Size += V.SizeOf(AP);
776   }
777 
778   return Size;
779 }
780 
781 /// EmitValue - Emit block data.
782 ///
783 void DIEBlock::emitValue(const AsmPrinter *Asm, dwarf::Form Form) const {
784   switch (Form) {
785   default: llvm_unreachable("Improper form for block");
786   case dwarf::DW_FORM_block1: Asm->emitInt8(Size);    break;
787   case dwarf::DW_FORM_block2: Asm->emitInt16(Size);   break;
788   case dwarf::DW_FORM_block4: Asm->emitInt32(Size);   break;
789   case dwarf::DW_FORM_block:
790     Asm->emitULEB128(Size);
791     break;
792   case dwarf::DW_FORM_string: break;
793   case dwarf::DW_FORM_data16: break;
794   }
795 
796   for (const auto &V : values())
797     V.emitValue(Asm);
798 }
799 
800 /// SizeOf - Determine size of block data in bytes.
801 ///
802 unsigned DIEBlock::SizeOf(const AsmPrinter *AP, dwarf::Form Form) const {
803   switch (Form) {
804   case dwarf::DW_FORM_block1: return Size + sizeof(int8_t);
805   case dwarf::DW_FORM_block2: return Size + sizeof(int16_t);
806   case dwarf::DW_FORM_block4: return Size + sizeof(int32_t);
807   case dwarf::DW_FORM_block:  return Size + getULEB128Size(Size);
808   case dwarf::DW_FORM_data16: return 16;
809   default: llvm_unreachable("Improper form for block");
810   }
811 }
812 
813 LLVM_DUMP_METHOD
814 void DIEBlock::print(raw_ostream &O) const {
815   printValues(O, *this, "Blk", Size, 5);
816 }
817 
818 //===----------------------------------------------------------------------===//
819 // DIELocList Implementation
820 //===----------------------------------------------------------------------===//
821 
822 unsigned DIELocList::SizeOf(const AsmPrinter *AP, dwarf::Form Form) const {
823   switch (Form) {
824   case dwarf::DW_FORM_loclistx:
825     return getULEB128Size(Index);
826   case dwarf::DW_FORM_data4:
827     return 4;
828   case dwarf::DW_FORM_sec_offset:
829     // FIXME: add support for DWARF64
830     return 4;
831   default:
832     llvm_unreachable("DIE Value form not supported yet");
833   }
834 }
835 
836 /// EmitValue - Emit label value.
837 ///
838 void DIELocList::emitValue(const AsmPrinter *AP, dwarf::Form Form) const {
839   if (Form == dwarf::DW_FORM_loclistx) {
840     AP->emitULEB128(Index);
841     return;
842   }
843   DwarfDebug *DD = AP->getDwarfDebug();
844   MCSymbol *Label = DD->getDebugLocs().getList(Index).Label;
845   AP->emitDwarfSymbolReference(Label, /*ForceOffset*/ DD->useSplitDwarf());
846 }
847 
848 LLVM_DUMP_METHOD
849 void DIELocList::print(raw_ostream &O) const { O << "LocList: " << Index; }
850