180814287SRaphael Isemann //===-- ObjectFilePECOFF.cpp ----------------------------------------------===//
2f754f88fSGreg Clayton //
32946cd70SChandler Carruth // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
42946cd70SChandler Carruth // See https://llvm.org/LICENSE.txt for license information.
52946cd70SChandler Carruth // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6f754f88fSGreg Clayton //
7f754f88fSGreg Clayton //===----------------------------------------------------------------------===//
8f754f88fSGreg Clayton 
9f754f88fSGreg Clayton #include "ObjectFilePECOFF.h"
1030c2441aSAleksandr Urakov #include "PECallFrameInfo.h"
11f7d1893fSAdrian McCarthy #include "WindowsMiniDump.h"
12f754f88fSGreg Clayton 
13f754f88fSGreg Clayton #include "lldb/Core/FileSpecList.h"
14f754f88fSGreg Clayton #include "lldb/Core/Module.h"
15f4d6de6aSGreg Clayton #include "lldb/Core/ModuleSpec.h"
16f754f88fSGreg Clayton #include "lldb/Core/PluginManager.h"
17f754f88fSGreg Clayton #include "lldb/Core/Section.h"
18f754f88fSGreg Clayton #include "lldb/Core/StreamFile.h"
19f754f88fSGreg Clayton #include "lldb/Symbol/ObjectFile.h"
20f7d1893fSAdrian McCarthy #include "lldb/Target/Process.h"
212756adf3SVirgile Bello #include "lldb/Target/SectionLoadList.h"
222756adf3SVirgile Bello #include "lldb/Target/Target.h"
235f19b907SPavel Labath #include "lldb/Utility/ArchSpec.h"
24666cc0b2SZachary Turner #include "lldb/Utility/DataBufferHeap.h"
255713a05bSZachary Turner #include "lldb/Utility/FileSpec.h"
26037ed1beSAaron Smith #include "lldb/Utility/Log.h"
27bf9a7730SZachary Turner #include "lldb/Utility/StreamString.h"
2838d0632eSPavel Labath #include "lldb/Utility/Timer.h"
29666cc0b2SZachary Turner #include "lldb/Utility/UUID.h"
305f19b907SPavel Labath #include "llvm/BinaryFormat/COFF.h"
31f754f88fSGreg Clayton 
32037ed1beSAaron Smith #include "llvm/Object/COFFImportFile.h"
33037ed1beSAaron Smith #include "llvm/Support/Error.h"
343f4a4b36SZachary Turner #include "llvm/Support/MemoryBuffer.h"
353f4a4b36SZachary Turner 
36f754f88fSGreg Clayton #define IMAGE_DOS_SIGNATURE 0x5A4D    // MZ
37f754f88fSGreg Clayton #define IMAGE_NT_SIGNATURE 0x00004550 // PE00
38f754f88fSGreg Clayton #define OPT_HEADER_MAGIC_PE32 0x010b
39f754f88fSGreg Clayton #define OPT_HEADER_MAGIC_PE32_PLUS 0x020b
40f754f88fSGreg Clayton 
41f754f88fSGreg Clayton using namespace lldb;
42f754f88fSGreg Clayton using namespace lldb_private;
43f754f88fSGreg Clayton 
44bba9ba8dSJonas Devlieghere LLDB_PLUGIN_DEFINE(ObjectFilePECOFF)
45fbb4d1e4SJonas Devlieghere 
46b8d03935SAaron Smith struct CVInfoPdb70 {
47b8d03935SAaron Smith   // 16-byte GUID
48b8d03935SAaron Smith   struct _Guid {
49b8d03935SAaron Smith     llvm::support::ulittle32_t Data1;
50b8d03935SAaron Smith     llvm::support::ulittle16_t Data2;
51b8d03935SAaron Smith     llvm::support::ulittle16_t Data3;
52b8d03935SAaron Smith     uint8_t Data4[8];
53b8d03935SAaron Smith   } Guid;
54b8d03935SAaron Smith 
55b8d03935SAaron Smith   llvm::support::ulittle32_t Age;
56b8d03935SAaron Smith };
57b8d03935SAaron Smith 
58d372a8e8SPavel Labath static UUID GetCoffUUID(llvm::object::COFFObjectFile &coff_obj) {
59b8d03935SAaron Smith   const llvm::codeview::DebugInfo *pdb_info = nullptr;
60b8d03935SAaron Smith   llvm::StringRef pdb_file;
61b8d03935SAaron Smith 
62b8d03935SAaron Smith   // This part is similar with what has done in minidump parser.
63d372a8e8SPavel Labath   if (!coff_obj.getDebugPDBInfo(pdb_info, pdb_file) && pdb_info) {
64b8d03935SAaron Smith     if (pdb_info->PDB70.CVSignature == llvm::OMF::Signature::PDB70) {
65b8d03935SAaron Smith       using llvm::support::endian::read16be;
66b8d03935SAaron Smith       using llvm::support::endian::read32be;
67b8d03935SAaron Smith 
68b8d03935SAaron Smith       const uint8_t *sig = pdb_info->PDB70.Signature;
69b8d03935SAaron Smith       struct CVInfoPdb70 info;
70b8d03935SAaron Smith       info.Guid.Data1 = read32be(sig);
71b8d03935SAaron Smith       sig += 4;
72b8d03935SAaron Smith       info.Guid.Data2 = read16be(sig);
73b8d03935SAaron Smith       sig += 2;
74b8d03935SAaron Smith       info.Guid.Data3 = read16be(sig);
75b8d03935SAaron Smith       sig += 2;
76b8d03935SAaron Smith       memcpy(info.Guid.Data4, sig, 8);
77b8d03935SAaron Smith 
78b8d03935SAaron Smith       // Return 20-byte UUID if the Age is not zero
79b8d03935SAaron Smith       if (pdb_info->PDB70.Age) {
80b8d03935SAaron Smith         info.Age = read32be(&pdb_info->PDB70.Age);
81b8d03935SAaron Smith         return UUID::fromOptionalData(&info, sizeof(info));
82b8d03935SAaron Smith       }
83b8d03935SAaron Smith       // Otherwise return 16-byte GUID
84b8d03935SAaron Smith       return UUID::fromOptionalData(&info.Guid, sizeof(info.Guid));
85b8d03935SAaron Smith     }
86b8d03935SAaron Smith   }
87b8d03935SAaron Smith 
88b8d03935SAaron Smith   return UUID();
89b8d03935SAaron Smith }
90b8d03935SAaron Smith 
91e84f7841SPavel Labath char ObjectFilePECOFF::ID;
92e84f7841SPavel Labath 
93b9c1b51eSKate Stone void ObjectFilePECOFF::Initialize() {
94b9c1b51eSKate Stone   PluginManager::RegisterPlugin(
95b9c1b51eSKate Stone       GetPluginNameStatic(), GetPluginDescriptionStatic(), CreateInstance,
96b9c1b51eSKate Stone       CreateMemoryInstance, GetModuleSpecifications, SaveCore);
97f754f88fSGreg Clayton }
98f754f88fSGreg Clayton 
99b9c1b51eSKate Stone void ObjectFilePECOFF::Terminate() {
100f754f88fSGreg Clayton   PluginManager::UnregisterPlugin(CreateInstance);
101f754f88fSGreg Clayton }
102f754f88fSGreg Clayton 
103b9c1b51eSKate Stone lldb_private::ConstString ObjectFilePECOFF::GetPluginNameStatic() {
10457abc5d6SGreg Clayton   static ConstString g_name("pe-coff");
10557abc5d6SGreg Clayton   return g_name;
106f754f88fSGreg Clayton }
107f754f88fSGreg Clayton 
108b9c1b51eSKate Stone const char *ObjectFilePECOFF::GetPluginDescriptionStatic() {
109b9c1b51eSKate Stone   return "Portable Executable and Common Object File Format object file reader "
110b9c1b51eSKate Stone          "(32 and 64 bit)";
111f754f88fSGreg Clayton }
112f754f88fSGreg Clayton 
113b9c1b51eSKate Stone ObjectFile *ObjectFilePECOFF::CreateInstance(const lldb::ModuleSP &module_sp,
1145ce9c565SGreg Clayton                                              DataBufferSP &data_sp,
1155ce9c565SGreg Clayton                                              lldb::offset_t data_offset,
11628e4942bSPavel Labath                                              const lldb_private::FileSpec *file_p,
1175ce9c565SGreg Clayton                                              lldb::offset_t file_offset,
118b9c1b51eSKate Stone                                              lldb::offset_t length) {
11928e4942bSPavel Labath   FileSpec file = file_p ? *file_p : FileSpec();
120b9c1b51eSKate Stone   if (!data_sp) {
12150251fc7SPavel Labath     data_sp = MapFileData(file, length, file_offset);
1223f4a4b36SZachary Turner     if (!data_sp)
1233f4a4b36SZachary Turner       return nullptr;
1245ce9c565SGreg Clayton     data_offset = 0;
1255ce9c565SGreg Clayton   }
1265ce9c565SGreg Clayton 
1273f4a4b36SZachary Turner   if (!ObjectFilePECOFF::MagicBytesMatch(data_sp))
1283f4a4b36SZachary Turner     return nullptr;
1293f4a4b36SZachary Turner 
1305ce9c565SGreg Clayton   // Update the data to contain the entire file if it doesn't already
1313f4a4b36SZachary Turner   if (data_sp->GetByteSize() < length) {
13250251fc7SPavel Labath     data_sp = MapFileData(file, length, file_offset);
1333f4a4b36SZachary Turner     if (!data_sp)
1343f4a4b36SZachary Turner       return nullptr;
135f754f88fSGreg Clayton   }
1363f4a4b36SZachary Turner 
137a8f3ae7cSJonas Devlieghere   auto objfile_up = std::make_unique<ObjectFilePECOFF>(
13828e4942bSPavel Labath       module_sp, data_sp, data_offset, file_p, file_offset, length);
139d5b44036SJonas Devlieghere   if (!objfile_up || !objfile_up->ParseHeader())
1403f4a4b36SZachary Turner     return nullptr;
1413f4a4b36SZachary Turner 
142037ed1beSAaron Smith   // Cache coff binary.
143d5b44036SJonas Devlieghere   if (!objfile_up->CreateBinary())
144037ed1beSAaron Smith     return nullptr;
145037ed1beSAaron Smith 
146d5b44036SJonas Devlieghere   return objfile_up.release();
147f754f88fSGreg Clayton }
148f754f88fSGreg Clayton 
149b9c1b51eSKate Stone ObjectFile *ObjectFilePECOFF::CreateMemoryInstance(
150b9c1b51eSKate Stone     const lldb::ModuleSP &module_sp, lldb::DataBufferSP &data_sp,
151b9c1b51eSKate Stone     const lldb::ProcessSP &process_sp, lldb::addr_t header_addr) {
152344546bdSWalter Erquinigo   if (!data_sp || !ObjectFilePECOFF::MagicBytesMatch(data_sp))
153344546bdSWalter Erquinigo     return nullptr;
154a8f3ae7cSJonas Devlieghere   auto objfile_up = std::make_unique<ObjectFilePECOFF>(
155344546bdSWalter Erquinigo       module_sp, data_sp, process_sp, header_addr);
156d5b44036SJonas Devlieghere   if (objfile_up.get() && objfile_up->ParseHeader()) {
157d5b44036SJonas Devlieghere     return objfile_up.release();
158344546bdSWalter Erquinigo   }
159344546bdSWalter Erquinigo   return nullptr;
160c9660546SGreg Clayton }
161c9660546SGreg Clayton 
162b9c1b51eSKate Stone size_t ObjectFilePECOFF::GetModuleSpecifications(
163b9c1b51eSKate Stone     const lldb_private::FileSpec &file, lldb::DataBufferSP &data_sp,
164b9c1b51eSKate Stone     lldb::offset_t data_offset, lldb::offset_t file_offset,
165b9c1b51eSKate Stone     lldb::offset_t length, lldb_private::ModuleSpecList &specs) {
16689eb1baeSVirgile Bello   const size_t initial_count = specs.GetSize();
167b8d03935SAaron Smith   if (!data_sp || !ObjectFilePECOFF::MagicBytesMatch(data_sp))
168b8d03935SAaron Smith     return initial_count;
16989eb1baeSVirgile Bello 
1703db1d138SMartin Storsjö   Log *log(GetLogIfAllCategoriesSet(LIBLLDB_LOG_OBJECT));
1713db1d138SMartin Storsjö 
172a4a00cedSFred Riss   if (data_sp->GetByteSize() < length)
173d372a8e8SPavel Labath     if (DataBufferSP full_sp = MapFileData(file, -1, file_offset))
174d372a8e8SPavel Labath       data_sp = std::move(full_sp);
175d372a8e8SPavel Labath   auto binary = llvm::object::createBinary(llvm::MemoryBufferRef(
176d372a8e8SPavel Labath       toStringRef(data_sp->GetData()), file.GetFilename().GetStringRef()));
1773db1d138SMartin Storsjö 
1783db1d138SMartin Storsjö   if (!binary) {
1793db1d138SMartin Storsjö     LLDB_LOG_ERROR(log, binary.takeError(),
1803db1d138SMartin Storsjö                    "Failed to create binary for file ({1}): {0}", file);
181b8d03935SAaron Smith     return initial_count;
1823db1d138SMartin Storsjö   }
18389eb1baeSVirgile Bello 
184d372a8e8SPavel Labath   auto *COFFObj = llvm::dyn_cast<llvm::object::COFFObjectFile>(binary->get());
185d372a8e8SPavel Labath   if (!COFFObj)
186b8d03935SAaron Smith     return initial_count;
18789eb1baeSVirgile Bello 
188b8d03935SAaron Smith   ModuleSpec module_spec(file);
189b8d03935SAaron Smith   ArchSpec &spec = module_spec.GetArchitecture();
190b8d03935SAaron Smith   lldb_private::UUID &uuid = module_spec.GetUUID();
191b8d03935SAaron Smith   if (!uuid.IsValid())
192d372a8e8SPavel Labath     uuid = GetCoffUUID(*COFFObj);
193b8d03935SAaron Smith 
194b8d03935SAaron Smith   switch (COFFObj->getMachine()) {
195b8d03935SAaron Smith   case MachineAmd64:
196ad587ae4SZachary Turner     spec.SetTriple("x86_64-pc-windows");
197b8d03935SAaron Smith     specs.Append(module_spec);
198b8d03935SAaron Smith     break;
199b8d03935SAaron Smith   case MachineX86:
200ad587ae4SZachary Turner     spec.SetTriple("i386-pc-windows");
201b8d03935SAaron Smith     specs.Append(module_spec);
2025e6f4520SZachary Turner     spec.SetTriple("i686-pc-windows");
203b8d03935SAaron Smith     specs.Append(module_spec);
204b8d03935SAaron Smith     break;
205b8d03935SAaron Smith   case MachineArmNt:
206544c8f48SMartin Storsjo     spec.SetTriple("armv7-pc-windows");
207b8d03935SAaron Smith     specs.Append(module_spec);
208b8d03935SAaron Smith     break;
209638f072fSMartin Storsjo   case MachineArm64:
210674d5543SMartin Storsjo     spec.SetTriple("aarch64-pc-windows");
211638f072fSMartin Storsjo     specs.Append(module_spec);
212638f072fSMartin Storsjo     break;
213b8d03935SAaron Smith   default:
214b8d03935SAaron Smith     break;
21589eb1baeSVirgile Bello   }
21689eb1baeSVirgile Bello 
21789eb1baeSVirgile Bello   return specs.GetSize() - initial_count;
218f4d6de6aSGreg Clayton }
219f4d6de6aSGreg Clayton 
220b9c1b51eSKate Stone bool ObjectFilePECOFF::SaveCore(const lldb::ProcessSP &process_sp,
221f7d1893fSAdrian McCarthy                                 const lldb_private::FileSpec &outfile,
22297206d57SZachary Turner                                 lldb_private::Status &error) {
223f7d1893fSAdrian McCarthy   return SaveMiniDump(process_sp, outfile, error);
224f7d1893fSAdrian McCarthy }
225f7d1893fSAdrian McCarthy 
226b9c1b51eSKate Stone bool ObjectFilePECOFF::MagicBytesMatch(DataBufferSP &data_sp) {
2275ce9c565SGreg Clayton   DataExtractor data(data_sp, eByteOrderLittle, 4);
228c7bece56SGreg Clayton   lldb::offset_t offset = 0;
229f754f88fSGreg Clayton   uint16_t magic = data.GetU16(&offset);
230f754f88fSGreg Clayton   return magic == IMAGE_DOS_SIGNATURE;
231f754f88fSGreg Clayton }
232f754f88fSGreg Clayton 
233b9c1b51eSKate Stone lldb::SymbolType ObjectFilePECOFF::MapSymbolType(uint16_t coff_symbol_type) {
234c35b91ceSAdrian McCarthy   // TODO:  We need to complete this mapping of COFF symbol types to LLDB ones.
235c35b91ceSAdrian McCarthy   // For now, here's a hack to make sure our function have types.
236b9c1b51eSKate Stone   const auto complex_type =
237b9c1b51eSKate Stone       coff_symbol_type >> llvm::COFF::SCT_COMPLEX_TYPE_SHIFT;
238b9c1b51eSKate Stone   if (complex_type == llvm::COFF::IMAGE_SYM_DTYPE_FUNCTION) {
239c35b91ceSAdrian McCarthy     return lldb::eSymbolTypeCode;
240c35b91ceSAdrian McCarthy   }
241c35b91ceSAdrian McCarthy   return lldb::eSymbolTypeInvalid;
242c35b91ceSAdrian McCarthy }
243f754f88fSGreg Clayton 
244037ed1beSAaron Smith bool ObjectFilePECOFF::CreateBinary() {
245d372a8e8SPavel Labath   if (m_binary)
246037ed1beSAaron Smith     return true;
247037ed1beSAaron Smith 
248037ed1beSAaron Smith   Log *log(GetLogIfAllCategoriesSet(LIBLLDB_LOG_OBJECT));
249037ed1beSAaron Smith 
250d372a8e8SPavel Labath   auto binary = llvm::object::createBinary(llvm::MemoryBufferRef(
251d372a8e8SPavel Labath       toStringRef(m_data.GetData()), m_file.GetFilename().GetStringRef()));
252037ed1beSAaron Smith   if (!binary) {
2533db1d138SMartin Storsjö     LLDB_LOG_ERROR(log, binary.takeError(),
2543db1d138SMartin Storsjö                    "Failed to create binary for file ({1}): {0}", m_file);
255037ed1beSAaron Smith     return false;
256037ed1beSAaron Smith   }
257037ed1beSAaron Smith 
258037ed1beSAaron Smith   // Make sure we only handle COFF format.
259d372a8e8SPavel Labath   m_binary =
260d372a8e8SPavel Labath       llvm::unique_dyn_cast<llvm::object::COFFObjectFile>(std::move(*binary));
261d372a8e8SPavel Labath   if (!m_binary)
262037ed1beSAaron Smith     return false;
263037ed1beSAaron Smith 
264d372a8e8SPavel Labath   LLDB_LOG(log, "this = {0}, module = {1} ({2}), file = {3}, binary = {4}",
265d372a8e8SPavel Labath            this, GetModule().get(), GetModule()->GetSpecificationDescription(),
266d372a8e8SPavel Labath            m_file.GetPath(), m_binary.get());
267037ed1beSAaron Smith   return true;
268037ed1beSAaron Smith }
269037ed1beSAaron Smith 
270e72dfb32SGreg Clayton ObjectFilePECOFF::ObjectFilePECOFF(const lldb::ModuleSP &module_sp,
2715ce9c565SGreg Clayton                                    DataBufferSP &data_sp,
2725ce9c565SGreg Clayton                                    lldb::offset_t data_offset,
273f754f88fSGreg Clayton                                    const FileSpec *file,
2745ce9c565SGreg Clayton                                    lldb::offset_t file_offset,
275b9c1b51eSKate Stone                                    lldb::offset_t length)
276b9c1b51eSKate Stone     : ObjectFile(module_sp, file, file_offset, length, data_sp, data_offset),
2775c43ffd6SPavel Labath       m_dos_header(), m_coff_header(), m_sect_headers(),
278d372a8e8SPavel Labath       m_entry_point_address(), m_deps_filespec() {
279f754f88fSGreg Clayton   ::memset(&m_dos_header, 0, sizeof(m_dos_header));
280f754f88fSGreg Clayton   ::memset(&m_coff_header, 0, sizeof(m_coff_header));
281f754f88fSGreg Clayton }
282f754f88fSGreg Clayton 
283344546bdSWalter Erquinigo ObjectFilePECOFF::ObjectFilePECOFF(const lldb::ModuleSP &module_sp,
284344546bdSWalter Erquinigo                                    DataBufferSP &header_data_sp,
285344546bdSWalter Erquinigo                                    const lldb::ProcessSP &process_sp,
286344546bdSWalter Erquinigo                                    addr_t header_addr)
287344546bdSWalter Erquinigo     : ObjectFile(module_sp, process_sp, header_addr, header_data_sp),
2885c43ffd6SPavel Labath       m_dos_header(), m_coff_header(), m_sect_headers(),
289d372a8e8SPavel Labath       m_entry_point_address(), m_deps_filespec() {
290344546bdSWalter Erquinigo   ::memset(&m_dos_header, 0, sizeof(m_dos_header));
291344546bdSWalter Erquinigo   ::memset(&m_coff_header, 0, sizeof(m_coff_header));
292344546bdSWalter Erquinigo }
293344546bdSWalter Erquinigo 
294b9c1b51eSKate Stone ObjectFilePECOFF::~ObjectFilePECOFF() {}
295f754f88fSGreg Clayton 
296b9c1b51eSKate Stone bool ObjectFilePECOFF::ParseHeader() {
297a1743499SGreg Clayton   ModuleSP module_sp(GetModule());
298b9c1b51eSKate Stone   if (module_sp) {
29916ff8604SSaleem Abdulrasool     std::lock_guard<std::recursive_mutex> guard(module_sp->GetMutex());
300f754f88fSGreg Clayton     m_sect_headers.clear();
301f754f88fSGreg Clayton     m_data.SetByteOrder(eByteOrderLittle);
302c7bece56SGreg Clayton     lldb::offset_t offset = 0;
303f754f88fSGreg Clayton 
304b9c1b51eSKate Stone     if (ParseDOSHeader(m_data, m_dos_header)) {
305f754f88fSGreg Clayton       offset = m_dos_header.e_lfanew;
306f754f88fSGreg Clayton       uint32_t pe_signature = m_data.GetU32(&offset);
307f754f88fSGreg Clayton       if (pe_signature != IMAGE_NT_SIGNATURE)
308f754f88fSGreg Clayton         return false;
309b9c1b51eSKate Stone       if (ParseCOFFHeader(m_data, &offset, m_coff_header)) {
310f754f88fSGreg Clayton         if (m_coff_header.hdrsize > 0)
311f754f88fSGreg Clayton           ParseCOFFOptionalHeader(&offset);
312f754f88fSGreg Clayton         ParseSectionHeaders(offset);
31328469ca3SGreg Clayton       }
314a0f72441SMartin Storsjö       m_data.SetAddressByteSize(GetAddressByteSize());
315f754f88fSGreg Clayton       return true;
316f754f88fSGreg Clayton     }
317a1743499SGreg Clayton   }
318f754f88fSGreg Clayton   return false;
319f754f88fSGreg Clayton }
320f754f88fSGreg Clayton 
321b9c1b51eSKate Stone bool ObjectFilePECOFF::SetLoadAddress(Target &target, addr_t value,
322b9c1b51eSKate Stone                                       bool value_is_offset) {
3232756adf3SVirgile Bello   bool changed = false;
3242756adf3SVirgile Bello   ModuleSP module_sp = GetModule();
325b9c1b51eSKate Stone   if (module_sp) {
3262756adf3SVirgile Bello     size_t num_loaded_sections = 0;
3272756adf3SVirgile Bello     SectionList *section_list = GetSectionList();
328b9c1b51eSKate Stone     if (section_list) {
329b9c1b51eSKate Stone       if (!value_is_offset) {
3302756adf3SVirgile Bello         value -= m_image_base;
3312756adf3SVirgile Bello       }
3322756adf3SVirgile Bello 
3332756adf3SVirgile Bello       const size_t num_sections = section_list->GetSize();
3342756adf3SVirgile Bello       size_t sect_idx = 0;
3352756adf3SVirgile Bello 
336b9c1b51eSKate Stone       for (sect_idx = 0; sect_idx < num_sections; ++sect_idx) {
33705097246SAdrian Prantl         // Iterate through the object file sections to find all of the sections
33805097246SAdrian Prantl         // that have SHF_ALLOC in their flag bits.
3392756adf3SVirgile Bello         SectionSP section_sp(section_list->GetSectionAtIndex(sect_idx));
340b9c1b51eSKate Stone         if (section_sp && !section_sp->IsThreadSpecific()) {
341b9c1b51eSKate Stone           if (target.GetSectionLoadList().SetSectionLoadAddress(
342b9c1b51eSKate Stone                   section_sp, section_sp->GetFileAddress() + value))
3432756adf3SVirgile Bello             ++num_loaded_sections;
3442756adf3SVirgile Bello         }
3452756adf3SVirgile Bello       }
3462756adf3SVirgile Bello       changed = num_loaded_sections > 0;
3472756adf3SVirgile Bello     }
3482756adf3SVirgile Bello   }
3492756adf3SVirgile Bello   return changed;
3502756adf3SVirgile Bello }
3512756adf3SVirgile Bello 
352b9c1b51eSKate Stone ByteOrder ObjectFilePECOFF::GetByteOrder() const { return eByteOrderLittle; }
353f754f88fSGreg Clayton 
354b9c1b51eSKate Stone bool ObjectFilePECOFF::IsExecutable() const {
355237ad974SCharles Davis   return (m_coff_header.flags & llvm::COFF::IMAGE_FILE_DLL) == 0;
356f754f88fSGreg Clayton }
357f754f88fSGreg Clayton 
358b9c1b51eSKate Stone uint32_t ObjectFilePECOFF::GetAddressByteSize() const {
359f754f88fSGreg Clayton   if (m_coff_header_opt.magic == OPT_HEADER_MAGIC_PE32_PLUS)
360f754f88fSGreg Clayton     return 8;
361f754f88fSGreg Clayton   else if (m_coff_header_opt.magic == OPT_HEADER_MAGIC_PE32)
362f754f88fSGreg Clayton     return 4;
363f754f88fSGreg Clayton   return 4;
364f754f88fSGreg Clayton }
365f754f88fSGreg Clayton 
366f754f88fSGreg Clayton // NeedsEndianSwap
367f754f88fSGreg Clayton //
36805097246SAdrian Prantl // Return true if an endian swap needs to occur when extracting data from this
36905097246SAdrian Prantl // file.
370b9c1b51eSKate Stone bool ObjectFilePECOFF::NeedsEndianSwap() const {
371f754f88fSGreg Clayton #if defined(__LITTLE_ENDIAN__)
372f754f88fSGreg Clayton   return false;
373f754f88fSGreg Clayton #else
374f754f88fSGreg Clayton   return true;
375f754f88fSGreg Clayton #endif
376f754f88fSGreg Clayton }
377f754f88fSGreg Clayton // ParseDOSHeader
378b9c1b51eSKate Stone bool ObjectFilePECOFF::ParseDOSHeader(DataExtractor &data,
379b9c1b51eSKate Stone                                       dos_header_t &dos_header) {
380f754f88fSGreg Clayton   bool success = false;
381c7bece56SGreg Clayton   lldb::offset_t offset = 0;
38289eb1baeSVirgile Bello   success = data.ValidOffsetForDataOfSize(0, sizeof(dos_header));
383f754f88fSGreg Clayton 
384b9c1b51eSKate Stone   if (success) {
38589eb1baeSVirgile Bello     dos_header.e_magic = data.GetU16(&offset); // Magic number
38689eb1baeSVirgile Bello     success = dos_header.e_magic == IMAGE_DOS_SIGNATURE;
387f754f88fSGreg Clayton 
388b9c1b51eSKate Stone     if (success) {
38989eb1baeSVirgile Bello       dos_header.e_cblp = data.GetU16(&offset); // Bytes on last page of file
39089eb1baeSVirgile Bello       dos_header.e_cp = data.GetU16(&offset);   // Pages in file
39189eb1baeSVirgile Bello       dos_header.e_crlc = data.GetU16(&offset); // Relocations
392b9c1b51eSKate Stone       dos_header.e_cparhdr =
393b9c1b51eSKate Stone           data.GetU16(&offset); // Size of header in paragraphs
394b9c1b51eSKate Stone       dos_header.e_minalloc =
395b9c1b51eSKate Stone           data.GetU16(&offset); // Minimum extra paragraphs needed
396b9c1b51eSKate Stone       dos_header.e_maxalloc =
397b9c1b51eSKate Stone           data.GetU16(&offset);               // Maximum extra paragraphs needed
39889eb1baeSVirgile Bello       dos_header.e_ss = data.GetU16(&offset); // Initial (relative) SS value
39989eb1baeSVirgile Bello       dos_header.e_sp = data.GetU16(&offset); // Initial SP value
40089eb1baeSVirgile Bello       dos_header.e_csum = data.GetU16(&offset); // Checksum
40189eb1baeSVirgile Bello       dos_header.e_ip = data.GetU16(&offset);   // Initial IP value
40289eb1baeSVirgile Bello       dos_header.e_cs = data.GetU16(&offset);   // Initial (relative) CS value
403b9c1b51eSKate Stone       dos_header.e_lfarlc =
404b9c1b51eSKate Stone           data.GetU16(&offset); // File address of relocation table
40589eb1baeSVirgile Bello       dos_header.e_ovno = data.GetU16(&offset); // Overlay number
406f754f88fSGreg Clayton 
40789eb1baeSVirgile Bello       dos_header.e_res[0] = data.GetU16(&offset); // Reserved words
40889eb1baeSVirgile Bello       dos_header.e_res[1] = data.GetU16(&offset); // Reserved words
40989eb1baeSVirgile Bello       dos_header.e_res[2] = data.GetU16(&offset); // Reserved words
41089eb1baeSVirgile Bello       dos_header.e_res[3] = data.GetU16(&offset); // Reserved words
411f754f88fSGreg Clayton 
412b9c1b51eSKate Stone       dos_header.e_oemid =
413b9c1b51eSKate Stone           data.GetU16(&offset); // OEM identifier (for e_oeminfo)
414b9c1b51eSKate Stone       dos_header.e_oeminfo =
415b9c1b51eSKate Stone           data.GetU16(&offset); // OEM information; e_oemid specific
41689eb1baeSVirgile Bello       dos_header.e_res2[0] = data.GetU16(&offset); // Reserved words
41789eb1baeSVirgile Bello       dos_header.e_res2[1] = data.GetU16(&offset); // Reserved words
41889eb1baeSVirgile Bello       dos_header.e_res2[2] = data.GetU16(&offset); // Reserved words
41989eb1baeSVirgile Bello       dos_header.e_res2[3] = data.GetU16(&offset); // Reserved words
42089eb1baeSVirgile Bello       dos_header.e_res2[4] = data.GetU16(&offset); // Reserved words
42189eb1baeSVirgile Bello       dos_header.e_res2[5] = data.GetU16(&offset); // Reserved words
42289eb1baeSVirgile Bello       dos_header.e_res2[6] = data.GetU16(&offset); // Reserved words
42389eb1baeSVirgile Bello       dos_header.e_res2[7] = data.GetU16(&offset); // Reserved words
42489eb1baeSVirgile Bello       dos_header.e_res2[8] = data.GetU16(&offset); // Reserved words
42589eb1baeSVirgile Bello       dos_header.e_res2[9] = data.GetU16(&offset); // Reserved words
426f754f88fSGreg Clayton 
427b9c1b51eSKate Stone       dos_header.e_lfanew =
428b9c1b51eSKate Stone           data.GetU32(&offset); // File address of new exe header
429f754f88fSGreg Clayton     }
430f754f88fSGreg Clayton   }
431f754f88fSGreg Clayton   if (!success)
43289eb1baeSVirgile Bello     memset(&dos_header, 0, sizeof(dos_header));
433f754f88fSGreg Clayton   return success;
434f754f88fSGreg Clayton }
435f754f88fSGreg Clayton 
436f754f88fSGreg Clayton // ParserCOFFHeader
437b9c1b51eSKate Stone bool ObjectFilePECOFF::ParseCOFFHeader(DataExtractor &data,
438b9c1b51eSKate Stone                                        lldb::offset_t *offset_ptr,
439b9c1b51eSKate Stone                                        coff_header_t &coff_header) {
440b9c1b51eSKate Stone   bool success =
441b9c1b51eSKate Stone       data.ValidOffsetForDataOfSize(*offset_ptr, sizeof(coff_header));
442b9c1b51eSKate Stone   if (success) {
44389eb1baeSVirgile Bello     coff_header.machine = data.GetU16(offset_ptr);
44489eb1baeSVirgile Bello     coff_header.nsects = data.GetU16(offset_ptr);
44589eb1baeSVirgile Bello     coff_header.modtime = data.GetU32(offset_ptr);
44689eb1baeSVirgile Bello     coff_header.symoff = data.GetU32(offset_ptr);
44789eb1baeSVirgile Bello     coff_header.nsyms = data.GetU32(offset_ptr);
44889eb1baeSVirgile Bello     coff_header.hdrsize = data.GetU16(offset_ptr);
44989eb1baeSVirgile Bello     coff_header.flags = data.GetU16(offset_ptr);
450f754f88fSGreg Clayton   }
451f754f88fSGreg Clayton   if (!success)
45289eb1baeSVirgile Bello     memset(&coff_header, 0, sizeof(coff_header));
453f754f88fSGreg Clayton   return success;
454f754f88fSGreg Clayton }
455f754f88fSGreg Clayton 
456b9c1b51eSKate Stone bool ObjectFilePECOFF::ParseCOFFOptionalHeader(lldb::offset_t *offset_ptr) {
457f754f88fSGreg Clayton   bool success = false;
458c7bece56SGreg Clayton   const lldb::offset_t end_offset = *offset_ptr + m_coff_header.hdrsize;
459b9c1b51eSKate Stone   if (*offset_ptr < end_offset) {
460f754f88fSGreg Clayton     success = true;
461f754f88fSGreg Clayton     m_coff_header_opt.magic = m_data.GetU16(offset_ptr);
462f754f88fSGreg Clayton     m_coff_header_opt.major_linker_version = m_data.GetU8(offset_ptr);
463f754f88fSGreg Clayton     m_coff_header_opt.minor_linker_version = m_data.GetU8(offset_ptr);
464f754f88fSGreg Clayton     m_coff_header_opt.code_size = m_data.GetU32(offset_ptr);
465f754f88fSGreg Clayton     m_coff_header_opt.data_size = m_data.GetU32(offset_ptr);
466f754f88fSGreg Clayton     m_coff_header_opt.bss_size = m_data.GetU32(offset_ptr);
467f754f88fSGreg Clayton     m_coff_header_opt.entry = m_data.GetU32(offset_ptr);
468f754f88fSGreg Clayton     m_coff_header_opt.code_offset = m_data.GetU32(offset_ptr);
469f754f88fSGreg Clayton 
470f754f88fSGreg Clayton     const uint32_t addr_byte_size = GetAddressByteSize();
471f754f88fSGreg Clayton 
472b9c1b51eSKate Stone     if (*offset_ptr < end_offset) {
473b9c1b51eSKate Stone       if (m_coff_header_opt.magic == OPT_HEADER_MAGIC_PE32) {
474f754f88fSGreg Clayton         // PE32 only
475f754f88fSGreg Clayton         m_coff_header_opt.data_offset = m_data.GetU32(offset_ptr);
476b9c1b51eSKate Stone       } else
477f754f88fSGreg Clayton         m_coff_header_opt.data_offset = 0;
478f754f88fSGreg Clayton 
479b9c1b51eSKate Stone       if (*offset_ptr < end_offset) {
480b9c1b51eSKate Stone         m_coff_header_opt.image_base =
481b9c1b51eSKate Stone             m_data.GetMaxU64(offset_ptr, addr_byte_size);
482f754f88fSGreg Clayton         m_coff_header_opt.sect_alignment = m_data.GetU32(offset_ptr);
483f754f88fSGreg Clayton         m_coff_header_opt.file_alignment = m_data.GetU32(offset_ptr);
484f754f88fSGreg Clayton         m_coff_header_opt.major_os_system_version = m_data.GetU16(offset_ptr);
485f754f88fSGreg Clayton         m_coff_header_opt.minor_os_system_version = m_data.GetU16(offset_ptr);
486f754f88fSGreg Clayton         m_coff_header_opt.major_image_version = m_data.GetU16(offset_ptr);
487f754f88fSGreg Clayton         m_coff_header_opt.minor_image_version = m_data.GetU16(offset_ptr);
488f754f88fSGreg Clayton         m_coff_header_opt.major_subsystem_version = m_data.GetU16(offset_ptr);
489f754f88fSGreg Clayton         m_coff_header_opt.minor_subsystem_version = m_data.GetU16(offset_ptr);
490f754f88fSGreg Clayton         m_coff_header_opt.reserved1 = m_data.GetU32(offset_ptr);
491f754f88fSGreg Clayton         m_coff_header_opt.image_size = m_data.GetU32(offset_ptr);
492f754f88fSGreg Clayton         m_coff_header_opt.header_size = m_data.GetU32(offset_ptr);
49328469ca3SGreg Clayton         m_coff_header_opt.checksum = m_data.GetU32(offset_ptr);
494f754f88fSGreg Clayton         m_coff_header_opt.subsystem = m_data.GetU16(offset_ptr);
495f754f88fSGreg Clayton         m_coff_header_opt.dll_flags = m_data.GetU16(offset_ptr);
496b9c1b51eSKate Stone         m_coff_header_opt.stack_reserve_size =
497b9c1b51eSKate Stone             m_data.GetMaxU64(offset_ptr, addr_byte_size);
498b9c1b51eSKate Stone         m_coff_header_opt.stack_commit_size =
499b9c1b51eSKate Stone             m_data.GetMaxU64(offset_ptr, addr_byte_size);
500b9c1b51eSKate Stone         m_coff_header_opt.heap_reserve_size =
501b9c1b51eSKate Stone             m_data.GetMaxU64(offset_ptr, addr_byte_size);
502b9c1b51eSKate Stone         m_coff_header_opt.heap_commit_size =
503b9c1b51eSKate Stone             m_data.GetMaxU64(offset_ptr, addr_byte_size);
504f754f88fSGreg Clayton         m_coff_header_opt.loader_flags = m_data.GetU32(offset_ptr);
505f754f88fSGreg Clayton         uint32_t num_data_dir_entries = m_data.GetU32(offset_ptr);
506f754f88fSGreg Clayton         m_coff_header_opt.data_dirs.clear();
507f754f88fSGreg Clayton         m_coff_header_opt.data_dirs.resize(num_data_dir_entries);
508f754f88fSGreg Clayton         uint32_t i;
509b9c1b51eSKate Stone         for (i = 0; i < num_data_dir_entries; i++) {
510f754f88fSGreg Clayton           m_coff_header_opt.data_dirs[i].vmaddr = m_data.GetU32(offset_ptr);
511f754f88fSGreg Clayton           m_coff_header_opt.data_dirs[i].vmsize = m_data.GetU32(offset_ptr);
512f754f88fSGreg Clayton         }
5132756adf3SVirgile Bello 
5142756adf3SVirgile Bello         m_image_base = m_coff_header_opt.image_base;
515f754f88fSGreg Clayton       }
516f754f88fSGreg Clayton     }
517f754f88fSGreg Clayton   }
518f754f88fSGreg Clayton   // Make sure we are on track for section data which follows
519f754f88fSGreg Clayton   *offset_ptr = end_offset;
520f754f88fSGreg Clayton   return success;
521f754f88fSGreg Clayton }
522f754f88fSGreg Clayton 
52330c2441aSAleksandr Urakov uint32_t ObjectFilePECOFF::GetRVA(const Address &addr) const {
52430c2441aSAleksandr Urakov   return addr.GetFileAddress() - m_image_base;
52530c2441aSAleksandr Urakov }
52630c2441aSAleksandr Urakov 
52730c2441aSAleksandr Urakov Address ObjectFilePECOFF::GetAddress(uint32_t rva) {
52830c2441aSAleksandr Urakov   SectionList *sect_list = GetSectionList();
52930c2441aSAleksandr Urakov   if (!sect_list)
53030c2441aSAleksandr Urakov     return Address(GetFileAddress(rva));
53130c2441aSAleksandr Urakov 
53230c2441aSAleksandr Urakov   return Address(GetFileAddress(rva), sect_list);
53330c2441aSAleksandr Urakov }
53430c2441aSAleksandr Urakov 
53530c2441aSAleksandr Urakov lldb::addr_t ObjectFilePECOFF::GetFileAddress(uint32_t rva) const {
53630c2441aSAleksandr Urakov   return m_image_base + rva;
53730c2441aSAleksandr Urakov }
53830c2441aSAleksandr Urakov 
539344546bdSWalter Erquinigo DataExtractor ObjectFilePECOFF::ReadImageData(uint32_t offset, size_t size) {
54030c2441aSAleksandr Urakov   if (!size)
54130c2441aSAleksandr Urakov     return {};
54230c2441aSAleksandr Urakov 
543a4a00cedSFred Riss   if (m_data.ValidOffsetForDataOfSize(offset, size))
544a4a00cedSFred Riss     return DataExtractor(m_data, offset, size);
545a4a00cedSFred Riss 
546344546bdSWalter Erquinigo   ProcessSP process_sp(m_process_wp.lock());
547344546bdSWalter Erquinigo   DataExtractor data;
548344546bdSWalter Erquinigo   if (process_sp) {
549a8f3ae7cSJonas Devlieghere     auto data_up = std::make_unique<DataBufferHeap>(size, 0);
55097206d57SZachary Turner     Status readmem_error;
551344546bdSWalter Erquinigo     size_t bytes_read =
552d5b44036SJonas Devlieghere         process_sp->ReadMemory(m_image_base + offset, data_up->GetBytes(),
553d5b44036SJonas Devlieghere                                data_up->GetByteSize(), readmem_error);
554344546bdSWalter Erquinigo     if (bytes_read == size) {
555d5b44036SJonas Devlieghere       DataBufferSP buffer_sp(data_up.release());
556344546bdSWalter Erquinigo       data.SetData(buffer_sp, 0, buffer_sp->GetByteSize());
557344546bdSWalter Erquinigo     }
558344546bdSWalter Erquinigo   }
559344546bdSWalter Erquinigo   return data;
560344546bdSWalter Erquinigo }
561344546bdSWalter Erquinigo 
56230c2441aSAleksandr Urakov DataExtractor ObjectFilePECOFF::ReadImageDataByRVA(uint32_t rva, size_t size) {
56330c2441aSAleksandr Urakov   Address addr = GetAddress(rva);
5647e1a3076SMartin Storsjö   SectionSP sect = addr.GetSection();
5657e1a3076SMartin Storsjö   if (!sect)
5667e1a3076SMartin Storsjö     return {};
5677e1a3076SMartin Storsjö   rva = sect->GetFileOffset() + addr.GetOffset();
56830c2441aSAleksandr Urakov 
56930c2441aSAleksandr Urakov   return ReadImageData(rva, size);
57030c2441aSAleksandr Urakov }
57130c2441aSAleksandr Urakov 
572f754f88fSGreg Clayton // ParseSectionHeaders
573b9c1b51eSKate Stone bool ObjectFilePECOFF::ParseSectionHeaders(
574b9c1b51eSKate Stone     uint32_t section_header_data_offset) {
575f754f88fSGreg Clayton   const uint32_t nsects = m_coff_header.nsects;
576f754f88fSGreg Clayton   m_sect_headers.clear();
577f754f88fSGreg Clayton 
578b9c1b51eSKate Stone   if (nsects > 0) {
579f754f88fSGreg Clayton     const size_t section_header_byte_size = nsects * sizeof(section_header_t);
580344546bdSWalter Erquinigo     DataExtractor section_header_data =
581344546bdSWalter Erquinigo         ReadImageData(section_header_data_offset, section_header_byte_size);
582f754f88fSGreg Clayton 
583c7bece56SGreg Clayton     lldb::offset_t offset = 0;
584b9c1b51eSKate Stone     if (section_header_data.ValidOffsetForDataOfSize(
585b9c1b51eSKate Stone             offset, section_header_byte_size)) {
586f754f88fSGreg Clayton       m_sect_headers.resize(nsects);
587f754f88fSGreg Clayton 
588b9c1b51eSKate Stone       for (uint32_t idx = 0; idx < nsects; ++idx) {
589f754f88fSGreg Clayton         const void *name_data = section_header_data.GetData(&offset, 8);
590b9c1b51eSKate Stone         if (name_data) {
591f754f88fSGreg Clayton           memcpy(m_sect_headers[idx].name, name_data, 8);
592f754f88fSGreg Clayton           m_sect_headers[idx].vmsize = section_header_data.GetU32(&offset);
593f754f88fSGreg Clayton           m_sect_headers[idx].vmaddr = section_header_data.GetU32(&offset);
594f754f88fSGreg Clayton           m_sect_headers[idx].size = section_header_data.GetU32(&offset);
595f754f88fSGreg Clayton           m_sect_headers[idx].offset = section_header_data.GetU32(&offset);
596f754f88fSGreg Clayton           m_sect_headers[idx].reloff = section_header_data.GetU32(&offset);
597f754f88fSGreg Clayton           m_sect_headers[idx].lineoff = section_header_data.GetU32(&offset);
598f754f88fSGreg Clayton           m_sect_headers[idx].nreloc = section_header_data.GetU16(&offset);
599f754f88fSGreg Clayton           m_sect_headers[idx].nline = section_header_data.GetU16(&offset);
600f754f88fSGreg Clayton           m_sect_headers[idx].flags = section_header_data.GetU32(&offset);
601f754f88fSGreg Clayton         }
602f754f88fSGreg Clayton       }
603f754f88fSGreg Clayton     }
604f754f88fSGreg Clayton   }
605f754f88fSGreg Clayton 
606a6682a41SJonas Devlieghere   return !m_sect_headers.empty();
607f754f88fSGreg Clayton }
608f754f88fSGreg Clayton 
6092886e4a0SPavel Labath llvm::StringRef ObjectFilePECOFF::GetSectionName(const section_header_t &sect) {
6102886e4a0SPavel Labath   llvm::StringRef hdr_name(sect.name, llvm::array_lengthof(sect.name));
6112886e4a0SPavel Labath   hdr_name = hdr_name.split('\0').first;
6122886e4a0SPavel Labath   if (hdr_name.consume_front("/")) {
6132886e4a0SPavel Labath     lldb::offset_t stroff;
6142886e4a0SPavel Labath     if (!to_integer(hdr_name, stroff, 10))
6152886e4a0SPavel Labath       return "";
616b9c1b51eSKate Stone     lldb::offset_t string_file_offset =
617b9c1b51eSKate Stone         m_coff_header.symoff + (m_coff_header.nsyms * 18) + stroff;
6182886e4a0SPavel Labath     if (const char *name = m_data.GetCStr(&string_file_offset))
6192886e4a0SPavel Labath       return name;
6202886e4a0SPavel Labath     return "";
621f754f88fSGreg Clayton   }
6222886e4a0SPavel Labath   return hdr_name;
623f754f88fSGreg Clayton }
624f754f88fSGreg Clayton 
625f754f88fSGreg Clayton // GetNListSymtab
626b9c1b51eSKate Stone Symtab *ObjectFilePECOFF::GetSymtab() {
627a1743499SGreg Clayton   ModuleSP module_sp(GetModule());
628b9c1b51eSKate Stone   if (module_sp) {
62916ff8604SSaleem Abdulrasool     std::lock_guard<std::recursive_mutex> guard(module_sp->GetMutex());
630248a1305SKonrad Kleine     if (m_symtab_up == nullptr) {
631f754f88fSGreg Clayton       SectionList *sect_list = GetSectionList();
63206412daeSJonas Devlieghere       m_symtab_up = std::make_unique<Symtab>(this);
633d5b44036SJonas Devlieghere       std::lock_guard<std::recursive_mutex> guard(m_symtab_up->GetMutex());
63428469ca3SGreg Clayton 
63528469ca3SGreg Clayton       const uint32_t num_syms = m_coff_header.nsyms;
63628469ca3SGreg Clayton 
637344546bdSWalter Erquinigo       if (m_file && num_syms > 0 && m_coff_header.symoff > 0) {
6380076e715SGreg Clayton         const uint32_t symbol_size = 18;
63928469ca3SGreg Clayton         const size_t symbol_data_size = num_syms * symbol_size;
640c35b91ceSAdrian McCarthy         // Include the 4-byte string table size at the end of the symbols
641344546bdSWalter Erquinigo         DataExtractor symtab_data =
642344546bdSWalter Erquinigo             ReadImageData(m_coff_header.symoff, symbol_data_size + 4);
643c7bece56SGreg Clayton         lldb::offset_t offset = symbol_data_size;
64428469ca3SGreg Clayton         const uint32_t strtab_size = symtab_data.GetU32(&offset);
645344546bdSWalter Erquinigo         if (strtab_size > 0) {
646344546bdSWalter Erquinigo           DataExtractor strtab_data = ReadImageData(
647344546bdSWalter Erquinigo               m_coff_header.symoff + symbol_data_size, strtab_size);
64828469ca3SGreg Clayton 
64928469ca3SGreg Clayton           offset = 0;
65028469ca3SGreg Clayton           std::string symbol_name;
651d5b44036SJonas Devlieghere           Symbol *symbols = m_symtab_up->Resize(num_syms);
652b9c1b51eSKate Stone           for (uint32_t i = 0; i < num_syms; ++i) {
653f754f88fSGreg Clayton             coff_symbol_t symbol;
65428469ca3SGreg Clayton             const uint32_t symbol_offset = offset;
655248a1305SKonrad Kleine             const char *symbol_name_cstr = nullptr;
656c35b91ceSAdrian McCarthy             // If the first 4 bytes of the symbol string are zero, then they
657c35b91ceSAdrian McCarthy             // are followed by a 4-byte string table offset. Else these
65828469ca3SGreg Clayton             // 8 bytes contain the symbol name
659b9c1b51eSKate Stone             if (symtab_data.GetU32(&offset) == 0) {
66005097246SAdrian Prantl               // Long string that doesn't fit into the symbol table name, so
66105097246SAdrian Prantl               // now we must read the 4 byte string table offset
66228469ca3SGreg Clayton               uint32_t strtab_offset = symtab_data.GetU32(&offset);
66328469ca3SGreg Clayton               symbol_name_cstr = strtab_data.PeekCStr(strtab_offset);
66428469ca3SGreg Clayton               symbol_name.assign(symbol_name_cstr);
665b9c1b51eSKate Stone             } else {
666b9c1b51eSKate Stone               // Short string that fits into the symbol table name which is 8
667b9c1b51eSKate Stone               // bytes
66828469ca3SGreg Clayton               offset += sizeof(symbol.name) - 4; // Skip remaining
66928469ca3SGreg Clayton               symbol_name_cstr = symtab_data.PeekCStr(symbol_offset);
670248a1305SKonrad Kleine               if (symbol_name_cstr == nullptr)
671f754f88fSGreg Clayton                 break;
67228469ca3SGreg Clayton               symbol_name.assign(symbol_name_cstr, sizeof(symbol.name));
67328469ca3SGreg Clayton             }
67428469ca3SGreg Clayton             symbol.value = symtab_data.GetU32(&offset);
67528469ca3SGreg Clayton             symbol.sect = symtab_data.GetU16(&offset);
67628469ca3SGreg Clayton             symbol.type = symtab_data.GetU16(&offset);
67728469ca3SGreg Clayton             symbol.storage = symtab_data.GetU8(&offset);
67828469ca3SGreg Clayton             symbol.naux = symtab_data.GetU8(&offset);
679037520e9SGreg Clayton             symbols[i].GetMangled().SetValue(ConstString(symbol_name.c_str()));
680b9c1b51eSKate Stone             if ((int16_t)symbol.sect >= 1) {
6814394b5beSMartin Storsjö               Address symbol_addr(sect_list->FindSectionByID(symbol.sect),
682b9c1b51eSKate Stone                                   symbol.value);
683358cf1eaSGreg Clayton               symbols[i].GetAddressRef() = symbol_addr;
684c35b91ceSAdrian McCarthy               symbols[i].SetType(MapSymbolType(symbol.type));
6850076e715SGreg Clayton             }
686f754f88fSGreg Clayton 
687b9c1b51eSKate Stone             if (symbol.naux > 0) {
688f754f88fSGreg Clayton               i += symbol.naux;
689*f07ddbc9SMartin Storsjö               offset += symbol.naux * symbol_size;
6900076e715SGreg Clayton             }
691f754f88fSGreg Clayton           }
692f754f88fSGreg Clayton         }
693344546bdSWalter Erquinigo       }
694a4fe3a12SVirgile Bello 
695a4fe3a12SVirgile Bello       // Read export header
696b9c1b51eSKate Stone       if (coff_data_dir_export_table < m_coff_header_opt.data_dirs.size() &&
697b9c1b51eSKate Stone           m_coff_header_opt.data_dirs[coff_data_dir_export_table].vmsize > 0 &&
698b9c1b51eSKate Stone           m_coff_header_opt.data_dirs[coff_data_dir_export_table].vmaddr > 0) {
699a4fe3a12SVirgile Bello         export_directory_entry export_table;
700b9c1b51eSKate Stone         uint32_t data_start =
701b9c1b51eSKate Stone             m_coff_header_opt.data_dirs[coff_data_dir_export_table].vmaddr;
702344546bdSWalter Erquinigo 
70330c2441aSAleksandr Urakov         DataExtractor symtab_data = ReadImageDataByRVA(
70430c2441aSAleksandr Urakov             data_start, m_coff_header_opt.data_dirs[0].vmsize);
705a4fe3a12SVirgile Bello         lldb::offset_t offset = 0;
706a4fe3a12SVirgile Bello 
707a4fe3a12SVirgile Bello         // Read export_table header
708a4fe3a12SVirgile Bello         export_table.characteristics = symtab_data.GetU32(&offset);
709a4fe3a12SVirgile Bello         export_table.time_date_stamp = symtab_data.GetU32(&offset);
710a4fe3a12SVirgile Bello         export_table.major_version = symtab_data.GetU16(&offset);
711a4fe3a12SVirgile Bello         export_table.minor_version = symtab_data.GetU16(&offset);
712a4fe3a12SVirgile Bello         export_table.name = symtab_data.GetU32(&offset);
713a4fe3a12SVirgile Bello         export_table.base = symtab_data.GetU32(&offset);
714a4fe3a12SVirgile Bello         export_table.number_of_functions = symtab_data.GetU32(&offset);
715a4fe3a12SVirgile Bello         export_table.number_of_names = symtab_data.GetU32(&offset);
716a4fe3a12SVirgile Bello         export_table.address_of_functions = symtab_data.GetU32(&offset);
717a4fe3a12SVirgile Bello         export_table.address_of_names = symtab_data.GetU32(&offset);
718a4fe3a12SVirgile Bello         export_table.address_of_name_ordinals = symtab_data.GetU32(&offset);
719a4fe3a12SVirgile Bello 
720a4fe3a12SVirgile Bello         bool has_ordinal = export_table.address_of_name_ordinals != 0;
721a4fe3a12SVirgile Bello 
722a4fe3a12SVirgile Bello         lldb::offset_t name_offset = export_table.address_of_names - data_start;
723b9c1b51eSKate Stone         lldb::offset_t name_ordinal_offset =
724b9c1b51eSKate Stone             export_table.address_of_name_ordinals - data_start;
725a4fe3a12SVirgile Bello 
726d5b44036SJonas Devlieghere         Symbol *symbols = m_symtab_up->Resize(export_table.number_of_names);
727a4fe3a12SVirgile Bello 
728a4fe3a12SVirgile Bello         std::string symbol_name;
729a4fe3a12SVirgile Bello 
730a4fe3a12SVirgile Bello         // Read each export table entry
731b9c1b51eSKate Stone         for (size_t i = 0; i < export_table.number_of_names; ++i) {
732b9c1b51eSKate Stone           uint32_t name_ordinal =
733b9c1b51eSKate Stone               has_ordinal ? symtab_data.GetU16(&name_ordinal_offset) : i;
734a4fe3a12SVirgile Bello           uint32_t name_address = symtab_data.GetU32(&name_offset);
735a4fe3a12SVirgile Bello 
736b9c1b51eSKate Stone           const char *symbol_name_cstr =
737b9c1b51eSKate Stone               symtab_data.PeekCStr(name_address - data_start);
738a4fe3a12SVirgile Bello           symbol_name.assign(symbol_name_cstr);
739a4fe3a12SVirgile Bello 
740b9c1b51eSKate Stone           lldb::offset_t function_offset = export_table.address_of_functions -
741b9c1b51eSKate Stone                                            data_start +
742b9c1b51eSKate Stone                                            sizeof(uint32_t) * name_ordinal;
743a4fe3a12SVirgile Bello           uint32_t function_rva = symtab_data.GetU32(&function_offset);
744a4fe3a12SVirgile Bello 
745b9c1b51eSKate Stone           Address symbol_addr(m_coff_header_opt.image_base + function_rva,
746b9c1b51eSKate Stone                               sect_list);
747a4fe3a12SVirgile Bello           symbols[i].GetMangled().SetValue(ConstString(symbol_name.c_str()));
748358cf1eaSGreg Clayton           symbols[i].GetAddressRef() = symbol_addr;
749a4fe3a12SVirgile Bello           symbols[i].SetType(lldb::eSymbolTypeCode);
750a4fe3a12SVirgile Bello           symbols[i].SetDebug(true);
751a4fe3a12SVirgile Bello         }
752a4fe3a12SVirgile Bello       }
753d5b44036SJonas Devlieghere       m_symtab_up->CalculateSymbolSizes();
754f754f88fSGreg Clayton     }
755a1743499SGreg Clayton   }
756d5b44036SJonas Devlieghere   return m_symtab_up.get();
757f754f88fSGreg Clayton }
758f754f88fSGreg Clayton 
75930c2441aSAleksandr Urakov std::unique_ptr<CallFrameInfo> ObjectFilePECOFF::CreateCallFrameInfo() {
76030c2441aSAleksandr Urakov   if (coff_data_dir_exception_table >= m_coff_header_opt.data_dirs.size())
76130c2441aSAleksandr Urakov     return {};
76230c2441aSAleksandr Urakov 
76330c2441aSAleksandr Urakov   data_directory data_dir_exception =
76430c2441aSAleksandr Urakov       m_coff_header_opt.data_dirs[coff_data_dir_exception_table];
76530c2441aSAleksandr Urakov   if (!data_dir_exception.vmaddr)
76630c2441aSAleksandr Urakov     return {};
76730c2441aSAleksandr Urakov 
768aa786b88SMartin Storsjö   if (m_coff_header.machine != llvm::COFF::IMAGE_FILE_MACHINE_AMD64)
769aa786b88SMartin Storsjö     return {};
770aa786b88SMartin Storsjö 
77130c2441aSAleksandr Urakov   return std::make_unique<PECallFrameInfo>(*this, data_dir_exception.vmaddr,
77230c2441aSAleksandr Urakov                                            data_dir_exception.vmsize);
77330c2441aSAleksandr Urakov }
77430c2441aSAleksandr Urakov 
775b9c1b51eSKate Stone bool ObjectFilePECOFF::IsStripped() {
7763046e668SGreg Clayton   // TODO: determine this for COFF
7773046e668SGreg Clayton   return false;
7783046e668SGreg Clayton }
7793046e668SGreg Clayton 
7802e5bb6d8SMartin Storsjö SectionType ObjectFilePECOFF::GetSectionType(llvm::StringRef sect_name,
7812e5bb6d8SMartin Storsjö                                              const section_header_t &sect) {
7822e5bb6d8SMartin Storsjö   ConstString const_sect_name(sect_name);
7832e5bb6d8SMartin Storsjö   static ConstString g_code_sect_name(".code");
7842e5bb6d8SMartin Storsjö   static ConstString g_CODE_sect_name("CODE");
7852e5bb6d8SMartin Storsjö   static ConstString g_data_sect_name(".data");
7862e5bb6d8SMartin Storsjö   static ConstString g_DATA_sect_name("DATA");
7872e5bb6d8SMartin Storsjö   static ConstString g_bss_sect_name(".bss");
7882e5bb6d8SMartin Storsjö   static ConstString g_BSS_sect_name("BSS");
7892e5bb6d8SMartin Storsjö 
7902e5bb6d8SMartin Storsjö   if (sect.flags & llvm::COFF::IMAGE_SCN_CNT_CODE &&
7912e5bb6d8SMartin Storsjö       ((const_sect_name == g_code_sect_name) ||
7922e5bb6d8SMartin Storsjö        (const_sect_name == g_CODE_sect_name))) {
7932e5bb6d8SMartin Storsjö     return eSectionTypeCode;
7942e5bb6d8SMartin Storsjö   }
7952e5bb6d8SMartin Storsjö   if (sect.flags & llvm::COFF::IMAGE_SCN_CNT_INITIALIZED_DATA &&
7962e5bb6d8SMartin Storsjö              ((const_sect_name == g_data_sect_name) ||
7972e5bb6d8SMartin Storsjö               (const_sect_name == g_DATA_sect_name))) {
7982e5bb6d8SMartin Storsjö     if (sect.size == 0 && sect.offset == 0)
7992e5bb6d8SMartin Storsjö       return eSectionTypeZeroFill;
8002e5bb6d8SMartin Storsjö     else
8012e5bb6d8SMartin Storsjö       return eSectionTypeData;
8022e5bb6d8SMartin Storsjö   }
8032e5bb6d8SMartin Storsjö   if (sect.flags & llvm::COFF::IMAGE_SCN_CNT_UNINITIALIZED_DATA &&
8042e5bb6d8SMartin Storsjö              ((const_sect_name == g_bss_sect_name) ||
8052e5bb6d8SMartin Storsjö               (const_sect_name == g_BSS_sect_name))) {
8062e5bb6d8SMartin Storsjö     if (sect.size == 0)
8072e5bb6d8SMartin Storsjö       return eSectionTypeZeroFill;
8082e5bb6d8SMartin Storsjö     else
8092e5bb6d8SMartin Storsjö       return eSectionTypeData;
8102e5bb6d8SMartin Storsjö   }
8112e5bb6d8SMartin Storsjö 
8122e5bb6d8SMartin Storsjö   SectionType section_type =
8132e5bb6d8SMartin Storsjö       llvm::StringSwitch<SectionType>(sect_name)
8142e5bb6d8SMartin Storsjö           .Case(".debug", eSectionTypeDebug)
8152e5bb6d8SMartin Storsjö           .Case(".stabstr", eSectionTypeDataCString)
8162e5bb6d8SMartin Storsjö           .Case(".reloc", eSectionTypeOther)
8172e5bb6d8SMartin Storsjö           .Case(".debug_abbrev", eSectionTypeDWARFDebugAbbrev)
8182e5bb6d8SMartin Storsjö           .Case(".debug_aranges", eSectionTypeDWARFDebugAranges)
8192e5bb6d8SMartin Storsjö           .Case(".debug_frame", eSectionTypeDWARFDebugFrame)
8202e5bb6d8SMartin Storsjö           .Case(".debug_info", eSectionTypeDWARFDebugInfo)
8212e5bb6d8SMartin Storsjö           .Case(".debug_line", eSectionTypeDWARFDebugLine)
8222e5bb6d8SMartin Storsjö           .Case(".debug_loc", eSectionTypeDWARFDebugLoc)
8232e5bb6d8SMartin Storsjö           .Case(".debug_loclists", eSectionTypeDWARFDebugLocLists)
8242e5bb6d8SMartin Storsjö           .Case(".debug_macinfo", eSectionTypeDWARFDebugMacInfo)
8252e5bb6d8SMartin Storsjö           .Case(".debug_names", eSectionTypeDWARFDebugNames)
8262e5bb6d8SMartin Storsjö           .Case(".debug_pubnames", eSectionTypeDWARFDebugPubNames)
8272e5bb6d8SMartin Storsjö           .Case(".debug_pubtypes", eSectionTypeDWARFDebugPubTypes)
8282e5bb6d8SMartin Storsjö           .Case(".debug_ranges", eSectionTypeDWARFDebugRanges)
8292e5bb6d8SMartin Storsjö           .Case(".debug_str", eSectionTypeDWARFDebugStr)
8302e5bb6d8SMartin Storsjö           .Case(".debug_types", eSectionTypeDWARFDebugTypes)
831934c025eSMartin Storsjö           // .eh_frame can be truncated to 8 chars.
832934c025eSMartin Storsjö           .Cases(".eh_frame", ".eh_fram", eSectionTypeEHFrame)
8332e5bb6d8SMartin Storsjö           .Case(".gosymtab", eSectionTypeGoSymtab)
8342e5bb6d8SMartin Storsjö           .Default(eSectionTypeInvalid);
8352e5bb6d8SMartin Storsjö   if (section_type != eSectionTypeInvalid)
8362e5bb6d8SMartin Storsjö     return section_type;
8372e5bb6d8SMartin Storsjö 
8382e5bb6d8SMartin Storsjö   if (sect.flags & llvm::COFF::IMAGE_SCN_CNT_CODE)
8392e5bb6d8SMartin Storsjö     return eSectionTypeCode;
8402e5bb6d8SMartin Storsjö   if (sect.flags & llvm::COFF::IMAGE_SCN_CNT_INITIALIZED_DATA)
8412e5bb6d8SMartin Storsjö     return eSectionTypeData;
8422e5bb6d8SMartin Storsjö   if (sect.flags & llvm::COFF::IMAGE_SCN_CNT_UNINITIALIZED_DATA) {
8432e5bb6d8SMartin Storsjö     if (sect.size == 0)
8442e5bb6d8SMartin Storsjö       return eSectionTypeZeroFill;
8452e5bb6d8SMartin Storsjö     else
8462e5bb6d8SMartin Storsjö       return eSectionTypeData;
8472e5bb6d8SMartin Storsjö   }
8482e5bb6d8SMartin Storsjö   return eSectionTypeOther;
8492e5bb6d8SMartin Storsjö }
8502e5bb6d8SMartin Storsjö 
851b9c1b51eSKate Stone void ObjectFilePECOFF::CreateSections(SectionList &unified_section_list) {
852d5b44036SJonas Devlieghere   if (m_sections_up)
85388a2c2a4SPavel Labath     return;
85406412daeSJonas Devlieghere   m_sections_up = std::make_unique<SectionList>();
8553046e668SGreg Clayton 
856a1743499SGreg Clayton   ModuleSP module_sp(GetModule());
857b9c1b51eSKate Stone   if (module_sp) {
85816ff8604SSaleem Abdulrasool     std::lock_guard<std::recursive_mutex> guard(module_sp->GetMutex());
8597db8b5c4SPavel Labath 
86073a7a55cSPavel Labath     SectionSP header_sp = std::make_shared<Section>(
86173a7a55cSPavel Labath         module_sp, this, ~user_id_t(0), ConstString("PECOFF header"),
86273a7a55cSPavel Labath         eSectionTypeOther, m_coff_header_opt.image_base,
86373a7a55cSPavel Labath         m_coff_header_opt.header_size,
86473a7a55cSPavel Labath         /*file_offset*/ 0, m_coff_header_opt.header_size,
86573a7a55cSPavel Labath         m_coff_header_opt.sect_alignment,
8667db8b5c4SPavel Labath         /*flags*/ 0);
867f1e0ae34SPavel Labath     header_sp->SetPermissions(ePermissionsReadable);
86873a7a55cSPavel Labath     m_sections_up->AddSection(header_sp);
86973a7a55cSPavel Labath     unified_section_list.AddSection(header_sp);
8707db8b5c4SPavel Labath 
871f754f88fSGreg Clayton     const uint32_t nsects = m_sect_headers.size();
872e72dfb32SGreg Clayton     ModuleSP module_sp(GetModule());
873b9c1b51eSKate Stone     for (uint32_t idx = 0; idx < nsects; ++idx) {
8742e5bb6d8SMartin Storsjö       llvm::StringRef sect_name = GetSectionName(m_sect_headers[idx]);
8752e5bb6d8SMartin Storsjö       ConstString const_sect_name(sect_name);
8762e5bb6d8SMartin Storsjö       SectionType section_type = GetSectionType(sect_name, m_sect_headers[idx]);
877f754f88fSGreg Clayton 
878b9c1b51eSKate Stone       SectionSP section_sp(new Section(
879b9c1b51eSKate Stone           module_sp,       // Module to which this section belongs
880a7499c98SMichael Sartain           this,            // Object file to which this section belongs
8817db8b5c4SPavel Labath           idx + 1,         // Section ID is the 1 based section index.
882f754f88fSGreg Clayton           const_sect_name, // Name of this section
8837db8b5c4SPavel Labath           section_type,
88473a7a55cSPavel Labath           m_coff_header_opt.image_base +
885b9c1b51eSKate Stone               m_sect_headers[idx].vmaddr, // File VM address == addresses as
886b9c1b51eSKate Stone                                           // they are found in the object file
887f754f88fSGreg Clayton           m_sect_headers[idx].vmsize,     // VM size in bytes of this section
888b9c1b51eSKate Stone           m_sect_headers[idx]
889b9c1b51eSKate Stone               .offset, // Offset to the data for this section in the file
890b9c1b51eSKate Stone           m_sect_headers[idx]
891b9c1b51eSKate Stone               .size, // Size in bytes of this section as found in the file
89248672afbSGreg Clayton           m_coff_header_opt.sect_alignment, // Section alignment
893f754f88fSGreg Clayton           m_sect_headers[idx].flags));      // Flags for this section
894f754f88fSGreg Clayton 
895f1e0ae34SPavel Labath       uint32_t permissions = 0;
896f1e0ae34SPavel Labath       if (m_sect_headers[idx].flags & llvm::COFF::IMAGE_SCN_MEM_EXECUTE)
897f1e0ae34SPavel Labath         permissions |= ePermissionsExecutable;
898f1e0ae34SPavel Labath       if (m_sect_headers[idx].flags & llvm::COFF::IMAGE_SCN_MEM_READ)
899f1e0ae34SPavel Labath         permissions |= ePermissionsReadable;
900f1e0ae34SPavel Labath       if (m_sect_headers[idx].flags & llvm::COFF::IMAGE_SCN_MEM_WRITE)
901f1e0ae34SPavel Labath         permissions |= ePermissionsWritable;
902f1e0ae34SPavel Labath       section_sp->SetPermissions(permissions);
903f1e0ae34SPavel Labath 
90473a7a55cSPavel Labath       m_sections_up->AddSection(section_sp);
90573a7a55cSPavel Labath       unified_section_list.AddSection(section_sp);
906f754f88fSGreg Clayton     }
907f754f88fSGreg Clayton   }
908a1743499SGreg Clayton }
909f754f88fSGreg Clayton 
910b8d03935SAaron Smith UUID ObjectFilePECOFF::GetUUID() {
911b8d03935SAaron Smith   if (m_uuid.IsValid())
912b8d03935SAaron Smith     return m_uuid;
913b8d03935SAaron Smith 
914b8d03935SAaron Smith   if (!CreateBinary())
915b8d03935SAaron Smith     return UUID();
916b8d03935SAaron Smith 
917d372a8e8SPavel Labath   m_uuid = GetCoffUUID(*m_binary);
918b8d03935SAaron Smith   return m_uuid;
919b8d03935SAaron Smith }
920f754f88fSGreg Clayton 
921037ed1beSAaron Smith uint32_t ObjectFilePECOFF::ParseDependentModules() {
922037ed1beSAaron Smith   ModuleSP module_sp(GetModule());
923037ed1beSAaron Smith   if (!module_sp)
924f754f88fSGreg Clayton     return 0;
925037ed1beSAaron Smith 
926037ed1beSAaron Smith   std::lock_guard<std::recursive_mutex> guard(module_sp->GetMutex());
927037ed1beSAaron Smith   if (m_deps_filespec)
928037ed1beSAaron Smith     return m_deps_filespec->GetSize();
929037ed1beSAaron Smith 
930037ed1beSAaron Smith   // Cache coff binary if it is not done yet.
931037ed1beSAaron Smith   if (!CreateBinary())
932037ed1beSAaron Smith     return 0;
933037ed1beSAaron Smith 
934037ed1beSAaron Smith   Log *log(GetLogIfAllCategoriesSet(LIBLLDB_LOG_OBJECT));
935d372a8e8SPavel Labath   LLDB_LOG(log, "this = {0}, module = {1} ({2}), file = {3}, binary = {4}",
936d372a8e8SPavel Labath            this, GetModule().get(), GetModule()->GetSpecificationDescription(),
937d372a8e8SPavel Labath            m_file.GetPath(), m_binary.get());
938037ed1beSAaron Smith 
939037ed1beSAaron Smith   m_deps_filespec = FileSpecList();
940037ed1beSAaron Smith 
941d372a8e8SPavel Labath   for (const auto &entry : m_binary->import_directories()) {
942037ed1beSAaron Smith     llvm::StringRef dll_name;
943037ed1beSAaron Smith     // Report a bogus entry.
9441c03389cSReid Kleckner     if (llvm::Error e = entry.getName(dll_name)) {
94563e5fb76SJonas Devlieghere       LLDB_LOGF(log,
94663e5fb76SJonas Devlieghere                 "ObjectFilePECOFF::ParseDependentModules() - failed to get "
947037ed1beSAaron Smith                 "import directory entry name: %s",
9481c03389cSReid Kleckner                 llvm::toString(std::move(e)).c_str());
949037ed1beSAaron Smith       continue;
950037ed1beSAaron Smith     }
951037ed1beSAaron Smith 
952037ed1beSAaron Smith     // At this moment we only have the base name of the DLL. The full path can
953037ed1beSAaron Smith     // only be seen after the dynamic loading.  Our best guess is Try to get it
954037ed1beSAaron Smith     // with the help of the object file's directory.
955b3f44ad9SStella Stamenova     llvm::SmallString<128> dll_fullpath;
956037ed1beSAaron Smith     FileSpec dll_specs(dll_name);
957037ed1beSAaron Smith     dll_specs.GetDirectory().SetString(m_file.GetDirectory().GetCString());
958037ed1beSAaron Smith 
959037ed1beSAaron Smith     if (!llvm::sys::fs::real_path(dll_specs.GetPath(), dll_fullpath))
960f893d5bfSJonas Devlieghere       m_deps_filespec->EmplaceBack(dll_fullpath);
961037ed1beSAaron Smith     else {
962037ed1beSAaron Smith       // Known DLLs or DLL not found in the object file directory.
963f893d5bfSJonas Devlieghere       m_deps_filespec->EmplaceBack(dll_name);
964037ed1beSAaron Smith     }
965037ed1beSAaron Smith   }
966037ed1beSAaron Smith   return m_deps_filespec->GetSize();
967037ed1beSAaron Smith }
968037ed1beSAaron Smith 
969037ed1beSAaron Smith uint32_t ObjectFilePECOFF::GetDependentModules(FileSpecList &files) {
970037ed1beSAaron Smith   auto num_modules = ParseDependentModules();
971037ed1beSAaron Smith   auto original_size = files.GetSize();
972037ed1beSAaron Smith 
973037ed1beSAaron Smith   for (unsigned i = 0; i < num_modules; ++i)
974037ed1beSAaron Smith     files.AppendIfUnique(m_deps_filespec->GetFileSpecAtIndex(i));
975037ed1beSAaron Smith 
976037ed1beSAaron Smith   return files.GetSize() - original_size;
977f754f88fSGreg Clayton }
978f754f88fSGreg Clayton 
979b9c1b51eSKate Stone lldb_private::Address ObjectFilePECOFF::GetEntryPointAddress() {
9808e38c666SStephane Sezer   if (m_entry_point_address.IsValid())
9818e38c666SStephane Sezer     return m_entry_point_address;
9828e38c666SStephane Sezer 
9838e38c666SStephane Sezer   if (!ParseHeader() || !IsExecutable())
9848e38c666SStephane Sezer     return m_entry_point_address;
9858e38c666SStephane Sezer 
9868e38c666SStephane Sezer   SectionList *section_list = GetSectionList();
987a5235af9SAleksandr Urakov   addr_t file_addr = m_coff_header_opt.entry + m_coff_header_opt.image_base;
9888e38c666SStephane Sezer 
9898e38c666SStephane Sezer   if (!section_list)
990a5235af9SAleksandr Urakov     m_entry_point_address.SetOffset(file_addr);
9918e38c666SStephane Sezer   else
992b8d03935SAaron Smith     m_entry_point_address.ResolveAddressUsingFileSections(file_addr,
993b8d03935SAaron Smith                                                           section_list);
9948e38c666SStephane Sezer   return m_entry_point_address;
9958e38c666SStephane Sezer }
9968e38c666SStephane Sezer 
997d1304bbaSPavel Labath Address ObjectFilePECOFF::GetBaseAddress() {
998d1304bbaSPavel Labath   return Address(GetSectionList()->GetSectionAtIndex(0), 0);
999d1304bbaSPavel Labath }
1000d1304bbaSPavel Labath 
1001f754f88fSGreg Clayton // Dump
1002f754f88fSGreg Clayton //
1003f754f88fSGreg Clayton // Dump the specifics of the runtime file container (such as any headers
1004f754f88fSGreg Clayton // segments, sections, etc).
1005b9c1b51eSKate Stone void ObjectFilePECOFF::Dump(Stream *s) {
1006a1743499SGreg Clayton   ModuleSP module_sp(GetModule());
1007b9c1b51eSKate Stone   if (module_sp) {
100816ff8604SSaleem Abdulrasool     std::lock_guard<std::recursive_mutex> guard(module_sp->GetMutex());
1009324a1036SSaleem Abdulrasool     s->Printf("%p: ", static_cast<void *>(this));
1010f754f88fSGreg Clayton     s->Indent();
1011f754f88fSGreg Clayton     s->PutCString("ObjectFilePECOFF");
1012f754f88fSGreg Clayton 
1013f760f5aeSPavel Labath     ArchSpec header_arch = GetArchitecture();
1014f754f88fSGreg Clayton 
1015b9c1b51eSKate Stone     *s << ", file = '" << m_file
1016b9c1b51eSKate Stone        << "', arch = " << header_arch.GetArchitectureName() << "\n";
1017f754f88fSGreg Clayton 
10183046e668SGreg Clayton     SectionList *sections = GetSectionList();
10193046e668SGreg Clayton     if (sections)
10203a168297SPavel Labath       sections->Dump(s->AsRawOstream(), s->GetIndentLevel(), nullptr, true,
10213a168297SPavel Labath                      UINT32_MAX);
1022f754f88fSGreg Clayton 
1023d5b44036SJonas Devlieghere     if (m_symtab_up)
1024248a1305SKonrad Kleine       m_symtab_up->Dump(s, nullptr, eSortOrderNone);
1025f754f88fSGreg Clayton 
1026f754f88fSGreg Clayton     if (m_dos_header.e_magic)
1027f754f88fSGreg Clayton       DumpDOSHeader(s, m_dos_header);
1028b9c1b51eSKate Stone     if (m_coff_header.machine) {
1029f754f88fSGreg Clayton       DumpCOFFHeader(s, m_coff_header);
1030f754f88fSGreg Clayton       if (m_coff_header.hdrsize)
1031f754f88fSGreg Clayton         DumpOptCOFFHeader(s, m_coff_header_opt);
1032f754f88fSGreg Clayton     }
1033f754f88fSGreg Clayton     s->EOL();
1034f754f88fSGreg Clayton     DumpSectionHeaders(s);
1035f754f88fSGreg Clayton     s->EOL();
1036037ed1beSAaron Smith 
1037037ed1beSAaron Smith     DumpDependentModules(s);
1038037ed1beSAaron Smith     s->EOL();
1039f754f88fSGreg Clayton   }
1040a1743499SGreg Clayton }
1041f754f88fSGreg Clayton 
1042f754f88fSGreg Clayton // DumpDOSHeader
1043f754f88fSGreg Clayton //
1044f754f88fSGreg Clayton // Dump the MS-DOS header to the specified output stream
1045b9c1b51eSKate Stone void ObjectFilePECOFF::DumpDOSHeader(Stream *s, const dos_header_t &header) {
1046f754f88fSGreg Clayton   s->PutCString("MSDOS Header\n");
1047f754f88fSGreg Clayton   s->Printf("  e_magic    = 0x%4.4x\n", header.e_magic);
1048f754f88fSGreg Clayton   s->Printf("  e_cblp     = 0x%4.4x\n", header.e_cblp);
1049f754f88fSGreg Clayton   s->Printf("  e_cp       = 0x%4.4x\n", header.e_cp);
1050f754f88fSGreg Clayton   s->Printf("  e_crlc     = 0x%4.4x\n", header.e_crlc);
1051f754f88fSGreg Clayton   s->Printf("  e_cparhdr  = 0x%4.4x\n", header.e_cparhdr);
1052f754f88fSGreg Clayton   s->Printf("  e_minalloc = 0x%4.4x\n", header.e_minalloc);
1053f754f88fSGreg Clayton   s->Printf("  e_maxalloc = 0x%4.4x\n", header.e_maxalloc);
1054f754f88fSGreg Clayton   s->Printf("  e_ss       = 0x%4.4x\n", header.e_ss);
1055f754f88fSGreg Clayton   s->Printf("  e_sp       = 0x%4.4x\n", header.e_sp);
1056f754f88fSGreg Clayton   s->Printf("  e_csum     = 0x%4.4x\n", header.e_csum);
1057f754f88fSGreg Clayton   s->Printf("  e_ip       = 0x%4.4x\n", header.e_ip);
1058f754f88fSGreg Clayton   s->Printf("  e_cs       = 0x%4.4x\n", header.e_cs);
1059f754f88fSGreg Clayton   s->Printf("  e_lfarlc   = 0x%4.4x\n", header.e_lfarlc);
1060f754f88fSGreg Clayton   s->Printf("  e_ovno     = 0x%4.4x\n", header.e_ovno);
1061f754f88fSGreg Clayton   s->Printf("  e_res[4]   = { 0x%4.4x, 0x%4.4x, 0x%4.4x, 0x%4.4x }\n",
1062b9c1b51eSKate Stone             header.e_res[0], header.e_res[1], header.e_res[2], header.e_res[3]);
1063f754f88fSGreg Clayton   s->Printf("  e_oemid    = 0x%4.4x\n", header.e_oemid);
1064f754f88fSGreg Clayton   s->Printf("  e_oeminfo  = 0x%4.4x\n", header.e_oeminfo);
1065b9c1b51eSKate Stone   s->Printf("  e_res2[10] = { 0x%4.4x, 0x%4.4x, 0x%4.4x, 0x%4.4x, 0x%4.4x, "
1066b9c1b51eSKate Stone             "0x%4.4x, 0x%4.4x, 0x%4.4x, 0x%4.4x, 0x%4.4x }\n",
1067b9c1b51eSKate Stone             header.e_res2[0], header.e_res2[1], header.e_res2[2],
1068b9c1b51eSKate Stone             header.e_res2[3], header.e_res2[4], header.e_res2[5],
1069b9c1b51eSKate Stone             header.e_res2[6], header.e_res2[7], header.e_res2[8],
1070f754f88fSGreg Clayton             header.e_res2[9]);
1071f754f88fSGreg Clayton   s->Printf("  e_lfanew   = 0x%8.8x\n", header.e_lfanew);
1072f754f88fSGreg Clayton }
1073f754f88fSGreg Clayton 
1074f754f88fSGreg Clayton // DumpCOFFHeader
1075f754f88fSGreg Clayton //
1076f754f88fSGreg Clayton // Dump the COFF header to the specified output stream
1077b9c1b51eSKate Stone void ObjectFilePECOFF::DumpCOFFHeader(Stream *s, const coff_header_t &header) {
1078f754f88fSGreg Clayton   s->PutCString("COFF Header\n");
1079f754f88fSGreg Clayton   s->Printf("  machine = 0x%4.4x\n", header.machine);
1080f754f88fSGreg Clayton   s->Printf("  nsects  = 0x%4.4x\n", header.nsects);
1081f754f88fSGreg Clayton   s->Printf("  modtime = 0x%8.8x\n", header.modtime);
1082f754f88fSGreg Clayton   s->Printf("  symoff  = 0x%8.8x\n", header.symoff);
1083f754f88fSGreg Clayton   s->Printf("  nsyms   = 0x%8.8x\n", header.nsyms);
1084f754f88fSGreg Clayton   s->Printf("  hdrsize = 0x%4.4x\n", header.hdrsize);
1085f754f88fSGreg Clayton }
1086f754f88fSGreg Clayton 
1087f754f88fSGreg Clayton // DumpOptCOFFHeader
1088f754f88fSGreg Clayton //
1089f754f88fSGreg Clayton // Dump the optional COFF header to the specified output stream
1090b9c1b51eSKate Stone void ObjectFilePECOFF::DumpOptCOFFHeader(Stream *s,
1091b9c1b51eSKate Stone                                          const coff_opt_header_t &header) {
1092f754f88fSGreg Clayton   s->PutCString("Optional COFF Header\n");
1093f754f88fSGreg Clayton   s->Printf("  magic                   = 0x%4.4x\n", header.magic);
1094b9c1b51eSKate Stone   s->Printf("  major_linker_version    = 0x%2.2x\n",
1095b9c1b51eSKate Stone             header.major_linker_version);
1096b9c1b51eSKate Stone   s->Printf("  minor_linker_version    = 0x%2.2x\n",
1097b9c1b51eSKate Stone             header.minor_linker_version);
1098f754f88fSGreg Clayton   s->Printf("  code_size               = 0x%8.8x\n", header.code_size);
1099f754f88fSGreg Clayton   s->Printf("  data_size               = 0x%8.8x\n", header.data_size);
1100f754f88fSGreg Clayton   s->Printf("  bss_size                = 0x%8.8x\n", header.bss_size);
1101f754f88fSGreg Clayton   s->Printf("  entry                   = 0x%8.8x\n", header.entry);
1102f754f88fSGreg Clayton   s->Printf("  code_offset             = 0x%8.8x\n", header.code_offset);
1103f754f88fSGreg Clayton   s->Printf("  data_offset             = 0x%8.8x\n", header.data_offset);
1104b9c1b51eSKate Stone   s->Printf("  image_base              = 0x%16.16" PRIx64 "\n",
1105b9c1b51eSKate Stone             header.image_base);
1106f754f88fSGreg Clayton   s->Printf("  sect_alignment          = 0x%8.8x\n", header.sect_alignment);
1107f754f88fSGreg Clayton   s->Printf("  file_alignment          = 0x%8.8x\n", header.file_alignment);
1108b9c1b51eSKate Stone   s->Printf("  major_os_system_version = 0x%4.4x\n",
1109b9c1b51eSKate Stone             header.major_os_system_version);
1110b9c1b51eSKate Stone   s->Printf("  minor_os_system_version = 0x%4.4x\n",
1111b9c1b51eSKate Stone             header.minor_os_system_version);
1112b9c1b51eSKate Stone   s->Printf("  major_image_version     = 0x%4.4x\n",
1113b9c1b51eSKate Stone             header.major_image_version);
1114b9c1b51eSKate Stone   s->Printf("  minor_image_version     = 0x%4.4x\n",
1115b9c1b51eSKate Stone             header.minor_image_version);
1116b9c1b51eSKate Stone   s->Printf("  major_subsystem_version = 0x%4.4x\n",
1117b9c1b51eSKate Stone             header.major_subsystem_version);
1118b9c1b51eSKate Stone   s->Printf("  minor_subsystem_version = 0x%4.4x\n",
1119b9c1b51eSKate Stone             header.minor_subsystem_version);
1120f754f88fSGreg Clayton   s->Printf("  reserved1               = 0x%8.8x\n", header.reserved1);
1121f754f88fSGreg Clayton   s->Printf("  image_size              = 0x%8.8x\n", header.image_size);
1122f754f88fSGreg Clayton   s->Printf("  header_size             = 0x%8.8x\n", header.header_size);
112328469ca3SGreg Clayton   s->Printf("  checksum                = 0x%8.8x\n", header.checksum);
1124f754f88fSGreg Clayton   s->Printf("  subsystem               = 0x%4.4x\n", header.subsystem);
1125f754f88fSGreg Clayton   s->Printf("  dll_flags               = 0x%4.4x\n", header.dll_flags);
1126b9c1b51eSKate Stone   s->Printf("  stack_reserve_size      = 0x%16.16" PRIx64 "\n",
1127b9c1b51eSKate Stone             header.stack_reserve_size);
1128b9c1b51eSKate Stone   s->Printf("  stack_commit_size       = 0x%16.16" PRIx64 "\n",
1129b9c1b51eSKate Stone             header.stack_commit_size);
1130b9c1b51eSKate Stone   s->Printf("  heap_reserve_size       = 0x%16.16" PRIx64 "\n",
1131b9c1b51eSKate Stone             header.heap_reserve_size);
1132b9c1b51eSKate Stone   s->Printf("  heap_commit_size        = 0x%16.16" PRIx64 "\n",
1133b9c1b51eSKate Stone             header.heap_commit_size);
1134f754f88fSGreg Clayton   s->Printf("  loader_flags            = 0x%8.8x\n", header.loader_flags);
1135b9c1b51eSKate Stone   s->Printf("  num_data_dir_entries    = 0x%8.8x\n",
1136b9c1b51eSKate Stone             (uint32_t)header.data_dirs.size());
1137f754f88fSGreg Clayton   uint32_t i;
1138b9c1b51eSKate Stone   for (i = 0; i < header.data_dirs.size(); i++) {
1139b9c1b51eSKate Stone     s->Printf("  data_dirs[%2u] vmaddr = 0x%8.8x, vmsize = 0x%8.8x\n", i,
1140b9c1b51eSKate Stone               header.data_dirs[i].vmaddr, header.data_dirs[i].vmsize);
1141f754f88fSGreg Clayton   }
1142f754f88fSGreg Clayton }
1143f754f88fSGreg Clayton // DumpSectionHeader
1144f754f88fSGreg Clayton //
1145f754f88fSGreg Clayton // Dump a single ELF section header to the specified output stream
1146b9c1b51eSKate Stone void ObjectFilePECOFF::DumpSectionHeader(Stream *s,
1147b9c1b51eSKate Stone                                          const section_header_t &sh) {
1148adcd0268SBenjamin Kramer   std::string name = std::string(GetSectionName(sh));
1149b9c1b51eSKate Stone   s->Printf("%-16s 0x%8.8x 0x%8.8x 0x%8.8x 0x%8.8x 0x%8.8x 0x%8.8x 0x%4.4x "
1150b9c1b51eSKate Stone             "0x%4.4x 0x%8.8x\n",
1151b9c1b51eSKate Stone             name.c_str(), sh.vmaddr, sh.vmsize, sh.offset, sh.size, sh.reloff,
1152b9c1b51eSKate Stone             sh.lineoff, sh.nreloc, sh.nline, sh.flags);
1153f754f88fSGreg Clayton }
1154f754f88fSGreg Clayton 
1155f754f88fSGreg Clayton // DumpSectionHeaders
1156f754f88fSGreg Clayton //
1157f754f88fSGreg Clayton // Dump all of the ELF section header to the specified output stream
1158b9c1b51eSKate Stone void ObjectFilePECOFF::DumpSectionHeaders(Stream *s) {
1159f754f88fSGreg Clayton 
1160f754f88fSGreg Clayton   s->PutCString("Section Headers\n");
1161b9c1b51eSKate Stone   s->PutCString("IDX  name             vm addr    vm size    file off   file "
1162b9c1b51eSKate Stone                 "size  reloc off  line off   nreloc nline  flags\n");
1163b9c1b51eSKate Stone   s->PutCString("==== ---------------- ---------- ---------- ---------- "
1164b9c1b51eSKate Stone                 "---------- ---------- ---------- ------ ------ ----------\n");
1165f754f88fSGreg Clayton 
1166f754f88fSGreg Clayton   uint32_t idx = 0;
1167f754f88fSGreg Clayton   SectionHeaderCollIter pos, end = m_sect_headers.end();
1168f754f88fSGreg Clayton 
1169b9c1b51eSKate Stone   for (pos = m_sect_headers.begin(); pos != end; ++pos, ++idx) {
1170f754f88fSGreg Clayton     s->Printf("[%2u] ", idx);
1171f754f88fSGreg Clayton     ObjectFilePECOFF::DumpSectionHeader(s, *pos);
1172f754f88fSGreg Clayton   }
1173f754f88fSGreg Clayton }
1174f754f88fSGreg Clayton 
1175037ed1beSAaron Smith // DumpDependentModules
1176037ed1beSAaron Smith //
1177037ed1beSAaron Smith // Dump all of the dependent modules to the specified output stream
1178037ed1beSAaron Smith void ObjectFilePECOFF::DumpDependentModules(lldb_private::Stream *s) {
1179037ed1beSAaron Smith   auto num_modules = ParseDependentModules();
1180037ed1beSAaron Smith   if (num_modules > 0) {
1181037ed1beSAaron Smith     s->PutCString("Dependent Modules\n");
1182037ed1beSAaron Smith     for (unsigned i = 0; i < num_modules; ++i) {
1183037ed1beSAaron Smith       auto spec = m_deps_filespec->GetFileSpecAtIndex(i);
1184037ed1beSAaron Smith       s->Printf("  %s\n", spec.GetFilename().GetCString());
1185037ed1beSAaron Smith     }
1186037ed1beSAaron Smith   }
1187037ed1beSAaron Smith }
1188037ed1beSAaron Smith 
1189fb3b3bd1SZachary Turner bool ObjectFilePECOFF::IsWindowsSubsystem() {
1190fb3b3bd1SZachary Turner   switch (m_coff_header_opt.subsystem) {
1191fb3b3bd1SZachary Turner   case llvm::COFF::IMAGE_SUBSYSTEM_NATIVE:
1192fb3b3bd1SZachary Turner   case llvm::COFF::IMAGE_SUBSYSTEM_WINDOWS_GUI:
1193fb3b3bd1SZachary Turner   case llvm::COFF::IMAGE_SUBSYSTEM_WINDOWS_CUI:
1194fb3b3bd1SZachary Turner   case llvm::COFF::IMAGE_SUBSYSTEM_NATIVE_WINDOWS:
1195fb3b3bd1SZachary Turner   case llvm::COFF::IMAGE_SUBSYSTEM_WINDOWS_CE_GUI:
1196fb3b3bd1SZachary Turner   case llvm::COFF::IMAGE_SUBSYSTEM_XBOX:
1197fb3b3bd1SZachary Turner   case llvm::COFF::IMAGE_SUBSYSTEM_WINDOWS_BOOT_APPLICATION:
1198fb3b3bd1SZachary Turner     return true;
1199fb3b3bd1SZachary Turner   default:
1200fb3b3bd1SZachary Turner     return false;
1201fb3b3bd1SZachary Turner   }
1202fb3b3bd1SZachary Turner }
1203fb3b3bd1SZachary Turner 
1204f760f5aeSPavel Labath ArchSpec ObjectFilePECOFF::GetArchitecture() {
1205237ad974SCharles Davis   uint16_t machine = m_coff_header.machine;
1206b9c1b51eSKate Stone   switch (machine) {
1207f760f5aeSPavel Labath   default:
1208f760f5aeSPavel Labath     break;
1209237ad974SCharles Davis   case llvm::COFF::IMAGE_FILE_MACHINE_AMD64:
1210237ad974SCharles Davis   case llvm::COFF::IMAGE_FILE_MACHINE_I386:
1211237ad974SCharles Davis   case llvm::COFF::IMAGE_FILE_MACHINE_POWERPC:
1212237ad974SCharles Davis   case llvm::COFF::IMAGE_FILE_MACHINE_POWERPCFP:
1213237ad974SCharles Davis   case llvm::COFF::IMAGE_FILE_MACHINE_ARM:
12141108cb36SSaleem Abdulrasool   case llvm::COFF::IMAGE_FILE_MACHINE_ARMNT:
1215237ad974SCharles Davis   case llvm::COFF::IMAGE_FILE_MACHINE_THUMB:
1216638f072fSMartin Storsjo   case llvm::COFF::IMAGE_FILE_MACHINE_ARM64:
1217f760f5aeSPavel Labath     ArchSpec arch;
1218fb3b3bd1SZachary Turner     arch.SetArchitecture(eArchTypeCOFF, machine, LLDB_INVALID_CPUTYPE,
1219fb3b3bd1SZachary Turner                          IsWindowsSubsystem() ? llvm::Triple::Win32
1220fb3b3bd1SZachary Turner                                               : llvm::Triple::UnknownOS);
1221f760f5aeSPavel Labath     return arch;
1222237ad974SCharles Davis   }
1223f760f5aeSPavel Labath   return ArchSpec();
1224f754f88fSGreg Clayton }
1225f754f88fSGreg Clayton 
1226b9c1b51eSKate Stone ObjectFile::Type ObjectFilePECOFF::CalculateType() {
1227b9c1b51eSKate Stone   if (m_coff_header.machine != 0) {
1228237ad974SCharles Davis     if ((m_coff_header.flags & llvm::COFF::IMAGE_FILE_DLL) == 0)
1229f754f88fSGreg Clayton       return eTypeExecutable;
1230f754f88fSGreg Clayton     else
1231f754f88fSGreg Clayton       return eTypeSharedLibrary;
1232f754f88fSGreg Clayton   }
1233f754f88fSGreg Clayton   return eTypeExecutable;
1234f754f88fSGreg Clayton }
1235f754f88fSGreg Clayton 
1236b9c1b51eSKate Stone ObjectFile::Strata ObjectFilePECOFF::CalculateStrata() { return eStrataUser; }
12379cad24a7SZachary Turner 
1238f754f88fSGreg Clayton // PluginInterface protocol
1239b9c1b51eSKate Stone ConstString ObjectFilePECOFF::GetPluginName() { return GetPluginNameStatic(); }
1240f754f88fSGreg Clayton 
1241b9c1b51eSKate Stone uint32_t ObjectFilePECOFF::GetPluginVersion() { return 1; }
1242