use vm6502::prelude::*;

#[test]
fn bcc_simple() {
    let mut vm = VirtualMachine::new();
    let prog = "90F0";
    vm.set_program(0x0000, prog);
    vm.set_status(Status::Carry, false);

    vm.step();

    assert_eq!(vm.registers.pc, 0xF0);
}

#[test]
fn bcc_no_page_cross() {
    let mut vm = VirtualMachine::new();

    let offset = 0x03;
    let prog = format!("90{:02X}", offset);
    let mut slide = vm.vheap_bounds.0;

    vm.registers.pc = slide as u16;
    for _ in 0..0x55 {
        vm.insert_program(slide as u16, prog.as_str());
        vm.step();
        vm.set_status(Status::Carry, false);

        slide += offset;
        eprintln!("slide: 0x{:04X}, pc: 0x{:04X}", slide, vm.registers.pc);
        assert_eq!(vm.registers.pc, slide as u16);
    }
}

#[test]
fn bcc_paging_cover_0xff() {
    let mut vm = VirtualMachine::new();
    let prog = "90FF";
    let mut slide = vm.vheap_bounds.0;

    eprintln!(
        "Start slide:   0x{:04X}, pc: 0x{:04X}",
        slide, vm.registers.pc
    );
    assert_eq!(vm.registers.pc, slide as u16);

    for i in vm.heap_bounds.0..=0xFF {
        eprintln!("|page 0x{:02X}", i);
        vm.insert_program(slide as u16, prog);
        vm.step();
        slide += 0xFF;
        eprintln!("|\tslide: 0x{:04X}, pc: 0x{:04X}", slide, vm.registers.pc);
        assert_eq!(vm.registers.pc, slide as u16);
    }
}

#[test]
fn bcc_paging_cover0xfe() {
    let mut vm = VirtualMachine::new();
    let prog = "90FE";
    let mut slide = vm.vheap_bounds.0;

    eprintln!(
        "Start slide:   0x{:04X}, pc: 0x{:04X}",
        slide, vm.registers.pc
    );
    assert_eq!(vm.registers.pc, slide as u16);

    // Can we run this inclusively?
    for i in vm.heap_bounds.0..0xFF {
        eprintln!("|page 0x{:02X}", i);
        vm.insert_program(slide as u16, prog);
        vm.step();
        slide += 0xFE;
        eprintln!("|\tslide: 0x{:04X}, pc: 0x{:04X}", slide, vm.registers.pc);
        assert_eq!(vm.registers.pc, slide as u16);
    }
}

#[test]
fn bcs_paging_cover0xfe() {}