4 files changed, 12 insertions(+), 10 deletions(-)
M Makefile
R fs/fs/{boot.fs => fatlo.fs}
M fs/tests/fs/all.fs
R fs/tests/fs/{boot.fs => fat.fs}
M Makefile => Makefile +1 -1
@@ 2,7 2,7 @@ TARGETS = dusk
BOOTFS_SRC = fs/xcomp/bootlo.fs \
fs/drv/ramdrive.fs \
fs/xcomp/glue1.fs \
- fs/fs/boot.fs \
+ fs/fs/fatlo.fs \
fs/xcomp/glue2.fs \
fs/xcomp/boothi.fs
all: $(TARGETS)
R fs/fs/boot.fs => fs/fs/fatlo.fs +9 -7
@@ 1,14 1,16 @@
-\ boot filesystem implementation
+\ The "low" part of a FAT12/FAT16 implementation
-\ This is a subset of a FAT16 implementation. It is designed to be embedded
-\ right after "boot.fs" and provide the means to continue bootstrapping on.
+\ This is a subset of a FAT12/FAT16 implementation. It is designed to be
+\ embedded in the boot sequence and provide the means to continue bootstrapping
+\ on.
-\ Its goal is to provide fopen and fgetc, nothing more. The rest of the FAT16
-\ implementation is in fs/fat16.
+\ Its goal is to provide fopen, fclose and fgetc, nothing more. The rest of the
+\ FAT12/FAT16 implementation is in fs/fat.
\ This unit has access to a very small set of words, that it, words implemented
-\ by boot.fs as well as the "drive" protocol, which is implemented by a driver
-\ that is inserted between boot.fs and this unit.
+\ by boot.fs as well as (drv@) and drvblksz from the "drive" protocol, which is
+\ implemented by a driver that is also inserted in the boot sequence.
+
create bpb 0 here (drv@) $18 allot
: BPB_BytsPerSec bpb $0b + w@ ;
M fs/tests/fs/all.fs => fs/tests/fs/all.fs +1 -1
@@ 1,2 1,2 @@
\ Run all fs test suites
-f<< tests/fs/boot.fs
+f<< tests/fs/fat.fs
R fs/tests/fs/boot.fs => fs/tests/fs/fat.fs +1 -1
@@ 4,7 4,7 @@
\ 3. It has only one FAT (no backup FAT)
\ 4. It has a 512 sector size
?f<< tests/harness.fs
-?f<< fs/boot.fs
+?f<< fs/fatlo.fs
: readN ( fcursor n -- ) >r begin dup fat16getc drop next drop ;
testbegin
\ Tests for fs/boot