71 lines
2.7 KiB
Bash
71 lines
2.7 KiB
Bash
# Human68k floppy staging shared by joey-run and the X68000 gates and tools.
|
|
# Every run boots a copy of the stock system disk (HUMAN302.XDF from the
|
|
# x68kFirmware component) trimmed to what it takes to boot and run one
|
|
# program; most also carry the program, its DATA tree and its log on an
|
|
# emptied second disk in drive B, so a run can never corrupt what boots it.
|
|
# Source after joeyEnv.sh and call `joeyNeed X68K_DIR x68kFirmware` first.
|
|
|
|
X68K_SYSTEM_DISK="${X68K_DIR:-}/HUMAN302.XDF"
|
|
|
|
|
|
# x68kAddTree DISK DIR PREFIX -- copy every file under DIR onto DISK as
|
|
# PREFIX/<path>, upper-cased the way Human68k shows names.
|
|
x68kAddTree() {
|
|
local disk="$1"
|
|
local dir="$2"
|
|
local prefix="$3"
|
|
local files
|
|
local f
|
|
local rel
|
|
files="$(find "$dir" -type f | sort)"
|
|
while IFS= read -r f; do
|
|
[ -n "$f" ] || continue
|
|
rel="${f#"$dir"/}"
|
|
x68kXdf add "$disk" "$f" "$prefix/${rel^^}" >/dev/null || return 1
|
|
done <<< "$files"
|
|
}
|
|
|
|
|
|
# x68kBootDisk OUT LINE... -- OUT becomes a boot disk whose AUTOEXEC.BAT runs
|
|
# the given command lines (pass them single-quoted: 'B:\UBER.X'). The stock
|
|
# disk's keyboard, beep and font drivers go, and so do its utility folders
|
|
# (~900 KB, in subdirectories only deltree can free): nothing a JoeyLib
|
|
# program needs -- except \SYS\RSDRV.SYS, Human68k's RS-232C driver, which
|
|
# comes back: the stock CONFIG.SYS loads it (DEVICE = \SYS\RSDRV.SYS), and
|
|
# the serial add-on requires it (src/x68000/serial.c).
|
|
x68kBootDisk() {
|
|
local out="$1"
|
|
local name
|
|
shift
|
|
cp "$X68K_SYSTEM_DISK" "$out" || return 1
|
|
for name in USKCG.SYS BEEP.SYS KEY.SYS STARTUP.ENV; do
|
|
x68kXdf delete "$out" "$name" >/dev/null 2>&1 || true
|
|
done
|
|
for name in SYS HIS BIN BASIC2 ASK ETC; do
|
|
x68kXdf deltree "$out" "$name" >/dev/null 2>&1 || true
|
|
done
|
|
if ! x68kXdf extract "$X68K_SYSTEM_DISK" SYS/RSDRV.SYS "$out.rsdrv" >/dev/null 2>&1; then
|
|
echo "x68kBootDisk: $X68K_SYSTEM_DISK has no SYS/RSDRV.SYS, which the serial add-on requires" >&2
|
|
return 1
|
|
fi
|
|
x68kXdf add "$out" "$out.rsdrv" SYS/RSDRV.SYS >/dev/null || return 1
|
|
rm -f "$out.rsdrv"
|
|
{ printf '%s\r\n' "$@"; printf '\x1a'; } > "$out.autoexec"
|
|
x68kXdf add "$out" "$out.autoexec" AUTOEXEC.BAT >/dev/null || return 1
|
|
rm -f "$out.autoexec"
|
|
}
|
|
|
|
|
|
# x68kDataDisk OUT -- OUT becomes an empty disk: the stock disk's BPB and
|
|
# boot sector with every file and folder freed (all 1221 clusters).
|
|
x68kDataDisk() {
|
|
cp "$X68K_SYSTEM_DISK" "$1" || return 1
|
|
x68kXdf empty "$1" >/dev/null
|
|
}
|
|
|
|
|
|
# x68kXdf ARGS... -- tools/xdftool.py (list, add, delete, deltree, empty,
|
|
# extract, free).
|
|
x68kXdf() {
|
|
python3 "$JOEY_REPO/tools/xdftool.py" "$@"
|
|
}
|