1 //===-- ObjectFileELF.cpp ------------------------------------- -*- C++ -*-===// 2 // 3 // The LLVM Compiler Infrastructure 4 // 5 // This file is distributed under the University of Illinois Open Source 6 // License. See LICENSE.TXT for details. 7 // 8 //===----------------------------------------------------------------------===// 9 10 #include "ObjectFileELF.h" 11 12 #include <algorithm> 13 #include <cassert> 14 #include <unordered_map> 15 16 #include "lldb/Core/FileSpecList.h" 17 #include "lldb/Core/Module.h" 18 #include "lldb/Core/ModuleSpec.h" 19 #include "lldb/Core/PluginManager.h" 20 #include "lldb/Core/Section.h" 21 #include "lldb/Symbol/DWARFCallFrameInfo.h" 22 #include "lldb/Symbol/SymbolContext.h" 23 #include "lldb/Target/SectionLoadList.h" 24 #include "lldb/Target/Target.h" 25 #include "lldb/Utility/ArchSpec.h" 26 #include "lldb/Utility/DataBufferHeap.h" 27 #include "lldb/Utility/Log.h" 28 #include "lldb/Utility/Status.h" 29 #include "lldb/Utility/Stream.h" 30 #include "lldb/Utility/Timer.h" 31 32 #include "llvm/ADT/PointerUnion.h" 33 #include "llvm/ADT/StringRef.h" 34 #include "llvm/Object/Decompressor.h" 35 #include "llvm/Support/ARMBuildAttributes.h" 36 #include "llvm/Support/MathExtras.h" 37 #include "llvm/Support/MemoryBuffer.h" 38 #include "llvm/Support/MipsABIFlags.h" 39 40 #define CASE_AND_STREAM(s, def, width) \ 41 case def: \ 42 s->Printf("%-*s", width, #def); \ 43 break; 44 45 using namespace lldb; 46 using namespace lldb_private; 47 using namespace elf; 48 using namespace llvm::ELF; 49 50 namespace { 51 52 // ELF note owner definitions 53 const char *const LLDB_NT_OWNER_FREEBSD = "FreeBSD"; 54 const char *const LLDB_NT_OWNER_GNU = "GNU"; 55 const char *const LLDB_NT_OWNER_NETBSD = "NetBSD"; 56 const char *const LLDB_NT_OWNER_OPENBSD = "OpenBSD"; 57 const char *const LLDB_NT_OWNER_CSR = "csr"; 58 const char *const LLDB_NT_OWNER_ANDROID = "Android"; 59 const char *const LLDB_NT_OWNER_CORE = "CORE"; 60 const char *const LLDB_NT_OWNER_LINUX = "LINUX"; 61 62 // ELF note type definitions 63 const elf_word LLDB_NT_FREEBSD_ABI_TAG = 0x01; 64 const elf_word LLDB_NT_FREEBSD_ABI_SIZE = 4; 65 66 const elf_word LLDB_NT_GNU_ABI_TAG = 0x01; 67 const elf_word LLDB_NT_GNU_ABI_SIZE = 16; 68 69 const elf_word LLDB_NT_GNU_BUILD_ID_TAG = 0x03; 70 71 const elf_word LLDB_NT_NETBSD_ABI_TAG = 0x01; 72 const elf_word LLDB_NT_NETBSD_ABI_SIZE = 4; 73 74 // GNU ABI note OS constants 75 const elf_word LLDB_NT_GNU_ABI_OS_LINUX = 0x00; 76 const elf_word LLDB_NT_GNU_ABI_OS_HURD = 0x01; 77 const elf_word LLDB_NT_GNU_ABI_OS_SOLARIS = 0x02; 78 79 // LLDB_NT_OWNER_CORE and LLDB_NT_OWNER_LINUX note contants 80 #define NT_PRSTATUS 1 81 #define NT_PRFPREG 2 82 #define NT_PRPSINFO 3 83 #define NT_TASKSTRUCT 4 84 #define NT_AUXV 6 85 #define NT_SIGINFO 0x53494749 86 #define NT_FILE 0x46494c45 87 #define NT_PRXFPREG 0x46e62b7f 88 #define NT_PPC_VMX 0x100 89 #define NT_PPC_SPE 0x101 90 #define NT_PPC_VSX 0x102 91 #define NT_386_TLS 0x200 92 #define NT_386_IOPERM 0x201 93 #define NT_X86_XSTATE 0x202 94 #define NT_S390_HIGH_GPRS 0x300 95 #define NT_S390_TIMER 0x301 96 #define NT_S390_TODCMP 0x302 97 #define NT_S390_TODPREG 0x303 98 #define NT_S390_CTRS 0x304 99 #define NT_S390_PREFIX 0x305 100 #define NT_S390_LAST_BREAK 0x306 101 #define NT_S390_SYSTEM_CALL 0x307 102 #define NT_S390_TDB 0x308 103 #define NT_S390_VXRS_LOW 0x309 104 #define NT_S390_VXRS_HIGH 0x30a 105 #define NT_ARM_VFP 0x400 106 #define NT_ARM_TLS 0x401 107 #define NT_ARM_HW_BREAK 0x402 108 #define NT_ARM_HW_WATCH 0x403 109 #define NT_ARM_SYSTEM_CALL 0x404 110 #define NT_METAG_CBUF 0x500 111 #define NT_METAG_RPIPE 0x501 112 #define NT_METAG_TLS 0x502 113 114 //===----------------------------------------------------------------------===// 115 /// @class ELFRelocation 116 /// @brief Generic wrapper for ELFRel and ELFRela. 117 /// 118 /// This helper class allows us to parse both ELFRel and ELFRela relocation 119 /// entries in a generic manner. 120 class ELFRelocation { 121 public: 122 /// Constructs an ELFRelocation entry with a personality as given by @p 123 /// type. 124 /// 125 /// @param type Either DT_REL or DT_RELA. Any other value is invalid. 126 ELFRelocation(unsigned type); 127 128 ~ELFRelocation(); 129 130 bool Parse(const lldb_private::DataExtractor &data, lldb::offset_t *offset); 131 132 static unsigned RelocType32(const ELFRelocation &rel); 133 134 static unsigned RelocType64(const ELFRelocation &rel); 135 136 static unsigned RelocSymbol32(const ELFRelocation &rel); 137 138 static unsigned RelocSymbol64(const ELFRelocation &rel); 139 140 static unsigned RelocOffset32(const ELFRelocation &rel); 141 142 static unsigned RelocOffset64(const ELFRelocation &rel); 143 144 static unsigned RelocAddend32(const ELFRelocation &rel); 145 146 static unsigned RelocAddend64(const ELFRelocation &rel); 147 148 private: 149 typedef llvm::PointerUnion<ELFRel *, ELFRela *> RelocUnion; 150 151 RelocUnion reloc; 152 }; 153 154 ELFRelocation::ELFRelocation(unsigned type) { 155 if (type == DT_REL || type == SHT_REL) 156 reloc = new ELFRel(); 157 else if (type == DT_RELA || type == SHT_RELA) 158 reloc = new ELFRela(); 159 else { 160 assert(false && "unexpected relocation type"); 161 reloc = static_cast<ELFRel *>(NULL); 162 } 163 } 164 165 ELFRelocation::~ELFRelocation() { 166 if (reloc.is<ELFRel *>()) 167 delete reloc.get<ELFRel *>(); 168 else 169 delete reloc.get<ELFRela *>(); 170 } 171 172 bool ELFRelocation::Parse(const lldb_private::DataExtractor &data, 173 lldb::offset_t *offset) { 174 if (reloc.is<ELFRel *>()) 175 return reloc.get<ELFRel *>()->Parse(data, offset); 176 else 177 return reloc.get<ELFRela *>()->Parse(data, offset); 178 } 179 180 unsigned ELFRelocation::RelocType32(const ELFRelocation &rel) { 181 if (rel.reloc.is<ELFRel *>()) 182 return ELFRel::RelocType32(*rel.reloc.get<ELFRel *>()); 183 else 184 return ELFRela::RelocType32(*rel.reloc.get<ELFRela *>()); 185 } 186 187 unsigned ELFRelocation::RelocType64(const ELFRelocation &rel) { 188 if (rel.reloc.is<ELFRel *>()) 189 return ELFRel::RelocType64(*rel.reloc.get<ELFRel *>()); 190 else 191 return ELFRela::RelocType64(*rel.reloc.get<ELFRela *>()); 192 } 193 194 unsigned ELFRelocation::RelocSymbol32(const ELFRelocation &rel) { 195 if (rel.reloc.is<ELFRel *>()) 196 return ELFRel::RelocSymbol32(*rel.reloc.get<ELFRel *>()); 197 else 198 return ELFRela::RelocSymbol32(*rel.reloc.get<ELFRela *>()); 199 } 200 201 unsigned ELFRelocation::RelocSymbol64(const ELFRelocation &rel) { 202 if (rel.reloc.is<ELFRel *>()) 203 return ELFRel::RelocSymbol64(*rel.reloc.get<ELFRel *>()); 204 else 205 return ELFRela::RelocSymbol64(*rel.reloc.get<ELFRela *>()); 206 } 207 208 unsigned ELFRelocation::RelocOffset32(const ELFRelocation &rel) { 209 if (rel.reloc.is<ELFRel *>()) 210 return rel.reloc.get<ELFRel *>()->r_offset; 211 else 212 return rel.reloc.get<ELFRela *>()->r_offset; 213 } 214 215 unsigned ELFRelocation::RelocOffset64(const ELFRelocation &rel) { 216 if (rel.reloc.is<ELFRel *>()) 217 return rel.reloc.get<ELFRel *>()->r_offset; 218 else 219 return rel.reloc.get<ELFRela *>()->r_offset; 220 } 221 222 unsigned ELFRelocation::RelocAddend32(const ELFRelocation &rel) { 223 if (rel.reloc.is<ELFRel *>()) 224 return 0; 225 else 226 return rel.reloc.get<ELFRela *>()->r_addend; 227 } 228 229 unsigned ELFRelocation::RelocAddend64(const ELFRelocation &rel) { 230 if (rel.reloc.is<ELFRel *>()) 231 return 0; 232 else 233 return rel.reloc.get<ELFRela *>()->r_addend; 234 } 235 236 } // end anonymous namespace 237 238 bool ELFNote::Parse(const DataExtractor &data, lldb::offset_t *offset) { 239 // Read all fields. 240 if (data.GetU32(offset, &n_namesz, 3) == NULL) 241 return false; 242 243 // The name field is required to be nul-terminated, and n_namesz 244 // includes the terminating nul in observed implementations (contrary 245 // to the ELF-64 spec). A special case is needed for cores generated 246 // by some older Linux versions, which write a note named "CORE" 247 // without a nul terminator and n_namesz = 4. 248 if (n_namesz == 4) { 249 char buf[4]; 250 if (data.ExtractBytes(*offset, 4, data.GetByteOrder(), buf) != 4) 251 return false; 252 if (strncmp(buf, "CORE", 4) == 0) { 253 n_name = "CORE"; 254 *offset += 4; 255 return true; 256 } 257 } 258 259 const char *cstr = data.GetCStr(offset, llvm::alignTo(n_namesz, 4)); 260 if (cstr == NULL) { 261 Log *log(lldb_private::GetLogIfAllCategoriesSet(LIBLLDB_LOG_SYMBOLS)); 262 if (log) 263 log->Printf("Failed to parse note name lacking nul terminator"); 264 265 return false; 266 } 267 n_name = cstr; 268 return true; 269 } 270 271 static uint32_t kalimbaVariantFromElfFlags(const elf::elf_word e_flags) { 272 const uint32_t dsp_rev = e_flags & 0xFF; 273 uint32_t kal_arch_variant = LLDB_INVALID_CPUTYPE; 274 switch (dsp_rev) { 275 // TODO(mg11) Support more variants 276 case 10: 277 kal_arch_variant = llvm::Triple::KalimbaSubArch_v3; 278 break; 279 case 14: 280 kal_arch_variant = llvm::Triple::KalimbaSubArch_v4; 281 break; 282 case 17: 283 case 20: 284 kal_arch_variant = llvm::Triple::KalimbaSubArch_v5; 285 break; 286 default: 287 break; 288 } 289 return kal_arch_variant; 290 } 291 292 static uint32_t mipsVariantFromElfFlags (const elf::ELFHeader &header) { 293 const uint32_t mips_arch = header.e_flags & llvm::ELF::EF_MIPS_ARCH; 294 uint32_t endian = header.e_ident[EI_DATA]; 295 uint32_t arch_variant = ArchSpec::eMIPSSubType_unknown; 296 uint32_t fileclass = header.e_ident[EI_CLASS]; 297 298 // If there aren't any elf flags available (e.g core elf file) then return default 299 // 32 or 64 bit arch (without any architecture revision) based on object file's class. 300 if (header.e_type == ET_CORE) { 301 switch (fileclass) { 302 case llvm::ELF::ELFCLASS32: 303 return (endian == ELFDATA2LSB) ? ArchSpec::eMIPSSubType_mips32el 304 : ArchSpec::eMIPSSubType_mips32; 305 case llvm::ELF::ELFCLASS64: 306 return (endian == ELFDATA2LSB) ? ArchSpec::eMIPSSubType_mips64el 307 : ArchSpec::eMIPSSubType_mips64; 308 default: 309 return arch_variant; 310 } 311 } 312 313 switch (mips_arch) { 314 case llvm::ELF::EF_MIPS_ARCH_1: 315 case llvm::ELF::EF_MIPS_ARCH_2: 316 case llvm::ELF::EF_MIPS_ARCH_32: 317 return (endian == ELFDATA2LSB) ? ArchSpec::eMIPSSubType_mips32el 318 : ArchSpec::eMIPSSubType_mips32; 319 case llvm::ELF::EF_MIPS_ARCH_32R2: 320 return (endian == ELFDATA2LSB) ? ArchSpec::eMIPSSubType_mips32r2el 321 : ArchSpec::eMIPSSubType_mips32r2; 322 case llvm::ELF::EF_MIPS_ARCH_32R6: 323 return (endian == ELFDATA2LSB) ? ArchSpec::eMIPSSubType_mips32r6el 324 : ArchSpec::eMIPSSubType_mips32r6; 325 case llvm::ELF::EF_MIPS_ARCH_3: 326 case llvm::ELF::EF_MIPS_ARCH_4: 327 case llvm::ELF::EF_MIPS_ARCH_5: 328 case llvm::ELF::EF_MIPS_ARCH_64: 329 return (endian == ELFDATA2LSB) ? ArchSpec::eMIPSSubType_mips64el 330 : ArchSpec::eMIPSSubType_mips64; 331 case llvm::ELF::EF_MIPS_ARCH_64R2: 332 return (endian == ELFDATA2LSB) ? ArchSpec::eMIPSSubType_mips64r2el 333 : ArchSpec::eMIPSSubType_mips64r2; 334 case llvm::ELF::EF_MIPS_ARCH_64R6: 335 return (endian == ELFDATA2LSB) ? ArchSpec::eMIPSSubType_mips64r6el 336 : ArchSpec::eMIPSSubType_mips64r6; 337 default: 338 break; 339 } 340 341 return arch_variant; 342 } 343 344 static uint32_t subTypeFromElfHeader(const elf::ELFHeader &header) { 345 if (header.e_machine == llvm::ELF::EM_MIPS) 346 return mipsVariantFromElfFlags(header); 347 348 return llvm::ELF::EM_CSR_KALIMBA == header.e_machine 349 ? kalimbaVariantFromElfFlags(header.e_flags) 350 : LLDB_INVALID_CPUTYPE; 351 } 352 353 //! The kalimba toolchain identifies a code section as being 354 //! one with the SHT_PROGBITS set in the section sh_type and the top 355 //! bit in the 32-bit address field set. 356 static lldb::SectionType 357 kalimbaSectionType(const elf::ELFHeader &header, 358 const elf::ELFSectionHeader §_hdr) { 359 if (llvm::ELF::EM_CSR_KALIMBA != header.e_machine) { 360 return eSectionTypeOther; 361 } 362 363 if (llvm::ELF::SHT_NOBITS == sect_hdr.sh_type) { 364 return eSectionTypeZeroFill; 365 } 366 367 if (llvm::ELF::SHT_PROGBITS == sect_hdr.sh_type) { 368 const lldb::addr_t KAL_CODE_BIT = 1 << 31; 369 return KAL_CODE_BIT & sect_hdr.sh_addr ? eSectionTypeCode 370 : eSectionTypeData; 371 } 372 373 return eSectionTypeOther; 374 } 375 376 // Arbitrary constant used as UUID prefix for core files. 377 const uint32_t ObjectFileELF::g_core_uuid_magic(0xE210C); 378 379 //------------------------------------------------------------------ 380 // Static methods. 381 //------------------------------------------------------------------ 382 void ObjectFileELF::Initialize() { 383 PluginManager::RegisterPlugin(GetPluginNameStatic(), 384 GetPluginDescriptionStatic(), CreateInstance, 385 CreateMemoryInstance, GetModuleSpecifications); 386 } 387 388 void ObjectFileELF::Terminate() { 389 PluginManager::UnregisterPlugin(CreateInstance); 390 } 391 392 lldb_private::ConstString ObjectFileELF::GetPluginNameStatic() { 393 static ConstString g_name("elf"); 394 return g_name; 395 } 396 397 const char *ObjectFileELF::GetPluginDescriptionStatic() { 398 return "ELF object file reader."; 399 } 400 401 ObjectFile *ObjectFileELF::CreateInstance(const lldb::ModuleSP &module_sp, 402 DataBufferSP &data_sp, 403 lldb::offset_t data_offset, 404 const lldb_private::FileSpec *file, 405 lldb::offset_t file_offset, 406 lldb::offset_t length) { 407 if (!data_sp) { 408 data_sp = MapFileData(*file, length, file_offset); 409 if (!data_sp) 410 return nullptr; 411 data_offset = 0; 412 } 413 414 assert(data_sp); 415 416 if (data_sp->GetByteSize() <= (llvm::ELF::EI_NIDENT + data_offset)) 417 return nullptr; 418 419 const uint8_t *magic = data_sp->GetBytes() + data_offset; 420 if (!ELFHeader::MagicBytesMatch(magic)) 421 return nullptr; 422 423 // Update the data to contain the entire file if it doesn't already 424 if (data_sp->GetByteSize() < length) { 425 data_sp = MapFileData(*file, length, file_offset); 426 if (!data_sp) 427 return nullptr; 428 data_offset = 0; 429 magic = data_sp->GetBytes(); 430 } 431 432 unsigned address_size = ELFHeader::AddressSizeInBytes(magic); 433 if (address_size == 4 || address_size == 8) { 434 std::unique_ptr<ObjectFileELF> objfile_ap(new ObjectFileELF( 435 module_sp, data_sp, data_offset, file, file_offset, length)); 436 ArchSpec spec; 437 if (objfile_ap->GetArchitecture(spec) && 438 objfile_ap->SetModulesArchitecture(spec)) 439 return objfile_ap.release(); 440 } 441 442 return NULL; 443 } 444 445 ObjectFile *ObjectFileELF::CreateMemoryInstance( 446 const lldb::ModuleSP &module_sp, DataBufferSP &data_sp, 447 const lldb::ProcessSP &process_sp, lldb::addr_t header_addr) { 448 if (data_sp && data_sp->GetByteSize() > (llvm::ELF::EI_NIDENT)) { 449 const uint8_t *magic = data_sp->GetBytes(); 450 if (ELFHeader::MagicBytesMatch(magic)) { 451 unsigned address_size = ELFHeader::AddressSizeInBytes(magic); 452 if (address_size == 4 || address_size == 8) { 453 std::unique_ptr<ObjectFileELF> objfile_ap( 454 new ObjectFileELF(module_sp, data_sp, process_sp, header_addr)); 455 ArchSpec spec; 456 if (objfile_ap->GetArchitecture(spec) && 457 objfile_ap->SetModulesArchitecture(spec)) 458 return objfile_ap.release(); 459 } 460 } 461 } 462 return NULL; 463 } 464 465 bool ObjectFileELF::MagicBytesMatch(DataBufferSP &data_sp, 466 lldb::addr_t data_offset, 467 lldb::addr_t data_length) { 468 if (data_sp && 469 data_sp->GetByteSize() > (llvm::ELF::EI_NIDENT + data_offset)) { 470 const uint8_t *magic = data_sp->GetBytes() + data_offset; 471 return ELFHeader::MagicBytesMatch(magic); 472 } 473 return false; 474 } 475 476 /* 477 * crc function from http://svnweb.freebsd.org/base/head/sys/libkern/crc32.c 478 * 479 * COPYRIGHT (C) 1986 Gary S. Brown. You may use this program, or 480 * code or tables extracted from it, as desired without restriction. 481 */ 482 static uint32_t calc_crc32(uint32_t crc, const void *buf, size_t size) { 483 static const uint32_t g_crc32_tab[] = { 484 0x00000000, 0x77073096, 0xee0e612c, 0x990951ba, 0x076dc419, 0x706af48f, 485 0xe963a535, 0x9e6495a3, 0x0edb8832, 0x79dcb8a4, 0xe0d5e91e, 0x97d2d988, 486 0x09b64c2b, 0x7eb17cbd, 0xe7b82d07, 0x90bf1d91, 0x1db71064, 0x6ab020f2, 487 0xf3b97148, 0x84be41de, 0x1adad47d, 0x6ddde4eb, 0xf4d4b551, 0x83d385c7, 488 0x136c9856, 0x646ba8c0, 0xfd62f97a, 0x8a65c9ec, 0x14015c4f, 0x63066cd9, 489 0xfa0f3d63, 0x8d080df5, 0x3b6e20c8, 0x4c69105e, 0xd56041e4, 0xa2677172, 490 0x3c03e4d1, 0x4b04d447, 0xd20d85fd, 0xa50ab56b, 0x35b5a8fa, 0x42b2986c, 491 0xdbbbc9d6, 0xacbcf940, 0x32d86ce3, 0x45df5c75, 0xdcd60dcf, 0xabd13d59, 492 0x26d930ac, 0x51de003a, 0xc8d75180, 0xbfd06116, 0x21b4f4b5, 0x56b3c423, 493 0xcfba9599, 0xb8bda50f, 0x2802b89e, 0x5f058808, 0xc60cd9b2, 0xb10be924, 494 0x2f6f7c87, 0x58684c11, 0xc1611dab, 0xb6662d3d, 0x76dc4190, 0x01db7106, 495 0x98d220bc, 0xefd5102a, 0x71b18589, 0x06b6b51f, 0x9fbfe4a5, 0xe8b8d433, 496 0x7807c9a2, 0x0f00f934, 0x9609a88e, 0xe10e9818, 0x7f6a0dbb, 0x086d3d2d, 497 0x91646c97, 0xe6635c01, 0x6b6b51f4, 0x1c6c6162, 0x856530d8, 0xf262004e, 498 0x6c0695ed, 0x1b01a57b, 0x8208f4c1, 0xf50fc457, 0x65b0d9c6, 0x12b7e950, 499 0x8bbeb8ea, 0xfcb9887c, 0x62dd1ddf, 0x15da2d49, 0x8cd37cf3, 0xfbd44c65, 500 0x4db26158, 0x3ab551ce, 0xa3bc0074, 0xd4bb30e2, 0x4adfa541, 0x3dd895d7, 501 0xa4d1c46d, 0xd3d6f4fb, 0x4369e96a, 0x346ed9fc, 0xad678846, 0xda60b8d0, 502 0x44042d73, 0x33031de5, 0xaa0a4c5f, 0xdd0d7cc9, 0x5005713c, 0x270241aa, 503 0xbe0b1010, 0xc90c2086, 0x5768b525, 0x206f85b3, 0xb966d409, 0xce61e49f, 504 0x5edef90e, 0x29d9c998, 0xb0d09822, 0xc7d7a8b4, 0x59b33d17, 0x2eb40d81, 505 0xb7bd5c3b, 0xc0ba6cad, 0xedb88320, 0x9abfb3b6, 0x03b6e20c, 0x74b1d29a, 506 0xead54739, 0x9dd277af, 0x04db2615, 0x73dc1683, 0xe3630b12, 0x94643b84, 507 0x0d6d6a3e, 0x7a6a5aa8, 0xe40ecf0b, 0x9309ff9d, 0x0a00ae27, 0x7d079eb1, 508 0xf00f9344, 0x8708a3d2, 0x1e01f268, 0x6906c2fe, 0xf762575d, 0x806567cb, 509 0x196c3671, 0x6e6b06e7, 0xfed41b76, 0x89d32be0, 0x10da7a5a, 0x67dd4acc, 510 0xf9b9df6f, 0x8ebeeff9, 0x17b7be43, 0x60b08ed5, 0xd6d6a3e8, 0xa1d1937e, 511 0x38d8c2c4, 0x4fdff252, 0xd1bb67f1, 0xa6bc5767, 0x3fb506dd, 0x48b2364b, 512 0xd80d2bda, 0xaf0a1b4c, 0x36034af6, 0x41047a60, 0xdf60efc3, 0xa867df55, 513 0x316e8eef, 0x4669be79, 0xcb61b38c, 0xbc66831a, 0x256fd2a0, 0x5268e236, 514 0xcc0c7795, 0xbb0b4703, 0x220216b9, 0x5505262f, 0xc5ba3bbe, 0xb2bd0b28, 515 0x2bb45a92, 0x5cb36a04, 0xc2d7ffa7, 0xb5d0cf31, 0x2cd99e8b, 0x5bdeae1d, 516 0x9b64c2b0, 0xec63f226, 0x756aa39c, 0x026d930a, 0x9c0906a9, 0xeb0e363f, 517 0x72076785, 0x05005713, 0x95bf4a82, 0xe2b87a14, 0x7bb12bae, 0x0cb61b38, 518 0x92d28e9b, 0xe5d5be0d, 0x7cdcefb7, 0x0bdbdf21, 0x86d3d2d4, 0xf1d4e242, 519 0x68ddb3f8, 0x1fda836e, 0x81be16cd, 0xf6b9265b, 0x6fb077e1, 0x18b74777, 520 0x88085ae6, 0xff0f6a70, 0x66063bca, 0x11010b5c, 0x8f659eff, 0xf862ae69, 521 0x616bffd3, 0x166ccf45, 0xa00ae278, 0xd70dd2ee, 0x4e048354, 0x3903b3c2, 522 0xa7672661, 0xd06016f7, 0x4969474d, 0x3e6e77db, 0xaed16a4a, 0xd9d65adc, 523 0x40df0b66, 0x37d83bf0, 0xa9bcae53, 0xdebb9ec5, 0x47b2cf7f, 0x30b5ffe9, 524 0xbdbdf21c, 0xcabac28a, 0x53b39330, 0x24b4a3a6, 0xbad03605, 0xcdd70693, 525 0x54de5729, 0x23d967bf, 0xb3667a2e, 0xc4614ab8, 0x5d681b02, 0x2a6f2b94, 526 0xb40bbe37, 0xc30c8ea1, 0x5a05df1b, 0x2d02ef8d}; 527 const uint8_t *p = (const uint8_t *)buf; 528 529 crc = crc ^ ~0U; 530 while (size--) 531 crc = g_crc32_tab[(crc ^ *p++) & 0xFF] ^ (crc >> 8); 532 return crc ^ ~0U; 533 } 534 535 static uint32_t calc_gnu_debuglink_crc32(const void *buf, size_t size) { 536 return calc_crc32(0U, buf, size); 537 } 538 539 uint32_t ObjectFileELF::CalculateELFNotesSegmentsCRC32( 540 const ProgramHeaderColl &program_headers, DataExtractor &object_data) { 541 typedef ProgramHeaderCollConstIter Iter; 542 543 uint32_t core_notes_crc = 0; 544 545 for (Iter I = program_headers.begin(); I != program_headers.end(); ++I) { 546 if (I->p_type == llvm::ELF::PT_NOTE) { 547 const elf_off ph_offset = I->p_offset; 548 const size_t ph_size = I->p_filesz; 549 550 DataExtractor segment_data; 551 if (segment_data.SetData(object_data, ph_offset, ph_size) != ph_size) { 552 // The ELF program header contained incorrect data, 553 // probably corefile is incomplete or corrupted. 554 break; 555 } 556 557 core_notes_crc = calc_crc32(core_notes_crc, segment_data.GetDataStart(), 558 segment_data.GetByteSize()); 559 } 560 } 561 562 return core_notes_crc; 563 } 564 565 static const char *OSABIAsCString(unsigned char osabi_byte) { 566 #define _MAKE_OSABI_CASE(x) \ 567 case x: \ 568 return #x 569 switch (osabi_byte) { 570 _MAKE_OSABI_CASE(ELFOSABI_NONE); 571 _MAKE_OSABI_CASE(ELFOSABI_HPUX); 572 _MAKE_OSABI_CASE(ELFOSABI_NETBSD); 573 _MAKE_OSABI_CASE(ELFOSABI_GNU); 574 _MAKE_OSABI_CASE(ELFOSABI_HURD); 575 _MAKE_OSABI_CASE(ELFOSABI_SOLARIS); 576 _MAKE_OSABI_CASE(ELFOSABI_AIX); 577 _MAKE_OSABI_CASE(ELFOSABI_IRIX); 578 _MAKE_OSABI_CASE(ELFOSABI_FREEBSD); 579 _MAKE_OSABI_CASE(ELFOSABI_TRU64); 580 _MAKE_OSABI_CASE(ELFOSABI_MODESTO); 581 _MAKE_OSABI_CASE(ELFOSABI_OPENBSD); 582 _MAKE_OSABI_CASE(ELFOSABI_OPENVMS); 583 _MAKE_OSABI_CASE(ELFOSABI_NSK); 584 _MAKE_OSABI_CASE(ELFOSABI_AROS); 585 _MAKE_OSABI_CASE(ELFOSABI_FENIXOS); 586 _MAKE_OSABI_CASE(ELFOSABI_C6000_ELFABI); 587 _MAKE_OSABI_CASE(ELFOSABI_C6000_LINUX); 588 _MAKE_OSABI_CASE(ELFOSABI_ARM); 589 _MAKE_OSABI_CASE(ELFOSABI_STANDALONE); 590 default: 591 return "<unknown-osabi>"; 592 } 593 #undef _MAKE_OSABI_CASE 594 } 595 596 // 597 // WARNING : This function is being deprecated 598 // It's functionality has moved to ArchSpec::SetArchitecture 599 // This function is only being kept to validate the move. 600 // 601 // TODO : Remove this function 602 static bool GetOsFromOSABI(unsigned char osabi_byte, 603 llvm::Triple::OSType &ostype) { 604 switch (osabi_byte) { 605 case ELFOSABI_AIX: 606 ostype = llvm::Triple::OSType::AIX; 607 break; 608 case ELFOSABI_FREEBSD: 609 ostype = llvm::Triple::OSType::FreeBSD; 610 break; 611 case ELFOSABI_GNU: 612 ostype = llvm::Triple::OSType::Linux; 613 break; 614 case ELFOSABI_NETBSD: 615 ostype = llvm::Triple::OSType::NetBSD; 616 break; 617 case ELFOSABI_OPENBSD: 618 ostype = llvm::Triple::OSType::OpenBSD; 619 break; 620 case ELFOSABI_SOLARIS: 621 ostype = llvm::Triple::OSType::Solaris; 622 break; 623 default: 624 ostype = llvm::Triple::OSType::UnknownOS; 625 } 626 return ostype != llvm::Triple::OSType::UnknownOS; 627 } 628 629 size_t ObjectFileELF::GetModuleSpecifications( 630 const lldb_private::FileSpec &file, lldb::DataBufferSP &data_sp, 631 lldb::offset_t data_offset, lldb::offset_t file_offset, 632 lldb::offset_t length, lldb_private::ModuleSpecList &specs) { 633 Log *log(lldb_private::GetLogIfAllCategoriesSet(LIBLLDB_LOG_MODULES)); 634 635 const size_t initial_count = specs.GetSize(); 636 637 if (ObjectFileELF::MagicBytesMatch(data_sp, 0, data_sp->GetByteSize())) { 638 DataExtractor data; 639 data.SetData(data_sp); 640 elf::ELFHeader header; 641 lldb::offset_t header_offset = data_offset; 642 if (header.Parse(data, &header_offset)) { 643 if (data_sp) { 644 ModuleSpec spec(file); 645 646 const uint32_t sub_type = subTypeFromElfHeader(header); 647 spec.GetArchitecture().SetArchitecture( 648 eArchTypeELF, header.e_machine, sub_type, header.e_ident[EI_OSABI]); 649 650 if (spec.GetArchitecture().IsValid()) { 651 llvm::Triple::OSType ostype; 652 llvm::Triple::VendorType vendor; 653 llvm::Triple::OSType spec_ostype = 654 spec.GetArchitecture().GetTriple().getOS(); 655 656 if (log) 657 log->Printf("ObjectFileELF::%s file '%s' module OSABI: %s", 658 __FUNCTION__, file.GetPath().c_str(), 659 OSABIAsCString(header.e_ident[EI_OSABI])); 660 661 // SetArchitecture should have set the vendor to unknown 662 vendor = spec.GetArchitecture().GetTriple().getVendor(); 663 assert(vendor == llvm::Triple::UnknownVendor); 664 UNUSED_IF_ASSERT_DISABLED(vendor); 665 666 // 667 // Validate it is ok to remove GetOsFromOSABI 668 GetOsFromOSABI(header.e_ident[EI_OSABI], ostype); 669 assert(spec_ostype == ostype); 670 if (spec_ostype != llvm::Triple::OSType::UnknownOS) { 671 if (log) 672 log->Printf("ObjectFileELF::%s file '%s' set ELF module OS type " 673 "from ELF header OSABI.", 674 __FUNCTION__, file.GetPath().c_str()); 675 } 676 677 data_sp = MapFileData(file, -1, file_offset); 678 if (data_sp) 679 data.SetData(data_sp); 680 // In case there is header extension in the section #0, the header 681 // we parsed above could have sentinel values for e_phnum, e_shnum, 682 // and e_shstrndx. In this case we need to reparse the header 683 // with a bigger data source to get the actual values. 684 if (header.HasHeaderExtension()) { 685 lldb::offset_t header_offset = data_offset; 686 header.Parse(data, &header_offset); 687 } 688 689 uint32_t gnu_debuglink_crc = 0; 690 std::string gnu_debuglink_file; 691 SectionHeaderColl section_headers; 692 lldb_private::UUID &uuid = spec.GetUUID(); 693 694 GetSectionHeaderInfo(section_headers, data, header, uuid, 695 gnu_debuglink_file, gnu_debuglink_crc, 696 spec.GetArchitecture()); 697 698 llvm::Triple &spec_triple = spec.GetArchitecture().GetTriple(); 699 700 if (log) 701 log->Printf("ObjectFileELF::%s file '%s' module set to triple: %s " 702 "(architecture %s)", 703 __FUNCTION__, file.GetPath().c_str(), 704 spec_triple.getTriple().c_str(), 705 spec.GetArchitecture().GetArchitectureName()); 706 707 if (!uuid.IsValid()) { 708 uint32_t core_notes_crc = 0; 709 710 if (!gnu_debuglink_crc) { 711 static Timer::Category func_cat(LLVM_PRETTY_FUNCTION); 712 lldb_private::Timer scoped_timer( 713 func_cat, 714 "Calculating module crc32 %s with size %" PRIu64 " KiB", 715 file.GetLastPathComponent().AsCString(), 716 (file.GetByteSize() - file_offset) / 1024); 717 718 // For core files - which usually don't happen to have a 719 // gnu_debuglink, and are pretty bulky - calculating whole 720 // contents crc32 would be too much of luxury. Thus we will need 721 // to fallback to something simpler. 722 if (header.e_type == llvm::ELF::ET_CORE) { 723 ProgramHeaderColl program_headers; 724 GetProgramHeaderInfo(program_headers, data, header); 725 726 core_notes_crc = 727 CalculateELFNotesSegmentsCRC32(program_headers, data); 728 } else { 729 gnu_debuglink_crc = calc_gnu_debuglink_crc32( 730 data.GetDataStart(), data.GetByteSize()); 731 } 732 } 733 if (gnu_debuglink_crc) { 734 // Use 4 bytes of crc from the .gnu_debuglink section. 735 uint32_t uuidt[4] = {gnu_debuglink_crc, 0, 0, 0}; 736 uuid.SetBytes(uuidt, sizeof(uuidt)); 737 } else if (core_notes_crc) { 738 // Use 8 bytes - first 4 bytes for *magic* prefix, mainly to make 739 // it look different form 740 // .gnu_debuglink crc followed by 4 bytes of note segments crc. 741 uint32_t uuidt[4] = {g_core_uuid_magic, core_notes_crc, 0, 0}; 742 uuid.SetBytes(uuidt, sizeof(uuidt)); 743 } 744 } 745 746 specs.Append(spec); 747 } 748 } 749 } 750 } 751 752 return specs.GetSize() - initial_count; 753 } 754 755 //------------------------------------------------------------------ 756 // PluginInterface protocol 757 //------------------------------------------------------------------ 758 lldb_private::ConstString ObjectFileELF::GetPluginName() { 759 return GetPluginNameStatic(); 760 } 761 762 uint32_t ObjectFileELF::GetPluginVersion() { return m_plugin_version; } 763 //------------------------------------------------------------------ 764 // ObjectFile protocol 765 //------------------------------------------------------------------ 766 767 ObjectFileELF::ObjectFileELF(const lldb::ModuleSP &module_sp, 768 DataBufferSP &data_sp, lldb::offset_t data_offset, 769 const FileSpec *file, lldb::offset_t file_offset, 770 lldb::offset_t length) 771 : ObjectFile(module_sp, file, file_offset, length, data_sp, data_offset), 772 m_header(), m_uuid(), m_gnu_debuglink_file(), m_gnu_debuglink_crc(0), 773 m_program_headers(), m_section_headers(), m_dynamic_symbols(), 774 m_filespec_ap(), m_entry_point_address(), m_arch_spec() { 775 if (file) 776 m_file = *file; 777 ::memset(&m_header, 0, sizeof(m_header)); 778 } 779 780 ObjectFileELF::ObjectFileELF(const lldb::ModuleSP &module_sp, 781 DataBufferSP &header_data_sp, 782 const lldb::ProcessSP &process_sp, 783 addr_t header_addr) 784 : ObjectFile(module_sp, process_sp, header_addr, header_data_sp), 785 m_header(), m_uuid(), m_gnu_debuglink_file(), m_gnu_debuglink_crc(0), 786 m_program_headers(), m_section_headers(), m_dynamic_symbols(), 787 m_filespec_ap(), m_entry_point_address(), m_arch_spec() { 788 ::memset(&m_header, 0, sizeof(m_header)); 789 } 790 791 ObjectFileELF::~ObjectFileELF() {} 792 793 bool ObjectFileELF::IsExecutable() const { 794 return ((m_header.e_type & ET_EXEC) != 0) || (m_header.e_entry != 0); 795 } 796 797 bool ObjectFileELF::SetLoadAddress(Target &target, lldb::addr_t value, 798 bool value_is_offset) { 799 ModuleSP module_sp = GetModule(); 800 if (module_sp) { 801 size_t num_loaded_sections = 0; 802 SectionList *section_list = GetSectionList(); 803 if (section_list) { 804 if (!value_is_offset) { 805 bool found_offset = false; 806 for (size_t i = 1, count = GetProgramHeaderCount(); i <= count; ++i) { 807 const elf::ELFProgramHeader *header = GetProgramHeaderByIndex(i); 808 if (header == nullptr) 809 continue; 810 811 if (header->p_type != PT_LOAD || header->p_offset != 0) 812 continue; 813 814 value = value - header->p_vaddr; 815 found_offset = true; 816 break; 817 } 818 if (!found_offset) 819 return false; 820 } 821 822 const size_t num_sections = section_list->GetSize(); 823 size_t sect_idx = 0; 824 825 for (sect_idx = 0; sect_idx < num_sections; ++sect_idx) { 826 // Iterate through the object file sections to find all 827 // of the sections that have SHF_ALLOC in their flag bits. 828 SectionSP section_sp(section_list->GetSectionAtIndex(sect_idx)); 829 if (section_sp && section_sp->Test(SHF_ALLOC)) { 830 lldb::addr_t load_addr = section_sp->GetFileAddress(); 831 // We don't want to update the load address of a section with type 832 // eSectionTypeAbsoluteAddress as they already have the absolute load 833 // address 834 // already specified 835 if (section_sp->GetType() != eSectionTypeAbsoluteAddress) 836 load_addr += value; 837 838 // On 32-bit systems the load address have to fit into 4 bytes. The 839 // rest of 840 // the bytes are the overflow from the addition. 841 if (GetAddressByteSize() == 4) 842 load_addr &= 0xFFFFFFFF; 843 844 if (target.GetSectionLoadList().SetSectionLoadAddress(section_sp, 845 load_addr)) 846 ++num_loaded_sections; 847 } 848 } 849 return num_loaded_sections > 0; 850 } 851 } 852 return false; 853 } 854 855 ByteOrder ObjectFileELF::GetByteOrder() const { 856 if (m_header.e_ident[EI_DATA] == ELFDATA2MSB) 857 return eByteOrderBig; 858 if (m_header.e_ident[EI_DATA] == ELFDATA2LSB) 859 return eByteOrderLittle; 860 return eByteOrderInvalid; 861 } 862 863 uint32_t ObjectFileELF::GetAddressByteSize() const { 864 return m_data.GetAddressByteSize(); 865 } 866 867 AddressClass ObjectFileELF::GetAddressClass(addr_t file_addr) { 868 Symtab *symtab = GetSymtab(); 869 if (!symtab) 870 return eAddressClassUnknown; 871 872 // The address class is determined based on the symtab. Ask it from the object 873 // file what 874 // contains the symtab information. 875 ObjectFile *symtab_objfile = symtab->GetObjectFile(); 876 if (symtab_objfile != nullptr && symtab_objfile != this) 877 return symtab_objfile->GetAddressClass(file_addr); 878 879 auto res = ObjectFile::GetAddressClass(file_addr); 880 if (res != eAddressClassCode) 881 return res; 882 883 auto ub = m_address_class_map.upper_bound(file_addr); 884 if (ub == m_address_class_map.begin()) { 885 // No entry in the address class map before the address. Return 886 // default address class for an address in a code section. 887 return eAddressClassCode; 888 } 889 890 // Move iterator to the address class entry preceding address 891 --ub; 892 893 return ub->second; 894 } 895 896 size_t ObjectFileELF::SectionIndex(const SectionHeaderCollIter &I) { 897 return std::distance(m_section_headers.begin(), I) + 1u; 898 } 899 900 size_t ObjectFileELF::SectionIndex(const SectionHeaderCollConstIter &I) const { 901 return std::distance(m_section_headers.begin(), I) + 1u; 902 } 903 904 bool ObjectFileELF::ParseHeader() { 905 lldb::offset_t offset = 0; 906 return m_header.Parse(m_data, &offset); 907 } 908 909 bool ObjectFileELF::GetUUID(lldb_private::UUID *uuid) { 910 // Need to parse the section list to get the UUIDs, so make sure that's been 911 // done. 912 if (!ParseSectionHeaders() && GetType() != ObjectFile::eTypeCoreFile) 913 return false; 914 915 if (m_uuid.IsValid()) { 916 // We have the full build id uuid. 917 *uuid = m_uuid; 918 return true; 919 } else if (GetType() == ObjectFile::eTypeCoreFile) { 920 uint32_t core_notes_crc = 0; 921 922 if (!ParseProgramHeaders()) 923 return false; 924 925 core_notes_crc = CalculateELFNotesSegmentsCRC32(m_program_headers, m_data); 926 927 if (core_notes_crc) { 928 // Use 8 bytes - first 4 bytes for *magic* prefix, mainly to make it 929 // look different form .gnu_debuglink crc - followed by 4 bytes of note 930 // segments crc. 931 uint32_t uuidt[4] = {g_core_uuid_magic, core_notes_crc, 0, 0}; 932 m_uuid.SetBytes(uuidt, sizeof(uuidt)); 933 } 934 } else { 935 if (!m_gnu_debuglink_crc) 936 m_gnu_debuglink_crc = 937 calc_gnu_debuglink_crc32(m_data.GetDataStart(), m_data.GetByteSize()); 938 if (m_gnu_debuglink_crc) { 939 // Use 4 bytes of crc from the .gnu_debuglink section. 940 uint32_t uuidt[4] = {m_gnu_debuglink_crc, 0, 0, 0}; 941 m_uuid.SetBytes(uuidt, sizeof(uuidt)); 942 } 943 } 944 945 if (m_uuid.IsValid()) { 946 *uuid = m_uuid; 947 return true; 948 } 949 950 return false; 951 } 952 953 lldb_private::FileSpecList ObjectFileELF::GetDebugSymbolFilePaths() { 954 FileSpecList file_spec_list; 955 956 if (!m_gnu_debuglink_file.empty()) { 957 FileSpec file_spec(m_gnu_debuglink_file, false); 958 file_spec_list.Append(file_spec); 959 } 960 return file_spec_list; 961 } 962 963 uint32_t ObjectFileELF::GetDependentModules(FileSpecList &files) { 964 size_t num_modules = ParseDependentModules(); 965 uint32_t num_specs = 0; 966 967 for (unsigned i = 0; i < num_modules; ++i) { 968 if (files.AppendIfUnique(m_filespec_ap->GetFileSpecAtIndex(i))) 969 num_specs++; 970 } 971 972 return num_specs; 973 } 974 975 Address ObjectFileELF::GetImageInfoAddress(Target *target) { 976 if (!ParseDynamicSymbols()) 977 return Address(); 978 979 SectionList *section_list = GetSectionList(); 980 if (!section_list) 981 return Address(); 982 983 // Find the SHT_DYNAMIC (.dynamic) section. 984 SectionSP dynsym_section_sp( 985 section_list->FindSectionByType(eSectionTypeELFDynamicLinkInfo, true)); 986 if (!dynsym_section_sp) 987 return Address(); 988 assert(dynsym_section_sp->GetObjectFile() == this); 989 990 user_id_t dynsym_id = dynsym_section_sp->GetID(); 991 const ELFSectionHeaderInfo *dynsym_hdr = GetSectionHeaderByIndex(dynsym_id); 992 if (!dynsym_hdr) 993 return Address(); 994 995 for (size_t i = 0; i < m_dynamic_symbols.size(); ++i) { 996 ELFDynamic &symbol = m_dynamic_symbols[i]; 997 998 if (symbol.d_tag == DT_DEBUG) { 999 // Compute the offset as the number of previous entries plus the 1000 // size of d_tag. 1001 addr_t offset = i * dynsym_hdr->sh_entsize + GetAddressByteSize(); 1002 return Address(dynsym_section_sp, offset); 1003 } 1004 // MIPS executables uses DT_MIPS_RLD_MAP_REL to support PIE. DT_MIPS_RLD_MAP 1005 // exists in non-PIE. 1006 else if ((symbol.d_tag == DT_MIPS_RLD_MAP || 1007 symbol.d_tag == DT_MIPS_RLD_MAP_REL) && 1008 target) { 1009 addr_t offset = i * dynsym_hdr->sh_entsize + GetAddressByteSize(); 1010 addr_t dyn_base = dynsym_section_sp->GetLoadBaseAddress(target); 1011 if (dyn_base == LLDB_INVALID_ADDRESS) 1012 return Address(); 1013 1014 Status error; 1015 if (symbol.d_tag == DT_MIPS_RLD_MAP) { 1016 // DT_MIPS_RLD_MAP tag stores an absolute address of the debug pointer. 1017 Address addr; 1018 if (target->ReadPointerFromMemory(dyn_base + offset, false, error, 1019 addr)) 1020 return addr; 1021 } 1022 if (symbol.d_tag == DT_MIPS_RLD_MAP_REL) { 1023 // DT_MIPS_RLD_MAP_REL tag stores the offset to the debug pointer, 1024 // relative to the address of the tag. 1025 uint64_t rel_offset; 1026 rel_offset = target->ReadUnsignedIntegerFromMemory( 1027 dyn_base + offset, false, GetAddressByteSize(), UINT64_MAX, error); 1028 if (error.Success() && rel_offset != UINT64_MAX) { 1029 Address addr; 1030 addr_t debug_ptr_address = 1031 dyn_base + (offset - GetAddressByteSize()) + rel_offset; 1032 addr.SetOffset(debug_ptr_address); 1033 return addr; 1034 } 1035 } 1036 } 1037 } 1038 1039 return Address(); 1040 } 1041 1042 lldb_private::Address ObjectFileELF::GetEntryPointAddress() { 1043 if (m_entry_point_address.IsValid()) 1044 return m_entry_point_address; 1045 1046 if (!ParseHeader() || !IsExecutable()) 1047 return m_entry_point_address; 1048 1049 SectionList *section_list = GetSectionList(); 1050 addr_t offset = m_header.e_entry; 1051 1052 if (!section_list) 1053 m_entry_point_address.SetOffset(offset); 1054 else 1055 m_entry_point_address.ResolveAddressUsingFileSections(offset, section_list); 1056 return m_entry_point_address; 1057 } 1058 1059 //---------------------------------------------------------------------- 1060 // ParseDependentModules 1061 //---------------------------------------------------------------------- 1062 size_t ObjectFileELF::ParseDependentModules() { 1063 if (m_filespec_ap.get()) 1064 return m_filespec_ap->GetSize(); 1065 1066 m_filespec_ap.reset(new FileSpecList()); 1067 1068 if (!ParseSectionHeaders()) 1069 return 0; 1070 1071 SectionList *section_list = GetSectionList(); 1072 if (!section_list) 1073 return 0; 1074 1075 // Find the SHT_DYNAMIC section. 1076 Section *dynsym = 1077 section_list->FindSectionByType(eSectionTypeELFDynamicLinkInfo, true) 1078 .get(); 1079 if (!dynsym) 1080 return 0; 1081 assert(dynsym->GetObjectFile() == this); 1082 1083 const ELFSectionHeaderInfo *header = GetSectionHeaderByIndex(dynsym->GetID()); 1084 if (!header) 1085 return 0; 1086 // sh_link: section header index of string table used by entries in the 1087 // section. 1088 Section *dynstr = section_list->FindSectionByID(header->sh_link + 1).get(); 1089 if (!dynstr) 1090 return 0; 1091 1092 DataExtractor dynsym_data; 1093 DataExtractor dynstr_data; 1094 if (ReadSectionData(dynsym, dynsym_data) && 1095 ReadSectionData(dynstr, dynstr_data)) { 1096 ELFDynamic symbol; 1097 const lldb::offset_t section_size = dynsym_data.GetByteSize(); 1098 lldb::offset_t offset = 0; 1099 1100 // The only type of entries we are concerned with are tagged DT_NEEDED, 1101 // yielding the name of a required library. 1102 while (offset < section_size) { 1103 if (!symbol.Parse(dynsym_data, &offset)) 1104 break; 1105 1106 if (symbol.d_tag != DT_NEEDED) 1107 continue; 1108 1109 uint32_t str_index = static_cast<uint32_t>(symbol.d_val); 1110 const char *lib_name = dynstr_data.PeekCStr(str_index); 1111 m_filespec_ap->Append(FileSpec(lib_name, true)); 1112 } 1113 } 1114 1115 return m_filespec_ap->GetSize(); 1116 } 1117 1118 //---------------------------------------------------------------------- 1119 // GetProgramHeaderInfo 1120 //---------------------------------------------------------------------- 1121 size_t ObjectFileELF::GetProgramHeaderInfo(ProgramHeaderColl &program_headers, 1122 DataExtractor &object_data, 1123 const ELFHeader &header) { 1124 // We have already parsed the program headers 1125 if (!program_headers.empty()) 1126 return program_headers.size(); 1127 1128 // If there are no program headers to read we are done. 1129 if (header.e_phnum == 0) 1130 return 0; 1131 1132 program_headers.resize(header.e_phnum); 1133 if (program_headers.size() != header.e_phnum) 1134 return 0; 1135 1136 const size_t ph_size = header.e_phnum * header.e_phentsize; 1137 const elf_off ph_offset = header.e_phoff; 1138 DataExtractor data; 1139 if (data.SetData(object_data, ph_offset, ph_size) != ph_size) 1140 return 0; 1141 1142 uint32_t idx; 1143 lldb::offset_t offset; 1144 for (idx = 0, offset = 0; idx < header.e_phnum; ++idx) { 1145 if (program_headers[idx].Parse(data, &offset) == false) 1146 break; 1147 } 1148 1149 if (idx < program_headers.size()) 1150 program_headers.resize(idx); 1151 1152 return program_headers.size(); 1153 } 1154 1155 //---------------------------------------------------------------------- 1156 // ParseProgramHeaders 1157 //---------------------------------------------------------------------- 1158 size_t ObjectFileELF::ParseProgramHeaders() { 1159 return GetProgramHeaderInfo(m_program_headers, m_data, m_header); 1160 } 1161 1162 lldb_private::Status 1163 ObjectFileELF::RefineModuleDetailsFromNote(lldb_private::DataExtractor &data, 1164 lldb_private::ArchSpec &arch_spec, 1165 lldb_private::UUID &uuid) { 1166 Log *log(lldb_private::GetLogIfAllCategoriesSet(LIBLLDB_LOG_MODULES)); 1167 Status error; 1168 1169 lldb::offset_t offset = 0; 1170 1171 while (true) { 1172 // Parse the note header. If this fails, bail out. 1173 const lldb::offset_t note_offset = offset; 1174 ELFNote note = ELFNote(); 1175 if (!note.Parse(data, &offset)) { 1176 // We're done. 1177 return error; 1178 } 1179 1180 if (log) 1181 log->Printf("ObjectFileELF::%s parsing note name='%s', type=%" PRIu32, 1182 __FUNCTION__, note.n_name.c_str(), note.n_type); 1183 1184 // Process FreeBSD ELF notes. 1185 if ((note.n_name == LLDB_NT_OWNER_FREEBSD) && 1186 (note.n_type == LLDB_NT_FREEBSD_ABI_TAG) && 1187 (note.n_descsz == LLDB_NT_FREEBSD_ABI_SIZE)) { 1188 // Pull out the min version info. 1189 uint32_t version_info; 1190 if (data.GetU32(&offset, &version_info, 1) == nullptr) { 1191 error.SetErrorString("failed to read FreeBSD ABI note payload"); 1192 return error; 1193 } 1194 1195 // Convert the version info into a major/minor number. 1196 const uint32_t version_major = version_info / 100000; 1197 const uint32_t version_minor = (version_info / 1000) % 100; 1198 1199 char os_name[32]; 1200 snprintf(os_name, sizeof(os_name), "freebsd%" PRIu32 ".%" PRIu32, 1201 version_major, version_minor); 1202 1203 // Set the elf OS version to FreeBSD. Also clear the vendor. 1204 arch_spec.GetTriple().setOSName(os_name); 1205 arch_spec.GetTriple().setVendor(llvm::Triple::VendorType::UnknownVendor); 1206 1207 if (log) 1208 log->Printf("ObjectFileELF::%s detected FreeBSD %" PRIu32 ".%" PRIu32 1209 ".%" PRIu32, 1210 __FUNCTION__, version_major, version_minor, 1211 static_cast<uint32_t>(version_info % 1000)); 1212 } 1213 // Process GNU ELF notes. 1214 else if (note.n_name == LLDB_NT_OWNER_GNU) { 1215 switch (note.n_type) { 1216 case LLDB_NT_GNU_ABI_TAG: 1217 if (note.n_descsz == LLDB_NT_GNU_ABI_SIZE) { 1218 // Pull out the min OS version supporting the ABI. 1219 uint32_t version_info[4]; 1220 if (data.GetU32(&offset, &version_info[0], note.n_descsz / 4) == 1221 nullptr) { 1222 error.SetErrorString("failed to read GNU ABI note payload"); 1223 return error; 1224 } 1225 1226 // Set the OS per the OS field. 1227 switch (version_info[0]) { 1228 case LLDB_NT_GNU_ABI_OS_LINUX: 1229 arch_spec.GetTriple().setOS(llvm::Triple::OSType::Linux); 1230 arch_spec.GetTriple().setVendor( 1231 llvm::Triple::VendorType::UnknownVendor); 1232 if (log) 1233 log->Printf( 1234 "ObjectFileELF::%s detected Linux, min version %" PRIu32 1235 ".%" PRIu32 ".%" PRIu32, 1236 __FUNCTION__, version_info[1], version_info[2], 1237 version_info[3]); 1238 // FIXME we have the minimal version number, we could be propagating 1239 // that. version_info[1] = OS Major, version_info[2] = OS Minor, 1240 // version_info[3] = Revision. 1241 break; 1242 case LLDB_NT_GNU_ABI_OS_HURD: 1243 arch_spec.GetTriple().setOS(llvm::Triple::OSType::UnknownOS); 1244 arch_spec.GetTriple().setVendor( 1245 llvm::Triple::VendorType::UnknownVendor); 1246 if (log) 1247 log->Printf("ObjectFileELF::%s detected Hurd (unsupported), min " 1248 "version %" PRIu32 ".%" PRIu32 ".%" PRIu32, 1249 __FUNCTION__, version_info[1], version_info[2], 1250 version_info[3]); 1251 break; 1252 case LLDB_NT_GNU_ABI_OS_SOLARIS: 1253 arch_spec.GetTriple().setOS(llvm::Triple::OSType::Solaris); 1254 arch_spec.GetTriple().setVendor( 1255 llvm::Triple::VendorType::UnknownVendor); 1256 if (log) 1257 log->Printf( 1258 "ObjectFileELF::%s detected Solaris, min version %" PRIu32 1259 ".%" PRIu32 ".%" PRIu32, 1260 __FUNCTION__, version_info[1], version_info[2], 1261 version_info[3]); 1262 break; 1263 default: 1264 if (log) 1265 log->Printf( 1266 "ObjectFileELF::%s unrecognized OS in note, id %" PRIu32 1267 ", min version %" PRIu32 ".%" PRIu32 ".%" PRIu32, 1268 __FUNCTION__, version_info[0], version_info[1], 1269 version_info[2], version_info[3]); 1270 break; 1271 } 1272 } 1273 break; 1274 1275 case LLDB_NT_GNU_BUILD_ID_TAG: 1276 // Only bother processing this if we don't already have the uuid set. 1277 if (!uuid.IsValid()) { 1278 // 16 bytes is UUID|MD5, 20 bytes is SHA1. Other linkers may produce a 1279 // build-id of a different 1280 // length. Accept it as long as it's at least 4 bytes as it will be 1281 // better than our own crc32. 1282 if (note.n_descsz >= 4 && note.n_descsz <= 20) { 1283 uint8_t uuidbuf[20]; 1284 if (data.GetU8(&offset, &uuidbuf, note.n_descsz) == nullptr) { 1285 error.SetErrorString("failed to read GNU_BUILD_ID note payload"); 1286 return error; 1287 } 1288 1289 // Save the build id as the UUID for the module. 1290 uuid.SetBytes(uuidbuf, note.n_descsz); 1291 } 1292 } 1293 break; 1294 } 1295 if (arch_spec.IsMIPS() && 1296 arch_spec.GetTriple().getOS() == llvm::Triple::OSType::UnknownOS) 1297 // The note.n_name == LLDB_NT_OWNER_GNU is valid for Linux platform 1298 arch_spec.GetTriple().setOS(llvm::Triple::OSType::Linux); 1299 } 1300 // Process NetBSD ELF notes. 1301 else if ((note.n_name == LLDB_NT_OWNER_NETBSD) && 1302 (note.n_type == LLDB_NT_NETBSD_ABI_TAG) && 1303 (note.n_descsz == LLDB_NT_NETBSD_ABI_SIZE)) { 1304 // Pull out the min version info. 1305 uint32_t version_info; 1306 if (data.GetU32(&offset, &version_info, 1) == nullptr) { 1307 error.SetErrorString("failed to read NetBSD ABI note payload"); 1308 return error; 1309 } 1310 1311 // Set the elf OS version to NetBSD. Also clear the vendor. 1312 arch_spec.GetTriple().setOS(llvm::Triple::OSType::NetBSD); 1313 arch_spec.GetTriple().setVendor(llvm::Triple::VendorType::UnknownVendor); 1314 1315 if (log) 1316 log->Printf( 1317 "ObjectFileELF::%s detected NetBSD, min version constant %" PRIu32, 1318 __FUNCTION__, version_info); 1319 } 1320 // Process OpenBSD ELF notes. 1321 else if (note.n_name == LLDB_NT_OWNER_OPENBSD) { 1322 // Set the elf OS version to OpenBSD. Also clear the vendor. 1323 arch_spec.GetTriple().setOS(llvm::Triple::OSType::OpenBSD); 1324 arch_spec.GetTriple().setVendor(llvm::Triple::VendorType::UnknownVendor); 1325 } 1326 // Process CSR kalimba notes 1327 else if ((note.n_type == LLDB_NT_GNU_ABI_TAG) && 1328 (note.n_name == LLDB_NT_OWNER_CSR)) { 1329 arch_spec.GetTriple().setOS(llvm::Triple::OSType::UnknownOS); 1330 arch_spec.GetTriple().setVendor(llvm::Triple::VendorType::CSR); 1331 1332 // TODO At some point the description string could be processed. 1333 // It could provide a steer towards the kalimba variant which 1334 // this ELF targets. 1335 if (note.n_descsz) { 1336 const char *cstr = 1337 data.GetCStr(&offset, llvm::alignTo(note.n_descsz, 4)); 1338 (void)cstr; 1339 } 1340 } else if (note.n_name == LLDB_NT_OWNER_ANDROID) { 1341 arch_spec.GetTriple().setOS(llvm::Triple::OSType::Linux); 1342 arch_spec.GetTriple().setEnvironment( 1343 llvm::Triple::EnvironmentType::Android); 1344 } else if (note.n_name == LLDB_NT_OWNER_LINUX) { 1345 // This is sometimes found in core files and usually contains extended 1346 // register info 1347 arch_spec.GetTriple().setOS(llvm::Triple::OSType::Linux); 1348 } else if (note.n_name == LLDB_NT_OWNER_CORE) { 1349 // Parse the NT_FILE to look for stuff in paths to shared libraries 1350 // As the contents look like this in a 64 bit ELF core file: 1351 // count = 0x000000000000000a (10) 1352 // page_size = 0x0000000000001000 (4096) 1353 // Index start end file_ofs path 1354 // ===== ------------------ ------------------ ------------------ 1355 // ------------------------------------- 1356 // [ 0] 0x0000000000400000 0x0000000000401000 0x0000000000000000 1357 // /tmp/a.out 1358 // [ 1] 0x0000000000600000 0x0000000000601000 0x0000000000000000 1359 // /tmp/a.out 1360 // [ 2] 0x0000000000601000 0x0000000000602000 0x0000000000000001 1361 // /tmp/a.out 1362 // [ 3] 0x00007fa79c9ed000 0x00007fa79cba8000 0x0000000000000000 1363 // /lib/x86_64-linux-gnu/libc-2.19.so 1364 // [ 4] 0x00007fa79cba8000 0x00007fa79cda7000 0x00000000000001bb 1365 // /lib/x86_64-linux-gnu/libc-2.19.so 1366 // [ 5] 0x00007fa79cda7000 0x00007fa79cdab000 0x00000000000001ba 1367 // /lib/x86_64-linux-gnu/libc-2.19.so 1368 // [ 6] 0x00007fa79cdab000 0x00007fa79cdad000 0x00000000000001be 1369 // /lib/x86_64-linux-gnu/libc-2.19.so 1370 // [ 7] 0x00007fa79cdb2000 0x00007fa79cdd5000 0x0000000000000000 1371 // /lib/x86_64-linux-gnu/ld-2.19.so 1372 // [ 8] 0x00007fa79cfd4000 0x00007fa79cfd5000 0x0000000000000022 1373 // /lib/x86_64-linux-gnu/ld-2.19.so 1374 // [ 9] 0x00007fa79cfd5000 0x00007fa79cfd6000 0x0000000000000023 1375 // /lib/x86_64-linux-gnu/ld-2.19.so 1376 // In the 32 bit ELFs the count, page_size, start, end, file_ofs are 1377 // uint32_t 1378 // For reference: see readelf source code (in binutils). 1379 if (note.n_type == NT_FILE) { 1380 uint64_t count = data.GetAddress(&offset); 1381 const char *cstr; 1382 data.GetAddress(&offset); // Skip page size 1383 offset += count * 3 * 1384 data.GetAddressByteSize(); // Skip all start/end/file_ofs 1385 for (size_t i = 0; i < count; ++i) { 1386 cstr = data.GetCStr(&offset); 1387 if (cstr == nullptr) { 1388 error.SetErrorStringWithFormat("ObjectFileELF::%s trying to read " 1389 "at an offset after the end " 1390 "(GetCStr returned nullptr)", 1391 __FUNCTION__); 1392 return error; 1393 } 1394 llvm::StringRef path(cstr); 1395 if (path.contains("/lib/x86_64-linux-gnu") || path.contains("/lib/i386-linux-gnu")) { 1396 arch_spec.GetTriple().setOS(llvm::Triple::OSType::Linux); 1397 break; 1398 } 1399 } 1400 if (arch_spec.IsMIPS() && 1401 arch_spec.GetTriple().getOS() == llvm::Triple::OSType::UnknownOS) 1402 // In case of MIPSR6, the LLDB_NT_OWNER_GNU note is missing 1403 // for some cases (e.g. compile with -nostdlib) 1404 // Hence set OS to Linux 1405 arch_spec.GetTriple().setOS(llvm::Triple::OSType::Linux); 1406 } 1407 } 1408 1409 // Calculate the offset of the next note just in case "offset" has been used 1410 // to poke at the contents of the note data 1411 offset = note_offset + note.GetByteSize(); 1412 } 1413 1414 return error; 1415 } 1416 1417 void ObjectFileELF::ParseARMAttributes(DataExtractor &data, uint64_t length, 1418 ArchSpec &arch_spec) { 1419 lldb::offset_t Offset = 0; 1420 1421 uint8_t FormatVersion = data.GetU8(&Offset); 1422 if (FormatVersion != llvm::ARMBuildAttrs::Format_Version) 1423 return; 1424 1425 Offset = Offset + sizeof(uint32_t); // Section Length 1426 llvm::StringRef VendorName = data.GetCStr(&Offset); 1427 1428 if (VendorName != "aeabi") 1429 return; 1430 1431 if (arch_spec.GetTriple().getEnvironment() == 1432 llvm::Triple::UnknownEnvironment) 1433 arch_spec.GetTriple().setEnvironment(llvm::Triple::EABI); 1434 1435 while (Offset < length) { 1436 uint8_t Tag = data.GetU8(&Offset); 1437 uint32_t Size = data.GetU32(&Offset); 1438 1439 if (Tag != llvm::ARMBuildAttrs::File || Size == 0) 1440 continue; 1441 1442 while (Offset < length) { 1443 uint64_t Tag = data.GetULEB128(&Offset); 1444 switch (Tag) { 1445 default: 1446 if (Tag < 32) 1447 data.GetULEB128(&Offset); 1448 else if (Tag % 2 == 0) 1449 data.GetULEB128(&Offset); 1450 else 1451 data.GetCStr(&Offset); 1452 1453 break; 1454 1455 case llvm::ARMBuildAttrs::CPU_raw_name: 1456 case llvm::ARMBuildAttrs::CPU_name: 1457 data.GetCStr(&Offset); 1458 1459 break; 1460 1461 case llvm::ARMBuildAttrs::ABI_VFP_args: { 1462 uint64_t VFPArgs = data.GetULEB128(&Offset); 1463 1464 if (VFPArgs == llvm::ARMBuildAttrs::BaseAAPCS) { 1465 if (arch_spec.GetTriple().getEnvironment() == 1466 llvm::Triple::UnknownEnvironment || 1467 arch_spec.GetTriple().getEnvironment() == llvm::Triple::EABIHF) 1468 arch_spec.GetTriple().setEnvironment(llvm::Triple::EABI); 1469 1470 arch_spec.SetFlags(ArchSpec::eARM_abi_soft_float); 1471 } else if (VFPArgs == llvm::ARMBuildAttrs::HardFPAAPCS) { 1472 if (arch_spec.GetTriple().getEnvironment() == 1473 llvm::Triple::UnknownEnvironment || 1474 arch_spec.GetTriple().getEnvironment() == llvm::Triple::EABI) 1475 arch_spec.GetTriple().setEnvironment(llvm::Triple::EABIHF); 1476 1477 arch_spec.SetFlags(ArchSpec::eARM_abi_hard_float); 1478 } 1479 1480 break; 1481 } 1482 } 1483 } 1484 } 1485 } 1486 1487 //---------------------------------------------------------------------- 1488 // GetSectionHeaderInfo 1489 //---------------------------------------------------------------------- 1490 size_t ObjectFileELF::GetSectionHeaderInfo(SectionHeaderColl §ion_headers, 1491 DataExtractor &object_data, 1492 const elf::ELFHeader &header, 1493 lldb_private::UUID &uuid, 1494 std::string &gnu_debuglink_file, 1495 uint32_t &gnu_debuglink_crc, 1496 ArchSpec &arch_spec) { 1497 // Don't reparse the section headers if we already did that. 1498 if (!section_headers.empty()) 1499 return section_headers.size(); 1500 1501 // Only initialize the arch_spec to okay defaults if they're not already set. 1502 // We'll refine this with note data as we parse the notes. 1503 if (arch_spec.GetTriple().getOS() == llvm::Triple::OSType::UnknownOS) { 1504 llvm::Triple::OSType ostype; 1505 llvm::Triple::OSType spec_ostype; 1506 const uint32_t sub_type = subTypeFromElfHeader(header); 1507 arch_spec.SetArchitecture(eArchTypeELF, header.e_machine, sub_type, 1508 header.e_ident[EI_OSABI]); 1509 1510 // Validate if it is ok to remove GetOsFromOSABI. 1511 // Note, that now the OS is determined based on EI_OSABI flag and 1512 // the info extracted from ELF notes (see RefineModuleDetailsFromNote). 1513 // However in some cases that still might be not enough: for example 1514 // a shared library might not have any notes at all 1515 // and have EI_OSABI flag set to System V, 1516 // as result the OS will be set to UnknownOS. 1517 GetOsFromOSABI(header.e_ident[EI_OSABI], ostype); 1518 spec_ostype = arch_spec.GetTriple().getOS(); 1519 assert(spec_ostype == ostype); 1520 UNUSED_IF_ASSERT_DISABLED(spec_ostype); 1521 } 1522 1523 if (arch_spec.GetMachine() == llvm::Triple::mips || 1524 arch_spec.GetMachine() == llvm::Triple::mipsel || 1525 arch_spec.GetMachine() == llvm::Triple::mips64 || 1526 arch_spec.GetMachine() == llvm::Triple::mips64el) { 1527 switch (header.e_flags & llvm::ELF::EF_MIPS_ARCH_ASE) { 1528 case llvm::ELF::EF_MIPS_MICROMIPS: 1529 arch_spec.SetFlags(ArchSpec::eMIPSAse_micromips); 1530 break; 1531 case llvm::ELF::EF_MIPS_ARCH_ASE_M16: 1532 arch_spec.SetFlags(ArchSpec::eMIPSAse_mips16); 1533 break; 1534 case llvm::ELF::EF_MIPS_ARCH_ASE_MDMX: 1535 arch_spec.SetFlags(ArchSpec::eMIPSAse_mdmx); 1536 break; 1537 default: 1538 break; 1539 } 1540 } 1541 1542 if (arch_spec.GetMachine() == llvm::Triple::arm || 1543 arch_spec.GetMachine() == llvm::Triple::thumb) { 1544 if (header.e_flags & llvm::ELF::EF_ARM_SOFT_FLOAT) 1545 arch_spec.SetFlags(ArchSpec::eARM_abi_soft_float); 1546 else if (header.e_flags & llvm::ELF::EF_ARM_VFP_FLOAT) 1547 arch_spec.SetFlags(ArchSpec::eARM_abi_hard_float); 1548 } 1549 1550 // If there are no section headers we are done. 1551 if (header.e_shnum == 0) 1552 return 0; 1553 1554 Log *log(lldb_private::GetLogIfAllCategoriesSet(LIBLLDB_LOG_MODULES)); 1555 1556 section_headers.resize(header.e_shnum); 1557 if (section_headers.size() != header.e_shnum) 1558 return 0; 1559 1560 const size_t sh_size = header.e_shnum * header.e_shentsize; 1561 const elf_off sh_offset = header.e_shoff; 1562 DataExtractor sh_data; 1563 if (sh_data.SetData(object_data, sh_offset, sh_size) != sh_size) 1564 return 0; 1565 1566 uint32_t idx; 1567 lldb::offset_t offset; 1568 for (idx = 0, offset = 0; idx < header.e_shnum; ++idx) { 1569 if (section_headers[idx].Parse(sh_data, &offset) == false) 1570 break; 1571 } 1572 if (idx < section_headers.size()) 1573 section_headers.resize(idx); 1574 1575 const unsigned strtab_idx = header.e_shstrndx; 1576 if (strtab_idx && strtab_idx < section_headers.size()) { 1577 const ELFSectionHeaderInfo &sheader = section_headers[strtab_idx]; 1578 const size_t byte_size = sheader.sh_size; 1579 const Elf64_Off offset = sheader.sh_offset; 1580 lldb_private::DataExtractor shstr_data; 1581 1582 if (shstr_data.SetData(object_data, offset, byte_size) == byte_size) { 1583 for (SectionHeaderCollIter I = section_headers.begin(); 1584 I != section_headers.end(); ++I) { 1585 static ConstString g_sect_name_gnu_debuglink(".gnu_debuglink"); 1586 const ELFSectionHeaderInfo &sheader = *I; 1587 const uint64_t section_size = 1588 sheader.sh_type == SHT_NOBITS ? 0 : sheader.sh_size; 1589 ConstString name(shstr_data.PeekCStr(I->sh_name)); 1590 1591 I->section_name = name; 1592 1593 if (arch_spec.IsMIPS()) { 1594 uint32_t arch_flags = arch_spec.GetFlags(); 1595 DataExtractor data; 1596 if (sheader.sh_type == SHT_MIPS_ABIFLAGS) { 1597 1598 if (section_size && (data.SetData(object_data, sheader.sh_offset, 1599 section_size) == section_size)) { 1600 // MIPS ASE Mask is at offset 12 in MIPS.abiflags section 1601 lldb::offset_t offset = 12; // MIPS ABI Flags Version: 0 1602 arch_flags |= data.GetU32(&offset); 1603 1604 // The floating point ABI is at offset 7 1605 offset = 7; 1606 switch (data.GetU8(&offset)) { 1607 case llvm::Mips::Val_GNU_MIPS_ABI_FP_ANY: 1608 arch_flags |= lldb_private::ArchSpec::eMIPS_ABI_FP_ANY; 1609 break; 1610 case llvm::Mips::Val_GNU_MIPS_ABI_FP_DOUBLE: 1611 arch_flags |= lldb_private::ArchSpec::eMIPS_ABI_FP_DOUBLE; 1612 break; 1613 case llvm::Mips::Val_GNU_MIPS_ABI_FP_SINGLE: 1614 arch_flags |= lldb_private::ArchSpec::eMIPS_ABI_FP_SINGLE; 1615 break; 1616 case llvm::Mips::Val_GNU_MIPS_ABI_FP_SOFT: 1617 arch_flags |= lldb_private::ArchSpec::eMIPS_ABI_FP_SOFT; 1618 break; 1619 case llvm::Mips::Val_GNU_MIPS_ABI_FP_OLD_64: 1620 arch_flags |= lldb_private::ArchSpec::eMIPS_ABI_FP_OLD_64; 1621 break; 1622 case llvm::Mips::Val_GNU_MIPS_ABI_FP_XX: 1623 arch_flags |= lldb_private::ArchSpec::eMIPS_ABI_FP_XX; 1624 break; 1625 case llvm::Mips::Val_GNU_MIPS_ABI_FP_64: 1626 arch_flags |= lldb_private::ArchSpec::eMIPS_ABI_FP_64; 1627 break; 1628 case llvm::Mips::Val_GNU_MIPS_ABI_FP_64A: 1629 arch_flags |= lldb_private::ArchSpec::eMIPS_ABI_FP_64A; 1630 break; 1631 } 1632 } 1633 } 1634 // Settings appropriate ArchSpec ABI Flags 1635 switch (header.e_flags & llvm::ELF::EF_MIPS_ABI) { 1636 case llvm::ELF::EF_MIPS_ABI_O32: 1637 arch_flags |= lldb_private::ArchSpec::eMIPSABI_O32; 1638 break; 1639 case EF_MIPS_ABI_O64: 1640 arch_flags |= lldb_private::ArchSpec::eMIPSABI_O64; 1641 break; 1642 case EF_MIPS_ABI_EABI32: 1643 arch_flags |= lldb_private::ArchSpec::eMIPSABI_EABI32; 1644 break; 1645 case EF_MIPS_ABI_EABI64: 1646 arch_flags |= lldb_private::ArchSpec::eMIPSABI_EABI64; 1647 break; 1648 default: 1649 // ABI Mask doesn't cover N32 and N64 ABI. 1650 if (header.e_ident[EI_CLASS] == llvm::ELF::ELFCLASS64) 1651 arch_flags |= lldb_private::ArchSpec::eMIPSABI_N64; 1652 else if (header.e_flags & llvm::ELF::EF_MIPS_ABI2) 1653 arch_flags |= lldb_private::ArchSpec::eMIPSABI_N32; 1654 break; 1655 } 1656 arch_spec.SetFlags(arch_flags); 1657 } 1658 1659 if (arch_spec.GetMachine() == llvm::Triple::arm || 1660 arch_spec.GetMachine() == llvm::Triple::thumb) { 1661 DataExtractor data; 1662 1663 if (sheader.sh_type == SHT_ARM_ATTRIBUTES && section_size != 0 && 1664 data.SetData(object_data, sheader.sh_offset, section_size) == section_size) 1665 ParseARMAttributes(data, section_size, arch_spec); 1666 } 1667 1668 if (name == g_sect_name_gnu_debuglink) { 1669 DataExtractor data; 1670 if (section_size && (data.SetData(object_data, sheader.sh_offset, 1671 section_size) == section_size)) { 1672 lldb::offset_t gnu_debuglink_offset = 0; 1673 gnu_debuglink_file = data.GetCStr(&gnu_debuglink_offset); 1674 gnu_debuglink_offset = llvm::alignTo(gnu_debuglink_offset, 4); 1675 data.GetU32(&gnu_debuglink_offset, &gnu_debuglink_crc, 1); 1676 } 1677 } 1678 1679 // Process ELF note section entries. 1680 bool is_note_header = (sheader.sh_type == SHT_NOTE); 1681 1682 // The section header ".note.android.ident" is stored as a 1683 // PROGBITS type header but it is actually a note header. 1684 static ConstString g_sect_name_android_ident(".note.android.ident"); 1685 if (!is_note_header && name == g_sect_name_android_ident) 1686 is_note_header = true; 1687 1688 if (is_note_header) { 1689 // Allow notes to refine module info. 1690 DataExtractor data; 1691 if (section_size && (data.SetData(object_data, sheader.sh_offset, 1692 section_size) == section_size)) { 1693 Status error = RefineModuleDetailsFromNote(data, arch_spec, uuid); 1694 if (error.Fail()) { 1695 if (log) 1696 log->Printf("ObjectFileELF::%s ELF note processing failed: %s", 1697 __FUNCTION__, error.AsCString()); 1698 } 1699 } 1700 } 1701 } 1702 1703 // Make any unknown triple components to be unspecified unknowns. 1704 if (arch_spec.GetTriple().getVendor() == llvm::Triple::UnknownVendor) 1705 arch_spec.GetTriple().setVendorName(llvm::StringRef()); 1706 if (arch_spec.GetTriple().getOS() == llvm::Triple::UnknownOS) 1707 arch_spec.GetTriple().setOSName(llvm::StringRef()); 1708 1709 return section_headers.size(); 1710 } 1711 } 1712 1713 section_headers.clear(); 1714 return 0; 1715 } 1716 1717 size_t ObjectFileELF::GetProgramHeaderCount() { return ParseProgramHeaders(); } 1718 1719 const elf::ELFProgramHeader * 1720 ObjectFileELF::GetProgramHeaderByIndex(lldb::user_id_t id) { 1721 if (!id || !ParseProgramHeaders()) 1722 return NULL; 1723 1724 if (--id < m_program_headers.size()) 1725 return &m_program_headers[id]; 1726 1727 return NULL; 1728 } 1729 1730 DataExtractor ObjectFileELF::GetSegmentDataByIndex(lldb::user_id_t id) { 1731 const elf::ELFProgramHeader *segment_header = GetProgramHeaderByIndex(id); 1732 if (segment_header == NULL) 1733 return DataExtractor(); 1734 return DataExtractor(m_data, segment_header->p_offset, 1735 segment_header->p_filesz); 1736 } 1737 1738 llvm::StringRef 1739 ObjectFileELF::StripLinkerSymbolAnnotations(llvm::StringRef symbol_name) const { 1740 size_t pos = symbol_name.find('@'); 1741 return symbol_name.substr(0, pos); 1742 } 1743 1744 //---------------------------------------------------------------------- 1745 // ParseSectionHeaders 1746 //---------------------------------------------------------------------- 1747 size_t ObjectFileELF::ParseSectionHeaders() { 1748 return GetSectionHeaderInfo(m_section_headers, m_data, m_header, m_uuid, 1749 m_gnu_debuglink_file, m_gnu_debuglink_crc, 1750 m_arch_spec); 1751 } 1752 1753 const ObjectFileELF::ELFSectionHeaderInfo * 1754 ObjectFileELF::GetSectionHeaderByIndex(lldb::user_id_t id) { 1755 if (!id || !ParseSectionHeaders()) 1756 return NULL; 1757 1758 if (--id < m_section_headers.size()) 1759 return &m_section_headers[id]; 1760 1761 return NULL; 1762 } 1763 1764 lldb::user_id_t ObjectFileELF::GetSectionIndexByName(const char *name) { 1765 if (!name || !name[0] || !ParseSectionHeaders()) 1766 return 0; 1767 for (size_t i = 1; i < m_section_headers.size(); ++i) 1768 if (m_section_headers[i].section_name == ConstString(name)) 1769 return i; 1770 return 0; 1771 } 1772 1773 void ObjectFileELF::CreateSections(SectionList &unified_section_list) { 1774 if (!m_sections_ap.get() && ParseSectionHeaders()) { 1775 m_sections_ap.reset(new SectionList()); 1776 1777 // Object files frequently have 0 for every section address, meaning we 1778 // need to compute synthetic addresses in order for "file addresses" from 1779 // different sections to not overlap 1780 bool synthaddrs = (CalculateType() == ObjectFile::Type::eTypeObjectFile); 1781 uint64_t nextaddr = 0; 1782 1783 for (SectionHeaderCollIter I = m_section_headers.begin(); 1784 I != m_section_headers.end(); ++I) { 1785 const ELFSectionHeaderInfo &header = *I; 1786 1787 ConstString &name = I->section_name; 1788 const uint64_t file_size = 1789 header.sh_type == SHT_NOBITS ? 0 : header.sh_size; 1790 const uint64_t vm_size = header.sh_flags & SHF_ALLOC ? header.sh_size : 0; 1791 1792 static ConstString g_sect_name_text(".text"); 1793 static ConstString g_sect_name_data(".data"); 1794 static ConstString g_sect_name_bss(".bss"); 1795 static ConstString g_sect_name_tdata(".tdata"); 1796 static ConstString g_sect_name_tbss(".tbss"); 1797 static ConstString g_sect_name_dwarf_debug_abbrev(".debug_abbrev"); 1798 static ConstString g_sect_name_dwarf_debug_addr(".debug_addr"); 1799 static ConstString g_sect_name_dwarf_debug_aranges(".debug_aranges"); 1800 static ConstString g_sect_name_dwarf_debug_cu_index(".debug_cu_index"); 1801 static ConstString g_sect_name_dwarf_debug_frame(".debug_frame"); 1802 static ConstString g_sect_name_dwarf_debug_info(".debug_info"); 1803 static ConstString g_sect_name_dwarf_debug_line(".debug_line"); 1804 static ConstString g_sect_name_dwarf_debug_loc(".debug_loc"); 1805 static ConstString g_sect_name_dwarf_debug_macinfo(".debug_macinfo"); 1806 static ConstString g_sect_name_dwarf_debug_macro(".debug_macro"); 1807 static ConstString g_sect_name_dwarf_debug_pubnames(".debug_pubnames"); 1808 static ConstString g_sect_name_dwarf_debug_pubtypes(".debug_pubtypes"); 1809 static ConstString g_sect_name_dwarf_debug_ranges(".debug_ranges"); 1810 static ConstString g_sect_name_dwarf_debug_str(".debug_str"); 1811 static ConstString g_sect_name_dwarf_debug_str_offsets( 1812 ".debug_str_offsets"); 1813 static ConstString g_sect_name_dwarf_debug_abbrev_dwo( 1814 ".debug_abbrev.dwo"); 1815 static ConstString g_sect_name_dwarf_debug_info_dwo(".debug_info.dwo"); 1816 static ConstString g_sect_name_dwarf_debug_line_dwo(".debug_line.dwo"); 1817 static ConstString g_sect_name_dwarf_debug_macro_dwo(".debug_macro.dwo"); 1818 static ConstString g_sect_name_dwarf_debug_loc_dwo(".debug_loc.dwo"); 1819 static ConstString g_sect_name_dwarf_debug_str_dwo(".debug_str.dwo"); 1820 static ConstString g_sect_name_dwarf_debug_str_offsets_dwo( 1821 ".debug_str_offsets.dwo"); 1822 static ConstString g_sect_name_eh_frame(".eh_frame"); 1823 static ConstString g_sect_name_arm_exidx(".ARM.exidx"); 1824 static ConstString g_sect_name_arm_extab(".ARM.extab"); 1825 static ConstString g_sect_name_go_symtab(".gosymtab"); 1826 1827 SectionType sect_type = eSectionTypeOther; 1828 1829 bool is_thread_specific = false; 1830 1831 if (name == g_sect_name_text) 1832 sect_type = eSectionTypeCode; 1833 else if (name == g_sect_name_data) 1834 sect_type = eSectionTypeData; 1835 else if (name == g_sect_name_bss) 1836 sect_type = eSectionTypeZeroFill; 1837 else if (name == g_sect_name_tdata) { 1838 sect_type = eSectionTypeData; 1839 is_thread_specific = true; 1840 } else if (name == g_sect_name_tbss) { 1841 sect_type = eSectionTypeZeroFill; 1842 is_thread_specific = true; 1843 } 1844 // .debug_abbrev – Abbreviations used in the .debug_info section 1845 // .debug_aranges – Lookup table for mapping addresses to compilation 1846 // units 1847 // .debug_frame – Call frame information 1848 // .debug_info – The core DWARF information section 1849 // .debug_line – Line number information 1850 // .debug_loc – Location lists used in DW_AT_location attributes 1851 // .debug_macinfo – Macro information 1852 // .debug_pubnames – Lookup table for mapping object and function names to 1853 // compilation units 1854 // .debug_pubtypes – Lookup table for mapping type names to compilation 1855 // units 1856 // .debug_ranges – Address ranges used in DW_AT_ranges attributes 1857 // .debug_str – String table used in .debug_info 1858 // MISSING? .gnu_debugdata - "mini debuginfo / MiniDebugInfo" section, 1859 // http://sourceware.org/gdb/onlinedocs/gdb/MiniDebugInfo.html 1860 // MISSING? .debug-index - 1861 // http://src.chromium.org/viewvc/chrome/trunk/src/build/gdb-add-index?pathrev=144644 1862 // MISSING? .debug_types - Type descriptions from DWARF 4? See 1863 // http://gcc.gnu.org/wiki/DwarfSeparateTypeInfo 1864 else if (name == g_sect_name_dwarf_debug_abbrev) 1865 sect_type = eSectionTypeDWARFDebugAbbrev; 1866 else if (name == g_sect_name_dwarf_debug_addr) 1867 sect_type = eSectionTypeDWARFDebugAddr; 1868 else if (name == g_sect_name_dwarf_debug_aranges) 1869 sect_type = eSectionTypeDWARFDebugAranges; 1870 else if (name == g_sect_name_dwarf_debug_cu_index) 1871 sect_type = eSectionTypeDWARFDebugCuIndex; 1872 else if (name == g_sect_name_dwarf_debug_frame) 1873 sect_type = eSectionTypeDWARFDebugFrame; 1874 else if (name == g_sect_name_dwarf_debug_info) 1875 sect_type = eSectionTypeDWARFDebugInfo; 1876 else if (name == g_sect_name_dwarf_debug_line) 1877 sect_type = eSectionTypeDWARFDebugLine; 1878 else if (name == g_sect_name_dwarf_debug_loc) 1879 sect_type = eSectionTypeDWARFDebugLoc; 1880 else if (name == g_sect_name_dwarf_debug_macinfo) 1881 sect_type = eSectionTypeDWARFDebugMacInfo; 1882 else if (name == g_sect_name_dwarf_debug_macro) 1883 sect_type = eSectionTypeDWARFDebugMacro; 1884 else if (name == g_sect_name_dwarf_debug_pubnames) 1885 sect_type = eSectionTypeDWARFDebugPubNames; 1886 else if (name == g_sect_name_dwarf_debug_pubtypes) 1887 sect_type = eSectionTypeDWARFDebugPubTypes; 1888 else if (name == g_sect_name_dwarf_debug_ranges) 1889 sect_type = eSectionTypeDWARFDebugRanges; 1890 else if (name == g_sect_name_dwarf_debug_str) 1891 sect_type = eSectionTypeDWARFDebugStr; 1892 else if (name == g_sect_name_dwarf_debug_str_offsets) 1893 sect_type = eSectionTypeDWARFDebugStrOffsets; 1894 else if (name == g_sect_name_dwarf_debug_abbrev_dwo) 1895 sect_type = eSectionTypeDWARFDebugAbbrev; 1896 else if (name == g_sect_name_dwarf_debug_info_dwo) 1897 sect_type = eSectionTypeDWARFDebugInfo; 1898 else if (name == g_sect_name_dwarf_debug_line_dwo) 1899 sect_type = eSectionTypeDWARFDebugLine; 1900 else if (name == g_sect_name_dwarf_debug_macro_dwo) 1901 sect_type = eSectionTypeDWARFDebugMacro; 1902 else if (name == g_sect_name_dwarf_debug_loc_dwo) 1903 sect_type = eSectionTypeDWARFDebugLoc; 1904 else if (name == g_sect_name_dwarf_debug_str_dwo) 1905 sect_type = eSectionTypeDWARFDebugStr; 1906 else if (name == g_sect_name_dwarf_debug_str_offsets_dwo) 1907 sect_type = eSectionTypeDWARFDebugStrOffsets; 1908 else if (name == g_sect_name_eh_frame) 1909 sect_type = eSectionTypeEHFrame; 1910 else if (name == g_sect_name_arm_exidx) 1911 sect_type = eSectionTypeARMexidx; 1912 else if (name == g_sect_name_arm_extab) 1913 sect_type = eSectionTypeARMextab; 1914 else if (name == g_sect_name_go_symtab) 1915 sect_type = eSectionTypeGoSymtab; 1916 1917 const uint32_t permissions = 1918 ((header.sh_flags & SHF_ALLOC) ? ePermissionsReadable : 0u) | 1919 ((header.sh_flags & SHF_WRITE) ? ePermissionsWritable : 0u) | 1920 ((header.sh_flags & SHF_EXECINSTR) ? ePermissionsExecutable : 0u); 1921 switch (header.sh_type) { 1922 case SHT_SYMTAB: 1923 assert(sect_type == eSectionTypeOther); 1924 sect_type = eSectionTypeELFSymbolTable; 1925 break; 1926 case SHT_DYNSYM: 1927 assert(sect_type == eSectionTypeOther); 1928 sect_type = eSectionTypeELFDynamicSymbols; 1929 break; 1930 case SHT_RELA: 1931 case SHT_REL: 1932 assert(sect_type == eSectionTypeOther); 1933 sect_type = eSectionTypeELFRelocationEntries; 1934 break; 1935 case SHT_DYNAMIC: 1936 assert(sect_type == eSectionTypeOther); 1937 sect_type = eSectionTypeELFDynamicLinkInfo; 1938 break; 1939 } 1940 1941 if (eSectionTypeOther == sect_type) { 1942 // the kalimba toolchain assumes that ELF section names are free-form. 1943 // It does 1944 // support linkscripts which (can) give rise to various arbitrarily 1945 // named 1946 // sections being "Code" or "Data". 1947 sect_type = kalimbaSectionType(m_header, header); 1948 } 1949 1950 const uint32_t target_bytes_size = 1951 (eSectionTypeData == sect_type || eSectionTypeZeroFill == sect_type) 1952 ? m_arch_spec.GetDataByteSize() 1953 : eSectionTypeCode == sect_type ? m_arch_spec.GetCodeByteSize() 1954 : 1; 1955 elf::elf_xword log2align = 1956 (header.sh_addralign == 0) ? 0 : llvm::Log2_64(header.sh_addralign); 1957 1958 uint64_t addr = header.sh_addr; 1959 1960 if ((header.sh_flags & SHF_ALLOC) && synthaddrs) { 1961 nextaddr = 1962 (nextaddr + header.sh_addralign - 1) & ~(header.sh_addralign - 1); 1963 addr = nextaddr; 1964 nextaddr += vm_size; 1965 } 1966 1967 SectionSP section_sp(new Section( 1968 GetModule(), // Module to which this section belongs. 1969 this, // ObjectFile to which this section belongs and should read 1970 // section data from. 1971 SectionIndex(I), // Section ID. 1972 name, // Section name. 1973 sect_type, // Section type. 1974 addr, // VM address. 1975 vm_size, // VM size in bytes of this section. 1976 header.sh_offset, // Offset of this section in the file. 1977 file_size, // Size of the section as found in the file. 1978 log2align, // Alignment of the section 1979 header.sh_flags, // Flags for this section. 1980 target_bytes_size)); // Number of host bytes per target byte 1981 1982 section_sp->SetPermissions(permissions); 1983 if (is_thread_specific) 1984 section_sp->SetIsThreadSpecific(is_thread_specific); 1985 m_sections_ap->AddSection(section_sp); 1986 } 1987 } 1988 1989 // For eTypeDebugInfo files, the Symbol Vendor will take care of updating the 1990 // unified section list. 1991 if (GetType() != eTypeDebugInfo) 1992 unified_section_list = *m_sections_ap; 1993 } 1994 1995 // Find the arm/aarch64 mapping symbol character in the given symbol name. 1996 // Mapping symbols have the 1997 // form of "$<char>[.<any>]*". Additionally we recognize cases when the mapping 1998 // symbol prefixed by 1999 // an arbitrary string because if a symbol prefix added to each symbol in the 2000 // object file with 2001 // objcopy then the mapping symbols are also prefixed. 2002 static char FindArmAarch64MappingSymbol(const char *symbol_name) { 2003 if (!symbol_name) 2004 return '\0'; 2005 2006 const char *dollar_pos = ::strchr(symbol_name, '$'); 2007 if (!dollar_pos || dollar_pos[1] == '\0') 2008 return '\0'; 2009 2010 if (dollar_pos[2] == '\0' || dollar_pos[2] == '.') 2011 return dollar_pos[1]; 2012 return '\0'; 2013 } 2014 2015 #define STO_MIPS_ISA (3 << 6) 2016 #define STO_MICROMIPS (2 << 6) 2017 #define IS_MICROMIPS(ST_OTHER) (((ST_OTHER)&STO_MIPS_ISA) == STO_MICROMIPS) 2018 2019 // private 2020 unsigned ObjectFileELF::ParseSymbols(Symtab *symtab, user_id_t start_id, 2021 SectionList *section_list, 2022 const size_t num_symbols, 2023 const DataExtractor &symtab_data, 2024 const DataExtractor &strtab_data) { 2025 ELFSymbol symbol; 2026 lldb::offset_t offset = 0; 2027 2028 static ConstString text_section_name(".text"); 2029 static ConstString init_section_name(".init"); 2030 static ConstString fini_section_name(".fini"); 2031 static ConstString ctors_section_name(".ctors"); 2032 static ConstString dtors_section_name(".dtors"); 2033 2034 static ConstString data_section_name(".data"); 2035 static ConstString rodata_section_name(".rodata"); 2036 static ConstString rodata1_section_name(".rodata1"); 2037 static ConstString data2_section_name(".data1"); 2038 static ConstString bss_section_name(".bss"); 2039 static ConstString opd_section_name(".opd"); // For ppc64 2040 2041 // On Android the oatdata and the oatexec symbols in the oat and odex files 2042 // covers the full 2043 // .text section what causes issues with displaying unusable symbol name to 2044 // the user and very 2045 // slow unwinding speed because the instruction emulation based unwind plans 2046 // try to emulate all 2047 // instructions in these symbols. Don't add these symbols to the symbol list 2048 // as they have no 2049 // use for the debugger and they are causing a lot of trouble. 2050 // Filtering can't be restricted to Android because this special object file 2051 // don't contain the 2052 // note section specifying the environment to Android but the custom extension 2053 // and file name 2054 // makes it highly unlikely that this will collide with anything else. 2055 ConstString file_extension = m_file.GetFileNameExtension(); 2056 bool skip_oatdata_oatexec = file_extension == ConstString("oat") || 2057 file_extension == ConstString("odex"); 2058 2059 ArchSpec arch; 2060 GetArchitecture(arch); 2061 ModuleSP module_sp(GetModule()); 2062 SectionList *module_section_list = 2063 module_sp ? module_sp->GetSectionList() : nullptr; 2064 2065 // Local cache to avoid doing a FindSectionByName for each symbol. The "const 2066 // char*" key must 2067 // came from a ConstString object so they can be compared by pointer 2068 std::unordered_map<const char *, lldb::SectionSP> section_name_to_section; 2069 2070 unsigned i; 2071 for (i = 0; i < num_symbols; ++i) { 2072 if (symbol.Parse(symtab_data, &offset) == false) 2073 break; 2074 2075 const char *symbol_name = strtab_data.PeekCStr(symbol.st_name); 2076 if (!symbol_name) 2077 symbol_name = ""; 2078 2079 // No need to add non-section symbols that have no names 2080 if (symbol.getType() != STT_SECTION && 2081 (symbol_name == nullptr || symbol_name[0] == '\0')) 2082 continue; 2083 2084 // Skipping oatdata and oatexec sections if it is requested. See details 2085 // above the 2086 // definition of skip_oatdata_oatexec for the reasons. 2087 if (skip_oatdata_oatexec && (::strcmp(symbol_name, "oatdata") == 0 || 2088 ::strcmp(symbol_name, "oatexec") == 0)) 2089 continue; 2090 2091 SectionSP symbol_section_sp; 2092 SymbolType symbol_type = eSymbolTypeInvalid; 2093 Elf64_Half section_idx = symbol.st_shndx; 2094 2095 switch (section_idx) { 2096 case SHN_ABS: 2097 symbol_type = eSymbolTypeAbsolute; 2098 break; 2099 case SHN_UNDEF: 2100 symbol_type = eSymbolTypeUndefined; 2101 break; 2102 default: 2103 symbol_section_sp = section_list->GetSectionAtIndex(section_idx); 2104 break; 2105 } 2106 2107 // If a symbol is undefined do not process it further even if it has a STT 2108 // type 2109 if (symbol_type != eSymbolTypeUndefined) { 2110 switch (symbol.getType()) { 2111 default: 2112 case STT_NOTYPE: 2113 // The symbol's type is not specified. 2114 break; 2115 2116 case STT_OBJECT: 2117 // The symbol is associated with a data object, such as a variable, 2118 // an array, etc. 2119 symbol_type = eSymbolTypeData; 2120 break; 2121 2122 case STT_FUNC: 2123 // The symbol is associated with a function or other executable code. 2124 symbol_type = eSymbolTypeCode; 2125 break; 2126 2127 case STT_SECTION: 2128 // The symbol is associated with a section. Symbol table entries of 2129 // this type exist primarily for relocation and normally have 2130 // STB_LOCAL binding. 2131 break; 2132 2133 case STT_FILE: 2134 // Conventionally, the symbol's name gives the name of the source 2135 // file associated with the object file. A file symbol has STB_LOCAL 2136 // binding, its section index is SHN_ABS, and it precedes the other 2137 // STB_LOCAL symbols for the file, if it is present. 2138 symbol_type = eSymbolTypeSourceFile; 2139 break; 2140 2141 case STT_GNU_IFUNC: 2142 // The symbol is associated with an indirect function. The actual 2143 // function will be resolved if it is referenced. 2144 symbol_type = eSymbolTypeResolver; 2145 break; 2146 } 2147 } 2148 2149 if (symbol_type == eSymbolTypeInvalid && symbol.getType() != STT_SECTION) { 2150 if (symbol_section_sp) { 2151 const ConstString §_name = symbol_section_sp->GetName(); 2152 if (sect_name == text_section_name || sect_name == init_section_name || 2153 sect_name == fini_section_name || sect_name == ctors_section_name || 2154 sect_name == dtors_section_name) { 2155 symbol_type = eSymbolTypeCode; 2156 } else if (sect_name == data_section_name || 2157 sect_name == data2_section_name || 2158 sect_name == rodata_section_name || 2159 sect_name == rodata1_section_name || 2160 sect_name == bss_section_name) { 2161 symbol_type = eSymbolTypeData; 2162 } 2163 } 2164 } 2165 2166 int64_t symbol_value_offset = 0; 2167 uint32_t additional_flags = 0; 2168 2169 if (arch.IsValid()) { 2170 if (arch.GetMachine() == llvm::Triple::arm) { 2171 if (symbol.getBinding() == STB_LOCAL) { 2172 char mapping_symbol = FindArmAarch64MappingSymbol(symbol_name); 2173 if (symbol_type == eSymbolTypeCode) { 2174 switch (mapping_symbol) { 2175 case 'a': 2176 // $a[.<any>]* - marks an ARM instruction sequence 2177 m_address_class_map[symbol.st_value] = eAddressClassCode; 2178 break; 2179 case 'b': 2180 case 't': 2181 // $b[.<any>]* - marks a THUMB BL instruction sequence 2182 // $t[.<any>]* - marks a THUMB instruction sequence 2183 m_address_class_map[symbol.st_value] = 2184 eAddressClassCodeAlternateISA; 2185 break; 2186 case 'd': 2187 // $d[.<any>]* - marks a data item sequence (e.g. lit pool) 2188 m_address_class_map[symbol.st_value] = eAddressClassData; 2189 break; 2190 } 2191 } 2192 if (mapping_symbol) 2193 continue; 2194 } 2195 } else if (arch.GetMachine() == llvm::Triple::aarch64) { 2196 if (symbol.getBinding() == STB_LOCAL) { 2197 char mapping_symbol = FindArmAarch64MappingSymbol(symbol_name); 2198 if (symbol_type == eSymbolTypeCode) { 2199 switch (mapping_symbol) { 2200 case 'x': 2201 // $x[.<any>]* - marks an A64 instruction sequence 2202 m_address_class_map[symbol.st_value] = eAddressClassCode; 2203 break; 2204 case 'd': 2205 // $d[.<any>]* - marks a data item sequence (e.g. lit pool) 2206 m_address_class_map[symbol.st_value] = eAddressClassData; 2207 break; 2208 } 2209 } 2210 if (mapping_symbol) 2211 continue; 2212 } 2213 } 2214 2215 if (arch.GetMachine() == llvm::Triple::arm) { 2216 if (symbol_type == eSymbolTypeCode) { 2217 if (symbol.st_value & 1) { 2218 // Subtracting 1 from the address effectively unsets 2219 // the low order bit, which results in the address 2220 // actually pointing to the beginning of the symbol. 2221 // This delta will be used below in conjunction with 2222 // symbol.st_value to produce the final symbol_value 2223 // that we store in the symtab. 2224 symbol_value_offset = -1; 2225 m_address_class_map[symbol.st_value ^ 1] = 2226 eAddressClassCodeAlternateISA; 2227 } else { 2228 // This address is ARM 2229 m_address_class_map[symbol.st_value] = eAddressClassCode; 2230 } 2231 } 2232 } 2233 2234 /* 2235 * MIPS: 2236 * The bit #0 of an address is used for ISA mode (1 for microMIPS, 0 for 2237 * MIPS). 2238 * This allows processor to switch between microMIPS and MIPS without any 2239 * need 2240 * for special mode-control register. However, apart from .debug_line, 2241 * none of 2242 * the ELF/DWARF sections set the ISA bit (for symbol or section). Use 2243 * st_other 2244 * flag to check whether the symbol is microMIPS and then set the address 2245 * class 2246 * accordingly. 2247 */ 2248 const llvm::Triple::ArchType llvm_arch = arch.GetMachine(); 2249 if (llvm_arch == llvm::Triple::mips || 2250 llvm_arch == llvm::Triple::mipsel || 2251 llvm_arch == llvm::Triple::mips64 || 2252 llvm_arch == llvm::Triple::mips64el) { 2253 if (IS_MICROMIPS(symbol.st_other)) 2254 m_address_class_map[symbol.st_value] = eAddressClassCodeAlternateISA; 2255 else if ((symbol.st_value & 1) && (symbol_type == eSymbolTypeCode)) { 2256 symbol.st_value = symbol.st_value & (~1ull); 2257 m_address_class_map[symbol.st_value] = eAddressClassCodeAlternateISA; 2258 } else { 2259 if (symbol_type == eSymbolTypeCode) 2260 m_address_class_map[symbol.st_value] = eAddressClassCode; 2261 else if (symbol_type == eSymbolTypeData) 2262 m_address_class_map[symbol.st_value] = eAddressClassData; 2263 else 2264 m_address_class_map[symbol.st_value] = eAddressClassUnknown; 2265 } 2266 } 2267 } 2268 2269 // symbol_value_offset may contain 0 for ARM symbols or -1 for THUMB 2270 // symbols. See above for 2271 // more details. 2272 uint64_t symbol_value = symbol.st_value + symbol_value_offset; 2273 2274 if (symbol_section_sp == nullptr && section_idx == SHN_ABS && 2275 symbol.st_size != 0) { 2276 // We don't have a section for a symbol with non-zero size. Create a new 2277 // section for it 2278 // so the address range covered by the symbol is also covered by the 2279 // module (represented 2280 // through the section list). It is needed so module lookup for the 2281 // addresses covered 2282 // by this symbol will be successfull. This case happens for absolute 2283 // symbols. 2284 ConstString fake_section_name(std::string(".absolute.") + symbol_name); 2285 symbol_section_sp = 2286 std::make_shared<Section>(module_sp, this, SHN_ABS, fake_section_name, 2287 eSectionTypeAbsoluteAddress, symbol_value, 2288 symbol.st_size, 0, 0, 0, SHF_ALLOC); 2289 2290 module_section_list->AddSection(symbol_section_sp); 2291 section_list->AddSection(symbol_section_sp); 2292 } 2293 2294 if (symbol_section_sp && 2295 CalculateType() != ObjectFile::Type::eTypeObjectFile) 2296 symbol_value -= symbol_section_sp->GetFileAddress(); 2297 2298 if (symbol_section_sp && module_section_list && 2299 module_section_list != section_list) { 2300 const ConstString §_name = symbol_section_sp->GetName(); 2301 auto section_it = section_name_to_section.find(sect_name.GetCString()); 2302 if (section_it == section_name_to_section.end()) 2303 section_it = 2304 section_name_to_section 2305 .emplace(sect_name.GetCString(), 2306 module_section_list->FindSectionByName(sect_name)) 2307 .first; 2308 if (section_it->second) 2309 symbol_section_sp = section_it->second; 2310 } 2311 2312 bool is_global = symbol.getBinding() == STB_GLOBAL; 2313 uint32_t flags = symbol.st_other << 8 | symbol.st_info | additional_flags; 2314 bool is_mangled = (symbol_name[0] == '_' && symbol_name[1] == 'Z'); 2315 2316 llvm::StringRef symbol_ref(symbol_name); 2317 2318 // Symbol names may contain @VERSION suffixes. Find those and strip them 2319 // temporarily. 2320 size_t version_pos = symbol_ref.find('@'); 2321 bool has_suffix = version_pos != llvm::StringRef::npos; 2322 llvm::StringRef symbol_bare = symbol_ref.substr(0, version_pos); 2323 Mangled mangled(ConstString(symbol_bare), is_mangled); 2324 2325 // Now append the suffix back to mangled and unmangled names. Only do it if 2326 // the 2327 // demangling was successful (string is not empty). 2328 if (has_suffix) { 2329 llvm::StringRef suffix = symbol_ref.substr(version_pos); 2330 2331 llvm::StringRef mangled_name = mangled.GetMangledName().GetStringRef(); 2332 if (!mangled_name.empty()) 2333 mangled.SetMangledName(ConstString((mangled_name + suffix).str())); 2334 2335 ConstString demangled = 2336 mangled.GetDemangledName(lldb::eLanguageTypeUnknown); 2337 llvm::StringRef demangled_name = demangled.GetStringRef(); 2338 if (!demangled_name.empty()) 2339 mangled.SetDemangledName(ConstString((demangled_name + suffix).str())); 2340 } 2341 2342 // In ELF all symbol should have a valid size but it is not true for some 2343 // function symbols 2344 // coming from hand written assembly. As none of the function symbol should 2345 // have 0 size we 2346 // try to calculate the size for these symbols in the symtab with saying 2347 // that their original 2348 // size is not valid. 2349 bool symbol_size_valid = 2350 symbol.st_size != 0 || symbol.getType() != STT_FUNC; 2351 2352 Symbol dc_symbol( 2353 i + start_id, // ID is the original symbol table index. 2354 mangled, 2355 symbol_type, // Type of this symbol 2356 is_global, // Is this globally visible? 2357 false, // Is this symbol debug info? 2358 false, // Is this symbol a trampoline? 2359 false, // Is this symbol artificial? 2360 AddressRange(symbol_section_sp, // Section in which this symbol is 2361 // defined or null. 2362 symbol_value, // Offset in section or symbol value. 2363 symbol.st_size), // Size in bytes of this symbol. 2364 symbol_size_valid, // Symbol size is valid 2365 has_suffix, // Contains linker annotations? 2366 flags); // Symbol flags. 2367 symtab->AddSymbol(dc_symbol); 2368 } 2369 return i; 2370 } 2371 2372 unsigned ObjectFileELF::ParseSymbolTable(Symtab *symbol_table, 2373 user_id_t start_id, 2374 lldb_private::Section *symtab) { 2375 if (symtab->GetObjectFile() != this) { 2376 // If the symbol table section is owned by a different object file, have it 2377 // do the 2378 // parsing. 2379 ObjectFileELF *obj_file_elf = 2380 static_cast<ObjectFileELF *>(symtab->GetObjectFile()); 2381 return obj_file_elf->ParseSymbolTable(symbol_table, start_id, symtab); 2382 } 2383 2384 // Get section list for this object file. 2385 SectionList *section_list = m_sections_ap.get(); 2386 if (!section_list) 2387 return 0; 2388 2389 user_id_t symtab_id = symtab->GetID(); 2390 const ELFSectionHeaderInfo *symtab_hdr = GetSectionHeaderByIndex(symtab_id); 2391 assert(symtab_hdr->sh_type == SHT_SYMTAB || 2392 symtab_hdr->sh_type == SHT_DYNSYM); 2393 2394 // sh_link: section header index of associated string table. 2395 // Section ID's are ones based. 2396 user_id_t strtab_id = symtab_hdr->sh_link + 1; 2397 Section *strtab = section_list->FindSectionByID(strtab_id).get(); 2398 2399 if (symtab && strtab) { 2400 assert(symtab->GetObjectFile() == this); 2401 assert(strtab->GetObjectFile() == this); 2402 2403 DataExtractor symtab_data; 2404 DataExtractor strtab_data; 2405 if (ReadSectionData(symtab, symtab_data) && 2406 ReadSectionData(strtab, strtab_data)) { 2407 size_t num_symbols = symtab_data.GetByteSize() / symtab_hdr->sh_entsize; 2408 2409 return ParseSymbols(symbol_table, start_id, section_list, num_symbols, 2410 symtab_data, strtab_data); 2411 } 2412 } 2413 2414 return 0; 2415 } 2416 2417 size_t ObjectFileELF::ParseDynamicSymbols() { 2418 if (m_dynamic_symbols.size()) 2419 return m_dynamic_symbols.size(); 2420 2421 SectionList *section_list = GetSectionList(); 2422 if (!section_list) 2423 return 0; 2424 2425 // Find the SHT_DYNAMIC section. 2426 Section *dynsym = 2427 section_list->FindSectionByType(eSectionTypeELFDynamicLinkInfo, true) 2428 .get(); 2429 if (!dynsym) 2430 return 0; 2431 assert(dynsym->GetObjectFile() == this); 2432 2433 ELFDynamic symbol; 2434 DataExtractor dynsym_data; 2435 if (ReadSectionData(dynsym, dynsym_data)) { 2436 const lldb::offset_t section_size = dynsym_data.GetByteSize(); 2437 lldb::offset_t cursor = 0; 2438 2439 while (cursor < section_size) { 2440 if (!symbol.Parse(dynsym_data, &cursor)) 2441 break; 2442 2443 m_dynamic_symbols.push_back(symbol); 2444 } 2445 } 2446 2447 return m_dynamic_symbols.size(); 2448 } 2449 2450 const ELFDynamic *ObjectFileELF::FindDynamicSymbol(unsigned tag) { 2451 if (!ParseDynamicSymbols()) 2452 return NULL; 2453 2454 DynamicSymbolCollIter I = m_dynamic_symbols.begin(); 2455 DynamicSymbolCollIter E = m_dynamic_symbols.end(); 2456 for (; I != E; ++I) { 2457 ELFDynamic *symbol = &*I; 2458 2459 if (symbol->d_tag == tag) 2460 return symbol; 2461 } 2462 2463 return NULL; 2464 } 2465 2466 unsigned ObjectFileELF::PLTRelocationType() { 2467 // DT_PLTREL 2468 // This member specifies the type of relocation entry to which the 2469 // procedure linkage table refers. The d_val member holds DT_REL or 2470 // DT_RELA, as appropriate. All relocations in a procedure linkage table 2471 // must use the same relocation. 2472 const ELFDynamic *symbol = FindDynamicSymbol(DT_PLTREL); 2473 2474 if (symbol) 2475 return symbol->d_val; 2476 2477 return 0; 2478 } 2479 2480 // Returns the size of the normal plt entries and the offset of the first normal 2481 // plt entry. The 2482 // 0th entry in the plt table is usually a resolution entry which have different 2483 // size in some 2484 // architectures then the rest of the plt entries. 2485 static std::pair<uint64_t, uint64_t> 2486 GetPltEntrySizeAndOffset(const ELFSectionHeader *rel_hdr, 2487 const ELFSectionHeader *plt_hdr) { 2488 const elf_xword num_relocations = rel_hdr->sh_size / rel_hdr->sh_entsize; 2489 2490 // Clang 3.3 sets entsize to 4 for 32-bit binaries, but the plt entries are 16 2491 // bytes. 2492 // So round the entsize up by the alignment if addralign is set. 2493 elf_xword plt_entsize = 2494 plt_hdr->sh_addralign 2495 ? llvm::alignTo(plt_hdr->sh_entsize, plt_hdr->sh_addralign) 2496 : plt_hdr->sh_entsize; 2497 2498 // Some linkers e.g ld for arm, fill plt_hdr->sh_entsize field incorrectly. 2499 // PLT entries relocation code in general requires multiple instruction and 2500 // should be greater than 4 bytes in most cases. Try to guess correct size 2501 // just in case. 2502 if (plt_entsize <= 4) { 2503 // The linker haven't set the plt_hdr->sh_entsize field. Try to guess the 2504 // size of the plt 2505 // entries based on the number of entries and the size of the plt section 2506 // with the 2507 // assumption that the size of the 0th entry is at least as big as the size 2508 // of the normal 2509 // entries and it isn't much bigger then that. 2510 if (plt_hdr->sh_addralign) 2511 plt_entsize = plt_hdr->sh_size / plt_hdr->sh_addralign / 2512 (num_relocations + 1) * plt_hdr->sh_addralign; 2513 else 2514 plt_entsize = plt_hdr->sh_size / (num_relocations + 1); 2515 } 2516 2517 elf_xword plt_offset = plt_hdr->sh_size - num_relocations * plt_entsize; 2518 2519 return std::make_pair(plt_entsize, plt_offset); 2520 } 2521 2522 static unsigned ParsePLTRelocations( 2523 Symtab *symbol_table, user_id_t start_id, unsigned rel_type, 2524 const ELFHeader *hdr, const ELFSectionHeader *rel_hdr, 2525 const ELFSectionHeader *plt_hdr, const ELFSectionHeader *sym_hdr, 2526 const lldb::SectionSP &plt_section_sp, DataExtractor &rel_data, 2527 DataExtractor &symtab_data, DataExtractor &strtab_data) { 2528 ELFRelocation rel(rel_type); 2529 ELFSymbol symbol; 2530 lldb::offset_t offset = 0; 2531 2532 uint64_t plt_offset, plt_entsize; 2533 std::tie(plt_entsize, plt_offset) = 2534 GetPltEntrySizeAndOffset(rel_hdr, plt_hdr); 2535 const elf_xword num_relocations = rel_hdr->sh_size / rel_hdr->sh_entsize; 2536 2537 typedef unsigned (*reloc_info_fn)(const ELFRelocation &rel); 2538 reloc_info_fn reloc_type; 2539 reloc_info_fn reloc_symbol; 2540 2541 if (hdr->Is32Bit()) { 2542 reloc_type = ELFRelocation::RelocType32; 2543 reloc_symbol = ELFRelocation::RelocSymbol32; 2544 } else { 2545 reloc_type = ELFRelocation::RelocType64; 2546 reloc_symbol = ELFRelocation::RelocSymbol64; 2547 } 2548 2549 unsigned slot_type = hdr->GetRelocationJumpSlotType(); 2550 unsigned i; 2551 for (i = 0; i < num_relocations; ++i) { 2552 if (rel.Parse(rel_data, &offset) == false) 2553 break; 2554 2555 if (reloc_type(rel) != slot_type) 2556 continue; 2557 2558 lldb::offset_t symbol_offset = reloc_symbol(rel) * sym_hdr->sh_entsize; 2559 if (!symbol.Parse(symtab_data, &symbol_offset)) 2560 break; 2561 2562 const char *symbol_name = strtab_data.PeekCStr(symbol.st_name); 2563 bool is_mangled = 2564 symbol_name ? (symbol_name[0] == '_' && symbol_name[1] == 'Z') : false; 2565 uint64_t plt_index = plt_offset + i * plt_entsize; 2566 2567 Symbol jump_symbol( 2568 i + start_id, // Symbol table index 2569 symbol_name, // symbol name. 2570 is_mangled, // is the symbol name mangled? 2571 eSymbolTypeTrampoline, // Type of this symbol 2572 false, // Is this globally visible? 2573 false, // Is this symbol debug info? 2574 true, // Is this symbol a trampoline? 2575 true, // Is this symbol artificial? 2576 plt_section_sp, // Section in which this symbol is defined or null. 2577 plt_index, // Offset in section or symbol value. 2578 plt_entsize, // Size in bytes of this symbol. 2579 true, // Size is valid 2580 false, // Contains linker annotations? 2581 0); // Symbol flags. 2582 2583 symbol_table->AddSymbol(jump_symbol); 2584 } 2585 2586 return i; 2587 } 2588 2589 unsigned 2590 ObjectFileELF::ParseTrampolineSymbols(Symtab *symbol_table, user_id_t start_id, 2591 const ELFSectionHeaderInfo *rel_hdr, 2592 user_id_t rel_id) { 2593 assert(rel_hdr->sh_type == SHT_RELA || rel_hdr->sh_type == SHT_REL); 2594 2595 // The link field points to the associated symbol table. 2596 user_id_t symtab_id = rel_hdr->sh_link; 2597 2598 // If the link field doesn't point to the appropriate symbol name table then 2599 // try to find it by name as some compiler don't fill in the link fields. 2600 if (!symtab_id) 2601 symtab_id = GetSectionIndexByName(".dynsym"); 2602 2603 // Get PLT section. We cannot use rel_hdr->sh_info, since current linkers 2604 // point that to the .got.plt or .got section instead of .plt. 2605 user_id_t plt_id = GetSectionIndexByName(".plt"); 2606 2607 if (!symtab_id || !plt_id) 2608 return 0; 2609 2610 // Section ID's are ones based; 2611 symtab_id++; 2612 plt_id++; 2613 2614 const ELFSectionHeaderInfo *plt_hdr = GetSectionHeaderByIndex(plt_id); 2615 if (!plt_hdr) 2616 return 0; 2617 2618 const ELFSectionHeaderInfo *sym_hdr = GetSectionHeaderByIndex(symtab_id); 2619 if (!sym_hdr) 2620 return 0; 2621 2622 SectionList *section_list = m_sections_ap.get(); 2623 if (!section_list) 2624 return 0; 2625 2626 Section *rel_section = section_list->FindSectionByID(rel_id).get(); 2627 if (!rel_section) 2628 return 0; 2629 2630 SectionSP plt_section_sp(section_list->FindSectionByID(plt_id)); 2631 if (!plt_section_sp) 2632 return 0; 2633 2634 Section *symtab = section_list->FindSectionByID(symtab_id).get(); 2635 if (!symtab) 2636 return 0; 2637 2638 // sh_link points to associated string table. 2639 Section *strtab = section_list->FindSectionByID(sym_hdr->sh_link + 1).get(); 2640 if (!strtab) 2641 return 0; 2642 2643 DataExtractor rel_data; 2644 if (!ReadSectionData(rel_section, rel_data)) 2645 return 0; 2646 2647 DataExtractor symtab_data; 2648 if (!ReadSectionData(symtab, symtab_data)) 2649 return 0; 2650 2651 DataExtractor strtab_data; 2652 if (!ReadSectionData(strtab, strtab_data)) 2653 return 0; 2654 2655 unsigned rel_type = PLTRelocationType(); 2656 if (!rel_type) 2657 return 0; 2658 2659 return ParsePLTRelocations(symbol_table, start_id, rel_type, &m_header, 2660 rel_hdr, plt_hdr, sym_hdr, plt_section_sp, 2661 rel_data, symtab_data, strtab_data); 2662 } 2663 2664 unsigned ObjectFileELF::ApplyRelocations( 2665 Symtab *symtab, const ELFHeader *hdr, const ELFSectionHeader *rel_hdr, 2666 const ELFSectionHeader *symtab_hdr, const ELFSectionHeader *debug_hdr, 2667 DataExtractor &rel_data, DataExtractor &symtab_data, 2668 DataExtractor &debug_data, Section *rel_section) { 2669 ELFRelocation rel(rel_hdr->sh_type); 2670 lldb::addr_t offset = 0; 2671 const unsigned num_relocations = rel_hdr->sh_size / rel_hdr->sh_entsize; 2672 typedef unsigned (*reloc_info_fn)(const ELFRelocation &rel); 2673 reloc_info_fn reloc_type; 2674 reloc_info_fn reloc_symbol; 2675 2676 if (hdr->Is32Bit()) { 2677 reloc_type = ELFRelocation::RelocType32; 2678 reloc_symbol = ELFRelocation::RelocSymbol32; 2679 } else { 2680 reloc_type = ELFRelocation::RelocType64; 2681 reloc_symbol = ELFRelocation::RelocSymbol64; 2682 } 2683 2684 for (unsigned i = 0; i < num_relocations; ++i) { 2685 if (rel.Parse(rel_data, &offset) == false) 2686 break; 2687 2688 Symbol *symbol = NULL; 2689 2690 if (hdr->Is32Bit()) { 2691 switch (reloc_type(rel)) { 2692 case R_386_32: 2693 case R_386_PC32: 2694 default: 2695 // FIXME: This asserts with this input: 2696 // 2697 // foo.cpp 2698 // int main(int argc, char **argv) { return 0; } 2699 // 2700 // clang++.exe --target=i686-unknown-linux-gnu -g -c foo.cpp -o foo.o 2701 // 2702 // and running this on the foo.o module. 2703 assert(false && "unexpected relocation type"); 2704 } 2705 } else { 2706 switch (reloc_type(rel)) { 2707 case R_X86_64_64: { 2708 symbol = symtab->FindSymbolByID(reloc_symbol(rel)); 2709 if (symbol) { 2710 addr_t value = symbol->GetAddressRef().GetFileAddress(); 2711 DataBufferSP &data_buffer_sp = debug_data.GetSharedDataBuffer(); 2712 uint64_t *dst = reinterpret_cast<uint64_t *>( 2713 data_buffer_sp->GetBytes() + rel_section->GetFileOffset() + 2714 ELFRelocation::RelocOffset64(rel)); 2715 *dst = value + ELFRelocation::RelocAddend64(rel); 2716 } 2717 break; 2718 } 2719 case R_X86_64_32: 2720 case R_X86_64_32S: { 2721 symbol = symtab->FindSymbolByID(reloc_symbol(rel)); 2722 if (symbol) { 2723 addr_t value = symbol->GetAddressRef().GetFileAddress(); 2724 value += ELFRelocation::RelocAddend32(rel); 2725 assert( 2726 (reloc_type(rel) == R_X86_64_32 && (value <= UINT32_MAX)) || 2727 (reloc_type(rel) == R_X86_64_32S && 2728 ((int64_t)value <= INT32_MAX && (int64_t)value >= INT32_MIN))); 2729 uint32_t truncated_addr = (value & 0xFFFFFFFF); 2730 DataBufferSP &data_buffer_sp = debug_data.GetSharedDataBuffer(); 2731 uint32_t *dst = reinterpret_cast<uint32_t *>( 2732 data_buffer_sp->GetBytes() + rel_section->GetFileOffset() + 2733 ELFRelocation::RelocOffset32(rel)); 2734 *dst = truncated_addr; 2735 } 2736 break; 2737 } 2738 case R_X86_64_PC32: 2739 default: 2740 assert(false && "unexpected relocation type"); 2741 } 2742 } 2743 } 2744 2745 return 0; 2746 } 2747 2748 unsigned ObjectFileELF::RelocateDebugSections(const ELFSectionHeader *rel_hdr, 2749 user_id_t rel_id, 2750 lldb_private::Symtab *thetab) { 2751 assert(rel_hdr->sh_type == SHT_RELA || rel_hdr->sh_type == SHT_REL); 2752 2753 // Parse in the section list if needed. 2754 SectionList *section_list = GetSectionList(); 2755 if (!section_list) 2756 return 0; 2757 2758 // Section ID's are ones based. 2759 user_id_t symtab_id = rel_hdr->sh_link + 1; 2760 user_id_t debug_id = rel_hdr->sh_info + 1; 2761 2762 const ELFSectionHeader *symtab_hdr = GetSectionHeaderByIndex(symtab_id); 2763 if (!symtab_hdr) 2764 return 0; 2765 2766 const ELFSectionHeader *debug_hdr = GetSectionHeaderByIndex(debug_id); 2767 if (!debug_hdr) 2768 return 0; 2769 2770 Section *rel = section_list->FindSectionByID(rel_id).get(); 2771 if (!rel) 2772 return 0; 2773 2774 Section *symtab = section_list->FindSectionByID(symtab_id).get(); 2775 if (!symtab) 2776 return 0; 2777 2778 Section *debug = section_list->FindSectionByID(debug_id).get(); 2779 if (!debug) 2780 return 0; 2781 2782 DataExtractor rel_data; 2783 DataExtractor symtab_data; 2784 DataExtractor debug_data; 2785 2786 if (GetData(rel->GetFileOffset(), rel->GetFileSize(), rel_data) && 2787 GetData(symtab->GetFileOffset(), symtab->GetFileSize(), symtab_data) && 2788 GetData(debug->GetFileOffset(), debug->GetFileSize(), debug_data)) { 2789 ApplyRelocations(thetab, &m_header, rel_hdr, symtab_hdr, debug_hdr, 2790 rel_data, symtab_data, debug_data, debug); 2791 } 2792 2793 return 0; 2794 } 2795 2796 Symtab *ObjectFileELF::GetSymtab() { 2797 ModuleSP module_sp(GetModule()); 2798 if (!module_sp) 2799 return NULL; 2800 2801 // We always want to use the main object file so we (hopefully) only have one 2802 // cached copy 2803 // of our symtab, dynamic sections, etc. 2804 ObjectFile *module_obj_file = module_sp->GetObjectFile(); 2805 if (module_obj_file && module_obj_file != this) 2806 return module_obj_file->GetSymtab(); 2807 2808 if (m_symtab_ap.get() == NULL) { 2809 SectionList *section_list = module_sp->GetSectionList(); 2810 if (!section_list) 2811 return NULL; 2812 2813 uint64_t symbol_id = 0; 2814 std::lock_guard<std::recursive_mutex> guard(module_sp->GetMutex()); 2815 2816 // Sharable objects and dynamic executables usually have 2 distinct symbol 2817 // tables, one named ".symtab", and the other ".dynsym". The dynsym is a 2818 // smaller 2819 // version of the symtab that only contains global symbols. The information 2820 // found 2821 // in the dynsym is therefore also found in the symtab, while the reverse is 2822 // not 2823 // necessarily true. 2824 Section *symtab = 2825 section_list->FindSectionByType(eSectionTypeELFSymbolTable, true).get(); 2826 if (!symtab) { 2827 // The symtab section is non-allocable and can be stripped, so if it 2828 // doesn't exist 2829 // then use the dynsym section which should always be there. 2830 symtab = 2831 section_list->FindSectionByType(eSectionTypeELFDynamicSymbols, true) 2832 .get(); 2833 } 2834 if (symtab) { 2835 m_symtab_ap.reset(new Symtab(symtab->GetObjectFile())); 2836 symbol_id += ParseSymbolTable(m_symtab_ap.get(), symbol_id, symtab); 2837 } 2838 2839 // DT_JMPREL 2840 // If present, this entry's d_ptr member holds the address of 2841 // relocation 2842 // entries associated solely with the procedure linkage table. 2843 // Separating 2844 // these relocation entries lets the dynamic linker ignore them during 2845 // process initialization, if lazy binding is enabled. If this entry is 2846 // present, the related entries of types DT_PLTRELSZ and DT_PLTREL must 2847 // also be present. 2848 const ELFDynamic *symbol = FindDynamicSymbol(DT_JMPREL); 2849 if (symbol) { 2850 // Synthesize trampoline symbols to help navigate the PLT. 2851 addr_t addr = symbol->d_ptr; 2852 Section *reloc_section = 2853 section_list->FindSectionContainingFileAddress(addr).get(); 2854 if (reloc_section) { 2855 user_id_t reloc_id = reloc_section->GetID(); 2856 const ELFSectionHeaderInfo *reloc_header = 2857 GetSectionHeaderByIndex(reloc_id); 2858 assert(reloc_header); 2859 2860 if (m_symtab_ap == nullptr) 2861 m_symtab_ap.reset(new Symtab(reloc_section->GetObjectFile())); 2862 2863 ParseTrampolineSymbols(m_symtab_ap.get(), symbol_id, reloc_header, 2864 reloc_id); 2865 } 2866 } 2867 2868 DWARFCallFrameInfo *eh_frame = GetUnwindTable().GetEHFrameInfo(); 2869 if (eh_frame) { 2870 if (m_symtab_ap == nullptr) 2871 m_symtab_ap.reset(new Symtab(this)); 2872 ParseUnwindSymbols(m_symtab_ap.get(), eh_frame); 2873 } 2874 2875 // If we still don't have any symtab then create an empty instance to avoid 2876 // do the section 2877 // lookup next time. 2878 if (m_symtab_ap == nullptr) 2879 m_symtab_ap.reset(new Symtab(this)); 2880 2881 m_symtab_ap->CalculateSymbolSizes(); 2882 } 2883 2884 return m_symtab_ap.get(); 2885 } 2886 2887 void ObjectFileELF::RelocateSection(lldb_private::Section *section) 2888 { 2889 static const char *debug_prefix = ".debug"; 2890 2891 // Set relocated bit so we stop getting called, regardless of 2892 // whether we actually relocate. 2893 section->SetIsRelocated(true); 2894 2895 // We only relocate in ELF relocatable files 2896 if (CalculateType() != eTypeObjectFile) 2897 return; 2898 2899 const char *section_name = section->GetName().GetCString(); 2900 // Can't relocate that which can't be named 2901 if (section_name == nullptr) 2902 return; 2903 2904 // We don't relocate non-debug sections at the moment 2905 if (strncmp(section_name, debug_prefix, strlen(debug_prefix))) 2906 return; 2907 2908 // Relocation section names to look for 2909 std::string needle = std::string(".rel") + section_name; 2910 std::string needlea = std::string(".rela") + section_name; 2911 2912 for (SectionHeaderCollIter I = m_section_headers.begin(); 2913 I != m_section_headers.end(); ++I) { 2914 if (I->sh_type == SHT_RELA || I->sh_type == SHT_REL) { 2915 const char *hay_name = I->section_name.GetCString(); 2916 if (hay_name == nullptr) 2917 continue; 2918 if (needle == hay_name || needlea == hay_name) { 2919 const ELFSectionHeader &reloc_header = *I; 2920 user_id_t reloc_id = SectionIndex(I); 2921 RelocateDebugSections(&reloc_header, reloc_id, GetSymtab()); 2922 break; 2923 } 2924 } 2925 } 2926 } 2927 2928 void ObjectFileELF::ParseUnwindSymbols(Symtab *symbol_table, 2929 DWARFCallFrameInfo *eh_frame) { 2930 SectionList *section_list = GetSectionList(); 2931 if (!section_list) 2932 return; 2933 2934 // First we save the new symbols into a separate list and add them to the 2935 // symbol table after 2936 // we colleced all symbols we want to add. This is neccessary because adding a 2937 // new symbol 2938 // invalidates the internal index of the symtab what causing the next lookup 2939 // to be slow because 2940 // it have to recalculate the index first. 2941 std::vector<Symbol> new_symbols; 2942 2943 eh_frame->ForEachFDEEntries([this, symbol_table, section_list, &new_symbols]( 2944 lldb::addr_t file_addr, uint32_t size, dw_offset_t) { 2945 Symbol *symbol = symbol_table->FindSymbolAtFileAddress(file_addr); 2946 if (symbol) { 2947 if (!symbol->GetByteSizeIsValid()) { 2948 symbol->SetByteSize(size); 2949 symbol->SetSizeIsSynthesized(true); 2950 } 2951 } else { 2952 SectionSP section_sp = 2953 section_list->FindSectionContainingFileAddress(file_addr); 2954 if (section_sp) { 2955 addr_t offset = file_addr - section_sp->GetFileAddress(); 2956 const char *symbol_name = GetNextSyntheticSymbolName().GetCString(); 2957 uint64_t symbol_id = symbol_table->GetNumSymbols(); 2958 Symbol eh_symbol( 2959 symbol_id, // Symbol table index. 2960 symbol_name, // Symbol name. 2961 false, // Is the symbol name mangled? 2962 eSymbolTypeCode, // Type of this symbol. 2963 true, // Is this globally visible? 2964 false, // Is this symbol debug info? 2965 false, // Is this symbol a trampoline? 2966 true, // Is this symbol artificial? 2967 section_sp, // Section in which this symbol is defined or null. 2968 offset, // Offset in section or symbol value. 2969 0, // Size: Don't specify the size as an FDE can 2970 false, // Size is valid: cover multiple symbols. 2971 false, // Contains linker annotations? 2972 0); // Symbol flags. 2973 new_symbols.push_back(eh_symbol); 2974 } 2975 } 2976 return true; 2977 }); 2978 2979 for (const Symbol &s : new_symbols) 2980 symbol_table->AddSymbol(s); 2981 } 2982 2983 bool ObjectFileELF::IsStripped() { 2984 // TODO: determine this for ELF 2985 return false; 2986 } 2987 2988 //===----------------------------------------------------------------------===// 2989 // Dump 2990 // 2991 // Dump the specifics of the runtime file container (such as any headers 2992 // segments, sections, etc). 2993 //---------------------------------------------------------------------- 2994 void ObjectFileELF::Dump(Stream *s) { 2995 ModuleSP module_sp(GetModule()); 2996 if (!module_sp) { 2997 return; 2998 } 2999 3000 std::lock_guard<std::recursive_mutex> guard(module_sp->GetMutex()); 3001 s->Printf("%p: ", static_cast<void *>(this)); 3002 s->Indent(); 3003 s->PutCString("ObjectFileELF"); 3004 3005 ArchSpec header_arch; 3006 GetArchitecture(header_arch); 3007 3008 *s << ", file = '" << m_file 3009 << "', arch = " << header_arch.GetArchitectureName() << "\n"; 3010 3011 DumpELFHeader(s, m_header); 3012 s->EOL(); 3013 DumpELFProgramHeaders(s); 3014 s->EOL(); 3015 DumpELFSectionHeaders(s); 3016 s->EOL(); 3017 SectionList *section_list = GetSectionList(); 3018 if (section_list) 3019 section_list->Dump(s, NULL, true, UINT32_MAX); 3020 Symtab *symtab = GetSymtab(); 3021 if (symtab) 3022 symtab->Dump(s, NULL, eSortOrderNone); 3023 s->EOL(); 3024 DumpDependentModules(s); 3025 s->EOL(); 3026 } 3027 3028 //---------------------------------------------------------------------- 3029 // DumpELFHeader 3030 // 3031 // Dump the ELF header to the specified output stream 3032 //---------------------------------------------------------------------- 3033 void ObjectFileELF::DumpELFHeader(Stream *s, const ELFHeader &header) { 3034 s->PutCString("ELF Header\n"); 3035 s->Printf("e_ident[EI_MAG0 ] = 0x%2.2x\n", header.e_ident[EI_MAG0]); 3036 s->Printf("e_ident[EI_MAG1 ] = 0x%2.2x '%c'\n", header.e_ident[EI_MAG1], 3037 header.e_ident[EI_MAG1]); 3038 s->Printf("e_ident[EI_MAG2 ] = 0x%2.2x '%c'\n", header.e_ident[EI_MAG2], 3039 header.e_ident[EI_MAG2]); 3040 s->Printf("e_ident[EI_MAG3 ] = 0x%2.2x '%c'\n", header.e_ident[EI_MAG3], 3041 header.e_ident[EI_MAG3]); 3042 3043 s->Printf("e_ident[EI_CLASS ] = 0x%2.2x\n", header.e_ident[EI_CLASS]); 3044 s->Printf("e_ident[EI_DATA ] = 0x%2.2x ", header.e_ident[EI_DATA]); 3045 DumpELFHeader_e_ident_EI_DATA(s, header.e_ident[EI_DATA]); 3046 s->Printf("\ne_ident[EI_VERSION] = 0x%2.2x\n", header.e_ident[EI_VERSION]); 3047 s->Printf("e_ident[EI_PAD ] = 0x%2.2x\n", header.e_ident[EI_PAD]); 3048 3049 s->Printf("e_type = 0x%4.4x ", header.e_type); 3050 DumpELFHeader_e_type(s, header.e_type); 3051 s->Printf("\ne_machine = 0x%4.4x\n", header.e_machine); 3052 s->Printf("e_version = 0x%8.8x\n", header.e_version); 3053 s->Printf("e_entry = 0x%8.8" PRIx64 "\n", header.e_entry); 3054 s->Printf("e_phoff = 0x%8.8" PRIx64 "\n", header.e_phoff); 3055 s->Printf("e_shoff = 0x%8.8" PRIx64 "\n", header.e_shoff); 3056 s->Printf("e_flags = 0x%8.8x\n", header.e_flags); 3057 s->Printf("e_ehsize = 0x%4.4x\n", header.e_ehsize); 3058 s->Printf("e_phentsize = 0x%4.4x\n", header.e_phentsize); 3059 s->Printf("e_phnum = 0x%8.8x\n", header.e_phnum); 3060 s->Printf("e_shentsize = 0x%4.4x\n", header.e_shentsize); 3061 s->Printf("e_shnum = 0x%8.8x\n", header.e_shnum); 3062 s->Printf("e_shstrndx = 0x%8.8x\n", header.e_shstrndx); 3063 } 3064 3065 //---------------------------------------------------------------------- 3066 // DumpELFHeader_e_type 3067 // 3068 // Dump an token value for the ELF header member e_type 3069 //---------------------------------------------------------------------- 3070 void ObjectFileELF::DumpELFHeader_e_type(Stream *s, elf_half e_type) { 3071 switch (e_type) { 3072 case ET_NONE: 3073 *s << "ET_NONE"; 3074 break; 3075 case ET_REL: 3076 *s << "ET_REL"; 3077 break; 3078 case ET_EXEC: 3079 *s << "ET_EXEC"; 3080 break; 3081 case ET_DYN: 3082 *s << "ET_DYN"; 3083 break; 3084 case ET_CORE: 3085 *s << "ET_CORE"; 3086 break; 3087 default: 3088 break; 3089 } 3090 } 3091 3092 //---------------------------------------------------------------------- 3093 // DumpELFHeader_e_ident_EI_DATA 3094 // 3095 // Dump an token value for the ELF header member e_ident[EI_DATA] 3096 //---------------------------------------------------------------------- 3097 void ObjectFileELF::DumpELFHeader_e_ident_EI_DATA(Stream *s, 3098 unsigned char ei_data) { 3099 switch (ei_data) { 3100 case ELFDATANONE: 3101 *s << "ELFDATANONE"; 3102 break; 3103 case ELFDATA2LSB: 3104 *s << "ELFDATA2LSB - Little Endian"; 3105 break; 3106 case ELFDATA2MSB: 3107 *s << "ELFDATA2MSB - Big Endian"; 3108 break; 3109 default: 3110 break; 3111 } 3112 } 3113 3114 //---------------------------------------------------------------------- 3115 // DumpELFProgramHeader 3116 // 3117 // Dump a single ELF program header to the specified output stream 3118 //---------------------------------------------------------------------- 3119 void ObjectFileELF::DumpELFProgramHeader(Stream *s, 3120 const ELFProgramHeader &ph) { 3121 DumpELFProgramHeader_p_type(s, ph.p_type); 3122 s->Printf(" %8.8" PRIx64 " %8.8" PRIx64 " %8.8" PRIx64, ph.p_offset, 3123 ph.p_vaddr, ph.p_paddr); 3124 s->Printf(" %8.8" PRIx64 " %8.8" PRIx64 " %8.8x (", ph.p_filesz, ph.p_memsz, 3125 ph.p_flags); 3126 3127 DumpELFProgramHeader_p_flags(s, ph.p_flags); 3128 s->Printf(") %8.8" PRIx64, ph.p_align); 3129 } 3130 3131 //---------------------------------------------------------------------- 3132 // DumpELFProgramHeader_p_type 3133 // 3134 // Dump an token value for the ELF program header member p_type which 3135 // describes the type of the program header 3136 // ---------------------------------------------------------------------- 3137 void ObjectFileELF::DumpELFProgramHeader_p_type(Stream *s, elf_word p_type) { 3138 const int kStrWidth = 15; 3139 switch (p_type) { 3140 CASE_AND_STREAM(s, PT_NULL, kStrWidth); 3141 CASE_AND_STREAM(s, PT_LOAD, kStrWidth); 3142 CASE_AND_STREAM(s, PT_DYNAMIC, kStrWidth); 3143 CASE_AND_STREAM(s, PT_INTERP, kStrWidth); 3144 CASE_AND_STREAM(s, PT_NOTE, kStrWidth); 3145 CASE_AND_STREAM(s, PT_SHLIB, kStrWidth); 3146 CASE_AND_STREAM(s, PT_PHDR, kStrWidth); 3147 CASE_AND_STREAM(s, PT_TLS, kStrWidth); 3148 CASE_AND_STREAM(s, PT_GNU_EH_FRAME, kStrWidth); 3149 default: 3150 s->Printf("0x%8.8x%*s", p_type, kStrWidth - 10, ""); 3151 break; 3152 } 3153 } 3154 3155 //---------------------------------------------------------------------- 3156 // DumpELFProgramHeader_p_flags 3157 // 3158 // Dump an token value for the ELF program header member p_flags 3159 //---------------------------------------------------------------------- 3160 void ObjectFileELF::DumpELFProgramHeader_p_flags(Stream *s, elf_word p_flags) { 3161 *s << ((p_flags & PF_X) ? "PF_X" : " ") 3162 << (((p_flags & PF_X) && (p_flags & PF_W)) ? '+' : ' ') 3163 << ((p_flags & PF_W) ? "PF_W" : " ") 3164 << (((p_flags & PF_W) && (p_flags & PF_R)) ? '+' : ' ') 3165 << ((p_flags & PF_R) ? "PF_R" : " "); 3166 } 3167 3168 //---------------------------------------------------------------------- 3169 // DumpELFProgramHeaders 3170 // 3171 // Dump all of the ELF program header to the specified output stream 3172 //---------------------------------------------------------------------- 3173 void ObjectFileELF::DumpELFProgramHeaders(Stream *s) { 3174 if (!ParseProgramHeaders()) 3175 return; 3176 3177 s->PutCString("Program Headers\n"); 3178 s->PutCString("IDX p_type p_offset p_vaddr p_paddr " 3179 "p_filesz p_memsz p_flags p_align\n"); 3180 s->PutCString("==== --------------- -------- -------- -------- " 3181 "-------- -------- ------------------------- --------\n"); 3182 3183 uint32_t idx = 0; 3184 for (ProgramHeaderCollConstIter I = m_program_headers.begin(); 3185 I != m_program_headers.end(); ++I, ++idx) { 3186 s->Printf("[%2u] ", idx); 3187 ObjectFileELF::DumpELFProgramHeader(s, *I); 3188 s->EOL(); 3189 } 3190 } 3191 3192 //---------------------------------------------------------------------- 3193 // DumpELFSectionHeader 3194 // 3195 // Dump a single ELF section header to the specified output stream 3196 //---------------------------------------------------------------------- 3197 void ObjectFileELF::DumpELFSectionHeader(Stream *s, 3198 const ELFSectionHeaderInfo &sh) { 3199 s->Printf("%8.8x ", sh.sh_name); 3200 DumpELFSectionHeader_sh_type(s, sh.sh_type); 3201 s->Printf(" %8.8" PRIx64 " (", sh.sh_flags); 3202 DumpELFSectionHeader_sh_flags(s, sh.sh_flags); 3203 s->Printf(") %8.8" PRIx64 " %8.8" PRIx64 " %8.8" PRIx64, sh.sh_addr, 3204 sh.sh_offset, sh.sh_size); 3205 s->Printf(" %8.8x %8.8x", sh.sh_link, sh.sh_info); 3206 s->Printf(" %8.8" PRIx64 " %8.8" PRIx64, sh.sh_addralign, sh.sh_entsize); 3207 } 3208 3209 //---------------------------------------------------------------------- 3210 // DumpELFSectionHeader_sh_type 3211 // 3212 // Dump an token value for the ELF section header member sh_type which 3213 // describes the type of the section 3214 //---------------------------------------------------------------------- 3215 void ObjectFileELF::DumpELFSectionHeader_sh_type(Stream *s, elf_word sh_type) { 3216 const int kStrWidth = 12; 3217 switch (sh_type) { 3218 CASE_AND_STREAM(s, SHT_NULL, kStrWidth); 3219 CASE_AND_STREAM(s, SHT_PROGBITS, kStrWidth); 3220 CASE_AND_STREAM(s, SHT_SYMTAB, kStrWidth); 3221 CASE_AND_STREAM(s, SHT_STRTAB, kStrWidth); 3222 CASE_AND_STREAM(s, SHT_RELA, kStrWidth); 3223 CASE_AND_STREAM(s, SHT_HASH, kStrWidth); 3224 CASE_AND_STREAM(s, SHT_DYNAMIC, kStrWidth); 3225 CASE_AND_STREAM(s, SHT_NOTE, kStrWidth); 3226 CASE_AND_STREAM(s, SHT_NOBITS, kStrWidth); 3227 CASE_AND_STREAM(s, SHT_REL, kStrWidth); 3228 CASE_AND_STREAM(s, SHT_SHLIB, kStrWidth); 3229 CASE_AND_STREAM(s, SHT_DYNSYM, kStrWidth); 3230 CASE_AND_STREAM(s, SHT_LOPROC, kStrWidth); 3231 CASE_AND_STREAM(s, SHT_HIPROC, kStrWidth); 3232 CASE_AND_STREAM(s, SHT_LOUSER, kStrWidth); 3233 CASE_AND_STREAM(s, SHT_HIUSER, kStrWidth); 3234 default: 3235 s->Printf("0x%8.8x%*s", sh_type, kStrWidth - 10, ""); 3236 break; 3237 } 3238 } 3239 3240 //---------------------------------------------------------------------- 3241 // DumpELFSectionHeader_sh_flags 3242 // 3243 // Dump an token value for the ELF section header member sh_flags 3244 //---------------------------------------------------------------------- 3245 void ObjectFileELF::DumpELFSectionHeader_sh_flags(Stream *s, 3246 elf_xword sh_flags) { 3247 *s << ((sh_flags & SHF_WRITE) ? "WRITE" : " ") 3248 << (((sh_flags & SHF_WRITE) && (sh_flags & SHF_ALLOC)) ? '+' : ' ') 3249 << ((sh_flags & SHF_ALLOC) ? "ALLOC" : " ") 3250 << (((sh_flags & SHF_ALLOC) && (sh_flags & SHF_EXECINSTR)) ? '+' : ' ') 3251 << ((sh_flags & SHF_EXECINSTR) ? "EXECINSTR" : " "); 3252 } 3253 3254 //---------------------------------------------------------------------- 3255 // DumpELFSectionHeaders 3256 // 3257 // Dump all of the ELF section header to the specified output stream 3258 //---------------------------------------------------------------------- 3259 void ObjectFileELF::DumpELFSectionHeaders(Stream *s) { 3260 if (!ParseSectionHeaders()) 3261 return; 3262 3263 s->PutCString("Section Headers\n"); 3264 s->PutCString("IDX name type flags " 3265 "addr offset size link info addralgn " 3266 "entsize Name\n"); 3267 s->PutCString("==== -------- ------------ -------------------------------- " 3268 "-------- -------- -------- -------- -------- -------- " 3269 "-------- ====================\n"); 3270 3271 uint32_t idx = 0; 3272 for (SectionHeaderCollConstIter I = m_section_headers.begin(); 3273 I != m_section_headers.end(); ++I, ++idx) { 3274 s->Printf("[%2u] ", idx); 3275 ObjectFileELF::DumpELFSectionHeader(s, *I); 3276 const char *section_name = I->section_name.AsCString(""); 3277 if (section_name) 3278 *s << ' ' << section_name << "\n"; 3279 } 3280 } 3281 3282 void ObjectFileELF::DumpDependentModules(lldb_private::Stream *s) { 3283 size_t num_modules = ParseDependentModules(); 3284 3285 if (num_modules > 0) { 3286 s->PutCString("Dependent Modules:\n"); 3287 for (unsigned i = 0; i < num_modules; ++i) { 3288 const FileSpec &spec = m_filespec_ap->GetFileSpecAtIndex(i); 3289 s->Printf(" %s\n", spec.GetFilename().GetCString()); 3290 } 3291 } 3292 } 3293 3294 bool ObjectFileELF::GetArchitecture(ArchSpec &arch) { 3295 if (!ParseHeader()) 3296 return false; 3297 3298 if (m_section_headers.empty()) { 3299 // Allow elf notes to be parsed which may affect the detected architecture. 3300 ParseSectionHeaders(); 3301 } 3302 3303 if (CalculateType() == eTypeCoreFile && 3304 m_arch_spec.TripleOSIsUnspecifiedUnknown()) { 3305 // Core files don't have section headers yet they have PT_NOTE program 3306 // headers 3307 // that might shed more light on the architecture 3308 if (ParseProgramHeaders()) { 3309 for (size_t i = 1, count = GetProgramHeaderCount(); i <= count; ++i) { 3310 const elf::ELFProgramHeader *header = GetProgramHeaderByIndex(i); 3311 if (header && header->p_type == PT_NOTE && header->p_offset != 0 && 3312 header->p_filesz > 0) { 3313 DataExtractor data; 3314 if (data.SetData(m_data, header->p_offset, header->p_filesz) == 3315 header->p_filesz) { 3316 lldb_private::UUID uuid; 3317 RefineModuleDetailsFromNote(data, m_arch_spec, uuid); 3318 } 3319 } 3320 } 3321 } 3322 } 3323 arch = m_arch_spec; 3324 return true; 3325 } 3326 3327 ObjectFile::Type ObjectFileELF::CalculateType() { 3328 switch (m_header.e_type) { 3329 case llvm::ELF::ET_NONE: 3330 // 0 - No file type 3331 return eTypeUnknown; 3332 3333 case llvm::ELF::ET_REL: 3334 // 1 - Relocatable file 3335 return eTypeObjectFile; 3336 3337 case llvm::ELF::ET_EXEC: 3338 // 2 - Executable file 3339 return eTypeExecutable; 3340 3341 case llvm::ELF::ET_DYN: 3342 // 3 - Shared object file 3343 return eTypeSharedLibrary; 3344 3345 case ET_CORE: 3346 // 4 - Core file 3347 return eTypeCoreFile; 3348 3349 default: 3350 break; 3351 } 3352 return eTypeUnknown; 3353 } 3354 3355 ObjectFile::Strata ObjectFileELF::CalculateStrata() { 3356 switch (m_header.e_type) { 3357 case llvm::ELF::ET_NONE: 3358 // 0 - No file type 3359 return eStrataUnknown; 3360 3361 case llvm::ELF::ET_REL: 3362 // 1 - Relocatable file 3363 return eStrataUnknown; 3364 3365 case llvm::ELF::ET_EXEC: 3366 // 2 - Executable file 3367 // TODO: is there any way to detect that an executable is a kernel 3368 // related executable by inspecting the program headers, section 3369 // headers, symbols, or any other flag bits??? 3370 return eStrataUser; 3371 3372 case llvm::ELF::ET_DYN: 3373 // 3 - Shared object file 3374 // TODO: is there any way to detect that an shared library is a kernel 3375 // related executable by inspecting the program headers, section 3376 // headers, symbols, or any other flag bits??? 3377 return eStrataUnknown; 3378 3379 case ET_CORE: 3380 // 4 - Core file 3381 // TODO: is there any way to detect that an core file is a kernel 3382 // related executable by inspecting the program headers, section 3383 // headers, symbols, or any other flag bits??? 3384 return eStrataUnknown; 3385 3386 default: 3387 break; 3388 } 3389 return eStrataUnknown; 3390 } 3391 3392 size_t ObjectFileELF::ReadSectionData(Section *section, 3393 lldb::offset_t section_offset, void *dst, 3394 size_t dst_len) { 3395 // If some other objectfile owns this data, pass this to them. 3396 if (section->GetObjectFile() != this) 3397 return section->GetObjectFile()->ReadSectionData(section, section_offset, 3398 dst, dst_len); 3399 3400 if (!section->Test(SHF_COMPRESSED)) 3401 return ObjectFile::ReadSectionData(section, section_offset, dst, dst_len); 3402 3403 // For compressed sections we need to read to full data to be able to 3404 // decompress. 3405 DataExtractor data; 3406 ReadSectionData(section, data); 3407 return data.CopyData(section_offset, dst_len, dst); 3408 } 3409 3410 size_t ObjectFileELF::ReadSectionData(Section *section, 3411 DataExtractor §ion_data) { 3412 // If some other objectfile owns this data, pass this to them. 3413 if (section->GetObjectFile() != this) 3414 return section->GetObjectFile()->ReadSectionData(section, section_data); 3415 3416 Log *log = lldb_private::GetLogIfAllCategoriesSet(LIBLLDB_LOG_MODULES); 3417 3418 size_t result = ObjectFile::ReadSectionData(section, section_data); 3419 if (result == 0 || !section->Test(SHF_COMPRESSED)) 3420 return result; 3421 3422 auto Decompressor = llvm::object::Decompressor::create( 3423 section->GetName().GetStringRef(), 3424 {reinterpret_cast<const char *>(section_data.GetDataStart()), 3425 size_t(section_data.GetByteSize())}, 3426 GetByteOrder() == eByteOrderLittle, GetAddressByteSize() == 8); 3427 if (!Decompressor) { 3428 LLDB_LOG_ERROR(log, Decompressor.takeError(), 3429 "Unable to initialize decompressor for section {0}", 3430 section->GetName()); 3431 return result; 3432 } 3433 auto buffer_sp = 3434 std::make_shared<DataBufferHeap>(Decompressor->getDecompressedSize(), 0); 3435 if (auto Error = Decompressor->decompress( 3436 {reinterpret_cast<char *>(buffer_sp->GetBytes()), 3437 size_t(buffer_sp->GetByteSize())})) { 3438 LLDB_LOG_ERROR(log, std::move(Error), "Decompression of section {0} failed", 3439 section->GetName()); 3440 return result; 3441 } 3442 section_data.SetData(buffer_sp); 3443 return buffer_sp->GetByteSize(); 3444 } 3445