1 //===- MachOObjectFile.cpp - Mach-O object file binding ---------*- C++ -*-===//
3 // The LLVM Compiler Infrastructure
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
8 //===----------------------------------------------------------------------===//
10 // This file defines the MachOObjectFile class, which binds the MachOObject
11 // class to the generic ObjectFile wrapper.
13 //===----------------------------------------------------------------------===//
15 #include "llvm/Object/MachO.h"
16 #include "llvm/ADT/Triple.h"
17 #include "llvm/Object/MachOFormat.h"
18 #include "llvm/Support/DataExtractor.h"
19 #include "llvm/Support/Format.h"
20 #include "llvm/Support/Host.h"
21 #include "llvm/Support/MemoryBuffer.h"
27 using namespace object;
32 struct SymbolTableEntryBase {
45 static void SwapValue(T &Value) {
46 Value = sys::SwapByteOrder(Value);
50 static void SwapStruct(T &Value);
53 void SwapStruct(macho::RelocationEntry &H) {
59 void SwapStruct(macho::LoadCommand &L) {
65 void SwapStruct(SymbolTableEntryBase &S) {
66 SwapValue(S.StringIndex);
71 void SwapStruct(macho::Section &S) {
76 SwapValue(S.RelocationTableOffset);
77 SwapValue(S.NumRelocationTableEntries);
79 SwapValue(S.Reserved1);
80 SwapValue(S.Reserved2);
84 void SwapStruct(macho::Section64 &S) {
89 SwapValue(S.RelocationTableOffset);
90 SwapValue(S.NumRelocationTableEntries);
92 SwapValue(S.Reserved1);
93 SwapValue(S.Reserved2);
94 SwapValue(S.Reserved3);
98 void SwapStruct(macho::SymbolTableEntry &S) {
99 SwapValue(S.StringIndex);
105 void SwapStruct(macho::Symbol64TableEntry &S) {
106 SwapValue(S.StringIndex);
112 void SwapStruct(macho::Header &H) {
114 SwapValue(H.CPUType);
115 SwapValue(H.CPUSubtype);
116 SwapValue(H.FileType);
117 SwapValue(H.NumLoadCommands);
118 SwapValue(H.SizeOfLoadCommands);
123 void SwapStruct(macho::SymtabLoadCommand &C) {
126 SwapValue(C.SymbolTableOffset);
127 SwapValue(C.NumSymbolTableEntries);
128 SwapValue(C.StringTableOffset);
129 SwapValue(C.StringTableSize);
133 void SwapStruct(macho::LinkeditDataLoadCommand &C) {
136 SwapValue(C.DataOffset);
137 SwapValue(C.DataSize);
141 void SwapStruct(macho::SegmentLoadCommand &C) {
144 SwapValue(C.VMAddress);
146 SwapValue(C.FileOffset);
147 SwapValue(C.FileSize);
148 SwapValue(C.MaxVMProtection);
149 SwapValue(C.InitialVMProtection);
150 SwapValue(C.NumSections);
155 void SwapStruct(macho::Segment64LoadCommand &C) {
158 SwapValue(C.VMAddress);
160 SwapValue(C.FileOffset);
161 SwapValue(C.FileSize);
162 SwapValue(C.MaxVMProtection);
163 SwapValue(C.InitialVMProtection);
164 SwapValue(C.NumSections);
169 T getStruct(const MachOObjectFile *O, const char *P) {
171 memcpy(&Cmd, P, sizeof(T));
172 if (O->isLittleEndian() != sys::IsLittleEndianHost)
177 static macho::SegmentLoadCommand
178 getSegmentLoadCommand(const MachOObjectFile *O,
179 const MachOObjectFile::LoadCommandInfo &L) {
180 return getStruct<macho::SegmentLoadCommand>(O, L.Ptr);
183 static macho::Segment64LoadCommand
184 getSegment64LoadCommand(const MachOObjectFile *O,
185 const MachOObjectFile::LoadCommandInfo &L) {
186 return getStruct<macho::Segment64LoadCommand>(O, L.Ptr);
190 getSegmentLoadCommandNumSections(const MachOObjectFile *O,
191 const MachOObjectFile::LoadCommandInfo &L) {
193 macho::Segment64LoadCommand S = getSegment64LoadCommand(O, L);
194 return S.NumSections;
196 macho::SegmentLoadCommand S = getSegmentLoadCommand(O, L);
197 return S.NumSections;
200 static const SectionBase *
201 getSectionBase(const MachOObjectFile *O, MachOObjectFile::LoadCommandInfo L,
203 uintptr_t CommandAddr = reinterpret_cast<uintptr_t>(L.Ptr);
205 bool Is64 = O->is64Bit();
206 unsigned SegmentLoadSize = Is64 ? sizeof(macho::Segment64LoadCommand) :
207 sizeof(macho::SegmentLoadCommand);
208 unsigned SectionSize = Is64 ? sizeof(macho::Section64) :
209 sizeof(macho::Section);
211 uintptr_t SectionAddr = CommandAddr + SegmentLoadSize + Sec * SectionSize;
212 return reinterpret_cast<const SectionBase*>(SectionAddr);
215 static const char *getPtr(const MachOObjectFile *O, size_t Offset) {
216 return O->getData().substr(Offset, 1).data();
219 static SymbolTableEntryBase
220 getSymbolTableEntryBase(const MachOObjectFile *O, DataRefImpl DRI) {
221 const char *P = reinterpret_cast<const char *>(DRI.p);
222 return getStruct<SymbolTableEntryBase>(O, P);
225 static StringRef parseSegmentOrSectionName(const char *P) {
229 // Not null terminated, so this is a 16 char string.
230 return StringRef(P, 16);
233 // Helper to advance a section or symbol iterator multiple increments at a time.
235 static error_code advance(T &it, size_t Val) {
244 static void advanceTo(T &it, size_t Val) {
245 if (error_code ec = advance(it, Val))
246 report_fatal_error(ec.message());
249 static unsigned getCPUType(const MachOObjectFile *O) {
250 return O->getHeader().CPUType;
253 static void printRelocationTargetName(const MachOObjectFile *O,
254 const macho::RelocationEntry &RE,
255 raw_string_ostream &fmt) {
256 bool IsScattered = O->isRelocationScattered(RE);
258 // Target of a scattered relocation is an address. In the interest of
259 // generating pretty output, scan through the symbol table looking for a
260 // symbol that aligns with that address. If we find one, print it.
261 // Otherwise, we just print the hex address of the target.
263 uint32_t Val = O->getPlainRelocationSymbolNum(RE);
266 for (symbol_iterator SI = O->begin_symbols(), SE = O->end_symbols();
267 SI != SE; SI.increment(ec)) {
268 if (ec) report_fatal_error(ec.message());
273 if ((ec = SI->getAddress(Addr)))
274 report_fatal_error(ec.message());
275 if (Addr != Val) continue;
276 if ((ec = SI->getName(Name)))
277 report_fatal_error(ec.message());
282 // If we couldn't find a symbol that this relocation refers to, try
283 // to find a section beginning instead.
284 for (section_iterator SI = O->begin_sections(), SE = O->end_sections();
285 SI != SE; SI.increment(ec)) {
286 if (ec) report_fatal_error(ec.message());
291 if ((ec = SI->getAddress(Addr)))
292 report_fatal_error(ec.message());
293 if (Addr != Val) continue;
294 if ((ec = SI->getName(Name)))
295 report_fatal_error(ec.message());
300 fmt << format("0x%x", Val);
305 bool isExtern = O->getPlainRelocationExternal(RE);
306 uint64_t Val = O->getAnyRelocationAddress(RE);
309 symbol_iterator SI = O->begin_symbols();
313 section_iterator SI = O->begin_sections();
321 static uint32_t getPlainRelocationAddress(const macho::RelocationEntry &RE) {
326 getScatteredRelocationAddress(const macho::RelocationEntry &RE) {
327 return RE.Word0 & 0xffffff;
330 static bool getPlainRelocationPCRel(const MachOObjectFile *O,
331 const macho::RelocationEntry &RE) {
332 if (O->isLittleEndian())
333 return (RE.Word1 >> 24) & 1;
334 return (RE.Word1 >> 7) & 1;
338 getScatteredRelocationPCRel(const MachOObjectFile *O,
339 const macho::RelocationEntry &RE) {
340 return (RE.Word0 >> 30) & 1;
343 static unsigned getPlainRelocationLength(const MachOObjectFile *O,
344 const macho::RelocationEntry &RE) {
345 if (O->isLittleEndian())
346 return (RE.Word1 >> 25) & 3;
347 return (RE.Word1 >> 5) & 3;
351 getScatteredRelocationLength(const macho::RelocationEntry &RE) {
352 return (RE.Word0 >> 28) & 3;
355 static unsigned getPlainRelocationType(const MachOObjectFile *O,
356 const macho::RelocationEntry &RE) {
357 if (O->isLittleEndian())
358 return RE.Word1 >> 28;
359 return RE.Word1 & 0xf;
362 static unsigned getScatteredRelocationType(const macho::RelocationEntry &RE) {
363 return (RE.Word0 >> 24) & 0xf;
366 static uint32_t getSectionFlags(const MachOObjectFile *O,
369 macho::Section64 Sect = O->getSection64(Sec);
372 macho::Section Sect = O->getSection(Sec);
376 MachOObjectFile::MachOObjectFile(MemoryBuffer *Object,
377 bool IsLittleEndian, bool Is64bits,
379 : ObjectFile(getMachOType(IsLittleEndian, Is64bits), Object),
380 SymtabLoadCmd(NULL) {
381 uint32_t LoadCommandCount = this->getHeader().NumLoadCommands;
382 macho::LoadCommandType SegmentLoadType = is64Bit() ?
383 macho::LCT_Segment64 : macho::LCT_Segment;
385 MachOObjectFile::LoadCommandInfo Load = getFirstLoadCommandInfo();
386 for (unsigned I = 0; ; ++I) {
387 if (Load.C.Type == macho::LCT_Symtab) {
388 assert(!SymtabLoadCmd && "Multiple symbol tables");
389 SymtabLoadCmd = Load.Ptr;
392 if (Load.C.Type == SegmentLoadType) {
393 uint32_t NumSections = getSegmentLoadCommandNumSections(this, Load);
394 for (unsigned J = 0; J < NumSections; ++J) {
395 const SectionBase *Sec = getSectionBase(this, Load, J);
396 Sections.push_back(reinterpret_cast<const char*>(Sec));
400 if (I == LoadCommandCount - 1)
403 Load = getNextLoadCommandInfo(Load);
407 error_code MachOObjectFile::getSymbolNext(DataRefImpl Symb,
408 SymbolRef &Res) const {
409 unsigned SymbolTableEntrySize = is64Bit() ?
410 sizeof(macho::Symbol64TableEntry) :
411 sizeof(macho::SymbolTableEntry);
412 Symb.p += SymbolTableEntrySize;
413 Res = SymbolRef(Symb, this);
414 return object_error::success;
417 error_code MachOObjectFile::getSymbolName(DataRefImpl Symb,
418 StringRef &Res) const {
419 macho::SymtabLoadCommand S = getSymtabLoadCommand();
420 const char *StringTable = getPtr(this, S.StringTableOffset);
421 SymbolTableEntryBase Entry = getSymbolTableEntryBase(this, Symb);
422 const char *Start = &StringTable[Entry.StringIndex];
423 Res = StringRef(Start);
424 return object_error::success;
427 error_code MachOObjectFile::getSymbolAddress(DataRefImpl Symb,
428 uint64_t &Res) const {
430 macho::Symbol64TableEntry Entry = getSymbol64TableEntry(Symb);
433 macho::SymbolTableEntry Entry = getSymbolTableEntry(Symb);
436 return object_error::success;
440 MachOObjectFile::getSymbolFileOffset(DataRefImpl Symb,
441 uint64_t &Res) const {
442 SymbolTableEntryBase Entry = getSymbolTableEntryBase(this, Symb);
443 getSymbolAddress(Symb, Res);
444 if (Entry.SectionIndex) {
447 SecRel.d.a = Entry.SectionIndex-1;
449 macho::Section64 Sec = getSection64(SecRel);
450 Delta = Sec.Offset - Sec.Address;
452 macho::Section Sec = getSection(SecRel);
453 Delta = Sec.Offset - Sec.Address;
459 return object_error::success;
462 error_code MachOObjectFile::getSymbolSize(DataRefImpl DRI,
463 uint64_t &Result) const {
464 uint64_t BeginOffset;
465 uint64_t EndOffset = 0;
466 uint8_t SectionIndex;
468 SymbolTableEntryBase Entry = getSymbolTableEntryBase(this, DRI);
470 getSymbolAddress(DRI, Value);
474 SectionIndex = Entry.SectionIndex;
476 uint32_t flags = SymbolRef::SF_None;
477 this->getSymbolFlags(DRI, flags);
478 if (flags & SymbolRef::SF_Common)
481 Result = UnknownAddressOrSize;
482 return object_error::success;
484 // Unfortunately symbols are unsorted so we need to touch all
485 // symbols from load command
487 for (symbol_iterator I = begin_symbols(), E = end_symbols(); I != E;
489 DataRefImpl DRI = I->getRawDataRefImpl();
490 Entry = getSymbolTableEntryBase(this, DRI);
491 getSymbolAddress(DRI, Value);
492 if (Entry.SectionIndex == SectionIndex && Value > BeginOffset)
493 if (!EndOffset || Value < EndOffset)
499 Sec.d.a = SectionIndex-1;
500 getSectionSize(Sec, Size);
501 getSectionAddress(Sec, EndOffset);
504 Result = EndOffset - BeginOffset;
505 return object_error::success;
508 error_code MachOObjectFile::getSymbolType(DataRefImpl Symb,
509 SymbolRef::Type &Res) const {
510 SymbolTableEntryBase Entry = getSymbolTableEntryBase(this, Symb);
511 uint8_t n_type = Entry.Type;
513 Res = SymbolRef::ST_Other;
515 // If this is a STAB debugging symbol, we can do nothing more.
516 if (n_type & MachO::NlistMaskStab) {
517 Res = SymbolRef::ST_Debug;
518 return object_error::success;
521 switch (n_type & MachO::NlistMaskType) {
522 case MachO::NListTypeUndefined :
523 Res = SymbolRef::ST_Unknown;
525 case MachO::NListTypeSection :
526 Res = SymbolRef::ST_Function;
529 return object_error::success;
532 error_code MachOObjectFile::getSymbolNMTypeChar(DataRefImpl Symb,
534 SymbolTableEntryBase Entry = getSymbolTableEntryBase(this, Symb);
535 uint8_t Type = Entry.Type;
536 uint16_t Flags = Entry.Flags;
539 switch (Type & macho::STF_TypeMask) {
540 case macho::STT_Undefined:
543 case macho::STT_Absolute:
544 case macho::STT_Section:
552 if (Flags & (macho::STF_External | macho::STF_PrivateExtern))
553 Char = toupper(static_cast<unsigned char>(Char));
555 return object_error::success;
558 error_code MachOObjectFile::getSymbolFlags(DataRefImpl DRI,
559 uint32_t &Result) const {
560 SymbolTableEntryBase Entry = getSymbolTableEntryBase(this, DRI);
562 uint8_t MachOType = Entry.Type;
563 uint16_t MachOFlags = Entry.Flags;
565 // TODO: Correctly set SF_ThreadLocal
566 Result = SymbolRef::SF_None;
568 if ((MachOType & MachO::NlistMaskType) == MachO::NListTypeUndefined)
569 Result |= SymbolRef::SF_Undefined;
571 if (MachOFlags & macho::STF_StabsEntryMask)
572 Result |= SymbolRef::SF_FormatSpecific;
574 if (MachOType & MachO::NlistMaskExternal) {
575 Result |= SymbolRef::SF_Global;
576 if ((MachOType & MachO::NlistMaskType) == MachO::NListTypeUndefined)
577 Result |= SymbolRef::SF_Common;
580 if (MachOFlags & (MachO::NListDescWeakRef | MachO::NListDescWeakDef))
581 Result |= SymbolRef::SF_Weak;
583 if ((MachOType & MachO::NlistMaskType) == MachO::NListTypeAbsolute)
584 Result |= SymbolRef::SF_Absolute;
586 return object_error::success;
590 MachOObjectFile::getSymbolSection(DataRefImpl Symb,
591 section_iterator &Res) const {
592 SymbolTableEntryBase Entry = getSymbolTableEntryBase(this, Symb);
593 uint8_t index = Entry.SectionIndex;
596 Res = end_sections();
600 Res = section_iterator(SectionRef(DRI, this));
603 return object_error::success;
606 error_code MachOObjectFile::getSymbolValue(DataRefImpl Symb,
607 uint64_t &Val) const {
608 report_fatal_error("getSymbolValue unimplemented in MachOObjectFile");
611 error_code MachOObjectFile::getSectionNext(DataRefImpl Sec,
612 SectionRef &Res) const {
614 Res = SectionRef(Sec, this);
615 return object_error::success;
619 MachOObjectFile::getSectionName(DataRefImpl Sec, StringRef &Result) const {
620 ArrayRef<char> Raw = getSectionRawName(Sec);
621 Result = parseSegmentOrSectionName(Raw.data());
622 return object_error::success;
626 MachOObjectFile::getSectionAddress(DataRefImpl Sec, uint64_t &Res) const {
628 macho::Section64 Sect = getSection64(Sec);
631 macho::Section Sect = getSection(Sec);
634 return object_error::success;
638 MachOObjectFile::getSectionSize(DataRefImpl Sec, uint64_t &Res) const {
640 macho::Section64 Sect = getSection64(Sec);
643 macho::Section Sect = getSection(Sec);
647 return object_error::success;
651 MachOObjectFile::getSectionContents(DataRefImpl Sec, StringRef &Res) const {
656 macho::Section64 Sect = getSection64(Sec);
657 Offset = Sect.Offset;
660 macho::Section Sect =getSection(Sec);
661 Offset = Sect.Offset;
665 Res = this->getData().substr(Offset, Size);
666 return object_error::success;
670 MachOObjectFile::getSectionAlignment(DataRefImpl Sec, uint64_t &Res) const {
673 macho::Section64 Sect = getSection64(Sec);
676 macho::Section Sect = getSection(Sec);
680 Res = uint64_t(1) << Align;
681 return object_error::success;
685 MachOObjectFile::isSectionText(DataRefImpl Sec, bool &Res) const {
686 uint32_t Flags = getSectionFlags(this, Sec);
687 Res = Flags & macho::SF_PureInstructions;
688 return object_error::success;
691 error_code MachOObjectFile::isSectionData(DataRefImpl DRI, bool &Result) const {
692 // FIXME: Unimplemented.
694 return object_error::success;
697 error_code MachOObjectFile::isSectionBSS(DataRefImpl DRI, bool &Result) const {
698 // FIXME: Unimplemented.
700 return object_error::success;
704 MachOObjectFile::isSectionRequiredForExecution(DataRefImpl Sec,
705 bool &Result) const {
706 // FIXME: Unimplemented.
708 return object_error::success;
711 error_code MachOObjectFile::isSectionVirtual(DataRefImpl Sec,
712 bool &Result) const {
713 // FIXME: Unimplemented.
715 return object_error::success;
719 MachOObjectFile::isSectionZeroInit(DataRefImpl Sec, bool &Res) const {
720 uint32_t Flags = getSectionFlags(this, Sec);
721 unsigned SectionType = Flags & MachO::SectionFlagMaskSectionType;
722 Res = SectionType == MachO::SectionTypeZeroFill ||
723 SectionType == MachO::SectionTypeZeroFillLarge;
724 return object_error::success;
727 error_code MachOObjectFile::isSectionReadOnlyData(DataRefImpl Sec,
728 bool &Result) const {
729 // Consider using the code from isSectionText to look for __const sections.
730 // Alternately, emit S_ATTR_PURE_INSTRUCTIONS and/or S_ATTR_SOME_INSTRUCTIONS
731 // to use section attributes to distinguish code from data.
733 // FIXME: Unimplemented.
735 return object_error::success;
739 MachOObjectFile::sectionContainsSymbol(DataRefImpl Sec, DataRefImpl Symb,
740 bool &Result) const {
742 this->getSymbolType(Symb, ST);
743 if (ST == SymbolRef::ST_Unknown) {
745 return object_error::success;
748 uint64_t SectBegin, SectEnd;
749 getSectionAddress(Sec, SectBegin);
750 getSectionSize(Sec, SectEnd);
751 SectEnd += SectBegin;
754 getSymbolAddress(Symb, SymAddr);
755 Result = (SymAddr >= SectBegin) && (SymAddr < SectEnd);
757 return object_error::success;
760 relocation_iterator MachOObjectFile::getSectionRelBegin(DataRefImpl Sec) const {
763 return relocation_iterator(RelocationRef(ret, this));
767 MachOObjectFile::getSectionRelEnd(DataRefImpl Sec) const {
770 macho::Section64 Sect = getSection64(Sec);
771 LastReloc = Sect.NumRelocationTableEntries;
773 macho::Section Sect = getSection(Sec);
774 LastReloc = Sect.NumRelocationTableEntries;
780 return relocation_iterator(RelocationRef(Ret, this));
783 error_code MachOObjectFile::getRelocationNext(DataRefImpl Rel,
784 RelocationRef &Res) const {
786 Res = RelocationRef(Rel, this);
787 return object_error::success;
791 MachOObjectFile::getRelocationAddress(DataRefImpl Rel, uint64_t &Res) const {
792 uint64_t SectAddress;
796 macho::Section64 Sect = getSection64(Sec);
797 SectAddress = Sect.Address;
799 macho::Section Sect = getSection(Sec);
800 SectAddress = Sect.Address;
803 macho::RelocationEntry RE = getRelocation(Rel);
804 uint64_t RelAddr = getAnyRelocationAddress(RE);
805 Res = SectAddress + RelAddr;
806 return object_error::success;
809 error_code MachOObjectFile::getRelocationOffset(DataRefImpl Rel,
810 uint64_t &Res) const {
811 macho::RelocationEntry RE = getRelocation(Rel);
812 Res = getAnyRelocationAddress(RE);
813 return object_error::success;
817 MachOObjectFile::getRelocationSymbol(DataRefImpl Rel, SymbolRef &Res) const {
818 macho::RelocationEntry RE = getRelocation(Rel);
819 uint32_t SymbolIdx = getPlainRelocationSymbolNum(RE);
820 bool isExtern = getPlainRelocationExternal(RE);
822 Res = *end_symbols();
823 return object_error::success;
826 macho::SymtabLoadCommand S = getSymtabLoadCommand();
827 unsigned SymbolTableEntrySize = is64Bit() ?
828 sizeof(macho::Symbol64TableEntry) :
829 sizeof(macho::SymbolTableEntry);
830 uint64_t Offset = S.SymbolTableOffset + SymbolIdx * SymbolTableEntrySize;
832 Sym.p = reinterpret_cast<uintptr_t>(getPtr(this, Offset));
833 Res = SymbolRef(Sym, this);
834 return object_error::success;
837 error_code MachOObjectFile::getRelocationType(DataRefImpl Rel,
838 uint64_t &Res) const {
839 macho::RelocationEntry RE = getRelocation(Rel);
840 Res = getAnyRelocationType(RE);
841 return object_error::success;
845 MachOObjectFile::getRelocationTypeName(DataRefImpl Rel,
846 SmallVectorImpl<char> &Result) const {
849 getRelocationType(Rel, RType);
851 unsigned Arch = this->getArch();
855 static const char *const Table[] = {
856 "GENERIC_RELOC_VANILLA",
857 "GENERIC_RELOC_PAIR",
858 "GENERIC_RELOC_SECTDIFF",
859 "GENERIC_RELOC_PB_LA_PTR",
860 "GENERIC_RELOC_LOCAL_SECTDIFF",
861 "GENERIC_RELOC_TLV" };
869 case Triple::x86_64: {
870 static const char *const Table[] = {
871 "X86_64_RELOC_UNSIGNED",
872 "X86_64_RELOC_SIGNED",
873 "X86_64_RELOC_BRANCH",
874 "X86_64_RELOC_GOT_LOAD",
876 "X86_64_RELOC_SUBTRACTOR",
877 "X86_64_RELOC_SIGNED_1",
878 "X86_64_RELOC_SIGNED_2",
879 "X86_64_RELOC_SIGNED_4",
880 "X86_64_RELOC_TLV" };
889 static const char *const Table[] = {
892 "ARM_RELOC_SECTDIFF",
893 "ARM_RELOC_LOCAL_SECTDIFF",
894 "ARM_RELOC_PB_LA_PTR",
896 "ARM_THUMB_RELOC_BR22",
897 "ARM_THUMB_32BIT_BRANCH",
899 "ARM_RELOC_HALF_SECTDIFF" };
908 static const char *const Table[] = {
917 "PPC_RELOC_SECTDIFF",
918 "PPC_RELOC_PB_LA_PTR",
919 "PPC_RELOC_HI16_SECTDIFF",
920 "PPC_RELOC_LO16_SECTDIFF",
921 "PPC_RELOC_HA16_SECTDIFF",
923 "PPC_RELOC_LO14_SECTDIFF",
924 "PPC_RELOC_LOCAL_SECTDIFF" };
929 case Triple::UnknownArch:
933 Result.append(res.begin(), res.end());
934 return object_error::success;
937 error_code MachOObjectFile::getRelocationAdditionalInfo(DataRefImpl Rel,
938 int64_t &Res) const {
940 return object_error::success;
944 MachOObjectFile::getRelocationValueString(DataRefImpl Rel,
945 SmallVectorImpl<char> &Result) const {
946 macho::RelocationEntry RE = getRelocation(Rel);
948 unsigned Arch = this->getArch();
951 raw_string_ostream fmt(fmtbuf);
952 unsigned Type = this->getAnyRelocationType(RE);
953 bool IsPCRel = this->getAnyRelocationPCRel(RE);
955 // Determine any addends that should be displayed with the relocation.
956 // These require decoding the relocation type, which is triple-specific.
958 // X86_64 has entirely custom relocation types.
959 if (Arch == Triple::x86_64) {
960 bool isPCRel = getAnyRelocationPCRel(RE);
963 case macho::RIT_X86_64_GOTLoad: // X86_64_RELOC_GOT_LOAD
964 case macho::RIT_X86_64_GOT: { // X86_64_RELOC_GOT
965 printRelocationTargetName(this, RE, fmt);
967 if (isPCRel) fmt << "PCREL";
970 case macho::RIT_X86_64_Subtractor: { // X86_64_RELOC_SUBTRACTOR
971 DataRefImpl RelNext = Rel;
973 macho::RelocationEntry RENext = getRelocation(RelNext);
975 // X86_64_SUBTRACTOR must be followed by a relocation of type
976 // X86_64_RELOC_UNSIGNED.
977 // NOTE: Scattered relocations don't exist on x86_64.
978 unsigned RType = getAnyRelocationType(RENext);
980 report_fatal_error("Expected X86_64_RELOC_UNSIGNED after "
981 "X86_64_RELOC_SUBTRACTOR.");
983 // The X86_64_RELOC_UNSIGNED contains the minuend symbol,
984 // X86_64_SUBTRACTOR contains to the subtrahend.
985 printRelocationTargetName(this, RENext, fmt);
987 printRelocationTargetName(this, RE, fmt);
990 case macho::RIT_X86_64_TLV:
991 printRelocationTargetName(this, RE, fmt);
993 if (isPCRel) fmt << "P";
995 case macho::RIT_X86_64_Signed1: // X86_64_RELOC_SIGNED1
996 printRelocationTargetName(this, RE, fmt);
999 case macho::RIT_X86_64_Signed2: // X86_64_RELOC_SIGNED2
1000 printRelocationTargetName(this, RE, fmt);
1003 case macho::RIT_X86_64_Signed4: // X86_64_RELOC_SIGNED4
1004 printRelocationTargetName(this, RE, fmt);
1008 printRelocationTargetName(this, RE, fmt);
1011 // X86 and ARM share some relocation types in common.
1012 } else if (Arch == Triple::x86 || Arch == Triple::arm) {
1013 // Generic relocation types...
1015 case macho::RIT_Pair: // GENERIC_RELOC_PAIR - prints no info
1016 return object_error::success;
1017 case macho::RIT_Difference: { // GENERIC_RELOC_SECTDIFF
1018 DataRefImpl RelNext = Rel;
1020 macho::RelocationEntry RENext = getRelocation(RelNext);
1022 // X86 sect diff's must be followed by a relocation of type
1023 // GENERIC_RELOC_PAIR.
1024 unsigned RType = getAnyRelocationType(RENext);
1027 report_fatal_error("Expected GENERIC_RELOC_PAIR after "
1028 "GENERIC_RELOC_SECTDIFF.");
1030 printRelocationTargetName(this, RE, fmt);
1032 printRelocationTargetName(this, RENext, fmt);
1037 if (Arch == Triple::x86) {
1038 // All X86 relocations that need special printing were already
1039 // handled in the generic code.
1041 case macho::RIT_Generic_LocalDifference:{// GENERIC_RELOC_LOCAL_SECTDIFF
1042 DataRefImpl RelNext = Rel;
1044 macho::RelocationEntry RENext = getRelocation(RelNext);
1046 // X86 sect diff's must be followed by a relocation of type
1047 // GENERIC_RELOC_PAIR.
1048 unsigned RType = getAnyRelocationType(RENext);
1050 report_fatal_error("Expected GENERIC_RELOC_PAIR after "
1051 "GENERIC_RELOC_LOCAL_SECTDIFF.");
1053 printRelocationTargetName(this, RE, fmt);
1055 printRelocationTargetName(this, RENext, fmt);
1058 case macho::RIT_Generic_TLV: {
1059 printRelocationTargetName(this, RE, fmt);
1061 if (IsPCRel) fmt << "P";
1065 printRelocationTargetName(this, RE, fmt);
1067 } else { // ARM-specific relocations
1069 case macho::RIT_ARM_Half: // ARM_RELOC_HALF
1070 case macho::RIT_ARM_HalfDifference: { // ARM_RELOC_HALF_SECTDIFF
1071 // Half relocations steal a bit from the length field to encode
1072 // whether this is an upper16 or a lower16 relocation.
1073 bool isUpper = getAnyRelocationLength(RE) >> 1;
1076 fmt << ":upper16:(";
1078 fmt << ":lower16:(";
1079 printRelocationTargetName(this, RE, fmt);
1081 DataRefImpl RelNext = Rel;
1083 macho::RelocationEntry RENext = getRelocation(RelNext);
1085 // ARM half relocs must be followed by a relocation of type
1087 unsigned RType = getAnyRelocationType(RENext);
1089 report_fatal_error("Expected ARM_RELOC_PAIR after "
1090 "GENERIC_RELOC_HALF");
1092 // NOTE: The half of the target virtual address is stashed in the
1093 // address field of the secondary relocation, but we can't reverse
1094 // engineer the constant offset from it without decoding the movw/movt
1095 // instruction to find the other half in its immediate field.
1097 // ARM_RELOC_HALF_SECTDIFF encodes the second section in the
1098 // symbol/section pointer of the follow-on relocation.
1099 if (Type == macho::RIT_ARM_HalfDifference) {
1101 printRelocationTargetName(this, RENext, fmt);
1108 printRelocationTargetName(this, RE, fmt);
1113 printRelocationTargetName(this, RE, fmt);
1116 Result.append(fmtbuf.begin(), fmtbuf.end());
1117 return object_error::success;
1121 MachOObjectFile::getRelocationHidden(DataRefImpl Rel, bool &Result) const {
1122 unsigned Arch = getArch();
1124 getRelocationType(Rel, Type);
1128 // On arches that use the generic relocations, GENERIC_RELOC_PAIR
1129 // is always hidden.
1130 if (Arch == Triple::x86 || Arch == Triple::arm) {
1131 if (Type == macho::RIT_Pair) Result = true;
1132 } else if (Arch == Triple::x86_64) {
1133 // On x86_64, X86_64_RELOC_UNSIGNED is hidden only when it follows
1134 // an X864_64_RELOC_SUBTRACTOR.
1135 if (Type == macho::RIT_X86_64_Unsigned && Rel.d.a > 0) {
1136 DataRefImpl RelPrev = Rel;
1139 getRelocationType(RelPrev, PrevType);
1140 if (PrevType == macho::RIT_X86_64_Subtractor)
1145 return object_error::success;
1148 error_code MachOObjectFile::getLibraryNext(DataRefImpl LibData,
1149 LibraryRef &Res) const {
1150 report_fatal_error("Needed libraries unimplemented in MachOObjectFile");
1153 error_code MachOObjectFile::getLibraryPath(DataRefImpl LibData,
1154 StringRef &Res) const {
1155 report_fatal_error("Needed libraries unimplemented in MachOObjectFile");
1158 symbol_iterator MachOObjectFile::begin_symbols() const {
1161 return symbol_iterator(SymbolRef(DRI, this));
1163 macho::SymtabLoadCommand Symtab = getSymtabLoadCommand();
1164 DRI.p = reinterpret_cast<uintptr_t>(getPtr(this, Symtab.SymbolTableOffset));
1165 return symbol_iterator(SymbolRef(DRI, this));
1168 symbol_iterator MachOObjectFile::end_symbols() const {
1171 return symbol_iterator(SymbolRef(DRI, this));
1173 macho::SymtabLoadCommand Symtab = getSymtabLoadCommand();
1174 unsigned SymbolTableEntrySize = is64Bit() ?
1175 sizeof(macho::Symbol64TableEntry) :
1176 sizeof(macho::SymbolTableEntry);
1177 unsigned Offset = Symtab.SymbolTableOffset +
1178 Symtab.NumSymbolTableEntries * SymbolTableEntrySize;
1179 DRI.p = reinterpret_cast<uintptr_t>(getPtr(this, Offset));
1180 return symbol_iterator(SymbolRef(DRI, this));
1183 symbol_iterator MachOObjectFile::begin_dynamic_symbols() const {
1185 report_fatal_error("Dynamic symbols unimplemented in MachOObjectFile");
1188 symbol_iterator MachOObjectFile::end_dynamic_symbols() const {
1190 report_fatal_error("Dynamic symbols unimplemented in MachOObjectFile");
1193 section_iterator MachOObjectFile::begin_sections() const {
1195 return section_iterator(SectionRef(DRI, this));
1198 section_iterator MachOObjectFile::end_sections() const {
1200 DRI.d.a = Sections.size();
1201 return section_iterator(SectionRef(DRI, this));
1204 library_iterator MachOObjectFile::begin_libraries_needed() const {
1206 report_fatal_error("Needed libraries unimplemented in MachOObjectFile");
1209 library_iterator MachOObjectFile::end_libraries_needed() const {
1211 report_fatal_error("Needed libraries unimplemented in MachOObjectFile");
1214 uint8_t MachOObjectFile::getBytesInAddress() const {
1215 return is64Bit() ? 8 : 4;
1218 StringRef MachOObjectFile::getFileFormatName() const {
1219 unsigned CPUType = getCPUType(this);
1222 case llvm::MachO::CPUTypeI386:
1223 return "Mach-O 32-bit i386";
1224 case llvm::MachO::CPUTypeARM:
1225 return "Mach-O arm";
1226 case llvm::MachO::CPUTypePowerPC:
1227 return "Mach-O 32-bit ppc";
1229 assert((CPUType & llvm::MachO::CPUArchABI64) == 0 &&
1230 "64-bit object file when we're not 64-bit?");
1231 return "Mach-O 32-bit unknown";
1235 // Make sure the cpu type has the correct mask.
1236 assert((CPUType & llvm::MachO::CPUArchABI64)
1237 == llvm::MachO::CPUArchABI64 &&
1238 "32-bit object file when we're 64-bit?");
1241 case llvm::MachO::CPUTypeX86_64:
1242 return "Mach-O 64-bit x86-64";
1243 case llvm::MachO::CPUTypePowerPC64:
1244 return "Mach-O 64-bit ppc64";
1246 return "Mach-O 64-bit unknown";
1250 unsigned MachOObjectFile::getArch() const {
1251 switch (getCPUType(this)) {
1252 case llvm::MachO::CPUTypeI386:
1254 case llvm::MachO::CPUTypeX86_64:
1255 return Triple::x86_64;
1256 case llvm::MachO::CPUTypeARM:
1258 case llvm::MachO::CPUTypePowerPC:
1260 case llvm::MachO::CPUTypePowerPC64:
1261 return Triple::ppc64;
1263 return Triple::UnknownArch;
1267 StringRef MachOObjectFile::getLoadName() const {
1269 report_fatal_error("get_load_name() unimplemented in MachOObjectFile");
1273 MachOObjectFile::getSectionFinalSegmentName(DataRefImpl Sec) const {
1274 ArrayRef<char> Raw = getSectionRawFinalSegmentName(Sec);
1275 return parseSegmentOrSectionName(Raw.data());
1279 MachOObjectFile::getSectionRawName(DataRefImpl Sec) const {
1280 const SectionBase *Base =
1281 reinterpret_cast<const SectionBase*>(Sections[Sec.d.a]);
1282 return ArrayRef<char>(Base->Name);
1286 MachOObjectFile::getSectionRawFinalSegmentName(DataRefImpl Sec) const {
1287 const SectionBase *Base =
1288 reinterpret_cast<const SectionBase*>(Sections[Sec.d.a]);
1289 return ArrayRef<char>(Base->SegmentName);
1293 MachOObjectFile::isRelocationScattered(const macho::RelocationEntry &RE)
1295 if (getCPUType(this) == llvm::MachO::CPUTypeX86_64)
1297 return getPlainRelocationAddress(RE) & macho::RF_Scattered;
1300 unsigned MachOObjectFile::getPlainRelocationSymbolNum(const macho::RelocationEntry &RE) const {
1301 if (isLittleEndian())
1302 return RE.Word1 & 0xffffff;
1303 return RE.Word1 >> 8;
1306 bool MachOObjectFile::getPlainRelocationExternal(const macho::RelocationEntry &RE) const {
1307 if (isLittleEndian())
1308 return (RE.Word1 >> 27) & 1;
1309 return (RE.Word1 >> 4) & 1;
1313 MachOObjectFile::getScatteredRelocationScattered(const macho::RelocationEntry &RE) const {
1314 return RE.Word0 >> 31;
1318 MachOObjectFile::getScatteredRelocationValue(const macho::RelocationEntry &RE) const {
1323 MachOObjectFile::getAnyRelocationAddress(const macho::RelocationEntry &RE) const {
1324 if (isRelocationScattered(RE))
1325 return getScatteredRelocationAddress(RE);
1326 return getPlainRelocationAddress(RE);
1330 MachOObjectFile::getAnyRelocationPCRel(const macho::RelocationEntry &RE) const {
1331 if (isRelocationScattered(RE))
1332 return getScatteredRelocationPCRel(this, RE);
1333 return getPlainRelocationPCRel(this, RE);
1337 MachOObjectFile::getAnyRelocationLength(const macho::RelocationEntry &RE) const {
1338 if (isRelocationScattered(RE))
1339 return getScatteredRelocationLength(RE);
1340 return getPlainRelocationLength(this, RE);
1344 MachOObjectFile::getAnyRelocationType(const macho::RelocationEntry &RE) const {
1345 if (isRelocationScattered(RE))
1346 return getScatteredRelocationType(RE);
1347 return getPlainRelocationType(this, RE);
1350 MachOObjectFile::LoadCommandInfo
1351 MachOObjectFile::getFirstLoadCommandInfo() const {
1352 MachOObjectFile::LoadCommandInfo Load;
1354 unsigned HeaderSize = is64Bit() ? macho::Header64Size : macho::Header32Size;
1355 Load.Ptr = getPtr(this, HeaderSize);
1356 Load.C = getStruct<macho::LoadCommand>(this, Load.Ptr);
1360 MachOObjectFile::LoadCommandInfo
1361 MachOObjectFile::getNextLoadCommandInfo(const LoadCommandInfo &L) const {
1362 MachOObjectFile::LoadCommandInfo Next;
1363 Next.Ptr = L.Ptr + L.C.Size;
1364 Next.C = getStruct<macho::LoadCommand>(this, Next.Ptr);
1368 macho::Section MachOObjectFile::getSection(DataRefImpl DRI) const {
1369 return getStruct<macho::Section>(this, Sections[DRI.d.a]);
1372 macho::Section64 MachOObjectFile::getSection64(DataRefImpl DRI) const {
1373 return getStruct<macho::Section64>(this, Sections[DRI.d.a]);
1376 macho::SymbolTableEntry
1377 MachOObjectFile::getSymbolTableEntry(DataRefImpl DRI) const {
1378 const char *P = reinterpret_cast<const char *>(DRI.p);
1379 return getStruct<macho::SymbolTableEntry>(this, P);
1382 macho::Symbol64TableEntry
1383 MachOObjectFile::getSymbol64TableEntry(DataRefImpl DRI) const {
1384 const char *P = reinterpret_cast<const char *>(DRI.p);
1385 return getStruct<macho::Symbol64TableEntry>(this, P);
1388 macho::LinkeditDataLoadCommand
1389 MachOObjectFile::getLinkeditDataLoadCommand(const MachOObjectFile::LoadCommandInfo &L) const {
1390 return getStruct<macho::LinkeditDataLoadCommand>(this, L.Ptr);
1393 macho::RelocationEntry
1394 MachOObjectFile::getRelocation(DataRefImpl Rel) const {
1399 macho::Section64 Sect = getSection64(Sec);
1400 RelOffset = Sect.RelocationTableOffset;
1402 macho::Section Sect = getSection(Sec);
1403 RelOffset = Sect.RelocationTableOffset;
1406 uint64_t Offset = RelOffset + Rel.d.a * sizeof(macho::RelocationEntry);
1407 return getStruct<macho::RelocationEntry>(this, getPtr(this, Offset));
1410 macho::Header MachOObjectFile::getHeader() const {
1411 return getStruct<macho::Header>(this, getPtr(this, 0));
1414 macho::SymtabLoadCommand
1415 MachOObjectFile::getSymtabLoadCommand() const {
1416 return getStruct<macho::SymtabLoadCommand>(this, SymtabLoadCmd);
1419 bool MachOObjectFile::is64Bit() const {
1420 return getType() == getMachOType(false, true) ||
1421 getType() == getMachOType(true, true);
1424 void MachOObjectFile::ReadULEB128s(uint64_t Index,
1425 SmallVectorImpl<uint64_t> &Out) const {
1426 DataExtractor extractor(ObjectFile::getData(), true, 0);
1428 uint32_t offset = Index;
1430 while (uint64_t delta = extractor.getULEB128(&offset)) {
1432 Out.push_back(data);
1436 ObjectFile *ObjectFile::createMachOObjectFile(MemoryBuffer *Buffer) {
1437 StringRef Magic = Buffer->getBuffer().slice(0, 4);
1440 if (Magic == "\xFE\xED\xFA\xCE")
1441 Ret = new MachOObjectFile(Buffer, false, false, ec);
1442 else if (Magic == "\xCE\xFA\xED\xFE")
1443 Ret = new MachOObjectFile(Buffer, true, false, ec);
1444 else if (Magic == "\xFE\xED\xFA\xCF")
1445 Ret = new MachOObjectFile(Buffer, false, true, ec);
1446 else if (Magic == "\xCF\xFA\xED\xFE")
1447 Ret = new MachOObjectFile(Buffer, true, true, ec);
1456 } // end namespace object
1457 } // end namespace llvm