github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-01-13 15:27:28 +00:00
Code Issues Releases Wiki Activity

Use DUMP to restore source code files, instead of NSALV.

Browse Source
This commit is contained in:
Lars Brinkhoff 2016-11-12 21:01:35 +01:00
parent 36c413c0a4
commit 240775c9c1
4 changed files with 24 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
Makefile
View File

@ -9,13 +9,16 @@ WRITETAPE=${PWD}/tools/tapeutils/tapewrite
all: out/rp0.dsk
out/rp0.dsk: build/simh/init out/minsys.tape out/salv.tape out/dskdmp.tape build/build.tcl
out/rp0.dsk: build/simh/init out/minsys.tape out/salv.tape out/dskdmp.tape build/build.tcl out/sources.tape
expect -f build/build.tcl
out/minsys.tape: $(ITSTAR)
mkdir -p out
cd bin; $(ITSTAR) -cf ../$@ $(MINSYS)
cd src; $(ITSTAR) -rf ../$@ $(SRC)
out/sources.tape: $(ITSTAR)
mkdir -p out
cd src; $(ITSTAR) -cf ../$@ $(SRC)
out/salv.tape: $(WRITETAPE) $(RAM) $(NSALV)
mkdir -p out

8
README.md
View File

@ -20,14 +20,14 @@ This repository contains source code, tools, and scripts to build ITS
from scratch.
1. First, magnetic tape images are created from files in `src` and
`bin`. There are two bootable tapes, and one tape with files in
`bin`. There are two bootable tapes, and two tapes with files in
DUMP backup format.
2. Then the tapes are used to create a file system on an RP06 disk and
populate it with a minimal system, and also source code.
populate it with a minimal system.
3. Next, the system is booted from the disk, and the following programs
are rebuilt:
3. Next, the system is booted from the disk. Source code is loaded
from tape, and the following programs are rebuilt:
- MIDAS, the assembler.
- DDT, debugger and HACTRN user login shell.

BIN
bin/sys/ts.dump Normal file
View File

Binary file not shown.

16
build/build.tcl
View File

@ -94,6 +94,19 @@ spawn pdp10 build/simh/boot
respond "DSKDMP" "its\r"
type "\033g"
pdset
respond "*" "\005"
respond "sim>" "at tu0 out/sources.tape\r"
respond "sim>" "c\r"
type ":dump\r"
respond "_" "reload "
respond "ARE YOU SURE" "y"
respond "\n" "links crdir sorry\r"
respond "FILE=" "*;* *\r"
expect "E-O-T"
respond "_" "quit\r"
expect ":KILL"
respond "*" ":print sysbin;..new. (udir)\r"
respond "*" ":midas sysbin;_midas;midas\r"
expect ":KILL"
@ -129,7 +142,8 @@ respond "*" ":link sys3;ts teco,.teco.;tecpur >\r"
respond "*" ":midas sysbin;_syseng;dump\r"
respond "WHICH MACHINE?" "DB\r"
expect ":KILL"
respond "*" ":link sys3;ts dump,sysbin;dump bin\r"
respond "*" ":delete sys;ts dump\r"
respond "*" ":link sys;ts dump,sysbin;dump bin\r"
respond "*" ":midas sysbin;_sysen1;pdset\r"
expect ":KILL"