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 //===----------------------------------------------------------------------===//
9819e77d1SZachary 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"
14819e77d1SZachary 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"
17819e77d1SZachary Turner #include "llvm/DebugInfo/PDB/DIA/DIASupport.h"
18819e77d1SZachary Turner #include "llvm/DebugInfo/PDB/GenericError.h"
19819e77d1SZachary 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 
27*fb58be86SReid Kleckner static Error ErrorFromHResult(HRESULT Result) {
28819e77d1SZachary Turner   switch (Result) {
29819e77d1SZachary Turner   case E_PDB_NOT_FOUND:
30819e77d1SZachary Turner     return make_error<GenericError>(generic_error_code::invalid_path);
31819e77d1SZachary Turner   case E_PDB_FORMAT:
32819e77d1SZachary Turner     return make_error<DIAError>(dia_error_code::invalid_file_format);
33819e77d1SZachary Turner   case E_INVALIDARG:
34819e77d1SZachary Turner     return make_error<DIAError>(dia_error_code::invalid_parameter);
35819e77d1SZachary Turner   case E_UNEXPECTED:
36819e77d1SZachary Turner     return make_error<DIAError>(dia_error_code::already_loaded);
37819e77d1SZachary Turner   case E_PDB_INVALID_SIG:
38819e77d1SZachary Turner   case E_PDB_INVALID_AGE:
39819e77d1SZachary Turner     return make_error<DIAError>(dia_error_code::debug_info_mismatch);
40819e77d1SZachary Turner   default:
41819e77d1SZachary Turner     return make_error<DIAError>(dia_error_code::unspecified);
42819e77d1SZachary Turner   }
43819e77d1SZachary Turner }
44819e77d1SZachary Turner 
45*fb58be86SReid Kleckner static Error LoadDIA(CComPtr<IDiaDataSource> &DiaDataSource) {
4673853ab4SNico Weber   if (SUCCEEDED(CoCreateInstance(CLSID_DiaSource, nullptr, CLSCTX_INPROC_SERVER,
4773853ab4SNico Weber                                  IID_IDiaDataSource,
4873853ab4SNico Weber                                  reinterpret_cast<LPVOID *>(&DiaDataSource))))
49819e77d1SZachary Turner     return Error::success();
5073853ab4SNico Weber 
5173853ab4SNico Weber // If the CoCreateInstance call above failed, msdia*.dll is not registered.
5273853ab4SNico Weber // Try loading the DLL corresponding to the #included DIA SDK.
5373853ab4SNico Weber #if !defined(_MSC_VER)
54819e77d1SZachary Turner   return llvm::make_error<GenericError>(
55819e77d1SZachary Turner       "DIA is only supported when using MSVC.");
56*fb58be86SReid Kleckner #else
5773853ab4SNico Weber   const wchar_t *msdia_dll = nullptr;
58*fb58be86SReid Kleckner #if _MSC_VER >= 1900 && _MSC_VER < 2000
5973853ab4SNico Weber   msdia_dll = L"msdia140.dll"; // VS2015
60*fb58be86SReid Kleckner #elif _MSC_VER >= 1800
6173853ab4SNico Weber   msdia_dll = L"msdia120.dll"; // VS2013
6273853ab4SNico Weber #else
6373853ab4SNico Weber #error "Unknown Visual Studio version."
6473853ab4SNico Weber #endif
6523ee87bdSZachary Turner 
66819e77d1SZachary Turner   HRESULT HR;
67819e77d1SZachary Turner   if (FAILED(HR = NoRegCoCreate(msdia_dll, CLSID_DiaSource, IID_IDiaDataSource,
6823ee87bdSZachary Turner                                 reinterpret_cast<LPVOID *>(&DiaDataSource))))
69819e77d1SZachary Turner     return ErrorFromHResult(HR);
70819e77d1SZachary Turner   return Error::success();
71*fb58be86SReid Kleckner #endif
7273853ab4SNico Weber }
73cffff26bSZachary Turner 
74cffff26bSZachary Turner DIASession::DIASession(CComPtr<IDiaSession> DiaSession) : Session(DiaSession) {}
75cffff26bSZachary Turner 
76819e77d1SZachary Turner Error DIASession::createFromPdb(StringRef Path,
77ccf04159SZachary Turner                                 std::unique_ptr<IPDBSession> &Session) {
78ccf04159SZachary Turner   CComPtr<IDiaDataSource> DiaDataSource;
79ccf04159SZachary Turner   CComPtr<IDiaSession> DiaSession;
80cffff26bSZachary Turner 
81cffff26bSZachary Turner   // We assume that CoInitializeEx has already been called by the executable.
82819e77d1SZachary Turner   if (auto E = LoadDIA(DiaDataSource))
83819e77d1SZachary Turner     return E;
84cffff26bSZachary Turner 
85cffff26bSZachary Turner   llvm::SmallVector<UTF16, 128> Path16;
86cffff26bSZachary Turner   if (!llvm::convertUTF8ToUTF16String(Path, Path16))
87819e77d1SZachary Turner     return make_error<GenericError>(generic_error_code::invalid_path);
88cffff26bSZachary Turner 
89cffff26bSZachary Turner   const wchar_t *Path16Str = reinterpret_cast<const wchar_t*>(Path16.data());
90819e77d1SZachary Turner   HRESULT HR;
91819e77d1SZachary Turner   if (FAILED(HR = DiaDataSource->loadDataFromPdb(Path16Str)))
92819e77d1SZachary Turner     return ErrorFromHResult(HR);
93cffff26bSZachary Turner 
94819e77d1SZachary Turner   if (FAILED(HR = DiaDataSource->openSession(&DiaSession)))
95819e77d1SZachary Turner     return ErrorFromHResult(HR);
96ccf04159SZachary Turner 
97ccf04159SZachary Turner   Session.reset(new DIASession(DiaSession));
98819e77d1SZachary Turner   return Error::success();
99cffff26bSZachary Turner }
100cffff26bSZachary Turner 
101819e77d1SZachary Turner Error DIASession::createFromExe(StringRef Path,
1024b08354bSZachary Turner                                 std::unique_ptr<IPDBSession> &Session) {
1034b08354bSZachary Turner   CComPtr<IDiaDataSource> DiaDataSource;
1044b08354bSZachary Turner   CComPtr<IDiaSession> DiaSession;
1054b08354bSZachary Turner 
1064b08354bSZachary Turner   // We assume that CoInitializeEx has already been called by the executable.
107819e77d1SZachary Turner   if (auto EC = LoadDIA(DiaDataSource))
108819e77d1SZachary Turner     return EC;
1094b08354bSZachary Turner 
1104b08354bSZachary Turner   llvm::SmallVector<UTF16, 128> Path16;
1114b08354bSZachary Turner   if (!llvm::convertUTF8ToUTF16String(Path, Path16))
112819e77d1SZachary Turner     return make_error<GenericError>(generic_error_code::invalid_path, Path);
1134b08354bSZachary Turner 
1144b08354bSZachary Turner   const wchar_t *Path16Str = reinterpret_cast<const wchar_t *>(Path16.data());
115819e77d1SZachary Turner   HRESULT HR;
116819e77d1SZachary Turner   if (FAILED(HR = DiaDataSource->loadDataForExe(Path16Str, nullptr, nullptr)))
117819e77d1SZachary Turner     return ErrorFromHResult(HR);
1184b08354bSZachary Turner 
119819e77d1SZachary Turner   if (FAILED(HR = DiaDataSource->openSession(&DiaSession)))
120819e77d1SZachary Turner     return ErrorFromHResult(HR);
1214b08354bSZachary Turner 
1224b08354bSZachary Turner   Session.reset(new DIASession(DiaSession));
123819e77d1SZachary Turner   return Error::success();
1244b08354bSZachary Turner }
1254b08354bSZachary Turner 
126cffff26bSZachary Turner uint64_t DIASession::getLoadAddress() const {
127cffff26bSZachary Turner   uint64_t LoadAddress;
128cffff26bSZachary Turner   bool success = (S_OK == Session->get_loadAddress(&LoadAddress));
129cffff26bSZachary Turner   return (success) ? LoadAddress : 0;
130cffff26bSZachary Turner }
131cffff26bSZachary Turner 
132cffff26bSZachary Turner void DIASession::setLoadAddress(uint64_t Address) {
133cffff26bSZachary Turner   Session->put_loadAddress(Address);
134cffff26bSZachary Turner }
135cffff26bSZachary Turner 
136cffff26bSZachary Turner std::unique_ptr<PDBSymbolExe> DIASession::getGlobalScope() const {
137cffff26bSZachary Turner   CComPtr<IDiaSymbol> GlobalScope;
138cffff26bSZachary Turner   if (S_OK != Session->get_globalScope(&GlobalScope))
139cffff26bSZachary Turner     return nullptr;
140cffff26bSZachary Turner 
141be6d1e49SZachary Turner   auto RawSymbol = llvm::make_unique<DIARawSymbol>(*this, GlobalScope);
142cffff26bSZachary Turner   auto PdbSymbol(PDBSymbol::create(*this, std::move(RawSymbol)));
143cffff26bSZachary Turner   std::unique_ptr<PDBSymbolExe> ExeSymbol(
144cffff26bSZachary Turner       static_cast<PDBSymbolExe *>(PdbSymbol.release()));
145cffff26bSZachary Turner   return ExeSymbol;
146cffff26bSZachary Turner }
147cffff26bSZachary Turner 
148cffff26bSZachary Turner std::unique_ptr<PDBSymbol> DIASession::getSymbolById(uint32_t SymbolId) const {
149cffff26bSZachary Turner   CComPtr<IDiaSymbol> LocatedSymbol;
150cffff26bSZachary Turner   if (S_OK != Session->symbolById(SymbolId, &LocatedSymbol))
151cffff26bSZachary Turner     return nullptr;
152cffff26bSZachary Turner 
153be6d1e49SZachary Turner   auto RawSymbol = llvm::make_unique<DIARawSymbol>(*this, LocatedSymbol);
154cffff26bSZachary Turner   return PDBSymbol::create(*this, std::move(RawSymbol));
155cffff26bSZachary Turner }
156cffff26bSZachary Turner 
1574b08354bSZachary Turner std::unique_ptr<PDBSymbol>
158e5cb2693SZachary Turner DIASession::findSymbolByAddress(uint64_t Address, PDB_SymType Type) const {
159e5cb2693SZachary Turner   enum SymTagEnum EnumVal = static_cast<enum SymTagEnum>(Type);
160e5cb2693SZachary Turner 
1614b08354bSZachary Turner   CComPtr<IDiaSymbol> Symbol;
162e5cb2693SZachary Turner   if (S_OK != Session->findSymbolByVA(Address, EnumVal, &Symbol)) {
163e5cb2693SZachary Turner     ULONGLONG LoadAddr = 0;
164e5cb2693SZachary Turner     if (S_OK != Session->get_loadAddress(&LoadAddr))
1654b08354bSZachary Turner       return nullptr;
166e5cb2693SZachary Turner     DWORD RVA = static_cast<DWORD>(Address - LoadAddr);
167e5cb2693SZachary Turner     if (S_OK != Session->findSymbolByRVA(RVA, EnumVal, &Symbol))
168e5cb2693SZachary Turner       return nullptr;
169e5cb2693SZachary Turner   }
1704b08354bSZachary Turner   auto RawSymbol = llvm::make_unique<DIARawSymbol>(*this, Symbol);
1714b08354bSZachary Turner   return PDBSymbol::create(*this, std::move(RawSymbol));
1724b08354bSZachary Turner }
1734b08354bSZachary Turner 
1744b08354bSZachary Turner std::unique_ptr<IPDBEnumLineNumbers>
17543ec3af9SZachary Turner DIASession::findLineNumbers(const PDBSymbolCompiland &Compiland,
17643ec3af9SZachary Turner                             const IPDBSourceFile &File) const {
17743ec3af9SZachary Turner   const DIARawSymbol &RawCompiland =
17843ec3af9SZachary Turner       static_cast<const DIARawSymbol &>(Compiland.getRawSymbol());
17943ec3af9SZachary Turner   const DIASourceFile &RawFile = static_cast<const DIASourceFile &>(File);
18043ec3af9SZachary Turner 
18143ec3af9SZachary Turner   CComPtr<IDiaEnumLineNumbers> LineNumbers;
18243ec3af9SZachary Turner   if (S_OK !=
18343ec3af9SZachary Turner       Session->findLines(RawCompiland.getDiaSymbol(), RawFile.getDiaFile(),
18443ec3af9SZachary Turner                          &LineNumbers))
18543ec3af9SZachary Turner     return nullptr;
18643ec3af9SZachary Turner 
18743ec3af9SZachary Turner   return llvm::make_unique<DIAEnumLineNumbers>(LineNumbers);
18843ec3af9SZachary Turner }
18943ec3af9SZachary Turner 
19043ec3af9SZachary Turner std::unique_ptr<IPDBEnumLineNumbers>
1914b08354bSZachary Turner DIASession::findLineNumbersByAddress(uint64_t Address, uint32_t Length) const {
1924b08354bSZachary Turner   CComPtr<IDiaEnumLineNumbers> LineNumbers;
1934b08354bSZachary Turner   if (S_OK != Session->findLinesByVA(Address, Length, &LineNumbers))
1944b08354bSZachary Turner     return nullptr;
1954b08354bSZachary Turner 
1964b08354bSZachary Turner   return llvm::make_unique<DIAEnumLineNumbers>(LineNumbers);
1974b08354bSZachary Turner }
1984b08354bSZachary Turner 
19943ec3af9SZachary Turner std::unique_ptr<IPDBEnumSourceFiles>
20043ec3af9SZachary Turner DIASession::findSourceFiles(const PDBSymbolCompiland *Compiland,
20143ec3af9SZachary Turner                             llvm::StringRef Pattern,
20243ec3af9SZachary Turner                             PDB_NameSearchFlags Flags) const {
20343ec3af9SZachary Turner   IDiaSymbol *DiaCompiland = nullptr;
20443ec3af9SZachary Turner   CComBSTR Utf16Pattern;
20543ec3af9SZachary Turner   if (!Pattern.empty())
20643ec3af9SZachary Turner     Utf16Pattern = CComBSTR(Pattern.data());
20743ec3af9SZachary Turner 
20843ec3af9SZachary Turner   if (Compiland)
20943ec3af9SZachary Turner     DiaCompiland = static_cast<const DIARawSymbol &>(Compiland->getRawSymbol())
21043ec3af9SZachary Turner                        .getDiaSymbol();
21143ec3af9SZachary Turner 
21243ec3af9SZachary Turner   Flags = static_cast<PDB_NameSearchFlags>(
21343ec3af9SZachary Turner       Flags | PDB_NameSearchFlags::NS_FileNameExtMatch);
21443ec3af9SZachary Turner   CComPtr<IDiaEnumSourceFiles> SourceFiles;
21543ec3af9SZachary Turner   if (S_OK !=
21643ec3af9SZachary Turner       Session->findFile(DiaCompiland, Utf16Pattern.m_str, Flags, &SourceFiles))
21743ec3af9SZachary Turner     return nullptr;
21843ec3af9SZachary Turner   return llvm::make_unique<DIAEnumSourceFiles>(*this, SourceFiles);
21943ec3af9SZachary Turner }
22043ec3af9SZachary Turner 
22143ec3af9SZachary Turner std::unique_ptr<IPDBSourceFile>
22243ec3af9SZachary Turner DIASession::findOneSourceFile(const PDBSymbolCompiland *Compiland,
22343ec3af9SZachary Turner                               llvm::StringRef Pattern,
22443ec3af9SZachary Turner                               PDB_NameSearchFlags Flags) const {
22543ec3af9SZachary Turner   auto SourceFiles = findSourceFiles(Compiland, Pattern, Flags);
22643ec3af9SZachary Turner   if (!SourceFiles || SourceFiles->getChildCount() == 0)
22743ec3af9SZachary Turner     return nullptr;
22843ec3af9SZachary Turner   return SourceFiles->getNext();
22943ec3af9SZachary Turner }
23043ec3af9SZachary Turner 
23143ec3af9SZachary Turner std::unique_ptr<IPDBEnumChildren<PDBSymbolCompiland>>
23243ec3af9SZachary Turner DIASession::findCompilandsForSourceFile(llvm::StringRef Pattern,
23343ec3af9SZachary Turner                                         PDB_NameSearchFlags Flags) const {
23443ec3af9SZachary Turner   auto File = findOneSourceFile(nullptr, Pattern, Flags);
23543ec3af9SZachary Turner   if (!File)
23643ec3af9SZachary Turner     return nullptr;
23743ec3af9SZachary Turner   return File->getCompilands();
23843ec3af9SZachary Turner }
23943ec3af9SZachary Turner 
24043ec3af9SZachary Turner std::unique_ptr<PDBSymbolCompiland>
24143ec3af9SZachary Turner DIASession::findOneCompilandForSourceFile(llvm::StringRef Pattern,
24243ec3af9SZachary Turner                                           PDB_NameSearchFlags Flags) const {
24343ec3af9SZachary Turner   auto Compilands = findCompilandsForSourceFile(Pattern, Flags);
24443ec3af9SZachary Turner   if (!Compilands || Compilands->getChildCount() == 0)
24543ec3af9SZachary Turner     return nullptr;
24643ec3af9SZachary Turner   return Compilands->getNext();
24743ec3af9SZachary Turner }
24843ec3af9SZachary Turner 
249a5549178SZachary Turner std::unique_ptr<IPDBEnumSourceFiles> DIASession::getAllSourceFiles() const {
250a5549178SZachary Turner   CComPtr<IDiaEnumSourceFiles> Files;
251a5549178SZachary Turner   if (S_OK != Session->findFile(nullptr, nullptr, nsNone, &Files))
252a5549178SZachary Turner     return nullptr;
253a5549178SZachary Turner 
254be6d1e49SZachary Turner   return llvm::make_unique<DIAEnumSourceFiles>(*this, Files);
255a5549178SZachary Turner }
256a5549178SZachary Turner 
257a5549178SZachary Turner std::unique_ptr<IPDBEnumSourceFiles> DIASession::getSourceFilesForCompiland(
258a5549178SZachary Turner     const PDBSymbolCompiland &Compiland) const {
259a5549178SZachary Turner   CComPtr<IDiaEnumSourceFiles> Files;
260a5549178SZachary Turner 
261a5549178SZachary Turner   const DIARawSymbol &RawSymbol =
262a5549178SZachary Turner       static_cast<const DIARawSymbol &>(Compiland.getRawSymbol());
263a5549178SZachary Turner   if (S_OK !=
264a5549178SZachary Turner       Session->findFile(RawSymbol.getDiaSymbol(), nullptr, nsNone, &Files))
265a5549178SZachary Turner     return nullptr;
266a5549178SZachary Turner 
267be6d1e49SZachary Turner   return llvm::make_unique<DIAEnumSourceFiles>(*this, Files);
268a5549178SZachary Turner }
269a5549178SZachary Turner 
270cffff26bSZachary Turner std::unique_ptr<IPDBSourceFile>
271cffff26bSZachary Turner DIASession::getSourceFileById(uint32_t FileId) const {
272cffff26bSZachary Turner   CComPtr<IDiaSourceFile> LocatedFile;
273cffff26bSZachary Turner   if (S_OK != Session->findFileById(FileId, &LocatedFile))
274cffff26bSZachary Turner     return nullptr;
275cffff26bSZachary Turner 
276be6d1e49SZachary Turner   return llvm::make_unique<DIASourceFile>(*this, LocatedFile);
277cffff26bSZachary Turner }
278cffff26bSZachary Turner 
279cffff26bSZachary Turner std::unique_ptr<IPDBEnumDataStreams> DIASession::getDebugStreams() const {
280cffff26bSZachary Turner   CComPtr<IDiaEnumDebugStreams> DiaEnumerator;
281cffff26bSZachary Turner   if (S_OK != Session->getEnumDebugStreams(&DiaEnumerator))
282cffff26bSZachary Turner     return nullptr;
283cffff26bSZachary Turner 
284be6d1e49SZachary Turner   return llvm::make_unique<DIAEnumDebugStreams>(DiaEnumerator);
285cffff26bSZachary Turner }
286