mirror of
https://github.com/c64scene-ar/llvm-6502.git
synced 2024-08-30 21:29:28 +00:00
With this patch MCDisassembler::getInstruction takes an ArrayRef<uint8_t> instead of a MemoryObject. Even on X86 there is a maximum size an instruction can have. Given that, it seems way simpler and more efficient to just pass an ArrayRef to the disassembler instead of a MemoryObject and have it do a virtual call every time it wants some extra bytes. git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@221751 91177308-0d34-0410-b5e6-96231b3b80d8
464 lines
16 KiB
C++
464 lines
16 KiB
C++
//===- SparcDisassembler.cpp - Disassembler for Sparc -----------*- C++ -*-===//
|
|
//
|
|
// The LLVM Compiler Infrastructure
|
|
//
|
|
// This file is distributed under the University of Illinois Open Source
|
|
// License. See LICENSE.TXT for details.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
//
|
|
// This file is part of the Sparc Disassembler.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
#include "Sparc.h"
|
|
#include "SparcRegisterInfo.h"
|
|
#include "SparcSubtarget.h"
|
|
#include "llvm/MC/MCDisassembler.h"
|
|
#include "llvm/MC/MCFixedLenDisassembler.h"
|
|
#include "llvm/Support/TargetRegistry.h"
|
|
|
|
using namespace llvm;
|
|
|
|
#define DEBUG_TYPE "sparc-disassembler"
|
|
|
|
typedef MCDisassembler::DecodeStatus DecodeStatus;
|
|
|
|
namespace {
|
|
|
|
/// A disassembler class for Sparc.
|
|
class SparcDisassembler : public MCDisassembler {
|
|
public:
|
|
SparcDisassembler(const MCSubtargetInfo &STI, MCContext &Ctx)
|
|
: MCDisassembler(STI, Ctx) {}
|
|
virtual ~SparcDisassembler() {}
|
|
|
|
DecodeStatus getInstruction(MCInst &Instr, uint64_t &Size,
|
|
ArrayRef<uint8_t> Bytes, uint64_t Address,
|
|
raw_ostream &VStream,
|
|
raw_ostream &CStream) const override;
|
|
};
|
|
|
|
}
|
|
|
|
namespace llvm {
|
|
extern Target TheSparcTarget, TheSparcV9Target;
|
|
}
|
|
|
|
static MCDisassembler *createSparcDisassembler(
|
|
const Target &T,
|
|
const MCSubtargetInfo &STI,
|
|
MCContext &Ctx) {
|
|
return new SparcDisassembler(STI, Ctx);
|
|
}
|
|
|
|
|
|
extern "C" void LLVMInitializeSparcDisassembler() {
|
|
// Register the disassembler.
|
|
TargetRegistry::RegisterMCDisassembler(TheSparcTarget,
|
|
createSparcDisassembler);
|
|
TargetRegistry::RegisterMCDisassembler(TheSparcV9Target,
|
|
createSparcDisassembler);
|
|
}
|
|
|
|
|
|
|
|
static const unsigned IntRegDecoderTable[] = {
|
|
SP::G0, SP::G1, SP::G2, SP::G3,
|
|
SP::G4, SP::G5, SP::G6, SP::G7,
|
|
SP::O0, SP::O1, SP::O2, SP::O3,
|
|
SP::O4, SP::O5, SP::O6, SP::O7,
|
|
SP::L0, SP::L1, SP::L2, SP::L3,
|
|
SP::L4, SP::L5, SP::L6, SP::L7,
|
|
SP::I0, SP::I1, SP::I2, SP::I3,
|
|
SP::I4, SP::I5, SP::I6, SP::I7 };
|
|
|
|
static const unsigned FPRegDecoderTable[] = {
|
|
SP::F0, SP::F1, SP::F2, SP::F3,
|
|
SP::F4, SP::F5, SP::F6, SP::F7,
|
|
SP::F8, SP::F9, SP::F10, SP::F11,
|
|
SP::F12, SP::F13, SP::F14, SP::F15,
|
|
SP::F16, SP::F17, SP::F18, SP::F19,
|
|
SP::F20, SP::F21, SP::F22, SP::F23,
|
|
SP::F24, SP::F25, SP::F26, SP::F27,
|
|
SP::F28, SP::F29, SP::F30, SP::F31 };
|
|
|
|
static const unsigned DFPRegDecoderTable[] = {
|
|
SP::D0, SP::D16, SP::D1, SP::D17,
|
|
SP::D2, SP::D18, SP::D3, SP::D19,
|
|
SP::D4, SP::D20, SP::D5, SP::D21,
|
|
SP::D6, SP::D22, SP::D7, SP::D23,
|
|
SP::D8, SP::D24, SP::D9, SP::D25,
|
|
SP::D10, SP::D26, SP::D11, SP::D27,
|
|
SP::D12, SP::D28, SP::D13, SP::D29,
|
|
SP::D14, SP::D30, SP::D15, SP::D31 };
|
|
|
|
static const unsigned QFPRegDecoderTable[] = {
|
|
SP::Q0, SP::Q8, ~0U, ~0U,
|
|
SP::Q1, SP::Q9, ~0U, ~0U,
|
|
SP::Q2, SP::Q10, ~0U, ~0U,
|
|
SP::Q3, SP::Q11, ~0U, ~0U,
|
|
SP::Q4, SP::Q12, ~0U, ~0U,
|
|
SP::Q5, SP::Q13, ~0U, ~0U,
|
|
SP::Q6, SP::Q14, ~0U, ~0U,
|
|
SP::Q7, SP::Q15, ~0U, ~0U } ;
|
|
|
|
static const unsigned FCCRegDecoderTable[] = {
|
|
SP::FCC0, SP::FCC1, SP::FCC2, SP::FCC3 };
|
|
|
|
static DecodeStatus DecodeIntRegsRegisterClass(MCInst &Inst,
|
|
unsigned RegNo,
|
|
uint64_t Address,
|
|
const void *Decoder) {
|
|
if (RegNo > 31)
|
|
return MCDisassembler::Fail;
|
|
unsigned Reg = IntRegDecoderTable[RegNo];
|
|
Inst.addOperand(MCOperand::CreateReg(Reg));
|
|
return MCDisassembler::Success;
|
|
}
|
|
|
|
static DecodeStatus DecodeI64RegsRegisterClass(MCInst &Inst,
|
|
unsigned RegNo,
|
|
uint64_t Address,
|
|
const void *Decoder) {
|
|
if (RegNo > 31)
|
|
return MCDisassembler::Fail;
|
|
unsigned Reg = IntRegDecoderTable[RegNo];
|
|
Inst.addOperand(MCOperand::CreateReg(Reg));
|
|
return MCDisassembler::Success;
|
|
}
|
|
|
|
|
|
static DecodeStatus DecodeFPRegsRegisterClass(MCInst &Inst,
|
|
unsigned RegNo,
|
|
uint64_t Address,
|
|
const void *Decoder) {
|
|
if (RegNo > 31)
|
|
return MCDisassembler::Fail;
|
|
unsigned Reg = FPRegDecoderTable[RegNo];
|
|
Inst.addOperand(MCOperand::CreateReg(Reg));
|
|
return MCDisassembler::Success;
|
|
}
|
|
|
|
|
|
static DecodeStatus DecodeDFPRegsRegisterClass(MCInst &Inst,
|
|
unsigned RegNo,
|
|
uint64_t Address,
|
|
const void *Decoder) {
|
|
if (RegNo > 31)
|
|
return MCDisassembler::Fail;
|
|
unsigned Reg = DFPRegDecoderTable[RegNo];
|
|
Inst.addOperand(MCOperand::CreateReg(Reg));
|
|
return MCDisassembler::Success;
|
|
}
|
|
|
|
|
|
static DecodeStatus DecodeQFPRegsRegisterClass(MCInst &Inst,
|
|
unsigned RegNo,
|
|
uint64_t Address,
|
|
const void *Decoder) {
|
|
if (RegNo > 31)
|
|
return MCDisassembler::Fail;
|
|
|
|
unsigned Reg = QFPRegDecoderTable[RegNo];
|
|
if (Reg == ~0U)
|
|
return MCDisassembler::Fail;
|
|
Inst.addOperand(MCOperand::CreateReg(Reg));
|
|
return MCDisassembler::Success;
|
|
}
|
|
|
|
static DecodeStatus DecodeFCCRegsRegisterClass(MCInst &Inst, unsigned RegNo,
|
|
uint64_t Address,
|
|
const void *Decoder) {
|
|
if (RegNo > 3)
|
|
return MCDisassembler::Fail;
|
|
Inst.addOperand(MCOperand::CreateReg(FCCRegDecoderTable[RegNo]));
|
|
return MCDisassembler::Success;
|
|
}
|
|
|
|
|
|
static DecodeStatus DecodeLoadInt(MCInst &Inst, unsigned insn, uint64_t Address,
|
|
const void *Decoder);
|
|
static DecodeStatus DecodeLoadFP(MCInst &Inst, unsigned insn, uint64_t Address,
|
|
const void *Decoder);
|
|
static DecodeStatus DecodeLoadDFP(MCInst &Inst, unsigned insn, uint64_t Address,
|
|
const void *Decoder);
|
|
static DecodeStatus DecodeLoadQFP(MCInst &Inst, unsigned insn, uint64_t Address,
|
|
const void *Decoder);
|
|
static DecodeStatus DecodeStoreInt(MCInst &Inst, unsigned insn,
|
|
uint64_t Address, const void *Decoder);
|
|
static DecodeStatus DecodeStoreFP(MCInst &Inst, unsigned insn,
|
|
uint64_t Address, const void *Decoder);
|
|
static DecodeStatus DecodeStoreDFP(MCInst &Inst, unsigned insn,
|
|
uint64_t Address, const void *Decoder);
|
|
static DecodeStatus DecodeStoreQFP(MCInst &Inst, unsigned insn,
|
|
uint64_t Address, const void *Decoder);
|
|
static DecodeStatus DecodeCall(MCInst &Inst, unsigned insn,
|
|
uint64_t Address, const void *Decoder);
|
|
static DecodeStatus DecodeSIMM13(MCInst &Inst, unsigned insn,
|
|
uint64_t Address, const void *Decoder);
|
|
static DecodeStatus DecodeJMPL(MCInst &Inst, unsigned insn, uint64_t Address,
|
|
const void *Decoder);
|
|
static DecodeStatus DecodeReturn(MCInst &MI, unsigned insn, uint64_t Address,
|
|
const void *Decoder);
|
|
static DecodeStatus DecodeSWAP(MCInst &Inst, unsigned insn, uint64_t Address,
|
|
const void *Decoder);
|
|
|
|
#include "SparcGenDisassemblerTables.inc"
|
|
|
|
/// Read four bytes from the ArrayRef and return 32 bit word.
|
|
static DecodeStatus readInstruction32(ArrayRef<uint8_t> Bytes, uint64_t Address,
|
|
uint64_t &Size, uint32_t &Insn) {
|
|
// We want to read exactly 4 Bytes of data.
|
|
if (Bytes.size() < 4) {
|
|
Size = 0;
|
|
return MCDisassembler::Fail;
|
|
}
|
|
|
|
// Encoded as a big-endian 32-bit word in the stream.
|
|
Insn =
|
|
(Bytes[3] << 0) | (Bytes[2] << 8) | (Bytes[1] << 16) | (Bytes[0] << 24);
|
|
|
|
return MCDisassembler::Success;
|
|
}
|
|
|
|
DecodeStatus SparcDisassembler::getInstruction(MCInst &Instr, uint64_t &Size,
|
|
ArrayRef<uint8_t> Bytes,
|
|
uint64_t Address,
|
|
raw_ostream &VStream,
|
|
raw_ostream &CStream) const {
|
|
uint32_t Insn;
|
|
|
|
DecodeStatus Result = readInstruction32(Bytes, Address, Size, Insn);
|
|
if (Result == MCDisassembler::Fail)
|
|
return MCDisassembler::Fail;
|
|
|
|
|
|
// Calling the auto-generated decoder function.
|
|
Result =
|
|
decodeInstruction(DecoderTableSparc32, Instr, Insn, Address, this, STI);
|
|
|
|
if (Result != MCDisassembler::Fail) {
|
|
Size = 4;
|
|
return Result;
|
|
}
|
|
|
|
return MCDisassembler::Fail;
|
|
}
|
|
|
|
|
|
typedef DecodeStatus (*DecodeFunc)(MCInst &MI, unsigned insn, uint64_t Address,
|
|
const void *Decoder);
|
|
|
|
static DecodeStatus DecodeMem(MCInst &MI, unsigned insn, uint64_t Address,
|
|
const void *Decoder,
|
|
bool isLoad, DecodeFunc DecodeRD) {
|
|
unsigned rd = fieldFromInstruction(insn, 25, 5);
|
|
unsigned rs1 = fieldFromInstruction(insn, 14, 5);
|
|
bool isImm = fieldFromInstruction(insn, 13, 1);
|
|
unsigned rs2 = 0;
|
|
unsigned simm13 = 0;
|
|
if (isImm)
|
|
simm13 = SignExtend32<13>(fieldFromInstruction(insn, 0, 13));
|
|
else
|
|
rs2 = fieldFromInstruction(insn, 0, 5);
|
|
|
|
DecodeStatus status;
|
|
if (isLoad) {
|
|
status = DecodeRD(MI, rd, Address, Decoder);
|
|
if (status != MCDisassembler::Success)
|
|
return status;
|
|
}
|
|
|
|
// Decode rs1.
|
|
status = DecodeIntRegsRegisterClass(MI, rs1, Address, Decoder);
|
|
if (status != MCDisassembler::Success)
|
|
return status;
|
|
|
|
// Decode imm|rs2.
|
|
if (isImm)
|
|
MI.addOperand(MCOperand::CreateImm(simm13));
|
|
else {
|
|
status = DecodeIntRegsRegisterClass(MI, rs2, Address, Decoder);
|
|
if (status != MCDisassembler::Success)
|
|
return status;
|
|
}
|
|
|
|
if (!isLoad) {
|
|
status = DecodeRD(MI, rd, Address, Decoder);
|
|
if (status != MCDisassembler::Success)
|
|
return status;
|
|
}
|
|
return MCDisassembler::Success;
|
|
}
|
|
|
|
static DecodeStatus DecodeLoadInt(MCInst &Inst, unsigned insn, uint64_t Address,
|
|
const void *Decoder) {
|
|
return DecodeMem(Inst, insn, Address, Decoder, true,
|
|
DecodeIntRegsRegisterClass);
|
|
}
|
|
|
|
static DecodeStatus DecodeLoadFP(MCInst &Inst, unsigned insn, uint64_t Address,
|
|
const void *Decoder) {
|
|
return DecodeMem(Inst, insn, Address, Decoder, true,
|
|
DecodeFPRegsRegisterClass);
|
|
}
|
|
|
|
static DecodeStatus DecodeLoadDFP(MCInst &Inst, unsigned insn, uint64_t Address,
|
|
const void *Decoder) {
|
|
return DecodeMem(Inst, insn, Address, Decoder, true,
|
|
DecodeDFPRegsRegisterClass);
|
|
}
|
|
|
|
static DecodeStatus DecodeLoadQFP(MCInst &Inst, unsigned insn, uint64_t Address,
|
|
const void *Decoder) {
|
|
return DecodeMem(Inst, insn, Address, Decoder, true,
|
|
DecodeQFPRegsRegisterClass);
|
|
}
|
|
|
|
static DecodeStatus DecodeStoreInt(MCInst &Inst, unsigned insn,
|
|
uint64_t Address, const void *Decoder) {
|
|
return DecodeMem(Inst, insn, Address, Decoder, false,
|
|
DecodeIntRegsRegisterClass);
|
|
}
|
|
|
|
static DecodeStatus DecodeStoreFP(MCInst &Inst, unsigned insn, uint64_t Address,
|
|
const void *Decoder) {
|
|
return DecodeMem(Inst, insn, Address, Decoder, false,
|
|
DecodeFPRegsRegisterClass);
|
|
}
|
|
|
|
static DecodeStatus DecodeStoreDFP(MCInst &Inst, unsigned insn,
|
|
uint64_t Address, const void *Decoder) {
|
|
return DecodeMem(Inst, insn, Address, Decoder, false,
|
|
DecodeDFPRegsRegisterClass);
|
|
}
|
|
|
|
static DecodeStatus DecodeStoreQFP(MCInst &Inst, unsigned insn,
|
|
uint64_t Address, const void *Decoder) {
|
|
return DecodeMem(Inst, insn, Address, Decoder, false,
|
|
DecodeQFPRegsRegisterClass);
|
|
}
|
|
|
|
static bool tryAddingSymbolicOperand(int64_t Value, bool isBranch,
|
|
uint64_t Address, uint64_t Offset,
|
|
uint64_t Width, MCInst &MI,
|
|
const void *Decoder) {
|
|
const MCDisassembler *Dis = static_cast<const MCDisassembler*>(Decoder);
|
|
return Dis->tryAddingSymbolicOperand(MI, Value, Address, isBranch,
|
|
Offset, Width);
|
|
}
|
|
|
|
static DecodeStatus DecodeCall(MCInst &MI, unsigned insn,
|
|
uint64_t Address, const void *Decoder) {
|
|
unsigned tgt = fieldFromInstruction(insn, 0, 30);
|
|
tgt <<= 2;
|
|
if (!tryAddingSymbolicOperand(tgt+Address, false, Address,
|
|
0, 30, MI, Decoder))
|
|
MI.addOperand(MCOperand::CreateImm(tgt));
|
|
return MCDisassembler::Success;
|
|
}
|
|
|
|
static DecodeStatus DecodeSIMM13(MCInst &MI, unsigned insn,
|
|
uint64_t Address, const void *Decoder) {
|
|
unsigned tgt = SignExtend32<13>(fieldFromInstruction(insn, 0, 13));
|
|
MI.addOperand(MCOperand::CreateImm(tgt));
|
|
return MCDisassembler::Success;
|
|
}
|
|
|
|
static DecodeStatus DecodeJMPL(MCInst &MI, unsigned insn, uint64_t Address,
|
|
const void *Decoder) {
|
|
|
|
unsigned rd = fieldFromInstruction(insn, 25, 5);
|
|
unsigned rs1 = fieldFromInstruction(insn, 14, 5);
|
|
unsigned isImm = fieldFromInstruction(insn, 13, 1);
|
|
unsigned rs2 = 0;
|
|
unsigned simm13 = 0;
|
|
if (isImm)
|
|
simm13 = SignExtend32<13>(fieldFromInstruction(insn, 0, 13));
|
|
else
|
|
rs2 = fieldFromInstruction(insn, 0, 5);
|
|
|
|
// Decode RD.
|
|
DecodeStatus status = DecodeIntRegsRegisterClass(MI, rd, Address, Decoder);
|
|
if (status != MCDisassembler::Success)
|
|
return status;
|
|
|
|
// Decode RS1.
|
|
status = DecodeIntRegsRegisterClass(MI, rs1, Address, Decoder);
|
|
if (status != MCDisassembler::Success)
|
|
return status;
|
|
|
|
// Decode RS1 | SIMM13.
|
|
if (isImm)
|
|
MI.addOperand(MCOperand::CreateImm(simm13));
|
|
else {
|
|
status = DecodeIntRegsRegisterClass(MI, rs2, Address, Decoder);
|
|
if (status != MCDisassembler::Success)
|
|
return status;
|
|
}
|
|
return MCDisassembler::Success;
|
|
}
|
|
|
|
static DecodeStatus DecodeReturn(MCInst &MI, unsigned insn, uint64_t Address,
|
|
const void *Decoder) {
|
|
|
|
unsigned rs1 = fieldFromInstruction(insn, 14, 5);
|
|
unsigned isImm = fieldFromInstruction(insn, 13, 1);
|
|
unsigned rs2 = 0;
|
|
unsigned simm13 = 0;
|
|
if (isImm)
|
|
simm13 = SignExtend32<13>(fieldFromInstruction(insn, 0, 13));
|
|
else
|
|
rs2 = fieldFromInstruction(insn, 0, 5);
|
|
|
|
// Decode RS1.
|
|
DecodeStatus status = DecodeIntRegsRegisterClass(MI, rs1, Address, Decoder);
|
|
if (status != MCDisassembler::Success)
|
|
return status;
|
|
|
|
// Decode RS2 | SIMM13.
|
|
if (isImm)
|
|
MI.addOperand(MCOperand::CreateImm(simm13));
|
|
else {
|
|
status = DecodeIntRegsRegisterClass(MI, rs2, Address, Decoder);
|
|
if (status != MCDisassembler::Success)
|
|
return status;
|
|
}
|
|
return MCDisassembler::Success;
|
|
}
|
|
|
|
static DecodeStatus DecodeSWAP(MCInst &MI, unsigned insn, uint64_t Address,
|
|
const void *Decoder) {
|
|
|
|
unsigned rd = fieldFromInstruction(insn, 25, 5);
|
|
unsigned rs1 = fieldFromInstruction(insn, 14, 5);
|
|
unsigned isImm = fieldFromInstruction(insn, 13, 1);
|
|
unsigned rs2 = 0;
|
|
unsigned simm13 = 0;
|
|
if (isImm)
|
|
simm13 = SignExtend32<13>(fieldFromInstruction(insn, 0, 13));
|
|
else
|
|
rs2 = fieldFromInstruction(insn, 0, 5);
|
|
|
|
// Decode RD.
|
|
DecodeStatus status = DecodeIntRegsRegisterClass(MI, rd, Address, Decoder);
|
|
if (status != MCDisassembler::Success)
|
|
return status;
|
|
|
|
// Decode RS1.
|
|
status = DecodeIntRegsRegisterClass(MI, rs1, Address, Decoder);
|
|
if (status != MCDisassembler::Success)
|
|
return status;
|
|
|
|
// Decode RS1 | SIMM13.
|
|
if (isImm)
|
|
MI.addOperand(MCOperand::CreateImm(simm13));
|
|
else {
|
|
status = DecodeIntRegsRegisterClass(MI, rs2, Address, Decoder);
|
|
if (status != MCDisassembler::Success)
|
|
return status;
|
|
}
|
|
return MCDisassembler::Success;
|
|
}
|