mirror of
https://git.k-space.ee/arti/vt1200.git
synced 2026-10-31 12:05:05 +02:00
arti
02acabb7ef
Add the terminal's actual input parts to the harness as device models on the already-modelled SCN2681 at DUART2: a DEC LK401 keyboard (channel A, 4800 8N1) and a DEC VSXXX-AA mouse (channel B, 4800 8O1), both driven by MAME's host input and wired bit-by-bit to the DUART (rx_a_w/rx_b_w and a_tx_cb/b_tx_cb). Route: the docs, not MAME's lk201. MAME's lk201 device executes the 68HC05 firmware 23-001s9-00.bin, which is not in our ROM set (the downloaded zip only carries the 8051 23-004M2-00.bin, MAME's unused second region), so route 1 is unusable without sourcing that ROM. The models follow PROTOCOL.md: the keyboard answers FD with the 4-byte self-test and reports documented keycodes honouring the division modes; the mouse answers T with its 4-byte self-test and streams 3-byte incremental reports. One physical-layer detail was required: the SCN2681 receiver mis-samples the first byte after a receiver reset unless the line is explicitly idle-high before the start bit. Both models now hold TxD at mark when idle (which is faithful anyway) -- isolated evidence: bit-banging 0x55 into rx_a_w gives RHRA=D5 with no idle-high, RHRA=55 with four idle-high bits. Verified (VT1200_SKIP_LEVEL1=1, input_inject.lua): the OS reads the keyboard keycode 0xC2 (A) and ~900 bytes of VSXXX reports (dx=+16/+32); after the self-test it switches the mouse to stream mode; the X11 cursor arrow is visible at frame 4400 and has moved by frame 4600. Nothing was tuned for the level-0 I/O data-path test: with no env the boot still fails it honestly and the regression baseline is unchanged (PC=3FDCE400 samples=198, 3 PCs). VT1200_IO_PATH_STUB=1 (53/75) and the skip run (Terminal Manager at frame 3000) are also unchanged. ROM md5 unchanged. See harness/mame/INPUT_REPORT.md.
47 lines
1.4 KiB
Lua
47 lines
1.4 KiB
Lua
-- Drive the modelled LK401 keyboard and VSXXX-AA mouse from MAME's host input
|
|
-- ports, so the acceptance test "does the cursor move / do keystrokes register"
|
|
-- can be observed deterministically.
|
|
--
|
|
-- VT1200_SKIP_LEVEL1=1 \
|
|
-- VT1200_DUMP_FRAMES=4400,4700,5000 VT1200_DUMP_DIR=/tmp/opencode \
|
|
-- <mame> vt1200 ... -autoboot_script harness/mame/input_inject.lua
|
|
--
|
|
-- Between INJ_MOUSE_FROM and INJ_MOUSE_TO the mouse is walked 16 units/frame;
|
|
-- the keyboard presses and releases 'A' at INJ_KEY_FRAME.
|
|
|
|
local machine = manager.machine
|
|
local ports = machine.ioport.ports
|
|
|
|
local mouse_x = ports[":mouse:MOUSE_X"].fields["Mouse X"]
|
|
local key_a = ports[":lk401:K26"].fields["A"]
|
|
|
|
local INJ_MOUSE_FROM = 4400
|
|
local INJ_MOUSE_TO = 4700
|
|
local INJ_KEY_FRAME = 4450
|
|
local INJ_KEY_FRAMES = 20
|
|
|
|
local frames = 0
|
|
local mx = 0
|
|
local key_down = false
|
|
|
|
emu.register_frame_done(function()
|
|
frames = frames + 1
|
|
if frames >= INJ_MOUSE_FROM and frames <= INJ_MOUSE_TO then
|
|
mx = (mx + 32) % 256
|
|
mouse_x:set_value(mx)
|
|
end
|
|
if frames == INJ_KEY_FRAME then
|
|
key_a:set_value(1)
|
|
key_down = true
|
|
print(string.format("inject: frame %d press A", frames))
|
|
end
|
|
if key_down and frames == INJ_KEY_FRAME + INJ_KEY_FRAMES then
|
|
key_a:set_value(0)
|
|
key_down = false
|
|
print(string.format("inject: frame %d release A", frames))
|
|
end
|
|
if frames >= INJ_MOUSE_TO + 500 then
|
|
machine:exit()
|
|
end
|
|
end, "vt1200-input-inject")
|