diff --git a/Cargo.lock b/Cargo.lock index bd52bfe..958386e 100644 --- a/Cargo.lock +++ b/Cargo.lock @@ -182,6 +182,7 @@ version = "0.1.0" dependencies = [ "gumdrop", "iced", + "imperative-rs", "minifb", "owo-colors", "rand", @@ -1086,6 +1087,27 @@ version = "1.0.1" source = "registry+https://github.com/rust-lang/crates.io-index" checksum = "b9e0384b61958566e926dc50660321d12159025e767c18e043daf26b70104c39" +[[package]] +name = "imperative-rs" +version = "0.3.1" +source = "registry+https://github.com/rust-lang/crates.io-index" +checksum = "fed4f0a3a8fe169e919b74f6ba77c473d356ef05d0d65da06467b8836e508aa3" +dependencies = [ + "imperative-rs-derive", +] + +[[package]] +name = "imperative-rs-derive" +version = "0.3.1" +source = "registry+https://github.com/rust-lang/crates.io-index" +checksum = "02b842fd8a24b2b715ac0baffae4aa72aa59ecb8e90d3de175180dbb5b1caaab" +dependencies = [ + "lazy_static", + "proc-macro2", + "quote", + "syn 1.0.109", +] + [[package]] name = "indexmap" version = "1.9.3" diff --git a/Cargo.toml b/Cargo.toml index 2be055b..75e6eb6 100644 --- a/Cargo.toml +++ b/Cargo.toml @@ -28,6 +28,7 @@ overflow-checks = false [dependencies] gumdrop = "^0.8.1" iced = {version = "0.8.0", optional = true} +imperative-rs = "0.3.1" minifb = { version = "^0.24.0", features = ["wayland"] } owo-colors = "^3" rand = "^0.8.5" diff --git a/justfile b/justfile index 910a56c..0835fd7 100644 --- a/justfile +++ b/justfile @@ -4,7 +4,7 @@ test: cargo test --doc && cargo nextest run chirp: - cargo run --bin chirp -- tests/chip8-test-suite/bin/chip8-test-suite.ch8 + cargo run --bin chirp-minifb -- tests/chip8-test-suite/bin/chip8-test-suite.ch8 cover: cargo llvm-cov --open --doctests diff --git a/src/bin/chirp-disasm.rs b/src/bin/chirp-disasm.rs index c65f633..0c8a893 100644 --- a/src/bin/chirp-disasm.rs +++ b/src/bin/chirp-disasm.rs @@ -1,7 +1,7 @@ -use chirp::{error::Result, prelude::*}; +use chirp::{cpu::Disassembler, error::Result, prelude::*}; use gumdrop::*; -use std::{fs::read, path::PathBuf}; use owo_colors::OwoColorize; +use std::{fs::read, path::PathBuf}; #[derive(Clone, Debug, PartialEq, Eq, PartialOrd, Ord, Options, Hash)] struct Arguments { @@ -22,18 +22,20 @@ fn parse_hex(value: &str) -> std::result::Result { fn main() -> Result<()> { let options = Arguments::parse_args_default_or_exit(); let contents = &read(&options.file)?; - let disassembler = Disassemble::default(); + let disassembler = Dis::default(); for (addr, insn) in contents[options.offset..].chunks_exact(2).enumerate() { let insn = u16::from_be_bytes( insn.try_into() .expect("Iterated over 2-byte chunks, got <2 bytes"), ); println!( - "{:03x}: {} {:04x}", - 2 * addr + 0x200 + options.offset, - disassembler.instruction(insn), - insn.bright_black(), - + "{}", + format_args!( + "{:03x}: {} {:04x}", + 2 * addr + 0x200 + options.offset, + disassembler.once(insn), + insn.bright_black(), + ) ); } Ok(()) diff --git a/src/bin/chirp-minifb.rs b/src/bin/chirp-minifb.rs index 256dce0..2218740 100644 --- a/src/bin/chirp-minifb.rs +++ b/src/bin/chirp-minifb.rs @@ -6,6 +6,7 @@ use chirp::{error::Result, prelude::*}; use gumdrop::*; +use owo_colors::OwoColorize; use std::fs::read; use std::{ path::PathBuf, @@ -23,11 +24,12 @@ struct Arguments { #[options(help = "Enable pause mode at startup.")] pub pause: bool, - #[options(help = "Set the instructions-per-frame rate.")] + #[options(help = "Set the instructions-per-delay rate, or use realtime.")] pub speed: Option, - #[options(help = "Run the emulator as fast as possible for `step` instructions.")] + #[options(help = "Set the instructions-per-frame rate.")] pub step: Option, - + #[options(help = "Enable performance benchmarking on stderr (requires -S)")] + pub perf: bool, #[options( short = "z", help = "Disable setting vF to 0 after a bitwise operation." @@ -77,6 +79,7 @@ struct State { pub speed: usize, pub step: Option, pub rate: u64, + pub perf: bool, pub ch8: Chip8, pub ui: UI, pub ft: Instant, @@ -88,6 +91,7 @@ impl State { speed: options.speed.unwrap_or(8), step: options.step, rate: options.frame_rate, + perf: options.perf, ch8: Chip8 { bus: bus! { // Load the charset into ROM @@ -104,7 +108,7 @@ impl State { 0x50, 0x200, 0xefe, - Disassemble::default(), + Dis::default(), options.breakpoints, ControlFlags { quirks: chirp::cpu::Quirks { @@ -127,27 +131,35 @@ impl State { state.ch8.bus.write(0x1feu16, options.data); Ok(state) } - fn keys(&mut self) -> Option<()> { + fn keys(&mut self) -> Result> { self.ui.keys(&mut self.ch8) } fn frame(&mut self) -> Option<()> { self.ui.frame(&mut self.ch8) } - fn tick_cpu(&mut self) { + fn tick_cpu(&mut self) -> Result<()> { if !self.ch8.cpu.flags.pause { let rate = self.speed; match self.step { Some(ticks) => { - self.ch8.cpu.multistep(&mut self.ch8.bus, ticks); - // Pause the CPU and clear step - self.ch8.cpu.flags.pause = true; - self.step = None; + let time = Instant::now(); + self.ch8.cpu.multistep(&mut self.ch8.bus, ticks)?; + if self.perf { + let time = time.elapsed(); + let nspt = time.as_secs_f64() / ticks as f64; + eprintln!( + "{ticks},\t{time:.05?},\t{:.4}nspt,\t{}ipf", + nspt * 1_000_000_000.0, + ((1.0 / 60.0f64) / nspt).trunc(), + ); + } } None => { - self.ch8.cpu.multistep(&mut self.ch8.bus, rate); + self.ch8.cpu.multistep(&mut self.ch8.bus, rate)?; } } } + Ok(()) } fn wait_for_next_frame(&mut self) { let rate = 1_000_000_000 / self.rate + 1; @@ -157,21 +169,34 @@ impl State { } impl Iterator for State { - type Item = (); + type Item = Result<()>; + /// Pretty heavily abusing iterators here, in an annoying way fn next(&mut self) -> Option { self.wait_for_next_frame(); - self.keys()?; - self.tick_cpu(); - self.frame(); - Some(()) + match self.keys() { + Ok(opt) => opt?, + Err(e) => return Some(Err(e)), // summary + } + self.keys().unwrap_or(None)?; + if let Err(e) = self.tick_cpu() { + return Some(Err(e)); + } + self.frame()?; + Some(Ok(())) } } fn main() -> Result<()> { let options = Arguments::parse_args_default_or_exit(); let state = State::new(options)?; - Ok(for _ in state {}) + for result in state { + if let Err(e) = result { + eprintln!("{}", e.bold().red()); + break; + } + } + Ok(()) } /// Parses a hexadecimal string into a u16 diff --git a/src/cpu.rs b/src/cpu.rs index 85a6b75..7265103 100644 --- a/src/cpu.rs +++ b/src/cpu.rs @@ -6,10 +6,20 @@ #[cfg(test)] mod tests; -pub mod disassemble; +/// Disassembles Chip-8 instructions +pub trait Disassembler { + /// Disassemble a single instruction + fn once(&self, insn: u16) -> String; +} -use self::disassemble::Disassemble; -use crate::bus::{Bus, Read, Region, Write}; +pub mod disassembler; + +use self::disassembler::{Dis, Insn}; +use crate::{ + bus::{Bus, Read, Region, Write}, + error::Result, +}; +use imperative_rs::InstructionSet; use owo_colors::OwoColorize; use rand::random; use std::time::Instant; @@ -116,6 +126,22 @@ impl ControlFlags { } } +#[derive(Clone, Copy, Debug, PartialEq, Eq)] +struct Timers { + frame: Instant, + insn: Instant, +} + +impl Default for Timers { + fn default() -> Self { + let now = Instant::now(); + Self { + frame: now, + insn: now, + } + } +} + /// Represents the internal state of the CPU interpreter #[derive(Clone, Debug, PartialEq)] pub struct CPU { @@ -135,10 +161,10 @@ pub struct CPU { // I/O keys: [bool; 16], // Execution data - timer: Instant, + timers: Timers, cycle: usize, breakpoints: Vec, - disassembler: Disassemble, + disassembler: Dis, } // public interface @@ -153,7 +179,7 @@ impl CPU { /// 0x50, // font location /// 0x200, // start of program /// 0xefe, // top of stack - /// Disassemble::default(), + /// Dis::default(), /// vec![], // Breakpoints /// ControlFlags::default() /// ); @@ -164,7 +190,7 @@ impl CPU { font: Adr, pc: Adr, sp: Adr, - disassembler: Disassemble, + disassembler: Dis, breakpoints: Vec, flags: ControlFlags, ) -> Self { @@ -336,7 +362,7 @@ impl CPU { /// 0x50, /// 0x340, /// 0xefe, - /// Disassemble::default(), + /// Dis::default(), /// vec![], /// ControlFlags::default() /// ); @@ -368,7 +394,7 @@ impl CPU { /// Unset a breakpoint // TODO: Unit test this pub fn unset_break(&mut self, point: Adr) -> &mut Self { - fn linear_find(needle: Adr, haystack: &Vec) -> Option { + fn linear_find(needle: Adr, haystack: &[Adr]) -> Option { for (i, v) in haystack.iter().enumerate() { if *v == needle { return Some(i); @@ -376,7 +402,7 @@ impl CPU { } None } - if let Some(idx) = linear_find(point, &self.breakpoints) { + if let Some(idx) = linear_find(point, self.breakpoints.as_slice()) { assert_eq!(point, self.breakpoints.swap_remove(idx)); } self @@ -393,7 +419,7 @@ impl CPU { ///# } /// ``` pub fn breakpoints(&self) -> &[Adr] { - &self.breakpoints.as_slice() + self.breakpoints.as_slice() } /// Unpauses the emulator for a single tick, @@ -412,18 +438,18 @@ impl CPU { /// ], /// Screen [0x0f00..0x1000], /// }; - /// cpu.singlestep(&mut bus); + /// cpu.singlestep(&mut bus)?; /// assert_eq!(0x202, cpu.pc()); /// assert_eq!(1, cpu.cycle()); ///# Ok(()) ///# } /// ``` - pub fn singlestep(&mut self, bus: &mut Bus) -> &mut Self { + pub fn singlestep(&mut self, bus: &mut Bus) -> Result<&mut Self> { self.flags.pause = false; - self.tick(bus); + self.tick(bus)?; self.flags.vbi_wait = false; self.flags.pause = true; - self + Ok(self) } /// Unpauses the emulator for `steps` ticks @@ -441,18 +467,18 @@ impl CPU { /// ], /// Screen [0x0f00..0x1000], /// }; - /// cpu.multistep(&mut bus, 0x20); + /// cpu.multistep(&mut bus, 0x20)?; /// assert_eq!(0x202, cpu.pc()); /// assert_eq!(0x20, cpu.cycle()); ///# Ok(()) ///# } /// ``` - pub fn multistep(&mut self, bus: &mut Bus, steps: usize) -> &mut Self { + pub fn multistep(&mut self, bus: &mut Bus, steps: usize) -> Result<&mut Self> { for _ in 0..steps { - self.tick(bus); + self.tick(bus)?; self.vertical_blank(); } - self + Ok(self) } /// Simulates vertical blanking @@ -464,6 +490,7 @@ impl CPU { /// - Subtracts the elapsed time in fractions of a frame /// from st/dt /// - Disables framepause if the duration exceeds that of a frame + #[inline(always)] pub fn vertical_blank(&mut self) -> &mut Self { if self.flags.pause { return self; @@ -471,16 +498,17 @@ impl CPU { // Use a monotonic counter when testing if let Some(speed) = self.flags.monotonic { if self.flags.vbi_wait { - self.flags.vbi_wait = !(self.cycle % speed == 0); + self.flags.vbi_wait = self.cycle % speed != 0; } - self.delay -= 1.0 / speed as f64; - self.sound -= 1.0 / speed as f64; + let speed = 1.0 / speed as f64; + self.delay -= speed; + self.sound -= speed; return self; }; // Convert the elapsed time to 60ths of a second - let time = self.timer.elapsed().as_secs_f64() * 60.0; - self.timer = Instant::now(); + let time = self.timers.frame.elapsed().as_secs_f64() * 60.0; + self.timers.frame = Instant::now(); if time > 1.0 { self.flags.vbi_wait = false; } @@ -506,7 +534,7 @@ impl CPU { /// ], /// Screen [0x0f00..0x1000], /// }; - /// cpu.tick(&mut bus); + /// cpu.tick(&mut bus)?; /// assert_eq!(0x202, cpu.pc()); /// assert_eq!(1, cpu.cycle()); ///# Ok(()) @@ -527,162 +555,92 @@ impl CPU { /// ], /// Screen [0x0f00..0x1000], /// }; - /// cpu.multistep(&mut bus, 0x10); // panics! + /// cpu.tick(&mut bus)?; // panics! ///# Ok(()) ///# } /// ``` - pub fn tick(&mut self, bus: &mut Bus) -> &mut Self { + pub fn tick(&mut self, bus: &mut Bus) -> Result<&mut Self> { // Do nothing if paused if self.flags.pause || self.flags.vbi_wait || self.flags.keypause { // always tick in test mode if self.flags.monotonic.is_some() { self.cycle += 1; } - return self; + return Ok(self); } self.cycle += 1; // fetch opcode - let opcode: u16 = bus.read(self.pc); - let pc = self.pc; + let opcode: &[u8; 2] = if let Some(slice) = bus.get(self.pc as usize..self.pc as usize + 2) + { + slice.try_into()? + } else { + return Err(crate::error::Error::InvalidBusRange { + range: self.pc as usize..self.pc as usize + 2, + }); + }; - // DINC pc - self.pc = self.pc.wrapping_add(2); - // decode opcode - - use disassemble::{a, b, i, n, x, y}; - let (i, x, y, n, b, a) = ( - i(opcode), - x(opcode), - y(opcode), - n(opcode), - b(opcode), - a(opcode), - ); - match i { - // # Issue a system call - // |opcode| effect | - // |------|------------------------------------| - // | 00e0 | Clear screen memory to all 0 | - // | 00ee | Return from subroutine | - 0x0 => match a { - 0x0e0 => self.clear_screen(bus), - 0x0ee => self.ret(bus), - _ => self.sys(a), - }, - // | 1aaa | Sets pc to an absolute address - 0x1 => self.jump(a), - // | 2aaa | Pushes pc onto the stack, then jumps to a - 0x2 => self.call(a, bus), - // | 3xbb | Skips next instruction if register X == b - 0x3 => self.skip_equals_immediate(x, b), - // | 4xbb | Skips next instruction if register X != b - 0x4 => self.skip_not_equals_immediate(x, b), - // # Performs a register-register comparison - // |opcode| effect | - // |------|------------------------------------| - // | 9XY0 | Skip next instruction if vX == vY | - 0x5 => match n { - 0x0 => self.skip_equals(x, y), - _ => self.unimplemented(opcode), - }, - // 6xbb: Loads immediate byte b into register vX - 0x6 => self.load_immediate(x, b), - // 7xbb: Adds immediate byte b to register vX - 0x7 => self.add_immediate(x, b), - // # Performs ALU operation - // |opcode| effect | - // |------|------------------------------------| - // | 8xy0 | Y = X | - // | 8xy1 | X = X | Y | - // | 8xy2 | X = X & Y | - // | 8xy3 | X = X ^ Y | - // | 8xy4 | X = X + Y; Set vF=carry | - // | 8xy5 | X = X - Y; Set vF=carry | - // | 8xy6 | X = X >> 1 | - // | 8xy7 | X = Y - X; Set vF=carry | - // | 8xyE | X = X << 1 | - 0x8 => match n { - 0x0 => self.load(x, y), - 0x1 => self.or(x, y), - 0x2 => self.and(x, y), - 0x3 => self.xor(x, y), - 0x4 => self.add(x, y), - 0x5 => self.sub(x, y), - 0x6 => self.shift_right(x, y), - 0x7 => self.backwards_sub(x, y), - 0xE => self.shift_left(x, y), - _ => self.unimplemented(opcode), - }, - // # Performs a register-register comparison - // |opcode| effect | - // |------|------------------------------------| - // | 9XY0 | Skip next instruction if vX != vY | - 0x9 => match n { - 0 => self.skip_not_equals(x, y), - _ => self.unimplemented(opcode), - }, - // Aaaa: Load address #a into register I - 0xa => self.load_i_immediate(a), - // Baaa: Jump to &adr + v0 - 0xb => self.jump_indexed(a), - // Cxbb: Stores a random number + the provided byte into vX - 0xc => self.rand(x, b), - // Dxyn: Draws n-byte sprite to the screen at coordinates (vX, vY) - 0xd => self.draw(x, y, n, bus), - - // # Skips instruction on value of keypress - // |opcode| effect | - // |------|------------------------------------| - // | eX9e | Skip next instruction if key == vX | - // | eXa1 | Skip next instruction if key != vX | - 0xe => match b { - 0x9e => self.skip_key_equals(x), - 0xa1 => self.skip_key_not_equals(x), - _ => self.unimplemented(opcode), - }, - - // # Performs IO - // |opcode| effect | - // |------|------------------------------------| - // | fX07 | Set vX to value in delay timer | - // | fX0a | Wait for input, store in vX m | - // | fX15 | Set sound timer to the value in vX | - // | fX18 | set delay timer to the value in vX | - // | fX1e | Add x to I | - // | fX29 | Load sprite for character x into I | - // | fX33 | BCD convert X into I[0..3] | - // | fX55 | DMA Stor from I to registers 0..X | - // | fX65 | DMA Load from I to registers 0..X | - 0xf => match b { - 0x07 => self.load_delay_timer(x), - 0x0A => self.wait_for_key(x), - 0x15 => self.store_delay_timer(x), - 0x18 => self.store_sound_timer(x), - 0x1E => self.add_i(x), - 0x29 => self.load_sprite(x), - 0x33 => self.bcd_convert(x, bus), - 0x55 => self.store_dma(x, bus), - 0x65 => self.load_dma(x, bus), - _ => self.unimplemented(opcode), - }, - _ => unreachable!("Extracted nibble from byte, got >nibble?"), - } - let elapsed = self.timer.elapsed(); // Print opcode disassembly: if self.flags.debug { - std::println!( - "{:3} {:03x}: {:<36}{:?}", + println!("{:?}", self.timers.insn.elapsed().bright_black()); + self.timers.insn = Instant::now(); + std::print!( + "{:3} {:03x}: {:<36}", self.cycle.bright_black(), - pc, - self.disassembler.instruction(opcode), - elapsed.dimmed() + self.pc, + self.disassembler.once(u16::from_be_bytes(*opcode)) ); } + + // decode opcode + if let Ok((inc, insn)) = Insn::decode(opcode) { + self.pc = self.pc.wrapping_add(inc as u16); + match insn { + Insn::cls => self.clear_screen(bus), + Insn::ret => self.ret(bus), + Insn::jmp { A } => self.jump(A), + Insn::call { A } => self.call(A, bus), + Insn::seb { B, x } => self.skip_equals_immediate(x, B), + Insn::sneb { B, x } => self.skip_not_equals_immediate(x, B), + Insn::se { y, x } => self.skip_equals(x, y), + Insn::movb { B, x } => self.load_immediate(x, B), + Insn::addb { B, x } => self.add_immediate(x, B), + Insn::mov { x, y } => self.load(x, y), + Insn::or { y, x } => self.or(x, y), + Insn::and { y, x } => self.and(x, y), + Insn::xor { y, x } => self.xor(x, y), + Insn::add { y, x } => self.add(x, y), + Insn::sub { y, x } => self.sub(x, y), + Insn::shr { y, x } => self.shift_right(x, y), + Insn::bsub { y, x } => self.backwards_sub(x, y), + Insn::shl { y, x } => self.shift_left(x, y), + Insn::sne { y, x } => self.skip_not_equals(x, y), + Insn::movI { A } => self.load_i_immediate(A), + Insn::jmpr { A } => self.jump_indexed(A), + Insn::rand { B, x } => self.rand(x, B), + Insn::draw { x, y, n } => self.draw(x, y, n, bus), + Insn::sek { x } => self.skip_key_equals(x), + Insn::snek { x } => self.skip_key_not_equals(x), + Insn::getdt { x } => self.load_delay_timer(x), + Insn::waitk { x } => self.wait_for_key(x), + Insn::setdt { x } => self.store_delay_timer(x), + Insn::movst { x } => self.store_sound_timer(x), + Insn::addI { x } => self.add_i(x), + Insn::font { x } => self.load_sprite(x), + Insn::bcd { x } => self.bcd_convert(x, bus), + Insn::dmao { x } => self.store_dma(x, bus), + Insn::dmai { x } => self.load_dma(x, bus), + } + } else { + return Err(crate::error::Error::UnimplementedInstruction { + word: u16::from_be_bytes(*opcode), + }); + } + // process breakpoints - if self.breakpoints.contains(&self.pc) { + if !self.breakpoints.is_empty() && self.breakpoints.contains(&self.pc) { self.flags.pause = true; } - self + Ok(self) } /// Dumps the current state of all CPU registers, and the cycle count @@ -763,9 +721,9 @@ impl Default for CPU { debug: true, ..Default::default() }, - timer: Instant::now(), + timers: Default::default(), breakpoints: vec![], - disassembler: Disassemble::default(), + disassembler: Dis::default(), } } } @@ -780,18 +738,8 @@ impl Default for CPU { // | 00e0 | Clear screen memory to all 0 | // | 00ee | Return from subroutine | impl CPU { - /// Unused instructions - #[inline] - fn unimplemented(&self, opcode: u16) { - unimplemented!("Opcode: {opcode:04x}") - } - /// 0aaa: Handles a "machine language function call" (lmao) - #[inline] - fn sys(&mut self, a: Adr) { - unimplemented!("SYS\t{a:03x}"); - } /// 00e0: Clears the screen memory to 0 - #[inline] + #[inline(always)] fn clear_screen(&mut self, bus: &mut Bus) { if let Some(screen) = bus.get_region_mut(Region::Screen) { for byte in screen { @@ -800,7 +748,7 @@ impl CPU { } } /// 00ee: Returns from subroutine - #[inline] + #[inline(always)] fn ret(&mut self, bus: &impl Read) { self.sp = self.sp.wrapping_add(2); self.pc = bus.read(self.sp); @@ -810,7 +758,7 @@ impl CPU { // | 1aaa | Sets pc to an absolute address impl CPU { /// 1aaa: Sets the program counter to an absolute address - #[inline] + #[inline(always)] fn jump(&mut self, a: Adr) { // jump to self == halt if a.wrapping_add(2) == self.pc { @@ -823,7 +771,7 @@ impl CPU { // | 2aaa | Pushes pc onto the stack, then jumps to a impl CPU { /// 2aaa: Pushes pc onto the stack, then jumps to a - #[inline] + #[inline(always)] fn call(&mut self, a: Adr, bus: &mut impl Write) { bus.write(self.sp, self.pc); self.sp = self.sp.wrapping_sub(2); @@ -834,7 +782,7 @@ impl CPU { // | 3xbb | Skips next instruction if register X == b impl CPU { /// 3xbb: Skips the next instruction if register X == b - #[inline] + #[inline(always)] fn skip_equals_immediate(&mut self, x: Reg, b: u8) { if self.v[x] == b { self.pc = self.pc.wrapping_add(2); @@ -845,7 +793,7 @@ impl CPU { // | 4xbb | Skips next instruction if register X != b impl CPU { /// 4xbb: Skips the next instruction if register X != b - #[inline] + #[inline(always)] fn skip_not_equals_immediate(&mut self, x: Reg, b: u8) { if self.v[x] != b { self.pc = self.pc.wrapping_add(2); @@ -860,7 +808,7 @@ impl CPU { // | 5XY0 | Skip next instruction if vX == vY | impl CPU { /// 5xy0: Skips the next instruction if register X != register Y - #[inline] + #[inline(always)] fn skip_equals(&mut self, x: Reg, y: Reg) { if self.v[x] == self.v[y] { self.pc = self.pc.wrapping_add(2); @@ -871,7 +819,7 @@ impl CPU { // | 6xbb | Loads immediate byte b into register vX impl CPU { /// 6xbb: Loads immediate byte b into register vX - #[inline] + #[inline(always)] fn load_immediate(&mut self, x: Reg, b: u8) { self.v[x] = b; } @@ -880,7 +828,7 @@ impl CPU { // | 7xbb | Adds immediate byte b to register vX impl CPU { /// 7xbb: Adds immediate byte b to register vX - #[inline] + #[inline(always)] fn add_immediate(&mut self, x: Reg, b: u8) { self.v[x] = self.v[x].wrapping_add(b); } @@ -901,7 +849,7 @@ impl CPU { // | 8xyE | X = X << 1 | impl CPU { /// 8xy0: Loads the value of y into x - #[inline] + #[inline(always)] fn load(&mut self, x: Reg, y: Reg) { self.v[x] = self.v[y]; } @@ -909,7 +857,7 @@ impl CPU { /// /// # Quirk /// The original chip-8 interpreter will clobber vF for any 8-series instruction - #[inline] + #[inline(always)] fn or(&mut self, x: Reg, y: Reg) { self.v[x] |= self.v[y]; if self.flags.quirks.bin_ops { @@ -920,7 +868,7 @@ impl CPU { /// /// # Quirk /// The original chip-8 interpreter will clobber vF for any 8-series instruction - #[inline] + #[inline(always)] fn and(&mut self, x: Reg, y: Reg) { self.v[x] &= self.v[y]; if self.flags.quirks.bin_ops { @@ -931,7 +879,7 @@ impl CPU { /// /// # Quirk /// The original chip-8 interpreter will clobber vF for any 8-series instruction - #[inline] + #[inline(always)] fn xor(&mut self, x: Reg, y: Reg) { self.v[x] ^= self.v[y]; if self.flags.quirks.bin_ops { @@ -939,14 +887,14 @@ impl CPU { } } /// 8xy4: Performs addition of vX and vY, and stores the result in vX - #[inline] + #[inline(always)] fn add(&mut self, x: Reg, y: Reg) { let carry; (self.v[x], carry) = self.v[x].overflowing_add(self.v[y]); self.v[0xf] = carry.into(); } /// 8xy5: Performs subtraction of vX and vY, and stores the result in vX - #[inline] + #[inline(always)] fn sub(&mut self, x: Reg, y: Reg) { let carry; (self.v[x], carry) = self.v[x].overflowing_sub(self.v[y]); @@ -956,7 +904,7 @@ impl CPU { /// /// # Quirk /// On the original chip-8 interpreter, this shifts vY and stores the result in vX - #[inline] + #[inline(always)] fn shift_right(&mut self, x: Reg, y: Reg) { let src: Reg = if self.flags.quirks.shift { y } else { x }; let shift_out = self.v[src] & 1; @@ -964,7 +912,7 @@ impl CPU { self.v[0xf] = shift_out; } /// 8xy7: Performs subtraction of vY and vX, and stores the result in vX - #[inline] + #[inline(always)] fn backwards_sub(&mut self, x: Reg, y: Reg) { let carry; (self.v[x], carry) = self.v[y].overflowing_sub(self.v[x]); @@ -975,7 +923,7 @@ impl CPU { /// # Quirk /// On the original chip-8 interpreter, this would perform the operation on vY /// and store the result in vX. This behavior was left out, for now. - #[inline] + #[inline(always)] fn shift_left(&mut self, x: Reg, y: Reg) { let src: Reg = if self.flags.quirks.shift { y } else { x }; let shift_out: u8 = self.v[src] >> 7; @@ -991,7 +939,7 @@ impl CPU { // | 9XY0 | Skip next instruction if vX != vY | impl CPU { /// 9xy0: Skip next instruction if X != y - #[inline] + #[inline(always)] fn skip_not_equals(&mut self, x: Reg, y: Reg) { if self.v[x] != self.v[y] { self.pc = self.pc.wrapping_add(2); @@ -1002,7 +950,7 @@ impl CPU { // | Aaaa | Load address #a into register I impl CPU { /// Aadr: Load address #adr into register I - #[inline] + #[inline(always)] fn load_i_immediate(&mut self, a: Adr) { self.i = a; } @@ -1014,7 +962,7 @@ impl CPU { /// /// Quirk: /// On the Super-Chip, this does stupid shit - #[inline] + #[inline(always)] fn jump_indexed(&mut self, a: Adr) { let reg = if self.flags.quirks.stupid_jumps { a as usize >> 8 @@ -1025,10 +973,10 @@ impl CPU { } } -// | Cxbb | Stores a random number + the provided byte into vX +// | Cxbb | Stores a random number & the provided byte into vX impl CPU { /// Cxbb: Stores a random number & the provided byte into vX - #[inline] + #[inline(always)] fn rand(&mut self, x: Reg, b: u8) { self.v[x] = random::() & b; } @@ -1040,6 +988,7 @@ impl CPU { /// /// # Quirk /// On the original chip-8 interpreter, this will wait for a VBI + #[inline(always)] fn draw(&mut self, x: Reg, y: Reg, n: Nib, bus: &mut Bus) { let (x, y) = (self.v[x] as u16 % 64, self.v[y] as u16 % 32); if self.flags.quirks.draw_wait { @@ -1054,7 +1003,7 @@ impl CPU { let addr = (y + byte) * 8 + (x & 0x3f) / 8 + self.screen; // Read a byte of sprite data into a u16, and shift it x % 8 bits let sprite: u8 = bus.read(self.i + byte); - let sprite = (sprite as u16) << 8 - (x & 7) & if x % 64 > 56 { 0xff00 } else { 0xffff }; + let sprite = (sprite as u16) << (8 - (x & 7)) & if x % 64 > 56 { 0xff00 } else { 0xffff }; // Read a u16 from the bus containing the two bytes which might need to be updated let mut screen: u16 = bus.read(addr); // Save the bits-toggled-off flag if necessary @@ -1073,19 +1022,19 @@ impl CPU { // // |opcode| effect | // |------|------------------------------------| -// | eX9e | Skip next instruction if key == #X | -// | eXa1 | Skip next instruction if key != #X | +// | eX9e | Skip next instruction if key == vX | +// | eXa1 | Skip next instruction if key != vX | impl CPU { - /// Ex9E: Skip next instruction if key == #X - #[inline] + /// Ex9E: Skip next instruction if key == vX + #[inline(always)] fn skip_key_equals(&mut self, x: Reg) { let x = self.v[x] as usize; if self.keys[x] { self.pc += 2; } } - /// ExaE: Skip next instruction if key != #X - #[inline] + /// ExaE: Skip next instruction if key != vX + #[inline(always)] fn skip_key_not_equals(&mut self, x: Reg) { let x = self.v[x] as usize; if !self.keys[x] { @@ -1099,25 +1048,25 @@ impl CPU { // |opcode| effect | // |------|------------------------------------| // | fX07 | Set vX to value in delay timer | -// | fX0a | Wait for input, store in vX m | +// | fX0a | Wait for input, store key in vX | // | fX15 | Set sound timer to the value in vX | // | fX18 | set delay timer to the value in vX | -// | fX1e | Add x to I | +// | fX1e | Add vX to I | // | fX29 | Load sprite for character x into I | // | fX33 | BCD convert X into I[0..3] | -// | fX55 | DMA Stor from I to registers 0..X | -// | fX65 | DMA Load from I to registers 0..X | +// | fX55 | DMA Stor from I to registers 0..=X | +// | fX65 | DMA Load from I to registers 0..=X | impl CPU { /// Fx07: Get the current DT, and put it in vX /// ```py /// vX = DT /// ``` - #[inline] + #[inline(always)] fn load_delay_timer(&mut self, x: Reg) { self.v[x] = self.delay as u8; } /// Fx0A: Wait for key, then vX = K - #[inline] + #[inline(always)] fn wait_for_key(&mut self, x: Reg) { if let Some(key) = self.flags.lastkey { self.v[x] = key as u8; @@ -1131,7 +1080,7 @@ impl CPU { /// ```py /// DT = vX /// ``` - #[inline] + #[inline(always)] fn store_delay_timer(&mut self, x: Reg) { self.delay = self.v[x] as f64; } @@ -1139,7 +1088,7 @@ impl CPU { /// ```py /// ST = vX; /// ``` - #[inline] + #[inline(always)] fn store_sound_timer(&mut self, x: Reg) { self.sound = self.v[x] as f64; } @@ -1147,7 +1096,7 @@ impl CPU { /// ```py /// I += vX; /// ``` - #[inline] + #[inline(always)] fn add_i(&mut self, x: Reg) { self.i += self.v[x] as u16; } @@ -1155,24 +1104,24 @@ impl CPU { /// ```py /// I = sprite(X); /// ``` - #[inline] + #[inline(always)] fn load_sprite(&mut self, x: Reg) { self.i = self.font + (5 * (self.v[x] as Adr % 0x10)); } /// Fx33: BCD convert X into I`[0..3]` - #[inline] + #[inline(always)] fn bcd_convert(&mut self, x: Reg, bus: &mut Bus) { let x = self.v[x]; bus.write(self.i.wrapping_add(2), x % 10); bus.write(self.i.wrapping_add(1), x / 10 % 10); bus.write(self.i, x / 100 % 10); } - /// Fx55: DMA Stor from I to registers 0..X + /// Fx55: DMA Stor from I to registers 0..=X /// /// # Quirk /// The original chip-8 interpreter uses I to directly index memory, /// with the side effect of leaving I as I+X+1 after the transfer is done. - #[inline] + #[inline(always)] fn store_dma(&mut self, x: Reg, bus: &mut Bus) { let i = self.i as usize; for (reg, value) in bus @@ -1187,16 +1136,16 @@ impl CPU { self.i += x as Adr + 1; } } - /// Fx65: DMA Load from I to registers 0..X + /// Fx65: DMA Load from I to registers 0..=X /// /// # Quirk /// The original chip-8 interpreter uses I to directly index memory, /// with the side effect of leaving I as I+X+1 after the transfer is done. - #[inline] + #[inline(always)] fn load_dma(&mut self, x: Reg, bus: &mut Bus) { let i = self.i as usize; for (reg, value) in bus - .get(i + 0..=i + x) + .get(i..=i + x) .unwrap_or_default() .iter() .enumerate() diff --git a/src/cpu/disassemble.rs b/src/cpu/disassemble.rs deleted file mode 100644 index 3322195..0000000 --- a/src/cpu/disassemble.rs +++ /dev/null @@ -1,417 +0,0 @@ -// (c) 2023 John A. Breaux -// This code is licensed under MIT license (see LICENSE.txt for details) - -//! A disassembler for Chip-8 opcodes - -use super::{Adr, Nib, Reg}; -use owo_colors::{OwoColorize, Style}; -type Ins = Nib; - -/// Extracts the I nibble of an IXYN instruction -#[inline] -pub fn i(ins: u16) -> Ins { - (ins >> 12 & 0xf) as Ins -} -/// Extracts the X nibble of an IXYN instruction -#[inline] -pub fn x(ins: u16) -> Reg { - (ins >> 8 & 0xf) as Reg -} -/// Extracts the Y nibble of an IXYN instruction -#[inline] -pub fn y(ins: u16) -> Reg { - (ins >> 4 & 0xf) as Reg -} -/// Extracts the N nibble of an IXYN instruction -#[inline] -pub fn n(ins: u16) -> Nib { - (ins & 0xf) as Nib -} -/// Extracts the B byte of an IXBB instruction -#[inline] -pub fn b(ins: u16) -> u8 { - (ins & 0xff) as u8 -} -/// Extracts the ADR trinibble of an IADR instruction -#[inline] -pub fn a(ins: u16) -> Adr { - ins & 0x0fff -} - -/// Disassembles Chip-8 instructions, printing them in the provided [owo_colors::Style]s -#[derive(Clone, Debug, PartialEq)] -pub struct Disassemble { - invalid: Style, - normal: Style, -} - -impl Default for Disassemble { - fn default() -> Self { - Disassemble::builder().build() - } -} - -// Public API -impl Disassemble { - /// Returns a new Disassemble with the provided Styles - pub fn new(invalid: Style, normal: Style) -> Disassemble { - Disassemble { invalid, normal } - } - /// Creates a [DisassembleBuilder], for partial configuration - pub fn builder() -> DisassembleBuilder { - DisassembleBuilder::default() - } - /// Disassemble a single instruction - pub fn instruction(&self, opcode: u16) -> String { - let (i, x, y, n, b, a) = ( - i(opcode), - x(opcode), - y(opcode), - n(opcode), - b(opcode), - a(opcode), - ); - match i { - // # Issue a system call - // |opcode| effect | - // |------|------------------------------------| - // | 00e0 | Clear screen memory to all 0 | - // | 00ee | Return from subroutine | - 0x0 => match a { - 0x0e0 => self.clear_screen(), - 0x0ee => self.ret(), - _ => self.sys(a), - }, - // | 1aaa | Sets pc to an absolute address - 0x1 => self.jump(a), - // | 2aaa | Pushes pc onto the stack, then jumps to a - 0x2 => self.call(a), - // | 3xbb | Skips next instruction if register X == b - 0x3 => self.skip_equals_immediate(x, b), - // | 4xbb | Skips next instruction if register X != b - 0x4 => self.skip_not_equals_immediate(x, b), - // # Performs a register-register comparison - // |opcode| effect | - // |------|------------------------------------| - // | 9XY0 | Skip next instruction if vX == vY | - 0x5 => match n { - 0x0 => self.skip_equals(x, y), - _ => self.unimplemented(opcode), - }, - // 6xbb: Loads immediate byte b into register vX - 0x6 => self.load_immediate(x, b), - // 7xbb: Adds immediate byte b to register vX - 0x7 => self.add_immediate(x, b), - // # Performs ALU operation - // |opcode| effect | - // |------|------------------------------------| - // | 8xy0 | Y = X | - // | 8xy1 | X = X | Y | - // | 8xy2 | X = X & Y | - // | 8xy3 | X = X ^ Y | - // | 8xy4 | X = X + Y; Set vF=carry | - // | 8xy5 | X = X - Y; Set vF=carry | - // | 8xy6 | X = X >> 1 | - // | 8xy7 | X = Y - X; Set vF=carry | - // | 8xyE | X = X << 1 | - 0x8 => match n { - 0x0 => self.load(x, y), - 0x1 => self.or(x, y), - 0x2 => self.and(x, y), - 0x3 => self.xor(x, y), - 0x4 => self.add(x, y), - 0x5 => self.sub(x, y), - 0x6 => self.shift_right(x), - 0x7 => self.backwards_sub(x, y), - 0xE => self.shift_left(x), - _ => self.unimplemented(opcode), - }, - // # Performs a register-register comparison - // |opcode| effect | - // |------|------------------------------------| - // | 9XY0 | Skip next instruction if vX != vY | - 0x9 => match n { - 0 => self.skip_not_equals(x, y), - _ => self.unimplemented(opcode), - }, - // Aaaa: Load address #a into register I - 0xa => self.load_i_immediate(a), - // Baaa: Jump to &adr + v0 - 0xb => self.jump_indexed(a), - // Cxbb: Stores a random number + the provided byte into vX - 0xc => self.rand(x, b), - // Dxyn: Draws n-byte sprite to the screen at coordinates (vX, vY) - 0xd => self.draw(x, y, n), - - // # Skips instruction on value of keypress - // |opcode| effect | - // |------|------------------------------------| - // | eX9e | Skip next instruction if key == #X | - // | eXa1 | Skip next instruction if key != #X | - 0xe => match b { - 0x9e => self.skip_key_equals(x), - 0xa1 => self.skip_key_not_equals(x), - _ => self.unimplemented(opcode), - }, - - // # Performs IO - // |opcode| effect | - // |------|------------------------------------| - // | fX07 | Set vX to value in delay timer | - // | fX0a | Wait for input, store in vX m | - // | fX15 | Set sound timer to the value in vX | - // | fX18 | set delay timer to the value in vX | - // | fX1e | Add x to I | - // | fX29 | Load sprite for character x into I | - // | fX33 | BCD convert X into I[0..3] | - // | fX55 | DMA Stor from I to registers 0..X | - // | fX65 | DMA Load from I to registers 0..X | - 0xf => match b { - 0x07 => self.load_delay_timer(x), - 0x0A => self.wait_for_key(x), - 0x15 => self.store_delay_timer(x), - 0x18 => self.store_sound_timer(x), - 0x1E => self.add_to_indirect(x), - 0x29 => self.load_sprite(x), - 0x33 => self.bcd_convert(x), - 0x55 => self.store_dma(x), - 0x65 => self.load_dma(x), - _ => self.unimplemented(opcode), - }, - _ => unreachable!("Extracted nibble from byte, got >nibble?"), - } - } -} - -// Private api -impl Disassemble { - /// Unused instructions - fn unimplemented(&self, opcode: u16) -> String { - format!("inval {opcode:04x}") - .style(self.invalid) - .to_string() - } - /// `0aaa`: Handles a "machine language function call" (lmao) - pub fn sys(&self, a: Adr) -> String { - format!("sysc {a:03x}").style(self.invalid).to_string() - } - /// `00e0`: Clears the screen memory to 0 - pub fn clear_screen(&self) -> String { - "cls ".style(self.normal).to_string() - } - /// `00ee`: Returns from subroutine - pub fn ret(&self) -> String { - "ret ".style(self.normal).to_string() - } - /// `1aaa`: Sets the program counter to an absolute address - pub fn jump(&self, a: Adr) -> String { - format!("jmp {a:03x}").style(self.normal).to_string() - } - /// `2aaa`: Pushes pc onto the stack, then jumps to a - pub fn call(&self, a: Adr) -> String { - format!("call {a:03x}").style(self.normal).to_string() - } - /// `3xbb`: Skips the next instruction if register X == b - pub fn skip_equals_immediate(&self, x: Reg, b: u8) -> String { - format!("se #{b:02x}, v{x:X}") - .style(self.normal) - .to_string() - } - /// `4xbb`: Skips the next instruction if register X != b - pub fn skip_not_equals_immediate(&self, x: Reg, b: u8) -> String { - format!("sne #{b:02x}, v{x:X}") - .style(self.normal) - .to_string() - } - /// `5xy0`: Skips the next instruction if register X != register Y - pub fn skip_equals(&self, x: Reg, y: Reg) -> String { - format!("se v{x:X}, v{y:X}") - .style(self.normal) - .to_string() - } - - /// `6xbb`: Loads immediate byte b into register vX - pub fn load_immediate(&self, x: Reg, b: u8) -> String { - format!("mov #{b:02x}, v{x:X}") - .style(self.normal) - .to_string() - } - /// `7xbb`: Adds immediate byte b to register vX - pub fn add_immediate(&self, x: Reg, b: u8) -> String { - format!("add #{b:02x}, v{x:X}") - .style(self.normal) - .to_string() - } - /// `8xy0`: Loads the value of y into x - pub fn load(&self, x: Reg, y: Reg) -> String { - format!("mov v{y:X}, v{x:X}") - .style(self.normal) - .to_string() - } - /// `8xy1`: Performs bitwise or of vX and vY, and stores the result in vX - pub fn or(&self, x: Reg, y: Reg) -> String { - format!("or v{y:X}, v{x:X}") - .style(self.normal) - .to_string() - } - /// `8xy2`: Performs bitwise and of vX and vY, and stores the result in vX - pub fn and(&self, x: Reg, y: Reg) -> String { - format!("and v{y:X}, v{x:X}") - .style(self.normal) - .to_string() - } - - /// `8xy3`: Performs bitwise xor of vX and vY, and stores the result in vX - pub fn xor(&self, x: Reg, y: Reg) -> String { - format!("xor v{y:X}, v{x:X}") - .style(self.normal) - .to_string() - } - /// `8xy4`: Performs addition of vX and vY, and stores the result in vX - pub fn add(&self, x: Reg, y: Reg) -> String { - format!("add v{y:X}, v{x:X}") - .style(self.normal) - .to_string() - } - /// `8xy5`: Performs subtraction of vX and vY, and stores the result in vX - pub fn sub(&self, x: Reg, y: Reg) -> String { - format!("sub v{y:X}, v{x:X}") - .style(self.normal) - .to_string() - } - /// `8xy6`: Performs bitwise right shift of vX - pub fn shift_right(&self, x: Reg) -> String { - format!("shr v{x:X}").style(self.normal).to_string() - } - /// `8xy7`: Performs subtraction of vY and vX, and stores the result in vX - pub fn backwards_sub(&self, x: Reg, y: Reg) -> String { - format!("bsub v{y:X}, v{x:X}") - .style(self.normal) - .to_string() - } - /// 8X_E: Performs bitwise left shift of vX - pub fn shift_left(&self, x: Reg) -> String { - format!("shl v{x:X}").style(self.normal).to_string() - } - /// `9xy0`: Skip next instruction if X != y - pub fn skip_not_equals(&self, x: Reg, y: Reg) -> String { - format!("sne v{x:X}, v{y:X}") - .style(self.normal) - .to_string() - } - /// Aadr: Load address #adr into register I - pub fn load_i_immediate(&self, a: Adr) -> String { - format!("mov ${a:03x}, I").style(self.normal).to_string() - } - /// Badr: Jump to &adr + v0 - pub fn jump_indexed(&self, a: Adr) -> String { - format!("jmp ${a:03x}+v0").style(self.normal).to_string() - } - /// `Cxbb`: Stores a random number + the provided byte into vX - /// Pretty sure the input byte is supposed to be the seed of a LFSR or something - pub fn rand(&self, x: Reg, b: u8) -> String { - format!("rand #{b:X}, v{x:X}") - .style(self.normal) - .to_string() - } - /// `Dxyn`: Draws n-byte sprite to the screen at coordinates (vX, vY) - pub fn draw(&self, x: Reg, y: Reg, n: Nib) -> String { - format!("draw #{n:x}, v{x:X}, v{y:X}") - .style(self.normal) - .to_string() - } - /// `Ex9E`: Skip next instruction if key == #X - pub fn skip_key_equals(&self, x: Reg) -> String { - format!("sek v{x:X}").style(self.normal).to_string() - } - /// `ExaE`: Skip next instruction if key != #X - pub fn skip_key_not_equals(&self, x: Reg) -> String { - format!("snek v{x:X}").style(self.normal).to_string() - } - /// `Fx07`: Get the current DT, and put it in vX - /// ```py - /// vX = DT - /// ``` - pub fn load_delay_timer(&self, x: Reg) -> String { - format!("mov DT, v{x:X}").style(self.normal).to_string() - } - /// `Fx0A`: Wait for key, then vX = K - pub fn wait_for_key(&self, x: Reg) -> String { - format!("waitk v{x:X}").style(self.normal).to_string() - } - /// `Fx15`: Load vX into DT - /// ```py - /// DT = vX - /// ``` - pub fn store_delay_timer(&self, x: Reg) -> String { - format!("mov v{x:X}, DT").style(self.normal).to_string() - } - /// `Fx18`: Load vX into ST - /// ```py - /// ST = vX; - /// ``` - pub fn store_sound_timer(&self, x: Reg) -> String { - format!("mov v{x:X}, ST").style(self.normal).to_string() - } - /// `Fx1e`: Add vX to I, - /// ```py - /// I += vX; - /// ``` - pub fn add_to_indirect(&self, x: Reg) -> String { - format!("add v{x:X}, I").style(self.normal).to_string() - } - /// `Fx29`: Load sprite for character in vX into I - /// ```py - /// I = sprite(X); - /// ``` - pub fn load_sprite(&self, x: Reg) -> String { - format!("font v{x:X}, I").style(self.normal).to_string() - } - /// `Fx33`: BCD convert X into I`[0..3]` - pub fn bcd_convert(&self, x: Reg) -> String { - format!("bcd v{x:X}, &I").style(self.normal).to_string() - } - /// `Fx55`: DMA Stor from I to registers 0..X - pub fn store_dma(&self, x: Reg) -> String { - format!("dmao v{x:X}").style(self.normal).to_string() - } - /// `Fx65`: DMA Load from I to registers 0..X - pub fn load_dma(&self, x: Reg) -> String { - format!("dmai v{x:X}").style(self.normal).to_string() - } -} - -/// Builder for [Disassemble]rs -#[derive(Clone, Debug, Default, PartialEq)] -pub struct DisassembleBuilder { - invalid: Option