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 §) { 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 §) { 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