170f5bc99SReid Kleckner //===-- llvm/lib/CodeGen/AsmPrinter/CodeViewDebug.cpp --*- C++ -*--===//
270f5bc99SReid Kleckner //
370f5bc99SReid Kleckner //                     The LLVM Compiler Infrastructure
470f5bc99SReid Kleckner //
570f5bc99SReid Kleckner // This file is distributed under the University of Illinois Open Source
670f5bc99SReid Kleckner // License. See LICENSE.TXT for details.
770f5bc99SReid Kleckner //
870f5bc99SReid Kleckner //===----------------------------------------------------------------------===//
970f5bc99SReid Kleckner //
1070f5bc99SReid Kleckner // This file contains support for writing Microsoft CodeView debug info.
1170f5bc99SReid Kleckner //
1270f5bc99SReid Kleckner //===----------------------------------------------------------------------===//
1370f5bc99SReid Kleckner 
1470f5bc99SReid Kleckner #include "CodeViewDebug.h"
1570f5bc99SReid Kleckner #include "llvm/DebugInfo/CodeView/CodeView.h"
162214ed89SReid Kleckner #include "llvm/DebugInfo/CodeView/Line.h"
1770f5bc99SReid Kleckner #include "llvm/DebugInfo/CodeView/SymbolRecord.h"
18f3b9ba49SReid Kleckner #include "llvm/DebugInfo/CodeView/TypeIndex.h"
19f3b9ba49SReid Kleckner #include "llvm/DebugInfo/CodeView/TypeRecord.h"
2070f5bc99SReid Kleckner #include "llvm/MC/MCExpr.h"
2170f5bc99SReid Kleckner #include "llvm/MC/MCSymbol.h"
2270f5bc99SReid Kleckner #include "llvm/Support/COFF.h"
23f9c275feSReid Kleckner #include "llvm/Target/TargetSubtargetInfo.h"
24f9c275feSReid Kleckner #include "llvm/Target/TargetRegisterInfo.h"
25f9c275feSReid Kleckner #include "llvm/Target/TargetFrameLowering.h"
2670f5bc99SReid Kleckner 
27f9c275feSReid Kleckner using namespace llvm;
2870f5bc99SReid Kleckner using namespace llvm::codeview;
2970f5bc99SReid Kleckner 
30f9c275feSReid Kleckner CodeViewDebug::CodeViewDebug(AsmPrinter *AP)
31f9c275feSReid Kleckner     : DebugHandlerBase(AP), OS(*Asm->OutStreamer), CurFn(nullptr) {
32f9c275feSReid Kleckner   // If module doesn't have named metadata anchors or COFF debug section
33f9c275feSReid Kleckner   // is not available, skip any debug info related stuff.
34f9c275feSReid Kleckner   if (!MMI->getModule()->getNamedMetadata("llvm.dbg.cu") ||
35f9c275feSReid Kleckner       !AP->getObjFileLowering().getCOFFDebugSymbolsSection()) {
36f9c275feSReid Kleckner     Asm = nullptr;
37f9c275feSReid Kleckner     return;
38f9c275feSReid Kleckner   }
39f9c275feSReid Kleckner 
40f9c275feSReid Kleckner   // Tell MMI that we have debug info.
41f9c275feSReid Kleckner   MMI->setDebugInfoAvailability(true);
42f9c275feSReid Kleckner }
4370f5bc99SReid Kleckner 
449533af4fSReid Kleckner StringRef CodeViewDebug::getFullFilepath(const DIFile *File) {
459533af4fSReid Kleckner   std::string &Filepath = FileToFilepathMap[File];
4670f5bc99SReid Kleckner   if (!Filepath.empty())
4770f5bc99SReid Kleckner     return Filepath;
4870f5bc99SReid Kleckner 
499533af4fSReid Kleckner   StringRef Dir = File->getDirectory(), Filename = File->getFilename();
509533af4fSReid Kleckner 
5170f5bc99SReid Kleckner   // Clang emits directory and relative filename info into the IR, but CodeView
5270f5bc99SReid Kleckner   // operates on full paths.  We could change Clang to emit full paths too, but
5370f5bc99SReid Kleckner   // that would increase the IR size and probably not needed for other users.
5470f5bc99SReid Kleckner   // For now, just concatenate and canonicalize the path here.
5570f5bc99SReid Kleckner   if (Filename.find(':') == 1)
5670f5bc99SReid Kleckner     Filepath = Filename;
5770f5bc99SReid Kleckner   else
5870f5bc99SReid Kleckner     Filepath = (Dir + "\\" + Filename).str();
5970f5bc99SReid Kleckner 
6070f5bc99SReid Kleckner   // Canonicalize the path.  We have to do it textually because we may no longer
6170f5bc99SReid Kleckner   // have access the file in the filesystem.
6270f5bc99SReid Kleckner   // First, replace all slashes with backslashes.
6370f5bc99SReid Kleckner   std::replace(Filepath.begin(), Filepath.end(), '/', '\\');
6470f5bc99SReid Kleckner 
6570f5bc99SReid Kleckner   // Remove all "\.\" with "\".
6670f5bc99SReid Kleckner   size_t Cursor = 0;
6770f5bc99SReid Kleckner   while ((Cursor = Filepath.find("\\.\\", Cursor)) != std::string::npos)
6870f5bc99SReid Kleckner     Filepath.erase(Cursor, 2);
6970f5bc99SReid Kleckner 
7070f5bc99SReid Kleckner   // Replace all "\XXX\..\" with "\".  Don't try too hard though as the original
7170f5bc99SReid Kleckner   // path should be well-formatted, e.g. start with a drive letter, etc.
7270f5bc99SReid Kleckner   Cursor = 0;
7370f5bc99SReid Kleckner   while ((Cursor = Filepath.find("\\..\\", Cursor)) != std::string::npos) {
7470f5bc99SReid Kleckner     // Something's wrong if the path starts with "\..\", abort.
7570f5bc99SReid Kleckner     if (Cursor == 0)
7670f5bc99SReid Kleckner       break;
7770f5bc99SReid Kleckner 
7870f5bc99SReid Kleckner     size_t PrevSlash = Filepath.rfind('\\', Cursor - 1);
7970f5bc99SReid Kleckner     if (PrevSlash == std::string::npos)
8070f5bc99SReid Kleckner       // Something's wrong, abort.
8170f5bc99SReid Kleckner       break;
8270f5bc99SReid Kleckner 
8370f5bc99SReid Kleckner     Filepath.erase(PrevSlash, Cursor + 3 - PrevSlash);
8470f5bc99SReid Kleckner     // The next ".." might be following the one we've just erased.
8570f5bc99SReid Kleckner     Cursor = PrevSlash;
8670f5bc99SReid Kleckner   }
8770f5bc99SReid Kleckner 
8870f5bc99SReid Kleckner   // Remove all duplicate backslashes.
8970f5bc99SReid Kleckner   Cursor = 0;
9070f5bc99SReid Kleckner   while ((Cursor = Filepath.find("\\\\", Cursor)) != std::string::npos)
9170f5bc99SReid Kleckner     Filepath.erase(Cursor, 1);
9270f5bc99SReid Kleckner 
9370f5bc99SReid Kleckner   return Filepath;
9470f5bc99SReid Kleckner }
9570f5bc99SReid Kleckner 
962214ed89SReid Kleckner unsigned CodeViewDebug::maybeRecordFile(const DIFile *F) {
972214ed89SReid Kleckner   unsigned NextId = FileIdMap.size() + 1;
982214ed89SReid Kleckner   auto Insertion = FileIdMap.insert(std::make_pair(F, NextId));
992214ed89SReid Kleckner   if (Insertion.second) {
1002214ed89SReid Kleckner     // We have to compute the full filepath and emit a .cv_file directive.
1012214ed89SReid Kleckner     StringRef FullPath = getFullFilepath(F);
102dac21b43SReid Kleckner     NextId = OS.EmitCVFileDirective(NextId, FullPath);
1032214ed89SReid Kleckner     assert(NextId == FileIdMap.size() && ".cv_file directive failed");
1042214ed89SReid Kleckner   }
1052214ed89SReid Kleckner   return Insertion.first->second;
1062214ed89SReid Kleckner }
1072214ed89SReid Kleckner 
108876330d5SReid Kleckner CodeViewDebug::InlineSite &
109876330d5SReid Kleckner CodeViewDebug::getInlineSite(const DILocation *InlinedAt,
110876330d5SReid Kleckner                              const DISubprogram *Inlinee) {
111fbd7787dSReid Kleckner   auto SiteInsertion = CurFn->InlineSites.insert({InlinedAt, InlineSite()});
112fbd7787dSReid Kleckner   InlineSite *Site = &SiteInsertion.first->second;
113fbd7787dSReid Kleckner   if (SiteInsertion.second) {
114f9c275feSReid Kleckner     Site->SiteFuncId = NextFuncId++;
115876330d5SReid Kleckner     Site->Inlinee = Inlinee;
116fbd7787dSReid Kleckner     auto InlineeInsertion =
117fbd7787dSReid Kleckner         SubprogramIndices.insert({Inlinee, InlinedSubprograms.size()});
118fbd7787dSReid Kleckner     if (InlineeInsertion.second)
119fbd7787dSReid Kleckner       InlinedSubprograms.push_back(Inlinee);
120f3b9ba49SReid Kleckner   }
121f9c275feSReid Kleckner   return *Site;
122f3b9ba49SReid Kleckner }
123f3b9ba49SReid Kleckner 
124876330d5SReid Kleckner void CodeViewDebug::recordLocalVariable(LocalVariable &&Var,
125876330d5SReid Kleckner                                         const DILocation *InlinedAt) {
126876330d5SReid Kleckner   if (InlinedAt) {
127876330d5SReid Kleckner     // This variable was inlined. Associate it with the InlineSite.
128876330d5SReid Kleckner     const DISubprogram *Inlinee = Var.DIVar->getScope()->getSubprogram();
129876330d5SReid Kleckner     InlineSite &Site = getInlineSite(InlinedAt, Inlinee);
130876330d5SReid Kleckner     Site.InlinedLocals.emplace_back(Var);
131876330d5SReid Kleckner   } else {
132876330d5SReid Kleckner     // This variable goes in the main ProcSym.
133876330d5SReid Kleckner     CurFn->Locals.emplace_back(Var);
134876330d5SReid Kleckner   }
135876330d5SReid Kleckner }
136876330d5SReid Kleckner 
137829365aeSReid Kleckner static void addLocIfNotPresent(SmallVectorImpl<const DILocation *> &Locs,
138829365aeSReid Kleckner                                const DILocation *Loc) {
139829365aeSReid Kleckner   auto B = Locs.begin(), E = Locs.end();
140829365aeSReid Kleckner   if (std::find(B, E, Loc) == E)
141829365aeSReid Kleckner     Locs.push_back(Loc);
142829365aeSReid Kleckner }
143829365aeSReid Kleckner 
14470f5bc99SReid Kleckner void CodeViewDebug::maybeRecordLocation(DebugLoc DL,
14570f5bc99SReid Kleckner                                         const MachineFunction *MF) {
1469533af4fSReid Kleckner   // Skip this instruction if it has the same location as the previous one.
1479533af4fSReid Kleckner   if (DL == CurFn->LastLoc)
1489533af4fSReid Kleckner     return;
1499533af4fSReid Kleckner 
1509533af4fSReid Kleckner   const DIScope *Scope = DL.get()->getScope();
15170f5bc99SReid Kleckner   if (!Scope)
15270f5bc99SReid Kleckner     return;
1539533af4fSReid Kleckner 
15470f5bc99SReid Kleckner   // Skip this line if it is longer than the maximum we can record.
1552214ed89SReid Kleckner   LineInfo LI(DL.getLine(), DL.getLine(), /*IsStatement=*/true);
1562214ed89SReid Kleckner   if (LI.getStartLine() != DL.getLine() || LI.isAlwaysStepInto() ||
1572214ed89SReid Kleckner       LI.isNeverStepInto())
15870f5bc99SReid Kleckner     return;
15970f5bc99SReid Kleckner 
1602214ed89SReid Kleckner   ColumnInfo CI(DL.getCol(), /*EndColumn=*/0);
1612214ed89SReid Kleckner   if (CI.getStartColumn() != DL.getCol())
1622214ed89SReid Kleckner     return;
16300d9639cSReid Kleckner 
1642214ed89SReid Kleckner   if (!CurFn->HaveLineInfo)
1652214ed89SReid Kleckner     CurFn->HaveLineInfo = true;
1662214ed89SReid Kleckner   unsigned FileId = 0;
1672214ed89SReid Kleckner   if (CurFn->LastLoc.get() && CurFn->LastLoc->getFile() == DL->getFile())
1682214ed89SReid Kleckner     FileId = CurFn->LastFileId;
1692214ed89SReid Kleckner   else
1702214ed89SReid Kleckner     FileId = CurFn->LastFileId = maybeRecordFile(DL->getFile());
1712214ed89SReid Kleckner   CurFn->LastLoc = DL;
172f3b9ba49SReid Kleckner 
173f3b9ba49SReid Kleckner   unsigned FuncId = CurFn->FuncId;
174876330d5SReid Kleckner   if (const DILocation *SiteLoc = DL->getInlinedAt()) {
175829365aeSReid Kleckner     const DILocation *Loc = DL.get();
176829365aeSReid Kleckner 
177f3b9ba49SReid Kleckner     // If this location was actually inlined from somewhere else, give it the ID
178f3b9ba49SReid Kleckner     // of the inline call site.
179876330d5SReid Kleckner     FuncId =
180876330d5SReid Kleckner         getInlineSite(SiteLoc, Loc->getScope()->getSubprogram()).SiteFuncId;
181829365aeSReid Kleckner 
182f3b9ba49SReid Kleckner     // Ensure we have links in the tree of inline call sites.
183829365aeSReid Kleckner     bool FirstLoc = true;
184829365aeSReid Kleckner     while ((SiteLoc = Loc->getInlinedAt())) {
185876330d5SReid Kleckner       InlineSite &Site =
186876330d5SReid Kleckner           getInlineSite(SiteLoc, Loc->getScope()->getSubprogram());
187829365aeSReid Kleckner       if (!FirstLoc)
188829365aeSReid Kleckner         addLocIfNotPresent(Site.ChildSites, Loc);
189829365aeSReid Kleckner       FirstLoc = false;
190829365aeSReid Kleckner       Loc = SiteLoc;
191f3b9ba49SReid Kleckner     }
192829365aeSReid Kleckner     addLocIfNotPresent(CurFn->ChildSites, Loc);
193f3b9ba49SReid Kleckner   }
194f3b9ba49SReid Kleckner 
195dac21b43SReid Kleckner   OS.EmitCVLocDirective(FuncId, FileId, DL.getLine(), DL.getCol(),
196dac21b43SReid Kleckner                         /*PrologueEnd=*/false,
1972214ed89SReid Kleckner                         /*IsStmt=*/false, DL->getFilename());
19870f5bc99SReid Kleckner }
19970f5bc99SReid Kleckner 
20070f5bc99SReid Kleckner void CodeViewDebug::endModule() {
20170f5bc99SReid Kleckner   if (FnDebugInfo.empty())
20270f5bc99SReid Kleckner     return;
20370f5bc99SReid Kleckner 
204f3b9ba49SReid Kleckner   emitTypeInformation();
205f3b9ba49SReid Kleckner 
20670f5bc99SReid Kleckner   // FIXME: For functions that are comdat, we should emit separate .debug$S
20770f5bc99SReid Kleckner   // sections that are comdat associative with the main function instead of
20870f5bc99SReid Kleckner   // having one big .debug$S section.
20970f5bc99SReid Kleckner   assert(Asm != nullptr);
210dac21b43SReid Kleckner   OS.SwitchSection(Asm->getObjFileLowering().getCOFFDebugSymbolsSection());
211dac21b43SReid Kleckner   OS.AddComment("Debug section magic");
212dac21b43SReid Kleckner   OS.EmitIntValue(COFF::DEBUG_SECTION_MAGIC, 4);
21370f5bc99SReid Kleckner 
21470f5bc99SReid Kleckner   // The COFF .debug$S section consists of several subsections, each starting
21570f5bc99SReid Kleckner   // with a 4-byte control code (e.g. 0xF1, 0xF2, etc) and then a 4-byte length
21670f5bc99SReid Kleckner   // of the payload followed by the payload itself.  The subsections are 4-byte
21770f5bc99SReid Kleckner   // aligned.
21870f5bc99SReid Kleckner 
2191fcd610cSReid Kleckner   // Make a subsection for all the inlined subprograms.
220fbd7787dSReid Kleckner   emitInlineeFuncIdsAndLines();
2211fcd610cSReid Kleckner 
2222214ed89SReid Kleckner   // Emit per-function debug information.
2232214ed89SReid Kleckner   for (auto &P : FnDebugInfo)
2242214ed89SReid Kleckner     emitDebugInfoForFunction(P.first, P.second);
22570f5bc99SReid Kleckner 
22670f5bc99SReid Kleckner   // This subsection holds a file index to offset in string table table.
227dac21b43SReid Kleckner   OS.AddComment("File index to string table offset subsection");
228dac21b43SReid Kleckner   OS.EmitCVFileChecksumsDirective();
22970f5bc99SReid Kleckner 
23070f5bc99SReid Kleckner   // This subsection holds the string table.
231dac21b43SReid Kleckner   OS.AddComment("String table");
232dac21b43SReid Kleckner   OS.EmitCVStringTableDirective();
23370f5bc99SReid Kleckner 
23470f5bc99SReid Kleckner   clear();
23570f5bc99SReid Kleckner }
23670f5bc99SReid Kleckner 
237b9456a5eSDavid Majnemer static void emitNullTerminatedSymbolName(MCStreamer &OS, StringRef S) {
238b9456a5eSDavid Majnemer   // Microsoft's linker seems to have trouble with symbol names longer than
239b9456a5eSDavid Majnemer   // 0xffd8 bytes.
240b9456a5eSDavid Majnemer   S = S.substr(0, 0xffd8);
241b9456a5eSDavid Majnemer   SmallString<32> NullTerminatedString(S);
242b9456a5eSDavid Majnemer   NullTerminatedString.push_back('\0');
243b9456a5eSDavid Majnemer   OS.EmitBytes(NullTerminatedString);
244b9456a5eSDavid Majnemer }
245b9456a5eSDavid Majnemer 
246f3b9ba49SReid Kleckner void CodeViewDebug::emitTypeInformation() {
247fbd7787dSReid Kleckner   // Do nothing if we have no debug info or no inlined subprograms.  The types
248fbd7787dSReid Kleckner   // we currently emit exist only to support inlined call site info.
249fbd7787dSReid Kleckner   NamedMDNode *CU_Nodes =
250fbd7787dSReid Kleckner       MMI->getModule()->getNamedMetadata("llvm.dbg.cu");
251fbd7787dSReid Kleckner   if (!CU_Nodes)
252fbd7787dSReid Kleckner     return;
253fbd7787dSReid Kleckner   if (InlinedSubprograms.empty())
254fbd7787dSReid Kleckner     return;
255fbd7787dSReid Kleckner 
256f3b9ba49SReid Kleckner   // Start the .debug$T section with 0x4.
257dac21b43SReid Kleckner   OS.SwitchSection(Asm->getObjFileLowering().getCOFFDebugTypesSection());
258dac21b43SReid Kleckner   OS.AddComment("Debug section magic");
259dac21b43SReid Kleckner   OS.EmitIntValue(COFF::DEBUG_SECTION_MAGIC, 4);
260f3b9ba49SReid Kleckner 
261f3b9ba49SReid Kleckner   // This type info currently only holds function ids for use with inline call
262f3b9ba49SReid Kleckner   // frame info. All functions are assigned a simple 'void ()' type. Emit that
263f3b9ba49SReid Kleckner   // type here.
264*a972d612SAdrian McCarthy   ArrayRef<TypeIndex> NoArgs;
265*a972d612SAdrian McCarthy   ArgListRecord ArgListRec(TypeRecordKind::ArgList, NoArgs);
266*a972d612SAdrian McCarthy   TypeIndex ArgListIndex = TypeTable.writeArgList(ArgListRec);
267f3b9ba49SReid Kleckner 
268*a972d612SAdrian McCarthy   ProcedureRecord Procedure(TypeIndex::Void(), CallingConvention::NearC,
269*a972d612SAdrian McCarthy                             FunctionOptions::None, 0, ArgListIndex);
270*a972d612SAdrian McCarthy   TypeIndex VoidFnTyIdx = TypeTable.writeProcedure(Procedure);
271f3b9ba49SReid Kleckner 
272fbd7787dSReid Kleckner   // Emit LF_FUNC_ID records for all inlined subprograms to the type stream.
273fbd7787dSReid Kleckner   // Allocate one type index for each func id.
274fbd7787dSReid Kleckner   for (auto *SP : InlinedSubprograms) {
275*a972d612SAdrian McCarthy     TypeIndex ParentScope = TypeIndex(0);
276f3b9ba49SReid Kleckner     StringRef DisplayName = SP->getDisplayName();
277*a972d612SAdrian McCarthy     FuncIdRecord FuncId(ParentScope, VoidFnTyIdx, DisplayName);
278*a972d612SAdrian McCarthy     TypeTable.writeFuncId(FuncId);
279*a972d612SAdrian McCarthy   }
280f3b9ba49SReid Kleckner 
281*a972d612SAdrian McCarthy   TypeTable.ForEachRecord(
282*a972d612SAdrian McCarthy       [&](TypeIndex Index, const MemoryTypeTableBuilder::Record *R) {
283*a972d612SAdrian McCarthy         OS.AddComment("Type record length");
284*a972d612SAdrian McCarthy         OS.EmitIntValue(R->size(), 2);
285*a972d612SAdrian McCarthy         OS.AddComment("Type record data");
286*a972d612SAdrian McCarthy         OS.EmitBytes(StringRef(R->data(), R->size()));
287*a972d612SAdrian McCarthy       });
288f3b9ba49SReid Kleckner }
289f3b9ba49SReid Kleckner 
290fbd7787dSReid Kleckner void CodeViewDebug::emitInlineeFuncIdsAndLines() {
2911fcd610cSReid Kleckner   if (InlinedSubprograms.empty())
2921fcd610cSReid Kleckner     return;
2931fcd610cSReid Kleckner 
294f9c275feSReid Kleckner   MCSymbol *InlineBegin = MMI->getContext().createTempSymbol(),
295f9c275feSReid Kleckner            *InlineEnd = MMI->getContext().createTempSymbol();
2961fcd610cSReid Kleckner 
2971fcd610cSReid Kleckner   OS.AddComment("Inlinee lines subsection");
2981fcd610cSReid Kleckner   OS.EmitIntValue(unsigned(ModuleSubstreamKind::InlineeLines), 4);
29930579ec8SDavid Majnemer   OS.AddComment("Subsection size");
3001fcd610cSReid Kleckner   OS.emitAbsoluteSymbolDiff(InlineEnd, InlineBegin, 4);
3011fcd610cSReid Kleckner   OS.EmitLabel(InlineBegin);
3021fcd610cSReid Kleckner 
3031fcd610cSReid Kleckner   // We don't provide any extra file info.
3041fcd610cSReid Kleckner   // FIXME: Find out if debuggers use this info.
30530579ec8SDavid Majnemer   OS.AddComment("Inlinee lines signature");
3061fcd610cSReid Kleckner   OS.EmitIntValue(unsigned(InlineeLinesSignature::Normal), 4);
3071fcd610cSReid Kleckner 
308fbd7787dSReid Kleckner   unsigned InlineeIndex = FuncIdTypeIndexStart;
3091fcd610cSReid Kleckner   for (const DISubprogram *SP : InlinedSubprograms) {
31030579ec8SDavid Majnemer     OS.AddBlankLine();
3111fcd610cSReid Kleckner     unsigned FileId = maybeRecordFile(SP->getFile());
3121fcd610cSReid Kleckner     OS.AddComment("Inlined function " + SP->getDisplayName() + " starts at " +
3131fcd610cSReid Kleckner                   SP->getFilename() + Twine(':') + Twine(SP->getLine()));
31430579ec8SDavid Majnemer     OS.AddBlankLine();
3151fcd610cSReid Kleckner     // The filechecksum table uses 8 byte entries for now, and file ids start at
3161fcd610cSReid Kleckner     // 1.
3171fcd610cSReid Kleckner     unsigned FileOffset = (FileId - 1) * 8;
31830579ec8SDavid Majnemer     OS.AddComment("Type index of inlined function");
319fbd7787dSReid Kleckner     OS.EmitIntValue(InlineeIndex, 4);
32030579ec8SDavid Majnemer     OS.AddComment("Offset into filechecksum table");
3211fcd610cSReid Kleckner     OS.EmitIntValue(FileOffset, 4);
32230579ec8SDavid Majnemer     OS.AddComment("Starting line number");
3231fcd610cSReid Kleckner     OS.EmitIntValue(SP->getLine(), 4);
324fbd7787dSReid Kleckner 
325fbd7787dSReid Kleckner     // The next inlined subprogram has the next function id.
326fbd7787dSReid Kleckner     InlineeIndex++;
3271fcd610cSReid Kleckner   }
3281fcd610cSReid Kleckner 
3291fcd610cSReid Kleckner   OS.EmitLabel(InlineEnd);
3301fcd610cSReid Kleckner }
3311fcd610cSReid Kleckner 
3321fcd610cSReid Kleckner void CodeViewDebug::collectInlineSiteChildren(
3331fcd610cSReid Kleckner     SmallVectorImpl<unsigned> &Children, const FunctionInfo &FI,
3341fcd610cSReid Kleckner     const InlineSite &Site) {
3351fcd610cSReid Kleckner   for (const DILocation *ChildSiteLoc : Site.ChildSites) {
3361fcd610cSReid Kleckner     auto I = FI.InlineSites.find(ChildSiteLoc);
3371fcd610cSReid Kleckner     const InlineSite &ChildSite = I->second;
3381fcd610cSReid Kleckner     Children.push_back(ChildSite.SiteFuncId);
3391fcd610cSReid Kleckner     collectInlineSiteChildren(Children, FI, ChildSite);
3401fcd610cSReid Kleckner   }
3411fcd610cSReid Kleckner }
3421fcd610cSReid Kleckner 
343f3b9ba49SReid Kleckner void CodeViewDebug::emitInlinedCallSite(const FunctionInfo &FI,
344f3b9ba49SReid Kleckner                                         const DILocation *InlinedAt,
345f3b9ba49SReid Kleckner                                         const InlineSite &Site) {
346f9c275feSReid Kleckner   MCSymbol *InlineBegin = MMI->getContext().createTempSymbol(),
347f9c275feSReid Kleckner            *InlineEnd = MMI->getContext().createTempSymbol();
348f3b9ba49SReid Kleckner 
349fbd7787dSReid Kleckner   assert(SubprogramIndices.count(Site.Inlinee));
350fbd7787dSReid Kleckner   unsigned InlineeIdx = FuncIdTypeIndexStart + SubprogramIndices[Site.Inlinee];
351f3b9ba49SReid Kleckner 
352f3b9ba49SReid Kleckner   // SymbolRecord
353dac21b43SReid Kleckner   OS.AddComment("Record length");
354eb3bcdd2SReid Kleckner   OS.emitAbsoluteSymbolDiff(InlineEnd, InlineBegin, 2);   // RecordLength
355f3b9ba49SReid Kleckner   OS.EmitLabel(InlineBegin);
356dac21b43SReid Kleckner   OS.AddComment("Record kind: S_INLINESITE");
35763a2846eSZachary Turner   OS.EmitIntValue(SymbolKind::S_INLINESITE, 2); // RecordKind
358f3b9ba49SReid Kleckner 
359dac21b43SReid Kleckner   OS.AddComment("PtrParent");
360dac21b43SReid Kleckner   OS.EmitIntValue(0, 4);
361dac21b43SReid Kleckner   OS.AddComment("PtrEnd");
362dac21b43SReid Kleckner   OS.EmitIntValue(0, 4);
363dac21b43SReid Kleckner   OS.AddComment("Inlinee type index");
364fbd7787dSReid Kleckner   OS.EmitIntValue(InlineeIdx, 4);
365f3b9ba49SReid Kleckner 
3661fcd610cSReid Kleckner   unsigned FileId = maybeRecordFile(Site.Inlinee->getFile());
3671fcd610cSReid Kleckner   unsigned StartLineNum = Site.Inlinee->getLine();
3681fcd610cSReid Kleckner   SmallVector<unsigned, 3> SecondaryFuncIds;
3691fcd610cSReid Kleckner   collectInlineSiteChildren(SecondaryFuncIds, FI, Site);
3701fcd610cSReid Kleckner 
3711fcd610cSReid Kleckner   OS.EmitCVInlineLinetableDirective(Site.SiteFuncId, FileId, StartLineNum,
372c9911f28SDavid Majnemer                                     FI.Begin, FI.End, SecondaryFuncIds);
373f3b9ba49SReid Kleckner 
374f3b9ba49SReid Kleckner   OS.EmitLabel(InlineEnd);
375f3b9ba49SReid Kleckner 
376f9c275feSReid Kleckner   for (const LocalVariable &Var : Site.InlinedLocals)
377f9c275feSReid Kleckner     emitLocalVariable(Var);
378f9c275feSReid Kleckner 
379f3b9ba49SReid Kleckner   // Recurse on child inlined call sites before closing the scope.
380f3b9ba49SReid Kleckner   for (const DILocation *ChildSite : Site.ChildSites) {
381f3b9ba49SReid Kleckner     auto I = FI.InlineSites.find(ChildSite);
382f3b9ba49SReid Kleckner     assert(I != FI.InlineSites.end() &&
383f3b9ba49SReid Kleckner            "child site not in function inline site map");
384f3b9ba49SReid Kleckner     emitInlinedCallSite(FI, ChildSite, I->second);
385f3b9ba49SReid Kleckner   }
386f3b9ba49SReid Kleckner 
387f3b9ba49SReid Kleckner   // Close the scope.
388dac21b43SReid Kleckner   OS.AddComment("Record length");
389dac21b43SReid Kleckner   OS.EmitIntValue(2, 2);                                  // RecordLength
390dac21b43SReid Kleckner   OS.AddComment("Record kind: S_INLINESITE_END");
39163a2846eSZachary Turner   OS.EmitIntValue(SymbolKind::S_INLINESITE_END, 2); // RecordKind
392f3b9ba49SReid Kleckner }
393f3b9ba49SReid Kleckner 
3942214ed89SReid Kleckner void CodeViewDebug::emitDebugInfoForFunction(const Function *GV,
3952214ed89SReid Kleckner                                              FunctionInfo &FI) {
39670f5bc99SReid Kleckner   // For each function there is a separate subsection
39770f5bc99SReid Kleckner   // which holds the PC to file:line table.
39870f5bc99SReid Kleckner   const MCSymbol *Fn = Asm->getSymbol(GV);
39970f5bc99SReid Kleckner   assert(Fn);
40070f5bc99SReid Kleckner 
40170f5bc99SReid Kleckner   StringRef FuncName;
402adebb937SPete Cooper   if (auto *SP = GV->getSubprogram())
40370f5bc99SReid Kleckner     FuncName = SP->getDisplayName();
40470f5bc99SReid Kleckner 
40570f5bc99SReid Kleckner   // If our DISubprogram name is empty, use the mangled name.
40670f5bc99SReid Kleckner   if (FuncName.empty())
40770f5bc99SReid Kleckner     FuncName = GlobalValue::getRealLinkageName(GV->getName());
40870f5bc99SReid Kleckner 
40970f5bc99SReid Kleckner   // Emit a symbol subsection, required by VS2012+ to find function boundaries.
410f9c275feSReid Kleckner   MCSymbol *SymbolsBegin = MMI->getContext().createTempSymbol(),
411f9c275feSReid Kleckner            *SymbolsEnd = MMI->getContext().createTempSymbol();
412dac21b43SReid Kleckner   OS.AddComment("Symbol subsection for " + Twine(FuncName));
413dac21b43SReid Kleckner   OS.EmitIntValue(unsigned(ModuleSubstreamKind::Symbols), 4);
414dac21b43SReid Kleckner   OS.AddComment("Subsection size");
415eb3bcdd2SReid Kleckner   OS.emitAbsoluteSymbolDiff(SymbolsEnd, SymbolsBegin, 4);
416dac21b43SReid Kleckner   OS.EmitLabel(SymbolsBegin);
41770f5bc99SReid Kleckner   {
418f9c275feSReid Kleckner     MCSymbol *ProcRecordBegin = MMI->getContext().createTempSymbol(),
419f9c275feSReid Kleckner              *ProcRecordEnd = MMI->getContext().createTempSymbol();
420dac21b43SReid Kleckner     OS.AddComment("Record length");
421eb3bcdd2SReid Kleckner     OS.emitAbsoluteSymbolDiff(ProcRecordEnd, ProcRecordBegin, 2);
422dac21b43SReid Kleckner     OS.EmitLabel(ProcRecordBegin);
42370f5bc99SReid Kleckner 
424dac21b43SReid Kleckner     OS.AddComment("Record kind: S_GPROC32_ID");
42563a2846eSZachary Turner     OS.EmitIntValue(unsigned(SymbolKind::S_GPROC32_ID), 2);
42670f5bc99SReid Kleckner 
42730579ec8SDavid Majnemer     // These fields are filled in by tools like CVPACK which run after the fact.
428dac21b43SReid Kleckner     OS.AddComment("PtrParent");
429dac21b43SReid Kleckner     OS.EmitIntValue(0, 4);
430dac21b43SReid Kleckner     OS.AddComment("PtrEnd");
431dac21b43SReid Kleckner     OS.EmitIntValue(0, 4);
432dac21b43SReid Kleckner     OS.AddComment("PtrNext");
433dac21b43SReid Kleckner     OS.EmitIntValue(0, 4);
43470f5bc99SReid Kleckner     // This is the important bit that tells the debugger where the function
43570f5bc99SReid Kleckner     // code is located and what's its size:
436dac21b43SReid Kleckner     OS.AddComment("Code size");
437eb3bcdd2SReid Kleckner     OS.emitAbsoluteSymbolDiff(FI.End, Fn, 4);
438dac21b43SReid Kleckner     OS.AddComment("Offset after prologue");
439dac21b43SReid Kleckner     OS.EmitIntValue(0, 4);
440dac21b43SReid Kleckner     OS.AddComment("Offset before epilogue");
441dac21b43SReid Kleckner     OS.EmitIntValue(0, 4);
442dac21b43SReid Kleckner     OS.AddComment("Function type index");
443dac21b43SReid Kleckner     OS.EmitIntValue(0, 4);
444dac21b43SReid Kleckner     OS.AddComment("Function section relative address");
445dac21b43SReid Kleckner     OS.EmitCOFFSecRel32(Fn);
446dac21b43SReid Kleckner     OS.AddComment("Function section index");
447dac21b43SReid Kleckner     OS.EmitCOFFSectionIndex(Fn);
448dac21b43SReid Kleckner     OS.AddComment("Flags");
449dac21b43SReid Kleckner     OS.EmitIntValue(0, 1);
45070f5bc99SReid Kleckner     // Emit the function display name as a null-terminated string.
451dac21b43SReid Kleckner     OS.AddComment("Function name");
4521256125fSDavid Majnemer     // Truncate the name so we won't overflow the record length field.
453b9456a5eSDavid Majnemer     emitNullTerminatedSymbolName(OS, FuncName);
454dac21b43SReid Kleckner     OS.EmitLabel(ProcRecordEnd);
45570f5bc99SReid Kleckner 
456f9c275feSReid Kleckner     for (const LocalVariable &Var : FI.Locals)
457f9c275feSReid Kleckner       emitLocalVariable(Var);
458f9c275feSReid Kleckner 
459f3b9ba49SReid Kleckner     // Emit inlined call site information. Only emit functions inlined directly
460f3b9ba49SReid Kleckner     // into the parent function. We'll emit the other sites recursively as part
461f3b9ba49SReid Kleckner     // of their parent inline site.
462f9c275feSReid Kleckner     for (const DILocation *InlinedAt : FI.ChildSites) {
463f9c275feSReid Kleckner       auto I = FI.InlineSites.find(InlinedAt);
464f9c275feSReid Kleckner       assert(I != FI.InlineSites.end() &&
465f9c275feSReid Kleckner              "child site not in function inline site map");
466f9c275feSReid Kleckner       emitInlinedCallSite(FI, InlinedAt, I->second);
467f3b9ba49SReid Kleckner     }
468f3b9ba49SReid Kleckner 
46970f5bc99SReid Kleckner     // We're done with this function.
470dac21b43SReid Kleckner     OS.AddComment("Record length");
471dac21b43SReid Kleckner     OS.EmitIntValue(0x0002, 2);
472dac21b43SReid Kleckner     OS.AddComment("Record kind: S_PROC_ID_END");
47363a2846eSZachary Turner     OS.EmitIntValue(unsigned(SymbolKind::S_PROC_ID_END), 2);
47470f5bc99SReid Kleckner   }
475dac21b43SReid Kleckner   OS.EmitLabel(SymbolsEnd);
47670f5bc99SReid Kleckner   // Every subsection must be aligned to a 4-byte boundary.
477dac21b43SReid Kleckner   OS.EmitValueToAlignment(4);
47870f5bc99SReid Kleckner 
4792214ed89SReid Kleckner   // We have an assembler directive that takes care of the whole line table.
480dac21b43SReid Kleckner   OS.EmitCVLinetableDirective(FI.FuncId, Fn, FI.End);
48170f5bc99SReid Kleckner }
48270f5bc99SReid Kleckner 
483876330d5SReid Kleckner CodeViewDebug::LocalVarDefRange
484876330d5SReid Kleckner CodeViewDebug::createDefRangeMem(uint16_t CVRegister, int Offset) {
485876330d5SReid Kleckner   LocalVarDefRange DR;
486c6a2f214SAaron Ballman   DR.InMemory = -1;
487876330d5SReid Kleckner   DR.DataOffset = Offset;
488876330d5SReid Kleckner   assert(DR.DataOffset == Offset && "truncation");
489876330d5SReid Kleckner   DR.StructOffset = 0;
490876330d5SReid Kleckner   DR.CVRegister = CVRegister;
491876330d5SReid Kleckner   return DR;
492876330d5SReid Kleckner }
493876330d5SReid Kleckner 
494876330d5SReid Kleckner CodeViewDebug::LocalVarDefRange
495876330d5SReid Kleckner CodeViewDebug::createDefRangeReg(uint16_t CVRegister) {
496876330d5SReid Kleckner   LocalVarDefRange DR;
497876330d5SReid Kleckner   DR.InMemory = 0;
498876330d5SReid Kleckner   DR.DataOffset = 0;
499876330d5SReid Kleckner   DR.StructOffset = 0;
500876330d5SReid Kleckner   DR.CVRegister = CVRegister;
501876330d5SReid Kleckner   return DR;
502876330d5SReid Kleckner }
503876330d5SReid Kleckner 
504876330d5SReid Kleckner void CodeViewDebug::collectVariableInfoFromMMITable(
505876330d5SReid Kleckner     DenseSet<InlinedVariable> &Processed) {
506876330d5SReid Kleckner   const TargetSubtargetInfo &TSI = Asm->MF->getSubtarget();
507876330d5SReid Kleckner   const TargetFrameLowering *TFI = TSI.getFrameLowering();
508876330d5SReid Kleckner   const TargetRegisterInfo *TRI = TSI.getRegisterInfo();
509876330d5SReid Kleckner 
510876330d5SReid Kleckner   for (const MachineModuleInfo::VariableDbgInfo &VI :
511876330d5SReid Kleckner        MMI->getVariableDbgInfo()) {
512f9c275feSReid Kleckner     if (!VI.Var)
513f9c275feSReid Kleckner       continue;
514f9c275feSReid Kleckner     assert(VI.Var->isValidLocationForIntrinsic(VI.Loc) &&
515f9c275feSReid Kleckner            "Expected inlined-at fields to agree");
516f9c275feSReid Kleckner 
517876330d5SReid Kleckner     Processed.insert(InlinedVariable(VI.Var, VI.Loc->getInlinedAt()));
518f9c275feSReid Kleckner     LexicalScope *Scope = LScopes.findLexicalScope(VI.Loc);
519f9c275feSReid Kleckner 
520f9c275feSReid Kleckner     // If variable scope is not found then skip this variable.
521f9c275feSReid Kleckner     if (!Scope)
522f9c275feSReid Kleckner       continue;
523f9c275feSReid Kleckner 
524f9c275feSReid Kleckner     // Get the frame register used and the offset.
525f9c275feSReid Kleckner     unsigned FrameReg = 0;
526876330d5SReid Kleckner     int FrameOffset = TFI->getFrameIndexReference(*Asm->MF, VI.Slot, FrameReg);
527876330d5SReid Kleckner     uint16_t CVReg = TRI->getCodeViewRegNum(FrameReg);
528f9c275feSReid Kleckner 
529f9c275feSReid Kleckner     // Calculate the label ranges.
530876330d5SReid Kleckner     LocalVarDefRange DefRange = createDefRangeMem(CVReg, FrameOffset);
531f9c275feSReid Kleckner     for (const InsnRange &Range : Scope->getRanges()) {
532f9c275feSReid Kleckner       const MCSymbol *Begin = getLabelBeforeInsn(Range.first);
533f9c275feSReid Kleckner       const MCSymbol *End = getLabelAfterInsn(Range.second);
534876330d5SReid Kleckner       End = End ? End : Asm->getFunctionEnd();
535876330d5SReid Kleckner       DefRange.Ranges.emplace_back(Begin, End);
536f9c275feSReid Kleckner     }
537f9c275feSReid Kleckner 
538876330d5SReid Kleckner     LocalVariable Var;
539876330d5SReid Kleckner     Var.DIVar = VI.Var;
540876330d5SReid Kleckner     Var.DefRanges.emplace_back(std::move(DefRange));
541876330d5SReid Kleckner     recordLocalVariable(std::move(Var), VI.Loc->getInlinedAt());
542f9c275feSReid Kleckner   }
543f9c275feSReid Kleckner }
544876330d5SReid Kleckner 
545876330d5SReid Kleckner void CodeViewDebug::collectVariableInfo(const DISubprogram *SP) {
546876330d5SReid Kleckner   DenseSet<InlinedVariable> Processed;
547876330d5SReid Kleckner   // Grab the variable info that was squirreled away in the MMI side-table.
548876330d5SReid Kleckner   collectVariableInfoFromMMITable(Processed);
549876330d5SReid Kleckner 
550876330d5SReid Kleckner   const TargetRegisterInfo *TRI = Asm->MF->getSubtarget().getRegisterInfo();
551876330d5SReid Kleckner 
552876330d5SReid Kleckner   for (const auto &I : DbgValues) {
553876330d5SReid Kleckner     InlinedVariable IV = I.first;
554876330d5SReid Kleckner     if (Processed.count(IV))
555876330d5SReid Kleckner       continue;
556876330d5SReid Kleckner     const DILocalVariable *DIVar = IV.first;
557876330d5SReid Kleckner     const DILocation *InlinedAt = IV.second;
558876330d5SReid Kleckner 
559876330d5SReid Kleckner     // Instruction ranges, specifying where IV is accessible.
560876330d5SReid Kleckner     const auto &Ranges = I.second;
561876330d5SReid Kleckner 
562876330d5SReid Kleckner     LexicalScope *Scope = nullptr;
563876330d5SReid Kleckner     if (InlinedAt)
564876330d5SReid Kleckner       Scope = LScopes.findInlinedScope(DIVar->getScope(), InlinedAt);
565876330d5SReid Kleckner     else
566876330d5SReid Kleckner       Scope = LScopes.findLexicalScope(DIVar->getScope());
567876330d5SReid Kleckner     // If variable scope is not found then skip this variable.
568876330d5SReid Kleckner     if (!Scope)
569876330d5SReid Kleckner       continue;
570876330d5SReid Kleckner 
571876330d5SReid Kleckner     LocalVariable Var;
572876330d5SReid Kleckner     Var.DIVar = DIVar;
573876330d5SReid Kleckner 
574876330d5SReid Kleckner     // Calculate the definition ranges.
575876330d5SReid Kleckner     for (auto I = Ranges.begin(), E = Ranges.end(); I != E; ++I) {
576876330d5SReid Kleckner       const InsnRange &Range = *I;
577876330d5SReid Kleckner       const MachineInstr *DVInst = Range.first;
578876330d5SReid Kleckner       assert(DVInst->isDebugValue() && "Invalid History entry");
579876330d5SReid Kleckner       const DIExpression *DIExpr = DVInst->getDebugExpression();
580876330d5SReid Kleckner 
581876330d5SReid Kleckner       // Bail if there is a complex DWARF expression for now.
582876330d5SReid Kleckner       if (DIExpr && DIExpr->getNumElements() > 0)
583876330d5SReid Kleckner         continue;
584876330d5SReid Kleckner 
5859a593ee7SReid Kleckner       // Bail if operand 0 is not a valid register. This means the variable is a
5869a593ee7SReid Kleckner       // simple constant, or is described by a complex expression.
5879a593ee7SReid Kleckner       // FIXME: Find a way to represent constant variables, since they are
5889a593ee7SReid Kleckner       // relatively common.
5899a593ee7SReid Kleckner       unsigned Reg =
5909a593ee7SReid Kleckner           DVInst->getOperand(0).isReg() ? DVInst->getOperand(0).getReg() : 0;
5919a593ee7SReid Kleckner       if (Reg == 0)
5926e0d5f57SReid Kleckner         continue;
5936e0d5f57SReid Kleckner 
594876330d5SReid Kleckner       // Handle the two cases we can handle: indirect in memory and in register.
595876330d5SReid Kleckner       bool IsIndirect = DVInst->getOperand(1).isImm();
596876330d5SReid Kleckner       unsigned CVReg = TRI->getCodeViewRegNum(DVInst->getOperand(0).getReg());
597876330d5SReid Kleckner       {
598876330d5SReid Kleckner         LocalVarDefRange DefRange;
599876330d5SReid Kleckner         if (IsIndirect) {
600876330d5SReid Kleckner           int64_t Offset = DVInst->getOperand(1).getImm();
601876330d5SReid Kleckner           DefRange = createDefRangeMem(CVReg, Offset);
602876330d5SReid Kleckner         } else {
603876330d5SReid Kleckner           DefRange = createDefRangeReg(CVReg);
604876330d5SReid Kleckner         }
605876330d5SReid Kleckner         if (Var.DefRanges.empty() ||
606876330d5SReid Kleckner             Var.DefRanges.back().isDifferentLocation(DefRange)) {
607876330d5SReid Kleckner           Var.DefRanges.emplace_back(std::move(DefRange));
608876330d5SReid Kleckner         }
609876330d5SReid Kleckner       }
610876330d5SReid Kleckner 
611876330d5SReid Kleckner       // Compute the label range.
612876330d5SReid Kleckner       const MCSymbol *Begin = getLabelBeforeInsn(Range.first);
613876330d5SReid Kleckner       const MCSymbol *End = getLabelAfterInsn(Range.second);
614876330d5SReid Kleckner       if (!End) {
615876330d5SReid Kleckner         if (std::next(I) != E)
616876330d5SReid Kleckner           End = getLabelBeforeInsn(std::next(I)->first);
617876330d5SReid Kleckner         else
618876330d5SReid Kleckner           End = Asm->getFunctionEnd();
619876330d5SReid Kleckner       }
620876330d5SReid Kleckner 
621876330d5SReid Kleckner       // If the last range end is our begin, just extend the last range.
622876330d5SReid Kleckner       // Otherwise make a new range.
623876330d5SReid Kleckner       SmallVectorImpl<std::pair<const MCSymbol *, const MCSymbol *>> &Ranges =
624876330d5SReid Kleckner           Var.DefRanges.back().Ranges;
625876330d5SReid Kleckner       if (!Ranges.empty() && Ranges.back().second == Begin)
626876330d5SReid Kleckner         Ranges.back().second = End;
627876330d5SReid Kleckner       else
628876330d5SReid Kleckner         Ranges.emplace_back(Begin, End);
629876330d5SReid Kleckner 
630876330d5SReid Kleckner       // FIXME: Do more range combining.
631876330d5SReid Kleckner     }
632876330d5SReid Kleckner 
633876330d5SReid Kleckner     recordLocalVariable(std::move(Var), InlinedAt);
634876330d5SReid Kleckner   }
635f9c275feSReid Kleckner }
636f9c275feSReid Kleckner 
63770f5bc99SReid Kleckner void CodeViewDebug::beginFunction(const MachineFunction *MF) {
63870f5bc99SReid Kleckner   assert(!CurFn && "Can't process two functions at once!");
63970f5bc99SReid Kleckner 
640f9c275feSReid Kleckner   if (!Asm || !MMI->hasDebugInfo())
64170f5bc99SReid Kleckner     return;
64270f5bc99SReid Kleckner 
643f9c275feSReid Kleckner   DebugHandlerBase::beginFunction(MF);
644f9c275feSReid Kleckner 
64570f5bc99SReid Kleckner   const Function *GV = MF->getFunction();
64670f5bc99SReid Kleckner   assert(FnDebugInfo.count(GV) == false);
64770f5bc99SReid Kleckner   CurFn = &FnDebugInfo[GV];
6482214ed89SReid Kleckner   CurFn->FuncId = NextFuncId++;
6491fcd610cSReid Kleckner   CurFn->Begin = Asm->getFunctionBegin();
65070f5bc99SReid Kleckner 
651f9c275feSReid Kleckner   // Find the end of the function prolog.  First known non-DBG_VALUE and
652f9c275feSReid Kleckner   // non-frame setup location marks the beginning of the function body.
65370f5bc99SReid Kleckner   // FIXME: is there a simpler a way to do this? Can we just search
65470f5bc99SReid Kleckner   // for the first instruction of the function, not the last of the prolog?
65570f5bc99SReid Kleckner   DebugLoc PrologEndLoc;
65670f5bc99SReid Kleckner   bool EmptyPrologue = true;
65770f5bc99SReid Kleckner   for (const auto &MBB : *MF) {
65870f5bc99SReid Kleckner     for (const auto &MI : MBB) {
659f9c275feSReid Kleckner       if (!MI.isDebugValue() && !MI.getFlag(MachineInstr::FrameSetup) &&
660f9c275feSReid Kleckner           MI.getDebugLoc()) {
66170f5bc99SReid Kleckner         PrologEndLoc = MI.getDebugLoc();
66270f5bc99SReid Kleckner         break;
663f9c275feSReid Kleckner       } else if (!MI.isDebugValue()) {
66470f5bc99SReid Kleckner         EmptyPrologue = false;
66570f5bc99SReid Kleckner       }
66670f5bc99SReid Kleckner     }
667f9c275feSReid Kleckner   }
668f9c275feSReid Kleckner 
66970f5bc99SReid Kleckner   // Record beginning of function if we have a non-empty prologue.
67070f5bc99SReid Kleckner   if (PrologEndLoc && !EmptyPrologue) {
67170f5bc99SReid Kleckner     DebugLoc FnStartDL = PrologEndLoc.getFnDebugLoc();
67270f5bc99SReid Kleckner     maybeRecordLocation(FnStartDL, MF);
67370f5bc99SReid Kleckner   }
67470f5bc99SReid Kleckner }
67570f5bc99SReid Kleckner 
676f9c275feSReid Kleckner void CodeViewDebug::emitLocalVariable(const LocalVariable &Var) {
677f9c275feSReid Kleckner   // LocalSym record, see SymbolRecord.h for more info.
678f9c275feSReid Kleckner   MCSymbol *LocalBegin = MMI->getContext().createTempSymbol(),
679f9c275feSReid Kleckner            *LocalEnd = MMI->getContext().createTempSymbol();
680f9c275feSReid Kleckner   OS.AddComment("Record length");
681f9c275feSReid Kleckner   OS.emitAbsoluteSymbolDiff(LocalEnd, LocalBegin, 2);
682f9c275feSReid Kleckner   OS.EmitLabel(LocalBegin);
683f9c275feSReid Kleckner 
684f9c275feSReid Kleckner   OS.AddComment("Record kind: S_LOCAL");
68563a2846eSZachary Turner   OS.EmitIntValue(unsigned(SymbolKind::S_LOCAL), 2);
686f9c275feSReid Kleckner 
68763a2846eSZachary Turner   LocalSymFlags Flags = LocalSymFlags::None;
688f9c275feSReid Kleckner   if (Var.DIVar->isParameter())
68963a2846eSZachary Turner     Flags |= LocalSymFlags::IsParameter;
690876330d5SReid Kleckner   if (Var.DefRanges.empty())
69163a2846eSZachary Turner     Flags |= LocalSymFlags::IsOptimizedOut;
692f9c275feSReid Kleckner 
693f9c275feSReid Kleckner   OS.AddComment("TypeIndex");
694f9c275feSReid Kleckner   OS.EmitIntValue(TypeIndex::Int32().getIndex(), 4);
695f9c275feSReid Kleckner   OS.AddComment("Flags");
69663a2846eSZachary Turner   OS.EmitIntValue(static_cast<uint16_t>(Flags), 2);
6971256125fSDavid Majnemer   // Truncate the name so we won't overflow the record length field.
698b9456a5eSDavid Majnemer   emitNullTerminatedSymbolName(OS, Var.DIVar->getName());
699f9c275feSReid Kleckner   OS.EmitLabel(LocalEnd);
700f9c275feSReid Kleckner 
701876330d5SReid Kleckner   // Calculate the on disk prefix of the appropriate def range record. The
702876330d5SReid Kleckner   // records and on disk formats are described in SymbolRecords.h. BytePrefix
703876330d5SReid Kleckner   // should be big enough to hold all forms without memory allocation.
704876330d5SReid Kleckner   SmallString<20> BytePrefix;
705876330d5SReid Kleckner   for (const LocalVarDefRange &DefRange : Var.DefRanges) {
706876330d5SReid Kleckner     BytePrefix.clear();
707876330d5SReid Kleckner     // FIXME: Handle bitpieces.
708876330d5SReid Kleckner     if (DefRange.StructOffset != 0)
709876330d5SReid Kleckner       continue;
710876330d5SReid Kleckner 
711876330d5SReid Kleckner     if (DefRange.InMemory) {
712f9c275feSReid Kleckner       DefRangeRegisterRelSym Sym{};
713f9c275feSReid Kleckner       ulittle16_t SymKind = ulittle16_t(S_DEFRANGE_REGISTER_REL);
714876330d5SReid Kleckner       Sym.BaseRegister = DefRange.CVRegister;
715f9c275feSReid Kleckner       Sym.Flags = 0; // Unclear what matters here.
716876330d5SReid Kleckner       Sym.BasePointerOffset = DefRange.DataOffset;
717876330d5SReid Kleckner       BytePrefix +=
718876330d5SReid Kleckner           StringRef(reinterpret_cast<const char *>(&SymKind), sizeof(SymKind));
719f9c275feSReid Kleckner       BytePrefix += StringRef(reinterpret_cast<const char *>(&Sym),
720f9c275feSReid Kleckner                               sizeof(Sym) - sizeof(LocalVariableAddrRange));
721876330d5SReid Kleckner     } else {
722876330d5SReid Kleckner       assert(DefRange.DataOffset == 0 && "unexpected offset into register");
723876330d5SReid Kleckner       DefRangeRegisterSym Sym{};
724876330d5SReid Kleckner       ulittle16_t SymKind = ulittle16_t(S_DEFRANGE_REGISTER);
725876330d5SReid Kleckner       Sym.Register = DefRange.CVRegister;
726876330d5SReid Kleckner       Sym.MayHaveNoName = 0; // Unclear what matters here.
727876330d5SReid Kleckner       BytePrefix +=
728876330d5SReid Kleckner           StringRef(reinterpret_cast<const char *>(&SymKind), sizeof(SymKind));
729876330d5SReid Kleckner       BytePrefix += StringRef(reinterpret_cast<const char *>(&Sym),
730876330d5SReid Kleckner                               sizeof(Sym) - sizeof(LocalVariableAddrRange));
731876330d5SReid Kleckner     }
732876330d5SReid Kleckner     OS.EmitCVDefRangeDirective(DefRange.Ranges, BytePrefix);
733876330d5SReid Kleckner   }
734f9c275feSReid Kleckner }
735f9c275feSReid Kleckner 
73670f5bc99SReid Kleckner void CodeViewDebug::endFunction(const MachineFunction *MF) {
73770f5bc99SReid Kleckner   if (!Asm || !CurFn)  // We haven't created any debug info for this function.
73870f5bc99SReid Kleckner     return;
73970f5bc99SReid Kleckner 
74070f5bc99SReid Kleckner   const Function *GV = MF->getFunction();
74170f5bc99SReid Kleckner   assert(FnDebugInfo.count(GV));
74270f5bc99SReid Kleckner   assert(CurFn == &FnDebugInfo[GV]);
74370f5bc99SReid Kleckner 
744adebb937SPete Cooper   collectVariableInfo(GV->getSubprogram());
745876330d5SReid Kleckner 
746876330d5SReid Kleckner   DebugHandlerBase::endFunction(MF);
747876330d5SReid Kleckner 
7482214ed89SReid Kleckner   // Don't emit anything if we don't have any line tables.
7492214ed89SReid Kleckner   if (!CurFn->HaveLineInfo) {
75070f5bc99SReid Kleckner     FnDebugInfo.erase(GV);
751f9c275feSReid Kleckner     CurFn = nullptr;
752f9c275feSReid Kleckner     return;
75370f5bc99SReid Kleckner   }
754f9c275feSReid Kleckner 
755f9c275feSReid Kleckner   CurFn->End = Asm->getFunctionEnd();
756f9c275feSReid Kleckner 
75770f5bc99SReid Kleckner   CurFn = nullptr;
75870f5bc99SReid Kleckner }
75970f5bc99SReid Kleckner 
76070f5bc99SReid Kleckner void CodeViewDebug::beginInstruction(const MachineInstr *MI) {
761f9c275feSReid Kleckner   DebugHandlerBase::beginInstruction(MI);
762f9c275feSReid Kleckner 
76370f5bc99SReid Kleckner   // Ignore DBG_VALUE locations and function prologue.
76470f5bc99SReid Kleckner   if (!Asm || MI->isDebugValue() || MI->getFlag(MachineInstr::FrameSetup))
76570f5bc99SReid Kleckner     return;
76670f5bc99SReid Kleckner   DebugLoc DL = MI->getDebugLoc();
76770f5bc99SReid Kleckner   if (DL == PrevInstLoc || !DL)
76870f5bc99SReid Kleckner     return;
76970f5bc99SReid Kleckner   maybeRecordLocation(DL, Asm->MF);
77070f5bc99SReid Kleckner }
771