mirror of
https://github.com/mauiaaron/apple2.git
synced 2025-01-11 14:30:08 +00:00
LDA tests
This commit is contained in:
Aaron Culliney
parent
16f061b74a
commit
3c72a8a5e3
@ -3578,6 +3578,372 @@ TEST test_JSR_abs(uint8_t lobyte, uint8_t hibyte) {
|
||||
PASS();
|
||||
}
|
||||
|
||||
// ----------------------------------------------------------------------------
|
||||
// LDA instructions
|
||||
|
||||
static void logic_LDA(/*uint8_t*/int _a, /*uint8_t*/int _b, uint8_t *result, uint8_t *flags) {
|
||||
uint8_t a = (uint8_t)_a;
|
||||
uint8_t b = (uint8_t)_b;
|
||||
|
||||
uint8_t res = b;
|
||||
if ((res & 0xff) == 0x0) {
|
||||
*flags |= fZ;
|
||||
}
|
||||
if (res & 0x80) {
|
||||
*flags |= fN;
|
||||
}
|
||||
|
||||
*result = res;
|
||||
}
|
||||
|
||||
TEST test_LDA_imm(uint8_t regA, uint8_t val) {
|
||||
HEADER0();
|
||||
|
||||
logic_LDA(regA, val, &result, &flags);
|
||||
|
||||
testcpu_set_opcode2(0xa9, val);
|
||||
|
||||
cpu65_current.a = regA;
|
||||
cpu65_current.x = 0x03;
|
||||
cpu65_current.y = 0x04;
|
||||
cpu65_current.sp = 0x80;
|
||||
cpu65_current.f = 0x00;
|
||||
|
||||
cpu65_run();
|
||||
|
||||
ASSERT(cpu65_current.pc == TEST_LOC+2);
|
||||
ASSERT(cpu65_current.x == 0x03);
|
||||
ASSERT(cpu65_current.y == 0x04);
|
||||
ASSERT(cpu65_current.sp == 0x80);
|
||||
|
||||
snprintf(msgbuf, MSG_SIZE, MSG_FLAGS0, regA, val, result, buf0, cpu65_current.a, buf1);
|
||||
ASSERTm(msgbuf, cpu65_current.a == result);
|
||||
VERIFY_FLAGS();
|
||||
|
||||
ASSERT(cpu65_debug.ea == TEST_LOC+1);
|
||||
ASSERT(cpu65_debug.d == 0xff);
|
||||
ASSERT(cpu65_debug.rw == RW_READ);
|
||||
ASSERT(cpu65_debug.opcode == 0xa9);
|
||||
ASSERT(cpu65_debug.opcycles == (2));
|
||||
|
||||
PASS();
|
||||
}
|
||||
|
||||
TEST test_LDA_zpage(uint8_t regA, uint8_t val, uint8_t arg0) {
|
||||
HEADER0();
|
||||
|
||||
logic_LDA(regA, val, &result, &flags);
|
||||
|
||||
testcpu_set_opcode2(0xa5, arg0);
|
||||
|
||||
apple_ii_64k[0][arg0] = val;
|
||||
|
||||
cpu65_current.a = regA;
|
||||
cpu65_current.x = 0x03;
|
||||
cpu65_current.y = 0x04;
|
||||
cpu65_current.sp = 0x80;
|
||||
cpu65_current.f = 0x00;
|
||||
|
||||
cpu65_run();
|
||||
|
||||
ASSERT(cpu65_current.pc == TEST_LOC+2);
|
||||
ASSERT(cpu65_current.x == 0x03);
|
||||
ASSERT(cpu65_current.y == 0x04);
|
||||
ASSERT(cpu65_current.sp == 0x80);
|
||||
|
||||
ASSERT(cpu65_current.a == result);
|
||||
VERIFY_FLAGS();
|
||||
|
||||
ASSERT(cpu65_debug.ea == arg0);
|
||||
ASSERT(cpu65_debug.d == 0xff);
|
||||
ASSERT(cpu65_debug.rw == RW_READ);
|
||||
ASSERT(cpu65_debug.opcode == 0xa5);
|
||||
ASSERT(cpu65_debug.opcycles == (3));
|
||||
|
||||
PASS();
|
||||
}
|
||||
|
||||
TEST test_LDA_zpage_x(uint8_t regA, uint8_t val, uint8_t arg0, uint8_t regX) {
|
||||
HEADER0();
|
||||
|
||||
logic_LDA(regA, val, &result, &flags);
|
||||
|
||||
testcpu_set_opcode2(0xb5, arg0);
|
||||
|
||||
uint8_t idx = arg0+regX;
|
||||
|
||||
apple_ii_64k[0][idx] = val;
|
||||
|
||||
cpu65_current.a = regA;
|
||||
cpu65_current.x = regX;
|
||||
cpu65_current.y = 0x05;
|
||||
cpu65_current.sp = 0x81;
|
||||
cpu65_current.f = 0x00;
|
||||
|
||||
cpu65_run();
|
||||
|
||||
ASSERT(cpu65_current.pc == TEST_LOC+2);
|
||||
ASSERT(cpu65_current.x == regX);
|
||||
ASSERT(cpu65_current.y == 0x05);
|
||||
ASSERT(cpu65_current.sp == 0x81);
|
||||
|
||||
ASSERT(cpu65_current.a == result);
|
||||
VERIFY_FLAGS();
|
||||
|
||||
ASSERT(cpu65_debug.ea == idx);
|
||||
ASSERT(cpu65_debug.d == 0xff);
|
||||
ASSERT(cpu65_debug.rw == RW_READ);
|
||||
ASSERT(cpu65_debug.opcode == 0xb5);
|
||||
ASSERT(cpu65_debug.opcycles == (4));
|
||||
|
||||
PASS();
|
||||
}
|
||||
|
||||
TEST test_LDA_abs(uint8_t regA, uint8_t val, uint8_t lobyte, uint8_t hibyte) {
|
||||
HEADER0();
|
||||
|
||||
logic_LDA(regA, val, &result, &flags);
|
||||
|
||||
testcpu_set_opcode3(0xad, lobyte, hibyte);
|
||||
|
||||
uint16_t addrs = lobyte | (hibyte<<8);
|
||||
apple_ii_64k[0][addrs] = val;
|
||||
|
||||
cpu65_current.a = regA;
|
||||
cpu65_current.x = 0xf4;
|
||||
cpu65_current.y = 0x05;
|
||||
cpu65_current.sp = 0x81;
|
||||
cpu65_current.f = 0x00;
|
||||
|
||||
cpu65_run();
|
||||
|
||||
ASSERT(cpu65_current.pc == TEST_LOC+3);
|
||||
ASSERT(cpu65_current.x == 0xf4);
|
||||
ASSERT(cpu65_current.y == 0x05);
|
||||
ASSERT(cpu65_current.sp == 0x81);
|
||||
|
||||
ASSERT(cpu65_current.a == result);
|
||||
VERIFY_FLAGS();
|
||||
|
||||
ASSERT(cpu65_debug.ea == addrs);
|
||||
ASSERT(cpu65_debug.d == 0xff);
|
||||
ASSERT(cpu65_debug.rw == RW_READ);
|
||||
ASSERT(cpu65_debug.opcode == 0xad);
|
||||
ASSERT(cpu65_debug.opcycles == (4));
|
||||
|
||||
PASS();
|
||||
}
|
||||
|
||||
TEST test_LDA_abs_x(uint8_t regA, uint8_t val, uint8_t regX, uint8_t lobyte, uint8_t hibyte) {
|
||||
HEADER0();
|
||||
|
||||
logic_LDA(regA, val, &result, &flags);
|
||||
|
||||
testcpu_set_opcode3(0xbd, lobyte, hibyte);
|
||||
|
||||
uint8_t cycle_count = 4;
|
||||
uint16_t addrs = lobyte | (hibyte<<8);
|
||||
addrs = addrs + regX;
|
||||
if ((uint8_t)((addrs>>8)&0xff) != (uint8_t)hibyte) {
|
||||
++cycle_count;
|
||||
}
|
||||
apple_ii_64k[0][addrs] = val;
|
||||
|
||||
cpu65_current.a = regA;
|
||||
cpu65_current.x = regX;
|
||||
cpu65_current.y = 0x05;
|
||||
cpu65_current.sp = 0x81;
|
||||
cpu65_current.f = 0x00;
|
||||
|
||||
cpu65_run();
|
||||
|
||||
ASSERT(cpu65_current.pc == TEST_LOC+3);
|
||||
ASSERT(cpu65_current.x == regX);
|
||||
ASSERT(cpu65_current.y == 0x05);
|
||||
ASSERT(cpu65_current.sp == 0x81);
|
||||
|
||||
ASSERT(cpu65_current.a == result);
|
||||
VERIFY_FLAGS();
|
||||
|
||||
ASSERT(cpu65_debug.ea == addrs);
|
||||
ASSERT(cpu65_debug.d == 0xff);
|
||||
ASSERT(cpu65_debug.rw == RW_READ);
|
||||
ASSERT(cpu65_debug.opcode == 0xbd);
|
||||
ASSERT(cpu65_debug.opcycles == cycle_count);
|
||||
|
||||
PASS();
|
||||
}
|
||||
|
||||
TEST test_LDA_abs_y(uint8_t regA, uint8_t val, uint8_t regY, uint8_t lobyte, uint8_t hibyte) {
|
||||
HEADER0();
|
||||
|
||||
logic_LDA(regA, val, &result, &flags);
|
||||
|
||||
testcpu_set_opcode3(0xb9, lobyte, hibyte);
|
||||
|
||||
uint8_t cycle_count = 4;
|
||||
uint16_t addrs = lobyte | (hibyte<<8);
|
||||
addrs = addrs + regY;
|
||||
if ((uint8_t)((addrs>>8)&0xff) != (uint8_t)hibyte) {
|
||||
++cycle_count;
|
||||
}
|
||||
apple_ii_64k[0][addrs] = val;
|
||||
|
||||
cpu65_current.a = regA;
|
||||
cpu65_current.x = 0x02;
|
||||
cpu65_current.y = regY;
|
||||
cpu65_current.sp = 0x81;
|
||||
cpu65_current.f = 0x00;
|
||||
|
||||
cpu65_run();
|
||||
|
||||
ASSERT(cpu65_current.pc == TEST_LOC+3);
|
||||
ASSERT(cpu65_current.x == 0x02);
|
||||
ASSERT(cpu65_current.y == regY);
|
||||
ASSERT(cpu65_current.sp == 0x81);
|
||||
|
||||
ASSERT(cpu65_current.a == result);
|
||||
VERIFY_FLAGS();
|
||||
|
||||
ASSERT(cpu65_debug.ea == addrs);
|
||||
ASSERT(cpu65_debug.d == 0xff);
|
||||
ASSERT(cpu65_debug.rw == RW_READ);
|
||||
ASSERT(cpu65_debug.opcode == 0xb9);
|
||||
ASSERT(cpu65_debug.opcycles == cycle_count);
|
||||
|
||||
PASS();
|
||||
}
|
||||
|
||||
TEST test_LDA_ind_x(uint8_t regA, uint8_t val, uint8_t arg0, uint8_t regX, uint8_t lobyte, uint8_t hibyte) {
|
||||
HEADER0();
|
||||
|
||||
logic_LDA(regA, val, &result, &flags);
|
||||
|
||||
testcpu_set_opcode2(0xa1, arg0);
|
||||
|
||||
uint8_t idx_lo = arg0 + regX;
|
||||
uint8_t idx_hi = idx_lo+1;
|
||||
uint16_t addrs = lobyte | (hibyte<<8);
|
||||
|
||||
apple_ii_64k[0][idx_lo] = lobyte;
|
||||
apple_ii_64k[0][idx_hi] = hibyte;
|
||||
apple_ii_64k[0][addrs] = val;
|
||||
|
||||
cpu65_current.a = regA;
|
||||
cpu65_current.x = regX;
|
||||
cpu65_current.y = 0x15;
|
||||
cpu65_current.sp = 0x81;
|
||||
cpu65_current.f = 0x00;
|
||||
|
||||
cpu65_run();
|
||||
|
||||
ASSERT(cpu65_current.pc == TEST_LOC+2);
|
||||
ASSERT(cpu65_current.x == regX);
|
||||
ASSERT(cpu65_current.y == 0x15);
|
||||
ASSERT(cpu65_current.sp == 0x81);
|
||||
|
||||
ASSERT(cpu65_current.a == result);
|
||||
VERIFY_FLAGS();
|
||||
|
||||
ASSERT(cpu65_debug.ea == addrs);
|
||||
ASSERT(cpu65_debug.d == 0xff);
|
||||
ASSERT(cpu65_debug.rw == RW_READ);
|
||||
ASSERT(cpu65_debug.opcode == 0xa1);
|
||||
|
||||
ASSERT(cpu65_debug.opcycles == (6));
|
||||
|
||||
PASS();
|
||||
}
|
||||
|
||||
TEST test_LDA_ind_y(uint8_t regA, uint8_t val, uint8_t arg0, uint8_t regY, uint8_t val_zp0, uint8_t val_zp1) {
|
||||
HEADER0();
|
||||
|
||||
logic_LDA(regA, val, &result, &flags);
|
||||
|
||||
testcpu_set_opcode2(0xb1, arg0);
|
||||
|
||||
uint8_t idx0 = arg0;
|
||||
uint8_t idx1 = arg0+1;
|
||||
|
||||
apple_ii_64k[0][idx0] = val_zp0;
|
||||
apple_ii_64k[0][idx1] = val_zp1;
|
||||
|
||||
uint8_t cycle_count = 5;
|
||||
uint16_t addrs = val_zp0 | (val_zp1<<8);
|
||||
addrs += (uint8_t)regY;
|
||||
if ((uint8_t)((addrs>>8)&0xff) != (uint8_t)val_zp1) {
|
||||
++cycle_count;
|
||||
}
|
||||
|
||||
apple_ii_64k[0][addrs] = val;
|
||||
|
||||
cpu65_current.a = regA;
|
||||
cpu65_current.x = 0x84;
|
||||
cpu65_current.y = regY;
|
||||
cpu65_current.sp = 0x81;
|
||||
cpu65_current.f = 0x00;
|
||||
|
||||
cpu65_run();
|
||||
|
||||
ASSERT(cpu65_current.pc == TEST_LOC+2);
|
||||
ASSERT(cpu65_current.x == 0x84);
|
||||
ASSERT(cpu65_current.y == regY);
|
||||
ASSERT(cpu65_current.sp == 0x81);
|
||||
|
||||
ASSERT(cpu65_current.a == result);
|
||||
VERIFY_FLAGS();
|
||||
|
||||
ASSERT(cpu65_debug.ea == addrs);
|
||||
ASSERT(cpu65_debug.d == 0xff);
|
||||
ASSERT(cpu65_debug.rw == RW_READ);
|
||||
ASSERT(cpu65_debug.opcode == 0xb1);
|
||||
ASSERT(cpu65_debug.opcycles == cycle_count);
|
||||
|
||||
PASS();
|
||||
}
|
||||
|
||||
// 65c02 : 0xB2
|
||||
TEST test_LDA_ind_zpage(uint8_t regA, uint8_t val, uint8_t arg0, uint8_t lobyte, uint8_t hibyte) {
|
||||
HEADER0();
|
||||
|
||||
logic_LDA(regA, val, &result, &flags);
|
||||
|
||||
testcpu_set_opcode2(0xb2, arg0);
|
||||
|
||||
uint8_t idx0 = arg0;
|
||||
uint8_t idx1 = arg0+1;
|
||||
|
||||
apple_ii_64k[0][idx0] = lobyte;
|
||||
apple_ii_64k[0][idx1] = hibyte;
|
||||
|
||||
uint16_t addrs = lobyte | (hibyte<<8);
|
||||
apple_ii_64k[0][addrs] = val;
|
||||
|
||||
cpu65_current.a = regA;
|
||||
cpu65_current.x = 0x14;
|
||||
cpu65_current.y = 0x85;
|
||||
cpu65_current.sp = 0x81;
|
||||
cpu65_current.f = 0x00;
|
||||
|
||||
cpu65_run();
|
||||
|
||||
ASSERT(cpu65_current.pc == TEST_LOC+2);
|
||||
ASSERT(cpu65_current.x == 0x14);
|
||||
ASSERT(cpu65_current.y == 0x85);
|
||||
ASSERT(cpu65_current.sp == 0x81);
|
||||
|
||||
ASSERT(cpu65_current.a == result);
|
||||
VERIFY_FLAGS();
|
||||
|
||||
ASSERT(cpu65_debug.ea == addrs);
|
||||
ASSERT(cpu65_debug.d == 0xff);
|
||||
ASSERT(cpu65_debug.rw == RW_READ);
|
||||
ASSERT(cpu65_debug.opcode == 0xb2);
|
||||
ASSERT(cpu65_debug.opcycles == (5));
|
||||
|
||||
PASS();
|
||||
}
|
||||
|
||||
// ----------------------------------------------------------------------------
|
||||
// NOP operand
|
||||
|
||||
@ -4166,6 +4532,7 @@ GREATEST_SUITE(test_suite_cpu) {
|
||||
A2_ADD_TEST(test_JMP_ind_65c02);
|
||||
A2_ADD_TEST(test_JMP_abs_ind_x);
|
||||
A2_ADD_TEST(test_JSR_abs);
|
||||
A2_ADD_TEST(test_LDA_imm);
|
||||
A2_ADD_TEST(test_SBC_imm);
|
||||
HASH_ITER(hh, test_funcs, func, tmp) {
|
||||
fprintf(GREATEST_STDOUT, "\n%s (SILENCED OUTPUT) :\n", func->name);
|
||||
@ -4228,6 +4595,7 @@ GREATEST_SUITE(test_suite_cpu) {
|
||||
A2_ADD_TEST(test_DEC_zpage);
|
||||
A2_ADD_TEST(test_EOR_zpage);
|
||||
A2_ADD_TEST(test_INC_zpage);
|
||||
A2_ADD_TEST(test_LDA_zpage);
|
||||
A2_ADD_TEST(test_SBC_zpage);
|
||||
HASH_ITER(hh, test_funcs, func, tmp) {
|
||||
fprintf(GREATEST_STDOUT, "\n%s :\n", func->name);
|
||||
@ -4254,6 +4622,7 @@ GREATEST_SUITE(test_suite_cpu) {
|
||||
A2_ADD_TEST(test_DEC_zpage_x);
|
||||
A2_ADD_TEST(test_EOR_zpage_x);
|
||||
A2_ADD_TEST(test_INC_zpage_x);
|
||||
A2_ADD_TEST(test_LDA_zpage_x);
|
||||
A2_ADD_TEST(test_SBC_zpage_x);
|
||||
HASH_ITER(hh, test_funcs, func, tmp) {
|
||||
fprintf(GREATEST_STDOUT, "\n%s :\n", func->name);
|
||||
@ -4280,6 +4649,7 @@ GREATEST_SUITE(test_suite_cpu) {
|
||||
A2_ADD_TEST(test_DEC_abs);
|
||||
A2_ADD_TEST(test_EOR_abs);
|
||||
A2_ADD_TEST(test_INC_abs);
|
||||
A2_ADD_TEST(test_LDA_abs);
|
||||
A2_ADD_TEST(test_SBC_abs);
|
||||
HASH_ITER(hh, test_funcs, func, tmp) {
|
||||
fprintf(GREATEST_STDOUT, "\n%s :\n", func->name);
|
||||
@ -4305,6 +4675,7 @@ GREATEST_SUITE(test_suite_cpu) {
|
||||
A2_ADD_TEST(test_DEC_abs_x);
|
||||
A2_ADD_TEST(test_EOR_abs_x);
|
||||
A2_ADD_TEST(test_INC_abs_x);
|
||||
A2_ADD_TEST(test_LDA_abs_x);
|
||||
A2_ADD_TEST(test_SBC_abs_x);
|
||||
HASH_ITER(hh, test_funcs, func, tmp) {
|
||||
fprintf(GREATEST_STDOUT, "\n%s :\n", func->name);
|
||||
@ -4328,6 +4699,7 @@ GREATEST_SUITE(test_suite_cpu) {
|
||||
A2_ADD_TEST(test_AND_abs_y);
|
||||
A2_ADD_TEST(test_CMP_abs_y);
|
||||
A2_ADD_TEST(test_EOR_abs_y);
|
||||
A2_ADD_TEST(test_LDA_abs_y);
|
||||
A2_ADD_TEST(test_SBC_abs_y);
|
||||
HASH_ITER(hh, test_funcs, func, tmp) {
|
||||
fprintf(GREATEST_STDOUT, "\n%s :\n", func->name);
|
||||
@ -4351,6 +4723,7 @@ GREATEST_SUITE(test_suite_cpu) {
|
||||
A2_ADD_TEST(test_AND_ind_x);
|
||||
A2_ADD_TEST(test_CMP_ind_x);
|
||||
A2_ADD_TEST(test_EOR_ind_x);
|
||||
A2_ADD_TEST(test_LDA_ind_x);
|
||||
A2_ADD_TEST(test_SBC_ind_x);
|
||||
HASH_ITER(hh, test_funcs, func, tmp) {
|
||||
fprintf(GREATEST_STDOUT, "\n%s :\n", func->name);
|
||||
@ -4374,6 +4747,7 @@ GREATEST_SUITE(test_suite_cpu) {
|
||||
A2_ADD_TEST(test_AND_ind_y);
|
||||
A2_ADD_TEST(test_CMP_ind_y);
|
||||
A2_ADD_TEST(test_EOR_ind_y);
|
||||
A2_ADD_TEST(test_LDA_ind_y);
|
||||
A2_ADD_TEST(test_SBC_ind_y);
|
||||
HASH_ITER(hh, test_funcs, func, tmp) {
|
||||
fprintf(GREATEST_STDOUT, "\n%s :\n", func->name);
|
||||
@ -4392,6 +4766,7 @@ GREATEST_SUITE(test_suite_cpu) {
|
||||
A2_ADD_TEST(test_AND_ind_zpage);
|
||||
A2_ADD_TEST(test_CMP_ind_zpage);
|
||||
A2_ADD_TEST(test_EOR_ind_zpage);
|
||||
A2_ADD_TEST(test_LDA_ind_zpage);
|
||||
A2_ADD_TEST(test_SBC_ind_zpage);
|
||||
HASH_ITER(hh, test_funcs, func, tmp) {
|
||||
fprintf(GREATEST_STDOUT, "\n%s :\n", func->name);
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user