From 7b5c532625a864a3fbaf76f44df6aa99b0d6861e Mon Sep 17 00:00:00 2001
From: user <user@clank>
Date: Thu, 16 Jul 2026 07:53:19 +0200
Subject: filesystem: a RAM FS (WRAMX) + ls/cat/save/rm; wc/head read files

- fs.asm: 8-slot RAM filesystem in WRAMX ($D000-$DFFF), name[8]+len[2]+data[502];
  syscalls open/close/getb/putb/list/remove, seeded with a 'readme' at boot.
- libc: open/close/fgetc/fputc/flist/fremove wrappers + O_READ/O_WRITE/NOFD.
- tools: ls, save (stdin->file, one line), rm; cat/wc/head now take a file arg.
- fix: syscall dispatch clobbers A, so putb takes its byte in E (was reading the
  handler's low address byte, 0xDC); ls NUL-terminates 8-char names.
- verified: save/cat/ls/rm cycle; wc readme -> '2 7 38'; head -n 1 readme.
- README: document the filesystem + the A-clobber ABI note.
---
 src/programs.asm | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)

(limited to 'src/programs.asm')

diff --git a/src/programs.asm b/src/programs.asm
index a3a6db2..161ee2f 100644
--- a/src/programs.asm
+++ b/src/programs.asm
@@ -79,6 +79,15 @@ ProgHead:
 SECTION "prog_args",   ROMX[$4000], BANK[14]
 ProgArgs:
     INCBIN "c/args.bin"
+SECTION "prog_ls",     ROMX[$4000], BANK[15]
+ProgLs:
+    INCBIN "c/ls.bin"
+SECTION "prog_save",   ROMX[$4000], BANK[16]
+ProgSave:
+    INCBIN "c/save.bin"
+SECTION "prog_rm",     ROMX[$4000], BANK[17]
+ProgRm:
+    INCBIN "c/rm.bin"
 
 ; -----------------------------------------------------------------------------
 ; PROG_SH (bank 3) - a tiny shell.
@@ -217,6 +226,12 @@ ProgSh:
     db PROG_HEAD
     db "args", 0
     db PROG_ARGS
+    db "ls", 0
+    db PROG_LS
+    db "save", 0
+    db PROG_SAVE
+    db "rm", 0
+    db PROG_RM
     db 0                        ; terminator
 
 ; -----------------------------------------------------------------------------
@@ -277,3 +292,9 @@ ProgramTable::
     dw ProgHead
     db LOW(BANK(ProgArgs)), HIGH(BANK(ProgArgs))
     dw ProgArgs
+    db LOW(BANK(ProgLs)), HIGH(BANK(ProgLs))
+    dw ProgLs
+    db LOW(BANK(ProgSave)), HIGH(BANK(ProgSave))
+    dw ProgSave
+    db LOW(BANK(ProgRm)), HIGH(BANK(ProgRm))
+    dw ProgRm
-- 
cgit v1.3.1-sl0p