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