badline 0.13.0 → 0.15.0

data/lib/badline/vic20/keyed_modules.rb

@@ -0,0 +1,73 @@
+# frozen_string_literal: true
+
+module Badline
+  class Vic20
+    # The whole machine as keyed snapshot modules (Snapshot::Keyed), in the
+    # order a load applies them, as C64::KeyedModules: BL-MACHINE with the
+    # RAM expansion and the bytes each side's data lines hold under bus.*,
+    # the memories, a cartridge's ROM chips, the VIC with its sound, both
+    # VIAs, the CPU, the datasette, device 8 through the traps and the true
+    # drives.
+    module KeyedModules
+      def save_modules
+        bus = @bus
+        sections = [Snapshot::Keyed.section("BL-MACHINE") do |out|
+          save_machine_fields(out)
+          bus.save_fields(out, "bus.")
+        end]
+        sections << Snapshot::Keyed.section("BL-RAM") { |out| bus.ram.save_fields(out, "ram") }
+        sections << Snapshot::Keyed.section("BL-COLORRAM") { |out| bus.color_ram.save_fields(out, "ram") }
+        sections << Snapshot::Keyed.section("BL-CART") { |out| bus.save_rom_fields(out) } if bus.cartridge?
+        sections << Snapshot::Keyed.section("BL-CPU") { |out| @cpu.save_fields(out) }
+        sections << Snapshot::Keyed.section("BL-VICI") { |out| @vic.save_fields(out) }
+        sections << Snapshot::Keyed.section("BL-VIA1") { |out| @via1.save_fields(out) }
+        sections << Snapshot::Keyed.section("BL-VIA2") { |out| @via2.save_fields(out) }
+        sections << Snapshot::Keyed.section("BL-TAPE") { |out| @datasette.save_fields(out) }
+        sections << Snapshot::Keyed.section("BL-TRAPDOS") { |out| save_trap_dos_fields(out) } if mounted?
+        save_drive_modules(sections)
+      end
+
+      # Raises Snapshot::FormatError for the modules of a VIC-20 with
+      # another RAM expansion.
+      def load_modules(modules)
+        machine = modules.machine
+        check_snapshot_setup(Snapshot::Vic20Setup.read_fields(machine))
+        load_machine_fields(machine)
+        bus = @bus
+        bus.load_fields(machine, "bus.")
+        bus.ram.load_fields(modules.required("BL-RAM"), "ram")
+        bus.color_ram.load_fields(modules.required("BL-COLORRAM"), "ram")
+        bus.load_rom_fields(modules.optional("BL-CART") || Snapshot::Keyed::Reader.new("BL-CART"))
+        bus.restored!
+        @vic.load_fields(modules.required("BL-VICI"))
+        @via1.load_fields(modules.required("BL-VIA1"))
+        @via2.load_fields(modules.required("BL-VIA2"))
+        @cpu.load_fields(modules.required("BL-CPU"))
+        @datasette.load_fields(modules.required("BL-TAPE"))
+        trap_dos = modules.optional("BL-TRAPDOS")
+        trap_dos ? load_trap_dos_fields(trap_dos, detached: modules.detached?) : unmount
+        load_drive_modules(modules)
+        modules_restored!
+        self
+      end
+
+      private
+
+      def modules_restored!
+        @cpu.restored!
+        @vic.restored!
+        @via1.restored!
+        @via2.restored!
+        machine_restored!
+      end
+
+      def check_snapshot_setup(setup)
+        return if setup.ram == @ram_configuration
+
+        raise Snapshot::FormatError, "the snapshot is of a VIC-20 with #{setup.ram} RAM, not #{@ram_configuration}"
+      end
+    end
+
+    include KeyedModules
+  end
+end

data/lib/badline/vic20/keyed_state.rb

@@ -0,0 +1,45 @@
+# frozen_string_literal: true
+
+module Badline
+  class Vic20
+    # The machine's own fields in a keyed snapshot module (Snapshot::Keyed,
+    # BL-MACHINE): the family, its RAM expansion by name, the cycle count,
+    # the RESTORE key's NMI, and the host's typing still to feed and on_init
+    # handlers still to run under host.*.
+    module KeyedState
+      # How many more on_init handlers the machine a snapshot was taken of had
+      # yet to run than this one has. Nil until the machine is restored.
+      attr_reader :init_handlers_lost
+
+      # Whether a snapshot saves now (Machine::Settling): the CPU between
+      # instructions or jammed.
+      def settled_for_snapshot? = @cpu.boundary? || @cpu.jammed?
+
+      # The sound's voices, run up to this cycle.
+      def settle_chips_for_snapshot = @sound.catch_up!
+
+      def save_machine_fields(out)
+        out.text("family", "vic20").text("written_by", VERSION)
+        Snapshot::Vic20Setup.new(ram: @ram_configuration).write_fields(out)
+        out.int("cycles", @cycles).bool("nmi_asserted", @nmi_asserted)
+        pending = @pending_keys
+        out.ints("host.pending_keys", pending) if pending
+        out.int("host.init_pending", @cycles <= @init_threshold ? @init_handlers.length : 0)
+      end
+
+      def load_machine_fields(input)
+        @cycles = input.int("cycles", @cycles)
+        @nmi_asserted = input.bool("nmi_asserted", @nmi_asserted)
+        pending = input.ints("host.pending_keys", [])
+        @pending_keys = pending.empty? ? nil : pending.dup
+        @init_handlers_lost = [input.int("host.init_pending", 0) - @init_handlers.length, 0].max
+      end
+
+      # The serial bus's lines and the datasette's motor and write line from
+      # the VIAs, once they are loaded.
+      def machine_restored! = via_written
+    end
+
+    include KeyedState
+  end
+end

data/lib/badline/vic20.rb

@@ -6,9 +6,9 @@ require "badline/vic20/cpu"
 require "badline/vic20/keyboard_via_ports"
 require "badline/vic20/port_wiring"
 require "badline/vic20/user_via_ports"
-require "badline/chips/vic_i"
-require "badline/chips/vic_i/sound"
-require "badline/vic20/saved_state"
+require "badline/snapshot/vic20_setup"
+require "badline/vic20/keyed_state"
+require "badline/vic20/keyed_modules"
 
 module Badline
   # The Commodore VIC-20 with the PAL 6561: a 6502 at the VIC's clock, the
@@ -22,11 +22,11 @@ module Badline
   # serves disks through the KERNAL traps or a true 1541.
   class Vic20
     include IntegerHelper
-    include KeyboardBuffer
+    include Machine::KeyboardBuffer
     include Machine::Clocking
+    include Machine::Settling
     include Attachments
     include PortWiring
-    include SavedState
 
     attr_reader :bus, :cpu, :vic, :via1, :via2, :keyboard, :joystick1, :cycles, :init_threshold, :sound,
                 :drive1541, :iec_bus, :datasette

data/lib/badline.rb

@@ -2,6 +2,7 @@
 
 require "badline/core"
 require "badline/c128"
+require "badline/plus4"
 require "badline/options"
 require "badline/data_path"
 require "badline/snapshot"

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: badline
 version: !ruby/object:Gem::Version
-  version: 0.13.0
+  version: 0.15.0
 platform: ruby
 authors:
 - Inge Jørgensen
@@ -45,6 +45,7 @@ files:
 - doc/media.md
 - doc/pinned-behaviour.md
 - doc/sid-player.md
+- doc/snapshot-format.md
 - doc/snapshots.md
 - exe/badline-ruby
 - lib/badline.rb
@@ -68,18 +69,19 @@ files:
 - lib/badline/c128.rb
 - lib/badline/c128/banks.rb
 - lib/badline/c128/bus.rb
-- lib/badline/c128/bus/saved_state.rb
+- lib/badline/c128/bus/keyed_state.rb
 - lib/badline/c128/color_lines.rb
 - lib/badline/c128/cpu.rb
 - lib/badline/c128/drives.rb
 - lib/badline/c128/fast_serial.rb
 - lib/badline/c128/io_pages.rb
+- lib/badline/c128/keyed_modules.rb
+- lib/badline/c128/keyed_state.rb
 - lib/badline/c128/keys.rb
 - lib/badline/c128/mmu.rb
 - lib/badline/c128/mmu_pages.rb
 - lib/badline/c128/model.rb
 - lib/badline/c128/modes.rb
-- lib/badline/c128/saved_state.rb
 - lib/badline/c128/z80.rb
 - lib/badline/c128/z80_pages.rb
 - lib/badline/c128/z80_turns.rb
@@ -91,11 +93,12 @@ files:
 - lib/badline/c64/banked_ram/plus60k.rb
 - lib/badline/c64/banked_ram/unexpanded.rb
 - lib/badline/c64/bus.rb
+- lib/badline/c64/bus/debug_register.rb
 - lib/badline/c64/bus/extra_sids.rb
 - lib/badline/c64/bus/fittings.rb
+- lib/badline/c64/bus/keyed_state.rb
 - lib/badline/c64/bus/pla.rb
 - lib/badline/c64/bus/roms.rb
-- lib/badline/c64/bus/saved_state.rb
 - lib/badline/c64/bus/sid_slots.rb
 - lib/badline/c64/cartridge.rb
 - lib/badline/c64/cartridge/action_replay.rb
@@ -107,22 +110,20 @@ files:
 - lib/badline/c64/cartridge/epyx_fastload.rb
 - lib/badline/c64/cartridge/final_cartridge3.rb
 - lib/badline/c64/cartridge/flash.rb
-- lib/badline/c64/cartridge/flash/saved_state.rb
 - lib/badline/c64/cartridge/freezer.rb
 - lib/badline/c64/cartridge/fun_play.rb
 - lib/badline/c64/cartridge/g_mod2.rb
 - lib/badline/c64/cartridge/game_system.rb
 - lib/badline/c64/cartridge/geo_ram.rb
 - lib/badline/c64/cartridge/kcs_power.rb
+- lib/badline/c64/cartridge/keyed_state.rb
 - lib/badline/c64/cartridge/mach5.rb
 - lib/badline/c64/cartridge/magic_desk.rb
 - lib/badline/c64/cartridge/ocean.rb
 - lib/badline/c64/cartridge/pagefox.rb
 - lib/badline/c64/cartridge/retro_replay.rb
-- lib/badline/c64/cartridge/retro_replay/saved_state.rb
 - lib/badline/c64/cartridge/rex_utility.rb
 - lib/badline/c64/cartridge/rgcd.rb
-- lib/badline/c64/cartridge/saved_state.rb
 - lib/badline/c64/cartridge/simons_basic.rb
 - lib/badline/c64/cartridge/standard.rb
 - lib/badline/c64/cartridge/super_games.rb
@@ -131,20 +132,20 @@ files:
 - lib/badline/c64/color_memory.rb
 - lib/badline/c64/common.rb
 - lib/badline/c64/kernal_traps.rb
+- lib/badline/c64/keyed_modules.rb
+- lib/badline/c64/keyed_state.rb
 - lib/badline/c64/reu.rb
 - lib/badline/c64/reu/dma.rb
-- lib/badline/c64/reu/dma/saved_state.rb
+- lib/badline/c64/reu/keyed_state.rb
 - lib/badline/c64/reu/ram.rb
-- lib/badline/c64/reu/saved_state.rb
 - lib/badline/c64/reu/trigger.rb
-- lib/badline/c64/saved_state.rb
 - lib/badline/c64/true_drives.rb
+- lib/badline/chips.rb
 - lib/badline/chips/cia.rb
 - lib/badline/chips/cia/fast_forward.rb
 - lib/badline/chips/cia/interrupt_register.rb
-- lib/badline/chips/cia/saved_state.rb
+- lib/badline/chips/cia/keyed_parts.rb
 - lib/badline/chips/cia/serial.rb
-- lib/badline/chips/cia/serial/saved_state.rb
 - lib/badline/chips/cia/time_of_day.rb
 - lib/badline/chips/cia/timer.rb
 - lib/badline/chips/cpu.rb
@@ -162,37 +163,45 @@ files:
 - lib/badline/chips/cpu/instruction_set/stack.rb
 - lib/badline/chips/cpu/instruction_set/transfer.rb
 - lib/badline/chips/cpu/interrupts.rb
+- lib/badline/chips/cpu/keyed_state.rb
 - lib/badline/chips/cpu/microcode.rb
 - lib/badline/chips/cpu/operations.rb
 - lib/badline/chips/cpu/port.rb
-- lib/badline/chips/cpu/saved_state.rb
 - lib/badline/chips/cpu/stack_operations.rb
 - lib/badline/chips/cpu/traps.rb
 - lib/badline/chips/sid.rb
 - lib/badline/chips/sid/catch_up.rb
 - lib/badline/chips/sid/decimator.rb
 - lib/badline/chips/sid/envelope.rb
-- lib/badline/chips/sid/envelope/saved_state.rb
 - lib/badline/chips/sid/filter.rb
-- lib/badline/chips/sid/filter/saved_state.rb
-- lib/badline/chips/sid/saved_state.rb
+- lib/badline/chips/sid/keyed_parts.rb
 - lib/badline/chips/sid/voice.rb
 - lib/badline/chips/sid/waveform.rb
 - lib/badline/chips/sid/waveform/combined.rb
 - lib/badline/chips/sid/waveform/fast_forward.rb
 - lib/badline/chips/sid/waveform/noise_writeback.rb
-- lib/badline/chips/sid/waveform/saved_state.rb
+- lib/badline/chips/ted.rb
+- lib/badline/chips/ted/beam.rb
+- lib/badline/chips/ted/fetches.rb
+- lib/badline/chips/ted/keyed_state.rb
+- lib/badline/chips/ted/modes.rb
+- lib/badline/chips/ted/palette.rb
+- lib/badline/chips/ted/picture.rb
+- lib/badline/chips/ted/sound.rb
+- lib/badline/chips/ted/sound/output.rb
+- lib/badline/chips/ted/timers.rb
+- lib/badline/chips/tia.rb
 - lib/badline/chips/vdc.rb
+- lib/badline/chips/vdc/keyed_parts.rb
 - lib/badline/chips/vdc/memory.rb
 - lib/badline/chips/vdc/painter.rb
 - lib/badline/chips/vdc/raster.rb
-- lib/badline/chips/vdc/saved_state.rb
 - lib/badline/chips/vdc/window.rb
 - lib/badline/chips/via.rb
 - lib/badline/chips/via/control_lines.rb
 - lib/badline/chips/via/fast_forward.rb
 - lib/badline/chips/via/interrupt_register.rb
-- lib/badline/chips/via/saved_state.rb
+- lib/badline/chips/via/keyed_parts.rb
 - lib/badline/chips/via/shift_register.rb
 - lib/badline/chips/via/timer1.rb
 - lib/badline/chips/via/timer2.rb
@@ -204,24 +213,21 @@ files:
 - lib/badline/chips/vic/display_state.rb
 - lib/badline/chips/vic/graphics_mode.rb
 - lib/badline/chips/vic/graphics_shifter.rb
-- lib/badline/chips/vic/graphics_shifter/saved_state.rb
+- lib/badline/chips/vic/keyed_parts.rb
+- lib/badline/chips/vic/keyed_sprites.rb
+- lib/badline/chips/vic/keyed_state.rb
 - lib/badline/chips/vic/register_log.rb
 - lib/badline/chips/vic/registers.rb
-- lib/badline/chips/vic/saved_state.rb
 - lib/badline/chips/vic/sequencer.rb
-- lib/badline/chips/vic/sequencer/saved_state.rb
 - lib/badline/chips/vic/sequencer_output.rb
 - lib/badline/chips/vic/sprite.rb
 - lib/badline/chips/vic/sprite/internal_bus.rb
-- lib/badline/chips/vic/sprite/saved_state.rb
 - lib/badline/chips/vic/sprite/shifter.rb
 - lib/badline/chips/vic/sprite/timing.rb
 - lib/badline/chips/vic/sprites.rb
-- lib/badline/chips/vic/sprites/saved_state.rb
 - lib/badline/chips/vic_i.rb
+- lib/badline/chips/vic_i/keyed_parts.rb
 - lib/badline/chips/vic_i/painter.rb
-- lib/badline/chips/vic_i/painter/saved_state.rb
-- lib/badline/chips/vic_i/saved_state.rb
 - lib/badline/chips/vic_i/sound.rb
 - lib/badline/chips/vic_i/sound/output.rb
 - lib/badline/chips/vic_i/text_window.rb
@@ -237,17 +243,16 @@ files:
 - lib/badline/chips/z80/flags.rb
 - lib/badline/chips/z80/interrupt_acceptance.rb
 - lib/badline/chips/z80/jumps.rb
+- lib/badline/chips/z80/keyed_state.rb
 - lib/badline/chips/z80/loads.rb
 - lib/badline/chips/z80/main_page.rb
 - lib/badline/chips/z80/registers.rb
-- lib/badline/chips/z80/saved_state.rb
 - lib/badline/chips/z80/shifts.rb
-- lib/badline/chrout_trap.rb
 - lib/badline/core.rb
 - lib/badline/data_path.rb
-- lib/badline/debug_register.rb
+- lib/badline/drives.rb
 - lib/badline/drives/datasette.rb
-- lib/badline/drives/datasette/saved_state.rb
+- lib/badline/drives/datasette/keyed_state.rb
 - lib/badline/drives/engine.rb
 - lib/badline/drives/engine/core.rb
 - lib/badline/drives/engine/fast_serial.rb
@@ -263,20 +268,18 @@ files:
 - lib/badline/drives/model1541/byte_ready.rb
 - lib/badline/drives/model1541/cpu.rb
 - lib/badline/drives/model1541/disk.rb
-- lib/badline/drives/model1541/disk/saved_state.rb
 - lib/badline/drives/model1541/disk_via.rb
 - lib/badline/drives/model1541/gcr.rb
+- lib/badline/drives/model1541/keyed_state.rb
 - lib/badline/drives/model1541/mechanism.rb
-- lib/badline/drives/model1541/mechanism/saved_state.rb
 - lib/badline/drives/model1541/rotation.rb
-- lib/badline/drives/model1541/saved_state.rb
 - lib/badline/drives/model1541/sector_reader.rb
 - lib/badline/drives/model1541/serial_port.rb
 - lib/badline/drives/model1541/track.rb
 - lib/badline/drives/model1571.rb
 - lib/badline/drives/model1571/bus.rb
 - lib/badline/drives/model1571/cpu.rb
-- lib/badline/drives/model1571/saved_state.rb
+- lib/badline/drives/model1571/keyed_state.rb
 - lib/badline/drives/model1571/serial_port.rb
 - lib/badline/drives/model1571/serial_via.rb
 - lib/badline/drives/model1571/wd1770.rb
@@ -284,16 +287,14 @@ files:
 - lib/badline/drives/model1581/bus.rb
 - lib/badline/drives/model1581/cpu.rb
 - lib/badline/drives/model1581/disk.rb
-- lib/badline/drives/model1581/disk/saved_state.rb
+- lib/badline/drives/model1581/keyed_state.rb
 - lib/badline/drives/model1581/mechanism.rb
-- lib/badline/drives/model1581/saved_state.rb
 - lib/badline/drives/model1581/serial_port.rb
 - lib/badline/drives/model1581/slot.rb
 - lib/badline/drives/model1581/track.rb
 - lib/badline/drives/model1581/track_bytes.rb
 - lib/badline/drives/model1581/wd1772.rb
 - lib/badline/drives/model1581/wd1772/registers.rb
-- lib/badline/drives/model1581/wd1772/saved_state.rb
 - lib/badline/drives/model1581/wd1772/sector_writes.rb
 - lib/badline/drives/model1581/wd1772/sectors.rb
 - lib/badline/drives/model1581/wd1772/stepping.rb
@@ -350,10 +351,12 @@ files:
 - lib/badline/input/control_ports.rb
 - lib/badline/input/joystick.rb
 - lib/badline/input/keyboard.rb
+- lib/badline/input/matrix_typist.rb
 - lib/badline/input/mouse1351.rb
 - lib/badline/input/paddles.rb
 - lib/badline/integer_helper.rb
 - lib/badline/kernal_trap.rb
+- lib/badline/kernal_trap/chrout.rb
 - lib/badline/kernal_trap/dos.rb
 - lib/badline/kernal_trap/dos/block_commands.rb
 - lib/badline/kernal_trap/dos/channel.rb
@@ -364,20 +367,23 @@ files:
 - lib/badline/kernal_trap/dos/write_file.rb
 - lib/badline/kernal_trap/dos/writes.rb
 - lib/badline/kernal_trap/file_routine.rb
+- lib/badline/kernal_trap/keyed_state.rb
 - lib/badline/kernal_trap/layout.rb
 - lib/badline/kernal_trap/load.rb
 - lib/badline/kernal_trap/routine.rb
 - lib/badline/kernal_trap/save.rb
 - lib/badline/kernal_trap/serial.rb
-- lib/badline/keyboard_buffer.rb
 - lib/badline/machine.rb
 - lib/badline/machine/clocking.rb
+- lib/badline/machine/keyboard_buffer.rb
+- lib/badline/machine/settling.rb
 - lib/badline/media.rb
 - lib/badline/media/boot_disk.rb
 - lib/badline/media/disk_list.rb
 - lib/badline/media/disk_set.rb
 - lib/badline/media/extensions.rb
 - lib/badline/media/not_disk.rb
+- lib/badline/media/plus4_media.rb
 - lib/badline/media/program.rb
 - lib/badline/media/true_drive.rb
 - lib/badline/media/tune.rb
@@ -393,6 +399,18 @@ files:
 - lib/badline/options/option.rb
 - lib/badline/options/table.rb
 - lib/badline/options/validation.rb
+- lib/badline/plus4.rb
+- lib/badline/plus4/acia.rb
+- lib/badline/plus4/bus.rb
+- lib/badline/plus4/cassette_sense.rb
+- lib/badline/plus4/cpu.rb
+- lib/badline/plus4/cpu_port.rb
+- lib/badline/plus4/keyboard_port.rb
+- lib/badline/plus4/keyed_modules.rb
+- lib/badline/plus4/keyed_parts.rb
+- lib/badline/plus4/keyed_state.rb
+- lib/badline/plus4/model.rb
+- lib/badline/plus4/user_port.rb
 - lib/badline/region.rb
 - lib/badline/rom.rb
 - lib/badline/roms/README
@@ -411,6 +429,11 @@ files:
 - lib/badline/roms/kernal-pet64.rom
 - lib/badline/roms/kernal-sx64.rom
 - lib/badline/roms/kernal.rom
+- lib/badline/roms/plus4/basic.rom
+- lib/badline/roms/plus4/function-high.rom
+- lib/badline/roms/plus4/function-low.rom
+- lib/badline/roms/plus4/kernal-ntsc.rom
+- lib/badline/roms/plus4/kernal-pal.rom
 - lib/badline/roms/vic20/basic.rom
 - lib/badline/roms/vic20/character.rom
 - lib/badline/roms/vic20/kernal-ntsc.rom
@@ -426,10 +449,18 @@ files:
 - lib/badline/snapshot/c128_setup.rb
 - lib/badline/snapshot/c64_setup.rb
 - lib/badline/snapshot/container.rb
+- lib/badline/snapshot/field_doc.rb
+- lib/badline/snapshot/field_doc/markdown.rb
 - lib/badline/snapshot/image.rb
+- lib/badline/snapshot/keyed.rb
+- lib/badline/snapshot/keyed/cursor.rb
+- lib/badline/snapshot/keyed/modules.rb
+- lib/badline/snapshot/keyed/reader.rb
+- lib/badline/snapshot/keyed/recorder.rb
+- lib/badline/snapshot/keyed/report.rb
+- lib/badline/snapshot/keyed/writer.rb
 - lib/badline/snapshot/machine_state.rb
-- lib/badline/snapshot/setup.rb
-- lib/badline/snapshot/state.rb
+- lib/badline/snapshot/plus4_setup.rb
 - lib/badline/snapshot/storage_setup.rb
 - lib/badline/snapshot/vic20_setup.rb
 - lib/badline/snapshot/vice.rb
@@ -467,17 +498,19 @@ files:
 - lib/badline/support.rb
 - lib/badline/support/c128_checkpoint.rb
 - lib/badline/support/checkpoint.rb
+- lib/badline/support/plus4_checkpoint.rb
 - lib/badline/support/vic20_checkpoint.rb
 - lib/badline/timing.rb
 - lib/badline/version.rb
 - lib/badline/vic20.rb
 - lib/badline/vic20/attachments.rb
 - lib/badline/vic20/bus.rb
-- lib/badline/vic20/bus/saved_state.rb
+- lib/badline/vic20/bus/keyed_state.rb
 - lib/badline/vic20/cpu.rb
 - lib/badline/vic20/keyboard_via_ports.rb
+- lib/badline/vic20/keyed_modules.rb
+- lib/badline/vic20/keyed_state.rb
 - lib/badline/vic20/port_wiring.rb
-- lib/badline/vic20/saved_state.rb
 - lib/badline/vic20/user_via_ports.rb
 - packaging/homebrew/badline.rb
 homepage: https://github.com/elektronaut/badline

data/lib/badline/c128/bus/saved_state.rb

@@ -1,53 +0,0 @@
-# frozen_string_literal: true
-
-module Badline
-  class C128
-    class Bus
-      # The bus's state for a snapshot, as C64::Bus::SavedState is the
-      # C64's.
-      module SavedState
-        # The machine's memory, the last access and everything on the bus but
-        # the keyboard, the joysticks, the pot devices and CAPS LOCK, which the
-        # host holds. A cartridge is already in the port, built from its setup.
-        def save_state(out)
-          out.marker("C128 BUS")
-          out.int(@cpu_port.ddr).int(@cpu_port.data).int(@cpu_port.floating).int(@address).int(@data)
-          @mmu.save_state(out)
-          @ram.save_state(out)
-          @color_lines.color_ram(0).save_state(out)
-          @color_lines.color_ram(1).save_state(out)
-          @cartridge&.save_state(out)
-          @datasette.save_state(out)
-          @vic.save_state(out)
-          @cia1.save_state(out)
-          @cia2.save_state(out)
-          @sid.save_state(out)
-          @vdc.save_state(out)
-        end
-
-        def load_state(input)
-          input.marker("C128 BUS")
-          ddr = input.int
-          data = input.int
-          floating = input.int
-          @address = input.int
-          @data = input.int
-          @mmu.load_state(input)
-          @ram.load_state(input)
-          @color_lines.color_ram(0).load_state(input)
-          @color_lines.color_ram(1).load_state(input)
-          @cartridge&.load_state(input)
-          @datasette.load_state(input)
-          @cpu_port.load(ddr, data, floating)
-          update_overlays!
-          @vic.load_state(input)
-          @control_ports.extra_rows = 0xf8 | @vic.extra_keyboard_lines
-          @cia1.load_state(input)
-          @cia2.load_state(input)
-          @sid.load_state(input)
-          @vdc.load_state(input)
-        end
-      end
-    end
-  end
-end

data/lib/badline/c128/saved_state.rb

@@ -1,117 +0,0 @@
-# frozen_string_literal: true
-
-require "badline/snapshot/c128_setup"
-
-module Badline
-  class C128
-    # How the machine a State from #snapshot was taken of was built.
-    def self.setup(state) = Snapshot::C128Setup.from(state)
-
-    # A new machine, built as the one a State from #snapshot was taken of,
-    # at that state.
-    def self.restored(state) = setup(state).build.apply_state(state)
-
-    # The whole machine's state for a snapshot, as C64's: the
-    # machine's own latches, FAST and TEST as they last took hold, the bus with its RAM, the MMU, the chips and
-    # the VDC, the CPU, the cartridge, the disk device 8 serves through the
-    # traps and a true 1541. The serial lines go back into the bus from the
-    # restored CIA 2. What the host holds stays out: the keyboard, the
-    # joysticks, CAPS LOCK and 40/80 DISPLAY, the traps and callbacks, and
-    # which chip renders.
-    module SavedState
-      # How many more on_init handlers the machine a State was taken of had
-      # yet to run than this one has. Nil until the machine is restored.
-      attr_reader :init_handlers_lost
-
-      def snapshot
-        out = Snapshot::StateWriter.new
-        save_state(out)
-        out.state
-      end
-
-      # Takes the machine back to a State from #snapshot, trying it on a new
-      # machine first, so one that fails leaves this machine as it was.
-      # Raises Snapshot::FormatError for a state of another model or SID.
-      def restore(state)
-        check_setup(C128.setup(state))
-        C128.restored(state)
-        apply_state(state)
-      end
-
-      # Puts a State into the machine without trying it on a new one first.
-      def apply_state(state)
-        input = Snapshot::StateReader.new(state)
-        load_state(input)
-        raise Snapshot::FormatError, "the state goes on past the machine" unless input.finished?
-
-        self
-      end
-
-      def save_state(out)
-        out.marker(Snapshot::C128Setup::MARKER).stamp
-        snapshot_setup.write(out)
-        out.int(@cycles).int(@clock_bits).boolean(@nmi_asserted).boolean(@cartridge_nmi).boolean(@restore_pulse)
-        out.boolean(!@pending_keys.nil?)
-        out.ints(@pending_keys) if @pending_keys
-        out.int(@cycles <= init_threshold ? @init_handlers.length : 0)
-        save_cartridge(out)
-        @bus.save_state(out)
-        @cpu.save_state(out)
-        @z80.save_state(out)
-        out.int(@z80_due).int(@chips_ahead).boolean(@cpu_reset_pending)
-        save_trap_dos(out)
-        save_serial_bus(out)
-      end
-
-      def load_state(input)
-        input.marker(Snapshot::C128Setup::MARKER)
-        input.check_stamp
-        check_setup(Snapshot::C128Setup.read(input))
-        @cycles = input.int
-        @clock_bits = input.int
-        @nmi_asserted = input.boolean?
-        @cartridge_nmi = input.boolean?
-        @restore_pulse = input.boolean?
-        @pending_keys = nil
-        @pending_keys = input.ints if input.boolean?
-        @init_handlers_lost = [input.int - @init_handlers.length, 0].max
-        load_cartridge(input)
-        @cpu_reset_pending = false
-        @bus.load_state(input)
-        push_serial_lines
-        @cpu.load_state(input)
-        load_z80(input)
-        load_trap_dos(input)
-        load_serial_bus(input)
-        push_fast_serial
-      end
-
-      private
-
-      # The Z80 and which CPU has the bus. The bus, restored before it,
-      # hands the bus to its CPU without resetting the 8502.
-      def load_z80(input)
-        @z80_running = @bus.z80?
-        @z80.load_state(input)
-        @z80_due = input.int
-        @chips_ahead = input.int
-        @cpu_reset_pending = input.boolean?
-        @z80_turn = @z80_running || @chips_ahead.positive?
-      end
-
-      # How this machine was built.
-      def snapshot_setup
-        Snapshot::C128Setup.new(model: @model.name, sid_model: @sid.model, mode: @c64_built ? :c64 : :c128)
-      end
-
-      def check_setup(setup)
-        ours = snapshot_setup
-        return if setup == ours
-
-        raise Snapshot::FormatError, "the state is of a #{setup}, not a #{ours}"
-      end
-    end
-
-    include SavedState
-  end
-end