1
0
mirror of https://github.com/PDP-10/its.git synced 2026-03-20 08:28:43 +00:00

New build scripts for DC10.

This commit is contained in:
Lars Brinkhoff
2019-07-12 20:24:24 +02:00
parent dda3187559
commit 484d9c3f84
10 changed files with 72 additions and 63 deletions

View File

@@ -8,35 +8,35 @@ proc start_dskdmp_its {} {
proc mark_packs {} {
respond "\n" "mark\033g"
respond "UNIT #" "0"
respond "#0?" "y"
respond "NO =" "2\r"
expect -timeout 300 "VERIFICATION"
respond "ALLOC =" "3000\r"
respond "PACK ID =" "2\r"
respond "\n" "mark\033g"
respond "UNIT #" "1"
respond "#1?" "y"
respond "NO =" "3\r"
expect -timeout 300 "VERIFICATION"
respond "ALLOC =" "3000\r"
respond "PACK ID =" "3\r"
respond "\n" "mark\033g"
respond "UNIT #" "2"
respond "#2?" "y"
# respond "#0?" "y"
respond "NO =" "0\r"
expect -timeout 300 "VERIFICATION"
# expect -timeout 300 "VERIFICATION"
respond "ALLOC =" "3000\r"
respond "PACK ID =" "0\r"
respond "DDT" "mark\033g"
respond "UNIT #" "3"
respond "#3?" "y"
respond "\n" "mark\033g"
respond "UNIT #" "1"
# respond "#1?" "y"
respond "NO =" "1\r"
expect -timeout 300 "VERIFICATION"
# expect -timeout 300 "VERIFICATION"
respond "ALLOC =" "3000\r"
respond "PACK ID =" "1\r"
respond "\n" "mark\033g"
respond "UNIT #" "2"
# respond "#2?" "y"
respond "NO =" "2\r"
# expect -timeout 300 "VERIFICATION"
respond "ALLOC =" "3000\r"
respond "PACK ID =" "2\r"
respond "DDT" "mark\033g"
respond "UNIT #" "3"
# respond "#3?" "y"
respond "NO =" "3\r"
# expect -timeout 300 "VERIFICATION"
respond "ALLOC =" "3000\r"
respond "PACK ID =" "3\r"
}
proc prepare_frontend {} {
@@ -81,8 +81,8 @@ proc make_dskdmp {} {
respond "RM03P=" "N\r"
respond "RM80P=" "N\r"
respond "RH10P=" "N\r"
respond "DC10P=" "N\r"
respond "NUDSL=" "250.\r"
respond "DC10P=" "Y\r"
respond "NUDSL=" "440.\r"
respond "KS10P=" "N\r"
respond "KL10P=" "N\r"
expect ":KILL"
@@ -109,19 +109,19 @@ proc dump_nits {} {
# Since we bootstrap with a 2-pack ITS, we need to copy the MFD to
# the fresh packs.
respond "\n" "salv\r"
respond "\n" "ucop\033g"
respond "UNIT #" "0"
respond "UNIT #" "2"
respond "OK?" "Y"
respond "DDT" "ucop\033g"
respond "UNIT #" "0"
respond "UNIT #" "3"
respond "OK?" "Y"
respond "DDT" "\033u"
# respond "\n" "salv\r"
# respond "\n" "ucop\033g"
# respond "UNIT #" "0"
# respond "UNIT #" "2"
# respond "OK?" "Y"
# respond "DDT" "ucop\033g"
# respond "UNIT #" "0"
# respond "UNIT #" "3"
# respond "OK?" "Y"
# respond "DDT" "\033u"
# Now dump the new ITS.
respond "DSKDMP" "t\033its bin\r"
respond "\n" "t\033its bin\r"
respond "\n" "\033u"
respond "DSKDMP" "m\033salv bin\r"
respond "\n" "d\033nits\r"

View File

@@ -1,10 +1,12 @@
set console wru=034
set cpu its
set cpu 512k
set cpu 1024k
set cpu mpx
set rpa dis
set rpb dis
set tua dis
set fha dis
set dpa dis
set dpb dis
set lpt dis
set cr dis
@@ -13,7 +15,11 @@ set dtc dis
set dk dis
at ptr bin/ka10/boot/dskdmp.rim
at mta0 out/pdp10-ka/minsrc.tape
at dpa0 out/pdp10-ka/rp03.2
at dpa1 out/pdp10-ka/rp03.3
set dpa noheaders
set mta mpx=7
set mta type=b
set ai ena
at ai0 out/pdp10-ka/dc10.0
at ai1 out/pdp10-ka/dc10.1
at ai2 out/pdp10-ka/dc10.2
at ai3 out/pdp10-ka/dc10.3
b ptr

View File

@@ -7,6 +7,7 @@ set rpa dis
set rpb dis
set tua dis
set fha dis
set dpa dis
set dpb dis
set lpt dis
set cr dis
@@ -19,9 +20,9 @@ at ptr bin/ka10/boot/dskdmp.rim
at mta0 out/pdp10-ka/sources.tape
set mta mpx=7
set mta type=b
at dpa0 out/pdp10-ka/rp03.2
at dpa1 out/pdp10-ka/rp03.3
at dpa2 out/pdp10-ka/rp03.0
at dpa3 out/pdp10-ka/rp03.1
set dpa noheaders
set ai ena
at ai0 out/pdp10-ka/dc10.0
at ai1 out/pdp10-ka/dc10.1
at ai2 out/pdp10-ka/dc10.2
at ai3 out/pdp10-ka/dc10.3
b ptr

View File

@@ -210,11 +210,11 @@ DEFOPT SCHBLN==10. ;NUMBER OF RUNNABLE JOBS TO REMEMBER
DEFOPT NQCHN==30. ;NUMBER 2314 CHNLS
DEFOPT NQS==4 ;# DISK UNITS
DEFOPT NTUTBL==1 ;TUTS ARE ONE BLOCK LONG
DEFSYM NUDSL==250. ;# USER DIRECTORIES ON DISK
DEFOPT RP10P==1 ;HAS DEC RP10 DISK CONTROL (RP02)
DEFOPT NTUTBL==2 ;TUTS ARE ONE BLOCK LONG
DEFSYM NUDSL==440. ;# USER DIRECTORIES ON DISK
DEFOPT DC10P==1 ;HAS SYSTEMS CONCEPTS DISK CONTROL
DEFOPT QRDCMP==1 ;SOFTWARE READ-COMPARE
DEFOPT DMDSK==1 ;USES DM DISK FORMAT
DEFOPT DMDSK==0 ;DOES NOT USE DM DSK FORMAT (I.E. HAS EXTRA WORDS)
DEFOPT QRSRVP==1 ;HAS RESERVED DISK PACKS (SECONDARY PACK)
DEFOPT QAUTHP==1 ;KEEPS TRACK OF FILE AUTHORS

View File

@@ -1,21 +1,22 @@
set console wru=034
set cpu its
set cpu 512k
set cpu 1024k
set rpa dis
set rpb dis
set tua dis
set fha dis
set dpa dis
set dpb dis
set lpt dis
set cr dis
set dc dis
set dtc dis
set dk dis
set ai ena
at mta0 out/pdp10-ka/magdmp.tap
at mta5 out/pdp10-ka/ka-minsys.tape
at dpa0 out/pdp10-ka/rp03.2
at dpa1 out/pdp10-ka/rp03.3
at dpa2 out/pdp10-ka/rp03.0
at dpa3 out/pdp10-ka/rp03.1
set dpa headers
at ai0 out/pdp10-ka/dc10.0
at ai1 out/pdp10-ka/dc10.1
at ai2 out/pdp10-ka/dc10.2
at ai3 out/pdp10-ka/dc10.3
b mta0

View File

@@ -7,6 +7,7 @@ set rpa dis
set rpb dis
set tua dis
set fha dis
set dpa dis
set dpb dis
set lpt dis
set cr dis
@@ -36,13 +37,13 @@ set imp gw=172.31.1.100
set imp host=10.3.0.6
at imp tap:tap0
at ptr bin/ka10/boot/dskdmp.rim
at dpa0 out/pdp10-ka/rp03.2
at dpa1 out/pdp10-ka/rp03.3
at dpa2 out/pdp10-ka/rp03.0
at dpa3 out/pdp10-ka/rp03.1
set ai ena
at ai0 out/pdp10-ka/dc10.0
at ai1 out/pdp10-ka/dc10.1
at ai2 out/pdp10-ka/dc10.2
at ai3 out/pdp10-ka/dc10.3
set mta mpx=7
set mta type=b
set dt mpx=6
set imp mpx=4
set dpa noheaders
b ptr

View File

@@ -210,7 +210,7 @@ DEFOPT SCHBLN==10. ;NUMBER OF RUNNABLE JOBS TO REMEMBER
DEFOPT NQCHN==30. ;NUMBER 2314 CHNLS
DEFOPT NQS==4 ;# DISK UNITS
DEFOPT NTUTBL==1 ;TUTS ARE ONE BLOCK LONG
DEFOPT NTUTBL==2 ;TUTS ARE ONE BLOCK LONG
DEFSYM NUDSL==250. ;# USER DIRECTORIES ON DISK
DEFOPT RP10P==1 ;HAS DEC RP10 DISK CONTROL (RP02)
DEFOPT QRDCMP==1 ;SOFTWARE READ-COMPARE