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 //===----------------------------------------------------------------------===//
9cffff26bSZachary Turner 
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"
14cffff26bSZachary Turner #include "llvm/DebugInfo/PDB/DIA/DIARawSymbol.h"
15cffff26bSZachary Turner #include "llvm/DebugInfo/PDB/DIA/DIASession.h"
16cffff26bSZachary Turner #include "llvm/DebugInfo/PDB/DIA/DIASourceFile.h"
1771f308adSChandler Carruth #include "llvm/DebugInfo/PDB/PDBSymbolCompiland.h"
1871f308adSChandler Carruth #include "llvm/DebugInfo/PDB/PDBSymbolExe.h"
19cffff26bSZachary Turner #include "llvm/Support/ConvertUTF.h"
20cffff26bSZachary Turner 
2173853ab4SNico Weber #include <diacreate.h>
2273853ab4SNico Weber 
23cffff26bSZachary Turner using namespace llvm;
24cffff26bSZachary Turner 
2573853ab4SNico Weber namespace {
2673853ab4SNico Weber 
27*23ee87bdSZachary Turner PDB_ErrorCode LoadDIA(CComPtr<IDiaDataSource> &DiaDataSource) {
2873853ab4SNico Weber   if (SUCCEEDED(CoCreateInstance(CLSID_DiaSource, nullptr, CLSCTX_INPROC_SERVER,
2973853ab4SNico Weber                                  IID_IDiaDataSource,
3073853ab4SNico Weber                                  reinterpret_cast<LPVOID *>(&DiaDataSource))))
31*23ee87bdSZachary Turner     return PDB_ErrorCode::Success;
3273853ab4SNico Weber 
3373853ab4SNico Weber   // If the CoCreateInstance call above failed, msdia*.dll is not registered.
3473853ab4SNico Weber   // Try loading the DLL corresponding to the #included DIA SDK.
3573853ab4SNico Weber #if !defined(_MSC_VER)
36*23ee87bdSZachary Turner   return PDB_ErrorCode::NoDiaSupport;
37*23ee87bdSZachary Turner #endif
38*23ee87bdSZachary Turner 
3973853ab4SNico Weber   const wchar_t *msdia_dll = nullptr;
4073853ab4SNico Weber #if _MSC_VER == 1900
4173853ab4SNico Weber   msdia_dll = L"msdia140.dll"; // VS2015
4273853ab4SNico Weber #elif _MSC_VER == 1800
4373853ab4SNico Weber   msdia_dll = L"msdia120.dll"; // VS2013
4473853ab4SNico Weber #else
4573853ab4SNico Weber #error "Unknown Visual Studio version."
4673853ab4SNico Weber #endif
47*23ee87bdSZachary Turner 
48*23ee87bdSZachary Turner   if (SUCCEEDED(NoRegCoCreate(msdia_dll, CLSID_DiaSource, IID_IDiaDataSource,
49*23ee87bdSZachary Turner                               reinterpret_cast<LPVOID *>(&DiaDataSource))))
50*23ee87bdSZachary Turner     return PDB_ErrorCode::Success;
51*23ee87bdSZachary Turner   else
52*23ee87bdSZachary Turner     return PDB_ErrorCode::CouldNotCreateImpl;
5373853ab4SNico Weber }
5473853ab4SNico Weber 
5573853ab4SNico Weber }
56cffff26bSZachary Turner 
57cffff26bSZachary Turner DIASession::DIASession(CComPtr<IDiaSession> DiaSession) : Session(DiaSession) {}
58cffff26bSZachary Turner 
59ccf04159SZachary Turner PDB_ErrorCode DIASession::createFromPdb(StringRef Path,
60ccf04159SZachary Turner                                         std::unique_ptr<IPDBSession> &Session) {
61ccf04159SZachary Turner   CComPtr<IDiaDataSource> DiaDataSource;
62ccf04159SZachary Turner   CComPtr<IDiaSession> DiaSession;
63cffff26bSZachary Turner 
64cffff26bSZachary Turner   // We assume that CoInitializeEx has already been called by the executable.
65*23ee87bdSZachary Turner   PDB_ErrorCode result = LoadDIA(DiaDataSource);
66*23ee87bdSZachary Turner   if (result != PDB_ErrorCode::Success)
67*23ee87bdSZachary Turner     return result;
68cffff26bSZachary Turner 
69cffff26bSZachary Turner   llvm::SmallVector<UTF16, 128> Path16;
70cffff26bSZachary Turner   if (!llvm::convertUTF8ToUTF16String(Path, Path16))
71ccf04159SZachary Turner     return PDB_ErrorCode::InvalidPath;
72cffff26bSZachary Turner 
73cffff26bSZachary Turner   const wchar_t *Path16Str = reinterpret_cast<const wchar_t*>(Path16.data());
7473853ab4SNico Weber   HRESULT Result;
75ccf04159SZachary Turner   if (FAILED(Result = DiaDataSource->loadDataFromPdb(Path16Str))) {
76ccf04159SZachary Turner     if (Result == E_PDB_NOT_FOUND)
77ccf04159SZachary Turner       return PDB_ErrorCode::InvalidPath;
78ccf04159SZachary Turner     else if (Result == E_PDB_FORMAT)
79ccf04159SZachary Turner       return PDB_ErrorCode::InvalidFileFormat;
80ccf04159SZachary Turner     else if (Result == E_INVALIDARG)
81ccf04159SZachary Turner       return PDB_ErrorCode::InvalidParameter;
82ccf04159SZachary Turner     else if (Result == E_UNEXPECTED)
83ccf04159SZachary Turner       return PDB_ErrorCode::AlreadyLoaded;
84ccf04159SZachary Turner     else
85ccf04159SZachary Turner       return PDB_ErrorCode::UnknownError;
86ccf04159SZachary Turner   }
87cffff26bSZachary Turner 
88ccf04159SZachary Turner   if (FAILED(Result = DiaDataSource->openSession(&DiaSession))) {
89ccf04159SZachary Turner     if (Result == E_OUTOFMEMORY)
90ccf04159SZachary Turner       return PDB_ErrorCode::NoMemory;
91ccf04159SZachary Turner     else
92ccf04159SZachary Turner       return PDB_ErrorCode::UnknownError;
93ccf04159SZachary Turner   }
94ccf04159SZachary Turner 
95ccf04159SZachary Turner   Session.reset(new DIASession(DiaSession));
96ccf04159SZachary Turner   return PDB_ErrorCode::Success;
97cffff26bSZachary Turner }
98cffff26bSZachary Turner 
994b08354bSZachary Turner PDB_ErrorCode DIASession::createFromExe(StringRef Path,
1004b08354bSZachary Turner                                         std::unique_ptr<IPDBSession> &Session) {
1014b08354bSZachary Turner   CComPtr<IDiaDataSource> DiaDataSource;
1024b08354bSZachary Turner   CComPtr<IDiaSession> DiaSession;
1034b08354bSZachary Turner 
1044b08354bSZachary Turner   // We assume that CoInitializeEx has already been called by the executable.
105*23ee87bdSZachary Turner   PDB_ErrorCode result = LoadDIA(DiaDataSource);
106*23ee87bdSZachary Turner   if (result != PDB_ErrorCode::Success)
107*23ee87bdSZachary Turner     return result;
1084b08354bSZachary Turner 
1094b08354bSZachary Turner   llvm::SmallVector<UTF16, 128> Path16;
1104b08354bSZachary Turner   if (!llvm::convertUTF8ToUTF16String(Path, Path16))
1114b08354bSZachary Turner     return PDB_ErrorCode::InvalidPath;
1124b08354bSZachary Turner 
1134b08354bSZachary Turner   const wchar_t *Path16Str = reinterpret_cast<const wchar_t *>(Path16.data());
11473853ab4SNico Weber   HRESULT Result;
1154b08354bSZachary Turner   if (FAILED(Result =
1164b08354bSZachary Turner                  DiaDataSource->loadDataForExe(Path16Str, nullptr, nullptr))) {
1174b08354bSZachary Turner     if (Result == E_PDB_NOT_FOUND)
1184b08354bSZachary Turner       return PDB_ErrorCode::InvalidPath;
1194b08354bSZachary Turner     else if (Result == E_PDB_FORMAT)
1204b08354bSZachary Turner       return PDB_ErrorCode::InvalidFileFormat;
1214b08354bSZachary Turner     else if (Result == E_PDB_INVALID_SIG || Result == E_PDB_INVALID_AGE)
1224b08354bSZachary Turner       return PDB_ErrorCode::DebugInfoMismatch;
1234b08354bSZachary Turner     else if (Result == E_INVALIDARG)
1244b08354bSZachary Turner       return PDB_ErrorCode::InvalidParameter;
1254b08354bSZachary Turner     else if (Result == E_UNEXPECTED)
1264b08354bSZachary Turner       return PDB_ErrorCode::AlreadyLoaded;
1274b08354bSZachary Turner     else
1284b08354bSZachary Turner       return PDB_ErrorCode::UnknownError;
1294b08354bSZachary Turner   }
1304b08354bSZachary Turner 
1314b08354bSZachary Turner   if (FAILED(Result = DiaDataSource->openSession(&DiaSession))) {
1324b08354bSZachary Turner     if (Result == E_OUTOFMEMORY)
1334b08354bSZachary Turner       return PDB_ErrorCode::NoMemory;
1344b08354bSZachary Turner     else
1354b08354bSZachary Turner       return PDB_ErrorCode::UnknownError;
1364b08354bSZachary Turner   }
1374b08354bSZachary Turner 
1384b08354bSZachary Turner   Session.reset(new DIASession(DiaSession));
1394b08354bSZachary Turner   return PDB_ErrorCode::Success;
1404b08354bSZachary Turner }
1414b08354bSZachary Turner 
142cffff26bSZachary Turner uint64_t DIASession::getLoadAddress() const {
143cffff26bSZachary Turner   uint64_t LoadAddress;
144cffff26bSZachary Turner   bool success = (S_OK == Session->get_loadAddress(&LoadAddress));
145cffff26bSZachary Turner   return (success) ? LoadAddress : 0;
146cffff26bSZachary Turner }
147cffff26bSZachary Turner 
148cffff26bSZachary Turner void DIASession::setLoadAddress(uint64_t Address) {
149cffff26bSZachary Turner   Session->put_loadAddress(Address);
150cffff26bSZachary Turner }
151cffff26bSZachary Turner 
152cffff26bSZachary Turner std::unique_ptr<PDBSymbolExe> DIASession::getGlobalScope() const {
153cffff26bSZachary Turner   CComPtr<IDiaSymbol> GlobalScope;
154cffff26bSZachary Turner   if (S_OK != Session->get_globalScope(&GlobalScope))
155cffff26bSZachary Turner     return nullptr;
156cffff26bSZachary Turner 
157be6d1e49SZachary Turner   auto RawSymbol = llvm::make_unique<DIARawSymbol>(*this, GlobalScope);
158cffff26bSZachary Turner   auto PdbSymbol(PDBSymbol::create(*this, std::move(RawSymbol)));
159cffff26bSZachary Turner   std::unique_ptr<PDBSymbolExe> ExeSymbol(
160cffff26bSZachary Turner       static_cast<PDBSymbolExe *>(PdbSymbol.release()));
161cffff26bSZachary Turner   return ExeSymbol;
162cffff26bSZachary Turner }
163cffff26bSZachary Turner 
164cffff26bSZachary Turner std::unique_ptr<PDBSymbol> DIASession::getSymbolById(uint32_t SymbolId) const {
165cffff26bSZachary Turner   CComPtr<IDiaSymbol> LocatedSymbol;
166cffff26bSZachary Turner   if (S_OK != Session->symbolById(SymbolId, &LocatedSymbol))
167cffff26bSZachary Turner     return nullptr;
168cffff26bSZachary Turner 
169be6d1e49SZachary Turner   auto RawSymbol = llvm::make_unique<DIARawSymbol>(*this, LocatedSymbol);
170cffff26bSZachary Turner   return PDBSymbol::create(*this, std::move(RawSymbol));
171cffff26bSZachary Turner }
172cffff26bSZachary Turner 
1734b08354bSZachary Turner std::unique_ptr<PDBSymbol>
174e5cb2693SZachary Turner DIASession::findSymbolByAddress(uint64_t Address, PDB_SymType Type) const {
175e5cb2693SZachary Turner   enum SymTagEnum EnumVal = static_cast<enum SymTagEnum>(Type);
176e5cb2693SZachary Turner 
1774b08354bSZachary Turner   CComPtr<IDiaSymbol> Symbol;
178e5cb2693SZachary Turner   if (S_OK != Session->findSymbolByVA(Address, EnumVal, &Symbol)) {
179e5cb2693SZachary Turner     ULONGLONG LoadAddr = 0;
180e5cb2693SZachary Turner     if (S_OK != Session->get_loadAddress(&LoadAddr))
1814b08354bSZachary Turner       return nullptr;
182e5cb2693SZachary Turner     DWORD RVA = static_cast<DWORD>(Address - LoadAddr);
183e5cb2693SZachary Turner     if (S_OK != Session->findSymbolByRVA(RVA, EnumVal, &Symbol))
184e5cb2693SZachary Turner       return nullptr;
185e5cb2693SZachary Turner   }
1864b08354bSZachary Turner   auto RawSymbol = llvm::make_unique<DIARawSymbol>(*this, Symbol);
1874b08354bSZachary Turner   return PDBSymbol::create(*this, std::move(RawSymbol));
1884b08354bSZachary Turner }
1894b08354bSZachary Turner 
1904b08354bSZachary Turner std::unique_ptr<IPDBEnumLineNumbers>
19143ec3af9SZachary Turner DIASession::findLineNumbers(const PDBSymbolCompiland &Compiland,
19243ec3af9SZachary Turner                             const IPDBSourceFile &File) const {
19343ec3af9SZachary Turner   const DIARawSymbol &RawCompiland =
19443ec3af9SZachary Turner       static_cast<const DIARawSymbol &>(Compiland.getRawSymbol());
19543ec3af9SZachary Turner   const DIASourceFile &RawFile = static_cast<const DIASourceFile &>(File);
19643ec3af9SZachary Turner 
19743ec3af9SZachary Turner   CComPtr<IDiaEnumLineNumbers> LineNumbers;
19843ec3af9SZachary Turner   if (S_OK !=
19943ec3af9SZachary Turner       Session->findLines(RawCompiland.getDiaSymbol(), RawFile.getDiaFile(),
20043ec3af9SZachary Turner                          &LineNumbers))
20143ec3af9SZachary Turner     return nullptr;
20243ec3af9SZachary Turner 
20343ec3af9SZachary Turner   return llvm::make_unique<DIAEnumLineNumbers>(LineNumbers);
20443ec3af9SZachary Turner }
20543ec3af9SZachary Turner 
20643ec3af9SZachary Turner std::unique_ptr<IPDBEnumLineNumbers>
2074b08354bSZachary Turner DIASession::findLineNumbersByAddress(uint64_t Address, uint32_t Length) const {
2084b08354bSZachary Turner   CComPtr<IDiaEnumLineNumbers> LineNumbers;
2094b08354bSZachary Turner   if (S_OK != Session->findLinesByVA(Address, Length, &LineNumbers))
2104b08354bSZachary Turner     return nullptr;
2114b08354bSZachary Turner 
2124b08354bSZachary Turner   return llvm::make_unique<DIAEnumLineNumbers>(LineNumbers);
2134b08354bSZachary Turner }
2144b08354bSZachary Turner 
21543ec3af9SZachary Turner std::unique_ptr<IPDBEnumSourceFiles>
21643ec3af9SZachary Turner DIASession::findSourceFiles(const PDBSymbolCompiland *Compiland,
21743ec3af9SZachary Turner                             llvm::StringRef Pattern,
21843ec3af9SZachary Turner                             PDB_NameSearchFlags Flags) const {
21943ec3af9SZachary Turner   IDiaSymbol *DiaCompiland = nullptr;
22043ec3af9SZachary Turner   CComBSTR Utf16Pattern;
22143ec3af9SZachary Turner   if (!Pattern.empty())
22243ec3af9SZachary Turner     Utf16Pattern = CComBSTR(Pattern.data());
22343ec3af9SZachary Turner 
22443ec3af9SZachary Turner   if (Compiland)
22543ec3af9SZachary Turner     DiaCompiland = static_cast<const DIARawSymbol &>(Compiland->getRawSymbol())
22643ec3af9SZachary Turner                        .getDiaSymbol();
22743ec3af9SZachary Turner 
22843ec3af9SZachary Turner   Flags = static_cast<PDB_NameSearchFlags>(
22943ec3af9SZachary Turner       Flags | PDB_NameSearchFlags::NS_FileNameExtMatch);
23043ec3af9SZachary Turner   CComPtr<IDiaEnumSourceFiles> SourceFiles;
23143ec3af9SZachary Turner   if (S_OK !=
23243ec3af9SZachary Turner       Session->findFile(DiaCompiland, Utf16Pattern.m_str, Flags, &SourceFiles))
23343ec3af9SZachary Turner     return nullptr;
23443ec3af9SZachary Turner   return llvm::make_unique<DIAEnumSourceFiles>(*this, SourceFiles);
23543ec3af9SZachary Turner }
23643ec3af9SZachary Turner 
23743ec3af9SZachary Turner std::unique_ptr<IPDBSourceFile>
23843ec3af9SZachary Turner DIASession::findOneSourceFile(const PDBSymbolCompiland *Compiland,
23943ec3af9SZachary Turner                               llvm::StringRef Pattern,
24043ec3af9SZachary Turner                               PDB_NameSearchFlags Flags) const {
24143ec3af9SZachary Turner   auto SourceFiles = findSourceFiles(Compiland, Pattern, Flags);
24243ec3af9SZachary Turner   if (!SourceFiles || SourceFiles->getChildCount() == 0)
24343ec3af9SZachary Turner     return nullptr;
24443ec3af9SZachary Turner   return SourceFiles->getNext();
24543ec3af9SZachary Turner }
24643ec3af9SZachary Turner 
24743ec3af9SZachary Turner std::unique_ptr<IPDBEnumChildren<PDBSymbolCompiland>>
24843ec3af9SZachary Turner DIASession::findCompilandsForSourceFile(llvm::StringRef Pattern,
24943ec3af9SZachary Turner                                         PDB_NameSearchFlags Flags) const {
25043ec3af9SZachary Turner   auto File = findOneSourceFile(nullptr, Pattern, Flags);
25143ec3af9SZachary Turner   if (!File)
25243ec3af9SZachary Turner     return nullptr;
25343ec3af9SZachary Turner   return File->getCompilands();
25443ec3af9SZachary Turner }
25543ec3af9SZachary Turner 
25643ec3af9SZachary Turner std::unique_ptr<PDBSymbolCompiland>
25743ec3af9SZachary Turner DIASession::findOneCompilandForSourceFile(llvm::StringRef Pattern,
25843ec3af9SZachary Turner                                           PDB_NameSearchFlags Flags) const {
25943ec3af9SZachary Turner   auto Compilands = findCompilandsForSourceFile(Pattern, Flags);
26043ec3af9SZachary Turner   if (!Compilands || Compilands->getChildCount() == 0)
26143ec3af9SZachary Turner     return nullptr;
26243ec3af9SZachary Turner   return Compilands->getNext();
26343ec3af9SZachary Turner }
26443ec3af9SZachary Turner 
265a5549178SZachary Turner std::unique_ptr<IPDBEnumSourceFiles> DIASession::getAllSourceFiles() const {
266a5549178SZachary Turner   CComPtr<IDiaEnumSourceFiles> Files;
267a5549178SZachary Turner   if (S_OK != Session->findFile(nullptr, nullptr, nsNone, &Files))
268a5549178SZachary Turner     return nullptr;
269a5549178SZachary Turner 
270be6d1e49SZachary Turner   return llvm::make_unique<DIAEnumSourceFiles>(*this, Files);
271a5549178SZachary Turner }
272a5549178SZachary Turner 
273a5549178SZachary Turner std::unique_ptr<IPDBEnumSourceFiles> DIASession::getSourceFilesForCompiland(
274a5549178SZachary Turner     const PDBSymbolCompiland &Compiland) const {
275a5549178SZachary Turner   CComPtr<IDiaEnumSourceFiles> Files;
276a5549178SZachary Turner 
277a5549178SZachary Turner   const DIARawSymbol &RawSymbol =
278a5549178SZachary Turner       static_cast<const DIARawSymbol &>(Compiland.getRawSymbol());
279a5549178SZachary Turner   if (S_OK !=
280a5549178SZachary Turner       Session->findFile(RawSymbol.getDiaSymbol(), nullptr, nsNone, &Files))
281a5549178SZachary Turner     return nullptr;
282a5549178SZachary Turner 
283be6d1e49SZachary Turner   return llvm::make_unique<DIAEnumSourceFiles>(*this, Files);
284a5549178SZachary Turner }
285a5549178SZachary Turner 
286cffff26bSZachary Turner std::unique_ptr<IPDBSourceFile>
287cffff26bSZachary Turner DIASession::getSourceFileById(uint32_t FileId) const {
288cffff26bSZachary Turner   CComPtr<IDiaSourceFile> LocatedFile;
289cffff26bSZachary Turner   if (S_OK != Session->findFileById(FileId, &LocatedFile))
290cffff26bSZachary Turner     return nullptr;
291cffff26bSZachary Turner 
292be6d1e49SZachary Turner   return llvm::make_unique<DIASourceFile>(*this, LocatedFile);
293cffff26bSZachary Turner }
294cffff26bSZachary Turner 
295cffff26bSZachary Turner std::unique_ptr<IPDBEnumDataStreams> DIASession::getDebugStreams() const {
296cffff26bSZachary Turner   CComPtr<IDiaEnumDebugStreams> DiaEnumerator;
297cffff26bSZachary Turner   if (S_OK != Session->getEnumDebugStreams(&DiaEnumerator))
298cffff26bSZachary Turner     return nullptr;
299cffff26bSZachary Turner 
300be6d1e49SZachary Turner   return llvm::make_unique<DIAEnumDebugStreams>(DiaEnumerator);
301cffff26bSZachary Turner }
302