bool LDAAbsXInstr::exp(asmjit::X86Assembler& a, MemoryMapper& m) {
auto temp = asmjit::x86::rax;
a.mov(temp, this->base);
a.add(temp, REG_X);
auto tmpPtr = asmjit::x86::byte_ptr(temp);
{
auto NotZero = a.newLabel();
auto Exit = a.newLabel();
a.cmp(tmpPtr, 0);
a.jne(NotZero);
// Value was 0
a.bts(REG_S, S_ZERO);
a.jmp(Exit);
// Value was not 0
a.bind(NotZero);
a.btr(REG_S, S_ZERO);
//No jmp required, just fall though
a.bind(Exit);
}
a.mov(REG_A, tmpPtr);
return true;
}
bool BPLRelInstr::exp(asmjit::X86Assembler& a, MemoryMapper& m) {
auto Set = a.newLabel();
a.bt(REG_S, S_NEGATIVE);
a.jc(Set);
a.mov(asmjit::x86::di, this->next + this->target);
a.jmp((uint64_t)&jit_and_jump);
a.bind(Set);
a.mov(asmjit::x86::di, this->next);
a.jmp((uint64_t)&jit_and_jump);
return false;
}
bool BEQRelInstr::exp(asmjit::X86Assembler& a, MemoryMapper& m) {
auto NotSet = a.newLabel();
a.bt(REG_S, S_ZERO);
a.jnc(NotSet);
a.mov(asmjit::x86::di, this->next + this->target);
a.jmp((uint64_t)&jit_and_jump);
a.bind(NotSet);
a.mov(asmjit::x86::di, this->next);
a.jmp((uint64_t)&jit_and_jump);
return false;
}
static void emitDump(asmjit::X86Assembler& a) {
a.push(asmjit::x86::r10);
a.push(asmjit::x86::r11);
a.mov(asmjit::x86::dil, REG_A);
a.mov(asmjit::x86::sil, REG_X);
a.mov(asmjit::x86::dl, REG_Y);
a.mov(asmjit::x86::cl, REG_S);
a.call((uint64_t)&dump);
a.pop(asmjit::x86::r11);
a.pop(asmjit::x86::r10);
}
void virtual_pop(asmjit::X86Assembler& a, MemoryMapper& m, T dst) {
a.inc(REG_SP);
a.mov(REG_TMP, 0x0100);
// @CLEANUP TMP is rax, but we can't or with a larger register
a.add(asmjit::x86::al, REG_SP);
m.emitDynamicLoad(a, REG_TMP, dst);
}
void virtual_push(asmjit::X86Assembler& a, MemoryMapper& m, T value) {
a.mov(REG_TMP, 0x0100);
// @CLEANUP TMP is rax, but we can't or with a larger register
a.add(asmjit::x86::al, REG_SP);
m.emitDynamicStore(a, REG_TMP, value);
a.dec(REG_SP);
}
bool LDXImmInstr::exp(asmjit::X86Assembler& a, MemoryMapper& m) {
a.mov(REG_X, this->m_value);
// Immediate mode knows the value at compile time, so just emit the right
// thing
if(this->m_value == 0)
a.bts(REG_S, S_ZERO);
else
a.btr(REG_S, S_ZERO);
return true;
}
bool RTS::exp(asmjit::X86Assembler& a, MemoryMapper& m) {
// Use rbx because that's safe during a call
virtual_pop(a, m, asmjit::x86::bl);
a.shl(asmjit::x86::bx, 8);
virtual_pop(a, m, asmjit::x86::dl);
a.or_(asmjit::x86::bx, asmjit::x86::dx);
a.mov(asmjit::x86::rdi, asmjit::x86::rbx);
a.jmp((uint64_t)&jit_and_jump);
return false;
}
bool JSRAbsInstr::exp(asmjit::X86Assembler& a, MemoryMapper& m) {
// Push the virtual PC to the stack
// @COMPLETENESS: This order is likely wrong!
virtual_push(a, m, static_cast<uint8_t>(next & 0xFF));
virtual_push(a, m, static_cast<uint8_t>(next >> 8));
a.mov(asmjit::x86::di, this->target);
a.jmp((uint64_t)&jit_and_jump);
return false;
}
void RamMemoryBank::emitStore(asmjit::X86Assembler& a, uint16_t addr, asmjit::X86Gp src) {
auto temp = asmjit::x86::rax;
a.mov(temp, (uint64_t)this->memory.get() + addr);
a.mov(asmjit::x86::byte_ptr(temp), src);
}
void RamMemoryBank::emitLoad(asmjit::X86Assembler& a, uint16_t addr, asmjit::X86Gp dest) {
auto temp = asmjit::x86::rax;
a.mov(temp, (uint64_t)this->memory.get() + addr);
a.mov(dest, asmjit::x86::byte_ptr(temp));
}
bool JMPAbsInstr::exp(asmjit::X86Assembler& a, MemoryMapper& m) {
a.mov(asmjit::x86::di, this->m_target);
a.jmp((uint64_t)&jit_and_jump);
return false;
}