mirror of
https://github.com/forth-ev/VolksForth.git
synced 2024-11-29 05:49:26 +00:00
43 lines
1.2 KiB
Bash
Executable File
43 lines
1.2 KiB
Bash
Executable File
#!/bin/bash
|
|
|
|
set -e
|
|
|
|
emulatordir="$(realpath --relative-to="$PWD" "$(dirname "${BASH_SOURCE[0]}")")"
|
|
basedir="$(realpath --relative-to="$PWD" "${emulatordir}/..")"
|
|
cpmfilesdir="${basedir}/cpmfiles"
|
|
runcpmdir="${basedir}/runcpm"
|
|
runcpm_a0="${runcpmdir}/A/0"
|
|
toolsdir="${basedir}/../../tools"
|
|
|
|
logfile="${runcpmdir}/runcpm.log"
|
|
scriptfile="${runcpmdir}/input.script"
|
|
rm -f "${logfile}"
|
|
rm -f "${scriptfile}"
|
|
for line in "$@"; do
|
|
echo "${line}" >> "${scriptfile}"
|
|
done
|
|
|
|
test -d "${runcpm_a0}" || mkdir -p "${runcpm_a0}"
|
|
|
|
for pathname in ${cpmfilesdir}/*
|
|
do
|
|
# echo $pathname
|
|
filename="$(realpath --relative-to="${cpmfilesdir}" "${pathname}")"
|
|
# echo $filename
|
|
uppercase_filename="$("${toolsdir}/echo-toupper.py" "${filename}")"
|
|
# echo $uppercase_filename
|
|
cp "${pathname}" "${runcpm_a0}/${uppercase_filename}"
|
|
done
|
|
|
|
if [[ -f "${scriptfile}" ]]; then
|
|
"${runcpmdir}/RunCPM" -i "${scriptfile}" -o "${logfile}"
|
|
# "${runcpmdir}/RunCPM" -s <"${scriptfile}" | tee "${logfile}"
|
|
else
|
|
"${runcpmdir}/RunCPM" -o "${logfile}"
|
|
# "${runcpmdir}/RunCPM" -s | tee "${logfile}"
|
|
fi
|
|
|
|
cp "${logfile}" runcpm.log
|
|
"${toolsdir}/trunc-ctrl-z.py" "${runcpmdir}/A/0/LOGFILE.TXT" \
|
|
"${runcpmdir}/logfile.txt"
|