1
0
mirror of https://github.com/jscrane/r65emu.git synced 2024-12-22 03:30:02 +00:00
r65emu/i8080.cpp

272 lines
7.8 KiB
C++
Raw Normal View History

2018-08-10 10:13:45 +00:00
#include <stdio.h>
#include <Stream.h>
2014-12-08 13:22:02 +00:00
#include "memory.h"
#include "CPU.h"
2015-11-30 14:49:56 +00:00
#include "ports.h"
2014-12-08 13:22:02 +00:00
#include "i8080.h"
void i8080::run(unsigned clocks) {
2016-01-23 21:15:14 +00:00
while (clocks--) {
2018-08-13 13:41:23 +00:00
uint8_t op = _mem[PC];
2016-01-23 21:15:14 +00:00
PC++;
(this->*_ops[op])();
if (_halted)
break;
2014-12-08 13:22:02 +00:00
}
}
void i8080::reset() {
A = 0;
_sr(0);
BC = DE = HL = PC = SP = 0;
_irq_pending = 0;
2016-01-23 21:15:14 +00:00
_halted = false;
2014-12-08 13:22:02 +00:00
}
void i8080::raise(int level) {
if (flags.I) {
flags.I = 0;
_irq_pending = 0;
_push(PC);
PC = level * 8;
} else
_irq_pending = level;
}
void i8080::ei() {
flags.I = 1;
if (_irq_pending)
raise(_irq_pending);
}
char *i8080::status(char *buf, size_t n, bool hdr) {
2018-08-13 13:41:23 +00:00
uint8_t op = _mem[PC];
2016-01-24 15:29:06 +00:00
snprintf(buf, n,
"%s%04x %02x %02x %04x %04x %04x %04x %d%d%d%d%d%d%d%d",
hdr? "_pc_ op aa _bc_ _de_ _hl_ _sp_ szih_p_c\r": "",
2016-01-23 21:15:14 +00:00
PC, op, A, BC, DE, HL, SP, flags.S, flags.Z, flags.I, flags.H,
flags._, flags.P, flags.__, flags.C);
2014-12-08 13:22:02 +00:00
return buf;
}
void i8080::checkpoint(Stream &s) {
s.write(A);
s.write(SR);
s.write(BC);
s.write(DE);
s.write(HL);
s.write(PC);
s.write(SP);
s.write(_irq_pending);
}
void i8080::restore(Stream &s) {
A = s.read();
SR = s.read();
BC = s.read();
DE = s.read();
HL = s.read();
PC = s.read();
SP = s.read();
_irq_pending = s.read();
}
void i8080::daa() {
2018-08-13 13:41:23 +00:00
uint8_t c = flags.C, a = 0, hi = (A & 0xf0) >> 4, lo = A & 0x0f;
2014-12-08 13:22:02 +00:00
if (flags.H || lo > 9)
a = 0x06;
if (flags.C || hi > 0x9 || (hi >= 0x9 && lo > 9)) {
a |= 0x60;
c = 1;
}
_add(a);
flags.C = c;
}
int i8080::parity_table[] = {
1, 0, 0, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 0, 0, 1,
0, 1, 1, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 1, 1, 0,
0, 1, 1, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 1, 1, 0,
1, 0, 0, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 0, 0, 1,
0, 1, 1, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 1, 1, 0,
1, 0, 0, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 0, 0, 1,
1, 0, 0, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 0, 0, 1,
0, 1, 1, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 1, 1, 0,
0, 1, 1, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 1, 1, 0,
1, 0, 0, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 0, 0, 1,
1, 0, 0, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 0, 0, 1,
0, 1, 1, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 1, 1, 0,
1, 0, 0, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 0, 0, 1,
0, 1, 1, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 1, 1, 0,
0, 1, 1, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 1, 1, 0,
1, 0, 0, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 0, 0, 1,
};
2016-01-23 21:15:14 +00:00
i8080::i8080(Memory &m, PortDevice<i8080> &d): CPU(m)
2014-12-08 13:22:02 +00:00
{
_ports = &d;
OP *p = _ops;
// 0x
2018-08-10 10:13:45 +00:00
*p++ = &i8080::nop; *p++ = &i8080::lxib;
2014-12-08 13:22:02 +00:00
*p++ = &i8080::staxb; *p++ = &i8080::inxb;
*p++ = &i8080::inrb; *p++ = &i8080::dcrb;
*p++ = &i8080::mvib; *p++ = &i8080::rlc;
*p++ = &i8080::nop; *p++ = &i8080::dadb;
*p++ = &i8080::ldaxb; *p++ = &i8080::dcxb;
*p++ = &i8080::inrc; *p++ = &i8080::dcrc;
*p++ = &i8080::mvic; *p++ = &i8080::rrc;
// 1x
2018-08-10 10:13:45 +00:00
*p++ = &i8080::nop; *p++ = &i8080::lxid;
2014-12-08 13:22:02 +00:00
*p++ = &i8080::staxd; *p++ = &i8080::inxd;
*p++ = &i8080::inrd; *p++ = &i8080::dcrd;
*p++ = &i8080::mvid; *p++ = &i8080::ral;
*p++ = &i8080::nop; *p++ = &i8080::dadd;
*p++ = &i8080::ldaxd; *p++ = &i8080::dcxd;
*p++ = &i8080::inre; *p++ = &i8080::dcre;
*p++ = &i8080::mvie; *p++ = &i8080::rar;
// 2x
*p++ = &i8080::nop; *p++ = &i8080::lxih;
*p++ = &i8080::shld; *p++ = &i8080::inxh;
*p++ = &i8080::inrh; *p++ = &i8080::dcrh;
*p++ = &i8080::mvih; *p++ = &i8080::daa;
2018-08-10 10:13:45 +00:00
*p++ = &i8080::nop; *p++ = &i8080::dadh;
*p++ = &i8080::lhld; *p++ = &i8080::dcxh;
*p++ = &i8080::inrl; *p++ = &i8080::dcrl;
*p++ = &i8080::mvil; *p++ = &i8080::cma;
2014-12-08 13:22:02 +00:00
// 3x
*p++ = &i8080::nop; *p++ = &i8080::lxisp;
*p++ = &i8080::sta; *p++ = &i8080::inxsp;
*p++ = &i8080::inrm; *p++ = &i8080::dcrm;
*p++ = &i8080::mvim; *p++ = &i8080::stc;
*p++ = &i8080::nop; *p++ = &i8080::dadsp;
*p++ = &i8080::lda; *p++ = &i8080::dcxsp;
*p++ = &i8080::inra; *p++ = &i8080::dcra;
*p++ = &i8080::mvia; *p++ = &i8080::cmc;
// 4x
*p++ = &i8080::movbb; *p++ = &i8080::movbc;
*p++ = &i8080::movbd; *p++ = &i8080::movbe;
*p++ = &i8080::movbh; *p++ = &i8080::movbl;
*p++ = &i8080::movbm; *p++ = &i8080::movba;
*p++ = &i8080::movcb; *p++ = &i8080::movcc;
*p++ = &i8080::movcd; *p++ = &i8080::movce;
*p++ = &i8080::movch; *p++ = &i8080::movcl;
*p++ = &i8080::movcm; *p++ = &i8080::movca;
// 5x
*p++ = &i8080::movdb; *p++ = &i8080::movdc;
*p++ = &i8080::movdd; *p++ = &i8080::movde;
*p++ = &i8080::movdh; *p++ = &i8080::movdl;
*p++ = &i8080::movdm; *p++ = &i8080::movda;
*p++ = &i8080::moveb; *p++ = &i8080::movec;
*p++ = &i8080::moved; *p++ = &i8080::movee;
*p++ = &i8080::moveh; *p++ = &i8080::movel;
*p++ = &i8080::movem; *p++ = &i8080::movea;
// 6x
*p++ = &i8080::movhb; *p++ = &i8080::movhc;
*p++ = &i8080::movhd; *p++ = &i8080::movhe;
*p++ = &i8080::movhh; *p++ = &i8080::movhl;
*p++ = &i8080::movhm; *p++ = &i8080::movha;
*p++ = &i8080::movlb; *p++ = &i8080::movlc;
*p++ = &i8080::movld; *p++ = &i8080::movle;
*p++ = &i8080::movlh; *p++ = &i8080::movll;
*p++ = &i8080::movlm; *p++ = &i8080::movla;
// 7x
*p++ = &i8080::movmb; *p++ = &i8080::movmc;
*p++ = &i8080::movmd; *p++ = &i8080::movme;
*p++ = &i8080::movmh; *p++ = &i8080::movml;
*p++ = &i8080::hlt; *p++ = &i8080::movma;
*p++ = &i8080::movab; *p++ = &i8080::movac;
*p++ = &i8080::movad; *p++ = &i8080::movae;
*p++ = &i8080::movah; *p++ = &i8080::moval;
*p++ = &i8080::movam; *p++ = &i8080::movaa;
// 8x
*p++ = &i8080::addb; *p++ = &i8080::addc;
*p++ = &i8080::addd; *p++ = &i8080::adde;
*p++ = &i8080::addh; *p++ = &i8080::addl;
*p++ = &i8080::addm; *p++ = &i8080::adda;
*p++ = &i8080::adcb; *p++ = &i8080::adcc;
*p++ = &i8080::adcd; *p++ = &i8080::adce;
*p++ = &i8080::adch; *p++ = &i8080::adcl;
*p++ = &i8080::adcm; *p++ = &i8080::adca;
// 9x
*p++ = &i8080::subb; *p++ = &i8080::subc;
*p++ = &i8080::subd; *p++ = &i8080::sube;
*p++ = &i8080::subh; *p++ = &i8080::subl;
*p++ = &i8080::subm; *p++ = &i8080::suba;
*p++ = &i8080::sbbb; *p++ = &i8080::sbbc;
*p++ = &i8080::sbbd; *p++ = &i8080::sbbe;
*p++ = &i8080::sbbh; *p++ = &i8080::sbbl;
*p++ = &i8080::sbbm; *p++ = &i8080::sbba;
// Ax
*p++ = &i8080::anab; *p++ = &i8080::anac;
*p++ = &i8080::anad; *p++ = &i8080::anae;
*p++ = &i8080::anah; *p++ = &i8080::anal;
*p++ = &i8080::anam; *p++ = &i8080::anaa;
*p++ = &i8080::xrab; *p++ = &i8080::xrac;
*p++ = &i8080::xrad; *p++ = &i8080::xrae;
*p++ = &i8080::xrah; *p++ = &i8080::xral;
*p++ = &i8080::xram; *p++ = &i8080::xraa;
// Bx
*p++ = &i8080::orab; *p++ = &i8080::orac;
*p++ = &i8080::orad; *p++ = &i8080::orae;
*p++ = &i8080::orah; *p++ = &i8080::oral;
*p++ = &i8080::oram; *p++ = &i8080::oraa;
*p++ = &i8080::cmpb; *p++ = &i8080::cmpc;
*p++ = &i8080::cmpd; *p++ = &i8080::cmpe;
*p++ = &i8080::cmph; *p++ = &i8080::cmpl;
*p++ = &i8080::cmpm; *p++ = &i8080::cmpa;
// Cx
*p++ = &i8080::rnz; *p++ = &i8080::popb;
*p++ = &i8080::jnz; *p++ = &i8080::jmp;
*p++ = &i8080::cnz; *p++ = &i8080::pushb;
*p++ = &i8080::adi; *p++ = &i8080::rst0;
*p++ = &i8080::rz; *p++ = &i8080::ret;
*p++ = &i8080::jz; *p++ = &i8080::jmp;
*p++ = &i8080::cz; *p++ = &i8080::call;
*p++ = &i8080::aci; *p++ = &i8080::rst1;
// Dx
*p++ = &i8080::rnc; *p++ = &i8080::popd;
*p++ = &i8080::jnc; *p++ = &i8080::out;
*p++ = &i8080::cnc; *p++ = &i8080::pushd;
*p++ = &i8080::sui; *p++ = &i8080::rst2;
*p++ = &i8080::rc; *p++ = &i8080::ret;
*p++ = &i8080::jc; *p++ = &i8080::in;
*p++ = &i8080::cc; *p++ = &i8080::call;
*p++ = &i8080::sbi; *p++ = &i8080::rst3;
// Ex
*p++ = &i8080::rpo; *p++ = &i8080::poph;
*p++ = &i8080::jpo; *p++ = &i8080::xthl;
*p++ = &i8080::cpo; *p++ = &i8080::pushh;
*p++ = &i8080::ani; *p++ = &i8080::rst4;
*p++ = &i8080::rpe; *p++ = &i8080::pchl;
*p++ = &i8080::jpe; *p++ = &i8080::xchg;
*p++ = &i8080::cpe; *p++ = &i8080::call;
*p++ = &i8080::xri; *p++ = &i8080::rst5;
// Fx
*p++ = &i8080::rp; *p++ = &i8080::pop;
*p++ = &i8080::jp; *p++ = &i8080::di;
*p++ = &i8080::cp; *p++ = &i8080::push;
*p++ = &i8080::ori; *p++ = &i8080::rst6;
*p++ = &i8080::rm; *p++ = &i8080::sphl;
*p++ = &i8080::jm; *p++ = &i8080::ei;
*p++ = &i8080::cm; *p++ = &i8080::call;
*p++ = &i8080::cpi; *p++ = &i8080::rst7;
}