mirror of
https://github.com/c64scene-ar/llvm-6502.git
synced 2024-12-14 11:32:34 +00:00
3ddcc49650
Add a brief explanation of the data section layout for the unwind data that the Windows on ARM EH models. This is simply to provide a rough idea of the layout of the code involved in the decoding of the unwinding. Details on the involved data structures are available in the associated support header. The bulk of it is related to printing out the byte-code to help validate generation of WoA EH. No functional change. git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@210397 91177308-0d34-0410-b5e6-96231b3b80d8
747 lines
26 KiB
C++
747 lines
26 KiB
C++
//===-- ARMWinEHPrinter.cpp - Windows on ARM EH Data Printer ----*- C++ -*-===//
|
|
//
|
|
// The LLVM Compiler Infrastructure
|
|
//
|
|
// This file is distributed under the University of Illinois Open Source
|
|
// License. See LICENSE.TXT for details.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
// Windows on ARM uses a series of serialised data structures (RuntimeFunction)
|
|
// to create a table of information for unwinding. In order to conserve space,
|
|
// there are two different ways that this data is represented.
|
|
//
|
|
// For functions with canonical forms for the prologue and epilogue, the data
|
|
// can be stored in a "packed" form. In this case, the data is packed into the
|
|
// RuntimeFunction's remaining 30-bits and can fully describe the entire frame.
|
|
//
|
|
// +---------------------------------------+
|
|
// | Function Entry Address |
|
|
// +---------------------------------------+
|
|
// | Packed Form Data |
|
|
// +---------------------------------------+
|
|
//
|
|
// This layout is parsed by Decoder::dumpPackedEntry. No unwind bytecode is
|
|
// associated with such a frame as they can be derived from the provided data.
|
|
// The decoder does not synthesize this data as it is unnecessary for the
|
|
// purposes of validation, with the synthesis being required only by a proper
|
|
// unwinder.
|
|
//
|
|
// For functions that are large or do not match canonical forms, the data is
|
|
// split up into two portions, with the actual data residing in the "exception
|
|
// data" table (.xdata) with a reference to the entry from the "procedure data"
|
|
// (.pdata) entry.
|
|
//
|
|
// The exception data contains information about the frame setup, all of the
|
|
// epilouge scopes (for functions for which there are multiple exit points) and
|
|
// the associated exception handler. Additionally, the entry contains byte-code
|
|
// describing how to unwind the function (c.f. Decoder::decodeOpcodes).
|
|
//
|
|
// +---------------------------------------+
|
|
// | Function Entry Address |
|
|
// +---------------------------------------+
|
|
// | Exception Data Entry Address |
|
|
// +---------------------------------------+
|
|
//
|
|
// This layout is parsed by Decoder::dumpUnpackedEntry. Such an entry must
|
|
// first resolve the exception data entry address. This structure
|
|
// (ExceptionDataRecord) has a variable sized header
|
|
// (c.f. ARM::WinEH::HeaderWords) and encodes most of the same information as
|
|
// the packed form. However, because this information is insufficient to
|
|
// synthesize the unwinding, there are associated unwinding bytecode which make
|
|
// up the bulk of the Decoder.
|
|
//
|
|
// The decoder itself is table-driven, using the first byte to determine the
|
|
// opcode and dispatching to the associated printing routine. The bytecode
|
|
// itself is a variable length instruction encoding that can fully describe the
|
|
// state of the stack and the necessary operations for unwinding to the
|
|
// beginning of the frame.
|
|
//
|
|
// The byte-code maintains a 1-1 instruction mapping, indicating both the width
|
|
// of the instruction (Thumb2 instructions are variable length, 16 or 32 bits
|
|
// wide) allowing the program to unwind from any point in the prologue, body, or
|
|
// epilogue of the function.
|
|
|
|
#include "ARMWinEHPrinter.h"
|
|
#include "Error.h"
|
|
#include "llvm/ADT/StringExtras.h"
|
|
#include "llvm/ADT/STLExtras.h"
|
|
#include "llvm/Support/ARMWinEH.h"
|
|
#include "llvm/Support/Format.h"
|
|
|
|
using namespace llvm;
|
|
using namespace llvm::object;
|
|
using namespace llvm::support;
|
|
|
|
namespace llvm {
|
|
raw_ostream &operator<<(raw_ostream &OS, const ARM::WinEH::ReturnType &RT) {
|
|
switch (RT) {
|
|
case ARM::WinEH::ReturnType::RT_POP:
|
|
OS << "pop {pc}";
|
|
break;
|
|
case ARM::WinEH::ReturnType::RT_B:
|
|
OS << "b target";
|
|
break;
|
|
case ARM::WinEH::ReturnType::RT_BW:
|
|
OS << "b.w target";
|
|
break;
|
|
case ARM::WinEH::ReturnType::RT_NoEpilogue:
|
|
OS << "(no epilogue)";
|
|
break;
|
|
}
|
|
return OS;
|
|
}
|
|
}
|
|
|
|
static std::string formatSymbol(StringRef Name, uint64_t Address,
|
|
uint64_t Offset = 0) {
|
|
std::string Buffer;
|
|
raw_string_ostream OS(Buffer);
|
|
|
|
if (!Name.empty())
|
|
OS << Name << " ";
|
|
|
|
if (Offset)
|
|
OS << format("+0x%X (0x%" PRIX64 ")", Offset, Address);
|
|
else if (!Name.empty())
|
|
OS << format("(0x%" PRIX64 ")", Address);
|
|
else
|
|
OS << format("0x%" PRIX64, Address);
|
|
|
|
return OS.str();
|
|
}
|
|
|
|
namespace llvm {
|
|
namespace ARM {
|
|
namespace WinEH {
|
|
const size_t Decoder::PDataEntrySize = sizeof(RuntimeFunction);
|
|
|
|
// TODO name the uops more appropriately
|
|
const Decoder::RingEntry Decoder::Ring[] = {
|
|
{ 0x80, 0x00, &Decoder::opcode_0xxxxxxx }, // UOP_STACK_FREE (16-bit)
|
|
{ 0xc0, 0x80, &Decoder::opcode_10Lxxxxx }, // UOP_POP (32-bit)
|
|
{ 0xf0, 0xc0, &Decoder::opcode_1100xxxx }, // UOP_STACK_SAVE (16-bit)
|
|
{ 0xf8, 0xd0, &Decoder::opcode_11010Lxx }, // UOP_POP (16-bit)
|
|
{ 0xf8, 0xd8, &Decoder::opcode_11011Lxx }, // UOP_POP (32-bit)
|
|
{ 0xf8, 0xe0, &Decoder::opcode_11100xxx }, // UOP_VPOP (32-bit)
|
|
{ 0xfc, 0xe8, &Decoder::opcode_111010xx }, // UOP_STACK_FREE (32-bit)
|
|
{ 0xfe, 0xec, &Decoder::opcode_1110110L }, // UOP_POP (16-bit)
|
|
{ 0xff, 0xee, &Decoder::opcode_11101110 }, // UOP_MICROSOFT_SPECIFIC (16-bit)
|
|
// UOP_PUSH_MACHINE_FRAME
|
|
// UOP_PUSH_CONTEXT
|
|
// UOP_PUSH_TRAP_FRAME
|
|
// UOP_REDZONE_RESTORE_LR
|
|
{ 0xff, 0xef, &Decoder::opcode_11101111 }, // UOP_LDRPC_POSTINC (32-bit)
|
|
{ 0xff, 0xf5, &Decoder::opcode_11110101 }, // UOP_VPOP (32-bit)
|
|
{ 0xff, 0xf6, &Decoder::opcode_11110110 }, // UOP_VPOP (32-bit)
|
|
{ 0xff, 0xf7, &Decoder::opcode_11110111 }, // UOP_STACK_RESTORE (16-bit)
|
|
{ 0xff, 0xf8, &Decoder::opcode_11111000 }, // UOP_STACK_RESTORE (16-bit)
|
|
{ 0xff, 0xf9, &Decoder::opcode_11111001 }, // UOP_STACK_RESTORE (32-bit)
|
|
{ 0xff, 0xfa, &Decoder::opcode_11111010 }, // UOP_STACK_RESTORE (32-bit)
|
|
{ 0xff, 0xfb, &Decoder::opcode_11111011 }, // UOP_NOP (16-bit)
|
|
{ 0xff, 0xfc, &Decoder::opcode_11111100 }, // UOP_NOP (32-bit)
|
|
{ 0xff, 0xfd, &Decoder::opcode_11111101 }, // UOP_NOP (16-bit) / END
|
|
{ 0xff, 0xfe, &Decoder::opcode_11111110 }, // UOP_NOP (32-bit) / END
|
|
{ 0xff, 0xff, &Decoder::opcode_11111111 }, // UOP_END
|
|
};
|
|
|
|
void Decoder::printRegisters(const std::pair<uint16_t, uint32_t> &RegisterMask) {
|
|
static const char * const GPRRegisterNames[16] = {
|
|
"r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7", "r8", "r9", "r10",
|
|
"r11", "ip", "sp", "lr", "pc",
|
|
};
|
|
|
|
const uint16_t GPRMask = std::get<0>(RegisterMask);
|
|
const uint16_t VFPMask = std::get<1>(RegisterMask);
|
|
|
|
OS << '{';
|
|
bool Comma = false;
|
|
for (unsigned RI = 0, RE = 11; RI < RE; ++RI) {
|
|
if (GPRMask & (1 << RI)) {
|
|
if (Comma)
|
|
OS << ", ";
|
|
OS << GPRRegisterNames[RI];
|
|
Comma = true;
|
|
}
|
|
}
|
|
for (unsigned RI = 0, RE = 32; RI < RE; ++RI) {
|
|
if (VFPMask & (1 << RI)) {
|
|
if (Comma)
|
|
OS << ", ";
|
|
OS << "d" << unsigned(RI);
|
|
Comma = true;
|
|
}
|
|
}
|
|
for (unsigned RI = 11, RE = 16; RI < RE; ++RI) {
|
|
if (GPRMask & (1 << RI)) {
|
|
if (Comma)
|
|
OS << ", ";
|
|
OS << GPRRegisterNames[RI];
|
|
Comma = true;
|
|
}
|
|
}
|
|
OS << '}';
|
|
}
|
|
|
|
ErrorOr<object::SectionRef>
|
|
Decoder::getSectionContaining(const COFFObjectFile &COFF, uint64_t VA) {
|
|
for (const auto &Section : COFF.sections()) {
|
|
uint64_t Address;
|
|
uint64_t Size;
|
|
|
|
if (error_code EC = Section.getAddress(Address))
|
|
return EC;
|
|
if (error_code EC = Section.getSize(Size))
|
|
return EC;
|
|
|
|
if (VA >= Address && (VA - Address) <= Size)
|
|
return Section;
|
|
}
|
|
return readobj_error::unknown_symbol;
|
|
}
|
|
|
|
ErrorOr<object::SymbolRef> Decoder::getSymbol(const COFFObjectFile &COFF,
|
|
uint64_t VA, bool FunctionOnly) {
|
|
for (const auto &Symbol : COFF.symbols()) {
|
|
if (FunctionOnly) {
|
|
SymbolRef::Type Type;
|
|
if (error_code EC = Symbol.getType(Type))
|
|
return EC;
|
|
if (Type != SymbolRef::ST_Function)
|
|
continue;
|
|
}
|
|
|
|
uint64_t Address;
|
|
if (error_code EC = Symbol.getAddress(Address))
|
|
return EC;
|
|
if (Address == VA)
|
|
return Symbol;
|
|
}
|
|
return readobj_error::unknown_symbol;
|
|
}
|
|
|
|
ErrorOr<SymbolRef> Decoder::getRelocatedSymbol(const COFFObjectFile &,
|
|
const SectionRef &Section,
|
|
uint64_t Offset) {
|
|
for (const auto &Relocation : Section.relocations()) {
|
|
uint64_t RelocationOffset;
|
|
if (auto Error = Relocation.getOffset(RelocationOffset))
|
|
return Error;
|
|
if (RelocationOffset == Offset)
|
|
return *Relocation.getSymbol();
|
|
}
|
|
return readobj_error::unknown_symbol;
|
|
}
|
|
|
|
bool Decoder::opcode_0xxxxxxx(const ulittle8_t *OC, unsigned &Offset,
|
|
unsigned Length, bool Prologue) {
|
|
uint8_t Imm = OC[Offset] & 0x7f;
|
|
SW.startLine() << format("0x%02x ; %s sp, #(%u * 4)\n",
|
|
OC[Offset],
|
|
static_cast<const char *>(Prologue ? "sub" : "add"),
|
|
Imm);
|
|
++Offset;
|
|
return false;
|
|
}
|
|
|
|
bool Decoder::opcode_10Lxxxxx(const ulittle8_t *OC, unsigned &Offset,
|
|
unsigned Length, bool Prologue) {
|
|
unsigned Link = (OC[Offset] & 0x20) >> 5;
|
|
uint16_t RegisterMask = (Link << (Prologue ? 14 : 15))
|
|
| ((OC[Offset + 0] & 0x1f) << 8)
|
|
| ((OC[Offset + 1] & 0xff) << 0);
|
|
assert((~RegisterMask & (1 << 13)) && "sp must not be set");
|
|
assert((~RegisterMask & (1 << (Prologue ? 15 : 14))) && "pc must not be set");
|
|
|
|
SW.startLine() << format("0x%02x 0x%02x ; %s.w ",
|
|
OC[Offset + 0], OC[Offset + 1],
|
|
Prologue ? "push" : "pop");
|
|
printRegisters(std::make_pair(RegisterMask, 0));
|
|
OS << '\n';
|
|
|
|
++Offset, ++Offset;
|
|
return false;
|
|
}
|
|
|
|
bool Decoder::opcode_1100xxxx(const ulittle8_t *OC, unsigned &Offset,
|
|
unsigned Length, bool Prologue) {
|
|
if (Prologue)
|
|
SW.startLine() << format("0x%02x ; mov r%u, sp\n",
|
|
OC[Offset], OC[Offset] & 0xf);
|
|
else
|
|
SW.startLine() << format("0x%02x ; mov sp, r%u\n",
|
|
OC[Offset], OC[Offset] & 0xf);
|
|
++Offset;
|
|
return false;
|
|
}
|
|
|
|
bool Decoder::opcode_11010Lxx(const ulittle8_t *OC, unsigned &Offset,
|
|
unsigned Length, bool Prologue) {
|
|
unsigned Link = (OC[Offset] & 0x4) >> 3;
|
|
unsigned Count = (OC[Offset] & 0x3);
|
|
|
|
uint16_t GPRMask = (Link << (Prologue ? 14 : 15))
|
|
| (((1 << (Count + 1)) - 1) << 4);
|
|
|
|
SW.startLine() << format("0x%02x ; %s ", OC[Offset],
|
|
Prologue ? "push" : "pop");
|
|
printRegisters(std::make_pair(GPRMask, 0));
|
|
OS << '\n';
|
|
|
|
++Offset;
|
|
return false;
|
|
}
|
|
|
|
bool Decoder::opcode_11011Lxx(const ulittle8_t *OC, unsigned &Offset,
|
|
unsigned Length, bool Prologue) {
|
|
unsigned Link = (OC[Offset] & 0x4) >> 2;
|
|
unsigned Count = (OC[Offset] & 0x3) + 4;
|
|
|
|
uint16_t GPRMask = (Link << (Prologue ? 14 : 15))
|
|
| (((1 << (Count + 1)) - 1) << 4);
|
|
|
|
SW.startLine() << format("0x%02x ; %s.w ", OC[Offset],
|
|
Prologue ? "push" : "pop");
|
|
printRegisters(std::make_pair(GPRMask, 0));
|
|
OS << '\n';
|
|
|
|
++Offset;
|
|
return false;
|
|
}
|
|
|
|
bool Decoder::opcode_11100xxx(const ulittle8_t *OC, unsigned &Offset,
|
|
unsigned Length, bool Prologue) {
|
|
unsigned High = (OC[Offset] & 0x7);
|
|
uint32_t VFPMask = (((1 << (High + 1)) - 1) << 8);
|
|
|
|
SW.startLine() << format("0x%02x ; %s ", OC[Offset],
|
|
Prologue ? "vpush" : "vpop");
|
|
printRegisters(std::make_pair(0, VFPMask));
|
|
OS << '\n';
|
|
|
|
++Offset;
|
|
return false;
|
|
}
|
|
|
|
bool Decoder::opcode_111010xx(const ulittle8_t *OC, unsigned &Offset,
|
|
unsigned Length, bool Prologue) {
|
|
uint16_t Imm = ((OC[Offset + 0] & 0x03) << 8) | ((OC[Offset + 1] & 0xff) << 0);
|
|
|
|
SW.startLine() << format("0x%02x 0x%02x ; %s.w sp, #(%u * 4)\n",
|
|
OC[Offset + 0], OC[Offset + 1],
|
|
static_cast<const char *>(Prologue ? "sub" : "add"),
|
|
Imm);
|
|
|
|
++Offset, ++Offset;
|
|
return false;
|
|
}
|
|
|
|
bool Decoder::opcode_1110110L(const ulittle8_t *OC, unsigned &Offset,
|
|
unsigned Length, bool Prologue) {
|
|
uint8_t GPRMask = ((OC[Offset + 0] & 0x01) << (Prologue ? 14 : 15))
|
|
| ((OC[Offset + 1] & 0xff) << 0);
|
|
|
|
SW.startLine() << format("0x%02x 0x%02x ; %s ", OC[Offset + 0],
|
|
OC[Offset + 1], Prologue ? "push" : "pop");
|
|
printRegisters(std::make_pair(GPRMask, 0));
|
|
OS << '\n';
|
|
|
|
++Offset, ++Offset;
|
|
return false;
|
|
}
|
|
|
|
bool Decoder::opcode_11101110(const ulittle8_t *OC, unsigned &Offset,
|
|
unsigned Length, bool Prologue) {
|
|
assert(!Prologue && "may not be used in prologue");
|
|
|
|
if (OC[Offset + 1] & 0xf0)
|
|
SW.startLine() << format("0x%02x 0x%02x ; reserved\n",
|
|
OC[Offset + 0], OC[Offset + 1]);
|
|
else
|
|
SW.startLine()
|
|
<< format("0x%02x 0x%02x ; microsoft-specific (type: %u)\n",
|
|
OC[Offset + 0], OC[Offset + 1], OC[Offset + 1] & 0x0f);
|
|
|
|
++Offset, ++Offset;
|
|
return false;
|
|
}
|
|
|
|
bool Decoder::opcode_11101111(const ulittle8_t *OC, unsigned &Offset,
|
|
unsigned Length, bool Prologue) {
|
|
assert(!Prologue && "may not be used in prologue");
|
|
|
|
if (OC[Offset + 1] & 0xf0)
|
|
SW.startLine() << format("0x%02x 0x%02x ; reserved\n",
|
|
OC[Offset + 0], OC[Offset + 1]);
|
|
else
|
|
SW.startLine()
|
|
<< format("0x%02x 0x%02x ; ldr.w lr, [sp], #%u\n",
|
|
OC[Offset + 0], OC[Offset + 1], OC[Offset + 1] << 2);
|
|
|
|
++Offset, ++Offset;
|
|
return false;
|
|
}
|
|
|
|
bool Decoder::opcode_11110101(const ulittle8_t *OC, unsigned &Offset,
|
|
unsigned Length, bool Prologue) {
|
|
unsigned Start = (OC[Offset + 1] & 0xf0) >> 4;
|
|
unsigned End = (OC[Offset + 1] & 0x0f) >> 0;
|
|
uint32_t VFPMask = ((1 << (End - Start)) - 1) << Start;
|
|
|
|
SW.startLine() << format("0x%02x 0x%02x ; %s ", OC[Offset + 0],
|
|
OC[Offset + 1], Prologue ? "vpush" : "vpop");
|
|
printRegisters(std::make_pair(0, VFPMask));
|
|
OS << '\n';
|
|
|
|
++Offset, ++Offset;
|
|
return false;
|
|
}
|
|
|
|
bool Decoder::opcode_11110110(const ulittle8_t *OC, unsigned &Offset,
|
|
unsigned Length, bool Prologue) {
|
|
unsigned Start = (OC[Offset + 1] & 0xf0) >> 4;
|
|
unsigned End = (OC[Offset + 1] & 0x0f) >> 0;
|
|
uint32_t VFPMask = ((1 << (End - Start)) - 1) << 16;
|
|
|
|
SW.startLine() << format("0x%02x 0x%02x ; %s ", OC[Offset + 0],
|
|
OC[Offset + 1], Prologue ? "vpush" : "vpop");
|
|
printRegisters(std::make_pair(0, VFPMask));
|
|
OS << '\n';
|
|
|
|
++Offset, ++Offset;
|
|
return false;
|
|
}
|
|
|
|
bool Decoder::opcode_11110111(const ulittle8_t *OC, unsigned &Offset,
|
|
unsigned Length, bool Prologue) {
|
|
uint32_t Imm = (OC[Offset + 1] << 8) | (OC[Offset + 2] << 0);
|
|
|
|
SW.startLine() << format("0x%02x 0x%02x 0x%02x ; %s sp, sp, #(%u * 4)\n",
|
|
OC[Offset + 0], OC[Offset + 1], OC[Offset + 2],
|
|
static_cast<const char *>(Prologue ? "sub" : "add"),
|
|
Imm);
|
|
|
|
++Offset, ++Offset, ++Offset;
|
|
return false;
|
|
}
|
|
|
|
bool Decoder::opcode_11111000(const ulittle8_t *OC, unsigned &Offset,
|
|
unsigned Length, bool Prologue) {
|
|
uint32_t Imm = (OC[Offset + 1] << 16)
|
|
| (OC[Offset + 2] << 8)
|
|
| (OC[Offset + 3] << 0);
|
|
|
|
SW.startLine()
|
|
<< format("0x%02x 0x%02x 0x%02x 0x%02x ; %s sp, sp, #(%u * 4)\n",
|
|
OC[Offset + 0], OC[Offset + 1], OC[Offset + 2], OC[Offset + 3],
|
|
static_cast<const char *>(Prologue ? "sub" : "add"), Imm);
|
|
|
|
++Offset, ++Offset, ++Offset, ++Offset;
|
|
return false;
|
|
}
|
|
|
|
bool Decoder::opcode_11111001(const ulittle8_t *OC, unsigned &Offset,
|
|
unsigned Length, bool Prologue) {
|
|
uint32_t Imm = (OC[Offset + 1] << 8) | (OC[Offset + 2] << 0);
|
|
|
|
SW.startLine()
|
|
<< format("0x%02x 0x%02x 0x%02x ; %s.w sp, sp, #(%u * 4)\n",
|
|
OC[Offset + 0], OC[Offset + 1], OC[Offset + 2],
|
|
static_cast<const char *>(Prologue ? "sub" : "add"), Imm);
|
|
|
|
++Offset, ++Offset, ++Offset;
|
|
return false;
|
|
}
|
|
|
|
bool Decoder::opcode_11111010(const ulittle8_t *OC, unsigned &Offset,
|
|
unsigned Length, bool Prologue) {
|
|
uint32_t Imm = (OC[Offset + 1] << 16)
|
|
| (OC[Offset + 2] << 8)
|
|
| (OC[Offset + 3] << 0);
|
|
|
|
SW.startLine()
|
|
<< format("0x%02x 0x%02x 0x%02x 0x%02x ; %s.w sp, sp, #(%u * 4)\n",
|
|
OC[Offset + 0], OC[Offset + 1], OC[Offset + 2], OC[Offset + 3],
|
|
static_cast<const char *>(Prologue ? "sub" : "add"), Imm);
|
|
|
|
++Offset, ++Offset, ++Offset, ++Offset;
|
|
return false;
|
|
}
|
|
|
|
bool Decoder::opcode_11111011(const ulittle8_t *OC, unsigned &Offset,
|
|
unsigned Length, bool Prologue) {
|
|
SW.startLine() << format("0x%02x ; nop\n", OC[Offset]);
|
|
++Offset;
|
|
return false;
|
|
}
|
|
|
|
bool Decoder::opcode_11111100(const ulittle8_t *OC, unsigned &Offset,
|
|
unsigned Length, bool Prologue) {
|
|
SW.startLine() << format("0x%02x ; nop.w\n", OC[Offset]);
|
|
++Offset;
|
|
return false;
|
|
}
|
|
|
|
bool Decoder::opcode_11111101(const ulittle8_t *OC, unsigned &Offset,
|
|
unsigned Length, bool Prologue) {
|
|
SW.startLine() << format("0x%02x ; b\n", OC[Offset]);
|
|
++Offset;
|
|
return true;
|
|
}
|
|
|
|
bool Decoder::opcode_11111110(const ulittle8_t *OC, unsigned &Offset,
|
|
unsigned Length, bool Prologue) {
|
|
SW.startLine() << format("0x%02x ; b.w\n", OC[Offset]);
|
|
++Offset;
|
|
return true;
|
|
}
|
|
|
|
bool Decoder::opcode_11111111(const ulittle8_t *OC, unsigned &Offset,
|
|
unsigned Length, bool Prologue) {
|
|
++Offset;
|
|
return true;
|
|
}
|
|
|
|
void Decoder::decodeOpcodes(ArrayRef<ulittle8_t> Opcodes, unsigned Offset,
|
|
bool Prologue) {
|
|
assert((!Prologue || Offset == 0) && "prologue should always use offset 0");
|
|
|
|
bool Terminated = false;
|
|
for (unsigned OI = Offset, OE = Opcodes.size(); !Terminated && OI < OE; ) {
|
|
bool Decoded = false;
|
|
for (unsigned DI = 0, DE = array_lengthof(Ring); DI < DE; ++DI) {
|
|
if ((Opcodes[OI] & Ring[DI].Mask) == Ring[DI].Value) {
|
|
Terminated = (this->*Ring[DI].Routine)(Opcodes.data(), OI, 0, Prologue);
|
|
Decoded = true;
|
|
break;
|
|
}
|
|
}
|
|
assert(Decoded && "unhandled opcode");
|
|
}
|
|
}
|
|
|
|
bool Decoder::dumpXDataRecord(const COFFObjectFile &COFF,
|
|
const SectionRef &Section,
|
|
uint64_t FunctionAddress, uint64_t VA) {
|
|
ArrayRef<uint8_t> Contents;
|
|
if (COFF.getSectionContents(COFF.getCOFFSection(Section), Contents))
|
|
return false;
|
|
|
|
uint64_t SectionVA;
|
|
if (Section.getAddress(SectionVA))
|
|
return false;
|
|
|
|
uint64_t Offset = VA - SectionVA;
|
|
const ulittle32_t *Data =
|
|
reinterpret_cast<const ulittle32_t *>(Contents.data() + Offset);
|
|
const ExceptionDataRecord XData(Data);
|
|
|
|
DictScope XRS(SW, "ExceptionData");
|
|
SW.printNumber("FunctionLength", XData.FunctionLength() << 1);
|
|
SW.printNumber("Version", XData.Vers());
|
|
SW.printBoolean("ExceptionData", XData.X());
|
|
SW.printBoolean("EpiloguePacked", XData.E());
|
|
SW.printBoolean("Fragment", XData.F());
|
|
SW.printNumber(XData.E() ? "EpilogueOffset" : "EpilogueScopes",
|
|
XData.EpilogueCount());
|
|
SW.printNumber("ByteCodeLength",
|
|
static_cast<uint64_t>(XData.CodeWords() * sizeof(uint32_t)));
|
|
|
|
if (XData.E()) {
|
|
ArrayRef<ulittle8_t> UC = XData.UnwindByteCode();
|
|
if (!XData.F()) {
|
|
ListScope PS(SW, "Prologue");
|
|
decodeOpcodes(UC, 0, /*Prologue=*/true);
|
|
}
|
|
if (XData.EpilogueCount()) {
|
|
ListScope ES(SW, "Epilogue");
|
|
decodeOpcodes(UC, XData.EpilogueCount(), /*Prologue=*/false);
|
|
}
|
|
} else {
|
|
ArrayRef<ulittle32_t> EpilogueScopes = XData.EpilogueScopes();
|
|
ListScope ESS(SW, "EpilogueScopes");
|
|
for (const EpilogueScope ES : EpilogueScopes) {
|
|
DictScope ESES(SW, "EpilogueScope");
|
|
SW.printNumber("StartOffset", ES.EpilogueStartOffset());
|
|
SW.printNumber("Condition", ES.Condition());
|
|
SW.printNumber("EpilogueStartIndex", ES.EpilogueStartIndex());
|
|
|
|
ListScope Opcodes(SW, "Opcodes");
|
|
decodeOpcodes(XData.UnwindByteCode(), ES.EpilogueStartIndex(),
|
|
/*Prologue=*/false);
|
|
}
|
|
}
|
|
|
|
if (XData.X()) {
|
|
const uint32_t Address = XData.ExceptionHandlerRVA();
|
|
const uint32_t Parameter = XData.ExceptionHandlerParameter();
|
|
const size_t HandlerOffset = HeaderWords(XData)
|
|
+ (XData.E() ? 0 : XData.EpilogueCount())
|
|
+ XData.CodeWords();
|
|
|
|
ErrorOr<SymbolRef> Symbol =
|
|
getRelocatedSymbol(COFF, Section, HandlerOffset * sizeof(uint32_t));
|
|
if (!Symbol)
|
|
Symbol = getSymbol(COFF, Address, /*FunctionOnly=*/true);
|
|
|
|
StringRef Name;
|
|
if (Symbol)
|
|
Symbol->getName(Name);
|
|
|
|
ListScope EHS(SW, "ExceptionHandler");
|
|
SW.printString("Routine", formatSymbol(Name, Address));
|
|
SW.printHex("Parameter", Parameter);
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
bool Decoder::dumpUnpackedEntry(const COFFObjectFile &COFF,
|
|
const SectionRef Section, uint64_t Offset,
|
|
unsigned Index, const RuntimeFunction &RF) {
|
|
assert(RF.Flag() == RuntimeFunctionFlag::RFF_Unpacked &&
|
|
"packed entry cannot be treated as an unpacked entry");
|
|
|
|
ErrorOr<SymbolRef> Function = getRelocatedSymbol(COFF, Section, Offset);
|
|
if (!Function)
|
|
Function = getSymbol(COFF, RF.BeginAddress, /*FunctionOnly=*/true);
|
|
|
|
ErrorOr<SymbolRef> XDataRecord = getRelocatedSymbol(COFF, Section, Offset + 4);
|
|
if (!XDataRecord)
|
|
XDataRecord = getSymbol(COFF, RF.ExceptionInformationRVA());
|
|
|
|
if (!RF.BeginAddress && !Function)
|
|
return false;
|
|
if (!RF.UnwindData && !XDataRecord)
|
|
return false;
|
|
|
|
StringRef FunctionName;
|
|
uint64_t FunctionAddress;
|
|
if (Function) {
|
|
Function->getName(FunctionName);
|
|
Function->getAddress(FunctionAddress);
|
|
} else {
|
|
const pe32_header *PEHeader;
|
|
if (COFF.getPE32Header(PEHeader))
|
|
return false;
|
|
FunctionAddress = PEHeader->ImageBase + RF.BeginAddress;
|
|
}
|
|
|
|
SW.printString("Function", formatSymbol(FunctionName, FunctionAddress));
|
|
|
|
if (XDataRecord) {
|
|
StringRef Name;
|
|
uint64_t Address;
|
|
|
|
XDataRecord->getName(Name);
|
|
XDataRecord->getAddress(Address);
|
|
|
|
SW.printString("ExceptionRecord", formatSymbol(Name, Address));
|
|
|
|
section_iterator SI = COFF.section_end();
|
|
if (XDataRecord->getSection(SI))
|
|
return false;
|
|
|
|
return dumpXDataRecord(COFF, *SI, FunctionAddress, Address);
|
|
} else {
|
|
const pe32_header *PEHeader;
|
|
if (COFF.getPE32Header(PEHeader))
|
|
return false;
|
|
|
|
uint64_t Address = PEHeader->ImageBase + RF.ExceptionInformationRVA();
|
|
SW.printString("ExceptionRecord", formatSymbol("", Address));
|
|
|
|
ErrorOr<SectionRef> Section =
|
|
getSectionContaining(COFF, RF.ExceptionInformationRVA());
|
|
if (!Section)
|
|
return false;
|
|
|
|
return dumpXDataRecord(COFF, *Section, FunctionAddress,
|
|
RF.ExceptionInformationRVA());
|
|
}
|
|
}
|
|
|
|
bool Decoder::dumpPackedEntry(const object::COFFObjectFile &COFF,
|
|
const SectionRef Section, uint64_t Offset,
|
|
unsigned Index, const RuntimeFunction &RF) {
|
|
assert((RF.Flag() == RuntimeFunctionFlag::RFF_Packed ||
|
|
RF.Flag() == RuntimeFunctionFlag::RFF_PackedFragment) &&
|
|
"unpacked entry cannot be treated as a packed entry");
|
|
|
|
ErrorOr<SymbolRef> Function = getRelocatedSymbol(COFF, Section, Offset);
|
|
if (!Function)
|
|
Function = getSymbol(COFF, RF.BeginAddress, /*FunctionOnly=*/true);
|
|
|
|
StringRef FunctionName;
|
|
uint64_t FunctionAddress;
|
|
if (Function) {
|
|
Function->getName(FunctionName);
|
|
Function->getAddress(FunctionAddress);
|
|
} else {
|
|
const pe32_header *PEHeader;
|
|
if (COFF.getPE32Header(PEHeader))
|
|
return false;
|
|
FunctionAddress = PEHeader->ImageBase + RF.BeginAddress;
|
|
}
|
|
|
|
SW.printString("Function", formatSymbol(FunctionName, FunctionAddress));
|
|
SW.printBoolean("Fragment",
|
|
RF.Flag() == RuntimeFunctionFlag::RFF_PackedFragment);
|
|
SW.printNumber("FunctionLength", RF.FunctionLength());
|
|
SW.startLine() << "ReturnType: " << RF.Ret() << '\n';
|
|
SW.printBoolean("HomedParameters", RF.H());
|
|
SW.startLine() << "SavedRegisters: ";
|
|
printRegisters(SavedRegisterMask(RF));
|
|
OS << '\n';
|
|
SW.printNumber("StackAdjustment", StackAdjustment(RF) << 2);
|
|
|
|
return true;
|
|
}
|
|
|
|
bool Decoder::dumpProcedureDataEntry(const COFFObjectFile &COFF,
|
|
const SectionRef Section, unsigned Index,
|
|
ArrayRef<uint8_t> Contents) {
|
|
uint64_t Offset = PDataEntrySize * Index;
|
|
const ulittle32_t *Data =
|
|
reinterpret_cast<const ulittle32_t *>(Contents.data() + Offset);
|
|
|
|
const RuntimeFunction Entry(Data);
|
|
DictScope RFS(SW, "RuntimeFunction");
|
|
if (Entry.Flag() == RuntimeFunctionFlag::RFF_Unpacked)
|
|
return dumpUnpackedEntry(COFF, Section, Offset, Index, Entry);
|
|
return dumpPackedEntry(COFF, Section, Offset, Index, Entry);
|
|
}
|
|
|
|
void Decoder::dumpProcedureData(const COFFObjectFile &COFF,
|
|
const SectionRef Section) {
|
|
ArrayRef<uint8_t> Contents;
|
|
if (COFF.getSectionContents(COFF.getCOFFSection(Section), Contents))
|
|
return;
|
|
|
|
if (Contents.size() % PDataEntrySize) {
|
|
errs() << ".pdata content is not " << PDataEntrySize << "-byte aligned\n";
|
|
return;
|
|
}
|
|
|
|
for (unsigned EI = 0, EE = Contents.size() / PDataEntrySize; EI < EE; ++EI)
|
|
if (!dumpProcedureDataEntry(COFF, Section, EI, Contents))
|
|
break;
|
|
}
|
|
|
|
error_code Decoder::dumpProcedureData(const COFFObjectFile &COFF) {
|
|
for (const auto &Section : COFF.sections()) {
|
|
StringRef SectionName;
|
|
if (error_code EC = COFF.getSectionName(COFF.getCOFFSection(Section),
|
|
SectionName))
|
|
return EC;
|
|
|
|
if (SectionName.startswith(".pdata"))
|
|
dumpProcedureData(COFF, Section);
|
|
}
|
|
return error_code();
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|