7c12f068a82d96b9e83e55977d39af005cb9b75f
[oota-llvm.git] / tools / llvm-readobj / COFFDumper.cpp
1 //===-- COFFDumper.cpp - COFF-specific dumper -------------------*- 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 /// \file
11 /// \brief This file implements the COFF-specific dumper for llvm-readobj.
12 ///
13 //===----------------------------------------------------------------------===//
14
15 #include "llvm-readobj.h"
16 #include "ARMWinEHPrinter.h"
17 #include "Error.h"
18 #include "ObjDumper.h"
19 #include "StreamWriter.h"
20 #include "Win64EHDumper.h"
21 #include "llvm/ADT/DenseMap.h"
22 #include "llvm/ADT/SmallString.h"
23 #include "llvm/Object/COFF.h"
24 #include "llvm/Object/ObjectFile.h"
25 #include "llvm/Support/COFF.h"
26 #include "llvm/Support/Casting.h"
27 #include "llvm/Support/Compiler.h"
28 #include "llvm/Support/DataExtractor.h"
29 #include "llvm/Support/Format.h"
30 #include "llvm/Support/SourceMgr.h"
31 #include "llvm/Support/Win64EH.h"
32 #include "llvm/Support/raw_ostream.h"
33 #include <algorithm>
34 #include <cstring>
35 #include <system_error>
36 #include <time.h>
37
38 using namespace llvm;
39 using namespace llvm::object;
40 using namespace llvm::Win64EH;
41
42 namespace {
43
44 class COFFDumper : public ObjDumper {
45 public:
46   COFFDumper(const llvm::object::COFFObjectFile *Obj, StreamWriter& Writer)
47     : ObjDumper(Writer)
48     , Obj(Obj) {
49     cacheRelocations();
50   }
51
52   void printFileHeaders() override;
53   void printSections() override;
54   void printRelocations() override;
55   void printSymbols() override;
56   void printDynamicSymbols() override;
57   void printUnwindInfo() override;
58   void printCOFFImports() override;
59   void printCOFFDirectives() override;
60
61 private:
62   void printSymbol(const SymbolRef &Sym);
63   void printRelocation(const SectionRef &Section, const RelocationRef &Reloc);
64   void printDataDirectory(uint32_t Index, const std::string &FieldName);
65
66   void printDOSHeader(const dos_header *DH);
67   template <class PEHeader> void printPEHeader(const PEHeader *Hdr);
68   void printBaseOfDataField(const pe32_header *Hdr);
69   void printBaseOfDataField(const pe32plus_header *Hdr);
70
71   void printCodeViewLineTables(const SectionRef &Section);
72
73   void printCodeViewSymbolsSubsection(StringRef Subsection,
74                                       const SectionRef &Section,
75                                       uint32_t Offset);
76
77   void cacheRelocations();
78
79   std::error_code resolveSymbol(const coff_section *Section, uint64_t Offset,
80                                 SymbolRef &Sym);
81   std::error_code resolveSymbolName(const coff_section *Section,
82                                     uint64_t Offset, StringRef &Name);
83   void printImportedSymbols(iterator_range<imported_symbol_iterator> Range);
84   void printDelayImportedSymbols(
85       const DelayImportDirectoryEntryRef &I,
86       iterator_range<imported_symbol_iterator> Range);
87
88   typedef DenseMap<const coff_section*, std::vector<RelocationRef> > RelocMapTy;
89
90   const llvm::object::COFFObjectFile *Obj;
91   RelocMapTy RelocMap;
92   StringRef CVFileIndexToStringOffsetTable;
93   StringRef CVStringTable;
94 };
95
96 } // namespace
97
98
99 namespace llvm {
100
101 std::error_code createCOFFDumper(const object::ObjectFile *Obj,
102                                  StreamWriter &Writer,
103                                  std::unique_ptr<ObjDumper> &Result) {
104   const COFFObjectFile *COFFObj = dyn_cast<COFFObjectFile>(Obj);
105   if (!COFFObj)
106     return readobj_error::unsupported_obj_file_format;
107
108   Result.reset(new COFFDumper(COFFObj, Writer));
109   return readobj_error::success;
110 }
111
112 } // namespace llvm
113
114 // Given a a section and an offset into this section the function returns the
115 // symbol used for the relocation at the offset.
116 std::error_code COFFDumper::resolveSymbol(const coff_section *Section,
117                                           uint64_t Offset, SymbolRef &Sym) {
118   const auto &Relocations = RelocMap[Section];
119   for (const auto &Relocation : Relocations) {
120     uint64_t RelocationOffset;
121     if (std::error_code EC = Relocation.getOffset(RelocationOffset))
122       return EC;
123
124     if (RelocationOffset == Offset) {
125       Sym = *Relocation.getSymbol();
126       return readobj_error::success;
127     }
128   }
129   return readobj_error::unknown_symbol;
130 }
131
132 // Given a section and an offset into this section the function returns the name
133 // of the symbol used for the relocation at the offset.
134 std::error_code COFFDumper::resolveSymbolName(const coff_section *Section,
135                                               uint64_t Offset,
136                                               StringRef &Name) {
137   SymbolRef Symbol;
138   if (std::error_code EC = resolveSymbol(Section, Offset, Symbol))
139     return EC;
140   if (std::error_code EC = Symbol.getName(Name))
141     return EC;
142   return object_error::success;
143 }
144
145 static const EnumEntry<COFF::MachineTypes> ImageFileMachineType[] = {
146   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_MACHINE_UNKNOWN  ),
147   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_MACHINE_AM33     ),
148   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_MACHINE_AMD64    ),
149   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_MACHINE_ARM      ),
150   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_MACHINE_ARMNT    ),
151   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_MACHINE_EBC      ),
152   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_MACHINE_I386     ),
153   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_MACHINE_IA64     ),
154   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_MACHINE_M32R     ),
155   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_MACHINE_MIPS16   ),
156   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_MACHINE_MIPSFPU  ),
157   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_MACHINE_MIPSFPU16),
158   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_MACHINE_POWERPC  ),
159   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_MACHINE_POWERPCFP),
160   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_MACHINE_R4000    ),
161   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_MACHINE_SH3      ),
162   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_MACHINE_SH3DSP   ),
163   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_MACHINE_SH4      ),
164   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_MACHINE_SH5      ),
165   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_MACHINE_THUMB    ),
166   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_MACHINE_WCEMIPSV2)
167 };
168
169 static const EnumEntry<COFF::Characteristics> ImageFileCharacteristics[] = {
170   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_RELOCS_STRIPPED        ),
171   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_EXECUTABLE_IMAGE       ),
172   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_LINE_NUMS_STRIPPED     ),
173   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_LOCAL_SYMS_STRIPPED    ),
174   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_AGGRESSIVE_WS_TRIM     ),
175   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_LARGE_ADDRESS_AWARE    ),
176   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_BYTES_REVERSED_LO      ),
177   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_32BIT_MACHINE          ),
178   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_DEBUG_STRIPPED         ),
179   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_REMOVABLE_RUN_FROM_SWAP),
180   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_NET_RUN_FROM_SWAP      ),
181   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_SYSTEM                 ),
182   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_DLL                    ),
183   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_UP_SYSTEM_ONLY         ),
184   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_FILE_BYTES_REVERSED_HI      )
185 };
186
187 static const EnumEntry<COFF::WindowsSubsystem> PEWindowsSubsystem[] = {
188   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SUBSYSTEM_UNKNOWN                ),
189   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SUBSYSTEM_NATIVE                 ),
190   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SUBSYSTEM_WINDOWS_GUI            ),
191   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SUBSYSTEM_WINDOWS_CUI            ),
192   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SUBSYSTEM_POSIX_CUI              ),
193   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SUBSYSTEM_WINDOWS_CE_GUI         ),
194   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SUBSYSTEM_EFI_APPLICATION        ),
195   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SUBSYSTEM_EFI_BOOT_SERVICE_DRIVER),
196   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SUBSYSTEM_EFI_RUNTIME_DRIVER     ),
197   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SUBSYSTEM_EFI_ROM                ),
198   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SUBSYSTEM_XBOX                   ),
199 };
200
201 static const EnumEntry<COFF::DLLCharacteristics> PEDLLCharacteristics[] = {
202   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_DLL_CHARACTERISTICS_HIGH_ENTROPY_VA      ),
203   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_DLL_CHARACTERISTICS_DYNAMIC_BASE         ),
204   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_DLL_CHARACTERISTICS_FORCE_INTEGRITY      ),
205   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_DLL_CHARACTERISTICS_NX_COMPAT            ),
206   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_DLL_CHARACTERISTICS_NO_ISOLATION         ),
207   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_DLL_CHARACTERISTICS_NO_SEH               ),
208   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_DLL_CHARACTERISTICS_NO_BIND              ),
209   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_DLL_CHARACTERISTICS_APPCONTAINER         ),
210   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_DLL_CHARACTERISTICS_WDM_DRIVER           ),
211   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_DLL_CHARACTERISTICS_GUARD_CF             ),
212   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_DLL_CHARACTERISTICS_TERMINAL_SERVER_AWARE),
213 };
214
215 static const EnumEntry<COFF::SectionCharacteristics>
216 ImageSectionCharacteristics[] = {
217   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_TYPE_NO_PAD           ),
218   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_CNT_CODE              ),
219   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_CNT_INITIALIZED_DATA  ),
220   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_CNT_UNINITIALIZED_DATA),
221   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_LNK_OTHER             ),
222   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_LNK_INFO              ),
223   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_LNK_REMOVE            ),
224   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_LNK_COMDAT            ),
225   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_GPREL                 ),
226   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_MEM_PURGEABLE         ),
227   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_MEM_16BIT             ),
228   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_MEM_LOCKED            ),
229   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_MEM_PRELOAD           ),
230   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_ALIGN_1BYTES          ),
231   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_ALIGN_2BYTES          ),
232   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_ALIGN_4BYTES          ),
233   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_ALIGN_8BYTES          ),
234   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_ALIGN_16BYTES         ),
235   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_ALIGN_32BYTES         ),
236   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_ALIGN_64BYTES         ),
237   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_ALIGN_128BYTES        ),
238   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_ALIGN_256BYTES        ),
239   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_ALIGN_512BYTES        ),
240   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_ALIGN_1024BYTES       ),
241   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_ALIGN_2048BYTES       ),
242   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_ALIGN_4096BYTES       ),
243   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_ALIGN_8192BYTES       ),
244   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_LNK_NRELOC_OVFL       ),
245   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_MEM_DISCARDABLE       ),
246   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_MEM_NOT_CACHED        ),
247   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_MEM_NOT_PAGED         ),
248   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_MEM_SHARED            ),
249   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_MEM_EXECUTE           ),
250   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_MEM_READ              ),
251   LLVM_READOBJ_ENUM_ENT(COFF, IMAGE_SCN_MEM_WRITE             )
252 };
253
254 static const EnumEntry<COFF::SymbolBaseType> ImageSymType[] = {
255   { "Null"  , COFF::IMAGE_SYM_TYPE_NULL   },
256   { "Void"  , COFF::IMAGE_SYM_TYPE_VOID   },
257   { "Char"  , COFF::IMAGE_SYM_TYPE_CHAR   },
258   { "Short" , COFF::IMAGE_SYM_TYPE_SHORT  },
259   { "Int"   , COFF::IMAGE_SYM_TYPE_INT    },
260   { "Long"  , COFF::IMAGE_SYM_TYPE_LONG   },
261   { "Float" , COFF::IMAGE_SYM_TYPE_FLOAT  },
262   { "Double", COFF::IMAGE_SYM_TYPE_DOUBLE },
263   { "Struct", COFF::IMAGE_SYM_TYPE_STRUCT },
264   { "Union" , COFF::IMAGE_SYM_TYPE_UNION  },
265   { "Enum"  , COFF::IMAGE_SYM_TYPE_ENUM   },
266   { "MOE"   , COFF::IMAGE_SYM_TYPE_MOE    },
267   { "Byte"  , COFF::IMAGE_SYM_TYPE_BYTE   },
268   { "Word"  , COFF::IMAGE_SYM_TYPE_WORD   },
269   { "UInt"  , COFF::IMAGE_SYM_TYPE_UINT   },
270   { "DWord" , COFF::IMAGE_SYM_TYPE_DWORD  }
271 };
272
273 static const EnumEntry<COFF::SymbolComplexType> ImageSymDType[] = {
274   { "Null"    , COFF::IMAGE_SYM_DTYPE_NULL     },
275   { "Pointer" , COFF::IMAGE_SYM_DTYPE_POINTER  },
276   { "Function", COFF::IMAGE_SYM_DTYPE_FUNCTION },
277   { "Array"   , COFF::IMAGE_SYM_DTYPE_ARRAY    }
278 };
279
280 static const EnumEntry<COFF::SymbolStorageClass> ImageSymClass[] = {
281   { "EndOfFunction"  , COFF::IMAGE_SYM_CLASS_END_OF_FUNCTION  },
282   { "Null"           , COFF::IMAGE_SYM_CLASS_NULL             },
283   { "Automatic"      , COFF::IMAGE_SYM_CLASS_AUTOMATIC        },
284   { "External"       , COFF::IMAGE_SYM_CLASS_EXTERNAL         },
285   { "Static"         , COFF::IMAGE_SYM_CLASS_STATIC           },
286   { "Register"       , COFF::IMAGE_SYM_CLASS_REGISTER         },
287   { "ExternalDef"    , COFF::IMAGE_SYM_CLASS_EXTERNAL_DEF     },
288   { "Label"          , COFF::IMAGE_SYM_CLASS_LABEL            },
289   { "UndefinedLabel" , COFF::IMAGE_SYM_CLASS_UNDEFINED_LABEL  },
290   { "MemberOfStruct" , COFF::IMAGE_SYM_CLASS_MEMBER_OF_STRUCT },
291   { "Argument"       , COFF::IMAGE_SYM_CLASS_ARGUMENT         },
292   { "StructTag"      , COFF::IMAGE_SYM_CLASS_STRUCT_TAG       },
293   { "MemberOfUnion"  , COFF::IMAGE_SYM_CLASS_MEMBER_OF_UNION  },
294   { "UnionTag"       , COFF::IMAGE_SYM_CLASS_UNION_TAG        },
295   { "TypeDefinition" , COFF::IMAGE_SYM_CLASS_TYPE_DEFINITION  },
296   { "UndefinedStatic", COFF::IMAGE_SYM_CLASS_UNDEFINED_STATIC },
297   { "EnumTag"        , COFF::IMAGE_SYM_CLASS_ENUM_TAG         },
298   { "MemberOfEnum"   , COFF::IMAGE_SYM_CLASS_MEMBER_OF_ENUM   },
299   { "RegisterParam"  , COFF::IMAGE_SYM_CLASS_REGISTER_PARAM   },
300   { "BitField"       , COFF::IMAGE_SYM_CLASS_BIT_FIELD        },
301   { "Block"          , COFF::IMAGE_SYM_CLASS_BLOCK            },
302   { "Function"       , COFF::IMAGE_SYM_CLASS_FUNCTION         },
303   { "EndOfStruct"    , COFF::IMAGE_SYM_CLASS_END_OF_STRUCT    },
304   { "File"           , COFF::IMAGE_SYM_CLASS_FILE             },
305   { "Section"        , COFF::IMAGE_SYM_CLASS_SECTION          },
306   { "WeakExternal"   , COFF::IMAGE_SYM_CLASS_WEAK_EXTERNAL    },
307   { "CLRToken"       , COFF::IMAGE_SYM_CLASS_CLR_TOKEN        }
308 };
309
310 static const EnumEntry<COFF::COMDATType> ImageCOMDATSelect[] = {
311   { "NoDuplicates", COFF::IMAGE_COMDAT_SELECT_NODUPLICATES },
312   { "Any"         , COFF::IMAGE_COMDAT_SELECT_ANY          },
313   { "SameSize"    , COFF::IMAGE_COMDAT_SELECT_SAME_SIZE    },
314   { "ExactMatch"  , COFF::IMAGE_COMDAT_SELECT_EXACT_MATCH  },
315   { "Associative" , COFF::IMAGE_COMDAT_SELECT_ASSOCIATIVE  },
316   { "Largest"     , COFF::IMAGE_COMDAT_SELECT_LARGEST      },
317   { "Newest"      , COFF::IMAGE_COMDAT_SELECT_NEWEST       }
318 };
319
320 static const EnumEntry<COFF::WeakExternalCharacteristics>
321 WeakExternalCharacteristics[] = {
322   { "NoLibrary", COFF::IMAGE_WEAK_EXTERN_SEARCH_NOLIBRARY },
323   { "Library"  , COFF::IMAGE_WEAK_EXTERN_SEARCH_LIBRARY   },
324   { "Alias"    , COFF::IMAGE_WEAK_EXTERN_SEARCH_ALIAS     }
325 };
326
327 template <typename T>
328 static std::error_code getSymbolAuxData(const COFFObjectFile *Obj,
329                                         COFFSymbolRef Symbol,
330                                         uint8_t AuxSymbolIdx, const T *&Aux) {
331   ArrayRef<uint8_t> AuxData = Obj->getSymbolAuxData(Symbol);
332   AuxData = AuxData.slice(AuxSymbolIdx * Obj->getSymbolTableEntrySize());
333   Aux = reinterpret_cast<const T*>(AuxData.data());
334   return readobj_error::success;
335 }
336
337 void COFFDumper::cacheRelocations() {
338   for (const SectionRef &S : Obj->sections()) {
339     const coff_section *Section = Obj->getCOFFSection(S);
340
341     for (const RelocationRef &Reloc : S.relocations())
342       RelocMap[Section].push_back(Reloc);
343
344     // Sort relocations by address.
345     std::sort(RelocMap[Section].begin(), RelocMap[Section].end(),
346               relocAddressLess);
347   }
348 }
349
350 void COFFDumper::printDataDirectory(uint32_t Index, const std::string &FieldName) {
351   const data_directory *Data;
352   if (Obj->getDataDirectory(Index, Data))
353     return;
354   W.printHex(FieldName + "RVA", Data->RelativeVirtualAddress);
355   W.printHex(FieldName + "Size", Data->Size);
356 }
357
358 void COFFDumper::printFileHeaders() {
359   time_t TDS = Obj->getTimeDateStamp();
360   char FormattedTime[20] = { };
361   strftime(FormattedTime, 20, "%Y-%m-%d %H:%M:%S", gmtime(&TDS));
362
363   {
364     DictScope D(W, "ImageFileHeader");
365     W.printEnum  ("Machine", Obj->getMachine(),
366                     makeArrayRef(ImageFileMachineType));
367     W.printNumber("SectionCount", Obj->getNumberOfSections());
368     W.printHex   ("TimeDateStamp", FormattedTime, Obj->getTimeDateStamp());
369     W.printHex   ("PointerToSymbolTable", Obj->getPointerToSymbolTable());
370     W.printNumber("SymbolCount", Obj->getNumberOfSymbols());
371     W.printNumber("OptionalHeaderSize", Obj->getSizeOfOptionalHeader());
372     W.printFlags ("Characteristics", Obj->getCharacteristics(),
373                     makeArrayRef(ImageFileCharacteristics));
374   }
375
376   // Print PE header. This header does not exist if this is an object file and
377   // not an executable.
378   const pe32_header *PEHeader = nullptr;
379   if (error(Obj->getPE32Header(PEHeader)))
380     return;
381   if (PEHeader)
382     printPEHeader<pe32_header>(PEHeader);
383
384   const pe32plus_header *PEPlusHeader = nullptr;
385   if (error(Obj->getPE32PlusHeader(PEPlusHeader)))
386     return;
387   if (PEPlusHeader)
388     printPEHeader<pe32plus_header>(PEPlusHeader);
389
390   if (const dos_header *DH = Obj->getDOSHeader())
391     printDOSHeader(DH);
392 }
393
394 void COFFDumper::printDOSHeader(const dos_header *DH) {
395   DictScope D(W, "DOSHeader");
396   W.printString("Magic", StringRef(DH->Magic, sizeof(DH->Magic)));
397   W.printNumber("UsedBytesInTheLastPage", DH->UsedBytesInTheLastPage);
398   W.printNumber("FileSizeInPages", DH->FileSizeInPages);
399   W.printNumber("NumberOfRelocationItems", DH->NumberOfRelocationItems);
400   W.printNumber("HeaderSizeInParagraphs", DH->HeaderSizeInParagraphs);
401   W.printNumber("MinimumExtraParagraphs", DH->MinimumExtraParagraphs);
402   W.printNumber("MaximumExtraParagraphs", DH->MaximumExtraParagraphs);
403   W.printNumber("InitialRelativeSS", DH->InitialRelativeSS);
404   W.printNumber("InitialSP", DH->InitialSP);
405   W.printNumber("Checksum", DH->Checksum);
406   W.printNumber("InitialIP", DH->InitialIP);
407   W.printNumber("InitialRelativeCS", DH->InitialRelativeCS);
408   W.printNumber("AddressOfRelocationTable", DH->AddressOfRelocationTable);
409   W.printNumber("OverlayNumber", DH->OverlayNumber);
410   W.printNumber("OEMid", DH->OEMid);
411   W.printNumber("OEMinfo", DH->OEMinfo);
412   W.printNumber("AddressOfNewExeHeader", DH->AddressOfNewExeHeader);
413 }
414
415 template <class PEHeader>
416 void COFFDumper::printPEHeader(const PEHeader *Hdr) {
417   DictScope D(W, "ImageOptionalHeader");
418   W.printNumber("MajorLinkerVersion", Hdr->MajorLinkerVersion);
419   W.printNumber("MinorLinkerVersion", Hdr->MinorLinkerVersion);
420   W.printNumber("SizeOfCode", Hdr->SizeOfCode);
421   W.printNumber("SizeOfInitializedData", Hdr->SizeOfInitializedData);
422   W.printNumber("SizeOfUninitializedData", Hdr->SizeOfUninitializedData);
423   W.printHex   ("AddressOfEntryPoint", Hdr->AddressOfEntryPoint);
424   W.printHex   ("BaseOfCode", Hdr->BaseOfCode);
425   printBaseOfDataField(Hdr);
426   W.printHex   ("ImageBase", Hdr->ImageBase);
427   W.printNumber("SectionAlignment", Hdr->SectionAlignment);
428   W.printNumber("FileAlignment", Hdr->FileAlignment);
429   W.printNumber("MajorOperatingSystemVersion",
430                 Hdr->MajorOperatingSystemVersion);
431   W.printNumber("MinorOperatingSystemVersion",
432                 Hdr->MinorOperatingSystemVersion);
433   W.printNumber("MajorImageVersion", Hdr->MajorImageVersion);
434   W.printNumber("MinorImageVersion", Hdr->MinorImageVersion);
435   W.printNumber("MajorSubsystemVersion", Hdr->MajorSubsystemVersion);
436   W.printNumber("MinorSubsystemVersion", Hdr->MinorSubsystemVersion);
437   W.printNumber("SizeOfImage", Hdr->SizeOfImage);
438   W.printNumber("SizeOfHeaders", Hdr->SizeOfHeaders);
439   W.printEnum  ("Subsystem", Hdr->Subsystem, makeArrayRef(PEWindowsSubsystem));
440   W.printFlags ("Subsystem", Hdr->DLLCharacteristics,
441                 makeArrayRef(PEDLLCharacteristics));
442   W.printNumber("SizeOfStackReserve", Hdr->SizeOfStackReserve);
443   W.printNumber("SizeOfStackCommit", Hdr->SizeOfStackCommit);
444   W.printNumber("SizeOfHeapReserve", Hdr->SizeOfHeapReserve);
445   W.printNumber("SizeOfHeapCommit", Hdr->SizeOfHeapCommit);
446   W.printNumber("NumberOfRvaAndSize", Hdr->NumberOfRvaAndSize);
447
448   if (Hdr->NumberOfRvaAndSize > 0) {
449     DictScope D(W, "DataDirectory");
450     static const char * const directory[] = {
451       "ExportTable", "ImportTable", "ResourceTable", "ExceptionTable",
452       "CertificateTable", "BaseRelocationTable", "Debug", "Architecture",
453       "GlobalPtr", "TLSTable", "LoadConfigTable", "BoundImport", "IAT",
454       "DelayImportDescriptor", "CLRRuntimeHeader", "Reserved"
455     };
456
457     for (uint32_t i = 0; i < Hdr->NumberOfRvaAndSize; ++i) {
458       printDataDirectory(i, directory[i]);
459     }
460   }
461 }
462
463 void COFFDumper::printBaseOfDataField(const pe32_header *Hdr) {
464   W.printHex("BaseOfData", Hdr->BaseOfData);
465 }
466
467 void COFFDumper::printBaseOfDataField(const pe32plus_header *) {}
468
469 void COFFDumper::printCodeViewLineTables(const SectionRef &Section) {
470   StringRef Data;
471   if (error(Section.getContents(Data)))
472     return;
473
474   SmallVector<StringRef, 10> FunctionNames;
475   StringMap<StringRef> FunctionLineTables;
476
477   ListScope D(W, "CodeViewLineTables");
478   {
479     // FIXME: Add more offset correctness checks.
480     DataExtractor DE(Data, true, 4);
481     uint32_t Offset = 0,
482              Magic = DE.getU32(&Offset);
483     W.printHex("Magic", Magic);
484     if (Magic != COFF::DEBUG_SECTION_MAGIC) {
485       error(object_error::parse_failed);
486       return;
487     }
488
489     bool Finished = false;
490     while (DE.isValidOffset(Offset) && !Finished) {
491       // The section consists of a number of subsection in the following format:
492       // |Type|PayloadSize|Payload...|
493       uint32_t SubSectionType = DE.getU32(&Offset),
494                PayloadSize = DE.getU32(&Offset);
495       ListScope S(W, "Subsection");
496       W.printHex("Type", SubSectionType);
497       W.printHex("PayloadSize", PayloadSize);
498       if (PayloadSize > Data.size() - Offset) {
499         error(object_error::parse_failed);
500         return;
501       }
502
503       // Print the raw contents to simplify debugging if anything goes wrong
504       // afterwards.
505       StringRef Contents = Data.substr(Offset, PayloadSize);
506       W.printBinaryBlock("Contents", Contents);
507
508       switch (SubSectionType) {
509       case COFF::DEBUG_SYMBOL_SUBSECTION:
510         printCodeViewSymbolsSubsection(Contents, Section, Offset);
511         break;
512       case COFF::DEBUG_LINE_TABLE_SUBSECTION: {
513         // Holds a PC to file:line table.  Some data to parse this subsection is
514         // stored in the other subsections, so just check sanity and store the
515         // pointers for deferred processing.
516
517         if (PayloadSize < 12) {
518           // There should be at least three words to store two function
519           // relocations and size of the code.
520           error(object_error::parse_failed);
521           return;
522         }
523
524         StringRef FunctionName;
525         if (error(resolveSymbolName(Obj->getCOFFSection(Section), Offset,
526                                     FunctionName)))
527           return;
528         W.printString("FunctionName", FunctionName);
529         if (FunctionLineTables.count(FunctionName) != 0) {
530           // Saw debug info for this function already?
531           error(object_error::parse_failed);
532           return;
533         }
534
535         FunctionLineTables[FunctionName] = Contents;
536         FunctionNames.push_back(FunctionName);
537         break;
538       }
539       case COFF::DEBUG_STRING_TABLE_SUBSECTION:
540         if (PayloadSize == 0 || CVStringTable.data() != nullptr ||
541             Contents.back() != '\0') {
542           // Empty or duplicate or non-null-terminated subsection.
543           error(object_error::parse_failed);
544           return;
545         }
546         CVStringTable = Contents;
547         break;
548       case COFF::DEBUG_INDEX_SUBSECTION:
549         // Holds the translation table from file indices
550         // to offsets in the string table.
551
552         if (PayloadSize == 0 ||
553             CVFileIndexToStringOffsetTable.data() != nullptr) {
554           // Empty or duplicate subsection.
555           error(object_error::parse_failed);
556           return;
557         }
558         CVFileIndexToStringOffsetTable = Contents;
559         break;
560       }
561       Offset += PayloadSize;
562
563       // Align the reading pointer by 4.
564       Offset += (-Offset) % 4;
565     }
566   }
567
568   // Dump the line tables now that we've read all the subsections and know all
569   // the required information.
570   for (unsigned I = 0, E = FunctionNames.size(); I != E; ++I) {
571     StringRef Name = FunctionNames[I];
572     ListScope S(W, "FunctionLineTable");
573     W.printString("FunctionName", Name);
574
575     DataExtractor DE(FunctionLineTables[Name], true, 4);
576     uint32_t Offset = 8;  // Skip relocations.
577     uint32_t FunctionSize = DE.getU32(&Offset);
578     W.printHex("CodeSize", FunctionSize);
579     while (DE.isValidOffset(Offset)) {
580       // For each range of lines with the same filename, we have a segment
581       // in the line table.  The filename string is accessed using double
582       // indirection to the string table subsection using the index subsection.
583       uint32_t OffsetInIndex = DE.getU32(&Offset),
584                SegmentLength   = DE.getU32(&Offset),
585                FullSegmentSize = DE.getU32(&Offset);
586       if (FullSegmentSize != 12 + 8 * SegmentLength) {
587         error(object_error::parse_failed);
588         return;
589       }
590
591       uint32_t FilenameOffset;
592       {
593         DataExtractor SDE(CVFileIndexToStringOffsetTable, true, 4);
594         uint32_t OffsetInSDE = OffsetInIndex;
595         if (!SDE.isValidOffset(OffsetInSDE)) {
596           error(object_error::parse_failed);
597           return;
598         }
599         FilenameOffset = SDE.getU32(&OffsetInSDE);
600       }
601
602       if (FilenameOffset == 0 || FilenameOffset + 1 >= CVStringTable.size() ||
603           CVStringTable.data()[FilenameOffset - 1] != '\0') {
604         // Each string in an F3 subsection should be preceded by a null
605         // character.
606         error(object_error::parse_failed);
607         return;
608       }
609
610       StringRef Filename(CVStringTable.data() + FilenameOffset);
611       ListScope S(W, "FilenameSegment");
612       W.printString("Filename", Filename);
613       for (unsigned J = 0; J != SegmentLength && DE.isValidOffset(Offset);
614            ++J) {
615         // Then go the (PC, LineNumber) pairs.  The line number is stored in the
616         // least significant 31 bits of the respective word in the table.
617         uint32_t PC = DE.getU32(&Offset),
618                  LineNumber = DE.getU32(&Offset) & 0x7fffffff;
619         if (PC >= FunctionSize) {
620           error(object_error::parse_failed);
621           return;
622         }
623         char Buffer[32];
624         format("+0x%X", PC).snprint(Buffer, 32);
625         W.printNumber(Buffer, LineNumber);
626       }
627     }
628   }
629 }
630
631 void COFFDumper::printCodeViewSymbolsSubsection(StringRef Subsection,
632                                                 const SectionRef &Section,
633                                                 uint32_t OffsetInSection) {
634   if (Subsection.size() == 0) {
635     error(object_error::parse_failed);
636     return;
637   }
638   DataExtractor DE(Subsection, true, 4);
639   uint32_t Offset = 0;
640
641   // Function-level subsections have "procedure start" and "procedure end"
642   // commands that should come in pairs and surround relevant info.
643   bool InFunctionScope = false;
644   while (DE.isValidOffset(Offset)) {
645     // Read subsection segments one by one.
646     uint16_t Size = DE.getU16(&Offset);
647     // The section size includes the size of the type identifier.
648     if (Size < 2 || !DE.isValidOffsetForDataOfSize(Offset, Size)) {
649       error(object_error::parse_failed);
650       return;
651     }
652     Size -= 2;
653     uint16_t Type = DE.getU16(&Offset);
654     switch (Type) {
655     case COFF::DEBUG_SYMBOL_TYPE_PROC_START: {
656       DictScope S(W, "ProcStart");
657       if (InFunctionScope || Size < 36) {
658         error(object_error::parse_failed);
659         return;
660       }
661       InFunctionScope = true;
662
663       // We're currently interested in a limited subset of fields in this
664       // segment, just ignore the rest of the fields for now.
665       uint8_t Unused[12];
666       DE.getU8(&Offset, Unused, 12);
667       uint32_t CodeSize = DE.getU32(&Offset);
668       DE.getU8(&Offset, Unused, 12);
669       StringRef SectionName;
670       if (error(resolveSymbolName(Obj->getCOFFSection(Section),
671                                   OffsetInSection + Offset, SectionName)))
672         return;
673       Offset += 4;
674       DE.getU8(&Offset, Unused, 3);
675       StringRef DisplayName = DE.getCStr(&Offset);
676       if (!DE.isValidOffset(Offset)) {
677         error(object_error::parse_failed);
678         return;
679       }
680       W.printString("DisplayName", DisplayName);
681       W.printString("Section", SectionName);
682       W.printHex("CodeSize", CodeSize);
683
684       break;
685     }
686     case COFF::DEBUG_SYMBOL_TYPE_PROC_END: {
687       W.startLine() << "ProcEnd\n";
688       if (!InFunctionScope || Size > 0) {
689         error(object_error::parse_failed);
690         return;
691       }
692       InFunctionScope = false;
693       break;
694     }
695     default:
696       Offset += Size;
697       break;
698     }
699   }
700
701   if (InFunctionScope)
702     error(object_error::parse_failed);
703 }
704
705 void COFFDumper::printSections() {
706   ListScope SectionsD(W, "Sections");
707   int SectionNumber = 0;
708   for (const SectionRef &Sec : Obj->sections()) {
709     ++SectionNumber;
710     const coff_section *Section = Obj->getCOFFSection(Sec);
711
712     StringRef Name;
713     if (error(Sec.getName(Name)))
714       Name = "";
715
716     DictScope D(W, "Section");
717     W.printNumber("Number", SectionNumber);
718     W.printBinary("Name", Name, Section->Name);
719     W.printHex   ("VirtualSize", Section->VirtualSize);
720     W.printHex   ("VirtualAddress", Section->VirtualAddress);
721     W.printNumber("RawDataSize", Section->SizeOfRawData);
722     W.printHex   ("PointerToRawData", Section->PointerToRawData);
723     W.printHex   ("PointerToRelocations", Section->PointerToRelocations);
724     W.printHex   ("PointerToLineNumbers", Section->PointerToLinenumbers);
725     W.printNumber("RelocationCount", Section->NumberOfRelocations);
726     W.printNumber("LineNumberCount", Section->NumberOfLinenumbers);
727     W.printFlags ("Characteristics", Section->Characteristics,
728                     makeArrayRef(ImageSectionCharacteristics),
729                     COFF::SectionCharacteristics(0x00F00000));
730
731     if (opts::SectionRelocations) {
732       ListScope D(W, "Relocations");
733       for (const RelocationRef &Reloc : Sec.relocations())
734         printRelocation(Sec, Reloc);
735     }
736
737     if (opts::SectionSymbols) {
738       ListScope D(W, "Symbols");
739       for (const SymbolRef &Symbol : Obj->symbols()) {
740         if (!Sec.containsSymbol(Symbol))
741           continue;
742
743         printSymbol(Symbol);
744       }
745     }
746
747     if (Name == ".debug$S" && opts::CodeViewLineTables)
748       printCodeViewLineTables(Sec);
749
750     if (opts::SectionData &&
751         !(Section->Characteristics & COFF::IMAGE_SCN_CNT_UNINITIALIZED_DATA)) {
752       StringRef Data;
753       if (error(Sec.getContents(Data)))
754         break;
755
756       W.printBinaryBlock("SectionData", Data);
757     }
758   }
759 }
760
761 void COFFDumper::printRelocations() {
762   ListScope D(W, "Relocations");
763
764   int SectionNumber = 0;
765   for (const SectionRef &Section : Obj->sections()) {
766     ++SectionNumber;
767     StringRef Name;
768     if (error(Section.getName(Name)))
769       continue;
770
771     bool PrintedGroup = false;
772     for (const RelocationRef &Reloc : Section.relocations()) {
773       if (!PrintedGroup) {
774         W.startLine() << "Section (" << SectionNumber << ") " << Name << " {\n";
775         W.indent();
776         PrintedGroup = true;
777       }
778
779       printRelocation(Section, Reloc);
780     }
781
782     if (PrintedGroup) {
783       W.unindent();
784       W.startLine() << "}\n";
785     }
786   }
787 }
788
789 void COFFDumper::printRelocation(const SectionRef &Section,
790                                  const RelocationRef &Reloc) {
791   uint64_t Offset;
792   uint64_t RelocType;
793   SmallString<32> RelocName;
794   StringRef SymbolName;
795   StringRef Contents;
796   if (error(Reloc.getOffset(Offset)))
797     return;
798   if (error(Reloc.getType(RelocType)))
799     return;
800   if (error(Reloc.getTypeName(RelocName)))
801     return;
802   symbol_iterator Symbol = Reloc.getSymbol();
803   if (error(Symbol->getName(SymbolName)))
804     return;
805   if (error(Section.getContents(Contents)))
806     return;
807
808   if (opts::ExpandRelocs) {
809     DictScope Group(W, "Relocation");
810     W.printHex("Offset", Offset);
811     W.printNumber("Type", RelocName, RelocType);
812     W.printString("Symbol", SymbolName.size() > 0 ? SymbolName : "-");
813   } else {
814     raw_ostream& OS = W.startLine();
815     OS << W.hex(Offset)
816        << " " << RelocName
817        << " " << (SymbolName.size() > 0 ? SymbolName : "-")
818        << "\n";
819   }
820 }
821
822 void COFFDumper::printSymbols() {
823   ListScope Group(W, "Symbols");
824
825   for (const SymbolRef &Symbol : Obj->symbols())
826     printSymbol(Symbol);
827 }
828
829 void COFFDumper::printDynamicSymbols() { ListScope Group(W, "DynamicSymbols"); }
830
831 static StringRef getSectionName(const llvm::object::COFFObjectFile *Obj,
832                                 COFFSymbolRef Symbol,
833                                 const coff_section *Section) {
834   if (Section) {
835     StringRef SectionName;
836     Obj->getSectionName(Section, SectionName);
837     return SectionName;
838   }
839   int32_t SectionNumber = Symbol.getSectionNumber();
840   if (SectionNumber == llvm::COFF::IMAGE_SYM_DEBUG)
841     return "IMAGE_SYM_DEBUG";
842   if (SectionNumber == llvm::COFF::IMAGE_SYM_ABSOLUTE)
843     return "IMAGE_SYM_ABSOLUTE";
844   if (SectionNumber == llvm::COFF::IMAGE_SYM_UNDEFINED)
845     return "IMAGE_SYM_UNDEFINED";
846   return "";
847 }
848
849 void COFFDumper::printSymbol(const SymbolRef &Sym) {
850   DictScope D(W, "Symbol");
851
852   COFFSymbolRef Symbol = Obj->getCOFFSymbol(Sym);
853   const coff_section *Section;
854   if (std::error_code EC = Obj->getSection(Symbol.getSectionNumber(), Section)) {
855     W.startLine() << "Invalid section number: " << EC.message() << "\n";
856     W.flush();
857     return;
858   }
859
860   StringRef SymbolName;
861   if (Obj->getSymbolName(Symbol, SymbolName))
862     SymbolName = "";
863
864   StringRef SectionName = getSectionName(Obj, Symbol, Section);
865
866   W.printString("Name", SymbolName);
867   W.printNumber("Value", Symbol.getValue());
868   W.printNumber("Section", SectionName, Symbol.getSectionNumber());
869   W.printEnum  ("BaseType", Symbol.getBaseType(), makeArrayRef(ImageSymType));
870   W.printEnum  ("ComplexType", Symbol.getComplexType(),
871                                                    makeArrayRef(ImageSymDType));
872   W.printEnum  ("StorageClass", Symbol.getStorageClass(),
873                                                    makeArrayRef(ImageSymClass));
874   W.printNumber("AuxSymbolCount", Symbol.getNumberOfAuxSymbols());
875
876   for (uint8_t I = 0; I < Symbol.getNumberOfAuxSymbols(); ++I) {
877     if (Symbol.isFunctionDefinition()) {
878       const coff_aux_function_definition *Aux;
879       if (error(getSymbolAuxData(Obj, Symbol, I, Aux)))
880         break;
881
882       DictScope AS(W, "AuxFunctionDef");
883       W.printNumber("TagIndex", Aux->TagIndex);
884       W.printNumber("TotalSize", Aux->TotalSize);
885       W.printHex("PointerToLineNumber", Aux->PointerToLinenumber);
886       W.printHex("PointerToNextFunction", Aux->PointerToNextFunction);
887
888     } else if (Symbol.isAnyUndefined()) {
889       const coff_aux_weak_external *Aux;
890       if (error(getSymbolAuxData(Obj, Symbol, I, Aux)))
891         break;
892
893       ErrorOr<COFFSymbolRef> Linked = Obj->getSymbol(Aux->TagIndex);
894       StringRef LinkedName;
895       std::error_code EC = Linked.getError();
896       if (EC || (EC = Obj->getSymbolName(*Linked, LinkedName))) {
897         LinkedName = "";
898         error(EC);
899       }
900
901       DictScope AS(W, "AuxWeakExternal");
902       W.printNumber("Linked", LinkedName, Aux->TagIndex);
903       W.printEnum  ("Search", Aux->Characteristics,
904                     makeArrayRef(WeakExternalCharacteristics));
905
906     } else if (Symbol.isFileRecord()) {
907       const char *FileName;
908       if (error(getSymbolAuxData(Obj, Symbol, I, FileName)))
909         break;
910
911       DictScope AS(W, "AuxFileRecord");
912
913       StringRef Name(FileName, Symbol.getNumberOfAuxSymbols() *
914                                    Obj->getSymbolTableEntrySize());
915       W.printString("FileName", Name.rtrim(StringRef("\0", 1)));
916       break;
917     } else if (Symbol.isSectionDefinition()) {
918       const coff_aux_section_definition *Aux;
919       if (error(getSymbolAuxData(Obj, Symbol, I, Aux)))
920         break;
921
922       int32_t AuxNumber = Aux->getNumber(Symbol.isBigObj());
923
924       DictScope AS(W, "AuxSectionDef");
925       W.printNumber("Length", Aux->Length);
926       W.printNumber("RelocationCount", Aux->NumberOfRelocations);
927       W.printNumber("LineNumberCount", Aux->NumberOfLinenumbers);
928       W.printHex("Checksum", Aux->CheckSum);
929       W.printNumber("Number", AuxNumber);
930       W.printEnum("Selection", Aux->Selection, makeArrayRef(ImageCOMDATSelect));
931
932       if (Section && Section->Characteristics & COFF::IMAGE_SCN_LNK_COMDAT
933           && Aux->Selection == COFF::IMAGE_COMDAT_SELECT_ASSOCIATIVE) {
934         const coff_section *Assoc;
935         StringRef AssocName;
936         std::error_code EC;
937         if ((EC = Obj->getSection(AuxNumber, Assoc)) ||
938             (EC = Obj->getSectionName(Assoc, AssocName))) {
939           AssocName = "";
940           error(EC);
941         }
942
943         W.printNumber("AssocSection", AssocName, AuxNumber);
944       }
945     } else if (Symbol.isCLRToken()) {
946       const coff_aux_clr_token *Aux;
947       if (error(getSymbolAuxData(Obj, Symbol, I, Aux)))
948         break;
949
950       ErrorOr<COFFSymbolRef> ReferredSym =
951           Obj->getSymbol(Aux->SymbolTableIndex);
952       StringRef ReferredName;
953       std::error_code EC = ReferredSym.getError();
954       if (EC || (EC = Obj->getSymbolName(*ReferredSym, ReferredName))) {
955         ReferredName = "";
956         error(EC);
957       }
958
959       DictScope AS(W, "AuxCLRToken");
960       W.printNumber("AuxType", Aux->AuxType);
961       W.printNumber("Reserved", Aux->Reserved);
962       W.printNumber("SymbolTableIndex", ReferredName, Aux->SymbolTableIndex);
963
964     } else {
965       W.startLine() << "<unhandled auxiliary record>\n";
966     }
967   }
968 }
969
970 void COFFDumper::printUnwindInfo() {
971   ListScope D(W, "UnwindInformation");
972   switch (Obj->getMachine()) {
973   case COFF::IMAGE_FILE_MACHINE_AMD64: {
974     Win64EH::Dumper Dumper(W);
975     Win64EH::Dumper::SymbolResolver
976     Resolver = [](const object::coff_section *Section, uint64_t Offset,
977                   SymbolRef &Symbol, void *user_data) -> std::error_code {
978       COFFDumper *Dumper = reinterpret_cast<COFFDumper *>(user_data);
979       return Dumper->resolveSymbol(Section, Offset, Symbol);
980     };
981     Win64EH::Dumper::Context Ctx(*Obj, Resolver, this);
982     Dumper.printData(Ctx);
983     break;
984   }
985   case COFF::IMAGE_FILE_MACHINE_ARMNT: {
986     ARM::WinEH::Decoder Decoder(W);
987     Decoder.dumpProcedureData(*Obj);
988     break;
989   }
990   default:
991     W.printEnum("unsupported Image Machine", Obj->getMachine(),
992                 makeArrayRef(ImageFileMachineType));
993     break;
994   }
995 }
996
997 void COFFDumper::printImportedSymbols(
998     iterator_range<imported_symbol_iterator> Range) {
999   for (const ImportedSymbolRef &I : Range) {
1000     StringRef Sym;
1001     if (error(I.getSymbolName(Sym))) return;
1002     uint16_t Ordinal;
1003     if (error(I.getOrdinal(Ordinal))) return;
1004     W.printNumber("Symbol", Sym, Ordinal);
1005   }
1006 }
1007
1008 void COFFDumper::printDelayImportedSymbols(
1009     const DelayImportDirectoryEntryRef &I,
1010     iterator_range<imported_symbol_iterator> Range) {
1011   int Index = 0;
1012   for (const ImportedSymbolRef &S : Range) {
1013     DictScope Import(W, "Import");
1014     StringRef Sym;
1015     if (error(S.getSymbolName(Sym))) return;
1016     uint16_t Ordinal;
1017     if (error(S.getOrdinal(Ordinal))) return;
1018     W.printNumber("Symbol", Sym, Ordinal);
1019     uint64_t Addr;
1020     if (error(I.getImportAddress(Index++, Addr))) return;
1021     W.printHex("Address", Addr);
1022   }
1023 }
1024
1025 void COFFDumper::printCOFFImports() {
1026   // Regular imports
1027   for (const ImportDirectoryEntryRef &I : Obj->import_directories()) {
1028     DictScope Import(W, "Import");
1029     StringRef Name;
1030     if (error(I.getName(Name))) return;
1031     W.printString("Name", Name);
1032     uint32_t Addr;
1033     if (error(I.getImportLookupTableRVA(Addr))) return;
1034     W.printHex("ImportLookupTableRVA", Addr);
1035     if (error(I.getImportAddressTableRVA(Addr))) return;
1036     W.printHex("ImportAddressTableRVA", Addr);
1037     printImportedSymbols(I.imported_symbols());
1038   }
1039
1040   // Delay imports
1041   for (const DelayImportDirectoryEntryRef &I : Obj->delay_import_directories()) {
1042     DictScope Import(W, "DelayImport");
1043     StringRef Name;
1044     if (error(I.getName(Name))) return;
1045     W.printString("Name", Name);
1046     const delay_import_directory_table_entry *Table;
1047     if (error(I.getDelayImportTable(Table))) return;
1048     W.printHex("Attributes", Table->Attributes);
1049     W.printHex("ModuleHandle", Table->ModuleHandle);
1050     W.printHex("ImportAddressTable", Table->DelayImportAddressTable);
1051     W.printHex("ImportNameTable", Table->DelayImportNameTable);
1052     W.printHex("BoundDelayImportTable", Table->BoundDelayImportTable);
1053     W.printHex("UnloadDelayImportTable", Table->UnloadDelayImportTable);
1054     printDelayImportedSymbols(I, I.imported_symbols());
1055   }
1056 }
1057
1058 void COFFDumper::printCOFFDirectives() {
1059   for (const SectionRef &Section : Obj->sections()) {
1060     StringRef Contents;
1061     StringRef Name;
1062
1063     if (error(Section.getName(Name)))
1064       continue;
1065     if (Name != ".drectve")
1066       continue;
1067
1068     if (error(Section.getContents(Contents)))
1069       return;
1070
1071     W.printString("Directive(s)", Contents);
1072   }
1073 }