Files
ComSquare/sources/Debugger/CPU/Disassembly.cpp
2021-07-06 14:40:58 +02:00

278 lines
8.4 KiB
C++

//
// Created by anonymus-raccoon on 4/3/20.
//
#include "Utility/Utility.hpp"
#include "CPUDebug.hpp"
#include "SNES.hpp"
#include <sstream>
using namespace ComSquare::CPU;
namespace ComSquare::Debugger::CPU
{
DisassembledInstruction::DisassembledInstruction(const ComSquare::CPU::Instruction &instruction,
uint24_t addr,
std::string arg,
uint8_t op)
: ComSquare::CPU::Instruction(instruction),
address(addr),
argument(std::move(arg)),
opcode(op),
level(Safe)
{}
std::vector<DisassembledInstruction> CPUDebug::_disassemble(uint24_t pc, uint24_t length, DisassemblyContext &ctx)
{
std::vector<DisassembledInstruction> map;
uint24_t endAddr = pc + length;
while (pc < endAddr) {
DisassembledInstruction instruction = this->_parseInstruction(pc, ctx);
instruction.level = ctx.level;
map.push_back(instruction);
pc += instruction.size;
if (instruction.addressingMode == ImmediateForA && !ctx.mFlag)
pc++;
if (instruction.addressingMode == ImmediateForX && !ctx.xFlag)
pc++;
if (instruction.opcode == 0x40 && ctx.isEmulationMode) {// RTI
ctx.mFlag = true;
ctx.xFlag = true;
}
if (instruction.opcode == 0xC2) {// REP
if (ctx.isEmulationMode) {
ctx.mFlag = true;
ctx.xFlag = true;
} else {
uint8_t m = this->_snes.bus.peek_v(pc - 1);
ctx.mFlag &= ~m & 0b00100000u;
ctx.xFlag &= ~m & 0b00010000u;
}
}
if (instruction.opcode == 0xE2) {// SEP
uint8_t m = this->_snes.bus.peek_v(pc - 1);
ctx.mFlag |= m & 0b00100000u;
ctx.xFlag |= m & 0b00010000u;
}
if (instruction.opcode == 0x28) {// PLP
if (ctx.isEmulationMode) {
ctx.mFlag = true;
ctx.xFlag = true;
} else
ctx.level = Compromised;
}
if (instruction.opcode == 0xFB) {// XCE
ctx.level = Unsafe;
// The most common use of the XCE is to enable native mode at the start of the ROM
// so we guess that it has done that.
ctx.isEmulationMode = false;
}
}
return map;
}
DisassembledInstruction CPUDebug::_parseInstruction(uint24_t pc, DisassemblyContext &ctx) const
{
uint24_t opcode = this->_snes.bus.peek_v(pc);
const Instruction &instruction = this->_cpu.instructions[opcode];
std::string argument = this->_getInstructionParameter(instruction, pc + 1, ctx);
return DisassembledInstruction(instruction, pc, argument, opcode);
}
std::string CPUDebug::_getInstructionParameter(const Instruction &instruction, uint24_t pc, DisassemblyContext &ctx) const
{
switch (instruction.addressingMode) {
case Implied:
return "";
case Immediate8bits:
return this->_getImmediateValue(pc, false);
case ImmediateForA:
return this->_getImmediateValue(pc, !ctx.mFlag);
case ImmediateForX:
return this->_getImmediateValue(pc, !ctx.xFlag);
case Absolute:
return this->_getAbsoluteValue(pc);
case AbsoluteLong:
return this->_getAbsoluteLongValue(pc);
case DirectPage:
return this->_getDirectValue(pc);
case DirectPageIndexedByX:
return this->_getDirectIndexedByXValue(pc);
case DirectPageIndirect:
return this->_getDirectIndirectValue(pc);
case DirectPageIndirectLong:
return this->_getDirectIndirectLongValue(pc);
case AbsoluteIndexedByX:
return this->_getAbsoluteIndexByXValue(pc);
case AbsoluteIndexedByXLong:
return this->_getAbsoluteIndexByXLongValue(pc);
case AbsoluteIndexedByY:
return this->_getAbsoluteIndexByYValue(pc);
case DirectPageIndexedByY:
return this->_getDirectIndexedByYValue(pc);
case DirectPageIndirectIndexedByX:
return this->_getDirectIndexedByXIndirectValue(pc);
case DirectPageIndirectIndexedByY:
return this->_getDirectIndirectIndexedByYValue(pc);
case DirectPageIndirectIndexedByYLong:
return this->_getDirectIndirectIndexedByYLongValue(pc);
case StackRelative:
return this->_getStackRelativeValue(pc);
case StackRelativeIndirectIndexedByY:
return this->_getStackRelativeIndirectIndexedByYValue(pc);
case AbsoluteIndirect:
return this->_getAbsoluteIndirectValue(pc);
case AbsoluteIndirectIndexedByX:
return this->_getAbsoluteIndirectIndexedByXValue(pc);
case AbsoluteIndirectLong:
return this->_getAbsoluteIndirectLongValue(pc);
default:
return "???";
}
}
std::string CPUDebug::_getImmediateValue(uint24_t pc, bool dual) const
{
unsigned value = this->_snes.bus.peek_v(pc);
if (dual)
value += this->_snes.bus.peek_v(pc + 1) << 8u;
std::stringstream ss;
ss << "#$" << std::hex << value;
return ss.str();
}
std::string CPUDebug::_getDirectValue(uint24_t pc) const
{
return Utility::to_hex(this->_snes.bus.peek_v(pc), Utility::HexString::AsmPrefix);
}
std::string CPUDebug::_getAbsoluteValue(uint24_t pc) const
{
uint24_t value = this->_snes.bus.peek_v(pc) + (this->_snes.bus.peek_v(pc + 1) << 8u);
return Utility::to_hex(value, Utility::HexString::AsmPrefix);
}
std::string CPUDebug::_getAbsoluteLongValue(uint24_t pc) const
{
unsigned value = this->_snes.bus.peek_v(pc++);
value += this->_snes.bus.peek_v(pc++) << 8u;
value += this->_snes.bus.peek_v(pc) << 16u;
return Utility::to_hex(value, Utility::HexString::AsmPrefix);
}
std::string CPUDebug::_getDirectIndexedByXValue(uint24_t pc) const
{
unsigned value = this->_snes.bus.peek_v(pc);
std::stringstream ss;
ss << "$" << std::hex << value << ", x";
return ss.str();
}
std::string CPUDebug::_getDirectIndexedByYValue(uint24_t pc) const
{
unsigned value = this->_snes.bus.peek_v(pc);
std::stringstream ss;
ss << "$" << std::hex << value << ", y";
return ss.str();
}
std::string CPUDebug::_getDirectIndirectValue(uint24_t pc) const
{
return "(" + Utility::to_hex(this->_snes.bus.peek_v(pc), Utility::AsmPrefix) + ")";
}
std::string CPUDebug::_getDirectIndirectLongValue(uint24_t pc) const
{
return "[" + Utility::to_hex(this->_snes.bus.peek_v(pc), Utility::AsmPrefix) + "]";
}
std::string CPUDebug::_getAbsoluteIndexByXValue(uint24_t pc) const
{
uint24_t value = this->_snes.bus.peek_v(pc) + (this->_snes.bus.peek_v(pc + 1) << 8u);
return Utility::to_hex(value, Utility::HexString::AsmPrefix) + ", x";
}
std::string CPUDebug::_getAbsoluteIndexByYValue(uint24_t pc) const
{
uint24_t value = this->_snes.bus.peek_v(pc) + (this->_snes.bus.peek_v(pc + 1) << 8u);
return Utility::to_hex(value, Utility::HexString::AsmPrefix) + ", y";
}
std::string CPUDebug::_getAbsoluteIndexByXLongValue(uint24_t pc) const
{
unsigned value = this->_snes.bus.peek_v(pc++);
value += this->_snes.bus.peek_v(pc++) << 8u;
value += this->_snes.bus.peek_v(pc) << 16u;
return Utility::to_hex(value, Utility::HexString::AsmPrefix) + ", x";
}
std::string CPUDebug::_getDirectIndexedByXIndirectValue(uint24_t pc) const
{
unsigned value = this->_snes.bus.peek_v(pc);
std::stringstream ss;
ss << "($" << std::hex << value << ", x)";
return ss.str();
}
std::string CPUDebug::_getDirectIndirectIndexedByYValue(uint24_t pc) const
{
unsigned value = this->_snes.bus.peek_v(pc);
std::stringstream ss;
ss << "($" << std::hex << value << "), y";
return ss.str();
}
std::string CPUDebug::_getDirectIndirectIndexedByYLongValue(uint24_t pc) const
{
unsigned value = this->_snes.bus.peek_v(pc);
std::stringstream ss;
ss << "[$" << std::hex << value << "], y";
return ss.str();
}
std::string CPUDebug::_getStackRelativeValue(uint24_t pc) const
{
return Utility::to_hex(this->_snes.bus.peek_v(pc), Utility::AsmPrefix) + ", s";
}
std::string CPUDebug::_getStackRelativeIndirectIndexedByYValue(uint24_t pc) const
{
return "(" + Utility::to_hex(this->_snes.bus.peek_v(pc), Utility::AsmPrefix) + ", s), y";
}
std::string CPUDebug::_getAbsoluteIndirectValue(uint24_t pc) const
{
uint24_t value = this->_snes.bus.peek_v(pc) + (this->_snes.bus.peek_v(pc + 1) << 8u);
return "(" + Utility::to_hex(value, Utility::HexString::AsmPrefix) + ")";
}
std::string CPUDebug::_getAbsoluteIndirectLongValue(uint24_t pc) const
{
unsigned value = this->_snes.bus.peek_v(pc++);
value += this->_snes.bus.peek_v(pc++) << 8u;
value += this->_snes.bus.peek_v(pc) << 16u;
return "(" + Utility::to_hex(value, Utility::HexString::AsmPrefix) + ")";
}
std::string CPUDebug::_getAbsoluteIndirectIndexedByXValue(uint24_t pc) const
{
uint24_t value = this->_snes.bus.peek_v(pc) + (this->_snes.bus.peek_v(pc + 1) << 8u);
return "(" + Utility::to_hex(value, Utility::HexString::AsmPrefix) + ", x)";
}
}// namespace ComSquare::Debugger