1//===- lib/MC/MCDwarf.cpp - MCDwarf implementation ------------------------===//
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#include "llvm/MC/MCDwarf.h"
10#include "llvm/ADT/ArrayRef.h"
11#include "llvm/ADT/STLExtras.h"
12#include "llvm/ADT/SmallString.h"
13#include "llvm/ADT/SmallVector.h"
14#include "llvm/ADT/StringRef.h"
15#include "llvm/ADT/Twine.h"
16#include "llvm/BinaryFormat/Dwarf.h"
17#include "llvm/Config/config.h"
18#include "llvm/MC/MCAsmInfo.h"
19#include "llvm/MC/MCContext.h"
20#include "llvm/MC/MCExpr.h"
21#include "llvm/MC/MCObjectFileInfo.h"
22#include "llvm/MC/MCObjectStreamer.h"
23#include "llvm/MC/MCRegisterInfo.h"
24#include "llvm/MC/MCSection.h"
25#include "llvm/MC/MCStreamer.h"
26#include "llvm/MC/MCSymbol.h"
27#include "llvm/Support/Casting.h"
28#include "llvm/Support/EndianStream.h"
29#include "llvm/Support/ErrorHandling.h"
30#include "llvm/Support/LEB128.h"
31#include "llvm/Support/MathExtras.h"
32#include "llvm/Support/Path.h"
33#include "llvm/Support/SourceMgr.h"
34#include "llvm/Support/raw_ostream.h"
35#include <cassert>
36#include <cstdint>
37#include <optional>
38#include <string>
39#include <utility>
40#include <vector>
41
42using namespace llvm;
43
44MCSymbol *mcdwarf::emitListsTableHeaderStart(MCStreamer &S) {
45 MCSymbol *Start = S.getContext().createTempSymbol(Name: "debug_list_header_start");
46 MCSymbol *End = S.getContext().createTempSymbol(Name: "debug_list_header_end");
47 auto DwarfFormat = S.getContext().getDwarfFormat();
48 if (DwarfFormat == dwarf::DWARF64) {
49 S.AddComment(T: "DWARF64 mark");
50 S.emitInt32(Value: dwarf::DW_LENGTH_DWARF64);
51 }
52 S.AddComment(T: "Length");
53 S.emitAbsoluteSymbolDiff(Hi: End, Lo: Start,
54 Size: dwarf::getDwarfOffsetByteSize(Format: DwarfFormat));
55 S.emitLabel(Symbol: Start);
56 S.AddComment(T: "Version");
57 S.emitInt16(Value: S.getContext().getDwarfVersion());
58 S.AddComment(T: "Address size");
59 S.emitInt8(Value: S.getContext().getAsmInfo()->getCodePointerSize());
60 S.AddComment(T: "Segment selector size");
61 S.emitInt8(Value: 0);
62 return End;
63}
64
65static inline uint64_t ScaleAddrDelta(MCContext &Context, uint64_t AddrDelta) {
66 unsigned MinInsnLength = Context.getAsmInfo()->getMinInstAlignment();
67 if (MinInsnLength == 1)
68 return AddrDelta;
69 if (AddrDelta % MinInsnLength != 0) {
70 // TODO: report this error, but really only once.
71 ;
72 }
73 return AddrDelta / MinInsnLength;
74}
75
76MCDwarfLineStr::MCDwarfLineStr(MCContext &Ctx) {
77 UseRelocs = Ctx.getAsmInfo()->doesDwarfUseRelocationsAcrossSections();
78 if (UseRelocs) {
79 MCSection *DwarfLineStrSection =
80 Ctx.getObjectFileInfo()->getDwarfLineStrSection();
81 assert(DwarfLineStrSection && "DwarfLineStrSection must not be NULL");
82 LineStrLabel = DwarfLineStrSection->getBeginSymbol();
83 }
84}
85
86//
87// This is called when an instruction is assembled into the specified section
88// and if there is information from the last .loc directive that has yet to have
89// a line entry made for it is made.
90//
91void MCDwarfLineEntry::make(MCStreamer *MCOS, MCSection *Section) {
92 if (!MCOS->getContext().getDwarfLocSeen())
93 return;
94
95 // Create a symbol at in the current section for use in the line entry.
96 MCSymbol *LineSym = MCOS->getContext().createTempSymbol();
97 // Set the value of the symbol to use for the MCDwarfLineEntry.
98 MCOS->emitLabel(Symbol: LineSym);
99
100 // Get the current .loc info saved in the context.
101 const MCDwarfLoc &DwarfLoc = MCOS->getContext().getCurrentDwarfLoc();
102
103 // Create a (local) line entry with the symbol and the current .loc info.
104 MCDwarfLineEntry LineEntry(LineSym, DwarfLoc);
105
106 // clear DwarfLocSeen saying the current .loc info is now used.
107 MCOS->getContext().clearDwarfLocSeen();
108
109 // Add the line entry to this section's entries.
110 MCOS->getContext()
111 .getMCDwarfLineTable(CUID: MCOS->getContext().getDwarfCompileUnitID())
112 .getMCLineSections()
113 .addLineEntry(LineEntry, Sec: Section);
114}
115
116//
117// This helper routine returns an expression of End - Start - IntVal .
118//
119static inline const MCExpr *makeEndMinusStartExpr(MCContext &Ctx,
120 const MCSymbol &Start,
121 const MCSymbol &End,
122 int IntVal) {
123 const MCExpr *Res = MCSymbolRefExpr::create(Symbol: &End, Ctx);
124 const MCExpr *RHS = MCSymbolRefExpr::create(Symbol: &Start, Ctx);
125 const MCExpr *Res1 = MCBinaryExpr::create(Op: MCBinaryExpr::Sub, LHS: Res, RHS, Ctx);
126 const MCExpr *Res2 = MCConstantExpr::create(Value: IntVal, Ctx);
127 const MCExpr *Res3 = MCBinaryExpr::create(Op: MCBinaryExpr::Sub, LHS: Res1, RHS: Res2, Ctx);
128 return Res3;
129}
130
131//
132// This helper routine returns an expression of Start + IntVal .
133//
134static inline const MCExpr *
135makeStartPlusIntExpr(MCContext &Ctx, const MCSymbol &Start, int IntVal) {
136 const MCExpr *LHS = MCSymbolRefExpr::create(Symbol: &Start, Ctx);
137 const MCExpr *RHS = MCConstantExpr::create(Value: IntVal, Ctx);
138 const MCExpr *Res = MCBinaryExpr::create(Op: MCBinaryExpr::Add, LHS, RHS, Ctx);
139 return Res;
140}
141
142void MCLineSection::addEndEntry(MCSymbol *EndLabel) {
143 auto *Sec = &EndLabel->getSection();
144 // The line table may be empty, which we should skip adding an end entry.
145 // There are three cases:
146 // (1) MCAsmStreamer - emitDwarfLocDirective emits a location directive in
147 // place instead of adding a line entry if the target has
148 // usesDwarfFileAndLocDirectives.
149 // (2) MCObjectStreamer - if a function has incomplete debug info where
150 // instructions don't have DILocations, the line entries are missing.
151 // (3) It's also possible that there are no prior line entries if the section
152 // itself is empty before this end label.
153 auto I = MCLineDivisions.find(Key: Sec);
154 if (I == MCLineDivisions.end()) // If section not found, do nothing.
155 return;
156
157 auto &Entries = I->second;
158 // If no entries in this section's list, nothing to base the end entry on.
159 if (Entries.empty())
160 return;
161
162 // Create the end entry based on the last existing entry.
163 MCDwarfLineEntry EndEntry = Entries.back();
164
165 // An end entry is just for marking the end of a sequence of code locations.
166 // It should not carry forward a LineStreamLabel from a previous special entry
167 // if Entries.back() happened to be such an entry. So here we clear
168 // LineStreamLabel.
169 EndEntry.LineStreamLabel = nullptr;
170 EndEntry.setEndLabel(EndLabel);
171 Entries.push_back(x: EndEntry);
172}
173
174//
175// This emits the Dwarf line table for the specified section from the entries
176// in the LineSection.
177//
178void MCDwarfLineTable::emitOne(
179 MCStreamer *MCOS, MCSection *Section,
180 const MCLineSection::MCDwarfLineEntryCollection &LineEntries) {
181
182 unsigned FileNum, LastLine, Column, Flags, Isa, Discriminator;
183 bool IsAtStartSeq;
184 MCSymbol *PrevLabel;
185 auto init = [&]() {
186 FileNum = 1;
187 LastLine = 1;
188 Column = 0;
189 Flags = DWARF2_LINE_DEFAULT_IS_STMT ? DWARF2_FLAG_IS_STMT : 0;
190 Isa = 0;
191 Discriminator = 0;
192 PrevLabel = nullptr;
193 IsAtStartSeq = true;
194 };
195 init();
196
197 // Loop through each MCDwarfLineEntry and encode the dwarf line number table.
198 bool EndEntryEmitted = false;
199 for (auto It = LineEntries.begin(); It != LineEntries.end(); ++It) {
200 auto LineEntry = *It;
201 MCSymbol *CurrLabel = LineEntry.getLabel();
202 const MCAsmInfo *asmInfo = MCOS->getContext().getAsmInfo();
203
204 if (LineEntry.LineStreamLabel) {
205 if (!IsAtStartSeq) {
206 auto *Label = CurrLabel;
207 auto NextIt = It + 1;
208 // LineEntry with a null Label is probably a fake LineEntry we added
209 // when `-emit-func-debug-line-table-offsets` in order to terminate the
210 // sequence. Look for the next Label if possible, otherwise we will set
211 // the PC to the end of the section.
212 if (!Label && NextIt != LineEntries.end()) {
213 Label = NextIt->getLabel();
214 }
215 MCOS->emitDwarfLineEndEntry(Section, LastLabel: PrevLabel,
216 /*EndLabel =*/Label);
217 init();
218 }
219 MCOS->emitLabel(Symbol: LineEntry.LineStreamLabel, Loc: LineEntry.StreamLabelDefLoc);
220 continue;
221 }
222
223 if (LineEntry.IsEndEntry) {
224 MCOS->emitDwarfAdvanceLineAddr(INT64_MAX, LastLabel: PrevLabel, Label: CurrLabel,
225 PointerSize: asmInfo->getCodePointerSize());
226 init();
227 EndEntryEmitted = true;
228 continue;
229 }
230
231 int64_t LineDelta = static_cast<int64_t>(LineEntry.getLine()) - LastLine;
232
233 if (FileNum != LineEntry.getFileNum()) {
234 FileNum = LineEntry.getFileNum();
235 MCOS->emitInt8(Value: dwarf::DW_LNS_set_file);
236 MCOS->emitULEB128IntValue(Value: FileNum);
237 }
238 if (Column != LineEntry.getColumn()) {
239 Column = LineEntry.getColumn();
240 MCOS->emitInt8(Value: dwarf::DW_LNS_set_column);
241 MCOS->emitULEB128IntValue(Value: Column);
242 }
243 if (Discriminator != LineEntry.getDiscriminator() &&
244 MCOS->getContext().getDwarfVersion() >= 4) {
245 Discriminator = LineEntry.getDiscriminator();
246 unsigned Size = getULEB128Size(Value: Discriminator);
247 MCOS->emitInt8(Value: dwarf::DW_LNS_extended_op);
248 MCOS->emitULEB128IntValue(Value: Size + 1);
249 MCOS->emitInt8(Value: dwarf::DW_LNE_set_discriminator);
250 MCOS->emitULEB128IntValue(Value: Discriminator);
251 }
252 if (Isa != LineEntry.getIsa()) {
253 Isa = LineEntry.getIsa();
254 MCOS->emitInt8(Value: dwarf::DW_LNS_set_isa);
255 MCOS->emitULEB128IntValue(Value: Isa);
256 }
257 if ((LineEntry.getFlags() ^ Flags) & DWARF2_FLAG_IS_STMT) {
258 Flags = LineEntry.getFlags();
259 MCOS->emitInt8(Value: dwarf::DW_LNS_negate_stmt);
260 }
261 if (LineEntry.getFlags() & DWARF2_FLAG_BASIC_BLOCK)
262 MCOS->emitInt8(Value: dwarf::DW_LNS_set_basic_block);
263 if (LineEntry.getFlags() & DWARF2_FLAG_PROLOGUE_END)
264 MCOS->emitInt8(Value: dwarf::DW_LNS_set_prologue_end);
265 if (LineEntry.getFlags() & DWARF2_FLAG_EPILOGUE_BEGIN)
266 MCOS->emitInt8(Value: dwarf::DW_LNS_set_epilogue_begin);
267
268 // At this point we want to emit/create the sequence to encode the delta in
269 // line numbers and the increment of the address from the previous Label
270 // and the current Label.
271 MCOS->emitDwarfAdvanceLineAddr(LineDelta, LastLabel: PrevLabel, Label: CurrLabel,
272 PointerSize: asmInfo->getCodePointerSize());
273
274 Discriminator = 0;
275 LastLine = LineEntry.getLine();
276 PrevLabel = CurrLabel;
277 IsAtStartSeq = false;
278 }
279
280 // Generate DWARF line end entry.
281 // We do not need this for DwarfDebug that explicitly terminates the line
282 // table using ranges whenever CU or section changes. However, the MC path
283 // does not track ranges nor terminate the line table. In that case,
284 // conservatively use the section end symbol to end the line table.
285 if (!EndEntryEmitted && !IsAtStartSeq)
286 MCOS->emitDwarfLineEndEntry(Section, LastLabel: PrevLabel);
287}
288
289void MCDwarfLineTable::endCurrentSeqAndEmitLineStreamLabel(MCStreamer *MCOS,
290 SMLoc DefLoc,
291 StringRef Name) {
292 auto &ctx = MCOS->getContext();
293 auto *LineStreamLabel = ctx.getOrCreateSymbol(Name);
294 auto *LineSym = ctx.createTempSymbol();
295 MCOS->emitLabel(Symbol: LineSym);
296 const MCDwarfLoc &DwarfLoc = ctx.getCurrentDwarfLoc();
297
298 // Create a 'fake' line entry by having LineStreamLabel be non-null. This
299 // won't actually emit any line information, it will reset the line table
300 // sequence and emit a label at the start of the new line table sequence.
301 MCDwarfLineEntry LineEntry(LineSym, DwarfLoc, LineStreamLabel, DefLoc);
302 getMCLineSections().addLineEntry(LineEntry, Sec: MCOS->getCurrentSectionOnly());
303}
304
305//
306// This emits the Dwarf file and the line tables.
307//
308void MCDwarfLineTable::emit(MCStreamer *MCOS, MCDwarfLineTableParams Params) {
309 MCContext &context = MCOS->getContext();
310
311 auto &LineTables = context.getMCDwarfLineTables();
312
313 // Bail out early so we don't switch to the debug_line section needlessly and
314 // in doing so create an unnecessary (if empty) section.
315 if (LineTables.empty())
316 return;
317
318 // In a v5 non-split line table, put the strings in a separate section.
319 std::optional<MCDwarfLineStr> LineStr;
320 if (context.getDwarfVersion() >= 5)
321 LineStr.emplace(args&: context);
322
323 // Switch to the section where the table will be emitted into.
324 MCOS->switchSection(Section: context.getObjectFileInfo()->getDwarfLineSection());
325
326 // Handle the rest of the Compile Units.
327 for (const auto &CUIDTablePair : LineTables) {
328 CUIDTablePair.second.emitCU(MCOS, Params, LineStr);
329 }
330
331 if (LineStr)
332 LineStr->emitSection(MCOS);
333}
334
335void MCDwarfDwoLineTable::Emit(MCStreamer &MCOS, MCDwarfLineTableParams Params,
336 MCSection *Section) const {
337 if (!HasSplitLineTable)
338 return;
339 std::optional<MCDwarfLineStr> NoLineStr(std::nullopt);
340 MCOS.switchSection(Section);
341 MCOS.emitLabel(Symbol: Header.Emit(MCOS: &MCOS, Params, SpecialOpcodeLengths: {}, LineStr&: NoLineStr).second);
342}
343
344std::pair<MCSymbol *, MCSymbol *>
345MCDwarfLineTableHeader::Emit(MCStreamer *MCOS, MCDwarfLineTableParams Params,
346 std::optional<MCDwarfLineStr> &LineStr) const {
347 static const char StandardOpcodeLengths[] = {
348 0, // length of DW_LNS_copy
349 1, // length of DW_LNS_advance_pc
350 1, // length of DW_LNS_advance_line
351 1, // length of DW_LNS_set_file
352 1, // length of DW_LNS_set_column
353 0, // length of DW_LNS_negate_stmt
354 0, // length of DW_LNS_set_basic_block
355 0, // length of DW_LNS_const_add_pc
356 1, // length of DW_LNS_fixed_advance_pc
357 0, // length of DW_LNS_set_prologue_end
358 0, // length of DW_LNS_set_epilogue_begin
359 1 // DW_LNS_set_isa
360 };
361 assert(std::size(StandardOpcodeLengths) >=
362 (Params.DWARF2LineOpcodeBase - 1U));
363 return Emit(MCOS, Params,
364 SpecialOpcodeLengths: ArrayRef(StandardOpcodeLengths, Params.DWARF2LineOpcodeBase - 1),
365 LineStr);
366}
367
368static const MCExpr *forceExpAbs(MCStreamer &OS, const MCExpr* Expr) {
369 MCContext &Context = OS.getContext();
370 assert(!isa<MCSymbolRefExpr>(Expr));
371 if (!Context.getAsmInfo()->doesSetDirectiveSuppressReloc())
372 return Expr;
373
374 // On Mach-O, try to avoid a relocation by using a set directive.
375 MCSymbol *ABS = Context.createTempSymbol();
376 OS.emitAssignment(Symbol: ABS, Value: Expr);
377 return MCSymbolRefExpr::create(Symbol: ABS, Ctx&: Context);
378}
379
380static void emitAbsValue(MCStreamer &OS, const MCExpr *Value, unsigned Size) {
381 const MCExpr *ABS = forceExpAbs(OS, Expr: Value);
382 OS.emitValue(Value: ABS, Size);
383}
384
385void MCDwarfLineStr::emitSection(MCStreamer *MCOS) {
386 // Switch to the .debug_line_str section.
387 MCOS->switchSection(
388 Section: MCOS->getContext().getObjectFileInfo()->getDwarfLineStrSection());
389 SmallString<0> Data = getFinalizedData();
390 MCOS->emitBinaryData(Data: Data.str());
391}
392
393SmallString<0> MCDwarfLineStr::getFinalizedData() {
394 // Emit the strings without perturbing the offsets we used.
395 if (!LineStrings.isFinalized())
396 LineStrings.finalizeInOrder();
397 SmallString<0> Data;
398 Data.resize(N: LineStrings.getSize());
399 LineStrings.write(Buf: (uint8_t *)Data.data());
400 return Data;
401}
402
403size_t MCDwarfLineStr::addString(StringRef Path) {
404 return LineStrings.add(S: Path);
405}
406
407void MCDwarfLineStr::emitRef(MCStreamer *MCOS, StringRef Path) {
408 int RefSize =
409 dwarf::getDwarfOffsetByteSize(Format: MCOS->getContext().getDwarfFormat());
410 size_t Offset = addString(Path);
411 if (UseRelocs) {
412 MCContext &Ctx = MCOS->getContext();
413 if (Ctx.getAsmInfo()->needsDwarfSectionOffsetDirective()) {
414 MCOS->emitCOFFSecRel32(Symbol: LineStrLabel, Offset);
415 } else {
416 MCOS->emitValue(Value: makeStartPlusIntExpr(Ctx, Start: *LineStrLabel, IntVal: Offset),
417 Size: RefSize);
418 }
419 } else
420 MCOS->emitIntValue(Value: Offset, Size: RefSize);
421}
422
423void MCDwarfLineTableHeader::emitV2FileDirTables(MCStreamer *MCOS) const {
424 // First the directory table.
425 for (auto &Dir : MCDwarfDirs) {
426 MCOS->emitBytes(Data: Dir); // The DirectoryName, and...
427 MCOS->emitBytes(Data: StringRef("\0", 1)); // its null terminator.
428 }
429 MCOS->emitInt8(Value: 0); // Terminate the directory list.
430
431 // Second the file table.
432 for (unsigned i = 1; i < MCDwarfFiles.size(); i++) {
433 assert(!MCDwarfFiles[i].Name.empty());
434 MCOS->emitBytes(Data: MCDwarfFiles[i].Name); // FileName and...
435 MCOS->emitBytes(Data: StringRef("\0", 1)); // its null terminator.
436 MCOS->emitULEB128IntValue(Value: MCDwarfFiles[i].DirIndex); // Directory number.
437 MCOS->emitInt8(Value: 0); // Last modification timestamp (always 0).
438 MCOS->emitInt8(Value: 0); // File size (always 0).
439 }
440 MCOS->emitInt8(Value: 0); // Terminate the file list.
441}
442
443static void emitOneV5FileEntry(MCStreamer *MCOS, const MCDwarfFile &DwarfFile,
444 bool EmitMD5, bool HasAnySource,
445 std::optional<MCDwarfLineStr> &LineStr) {
446 assert(!DwarfFile.Name.empty());
447 if (LineStr)
448 LineStr->emitRef(MCOS, Path: DwarfFile.Name);
449 else {
450 MCOS->emitBytes(Data: DwarfFile.Name); // FileName and...
451 MCOS->emitBytes(Data: StringRef("\0", 1)); // its null terminator.
452 }
453 MCOS->emitULEB128IntValue(Value: DwarfFile.DirIndex); // Directory number.
454 if (EmitMD5) {
455 const MD5::MD5Result &Cksum = *DwarfFile.Checksum;
456 MCOS->emitBinaryData(
457 Data: StringRef(reinterpret_cast<const char *>(Cksum.data()), Cksum.size()));
458 }
459 if (HasAnySource) {
460 // From https://dwarfstd.org/issues/180201.1.html
461 // * The value is an empty null-terminated string if no source is available
462 StringRef Source = DwarfFile.Source.value_or(u: StringRef());
463 // * If the source is available but is an empty file then the value is a
464 // null-terminated single "\n".
465 if (DwarfFile.Source && DwarfFile.Source->empty())
466 Source = "\n";
467 if (LineStr)
468 LineStr->emitRef(MCOS, Path: Source);
469 else {
470 MCOS->emitBytes(Data: Source); // Source and...
471 MCOS->emitBytes(Data: StringRef("\0", 1)); // its null terminator.
472 }
473 }
474}
475
476void MCDwarfLineTableHeader::emitV5FileDirTables(
477 MCStreamer *MCOS, std::optional<MCDwarfLineStr> &LineStr) const {
478 // The directory format, which is just a list of the directory paths. In a
479 // non-split object, these are references to .debug_line_str; in a split
480 // object, they are inline strings.
481 MCOS->emitInt8(Value: 1);
482 MCOS->emitULEB128IntValue(Value: dwarf::DW_LNCT_path);
483 MCOS->emitULEB128IntValue(Value: LineStr ? dwarf::DW_FORM_line_strp
484 : dwarf::DW_FORM_string);
485 MCOS->emitULEB128IntValue(Value: MCDwarfDirs.size() + 1);
486 // Try not to emit an empty compilation directory.
487 SmallString<256> Dir;
488 StringRef CompDir = MCOS->getContext().getCompilationDir();
489 if (!CompilationDir.empty()) {
490 Dir = CompilationDir;
491 MCOS->getContext().remapDebugPath(Path&: Dir);
492 CompDir = Dir.str();
493 if (LineStr)
494 CompDir = LineStr->getSaver().save(S: CompDir);
495 }
496 if (LineStr) {
497 // Record path strings, emit references here.
498 LineStr->emitRef(MCOS, Path: CompDir);
499 for (const auto &Dir : MCDwarfDirs)
500 LineStr->emitRef(MCOS, Path: Dir);
501 } else {
502 // The list of directory paths. Compilation directory comes first.
503 MCOS->emitBytes(Data: CompDir);
504 MCOS->emitBytes(Data: StringRef("\0", 1));
505 for (const auto &Dir : MCDwarfDirs) {
506 MCOS->emitBytes(Data: Dir); // The DirectoryName, and...
507 MCOS->emitBytes(Data: StringRef("\0", 1)); // its null terminator.
508 }
509 }
510
511 // The file format, which is the inline null-terminated filename and a
512 // directory index. We don't track file size/timestamp so don't emit them
513 // in the v5 table. Emit MD5 checksums and source if we have them.
514 uint64_t Entries = 2;
515 if (HasAllMD5)
516 Entries += 1;
517 if (HasAnySource)
518 Entries += 1;
519 MCOS->emitInt8(Value: Entries);
520 MCOS->emitULEB128IntValue(Value: dwarf::DW_LNCT_path);
521 MCOS->emitULEB128IntValue(Value: LineStr ? dwarf::DW_FORM_line_strp
522 : dwarf::DW_FORM_string);
523 MCOS->emitULEB128IntValue(Value: dwarf::DW_LNCT_directory_index);
524 MCOS->emitULEB128IntValue(Value: dwarf::DW_FORM_udata);
525 if (HasAllMD5) {
526 MCOS->emitULEB128IntValue(Value: dwarf::DW_LNCT_MD5);
527 MCOS->emitULEB128IntValue(Value: dwarf::DW_FORM_data16);
528 }
529 if (HasAnySource) {
530 MCOS->emitULEB128IntValue(Value: dwarf::DW_LNCT_LLVM_source);
531 MCOS->emitULEB128IntValue(Value: LineStr ? dwarf::DW_FORM_line_strp
532 : dwarf::DW_FORM_string);
533 }
534 // Then the counted list of files. The root file is file #0, then emit the
535 // files as provide by .file directives.
536 // MCDwarfFiles has an unused element [0] so use size() not size()+1.
537 // But sometimes MCDwarfFiles is empty, in which case we still emit one file.
538 MCOS->emitULEB128IntValue(Value: MCDwarfFiles.empty() ? 1 : MCDwarfFiles.size());
539 // To accommodate assembler source written for DWARF v4 but trying to emit
540 // v5: If we didn't see a root file explicitly, replicate file #1.
541 assert((!RootFile.Name.empty() || MCDwarfFiles.size() >= 1) &&
542 "No root file and no .file directives");
543 emitOneV5FileEntry(MCOS, DwarfFile: RootFile.Name.empty() ? MCDwarfFiles[1] : RootFile,
544 EmitMD5: HasAllMD5, HasAnySource, LineStr);
545 for (unsigned i = 1; i < MCDwarfFiles.size(); ++i)
546 emitOneV5FileEntry(MCOS, DwarfFile: MCDwarfFiles[i], EmitMD5: HasAllMD5, HasAnySource, LineStr);
547}
548
549std::pair<MCSymbol *, MCSymbol *>
550MCDwarfLineTableHeader::Emit(MCStreamer *MCOS, MCDwarfLineTableParams Params,
551 ArrayRef<char> StandardOpcodeLengths,
552 std::optional<MCDwarfLineStr> &LineStr) const {
553 MCContext &context = MCOS->getContext();
554
555 // Create a symbol at the beginning of the line table.
556 MCSymbol *LineStartSym = Label;
557 if (!LineStartSym)
558 LineStartSym = context.createTempSymbol();
559
560 // Set the value of the symbol, as we are at the start of the line table.
561 MCOS->emitDwarfLineStartLabel(StartSym: LineStartSym);
562
563 unsigned OffsetSize = dwarf::getDwarfOffsetByteSize(Format: context.getDwarfFormat());
564
565 MCSymbol *LineEndSym = MCOS->emitDwarfUnitLength(Prefix: "debug_line", Comment: "unit length");
566
567 // Next 2 bytes is the Version.
568 unsigned LineTableVersion = context.getDwarfVersion();
569 MCOS->emitInt16(Value: LineTableVersion);
570
571 // In v5, we get address info next.
572 if (LineTableVersion >= 5) {
573 MCOS->emitInt8(Value: context.getAsmInfo()->getCodePointerSize());
574 MCOS->emitInt8(Value: 0); // Segment selector; same as EmitGenDwarfAranges.
575 }
576
577 // Create symbols for the start/end of the prologue.
578 MCSymbol *ProStartSym = context.createTempSymbol(Name: "prologue_start");
579 MCSymbol *ProEndSym = context.createTempSymbol(Name: "prologue_end");
580
581 // Length of the prologue, is the next 4 bytes (8 bytes for DWARF64). This is
582 // actually the length from after the length word, to the end of the prologue.
583 MCOS->emitAbsoluteSymbolDiff(Hi: ProEndSym, Lo: ProStartSym, Size: OffsetSize);
584
585 MCOS->emitLabel(Symbol: ProStartSym);
586
587 // Parameters of the state machine, are next.
588 MCOS->emitInt8(Value: context.getAsmInfo()->getMinInstAlignment());
589 // maximum_operations_per_instruction
590 // For non-VLIW architectures this field is always 1.
591 // FIXME: VLIW architectures need to update this field accordingly.
592 if (LineTableVersion >= 4)
593 MCOS->emitInt8(Value: 1);
594 MCOS->emitInt8(DWARF2_LINE_DEFAULT_IS_STMT);
595 MCOS->emitInt8(Value: Params.DWARF2LineBase);
596 MCOS->emitInt8(Value: Params.DWARF2LineRange);
597 MCOS->emitInt8(Value: StandardOpcodeLengths.size() + 1);
598
599 // Standard opcode lengths
600 for (char Length : StandardOpcodeLengths)
601 MCOS->emitInt8(Value: Length);
602
603 // Put out the directory and file tables. The formats vary depending on
604 // the version.
605 if (LineTableVersion >= 5)
606 emitV5FileDirTables(MCOS, LineStr);
607 else
608 emitV2FileDirTables(MCOS);
609
610 // This is the end of the prologue, so set the value of the symbol at the
611 // end of the prologue (that was used in a previous expression).
612 MCOS->emitLabel(Symbol: ProEndSym);
613
614 return std::make_pair(x&: LineStartSym, y&: LineEndSym);
615}
616
617void MCDwarfLineTable::emitCU(MCStreamer *MCOS, MCDwarfLineTableParams Params,
618 std::optional<MCDwarfLineStr> &LineStr) const {
619 MCSymbol *LineEndSym = Header.Emit(MCOS, Params, LineStr).second;
620
621 // Put out the line tables.
622 for (const auto &LineSec : MCLineSections.getMCLineEntries())
623 emitOne(MCOS, Section: LineSec.first, LineEntries: LineSec.second);
624
625 // This is the end of the section, so set the value of the symbol at the end
626 // of this section (that was used in a previous expression).
627 MCOS->emitLabel(Symbol: LineEndSym);
628}
629
630Expected<unsigned>
631MCDwarfLineTable::tryGetFile(StringRef &Directory, StringRef &FileName,
632 std::optional<MD5::MD5Result> Checksum,
633 std::optional<StringRef> Source,
634 uint16_t DwarfVersion, unsigned FileNumber) {
635 return Header.tryGetFile(Directory, FileName, Checksum, Source, DwarfVersion,
636 FileNumber);
637}
638
639static bool isRootFile(const MCDwarfFile &RootFile, StringRef &Directory,
640 StringRef &FileName,
641 std::optional<MD5::MD5Result> Checksum) {
642 if (RootFile.Name.empty() || StringRef(RootFile.Name) != FileName)
643 return false;
644 return RootFile.Checksum == Checksum;
645}
646
647Expected<unsigned>
648MCDwarfLineTableHeader::tryGetFile(StringRef &Directory, StringRef &FileName,
649 std::optional<MD5::MD5Result> Checksum,
650 std::optional<StringRef> Source,
651 uint16_t DwarfVersion, unsigned FileNumber) {
652 if (Directory == CompilationDir)
653 Directory = "";
654 if (FileName.empty()) {
655 FileName = "<stdin>";
656 Directory = "";
657 }
658 assert(!FileName.empty());
659 // Keep track of whether any or all files have an MD5 checksum.
660 // If any files have embedded source, they all must.
661 if (MCDwarfFiles.empty()) {
662 trackMD5Usage(MD5Used: Checksum.has_value());
663 HasAnySource |= Source.has_value();
664 }
665 if (DwarfVersion >= 5 && isRootFile(RootFile, Directory, FileName, Checksum))
666 return 0;
667 if (FileNumber == 0) {
668 // File numbers start with 1 and/or after any file numbers
669 // allocated by inline-assembler .file directives.
670 FileNumber = MCDwarfFiles.empty() ? 1 : MCDwarfFiles.size();
671 SmallString<256> Buffer;
672 auto IterBool = SourceIdMap.insert(
673 KV: std::make_pair(x: (Directory + Twine('\0') + FileName).toStringRef(Out&: Buffer),
674 y&: FileNumber));
675 if (!IterBool.second)
676 return IterBool.first->second;
677 }
678 // Make space for this FileNumber in the MCDwarfFiles vector if needed.
679 if (FileNumber >= MCDwarfFiles.size())
680 MCDwarfFiles.resize(N: FileNumber + 1);
681
682 // Get the new MCDwarfFile slot for this FileNumber.
683 MCDwarfFile &File = MCDwarfFiles[FileNumber];
684
685 // It is an error to see the same number more than once.
686 if (!File.Name.empty())
687 return make_error<StringError>(Args: "file number already allocated",
688 Args: inconvertibleErrorCode());
689
690 if (Directory.empty()) {
691 // Separate the directory part from the basename of the FileName.
692 StringRef tFileName = sys::path::filename(path: FileName);
693 if (!tFileName.empty()) {
694 Directory = sys::path::parent_path(path: FileName);
695 if (!Directory.empty())
696 FileName = tFileName;
697 }
698 }
699
700 // Find or make an entry in the MCDwarfDirs vector for this Directory.
701 // Capture directory name.
702 unsigned DirIndex;
703 if (Directory.empty()) {
704 // For FileNames with no directories a DirIndex of 0 is used.
705 DirIndex = 0;
706 } else {
707 DirIndex = llvm::find(Range&: MCDwarfDirs, Val: Directory) - MCDwarfDirs.begin();
708 if (DirIndex >= MCDwarfDirs.size())
709 MCDwarfDirs.push_back(Elt: std::string(Directory));
710 // The DirIndex is one based, as DirIndex of 0 is used for FileNames with
711 // no directories. MCDwarfDirs[] is unlike MCDwarfFiles[] in that the
712 // directory names are stored at MCDwarfDirs[DirIndex-1] where FileNames
713 // are stored at MCDwarfFiles[FileNumber].Name .
714 DirIndex++;
715 }
716
717 File.Name = std::string(FileName);
718 File.DirIndex = DirIndex;
719 File.Checksum = Checksum;
720 trackMD5Usage(MD5Used: Checksum.has_value());
721 File.Source = Source;
722 if (Source.has_value())
723 HasAnySource = true;
724
725 // return the allocated FileNumber.
726 return FileNumber;
727}
728
729/// Utility function to emit the encoding to a streamer.
730void MCDwarfLineAddr::Emit(MCStreamer *MCOS, MCDwarfLineTableParams Params,
731 int64_t LineDelta, uint64_t AddrDelta) {
732 MCContext &Context = MCOS->getContext();
733 SmallString<256> Tmp;
734 MCDwarfLineAddr::encode(Context, Params, LineDelta, AddrDelta, OS&: Tmp);
735 MCOS->emitBytes(Data: Tmp);
736}
737
738/// Given a special op, return the address skip amount (in units of
739/// DWARF2_LINE_MIN_INSN_LENGTH).
740static uint64_t SpecialAddr(MCDwarfLineTableParams Params, uint64_t op) {
741 return (op - Params.DWARF2LineOpcodeBase) / Params.DWARF2LineRange;
742}
743
744/// Utility function to encode a Dwarf pair of LineDelta and AddrDeltas.
745void MCDwarfLineAddr::encode(MCContext &Context, MCDwarfLineTableParams Params,
746 int64_t LineDelta, uint64_t AddrDelta,
747 SmallVectorImpl<char> &Out) {
748 uint64_t Temp, Opcode;
749 bool NeedCopy = false;
750
751 // The maximum address skip amount that can be encoded with a special op.
752 uint64_t MaxSpecialAddrDelta = SpecialAddr(Params, op: 255);
753
754 // Scale the address delta by the minimum instruction length.
755 AddrDelta = ScaleAddrDelta(Context, AddrDelta);
756
757 // A LineDelta of INT64_MAX is a signal that this is actually a
758 // DW_LNE_end_sequence. We cannot use special opcodes here, since we want the
759 // end_sequence to emit the matrix entry.
760 if (LineDelta == INT64_MAX) {
761 if (AddrDelta == MaxSpecialAddrDelta)
762 Out.push_back(Elt: dwarf::DW_LNS_const_add_pc);
763 else if (AddrDelta) {
764 Out.push_back(Elt: dwarf::DW_LNS_advance_pc);
765 appendLEB128<LEB128Sign::Unsigned>(Buffer&: Out, Value: AddrDelta);
766 }
767 Out.push_back(Elt: dwarf::DW_LNS_extended_op);
768 Out.push_back(Elt: 1);
769 Out.push_back(Elt: dwarf::DW_LNE_end_sequence);
770 return;
771 }
772
773 // Bias the line delta by the base.
774 Temp = LineDelta - Params.DWARF2LineBase;
775
776 // If the line increment is out of range of a special opcode, we must encode
777 // it with DW_LNS_advance_line.
778 if (Temp >= Params.DWARF2LineRange ||
779 Temp + Params.DWARF2LineOpcodeBase > 255) {
780 Out.push_back(Elt: dwarf::DW_LNS_advance_line);
781 appendLEB128<LEB128Sign::Signed>(Buffer&: Out, Value: LineDelta);
782
783 LineDelta = 0;
784 Temp = 0 - Params.DWARF2LineBase;
785 NeedCopy = true;
786 }
787
788 // Use DW_LNS_copy instead of a "line +0, addr +0" special opcode.
789 if (LineDelta == 0 && AddrDelta == 0) {
790 Out.push_back(Elt: dwarf::DW_LNS_copy);
791 return;
792 }
793
794 // Bias the opcode by the special opcode base.
795 Temp += Params.DWARF2LineOpcodeBase;
796
797 // Avoid overflow when addr_delta is large.
798 if (AddrDelta < 256 + MaxSpecialAddrDelta) {
799 // Try using a special opcode.
800 Opcode = Temp + AddrDelta * Params.DWARF2LineRange;
801 if (Opcode <= 255) {
802 Out.push_back(Elt: Opcode);
803 return;
804 }
805
806 // Try using DW_LNS_const_add_pc followed by special op.
807 Opcode = Temp + (AddrDelta - MaxSpecialAddrDelta) * Params.DWARF2LineRange;
808 if (Opcode <= 255) {
809 Out.push_back(Elt: dwarf::DW_LNS_const_add_pc);
810 Out.push_back(Elt: Opcode);
811 return;
812 }
813 }
814
815 // Otherwise use DW_LNS_advance_pc.
816 Out.push_back(Elt: dwarf::DW_LNS_advance_pc);
817 appendLEB128<LEB128Sign::Unsigned>(Buffer&: Out, Value: AddrDelta);
818
819 if (NeedCopy)
820 Out.push_back(Elt: dwarf::DW_LNS_copy);
821 else {
822 assert(Temp <= 255 && "Buggy special opcode encoding.");
823 Out.push_back(Elt: Temp);
824 }
825}
826
827// Utility function to write a tuple for .debug_abbrev.
828static void EmitAbbrev(MCStreamer *MCOS, uint64_t Name, uint64_t Form) {
829 MCOS->emitULEB128IntValue(Value: Name);
830 MCOS->emitULEB128IntValue(Value: Form);
831}
832
833// When generating dwarf for assembly source files this emits
834// the data for .debug_abbrev section which contains three DIEs.
835static void EmitGenDwarfAbbrev(MCStreamer *MCOS) {
836 MCContext &context = MCOS->getContext();
837 MCOS->switchSection(Section: context.getObjectFileInfo()->getDwarfAbbrevSection());
838
839 // DW_TAG_compile_unit DIE abbrev (1).
840 MCOS->emitULEB128IntValue(Value: 1);
841 MCOS->emitULEB128IntValue(Value: dwarf::DW_TAG_compile_unit);
842 MCOS->emitInt8(Value: dwarf::DW_CHILDREN_yes);
843 dwarf::Form SecOffsetForm =
844 context.getDwarfVersion() >= 4
845 ? dwarf::DW_FORM_sec_offset
846 : (context.getDwarfFormat() == dwarf::DWARF64 ? dwarf::DW_FORM_data8
847 : dwarf::DW_FORM_data4);
848 EmitAbbrev(MCOS, Name: dwarf::DW_AT_stmt_list, Form: SecOffsetForm);
849 if (context.getGenDwarfSectionSyms().size() > 1 &&
850 context.getDwarfVersion() >= 3) {
851 EmitAbbrev(MCOS, Name: dwarf::DW_AT_ranges, Form: SecOffsetForm);
852 } else {
853 EmitAbbrev(MCOS, Name: dwarf::DW_AT_low_pc, Form: dwarf::DW_FORM_addr);
854 EmitAbbrev(MCOS, Name: dwarf::DW_AT_high_pc, Form: dwarf::DW_FORM_addr);
855 }
856 EmitAbbrev(MCOS, Name: dwarf::DW_AT_name, Form: dwarf::DW_FORM_string);
857 if (!context.getCompilationDir().empty())
858 EmitAbbrev(MCOS, Name: dwarf::DW_AT_comp_dir, Form: dwarf::DW_FORM_string);
859 StringRef DwarfDebugFlags = context.getDwarfDebugFlags();
860 if (!DwarfDebugFlags.empty())
861 EmitAbbrev(MCOS, Name: dwarf::DW_AT_APPLE_flags, Form: dwarf::DW_FORM_string);
862 EmitAbbrev(MCOS, Name: dwarf::DW_AT_producer, Form: dwarf::DW_FORM_string);
863
864 if (context.getDwarfVersion() >= 6)
865 EmitAbbrev(MCOS, Name: dwarf::DW_AT_language_name, Form: dwarf::DW_FORM_data2);
866 else
867 EmitAbbrev(MCOS, Name: dwarf::DW_AT_language, Form: dwarf::DW_FORM_data2);
868
869 EmitAbbrev(MCOS, Name: 0, Form: 0);
870
871 // DW_TAG_label DIE abbrev (2).
872 MCOS->emitULEB128IntValue(Value: 2);
873 MCOS->emitULEB128IntValue(Value: dwarf::DW_TAG_label);
874 MCOS->emitInt8(Value: dwarf::DW_CHILDREN_no);
875 EmitAbbrev(MCOS, Name: dwarf::DW_AT_name, Form: dwarf::DW_FORM_string);
876 EmitAbbrev(MCOS, Name: dwarf::DW_AT_decl_file, Form: dwarf::DW_FORM_data4);
877 EmitAbbrev(MCOS, Name: dwarf::DW_AT_decl_line, Form: dwarf::DW_FORM_data4);
878 EmitAbbrev(MCOS, Name: dwarf::DW_AT_low_pc, Form: dwarf::DW_FORM_addr);
879 EmitAbbrev(MCOS, Name: 0, Form: 0);
880
881 // Terminate the abbreviations for this compilation unit.
882 MCOS->emitInt8(Value: 0);
883}
884
885// When generating dwarf for assembly source files this emits the data for
886// .debug_aranges section. This section contains a header and a table of pairs
887// of PointerSize'ed values for the address and size of section(s) with line
888// table entries.
889static void EmitGenDwarfAranges(MCStreamer *MCOS,
890 const MCSymbol *InfoSectionSymbol) {
891 MCContext &context = MCOS->getContext();
892
893 auto &Sections = context.getGenDwarfSectionSyms();
894
895 MCOS->switchSection(Section: context.getObjectFileInfo()->getDwarfARangesSection());
896
897 unsigned UnitLengthBytes =
898 dwarf::getUnitLengthFieldByteSize(Format: context.getDwarfFormat());
899 unsigned OffsetSize = dwarf::getDwarfOffsetByteSize(Format: context.getDwarfFormat());
900
901 // This will be the length of the .debug_aranges section, first account for
902 // the size of each item in the header (see below where we emit these items).
903 int Length = UnitLengthBytes + 2 + OffsetSize + 1 + 1;
904
905 // Figure the padding after the header before the table of address and size
906 // pairs who's values are PointerSize'ed.
907 const MCAsmInfo *asmInfo = context.getAsmInfo();
908 int AddrSize = asmInfo->getCodePointerSize();
909 int Pad = 2 * AddrSize - (Length & (2 * AddrSize - 1));
910 if (Pad == 2 * AddrSize)
911 Pad = 0;
912 Length += Pad;
913
914 // Add the size of the pair of PointerSize'ed values for the address and size
915 // of each section we have in the table.
916 Length += 2 * AddrSize * Sections.size();
917 // And the pair of terminating zeros.
918 Length += 2 * AddrSize;
919
920 // Emit the header for this section.
921 if (context.getDwarfFormat() == dwarf::DWARF64)
922 // The DWARF64 mark.
923 MCOS->emitInt32(Value: dwarf::DW_LENGTH_DWARF64);
924 // The 4 (8 for DWARF64) byte length not including the length of the unit
925 // length field itself.
926 MCOS->emitIntValue(Value: Length - UnitLengthBytes, Size: OffsetSize);
927 // The 2 byte version, which is 2.
928 MCOS->emitInt16(Value: 2);
929 // The 4 (8 for DWARF64) byte offset to the compile unit in the .debug_info
930 // from the start of the .debug_info.
931 if (InfoSectionSymbol)
932 MCOS->emitSymbolValue(Sym: InfoSectionSymbol, Size: OffsetSize,
933 IsSectionRelative: asmInfo->needsDwarfSectionOffsetDirective());
934 else
935 MCOS->emitIntValue(Value: 0, Size: OffsetSize);
936 // The 1 byte size of an address.
937 MCOS->emitInt8(Value: AddrSize);
938 // The 1 byte size of a segment descriptor, we use a value of zero.
939 MCOS->emitInt8(Value: 0);
940 // Align the header with the padding if needed, before we put out the table.
941 for(int i = 0; i < Pad; i++)
942 MCOS->emitInt8(Value: 0);
943
944 // Now emit the table of pairs of PointerSize'ed values for the section
945 // addresses and sizes.
946 for (MCSection *Sec : Sections) {
947 const MCSymbol *StartSymbol = Sec->getBeginSymbol();
948 MCSymbol *EndSymbol = Sec->getEndSymbol(Ctx&: context);
949 assert(StartSymbol && "StartSymbol must not be NULL");
950 assert(EndSymbol && "EndSymbol must not be NULL");
951
952 const MCExpr *Addr = MCSymbolRefExpr::create(Symbol: StartSymbol, Ctx&: context);
953 const MCExpr *Size =
954 makeEndMinusStartExpr(Ctx&: context, Start: *StartSymbol, End: *EndSymbol, IntVal: 0);
955 MCOS->emitValue(Value: Addr, Size: AddrSize);
956 emitAbsValue(OS&: *MCOS, Value: Size, Size: AddrSize);
957 }
958
959 // And finally the pair of terminating zeros.
960 MCOS->emitIntValue(Value: 0, Size: AddrSize);
961 MCOS->emitIntValue(Value: 0, Size: AddrSize);
962}
963
964// When generating dwarf for assembly source files this emits the data for
965// .debug_info section which contains three parts. The header, the compile_unit
966// DIE and a list of label DIEs.
967static void EmitGenDwarfInfo(MCStreamer *MCOS,
968 const MCSymbol *AbbrevSectionSymbol,
969 const MCSymbol *LineSectionSymbol,
970 const MCSymbol *RangesSymbol) {
971 MCContext &context = MCOS->getContext();
972
973 MCOS->switchSection(Section: context.getObjectFileInfo()->getDwarfInfoSection());
974
975 // Create a symbol at the start and end of this section used in here for the
976 // expression to calculate the length in the header.
977 MCSymbol *InfoStart = context.createTempSymbol();
978 MCOS->emitLabel(Symbol: InfoStart);
979 MCSymbol *InfoEnd = context.createTempSymbol();
980
981 // First part: the header.
982
983 unsigned UnitLengthBytes =
984 dwarf::getUnitLengthFieldByteSize(Format: context.getDwarfFormat());
985 unsigned OffsetSize = dwarf::getDwarfOffsetByteSize(Format: context.getDwarfFormat());
986
987 if (context.getDwarfFormat() == dwarf::DWARF64)
988 // Emit DWARF64 mark.
989 MCOS->emitInt32(Value: dwarf::DW_LENGTH_DWARF64);
990
991 // The 4 (8 for DWARF64) byte total length of the information for this
992 // compilation unit, not including the unit length field itself.
993 const MCExpr *Length =
994 makeEndMinusStartExpr(Ctx&: context, Start: *InfoStart, End: *InfoEnd, IntVal: UnitLengthBytes);
995 emitAbsValue(OS&: *MCOS, Value: Length, Size: OffsetSize);
996
997 // The 2 byte DWARF version.
998 MCOS->emitInt16(Value: context.getDwarfVersion());
999
1000 // The DWARF v5 header has unit type, address size, abbrev offset.
1001 // Earlier versions have abbrev offset, address size.
1002 const MCAsmInfo &AsmInfo = *context.getAsmInfo();
1003 int AddrSize = AsmInfo.getCodePointerSize();
1004 if (context.getDwarfVersion() >= 5) {
1005 MCOS->emitInt8(Value: dwarf::DW_UT_compile);
1006 MCOS->emitInt8(Value: AddrSize);
1007 }
1008 // The 4 (8 for DWARF64) byte offset to the debug abbrevs from the start of
1009 // the .debug_abbrev.
1010 if (AbbrevSectionSymbol)
1011 MCOS->emitSymbolValue(Sym: AbbrevSectionSymbol, Size: OffsetSize,
1012 IsSectionRelative: AsmInfo.needsDwarfSectionOffsetDirective());
1013 else
1014 // Since the abbrevs are at the start of the section, the offset is zero.
1015 MCOS->emitIntValue(Value: 0, Size: OffsetSize);
1016 if (context.getDwarfVersion() <= 4)
1017 MCOS->emitInt8(Value: AddrSize);
1018
1019 // Second part: the compile_unit DIE.
1020
1021 // The DW_TAG_compile_unit DIE abbrev (1).
1022 MCOS->emitULEB128IntValue(Value: 1);
1023
1024 // DW_AT_stmt_list, a 4 (8 for DWARF64) byte offset from the start of the
1025 // .debug_line section.
1026 if (LineSectionSymbol)
1027 MCOS->emitSymbolValue(Sym: LineSectionSymbol, Size: OffsetSize,
1028 IsSectionRelative: AsmInfo.needsDwarfSectionOffsetDirective());
1029 else
1030 // The line table is at the start of the section, so the offset is zero.
1031 MCOS->emitIntValue(Value: 0, Size: OffsetSize);
1032
1033 if (RangesSymbol) {
1034 // There are multiple sections containing code, so we must use
1035 // .debug_ranges/.debug_rnglists. AT_ranges, the 4/8 byte offset from the
1036 // start of the .debug_ranges/.debug_rnglists.
1037 MCOS->emitSymbolValue(Sym: RangesSymbol, Size: OffsetSize);
1038 } else {
1039 // If we only have one non-empty code section, we can use the simpler
1040 // AT_low_pc and AT_high_pc attributes.
1041
1042 // Find the first (and only) non-empty text section
1043 auto &Sections = context.getGenDwarfSectionSyms();
1044 const auto TextSection = Sections.begin();
1045 assert(TextSection != Sections.end() && "No text section found");
1046
1047 MCSymbol *StartSymbol = (*TextSection)->getBeginSymbol();
1048 MCSymbol *EndSymbol = (*TextSection)->getEndSymbol(Ctx&: context);
1049 assert(StartSymbol && "StartSymbol must not be NULL");
1050 assert(EndSymbol && "EndSymbol must not be NULL");
1051
1052 // AT_low_pc, the first address of the default .text section.
1053 const MCExpr *Start = MCSymbolRefExpr::create(Symbol: StartSymbol, Ctx&: context);
1054 MCOS->emitValue(Value: Start, Size: AddrSize);
1055
1056 // AT_high_pc, the last address of the default .text section.
1057 const MCExpr *End = MCSymbolRefExpr::create(Symbol: EndSymbol, Ctx&: context);
1058 MCOS->emitValue(Value: End, Size: AddrSize);
1059 }
1060
1061 // AT_name, the name of the source file. Reconstruct from the first directory
1062 // and file table entries.
1063 const SmallVectorImpl<std::string> &MCDwarfDirs = context.getMCDwarfDirs();
1064 if (MCDwarfDirs.size() > 0) {
1065 MCOS->emitBytes(Data: MCDwarfDirs[0]);
1066 MCOS->emitBytes(Data: sys::path::get_separator());
1067 }
1068 const SmallVectorImpl<MCDwarfFile> &MCDwarfFiles = context.getMCDwarfFiles();
1069 // MCDwarfFiles might be empty if we have an empty source file.
1070 // If it's not empty, [0] is unused and [1] is the first actual file.
1071 assert(MCDwarfFiles.empty() || MCDwarfFiles.size() >= 2);
1072 const MCDwarfFile &RootFile =
1073 MCDwarfFiles.empty()
1074 ? context.getMCDwarfLineTable(/*CUID=*/0).getRootFile()
1075 : MCDwarfFiles[1];
1076 MCOS->emitBytes(Data: RootFile.Name);
1077 MCOS->emitInt8(Value: 0); // NULL byte to terminate the string.
1078
1079 // AT_comp_dir, the working directory the assembly was done in.
1080 if (!context.getCompilationDir().empty()) {
1081 MCOS->emitBytes(Data: context.getCompilationDir());
1082 MCOS->emitInt8(Value: 0); // NULL byte to terminate the string.
1083 }
1084
1085 // AT_APPLE_flags, the command line arguments of the assembler tool.
1086 StringRef DwarfDebugFlags = context.getDwarfDebugFlags();
1087 if (!DwarfDebugFlags.empty()){
1088 MCOS->emitBytes(Data: DwarfDebugFlags);
1089 MCOS->emitInt8(Value: 0); // NULL byte to terminate the string.
1090 }
1091
1092 // AT_producer, the version of the assembler tool.
1093 StringRef DwarfDebugProducer = context.getDwarfDebugProducer();
1094 if (!DwarfDebugProducer.empty())
1095 MCOS->emitBytes(Data: DwarfDebugProducer);
1096 else
1097 MCOS->emitBytes(Data: StringRef("llvm-mc (based on LLVM " PACKAGE_VERSION ")"));
1098 MCOS->emitInt8(Value: 0); // NULL byte to terminate the string.
1099
1100 if (context.getDwarfVersion() >= 6) {
1101 // AT_language_name, a 4 byte value.
1102 MCOS->emitInt16(Value: dwarf::DW_LNAME_Assembly);
1103 } else {
1104 // AT_language, a 4 byte value. We use DW_LANG_Mips_Assembler as the dwarf2
1105 // draft has no standard code for assembler.
1106 // FIXME: dwarf4 has DW_LANG_Assembly which we could use instead.
1107 MCOS->emitInt16(Value: dwarf::DW_LANG_Mips_Assembler);
1108 }
1109
1110 // Third part: the list of label DIEs.
1111
1112 // Loop on saved info for dwarf labels and create the DIEs for them.
1113 const std::vector<MCGenDwarfLabelEntry> &Entries =
1114 MCOS->getContext().getMCGenDwarfLabelEntries();
1115 for (const auto &Entry : Entries) {
1116 // The DW_TAG_label DIE abbrev (2).
1117 MCOS->emitULEB128IntValue(Value: 2);
1118
1119 // AT_name, of the label without any leading underbar.
1120 MCOS->emitBytes(Data: Entry.getName());
1121 MCOS->emitInt8(Value: 0); // NULL byte to terminate the string.
1122
1123 // AT_decl_file, index into the file table.
1124 MCOS->emitInt32(Value: Entry.getFileNumber());
1125
1126 // AT_decl_line, source line number.
1127 MCOS->emitInt32(Value: Entry.getLineNumber());
1128
1129 // AT_low_pc, start address of the label.
1130 const auto *AT_low_pc = MCSymbolRefExpr::create(Symbol: Entry.getLabel(), Ctx&: context);
1131 MCOS->emitValue(Value: AT_low_pc, Size: AddrSize);
1132 }
1133
1134 // Add the NULL DIE terminating the Compile Unit DIE's.
1135 MCOS->emitInt8(Value: 0);
1136
1137 // Now set the value of the symbol at the end of the info section.
1138 MCOS->emitLabel(Symbol: InfoEnd);
1139}
1140
1141// When generating dwarf for assembly source files this emits the data for
1142// .debug_ranges section. We only emit one range list, which spans all of the
1143// executable sections of this file.
1144static MCSymbol *emitGenDwarfRanges(MCStreamer *MCOS) {
1145 MCContext &context = MCOS->getContext();
1146 auto &Sections = context.getGenDwarfSectionSyms();
1147
1148 const MCAsmInfo *AsmInfo = context.getAsmInfo();
1149 int AddrSize = AsmInfo->getCodePointerSize();
1150 MCSymbol *RangesSymbol;
1151
1152 if (MCOS->getContext().getDwarfVersion() >= 5) {
1153 MCOS->switchSection(Section: context.getObjectFileInfo()->getDwarfRnglistsSection());
1154 MCSymbol *EndSymbol = mcdwarf::emitListsTableHeaderStart(S&: *MCOS);
1155 MCOS->AddComment(T: "Offset entry count");
1156 MCOS->emitInt32(Value: 0);
1157 RangesSymbol = context.createTempSymbol(Name: "debug_rnglist0_start");
1158 MCOS->emitLabel(Symbol: RangesSymbol);
1159 for (MCSection *Sec : Sections) {
1160 const MCSymbol *StartSymbol = Sec->getBeginSymbol();
1161 const MCSymbol *EndSymbol = Sec->getEndSymbol(Ctx&: context);
1162 const MCExpr *SectionStartAddr =
1163 MCSymbolRefExpr::create(Symbol: StartSymbol, Ctx&: context);
1164 const MCExpr *SectionSize =
1165 makeEndMinusStartExpr(Ctx&: context, Start: *StartSymbol, End: *EndSymbol, IntVal: 0);
1166 MCOS->emitInt8(Value: dwarf::DW_RLE_start_length);
1167 MCOS->emitValue(Value: SectionStartAddr, Size: AddrSize);
1168 MCOS->emitULEB128Value(Value: SectionSize);
1169 }
1170 MCOS->emitInt8(Value: dwarf::DW_RLE_end_of_list);
1171 MCOS->emitLabel(Symbol: EndSymbol);
1172 } else {
1173 MCOS->switchSection(Section: context.getObjectFileInfo()->getDwarfRangesSection());
1174 RangesSymbol = context.createTempSymbol(Name: "debug_ranges_start");
1175 MCOS->emitLabel(Symbol: RangesSymbol);
1176 for (MCSection *Sec : Sections) {
1177 const MCSymbol *StartSymbol = Sec->getBeginSymbol();
1178 const MCSymbol *EndSymbol = Sec->getEndSymbol(Ctx&: context);
1179
1180 // Emit a base address selection entry for the section start.
1181 const MCExpr *SectionStartAddr =
1182 MCSymbolRefExpr::create(Symbol: StartSymbol, Ctx&: context);
1183 MCOS->emitFill(NumBytes: AddrSize, FillValue: 0xFF);
1184 MCOS->emitValue(Value: SectionStartAddr, Size: AddrSize);
1185
1186 // Emit a range list entry spanning this section.
1187 const MCExpr *SectionSize =
1188 makeEndMinusStartExpr(Ctx&: context, Start: *StartSymbol, End: *EndSymbol, IntVal: 0);
1189 MCOS->emitIntValue(Value: 0, Size: AddrSize);
1190 emitAbsValue(OS&: *MCOS, Value: SectionSize, Size: AddrSize);
1191 }
1192
1193 // Emit end of list entry
1194 MCOS->emitIntValue(Value: 0, Size: AddrSize);
1195 MCOS->emitIntValue(Value: 0, Size: AddrSize);
1196 }
1197
1198 return RangesSymbol;
1199}
1200
1201//
1202// When generating dwarf for assembly source files this emits the Dwarf
1203// sections.
1204//
1205void MCGenDwarfInfo::Emit(MCStreamer *MCOS) {
1206 MCContext &context = MCOS->getContext();
1207
1208 // Create the dwarf sections in this order (.debug_line already created).
1209 const MCAsmInfo *AsmInfo = context.getAsmInfo();
1210 bool CreateDwarfSectionSymbols =
1211 AsmInfo->doesDwarfUseRelocationsAcrossSections();
1212 MCSymbol *LineSectionSymbol = nullptr;
1213 if (CreateDwarfSectionSymbols)
1214 LineSectionSymbol = MCOS->getDwarfLineTableSymbol(CUID: 0);
1215 MCSymbol *AbbrevSectionSymbol = nullptr;
1216 MCSymbol *InfoSectionSymbol = nullptr;
1217 MCSymbol *RangesSymbol = nullptr;
1218
1219 // Create end symbols for each section, and remove empty sections
1220 MCOS->getContext().finalizeDwarfSections(MCOS&: *MCOS);
1221
1222 // If there are no sections to generate debug info for, we don't need
1223 // to do anything
1224 if (MCOS->getContext().getGenDwarfSectionSyms().empty())
1225 return;
1226
1227 // We only use the .debug_ranges section if we have multiple code sections,
1228 // and we are emitting a DWARF version which supports it.
1229 const bool UseRangesSection =
1230 MCOS->getContext().getGenDwarfSectionSyms().size() > 1 &&
1231 MCOS->getContext().getDwarfVersion() >= 3;
1232 CreateDwarfSectionSymbols |= UseRangesSection;
1233
1234 MCOS->switchSection(Section: context.getObjectFileInfo()->getDwarfInfoSection());
1235 if (CreateDwarfSectionSymbols) {
1236 InfoSectionSymbol = context.createTempSymbol();
1237 MCOS->emitLabel(Symbol: InfoSectionSymbol);
1238 }
1239 MCOS->switchSection(Section: context.getObjectFileInfo()->getDwarfAbbrevSection());
1240 if (CreateDwarfSectionSymbols) {
1241 AbbrevSectionSymbol = context.createTempSymbol();
1242 MCOS->emitLabel(Symbol: AbbrevSectionSymbol);
1243 }
1244
1245 MCOS->switchSection(Section: context.getObjectFileInfo()->getDwarfARangesSection());
1246
1247 // Output the data for .debug_aranges section.
1248 EmitGenDwarfAranges(MCOS, InfoSectionSymbol);
1249
1250 if (UseRangesSection) {
1251 RangesSymbol = emitGenDwarfRanges(MCOS);
1252 assert(RangesSymbol);
1253 }
1254
1255 // Output the data for .debug_abbrev section.
1256 EmitGenDwarfAbbrev(MCOS);
1257
1258 // Output the data for .debug_info section.
1259 EmitGenDwarfInfo(MCOS, AbbrevSectionSymbol, LineSectionSymbol, RangesSymbol);
1260}
1261
1262//
1263// When generating dwarf for assembly source files this is called when symbol
1264// for a label is created. If this symbol is not a temporary and is in the
1265// section that dwarf is being generated for, save the needed info to create
1266// a dwarf label.
1267//
1268void MCGenDwarfLabelEntry::Make(MCSymbol *Symbol, MCStreamer *MCOS,
1269 SourceMgr &SrcMgr, SMLoc &Loc) {
1270 // We won't create dwarf labels for temporary symbols.
1271 if (Symbol->isTemporary())
1272 return;
1273 MCContext &context = MCOS->getContext();
1274 // We won't create dwarf labels for symbols in sections that we are not
1275 // generating debug info for.
1276 if (!context.getGenDwarfSectionSyms().count(key: MCOS->getCurrentSectionOnly()))
1277 return;
1278
1279 // The dwarf label's name does not have the symbol name's leading
1280 // underbar if any.
1281 StringRef Name = Symbol->getName();
1282 if (Name.starts_with(Prefix: "_"))
1283 Name = Name.substr(Start: 1, N: Name.size()-1);
1284
1285 // Get the dwarf file number to be used for the dwarf label.
1286 unsigned FileNumber = context.getGenDwarfFileNumber();
1287
1288 // Finding the line number is the expensive part which is why we just don't
1289 // pass it in as for some symbols we won't create a dwarf label.
1290 unsigned CurBuffer = SrcMgr.FindBufferContainingLoc(Loc);
1291 unsigned LineNumber = SrcMgr.FindLineNumber(Loc, BufferID: CurBuffer);
1292
1293 // We create a temporary symbol for use for the AT_high_pc and AT_low_pc
1294 // values so that they don't have things like an ARM thumb bit from the
1295 // original symbol. So when used they won't get a low bit set after
1296 // relocation.
1297 MCSymbol *Label = context.createTempSymbol();
1298 MCOS->emitLabel(Symbol: Label);
1299
1300 // Create and entry for the info and add it to the other entries.
1301 MCOS->getContext().addMCGenDwarfLabelEntry(
1302 E: MCGenDwarfLabelEntry(Name, FileNumber, LineNumber, Label));
1303}
1304
1305static int getDataAlignmentFactor(MCStreamer &streamer) {
1306 MCContext &context = streamer.getContext();
1307 const MCAsmInfo *asmInfo = context.getAsmInfo();
1308 int size = asmInfo->getCalleeSaveStackSlotSize();
1309 if (asmInfo->isStackGrowthDirectionUp())
1310 return size;
1311 else
1312 return -size;
1313}
1314
1315static unsigned getSizeForEncoding(MCStreamer &streamer,
1316 unsigned symbolEncoding) {
1317 MCContext &context = streamer.getContext();
1318 unsigned format = symbolEncoding & 0x0f;
1319 switch (format) {
1320 default: llvm_unreachable("Unknown Encoding");
1321 case dwarf::DW_EH_PE_absptr:
1322 case dwarf::DW_EH_PE_signed:
1323 return context.getAsmInfo()->getCodePointerSize();
1324 case dwarf::DW_EH_PE_udata2:
1325 case dwarf::DW_EH_PE_sdata2:
1326 return 2;
1327 case dwarf::DW_EH_PE_udata4:
1328 case dwarf::DW_EH_PE_sdata4:
1329 return 4;
1330 case dwarf::DW_EH_PE_udata8:
1331 case dwarf::DW_EH_PE_sdata8:
1332 return 8;
1333 }
1334}
1335
1336static void emitFDESymbol(MCObjectStreamer &streamer, const MCSymbol &symbol,
1337 unsigned symbolEncoding, bool isEH) {
1338 MCContext &context = streamer.getContext();
1339 const MCAsmInfo *asmInfo = context.getAsmInfo();
1340 const MCExpr *v = asmInfo->getExprForFDESymbol(Sym: &symbol,
1341 Encoding: symbolEncoding,
1342 Streamer&: streamer);
1343 unsigned size = getSizeForEncoding(streamer, symbolEncoding);
1344 if (asmInfo->doDwarfFDESymbolsUseAbsDiff() && isEH)
1345 emitAbsValue(OS&: streamer, Value: v, Size: size);
1346 else
1347 streamer.emitValue(Value: v, Size: size);
1348}
1349
1350static void EmitPersonality(MCStreamer &streamer, const MCSymbol &symbol,
1351 unsigned symbolEncoding) {
1352 MCContext &context = streamer.getContext();
1353 const MCAsmInfo *asmInfo = context.getAsmInfo();
1354 const MCExpr *v = asmInfo->getExprForPersonalitySymbol(Sym: &symbol,
1355 Encoding: symbolEncoding,
1356 Streamer&: streamer);
1357 unsigned size = getSizeForEncoding(streamer, symbolEncoding);
1358 streamer.emitValue(Value: v, Size: size);
1359}
1360
1361namespace {
1362
1363class FrameEmitterImpl {
1364 int64_t CFAOffset = 0;
1365 int64_t InitialCFAOffset = 0;
1366 bool IsEH;
1367 MCObjectStreamer &Streamer;
1368
1369public:
1370 FrameEmitterImpl(bool IsEH, MCObjectStreamer &Streamer)
1371 : IsEH(IsEH), Streamer(Streamer) {}
1372
1373 /// Emit the unwind information in a compact way.
1374 void EmitCompactUnwind(const MCDwarfFrameInfo &frame);
1375
1376 const MCSymbol &EmitCIE(const MCDwarfFrameInfo &F);
1377 void EmitFDE(const MCSymbol &cieStart, const MCDwarfFrameInfo &frame,
1378 bool LastInSection, const MCSymbol &SectionStart);
1379 void emitCFIInstructions(ArrayRef<MCCFIInstruction> Instrs,
1380 MCSymbol *BaseLabel);
1381 void emitCFIInstruction(const MCCFIInstruction &Instr);
1382};
1383
1384} // end anonymous namespace
1385
1386static void emitEncodingByte(MCObjectStreamer &Streamer, unsigned Encoding) {
1387 Streamer.emitInt8(Value: Encoding);
1388}
1389
1390void FrameEmitterImpl::emitCFIInstruction(const MCCFIInstruction &Instr) {
1391 int dataAlignmentFactor = getDataAlignmentFactor(streamer&: Streamer);
1392 auto *MRI = Streamer.getContext().getRegisterInfo();
1393
1394 switch (Instr.getOperation()) {
1395 case MCCFIInstruction::OpRegister: {
1396 unsigned Reg1 = Instr.getRegister();
1397 unsigned Reg2 = Instr.getRegister2();
1398 if (!IsEH) {
1399 Reg1 = MRI->getDwarfRegNumFromDwarfEHRegNum(RegNum: Reg1);
1400 Reg2 = MRI->getDwarfRegNumFromDwarfEHRegNum(RegNum: Reg2);
1401 }
1402 Streamer.emitInt8(Value: dwarf::DW_CFA_register);
1403 Streamer.emitULEB128IntValue(Value: Reg1);
1404 Streamer.emitULEB128IntValue(Value: Reg2);
1405 return;
1406 }
1407 case MCCFIInstruction::OpWindowSave:
1408 Streamer.emitInt8(Value: dwarf::DW_CFA_GNU_window_save);
1409 return;
1410
1411 case MCCFIInstruction::OpNegateRAState:
1412 Streamer.emitInt8(Value: dwarf::DW_CFA_AARCH64_negate_ra_state);
1413 return;
1414
1415 case MCCFIInstruction::OpNegateRAStateWithPC:
1416 Streamer.emitInt8(Value: dwarf::DW_CFA_AARCH64_negate_ra_state_with_pc);
1417 return;
1418
1419 case MCCFIInstruction::OpUndefined: {
1420 unsigned Reg = Instr.getRegister();
1421 Streamer.emitInt8(Value: dwarf::DW_CFA_undefined);
1422 Streamer.emitULEB128IntValue(Value: Reg);
1423 return;
1424 }
1425 case MCCFIInstruction::OpAdjustCfaOffset:
1426 case MCCFIInstruction::OpDefCfaOffset: {
1427 const bool IsRelative =
1428 Instr.getOperation() == MCCFIInstruction::OpAdjustCfaOffset;
1429
1430 Streamer.emitInt8(Value: dwarf::DW_CFA_def_cfa_offset);
1431
1432 if (IsRelative)
1433 CFAOffset += Instr.getOffset();
1434 else
1435 CFAOffset = Instr.getOffset();
1436
1437 Streamer.emitULEB128IntValue(Value: CFAOffset);
1438
1439 return;
1440 }
1441 case MCCFIInstruction::OpDefCfa: {
1442 unsigned Reg = Instr.getRegister();
1443 if (!IsEH)
1444 Reg = MRI->getDwarfRegNumFromDwarfEHRegNum(RegNum: Reg);
1445 Streamer.emitInt8(Value: dwarf::DW_CFA_def_cfa);
1446 Streamer.emitULEB128IntValue(Value: Reg);
1447 CFAOffset = Instr.getOffset();
1448 Streamer.emitULEB128IntValue(Value: CFAOffset);
1449
1450 return;
1451 }
1452 case MCCFIInstruction::OpDefCfaRegister: {
1453 unsigned Reg = Instr.getRegister();
1454 if (!IsEH)
1455 Reg = MRI->getDwarfRegNumFromDwarfEHRegNum(RegNum: Reg);
1456 Streamer.emitInt8(Value: dwarf::DW_CFA_def_cfa_register);
1457 Streamer.emitULEB128IntValue(Value: Reg);
1458
1459 return;
1460 }
1461 // TODO: Implement `_sf` variants if/when they need to be emitted.
1462 case MCCFIInstruction::OpLLVMDefAspaceCfa: {
1463 unsigned Reg = Instr.getRegister();
1464 if (!IsEH)
1465 Reg = MRI->getDwarfRegNumFromDwarfEHRegNum(RegNum: Reg);
1466 Streamer.emitIntValue(Value: dwarf::DW_CFA_LLVM_def_aspace_cfa, Size: 1);
1467 Streamer.emitULEB128IntValue(Value: Reg);
1468 CFAOffset = Instr.getOffset();
1469 Streamer.emitULEB128IntValue(Value: CFAOffset);
1470 Streamer.emitULEB128IntValue(Value: Instr.getAddressSpace());
1471
1472 return;
1473 }
1474 case MCCFIInstruction::OpOffset:
1475 case MCCFIInstruction::OpRelOffset: {
1476 const bool IsRelative =
1477 Instr.getOperation() == MCCFIInstruction::OpRelOffset;
1478
1479 unsigned Reg = Instr.getRegister();
1480 if (!IsEH)
1481 Reg = MRI->getDwarfRegNumFromDwarfEHRegNum(RegNum: Reg);
1482
1483 int64_t Offset = Instr.getOffset();
1484 if (IsRelative)
1485 Offset -= CFAOffset;
1486 Offset = Offset / dataAlignmentFactor;
1487
1488 if (Offset < 0) {
1489 Streamer.emitInt8(Value: dwarf::DW_CFA_offset_extended_sf);
1490 Streamer.emitULEB128IntValue(Value: Reg);
1491 Streamer.emitSLEB128IntValue(Value: Offset);
1492 } else if (Reg < 64) {
1493 Streamer.emitInt8(Value: dwarf::DW_CFA_offset + Reg);
1494 Streamer.emitULEB128IntValue(Value: Offset);
1495 } else {
1496 Streamer.emitInt8(Value: dwarf::DW_CFA_offset_extended);
1497 Streamer.emitULEB128IntValue(Value: Reg);
1498 Streamer.emitULEB128IntValue(Value: Offset);
1499 }
1500 return;
1501 }
1502 case MCCFIInstruction::OpRememberState:
1503 Streamer.emitInt8(Value: dwarf::DW_CFA_remember_state);
1504 return;
1505 case MCCFIInstruction::OpRestoreState:
1506 Streamer.emitInt8(Value: dwarf::DW_CFA_restore_state);
1507 return;
1508 case MCCFIInstruction::OpSameValue: {
1509 unsigned Reg = Instr.getRegister();
1510 Streamer.emitInt8(Value: dwarf::DW_CFA_same_value);
1511 Streamer.emitULEB128IntValue(Value: Reg);
1512 return;
1513 }
1514 case MCCFIInstruction::OpRestore: {
1515 unsigned Reg = Instr.getRegister();
1516 if (!IsEH)
1517 Reg = MRI->getDwarfRegNumFromDwarfEHRegNum(RegNum: Reg);
1518 if (Reg < 64) {
1519 Streamer.emitInt8(Value: dwarf::DW_CFA_restore | Reg);
1520 } else {
1521 Streamer.emitInt8(Value: dwarf::DW_CFA_restore_extended);
1522 Streamer.emitULEB128IntValue(Value: Reg);
1523 }
1524 return;
1525 }
1526 case MCCFIInstruction::OpGnuArgsSize:
1527 Streamer.emitInt8(Value: dwarf::DW_CFA_GNU_args_size);
1528 Streamer.emitULEB128IntValue(Value: Instr.getOffset());
1529 return;
1530
1531 case MCCFIInstruction::OpEscape:
1532 Streamer.emitBytes(Data: Instr.getValues());
1533 return;
1534 case MCCFIInstruction::OpLabel:
1535 Streamer.emitLabel(Symbol: Instr.getCfiLabel(), Loc: Instr.getLoc());
1536 return;
1537 case MCCFIInstruction::OpValOffset: {
1538 unsigned Reg = Instr.getRegister();
1539 if (!IsEH)
1540 Reg = MRI->getDwarfRegNumFromDwarfEHRegNum(RegNum: Reg);
1541
1542 int Offset = Instr.getOffset();
1543 Offset = Offset / dataAlignmentFactor;
1544
1545 if (Offset < 0) {
1546 Streamer.emitInt8(Value: dwarf::DW_CFA_val_offset_sf);
1547 Streamer.emitULEB128IntValue(Value: Reg);
1548 Streamer.emitSLEB128IntValue(Value: Offset);
1549 } else {
1550 Streamer.emitInt8(Value: dwarf::DW_CFA_val_offset);
1551 Streamer.emitULEB128IntValue(Value: Reg);
1552 Streamer.emitULEB128IntValue(Value: Offset);
1553 }
1554 return;
1555 }
1556 }
1557 llvm_unreachable("Unhandled case in switch");
1558}
1559
1560/// Emit frame instructions to describe the layout of the frame.
1561void FrameEmitterImpl::emitCFIInstructions(ArrayRef<MCCFIInstruction> Instrs,
1562 MCSymbol *BaseLabel) {
1563 for (const MCCFIInstruction &Instr : Instrs) {
1564 MCSymbol *Label = Instr.getLabel();
1565 // Throw out move if the label is invalid.
1566 if (Label && !Label->isDefined()) continue; // Not emitted, in dead code.
1567
1568 // Advance row if new location.
1569 if (BaseLabel && Label) {
1570 MCSymbol *ThisSym = Label;
1571 if (ThisSym != BaseLabel) {
1572 Streamer.emitDwarfAdvanceFrameAddr(LastLabel: BaseLabel, Label: ThisSym, Loc: Instr.getLoc());
1573 BaseLabel = ThisSym;
1574 }
1575 }
1576
1577 emitCFIInstruction(Instr);
1578 }
1579}
1580
1581/// Emit the unwind information in a compact way.
1582void FrameEmitterImpl::EmitCompactUnwind(const MCDwarfFrameInfo &Frame) {
1583 MCContext &Context = Streamer.getContext();
1584 const MCObjectFileInfo *MOFI = Context.getObjectFileInfo();
1585
1586 // range-start range-length compact-unwind-enc personality-func lsda
1587 // _foo LfooEnd-_foo 0x00000023 0 0
1588 // _bar LbarEnd-_bar 0x00000025 __gxx_personality except_tab1
1589 //
1590 // .section __LD,__compact_unwind,regular,debug
1591 //
1592 // # compact unwind for _foo
1593 // .quad _foo
1594 // .set L1,LfooEnd-_foo
1595 // .long L1
1596 // .long 0x01010001
1597 // .quad 0
1598 // .quad 0
1599 //
1600 // # compact unwind for _bar
1601 // .quad _bar
1602 // .set L2,LbarEnd-_bar
1603 // .long L2
1604 // .long 0x01020011
1605 // .quad __gxx_personality
1606 // .quad except_tab1
1607
1608 uint32_t Encoding = Frame.CompactUnwindEncoding;
1609 if (!Encoding) return;
1610 bool DwarfEHFrameOnly = (Encoding == MOFI->getCompactUnwindDwarfEHFrameOnly());
1611
1612 // The encoding needs to know we have an LSDA.
1613 if (!DwarfEHFrameOnly && Frame.Lsda)
1614 Encoding |= 0x40000000;
1615
1616 // Range Start
1617 unsigned FDEEncoding = MOFI->getFDEEncoding();
1618 unsigned Size = getSizeForEncoding(streamer&: Streamer, symbolEncoding: FDEEncoding);
1619 Streamer.emitSymbolValue(Sym: Frame.Begin, Size);
1620
1621 // Range Length
1622 const MCExpr *Range =
1623 makeEndMinusStartExpr(Ctx&: Context, Start: *Frame.Begin, End: *Frame.End, IntVal: 0);
1624 emitAbsValue(OS&: Streamer, Value: Range, Size: 4);
1625
1626 // Compact Encoding
1627 Size = getSizeForEncoding(streamer&: Streamer, symbolEncoding: dwarf::DW_EH_PE_udata4);
1628 Streamer.emitIntValue(Value: Encoding, Size);
1629
1630 // Personality Function
1631 Size = getSizeForEncoding(streamer&: Streamer, symbolEncoding: dwarf::DW_EH_PE_absptr);
1632 if (!DwarfEHFrameOnly && Frame.Personality)
1633 Streamer.emitSymbolValue(Sym: Frame.Personality, Size);
1634 else
1635 Streamer.emitIntValue(Value: 0, Size); // No personality fn
1636
1637 // LSDA
1638 Size = getSizeForEncoding(streamer&: Streamer, symbolEncoding: Frame.LsdaEncoding);
1639 if (!DwarfEHFrameOnly && Frame.Lsda)
1640 Streamer.emitSymbolValue(Sym: Frame.Lsda, Size);
1641 else
1642 Streamer.emitIntValue(Value: 0, Size); // No LSDA
1643}
1644
1645static unsigned getCIEVersion(bool IsEH, unsigned DwarfVersion) {
1646 if (IsEH)
1647 return 1;
1648 switch (DwarfVersion) {
1649 case 2:
1650 return 1;
1651 case 3:
1652 return 3;
1653 case 4:
1654 case 5:
1655 return 4;
1656 }
1657 llvm_unreachable("Unknown version");
1658}
1659
1660const MCSymbol &FrameEmitterImpl::EmitCIE(const MCDwarfFrameInfo &Frame) {
1661 MCContext &context = Streamer.getContext();
1662 const MCRegisterInfo *MRI = context.getRegisterInfo();
1663 const MCObjectFileInfo *MOFI = context.getObjectFileInfo();
1664
1665 MCSymbol *sectionStart = context.createTempSymbol();
1666 Streamer.emitLabel(Symbol: sectionStart);
1667
1668 MCSymbol *sectionEnd = context.createTempSymbol();
1669
1670 dwarf::DwarfFormat Format = IsEH ? dwarf::DWARF32 : context.getDwarfFormat();
1671 unsigned UnitLengthBytes = dwarf::getUnitLengthFieldByteSize(Format);
1672 unsigned OffsetSize = dwarf::getDwarfOffsetByteSize(Format);
1673 bool IsDwarf64 = Format == dwarf::DWARF64;
1674
1675 if (IsDwarf64)
1676 // DWARF64 mark
1677 Streamer.emitInt32(Value: dwarf::DW_LENGTH_DWARF64);
1678
1679 // Length
1680 const MCExpr *Length = makeEndMinusStartExpr(Ctx&: context, Start: *sectionStart,
1681 End: *sectionEnd, IntVal: UnitLengthBytes);
1682 emitAbsValue(OS&: Streamer, Value: Length, Size: OffsetSize);
1683
1684 // CIE ID
1685 uint64_t CIE_ID =
1686 IsEH ? 0 : (IsDwarf64 ? dwarf::DW64_CIE_ID : dwarf::DW_CIE_ID);
1687 Streamer.emitIntValue(Value: CIE_ID, Size: OffsetSize);
1688
1689 // Version
1690 uint8_t CIEVersion = getCIEVersion(IsEH, DwarfVersion: context.getDwarfVersion());
1691 Streamer.emitInt8(Value: CIEVersion);
1692
1693 if (IsEH) {
1694 SmallString<8> Augmentation;
1695 Augmentation += "z";
1696 if (Frame.Personality)
1697 Augmentation += "P";
1698 if (Frame.Lsda)
1699 Augmentation += "L";
1700 Augmentation += "R";
1701 if (Frame.IsSignalFrame)
1702 Augmentation += "S";
1703 if (Frame.IsBKeyFrame)
1704 Augmentation += "B";
1705 if (Frame.IsMTETaggedFrame)
1706 Augmentation += "G";
1707 Streamer.emitBytes(Data: Augmentation);
1708 }
1709 Streamer.emitInt8(Value: 0);
1710
1711 if (CIEVersion >= 4) {
1712 // Address Size
1713 Streamer.emitInt8(Value: context.getAsmInfo()->getCodePointerSize());
1714
1715 // Segment Descriptor Size
1716 Streamer.emitInt8(Value: 0);
1717 }
1718
1719 // Code Alignment Factor
1720 Streamer.emitULEB128IntValue(Value: context.getAsmInfo()->getMinInstAlignment());
1721
1722 // Data Alignment Factor
1723 Streamer.emitSLEB128IntValue(Value: getDataAlignmentFactor(streamer&: Streamer));
1724
1725 // Return Address Register
1726 unsigned RAReg = Frame.RAReg;
1727 if (RAReg == static_cast<unsigned>(INT_MAX))
1728 RAReg = MRI->getDwarfRegNum(Reg: MRI->getRARegister(), isEH: IsEH);
1729
1730 if (CIEVersion == 1) {
1731 assert(RAReg <= 255 &&
1732 "DWARF 2 encodes return_address_register in one byte");
1733 Streamer.emitInt8(Value: RAReg);
1734 } else {
1735 Streamer.emitULEB128IntValue(Value: RAReg);
1736 }
1737
1738 // Augmentation Data Length (optional)
1739 unsigned augmentationLength = 0;
1740 if (IsEH) {
1741 if (Frame.Personality) {
1742 // Personality Encoding
1743 augmentationLength += 1;
1744 // Personality
1745 augmentationLength +=
1746 getSizeForEncoding(streamer&: Streamer, symbolEncoding: Frame.PersonalityEncoding);
1747 }
1748 if (Frame.Lsda)
1749 augmentationLength += 1;
1750 // Encoding of the FDE pointers
1751 augmentationLength += 1;
1752
1753 Streamer.emitULEB128IntValue(Value: augmentationLength);
1754
1755 // Augmentation Data (optional)
1756 if (Frame.Personality) {
1757 // Personality Encoding
1758 emitEncodingByte(Streamer, Encoding: Frame.PersonalityEncoding);
1759 // Personality
1760 EmitPersonality(streamer&: Streamer, symbol: *Frame.Personality, symbolEncoding: Frame.PersonalityEncoding);
1761 }
1762
1763 if (Frame.Lsda)
1764 emitEncodingByte(Streamer, Encoding: Frame.LsdaEncoding);
1765
1766 // Encoding of the FDE pointers
1767 emitEncodingByte(Streamer, Encoding: MOFI->getFDEEncoding());
1768 }
1769
1770 // Initial Instructions
1771
1772 const MCAsmInfo *MAI = context.getAsmInfo();
1773 if (!Frame.IsSimple) {
1774 const std::vector<MCCFIInstruction> &Instructions =
1775 MAI->getInitialFrameState();
1776 emitCFIInstructions(Instrs: Instructions, BaseLabel: nullptr);
1777 }
1778
1779 InitialCFAOffset = CFAOffset;
1780
1781 // Padding
1782 Streamer.emitValueToAlignment(Alignment: Align(IsEH ? 4 : MAI->getCodePointerSize()));
1783
1784 Streamer.emitLabel(Symbol: sectionEnd);
1785 return *sectionStart;
1786}
1787
1788void FrameEmitterImpl::EmitFDE(const MCSymbol &cieStart,
1789 const MCDwarfFrameInfo &frame,
1790 bool LastInSection,
1791 const MCSymbol &SectionStart) {
1792 MCContext &context = Streamer.getContext();
1793 MCSymbol *fdeStart = context.createTempSymbol();
1794 MCSymbol *fdeEnd = context.createTempSymbol();
1795 const MCObjectFileInfo *MOFI = context.getObjectFileInfo();
1796
1797 CFAOffset = InitialCFAOffset;
1798
1799 dwarf::DwarfFormat Format = IsEH ? dwarf::DWARF32 : context.getDwarfFormat();
1800 unsigned OffsetSize = dwarf::getDwarfOffsetByteSize(Format);
1801
1802 if (Format == dwarf::DWARF64)
1803 // DWARF64 mark
1804 Streamer.emitInt32(Value: dwarf::DW_LENGTH_DWARF64);
1805
1806 // Length
1807 const MCExpr *Length = makeEndMinusStartExpr(Ctx&: context, Start: *fdeStart, End: *fdeEnd, IntVal: 0);
1808 emitAbsValue(OS&: Streamer, Value: Length, Size: OffsetSize);
1809
1810 Streamer.emitLabel(Symbol: fdeStart);
1811
1812 // CIE Pointer
1813 const MCAsmInfo *asmInfo = context.getAsmInfo();
1814 if (IsEH) {
1815 const MCExpr *offset =
1816 makeEndMinusStartExpr(Ctx&: context, Start: cieStart, End: *fdeStart, IntVal: 0);
1817 emitAbsValue(OS&: Streamer, Value: offset, Size: OffsetSize);
1818 } else if (!asmInfo->doesDwarfUseRelocationsAcrossSections()) {
1819 const MCExpr *offset =
1820 makeEndMinusStartExpr(Ctx&: context, Start: SectionStart, End: cieStart, IntVal: 0);
1821 emitAbsValue(OS&: Streamer, Value: offset, Size: OffsetSize);
1822 } else {
1823 Streamer.emitSymbolValue(Sym: &cieStart, Size: OffsetSize,
1824 IsSectionRelative: asmInfo->needsDwarfSectionOffsetDirective());
1825 }
1826
1827 // PC Begin
1828 unsigned PCEncoding =
1829 IsEH ? MOFI->getFDEEncoding() : (unsigned)dwarf::DW_EH_PE_absptr;
1830 unsigned PCSize = getSizeForEncoding(streamer&: Streamer, symbolEncoding: PCEncoding);
1831 emitFDESymbol(streamer&: Streamer, symbol: *frame.Begin, symbolEncoding: PCEncoding, isEH: IsEH);
1832
1833 // PC Range
1834 const MCExpr *Range =
1835 makeEndMinusStartExpr(Ctx&: context, Start: *frame.Begin, End: *frame.End, IntVal: 0);
1836 emitAbsValue(OS&: Streamer, Value: Range, Size: PCSize);
1837
1838 if (IsEH) {
1839 // Augmentation Data Length
1840 unsigned augmentationLength = 0;
1841
1842 if (frame.Lsda)
1843 augmentationLength += getSizeForEncoding(streamer&: Streamer, symbolEncoding: frame.LsdaEncoding);
1844
1845 Streamer.emitULEB128IntValue(Value: augmentationLength);
1846
1847 // Augmentation Data
1848 if (frame.Lsda)
1849 emitFDESymbol(streamer&: Streamer, symbol: *frame.Lsda, symbolEncoding: frame.LsdaEncoding, isEH: true);
1850 }
1851
1852 // Call Frame Instructions
1853 emitCFIInstructions(Instrs: frame.Instructions, BaseLabel: frame.Begin);
1854
1855 // Padding
1856 // The size of a .eh_frame section has to be a multiple of the alignment
1857 // since a null CIE is interpreted as the end. Old systems overaligned
1858 // .eh_frame, so we do too and account for it in the last FDE.
1859 unsigned Alignment = LastInSection ? asmInfo->getCodePointerSize() : PCSize;
1860 Streamer.emitValueToAlignment(Alignment: Align(Alignment));
1861
1862 Streamer.emitLabel(Symbol: fdeEnd);
1863}
1864
1865namespace {
1866
1867struct CIEKey {
1868 CIEKey() = default;
1869
1870 explicit CIEKey(const MCDwarfFrameInfo &Frame)
1871 : Personality(Frame.Personality),
1872 PersonalityEncoding(Frame.PersonalityEncoding),
1873 LsdaEncoding(Frame.LsdaEncoding), IsSignalFrame(Frame.IsSignalFrame),
1874 IsSimple(Frame.IsSimple), RAReg(Frame.RAReg),
1875 IsBKeyFrame(Frame.IsBKeyFrame),
1876 IsMTETaggedFrame(Frame.IsMTETaggedFrame) {}
1877
1878 StringRef PersonalityName() const {
1879 if (!Personality)
1880 return StringRef();
1881 return Personality->getName();
1882 }
1883
1884 bool operator<(const CIEKey &Other) const {
1885 return std::make_tuple(args: PersonalityName(), args: PersonalityEncoding, args: LsdaEncoding,
1886 args: IsSignalFrame, args: IsSimple, args: RAReg, args: IsBKeyFrame,
1887 args: IsMTETaggedFrame) <
1888 std::make_tuple(args: Other.PersonalityName(), args: Other.PersonalityEncoding,
1889 args: Other.LsdaEncoding, args: Other.IsSignalFrame,
1890 args: Other.IsSimple, args: Other.RAReg, args: Other.IsBKeyFrame,
1891 args: Other.IsMTETaggedFrame);
1892 }
1893
1894 bool operator==(const CIEKey &Other) const {
1895 return Personality == Other.Personality &&
1896 PersonalityEncoding == Other.PersonalityEncoding &&
1897 LsdaEncoding == Other.LsdaEncoding &&
1898 IsSignalFrame == Other.IsSignalFrame && IsSimple == Other.IsSimple &&
1899 RAReg == Other.RAReg && IsBKeyFrame == Other.IsBKeyFrame &&
1900 IsMTETaggedFrame == Other.IsMTETaggedFrame;
1901 }
1902 bool operator!=(const CIEKey &Other) const { return !(*this == Other); }
1903
1904 const MCSymbol *Personality = nullptr;
1905 unsigned PersonalityEncoding = 0;
1906 unsigned LsdaEncoding = -1;
1907 bool IsSignalFrame = false;
1908 bool IsSimple = false;
1909 unsigned RAReg = UINT_MAX;
1910 bool IsBKeyFrame = false;
1911 bool IsMTETaggedFrame = false;
1912};
1913
1914} // end anonymous namespace
1915
1916void MCDwarfFrameEmitter::emit(MCObjectStreamer &Streamer, bool IsEH) {
1917 MCContext &Context = Streamer.getContext();
1918 const MCObjectFileInfo *MOFI = Context.getObjectFileInfo();
1919 const MCAsmInfo *AsmInfo = Context.getAsmInfo();
1920 FrameEmitterImpl Emitter(IsEH, Streamer);
1921 ArrayRef<MCDwarfFrameInfo> FrameArray = Streamer.getDwarfFrameInfos();
1922
1923 // Emit the compact unwind info if available.
1924 bool NeedsEHFrameSection = !MOFI->getSupportsCompactUnwindWithoutEHFrame();
1925 if (IsEH && MOFI->getCompactUnwindSection()) {
1926 Streamer.generateCompactUnwindEncodings();
1927 bool SectionEmitted = false;
1928 for (const MCDwarfFrameInfo &Frame : FrameArray) {
1929 if (Frame.CompactUnwindEncoding == 0) continue;
1930 if (!SectionEmitted) {
1931 Streamer.switchSection(Section: MOFI->getCompactUnwindSection());
1932 Streamer.emitValueToAlignment(Alignment: Align(AsmInfo->getCodePointerSize()));
1933 SectionEmitted = true;
1934 }
1935 NeedsEHFrameSection |=
1936 Frame.CompactUnwindEncoding ==
1937 MOFI->getCompactUnwindDwarfEHFrameOnly();
1938 Emitter.EmitCompactUnwind(Frame);
1939 }
1940 }
1941
1942 // Compact unwind information can be emitted in the eh_frame section or the
1943 // debug_frame section. Skip emitting FDEs and CIEs when the compact unwind
1944 // doesn't need an eh_frame section and the emission location is the eh_frame
1945 // section.
1946 if (!NeedsEHFrameSection && IsEH) return;
1947
1948 MCSection &Section =
1949 IsEH ? *const_cast<MCObjectFileInfo *>(MOFI)->getEHFrameSection()
1950 : *MOFI->getDwarfFrameSection();
1951
1952 Streamer.switchSection(Section: &Section);
1953 MCSymbol *SectionStart = Context.createTempSymbol();
1954 Streamer.emitLabel(Symbol: SectionStart);
1955
1956 bool CanOmitDwarf = MOFI->getOmitDwarfIfHaveCompactUnwind();
1957 // Sort the FDEs by their corresponding CIE before we emit them.
1958 // This isn't technically necessary according to the DWARF standard,
1959 // but the Android libunwindstack rejects eh_frame sections where
1960 // an FDE refers to a CIE other than the closest previous CIE.
1961 std::vector<MCDwarfFrameInfo> FrameArrayX(FrameArray.begin(), FrameArray.end());
1962 llvm::stable_sort(Range&: FrameArrayX,
1963 C: [](const MCDwarfFrameInfo &X, const MCDwarfFrameInfo &Y) {
1964 return CIEKey(X) < CIEKey(Y);
1965 });
1966 CIEKey LastKey;
1967 const MCSymbol *LastCIEStart = nullptr;
1968 for (auto I = FrameArrayX.begin(), E = FrameArrayX.end(); I != E;) {
1969 const MCDwarfFrameInfo &Frame = *I;
1970 ++I;
1971 if (CanOmitDwarf && Frame.CompactUnwindEncoding !=
1972 MOFI->getCompactUnwindDwarfEHFrameOnly() && IsEH)
1973 // CIEs and FDEs can be emitted in either the eh_frame section or the
1974 // debug_frame section, on some platforms (e.g. AArch64) the target object
1975 // file supports emitting a compact_unwind section without an associated
1976 // eh_frame section. If the eh_frame section is not needed, and the
1977 // location where the CIEs and FDEs are to be emitted is the eh_frame
1978 // section, do not emit anything.
1979 continue;
1980
1981 CIEKey Key(Frame);
1982 if (!LastCIEStart || (IsEH && Key != LastKey)) {
1983 LastKey = Key;
1984 LastCIEStart = &Emitter.EmitCIE(Frame);
1985 }
1986
1987 Emitter.EmitFDE(cieStart: *LastCIEStart, frame: Frame, LastInSection: I == E, SectionStart: *SectionStart);
1988 }
1989}
1990
1991void MCDwarfFrameEmitter::encodeAdvanceLoc(MCContext &Context,
1992 uint64_t AddrDelta,
1993 SmallVectorImpl<char> &Out) {
1994 // Scale the address delta by the minimum instruction length.
1995 AddrDelta = ScaleAddrDelta(Context, AddrDelta);
1996 if (AddrDelta == 0)
1997 return;
1998
1999 llvm::endianness E = Context.getAsmInfo()->isLittleEndian()
2000 ? llvm::endianness::little
2001 : llvm::endianness::big;
2002
2003 if (isUIntN(N: 6, x: AddrDelta)) {
2004 uint8_t Opcode = dwarf::DW_CFA_advance_loc | AddrDelta;
2005 Out.push_back(Elt: Opcode);
2006 } else if (isUInt<8>(x: AddrDelta)) {
2007 Out.push_back(Elt: dwarf::DW_CFA_advance_loc1);
2008 Out.push_back(Elt: AddrDelta);
2009 } else if (isUInt<16>(x: AddrDelta)) {
2010 Out.push_back(Elt: dwarf::DW_CFA_advance_loc2);
2011 support::endian::write<uint16_t>(Out, V: AddrDelta, E);
2012 } else {
2013 assert(isUInt<32>(AddrDelta));
2014 Out.push_back(Elt: dwarf::DW_CFA_advance_loc4);
2015 support::endian::write<uint32_t>(Out, V: AddrDelta, E);
2016 }
2017}
2018