220 lines
7.8 KiB
C++
220 lines
7.8 KiB
C++
//===-- Mos6502MCCodeEmitter.cpp - Convert Mos6502 code to machine code -------===//
|
|
//
|
|
// The LLVM Compiler Infrastructure
|
|
//
|
|
// This file is distributed under the University of Illinois Open Source
|
|
// License. See LICENSE.TXT for details.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
//
|
|
// This file implements the Mos6502MCCodeEmitter class.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
#include "Mos6502MCExpr.h"
|
|
#include "MCTargetDesc/Mos6502FixupKinds.h"
|
|
#include "Mos6502MCTargetDesc.h"
|
|
#include "llvm/ADT/Statistic.h"
|
|
#include "llvm/MC/MCCodeEmitter.h"
|
|
#include "llvm/MC/MCContext.h"
|
|
#include "llvm/MC/MCExpr.h"
|
|
#include "llvm/MC/MCInst.h"
|
|
#include "llvm/MC/MCRegisterInfo.h"
|
|
#include "llvm/MC/MCSymbol.h"
|
|
#include "llvm/MC/MCAsmInfo.h"
|
|
#include "llvm/Support/raw_ostream.h"
|
|
|
|
using namespace llvm;
|
|
|
|
#define DEBUG_TYPE "mccodeemitter"
|
|
|
|
STATISTIC(MCNumEmitted, "Number of MC instructions emitted");
|
|
|
|
namespace {
|
|
class Mos6502MCCodeEmitter : public MCCodeEmitter {
|
|
Mos6502MCCodeEmitter(const Mos6502MCCodeEmitter &) = delete;
|
|
void operator=(const Mos6502MCCodeEmitter &) = delete;
|
|
MCContext &Ctx;
|
|
|
|
public:
|
|
Mos6502MCCodeEmitter(MCContext &ctx): Ctx(ctx) {}
|
|
|
|
~Mos6502MCCodeEmitter() override {}
|
|
|
|
void encodeInstruction(const MCInst &MI, raw_ostream &OS,
|
|
SmallVectorImpl<MCFixup> &Fixups,
|
|
const MCSubtargetInfo &STI) const override;
|
|
|
|
// getBinaryCodeForInstr - TableGen'erated function for getting the
|
|
// binary encoding for an instruction.
|
|
uint64_t getBinaryCodeForInstr(const MCInst &MI,
|
|
SmallVectorImpl<MCFixup> &Fixups,
|
|
const MCSubtargetInfo &STI) const;
|
|
|
|
/// getMachineOpValue - Return binary encoding of operand. If the machine
|
|
/// operand requires relocation, record the relocation and return zero.
|
|
unsigned getMachineOpValue(const MCInst &MI, const MCOperand &MO,
|
|
SmallVectorImpl<MCFixup> &Fixups,
|
|
const MCSubtargetInfo &STI) const;
|
|
|
|
unsigned getCallTargetOpValue(const MCInst &MI, unsigned OpNo,
|
|
SmallVectorImpl<MCFixup> &Fixups,
|
|
const MCSubtargetInfo &STI) const;
|
|
unsigned getBranchTargetOpValue(const MCInst &MI, unsigned OpNo,
|
|
SmallVectorImpl<MCFixup> &Fixups,
|
|
const MCSubtargetInfo &STI) const;
|
|
unsigned getBranchPredTargetOpValue(const MCInst &MI, unsigned OpNo,
|
|
SmallVectorImpl<MCFixup> &Fixups,
|
|
const MCSubtargetInfo &STI) const;
|
|
unsigned getBranchOnRegTargetOpValue(const MCInst &MI, unsigned OpNo,
|
|
SmallVectorImpl<MCFixup> &Fixups,
|
|
const MCSubtargetInfo &STI) const;
|
|
|
|
};
|
|
} // end anonymous namespace
|
|
|
|
MCCodeEmitter *llvm::createMos6502MCCodeEmitter(const MCInstrInfo &MCII,
|
|
const MCRegisterInfo &MRI,
|
|
MCContext &Ctx) {
|
|
return new Mos6502MCCodeEmitter(Ctx);
|
|
}
|
|
|
|
void Mos6502MCCodeEmitter::encodeInstruction(const MCInst &MI, raw_ostream &OS,
|
|
SmallVectorImpl<MCFixup> &Fixups,
|
|
const MCSubtargetInfo &STI) const {
|
|
unsigned Bits = getBinaryCodeForInstr(MI, Fixups, STI);
|
|
|
|
if (Ctx.getAsmInfo()->isLittleEndian()) {
|
|
// Output the bits in little-endian byte order.
|
|
support::endian::Writer<support::little>(OS).write<uint32_t>(Bits);
|
|
} else {
|
|
// Output the bits in big-endian byte order.
|
|
support::endian::Writer<support::big>(OS).write<uint32_t>(Bits);
|
|
}
|
|
unsigned tlsOpNo = 0;
|
|
switch (MI.getOpcode()) {
|
|
default: break;
|
|
case M6502::TLS_CALL: tlsOpNo = 1; break;
|
|
case M6502::TLS_ADDrr:
|
|
case M6502::TLS_ADDXrr:
|
|
case M6502::TLS_LDrr:
|
|
case M6502::TLS_LDXrr: tlsOpNo = 3; break;
|
|
}
|
|
if (tlsOpNo != 0) {
|
|
const MCOperand &MO = MI.getOperand(tlsOpNo);
|
|
uint64_t op = getMachineOpValue(MI, MO, Fixups, STI);
|
|
assert(op == 0 && "Unexpected operand value!");
|
|
(void)op; // suppress warning.
|
|
}
|
|
|
|
++MCNumEmitted; // Keep track of the # of mi's emitted.
|
|
}
|
|
|
|
|
|
unsigned Mos6502MCCodeEmitter::
|
|
getMachineOpValue(const MCInst &MI, const MCOperand &MO,
|
|
SmallVectorImpl<MCFixup> &Fixups,
|
|
const MCSubtargetInfo &STI) const {
|
|
|
|
if (MO.isReg())
|
|
return Ctx.getRegisterInfo()->getEncodingValue(MO.getReg());
|
|
|
|
if (MO.isImm())
|
|
return MO.getImm();
|
|
|
|
assert(MO.isExpr());
|
|
const MCExpr *Expr = MO.getExpr();
|
|
if (const Mos6502MCExpr *SExpr = dyn_cast<Mos6502MCExpr>(Expr)) {
|
|
MCFixupKind Kind = (MCFixupKind)SExpr->getFixupKind();
|
|
Fixups.push_back(MCFixup::create(0, Expr, Kind));
|
|
return 0;
|
|
}
|
|
|
|
int64_t Res;
|
|
if (Expr->evaluateAsAbsolute(Res))
|
|
return Res;
|
|
|
|
llvm_unreachable("Unhandled expression!");
|
|
return 0;
|
|
}
|
|
|
|
unsigned Mos6502MCCodeEmitter::
|
|
getCallTargetOpValue(const MCInst &MI, unsigned OpNo,
|
|
SmallVectorImpl<MCFixup> &Fixups,
|
|
const MCSubtargetInfo &STI) const {
|
|
const MCOperand &MO = MI.getOperand(OpNo);
|
|
if (MO.isReg() || MO.isImm())
|
|
return getMachineOpValue(MI, MO, Fixups, STI);
|
|
|
|
if (MI.getOpcode() == M6502::TLS_CALL) {
|
|
// No fixups for __tls_get_addr. Will emit for fixups for tls_symbol in
|
|
// encodeInstruction.
|
|
#ifndef NDEBUG
|
|
// Verify that the callee is actually __tls_get_addr.
|
|
const Mos6502MCExpr *SExpr = dyn_cast<Mos6502MCExpr>(MO.getExpr());
|
|
assert(SExpr && SExpr->getSubExpr()->getKind() == MCExpr::SymbolRef &&
|
|
"Unexpected expression in TLS_CALL");
|
|
const MCSymbolRefExpr *SymExpr = cast<MCSymbolRefExpr>(SExpr->getSubExpr());
|
|
assert(SymExpr->getSymbol().getName() == "__tls_get_addr" &&
|
|
"Unexpected function for TLS_CALL");
|
|
#endif
|
|
return 0;
|
|
}
|
|
|
|
MCFixupKind fixupKind = (MCFixupKind)Mos6502::fixup_mos6502_call30;
|
|
|
|
if (const Mos6502MCExpr *SExpr = dyn_cast<Mos6502MCExpr>(MO.getExpr())) {
|
|
if (SExpr->getKind() == Mos6502MCExpr::VK_Mos6502_WPLT30)
|
|
fixupKind = (MCFixupKind)Mos6502::fixup_mos6502_wplt30;
|
|
}
|
|
|
|
Fixups.push_back(MCFixup::create(0, MO.getExpr(), fixupKind));
|
|
|
|
return 0;
|
|
}
|
|
|
|
unsigned Mos6502MCCodeEmitter::
|
|
getBranchTargetOpValue(const MCInst &MI, unsigned OpNo,
|
|
SmallVectorImpl<MCFixup> &Fixups,
|
|
const MCSubtargetInfo &STI) const {
|
|
const MCOperand &MO = MI.getOperand(OpNo);
|
|
if (MO.isReg() || MO.isImm())
|
|
return getMachineOpValue(MI, MO, Fixups, STI);
|
|
|
|
Fixups.push_back(MCFixup::create(0, MO.getExpr(),
|
|
(MCFixupKind)Mos6502::fixup_mos6502_br22));
|
|
return 0;
|
|
}
|
|
|
|
unsigned Mos6502MCCodeEmitter::
|
|
getBranchPredTargetOpValue(const MCInst &MI, unsigned OpNo,
|
|
SmallVectorImpl<MCFixup> &Fixups,
|
|
const MCSubtargetInfo &STI) const {
|
|
const MCOperand &MO = MI.getOperand(OpNo);
|
|
if (MO.isReg() || MO.isImm())
|
|
return getMachineOpValue(MI, MO, Fixups, STI);
|
|
|
|
Fixups.push_back(MCFixup::create(0, MO.getExpr(),
|
|
(MCFixupKind)Mos6502::fixup_mos6502_br19));
|
|
return 0;
|
|
}
|
|
unsigned Mos6502MCCodeEmitter::
|
|
getBranchOnRegTargetOpValue(const MCInst &MI, unsigned OpNo,
|
|
SmallVectorImpl<MCFixup> &Fixups,
|
|
const MCSubtargetInfo &STI) const {
|
|
const MCOperand &MO = MI.getOperand(OpNo);
|
|
if (MO.isReg() || MO.isImm())
|
|
return getMachineOpValue(MI, MO, Fixups, STI);
|
|
|
|
Fixups.push_back(MCFixup::create(0, MO.getExpr(),
|
|
(MCFixupKind)Mos6502::fixup_mos6502_br16_2));
|
|
Fixups.push_back(MCFixup::create(0, MO.getExpr(),
|
|
(MCFixupKind)Mos6502::fixup_mos6502_br16_14));
|
|
|
|
return 0;
|
|
}
|
|
|
|
|
|
|
|
#include "Mos6502GenMCCodeEmitter.inc"
|