testLoadGroup.cpp

#include "testLoadGroup.hpp"
#include "Assembler.hpp"
#include "MachineCode.hpp"
#include "argumentHelpers.hpp"
#include "testUtilities.hpp"

namespace {

void test_ld_deref_hl_8bitReg() {
  Assembler assembler;
  assembler.command2("ld", dereferencedIdentifierArg("hl"), identifierArg("a"));
  Byte expectedBytes[] = { 0b01110111 };
  isEqualToBytes(assembler, expectedBytes, 1);
}

void test_ld_deref_hl_n() {
  Assembler assembler;
  assembler.command2("ld", dereferencedIdentifierArg("hl"), numberArg(42));
  Byte expectedBytes[] = { 0x36, 42 };
  isEqualToBytes(assembler, expectedBytes, 2);
}

void test_ld_a_byte() {
  Assembler assembler;
  assembler.command2("ld", identifierArg("a"), numberArg(255));
  Byte expectedBytes[] = { 0x3e, 0xff };
  isEqualToBytes(assembler, expectedBytes, 2);
}

void test_ld_d_byte() {
  Assembler assembler;
  assembler.command2("ld", identifierArg("L"), numberArg(255));
  Byte expectedBytes[] = { 0x2e, 0xff };
  isEqualToBytes(assembler, expectedBytes, 2);
}

void test_ld_a_address_hl() {
  Assembler assembler;
  assembler.command2("ld", identifierArg("a"), dereferencedIdentifierArg("hl"));
  Byte expectedBytes[] = { 0b01111110 };
  isEqualToBytes(assembler, expectedBytes, 1);
}

void test_ld_hl_word() {
  Assembler assembler;
  assembler.command2("ld", identifierArg("HL"), numberArg(0x1234));
  Byte expectedBytes[] = { 0x21, 0x34, 0x12 };
  isEqualToBytes(assembler, expectedBytes, 3);
}

void test_ld_hl_word_following_label() {
  Assembler assembler;
  assembler.command2("ld", identifierArg("HL"), identifierArg("aLabel"));
  assembler.label("aLabel");
  assembler.resolveRemaining();
  Byte expectedBytes[] = { 0x21, 0x03, 0x00 };
  isEqualToBytes(assembler, expectedBytes, 3);
}

void test_ld_hl_address() {
  Assembler assembler;
  assembler.command2("ld", identifierArg("HL"), dereferencedValueArg(0x1234));
  Byte expectedBytes[] = { 0x2a, 0x34, 0x12 };
  isEqualToBytes(assembler, expectedBytes, 3);
}

void test_ld_addr_a() {
  Assembler assembler;
  assembler.command2("ld", dereferencedValueArg(0x1234), identifierArg("a"));
  Byte expectedBytes[] = { 0x32, 0x34, 0x12 };
  isEqualToBytes(assembler, expectedBytes, 3);
}

// ld a, (nn)
void test_ld_a_addr() {
  Assembler assembler;
  assembler.command2("ld", identifierArg("a"), dereferencedValueArg(0x1234));
  Byte expectedBytes[] = { 0x3a, 0x34, 0x12 };
  isEqualToBytes(assembler, expectedBytes, 3);
}

void test_ld_addr_hl() {
  Assembler assembler;
  assembler.command2("ld", dereferencedValueArg(0x1234), identifierArg("hl"));
  Byte expectedBytes[] = { 0x22, 0x34, 0x12 };
  isEqualToBytes(assembler, expectedBytes, 3);
}


void test_ld_a_using_eq() {
  Assembler assembler;
  assembler.metaCommand2("eq", "FOUR_TWO", numberArg(42));
  assembler.command2("ld", identifierArg("a"), identifierArg("FOUR_TWO"));
  Byte expectedBytes[] = { 0x3e, 42 };
  isEqualToBytes(assembler, expectedBytes, 2);
}

void test_ld_c_d() {
  Assembler assembler;
  assembler.command2("ld", identifierArg("c"), identifierArg("d"));
  Byte expectedBytes[] = { 0b01001010 };
  isEqualToBytes(assembler, expectedBytes, 1);
}

void test_ld_i_a() {
  Assembler assembler;
  assembler.command2("ld", identifierArg("i"), identifierArg("a"));
  Byte expectedBytes[] = { 0xed, 0x47 };
  isEqualToBytes(assembler, expectedBytes, 2);
}

void test_ld_a_i() {
  Assembler assembler;
  assembler.command2("ld", identifierArg("a"), identifierArg("i"));
  Byte expectedBytes[] = { 0xed, 0x57 };
  isEqualToBytes(assembler, expectedBytes, 2);
}

void test_ld_adr_hl_a() {
  Assembler assembler;
  assembler.command2("ld", dereferencedIdentifierArg("hl"), identifierArg("a"));
  Byte expectedBytes[] = { 0b01110111 };
  isEqualToBytes(assembler, expectedBytes, 1);
}

void test_ld_a_addr_de() {
  Assembler assembler;
  assembler.command2("ld", identifierArg("a"), dereferencedIdentifierArg("de"));
  Byte expectedBytes[] = { 0x1a };
  isEqualToBytes(assembler, expectedBytes, 1);
}

void test_ld_ix_nn() {
  Assembler assembler;
  assembler.command2("ld", identifierArg("ix"), numberArg(0x1234));
  Byte expectedBytes[] = { 0xdd, 0x21, 0x34, 0x12 };
  isEqualToBytes(assembler, expectedBytes, 4);
}

void test_ld_iy_nn() {
  Assembler assembler;
  assembler.command2("ld", identifierArg("iy"), numberArg(0x1234));
  Byte expectedBytes[] = { 0xfd, 0x21, 0x34, 0x12 };
  isEqualToBytes(assembler, expectedBytes, 4);
}

void test_ld_a_ix_indexed() {
  Assembler assembler;
  // ld a, (ix+2)
  assembler.command2("ld", identifierArg("a"), dereferencedIndexedIdentifierArg("ix", 2));
  Byte expectedBytes[] = { 0xdd, 0x7e, 0x02 };
  isEqualToBytes(assembler, expectedBytes, 3);
}

void test_ld_b_iy_indexed() {
  Assembler assembler;
  // ld b, (iy-2)
  assembler.command2("ld", identifierArg("b"), dereferencedIndexedIdentifierArg("iy", -2));
  Byte expectedBytes[] = { 0xfd, 0x46, 0xfe };
  isEqualToBytes(assembler, expectedBytes, 3);
}

void test_ld_ix_indexed_a() {
  Assembler assembler;
  // ld (ix+2), a
  assembler.command2("ld", dereferencedIndexedIdentifierArg("ix", 2), identifierArg("a"));
  Byte expectedBytes[] = { 0xdd, 0x77, 0x02 };
  isEqualToBytes(assembler, expectedBytes, 3);
}

void test_ld_iy_indexed_b() {
  Assembler assembler;
  // ld (iy-2), b
  assembler.command2("ld", dereferencedIndexedIdentifierArg("iy", -2), identifierArg("b"));
  Byte expectedBytes[] = { 0xfd, 0x70, 0xfe };
  isEqualToBytes(assembler, expectedBytes, 3);
}

void test_ld_ix_indexed_n() {
  Assembler assembler;
  // ld (ix-2), 42
  assembler.command2("ld", dereferencedIndexedIdentifierArg("ix", -2), numberArg(42));
  Byte expectedBytes[] = { 0xdd, 0x36, 0xfe, 42 };
  isEqualToBytes(assembler, expectedBytes, 4);
}

void test_ld_iy_indexed_n() {
  Assembler assembler;
  // ld (iy+2), 42
  assembler.command2("ld", dereferencedIndexedIdentifierArg("iy", 2), numberArg(42));
  Byte expectedBytes[] = { 0xfd, 0x36, 0x02, 42 };
  isEqualToBytes(assembler, expectedBytes, 4);
}

void test_ld_sp_hl() {
  Assembler assembler;
  assembler.command2("ld", identifierArg("sp"), identifierArg("hl"));
  // TODO overload isEqualToBytes for 1-4 bytes
  Byte expectedBytes[] = { 0xf9 };
  isEqualToBytes(assembler, expectedBytes, 1);
}

void test_ld_sp_ix() {
  Assembler assembler;
  assembler.command2("ld", identifierArg("sp"), identifierArg("ix"));
  // TODO overload isEqualToBytes for 1-4 bytes
  Byte expectedBytes[] = { 0xdd, 0xf9 };
  isEqualToBytes(assembler, expectedBytes, 2);
}

void test_pop_de() {
  Assembler assembler;
  assembler.command1("pop", identifierArg("de"));
  Byte expectedBytes[] = { 0b11010001 };
  isEqualToBytes(assembler, expectedBytes, 1);
}

void test_push_ix() {
  Assembler assembler;
  assembler.command1("push", identifierArg("ix"));
  Byte expectedBytes[] = { 0xdd, 0xe5 };
  isEqualToBytes(assembler, expectedBytes, 2);
}

void test_push_iy() {
  Assembler assembler;
  assembler.command1("push", identifierArg("iy"));
  Byte expectedBytes[] = { 0xfd, 0xe5 };
  isEqualToBytes(assembler, expectedBytes, 2);
}

void test_pop_ix() {
  Assembler assembler;
  assembler.command1("pop", identifierArg("ix"));
  Byte expectedBytes[] = { 0xdd, 0xe1 };
  isEqualToBytes(assembler, expectedBytes, 2);
}

void test_pop_iy() {
  Assembler assembler;
  assembler.command1("pop", identifierArg("iy"));
  Byte expectedBytes[] = { 0xdd, 0xfd };
  isEqualToBytes(assembler, expectedBytes, 2);
}

}

void testLoadGroup() {
  test_ld_deref_hl_8bitReg(); // ld (hl),r
  test_ld_deref_hl_n(); // ld (hl),n
  test_ld_a_byte();
  test_ld_d_byte();
  test_ld_a_address_hl();
  test_ld_hl_word();
  test_ld_hl_word_following_label();
  test_ld_hl_address();
  test_ld_addr_a();
  // test_ld_a_addr();
  test_ld_addr_hl();
  test_ld_c_d();
  test_ld_i_a();
  test_ld_a_i();
  test_ld_adr_hl_a();
  test_ld_a_using_eq();
  test_ld_a_addr_de();
  test_ld_ix_nn();
  test_ld_iy_nn();
  test_ld_a_ix_indexed();
  test_ld_b_iy_indexed();
  test_ld_ix_indexed_a();
  test_ld_iy_indexed_b();
  test_ld_ix_indexed_n();
  test_ld_iy_indexed_n();
  test_ld_sp_hl();
  test_ld_sp_ix();
  test_pop_de();
  test_push_ix();
  test_push_iy();
  test_pop_ix();
  test_pop_iy();
}