1cffff26bSZachary Turner //===- DIASession.cpp - DIA implementation of IPDBSession -------*- C++ -*-===//
2cffff26bSZachary Turner //
3cffff26bSZachary Turner //                     The LLVM Compiler Infrastructure
4cffff26bSZachary Turner //
5cffff26bSZachary Turner // This file is distributed under the University of Illinois Open Source
6cffff26bSZachary Turner // License. See LICENSE.TXT for details.
7cffff26bSZachary Turner //
8cffff26bSZachary Turner //===----------------------------------------------------------------------===//
9*819e77d1SZachary Turner #include "llvm/DebugInfo/PDB/DIA/DIASession.h"
10be6d1e49SZachary Turner #include "llvm/ADT/STLExtras.h"
11cffff26bSZachary Turner #include "llvm/DebugInfo/PDB/DIA/DIAEnumDebugStreams.h"
124b08354bSZachary Turner #include "llvm/DebugInfo/PDB/DIA/DIAEnumLineNumbers.h"
13a5549178SZachary Turner #include "llvm/DebugInfo/PDB/DIA/DIAEnumSourceFiles.h"
14*819e77d1SZachary Turner #include "llvm/DebugInfo/PDB/DIA/DIAError.h"
15cffff26bSZachary Turner #include "llvm/DebugInfo/PDB/DIA/DIARawSymbol.h"
16cffff26bSZachary Turner #include "llvm/DebugInfo/PDB/DIA/DIASourceFile.h"
17*819e77d1SZachary Turner #include "llvm/DebugInfo/PDB/DIA/DIASupport.h"
18*819e77d1SZachary Turner #include "llvm/DebugInfo/PDB/GenericError.h"
19*819e77d1SZachary Turner #include "llvm/DebugInfo/PDB/PDB.h"
2071f308adSChandler Carruth #include "llvm/DebugInfo/PDB/PDBSymbolCompiland.h"
2171f308adSChandler Carruth #include "llvm/DebugInfo/PDB/PDBSymbolExe.h"
22cffff26bSZachary Turner #include "llvm/Support/ConvertUTF.h"
23cffff26bSZachary Turner 
24cffff26bSZachary Turner using namespace llvm;
25ec28fc34SZachary Turner using namespace llvm::pdb;
26cffff26bSZachary Turner 
2773853ab4SNico Weber namespace {
2873853ab4SNico Weber 
29*819e77d1SZachary Turner Error ErrorFromHResult(HRESULT Result) {
30*819e77d1SZachary Turner   switch (Result) {
31*819e77d1SZachary Turner   case E_PDB_NOT_FOUND:
32*819e77d1SZachary Turner     return make_error<GenericError>(generic_error_code::invalid_path);
33*819e77d1SZachary Turner   case E_PDB_FORMAT:
34*819e77d1SZachary Turner     return make_error<DIAError>(dia_error_code::invalid_file_format);
35*819e77d1SZachary Turner   case E_INVALIDARG:
36*819e77d1SZachary Turner     return make_error<DIAError>(dia_error_code::invalid_parameter);
37*819e77d1SZachary Turner   case E_UNEXPECTED:
38*819e77d1SZachary Turner     return make_error<DIAError>(dia_error_code::already_loaded);
39*819e77d1SZachary Turner   case E_PDB_INVALID_SIG:
40*819e77d1SZachary Turner   case E_PDB_INVALID_AGE:
41*819e77d1SZachary Turner     return make_error<DIAError>(dia_error_code::debug_info_mismatch);
42*819e77d1SZachary Turner   default:
43*819e77d1SZachary Turner     return make_error<DIAError>(dia_error_code::unspecified);
44*819e77d1SZachary Turner   }
45*819e77d1SZachary Turner }
46*819e77d1SZachary Turner 
47*819e77d1SZachary Turner Error LoadDIA(CComPtr<IDiaDataSource> &DiaDataSource) {
4873853ab4SNico Weber   if (SUCCEEDED(CoCreateInstance(CLSID_DiaSource, nullptr, CLSCTX_INPROC_SERVER,
4973853ab4SNico Weber                                  IID_IDiaDataSource,
5073853ab4SNico Weber                                  reinterpret_cast<LPVOID *>(&DiaDataSource))))
51*819e77d1SZachary Turner     return Error::success();
5273853ab4SNico Weber 
5373853ab4SNico Weber // If the CoCreateInstance call above failed, msdia*.dll is not registered.
5473853ab4SNico Weber // Try loading the DLL corresponding to the #included DIA SDK.
5573853ab4SNico Weber #if !defined(_MSC_VER)
56*819e77d1SZachary Turner   return llvm::make_error<GenericError>(
57*819e77d1SZachary Turner       "DIA is only supported when using MSVC.");
5823ee87bdSZachary Turner #endif
5923ee87bdSZachary Turner 
6073853ab4SNico Weber   const wchar_t *msdia_dll = nullptr;
6173853ab4SNico Weber #if _MSC_VER == 1900
6273853ab4SNico Weber   msdia_dll = L"msdia140.dll"; // VS2015
6373853ab4SNico Weber #elif _MSC_VER == 1800
6473853ab4SNico Weber   msdia_dll = L"msdia120.dll"; // VS2013
6573853ab4SNico Weber #else
6673853ab4SNico Weber #error "Unknown Visual Studio version."
6773853ab4SNico Weber #endif
6823ee87bdSZachary Turner 
69*819e77d1SZachary Turner   HRESULT HR;
70*819e77d1SZachary Turner   if (FAILED(HR = NoRegCoCreate(msdia_dll, CLSID_DiaSource, IID_IDiaDataSource,
7123ee87bdSZachary Turner                                 reinterpret_cast<LPVOID *>(&DiaDataSource))))
72*819e77d1SZachary Turner     return ErrorFromHResult(HR);
73*819e77d1SZachary Turner   return Error::success();
7473853ab4SNico Weber }
7573853ab4SNico Weber 
7673853ab4SNico Weber }
77cffff26bSZachary Turner 
78cffff26bSZachary Turner DIASession::DIASession(CComPtr<IDiaSession> DiaSession) : Session(DiaSession) {}
79cffff26bSZachary Turner 
80*819e77d1SZachary Turner Error DIASession::createFromPdb(StringRef Path,
81ccf04159SZachary Turner                                 std::unique_ptr<IPDBSession> &Session) {
82ccf04159SZachary Turner   CComPtr<IDiaDataSource> DiaDataSource;
83ccf04159SZachary Turner   CComPtr<IDiaSession> DiaSession;
84cffff26bSZachary Turner 
85cffff26bSZachary Turner   // We assume that CoInitializeEx has already been called by the executable.
86*819e77d1SZachary Turner   if (auto E = LoadDIA(DiaDataSource))
87*819e77d1SZachary Turner     return E;
88cffff26bSZachary Turner 
89cffff26bSZachary Turner   llvm::SmallVector<UTF16, 128> Path16;
90cffff26bSZachary Turner   if (!llvm::convertUTF8ToUTF16String(Path, Path16))
91*819e77d1SZachary Turner     return make_error<GenericError>(generic_error_code::invalid_path);
92cffff26bSZachary Turner 
93cffff26bSZachary Turner   const wchar_t *Path16Str = reinterpret_cast<const wchar_t*>(Path16.data());
94*819e77d1SZachary Turner   HRESULT HR;
95*819e77d1SZachary Turner   if (FAILED(HR = DiaDataSource->loadDataFromPdb(Path16Str)))
96*819e77d1SZachary Turner     return ErrorFromHResult(HR);
97cffff26bSZachary Turner 
98*819e77d1SZachary Turner   if (FAILED(HR = DiaDataSource->openSession(&DiaSession)))
99*819e77d1SZachary Turner     return ErrorFromHResult(HR);
100ccf04159SZachary Turner 
101ccf04159SZachary Turner   Session.reset(new DIASession(DiaSession));
102*819e77d1SZachary Turner   return Error::success();
103cffff26bSZachary Turner }
104cffff26bSZachary Turner 
105*819e77d1SZachary Turner Error DIASession::createFromExe(StringRef Path,
1064b08354bSZachary Turner                                 std::unique_ptr<IPDBSession> &Session) {
1074b08354bSZachary Turner   CComPtr<IDiaDataSource> DiaDataSource;
1084b08354bSZachary Turner   CComPtr<IDiaSession> DiaSession;
1094b08354bSZachary Turner 
1104b08354bSZachary Turner   // We assume that CoInitializeEx has already been called by the executable.
111*819e77d1SZachary Turner   if (auto EC = LoadDIA(DiaDataSource))
112*819e77d1SZachary Turner     return EC;
1134b08354bSZachary Turner 
1144b08354bSZachary Turner   llvm::SmallVector<UTF16, 128> Path16;
1154b08354bSZachary Turner   if (!llvm::convertUTF8ToUTF16String(Path, Path16))
116*819e77d1SZachary Turner     return make_error<GenericError>(generic_error_code::invalid_path, Path);
1174b08354bSZachary Turner 
1184b08354bSZachary Turner   const wchar_t *Path16Str = reinterpret_cast<const wchar_t *>(Path16.data());
119*819e77d1SZachary Turner   HRESULT HR;
120*819e77d1SZachary Turner   if (FAILED(HR = DiaDataSource->loadDataForExe(Path16Str, nullptr, nullptr)))
121*819e77d1SZachary Turner     return ErrorFromHResult(HR);
1224b08354bSZachary Turner 
123*819e77d1SZachary Turner   if (FAILED(HR = DiaDataSource->openSession(&DiaSession)))
124*819e77d1SZachary Turner     return ErrorFromHResult(HR);
1254b08354bSZachary Turner 
1264b08354bSZachary Turner   Session.reset(new DIASession(DiaSession));
127*819e77d1SZachary Turner   return Error::success();
1284b08354bSZachary Turner }
1294b08354bSZachary Turner 
130cffff26bSZachary Turner uint64_t DIASession::getLoadAddress() const {
131cffff26bSZachary Turner   uint64_t LoadAddress;
132cffff26bSZachary Turner   bool success = (S_OK == Session->get_loadAddress(&LoadAddress));
133cffff26bSZachary Turner   return (success) ? LoadAddress : 0;
134cffff26bSZachary Turner }
135cffff26bSZachary Turner 
136cffff26bSZachary Turner void DIASession::setLoadAddress(uint64_t Address) {
137cffff26bSZachary Turner   Session->put_loadAddress(Address);
138cffff26bSZachary Turner }
139cffff26bSZachary Turner 
140cffff26bSZachary Turner std::unique_ptr<PDBSymbolExe> DIASession::getGlobalScope() const {
141cffff26bSZachary Turner   CComPtr<IDiaSymbol> GlobalScope;
142cffff26bSZachary Turner   if (S_OK != Session->get_globalScope(&GlobalScope))
143cffff26bSZachary Turner     return nullptr;
144cffff26bSZachary Turner 
145be6d1e49SZachary Turner   auto RawSymbol = llvm::make_unique<DIARawSymbol>(*this, GlobalScope);
146cffff26bSZachary Turner   auto PdbSymbol(PDBSymbol::create(*this, std::move(RawSymbol)));
147cffff26bSZachary Turner   std::unique_ptr<PDBSymbolExe> ExeSymbol(
148cffff26bSZachary Turner       static_cast<PDBSymbolExe *>(PdbSymbol.release()));
149cffff26bSZachary Turner   return ExeSymbol;
150cffff26bSZachary Turner }
151cffff26bSZachary Turner 
152cffff26bSZachary Turner std::unique_ptr<PDBSymbol> DIASession::getSymbolById(uint32_t SymbolId) const {
153cffff26bSZachary Turner   CComPtr<IDiaSymbol> LocatedSymbol;
154cffff26bSZachary Turner   if (S_OK != Session->symbolById(SymbolId, &LocatedSymbol))
155cffff26bSZachary Turner     return nullptr;
156cffff26bSZachary Turner 
157be6d1e49SZachary Turner   auto RawSymbol = llvm::make_unique<DIARawSymbol>(*this, LocatedSymbol);
158cffff26bSZachary Turner   return PDBSymbol::create(*this, std::move(RawSymbol));
159cffff26bSZachary Turner }
160cffff26bSZachary Turner 
1614b08354bSZachary Turner std::unique_ptr<PDBSymbol>
162e5cb2693SZachary Turner DIASession::findSymbolByAddress(uint64_t Address, PDB_SymType Type) const {
163e5cb2693SZachary Turner   enum SymTagEnum EnumVal = static_cast<enum SymTagEnum>(Type);
164e5cb2693SZachary Turner 
1654b08354bSZachary Turner   CComPtr<IDiaSymbol> Symbol;
166e5cb2693SZachary Turner   if (S_OK != Session->findSymbolByVA(Address, EnumVal, &Symbol)) {
167e5cb2693SZachary Turner     ULONGLONG LoadAddr = 0;
168e5cb2693SZachary Turner     if (S_OK != Session->get_loadAddress(&LoadAddr))
1694b08354bSZachary Turner       return nullptr;
170e5cb2693SZachary Turner     DWORD RVA = static_cast<DWORD>(Address - LoadAddr);
171e5cb2693SZachary Turner     if (S_OK != Session->findSymbolByRVA(RVA, EnumVal, &Symbol))
172e5cb2693SZachary Turner       return nullptr;
173e5cb2693SZachary Turner   }
1744b08354bSZachary Turner   auto RawSymbol = llvm::make_unique<DIARawSymbol>(*this, Symbol);
1754b08354bSZachary Turner   return PDBSymbol::create(*this, std::move(RawSymbol));
1764b08354bSZachary Turner }
1774b08354bSZachary Turner 
1784b08354bSZachary Turner std::unique_ptr<IPDBEnumLineNumbers>
17943ec3af9SZachary Turner DIASession::findLineNumbers(const PDBSymbolCompiland &Compiland,
18043ec3af9SZachary Turner                             const IPDBSourceFile &File) const {
18143ec3af9SZachary Turner   const DIARawSymbol &RawCompiland =
18243ec3af9SZachary Turner       static_cast<const DIARawSymbol &>(Compiland.getRawSymbol());
18343ec3af9SZachary Turner   const DIASourceFile &RawFile = static_cast<const DIASourceFile &>(File);
18443ec3af9SZachary Turner 
18543ec3af9SZachary Turner   CComPtr<IDiaEnumLineNumbers> LineNumbers;
18643ec3af9SZachary Turner   if (S_OK !=
18743ec3af9SZachary Turner       Session->findLines(RawCompiland.getDiaSymbol(), RawFile.getDiaFile(),
18843ec3af9SZachary Turner                          &LineNumbers))
18943ec3af9SZachary Turner     return nullptr;
19043ec3af9SZachary Turner 
19143ec3af9SZachary Turner   return llvm::make_unique<DIAEnumLineNumbers>(LineNumbers);
19243ec3af9SZachary Turner }
19343ec3af9SZachary Turner 
19443ec3af9SZachary Turner std::unique_ptr<IPDBEnumLineNumbers>
1954b08354bSZachary Turner DIASession::findLineNumbersByAddress(uint64_t Address, uint32_t Length) const {
1964b08354bSZachary Turner   CComPtr<IDiaEnumLineNumbers> LineNumbers;
1974b08354bSZachary Turner   if (S_OK != Session->findLinesByVA(Address, Length, &LineNumbers))
1984b08354bSZachary Turner     return nullptr;
1994b08354bSZachary Turner 
2004b08354bSZachary Turner   return llvm::make_unique<DIAEnumLineNumbers>(LineNumbers);
2014b08354bSZachary Turner }
2024b08354bSZachary Turner 
20343ec3af9SZachary Turner std::unique_ptr<IPDBEnumSourceFiles>
20443ec3af9SZachary Turner DIASession::findSourceFiles(const PDBSymbolCompiland *Compiland,
20543ec3af9SZachary Turner                             llvm::StringRef Pattern,
20643ec3af9SZachary Turner                             PDB_NameSearchFlags Flags) const {
20743ec3af9SZachary Turner   IDiaSymbol *DiaCompiland = nullptr;
20843ec3af9SZachary Turner   CComBSTR Utf16Pattern;
20943ec3af9SZachary Turner   if (!Pattern.empty())
21043ec3af9SZachary Turner     Utf16Pattern = CComBSTR(Pattern.data());
21143ec3af9SZachary Turner 
21243ec3af9SZachary Turner   if (Compiland)
21343ec3af9SZachary Turner     DiaCompiland = static_cast<const DIARawSymbol &>(Compiland->getRawSymbol())
21443ec3af9SZachary Turner                        .getDiaSymbol();
21543ec3af9SZachary Turner 
21643ec3af9SZachary Turner   Flags = static_cast<PDB_NameSearchFlags>(
21743ec3af9SZachary Turner       Flags | PDB_NameSearchFlags::NS_FileNameExtMatch);
21843ec3af9SZachary Turner   CComPtr<IDiaEnumSourceFiles> SourceFiles;
21943ec3af9SZachary Turner   if (S_OK !=
22043ec3af9SZachary Turner       Session->findFile(DiaCompiland, Utf16Pattern.m_str, Flags, &SourceFiles))
22143ec3af9SZachary Turner     return nullptr;
22243ec3af9SZachary Turner   return llvm::make_unique<DIAEnumSourceFiles>(*this, SourceFiles);
22343ec3af9SZachary Turner }
22443ec3af9SZachary Turner 
22543ec3af9SZachary Turner std::unique_ptr<IPDBSourceFile>
22643ec3af9SZachary Turner DIASession::findOneSourceFile(const PDBSymbolCompiland *Compiland,
22743ec3af9SZachary Turner                               llvm::StringRef Pattern,
22843ec3af9SZachary Turner                               PDB_NameSearchFlags Flags) const {
22943ec3af9SZachary Turner   auto SourceFiles = findSourceFiles(Compiland, Pattern, Flags);
23043ec3af9SZachary Turner   if (!SourceFiles || SourceFiles->getChildCount() == 0)
23143ec3af9SZachary Turner     return nullptr;
23243ec3af9SZachary Turner   return SourceFiles->getNext();
23343ec3af9SZachary Turner }
23443ec3af9SZachary Turner 
23543ec3af9SZachary Turner std::unique_ptr<IPDBEnumChildren<PDBSymbolCompiland>>
23643ec3af9SZachary Turner DIASession::findCompilandsForSourceFile(llvm::StringRef Pattern,
23743ec3af9SZachary Turner                                         PDB_NameSearchFlags Flags) const {
23843ec3af9SZachary Turner   auto File = findOneSourceFile(nullptr, Pattern, Flags);
23943ec3af9SZachary Turner   if (!File)
24043ec3af9SZachary Turner     return nullptr;
24143ec3af9SZachary Turner   return File->getCompilands();
24243ec3af9SZachary Turner }
24343ec3af9SZachary Turner 
24443ec3af9SZachary Turner std::unique_ptr<PDBSymbolCompiland>
24543ec3af9SZachary Turner DIASession::findOneCompilandForSourceFile(llvm::StringRef Pattern,
24643ec3af9SZachary Turner                                           PDB_NameSearchFlags Flags) const {
24743ec3af9SZachary Turner   auto Compilands = findCompilandsForSourceFile(Pattern, Flags);
24843ec3af9SZachary Turner   if (!Compilands || Compilands->getChildCount() == 0)
24943ec3af9SZachary Turner     return nullptr;
25043ec3af9SZachary Turner   return Compilands->getNext();
25143ec3af9SZachary Turner }
25243ec3af9SZachary Turner 
253a5549178SZachary Turner std::unique_ptr<IPDBEnumSourceFiles> DIASession::getAllSourceFiles() const {
254a5549178SZachary Turner   CComPtr<IDiaEnumSourceFiles> Files;
255a5549178SZachary Turner   if (S_OK != Session->findFile(nullptr, nullptr, nsNone, &Files))
256a5549178SZachary Turner     return nullptr;
257a5549178SZachary Turner 
258be6d1e49SZachary Turner   return llvm::make_unique<DIAEnumSourceFiles>(*this, Files);
259a5549178SZachary Turner }
260a5549178SZachary Turner 
261a5549178SZachary Turner std::unique_ptr<IPDBEnumSourceFiles> DIASession::getSourceFilesForCompiland(
262a5549178SZachary Turner     const PDBSymbolCompiland &Compiland) const {
263a5549178SZachary Turner   CComPtr<IDiaEnumSourceFiles> Files;
264a5549178SZachary Turner 
265a5549178SZachary Turner   const DIARawSymbol &RawSymbol =
266a5549178SZachary Turner       static_cast<const DIARawSymbol &>(Compiland.getRawSymbol());
267a5549178SZachary Turner   if (S_OK !=
268a5549178SZachary Turner       Session->findFile(RawSymbol.getDiaSymbol(), nullptr, nsNone, &Files))
269a5549178SZachary Turner     return nullptr;
270a5549178SZachary Turner 
271be6d1e49SZachary Turner   return llvm::make_unique<DIAEnumSourceFiles>(*this, Files);
272a5549178SZachary Turner }
273a5549178SZachary Turner 
274cffff26bSZachary Turner std::unique_ptr<IPDBSourceFile>
275cffff26bSZachary Turner DIASession::getSourceFileById(uint32_t FileId) const {
276cffff26bSZachary Turner   CComPtr<IDiaSourceFile> LocatedFile;
277cffff26bSZachary Turner   if (S_OK != Session->findFileById(FileId, &LocatedFile))
278cffff26bSZachary Turner     return nullptr;
279cffff26bSZachary Turner 
280be6d1e49SZachary Turner   return llvm::make_unique<DIASourceFile>(*this, LocatedFile);
281cffff26bSZachary Turner }
282cffff26bSZachary Turner 
283cffff26bSZachary Turner std::unique_ptr<IPDBEnumDataStreams> DIASession::getDebugStreams() const {
284cffff26bSZachary Turner   CComPtr<IDiaEnumDebugStreams> DiaEnumerator;
285cffff26bSZachary Turner   if (S_OK != Session->getEnumDebugStreams(&DiaEnumerator))
286cffff26bSZachary Turner     return nullptr;
287cffff26bSZachary Turner 
288be6d1e49SZachary Turner   return llvm::make_unique<DIAEnumDebugStreams>(DiaEnumerator);
289cffff26bSZachary Turner }
290