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"
2338380323SZachary Turner #include "llvm/Support/Format.h"
24*1690164cSZachary Turner #include "llvm/Support/FormatVariadic.h"
2538380323SZachary Turner #include "llvm/Support/raw_ostream.h"
26cffff26bSZachary Turner 
27cffff26bSZachary Turner using namespace llvm;
28ec28fc34SZachary Turner using namespace llvm::pdb;
29cffff26bSZachary Turner 
30*1690164cSZachary Turner template <typename... Ts>
31*1690164cSZachary Turner static Error ErrorFromHResult(HRESULT Result, const char *Str, Ts &&... Args) {
32*1690164cSZachary Turner   SmallString<64> MessageStorage;
33*1690164cSZachary Turner   StringRef Context;
34*1690164cSZachary Turner   if (sizeof...(Args) > 0) {
35*1690164cSZachary Turner     MessageStorage = formatv(Str, std::forward<Ts>(Args)...).str();
36*1690164cSZachary Turner     Context = MessageStorage;
37*1690164cSZachary Turner   } else
38*1690164cSZachary Turner     Context = Str;
39*1690164cSZachary Turner 
40819e77d1SZachary Turner   switch (Result) {
41819e77d1SZachary Turner   case E_PDB_NOT_FOUND:
4238380323SZachary Turner     return make_error<GenericError>(generic_error_code::invalid_path, Context);
43819e77d1SZachary Turner   case E_PDB_FORMAT:
4438380323SZachary Turner     return make_error<DIAError>(dia_error_code::invalid_file_format, Context);
45819e77d1SZachary Turner   case E_INVALIDARG:
4638380323SZachary Turner     return make_error<DIAError>(dia_error_code::invalid_parameter, Context);
47819e77d1SZachary Turner   case E_UNEXPECTED:
4838380323SZachary Turner     return make_error<DIAError>(dia_error_code::already_loaded, Context);
49819e77d1SZachary Turner   case E_PDB_INVALID_SIG:
50819e77d1SZachary Turner   case E_PDB_INVALID_AGE:
5138380323SZachary Turner     return make_error<DIAError>(dia_error_code::debug_info_mismatch, Context);
5238380323SZachary Turner   default: {
5338380323SZachary Turner     std::string S;
5438380323SZachary Turner     raw_string_ostream OS(S);
5538380323SZachary Turner     OS << "HRESULT: " << format_hex(static_cast<DWORD>(Result), 10, true)
5638380323SZachary Turner        << ": " << Context;
5738380323SZachary Turner     return make_error<DIAError>(dia_error_code::unspecified, OS.str());
5838380323SZachary Turner   }
59819e77d1SZachary Turner   }
60819e77d1SZachary Turner }
61819e77d1SZachary Turner 
62fb58be86SReid Kleckner static Error LoadDIA(CComPtr<IDiaDataSource> &DiaDataSource) {
6373853ab4SNico Weber   if (SUCCEEDED(CoCreateInstance(CLSID_DiaSource, nullptr, CLSCTX_INPROC_SERVER,
6473853ab4SNico Weber                                  IID_IDiaDataSource,
6573853ab4SNico Weber                                  reinterpret_cast<LPVOID *>(&DiaDataSource))))
66819e77d1SZachary Turner     return Error::success();
6773853ab4SNico Weber 
6873853ab4SNico Weber // If the CoCreateInstance call above failed, msdia*.dll is not registered.
6973853ab4SNico Weber // Try loading the DLL corresponding to the #included DIA SDK.
7073853ab4SNico Weber #if !defined(_MSC_VER)
71819e77d1SZachary Turner   return llvm::make_error<GenericError>(
72819e77d1SZachary Turner       "DIA is only supported when using MSVC.");
73fb58be86SReid Kleckner #else
7473853ab4SNico Weber   const wchar_t *msdia_dll = nullptr;
75fb58be86SReid Kleckner #if _MSC_VER >= 1900 && _MSC_VER < 2000
7673853ab4SNico Weber   msdia_dll = L"msdia140.dll"; // VS2015
77fb58be86SReid Kleckner #elif _MSC_VER >= 1800
7873853ab4SNico Weber   msdia_dll = L"msdia120.dll"; // VS2013
7973853ab4SNico Weber #else
8073853ab4SNico Weber #error "Unknown Visual Studio version."
8173853ab4SNico Weber #endif
8223ee87bdSZachary Turner 
83819e77d1SZachary Turner   HRESULT HR;
84819e77d1SZachary Turner   if (FAILED(HR = NoRegCoCreate(msdia_dll, CLSID_DiaSource, IID_IDiaDataSource,
8523ee87bdSZachary Turner                                 reinterpret_cast<LPVOID *>(&DiaDataSource))))
8638380323SZachary Turner     return ErrorFromHResult(HR, "Calling NoRegCoCreate");
87819e77d1SZachary Turner   return Error::success();
88fb58be86SReid Kleckner #endif
8973853ab4SNico Weber }
90cffff26bSZachary Turner 
91cffff26bSZachary Turner DIASession::DIASession(CComPtr<IDiaSession> DiaSession) : Session(DiaSession) {}
92cffff26bSZachary Turner 
93819e77d1SZachary Turner Error DIASession::createFromPdb(StringRef Path,
94ccf04159SZachary Turner                                 std::unique_ptr<IPDBSession> &Session) {
95ccf04159SZachary Turner   CComPtr<IDiaDataSource> DiaDataSource;
96ccf04159SZachary Turner   CComPtr<IDiaSession> DiaSession;
97cffff26bSZachary Turner 
98cffff26bSZachary Turner   // We assume that CoInitializeEx has already been called by the executable.
99819e77d1SZachary Turner   if (auto E = LoadDIA(DiaDataSource))
100819e77d1SZachary Turner     return E;
101cffff26bSZachary Turner 
102cffff26bSZachary Turner   llvm::SmallVector<UTF16, 128> Path16;
103cffff26bSZachary Turner   if (!llvm::convertUTF8ToUTF16String(Path, Path16))
104819e77d1SZachary Turner     return make_error<GenericError>(generic_error_code::invalid_path);
105cffff26bSZachary Turner 
106cffff26bSZachary Turner   const wchar_t *Path16Str = reinterpret_cast<const wchar_t*>(Path16.data());
107819e77d1SZachary Turner   HRESULT HR;
108*1690164cSZachary Turner   if (FAILED(HR = DiaDataSource->loadDataFromPdb(Path16Str))) {
109*1690164cSZachary Turner     return ErrorFromHResult(HR, "Calling loadDataFromPdb {0}", Path);
110*1690164cSZachary Turner   }
111cffff26bSZachary Turner 
112819e77d1SZachary Turner   if (FAILED(HR = DiaDataSource->openSession(&DiaSession)))
11338380323SZachary Turner     return ErrorFromHResult(HR, "Calling openSession");
114ccf04159SZachary Turner 
115ccf04159SZachary Turner   Session.reset(new DIASession(DiaSession));
116819e77d1SZachary Turner   return Error::success();
117cffff26bSZachary Turner }
118cffff26bSZachary Turner 
119819e77d1SZachary Turner Error DIASession::createFromExe(StringRef Path,
1204b08354bSZachary Turner                                 std::unique_ptr<IPDBSession> &Session) {
1214b08354bSZachary Turner   CComPtr<IDiaDataSource> DiaDataSource;
1224b08354bSZachary Turner   CComPtr<IDiaSession> DiaSession;
1234b08354bSZachary Turner 
1244b08354bSZachary Turner   // We assume that CoInitializeEx has already been called by the executable.
125819e77d1SZachary Turner   if (auto EC = LoadDIA(DiaDataSource))
126819e77d1SZachary Turner     return EC;
1274b08354bSZachary Turner 
1284b08354bSZachary Turner   llvm::SmallVector<UTF16, 128> Path16;
1294b08354bSZachary Turner   if (!llvm::convertUTF8ToUTF16String(Path, Path16))
130819e77d1SZachary Turner     return make_error<GenericError>(generic_error_code::invalid_path, Path);
1314b08354bSZachary Turner 
1324b08354bSZachary Turner   const wchar_t *Path16Str = reinterpret_cast<const wchar_t *>(Path16.data());
133819e77d1SZachary Turner   HRESULT HR;
134819e77d1SZachary Turner   if (FAILED(HR = DiaDataSource->loadDataForExe(Path16Str, nullptr, nullptr)))
13538380323SZachary Turner     return ErrorFromHResult(HR, "Calling loadDataForExe");
1364b08354bSZachary Turner 
137819e77d1SZachary Turner   if (FAILED(HR = DiaDataSource->openSession(&DiaSession)))
13838380323SZachary Turner     return ErrorFromHResult(HR, "Calling openSession");
1394b08354bSZachary Turner 
1404b08354bSZachary Turner   Session.reset(new DIASession(DiaSession));
141819e77d1SZachary Turner   return Error::success();
1424b08354bSZachary Turner }
1434b08354bSZachary Turner 
144cffff26bSZachary Turner uint64_t DIASession::getLoadAddress() const {
145cffff26bSZachary Turner   uint64_t LoadAddress;
146cffff26bSZachary Turner   bool success = (S_OK == Session->get_loadAddress(&LoadAddress));
147cffff26bSZachary Turner   return (success) ? LoadAddress : 0;
148cffff26bSZachary Turner }
149cffff26bSZachary Turner 
150cffff26bSZachary Turner void DIASession::setLoadAddress(uint64_t Address) {
151cffff26bSZachary Turner   Session->put_loadAddress(Address);
152cffff26bSZachary Turner }
153cffff26bSZachary Turner 
154c883a8c6SZachary Turner std::unique_ptr<PDBSymbolExe> DIASession::getGlobalScope() const {
155cffff26bSZachary Turner   CComPtr<IDiaSymbol> GlobalScope;
156cffff26bSZachary Turner   if (S_OK != Session->get_globalScope(&GlobalScope))
157cffff26bSZachary Turner     return nullptr;
158cffff26bSZachary Turner 
159be6d1e49SZachary Turner   auto RawSymbol = llvm::make_unique<DIARawSymbol>(*this, GlobalScope);
160cffff26bSZachary Turner   auto PdbSymbol(PDBSymbol::create(*this, std::move(RawSymbol)));
161cffff26bSZachary Turner   std::unique_ptr<PDBSymbolExe> ExeSymbol(
162cffff26bSZachary Turner       static_cast<PDBSymbolExe *>(PdbSymbol.release()));
163cffff26bSZachary Turner   return ExeSymbol;
164cffff26bSZachary Turner }
165cffff26bSZachary Turner 
166cffff26bSZachary Turner std::unique_ptr<PDBSymbol> DIASession::getSymbolById(uint32_t SymbolId) const {
167cffff26bSZachary Turner   CComPtr<IDiaSymbol> LocatedSymbol;
168cffff26bSZachary Turner   if (S_OK != Session->symbolById(SymbolId, &LocatedSymbol))
169cffff26bSZachary Turner     return nullptr;
170cffff26bSZachary Turner 
171be6d1e49SZachary Turner   auto RawSymbol = llvm::make_unique<DIARawSymbol>(*this, LocatedSymbol);
172cffff26bSZachary Turner   return PDBSymbol::create(*this, std::move(RawSymbol));
173cffff26bSZachary Turner }
174cffff26bSZachary Turner 
1754b08354bSZachary Turner std::unique_ptr<PDBSymbol>
176e5cb2693SZachary Turner DIASession::findSymbolByAddress(uint64_t Address, PDB_SymType Type) const {
177e5cb2693SZachary Turner   enum SymTagEnum EnumVal = static_cast<enum SymTagEnum>(Type);
178e5cb2693SZachary Turner 
1794b08354bSZachary Turner   CComPtr<IDiaSymbol> Symbol;
180e5cb2693SZachary Turner   if (S_OK != Session->findSymbolByVA(Address, EnumVal, &Symbol)) {
181e5cb2693SZachary Turner     ULONGLONG LoadAddr = 0;
182e5cb2693SZachary Turner     if (S_OK != Session->get_loadAddress(&LoadAddr))
1834b08354bSZachary Turner       return nullptr;
184e5cb2693SZachary Turner     DWORD RVA = static_cast<DWORD>(Address - LoadAddr);
185e5cb2693SZachary Turner     if (S_OK != Session->findSymbolByRVA(RVA, EnumVal, &Symbol))
186e5cb2693SZachary Turner       return nullptr;
187e5cb2693SZachary Turner   }
1884b08354bSZachary Turner   auto RawSymbol = llvm::make_unique<DIARawSymbol>(*this, Symbol);
1894b08354bSZachary Turner   return PDBSymbol::create(*this, std::move(RawSymbol));
1904b08354bSZachary Turner }
1914b08354bSZachary Turner 
1924b08354bSZachary Turner std::unique_ptr<IPDBEnumLineNumbers>
19343ec3af9SZachary Turner DIASession::findLineNumbers(const PDBSymbolCompiland &Compiland,
19443ec3af9SZachary Turner                             const IPDBSourceFile &File) const {
19543ec3af9SZachary Turner   const DIARawSymbol &RawCompiland =
19643ec3af9SZachary Turner       static_cast<const DIARawSymbol &>(Compiland.getRawSymbol());
19743ec3af9SZachary Turner   const DIASourceFile &RawFile = static_cast<const DIASourceFile &>(File);
19843ec3af9SZachary Turner 
19943ec3af9SZachary Turner   CComPtr<IDiaEnumLineNumbers> LineNumbers;
20043ec3af9SZachary Turner   if (S_OK !=
20143ec3af9SZachary Turner       Session->findLines(RawCompiland.getDiaSymbol(), RawFile.getDiaFile(),
20243ec3af9SZachary Turner                          &LineNumbers))
20343ec3af9SZachary Turner     return nullptr;
20443ec3af9SZachary Turner 
20543ec3af9SZachary Turner   return llvm::make_unique<DIAEnumLineNumbers>(LineNumbers);
20643ec3af9SZachary Turner }
20743ec3af9SZachary Turner 
20843ec3af9SZachary Turner std::unique_ptr<IPDBEnumLineNumbers>
2094b08354bSZachary Turner DIASession::findLineNumbersByAddress(uint64_t Address, uint32_t Length) const {
2104b08354bSZachary Turner   CComPtr<IDiaEnumLineNumbers> LineNumbers;
2114b08354bSZachary Turner   if (S_OK != Session->findLinesByVA(Address, Length, &LineNumbers))
2124b08354bSZachary Turner     return nullptr;
2134b08354bSZachary Turner 
2144b08354bSZachary Turner   return llvm::make_unique<DIAEnumLineNumbers>(LineNumbers);
2154b08354bSZachary Turner }
2164b08354bSZachary Turner 
21743ec3af9SZachary Turner std::unique_ptr<IPDBEnumSourceFiles>
21843ec3af9SZachary Turner DIASession::findSourceFiles(const PDBSymbolCompiland *Compiland,
21943ec3af9SZachary Turner                             llvm::StringRef Pattern,
22043ec3af9SZachary Turner                             PDB_NameSearchFlags Flags) const {
22143ec3af9SZachary Turner   IDiaSymbol *DiaCompiland = nullptr;
22243ec3af9SZachary Turner   CComBSTR Utf16Pattern;
22343ec3af9SZachary Turner   if (!Pattern.empty())
22443ec3af9SZachary Turner     Utf16Pattern = CComBSTR(Pattern.data());
22543ec3af9SZachary Turner 
22643ec3af9SZachary Turner   if (Compiland)
22743ec3af9SZachary Turner     DiaCompiland = static_cast<const DIARawSymbol &>(Compiland->getRawSymbol())
22843ec3af9SZachary Turner                        .getDiaSymbol();
22943ec3af9SZachary Turner 
23043ec3af9SZachary Turner   Flags = static_cast<PDB_NameSearchFlags>(
23143ec3af9SZachary Turner       Flags | PDB_NameSearchFlags::NS_FileNameExtMatch);
23243ec3af9SZachary Turner   CComPtr<IDiaEnumSourceFiles> SourceFiles;
23343ec3af9SZachary Turner   if (S_OK !=
23443ec3af9SZachary Turner       Session->findFile(DiaCompiland, Utf16Pattern.m_str, Flags, &SourceFiles))
23543ec3af9SZachary Turner     return nullptr;
23643ec3af9SZachary Turner   return llvm::make_unique<DIAEnumSourceFiles>(*this, SourceFiles);
23743ec3af9SZachary Turner }
23843ec3af9SZachary Turner 
23943ec3af9SZachary Turner std::unique_ptr<IPDBSourceFile>
24043ec3af9SZachary Turner DIASession::findOneSourceFile(const PDBSymbolCompiland *Compiland,
24143ec3af9SZachary Turner                               llvm::StringRef Pattern,
24243ec3af9SZachary Turner                               PDB_NameSearchFlags Flags) const {
24343ec3af9SZachary Turner   auto SourceFiles = findSourceFiles(Compiland, Pattern, Flags);
24443ec3af9SZachary Turner   if (!SourceFiles || SourceFiles->getChildCount() == 0)
24543ec3af9SZachary Turner     return nullptr;
24643ec3af9SZachary Turner   return SourceFiles->getNext();
24743ec3af9SZachary Turner }
24843ec3af9SZachary Turner 
24943ec3af9SZachary Turner std::unique_ptr<IPDBEnumChildren<PDBSymbolCompiland>>
25043ec3af9SZachary Turner DIASession::findCompilandsForSourceFile(llvm::StringRef Pattern,
25143ec3af9SZachary Turner                                         PDB_NameSearchFlags Flags) const {
25243ec3af9SZachary Turner   auto File = findOneSourceFile(nullptr, Pattern, Flags);
25343ec3af9SZachary Turner   if (!File)
25443ec3af9SZachary Turner     return nullptr;
25543ec3af9SZachary Turner   return File->getCompilands();
25643ec3af9SZachary Turner }
25743ec3af9SZachary Turner 
25843ec3af9SZachary Turner std::unique_ptr<PDBSymbolCompiland>
25943ec3af9SZachary Turner DIASession::findOneCompilandForSourceFile(llvm::StringRef Pattern,
26043ec3af9SZachary Turner                                           PDB_NameSearchFlags Flags) const {
26143ec3af9SZachary Turner   auto Compilands = findCompilandsForSourceFile(Pattern, Flags);
26243ec3af9SZachary Turner   if (!Compilands || Compilands->getChildCount() == 0)
26343ec3af9SZachary Turner     return nullptr;
26443ec3af9SZachary Turner   return Compilands->getNext();
26543ec3af9SZachary Turner }
26643ec3af9SZachary Turner 
267a5549178SZachary Turner std::unique_ptr<IPDBEnumSourceFiles> DIASession::getAllSourceFiles() const {
268a5549178SZachary Turner   CComPtr<IDiaEnumSourceFiles> Files;
269a5549178SZachary Turner   if (S_OK != Session->findFile(nullptr, nullptr, nsNone, &Files))
270a5549178SZachary Turner     return nullptr;
271a5549178SZachary Turner 
272be6d1e49SZachary Turner   return llvm::make_unique<DIAEnumSourceFiles>(*this, Files);
273a5549178SZachary Turner }
274a5549178SZachary Turner 
275a5549178SZachary Turner std::unique_ptr<IPDBEnumSourceFiles> DIASession::getSourceFilesForCompiland(
276a5549178SZachary Turner     const PDBSymbolCompiland &Compiland) const {
277a5549178SZachary Turner   CComPtr<IDiaEnumSourceFiles> Files;
278a5549178SZachary Turner 
279a5549178SZachary Turner   const DIARawSymbol &RawSymbol =
280a5549178SZachary Turner       static_cast<const DIARawSymbol &>(Compiland.getRawSymbol());
281a5549178SZachary Turner   if (S_OK !=
282a5549178SZachary Turner       Session->findFile(RawSymbol.getDiaSymbol(), nullptr, nsNone, &Files))
283a5549178SZachary Turner     return nullptr;
284a5549178SZachary Turner 
285be6d1e49SZachary Turner   return llvm::make_unique<DIAEnumSourceFiles>(*this, Files);
286a5549178SZachary Turner }
287a5549178SZachary Turner 
288cffff26bSZachary Turner std::unique_ptr<IPDBSourceFile>
289cffff26bSZachary Turner DIASession::getSourceFileById(uint32_t FileId) const {
290cffff26bSZachary Turner   CComPtr<IDiaSourceFile> LocatedFile;
291cffff26bSZachary Turner   if (S_OK != Session->findFileById(FileId, &LocatedFile))
292cffff26bSZachary Turner     return nullptr;
293cffff26bSZachary Turner 
294be6d1e49SZachary Turner   return llvm::make_unique<DIASourceFile>(*this, LocatedFile);
295cffff26bSZachary Turner }
296cffff26bSZachary Turner 
297cffff26bSZachary Turner std::unique_ptr<IPDBEnumDataStreams> DIASession::getDebugStreams() const {
298cffff26bSZachary Turner   CComPtr<IDiaEnumDebugStreams> DiaEnumerator;
299cffff26bSZachary Turner   if (S_OK != Session->getEnumDebugStreams(&DiaEnumerator))
300cffff26bSZachary Turner     return nullptr;
301cffff26bSZachary Turner 
302be6d1e49SZachary Turner   return llvm::make_unique<DIAEnumDebugStreams>(DiaEnumerator);
303cffff26bSZachary Turner }
304