1
0
mirror of https://github.com/rcornwell/sims.git synced 2026-05-18 20:08:58 +00:00

SEL32: Merge branch 'master' of git://github.com/AZBevier/SEL32-rcsim

This commit is contained in:
Richard Cornwell
2022-02-27 15:06:36 -05:00
36 changed files with 3122 additions and 211 deletions

View File

@@ -1,11 +1,11 @@
# SEL32 Concept/32 Simulator
This is a working simulator for the SEL Concept/32 computer. The
current version is for the SEL 32/27, 32/67, 32/77, 32/87, 32/97, V6,
and V9 computers. All of the processors except for the 32/77 can run
the Gould diags. Operational support for the 32/77 computers may be
added in the future.
This is a working simulator for the SEL Concept/32 computer. The current
version is for the SEL 32/27, 32/67, 32/77, 32/87, 32/97, V6, and V9
computers. All of the processors except for the 32/77 can run the Gould
diags. Operational support for the 32/77 computers may be added in the
future.
# SEL Concept/32
@@ -23,23 +23,35 @@ set and a virtual memory system supported by the V6 & V9 CPUs. The system
needs further testing to solidify the SEL32 simulator code in all of the
supported environmenets and hardware configurations.
Note: Not all of the command files described below may be in the tests
directory for the github.com/AZBevier/SEL32-rcsim repository. All will
be in the github.com/AZBevier/sims repository along with any new versions
that are being tested. Feel free to copy them to your local tests
directory. They may be added to the SEL32-rcsim repositary at some
later date.
# SEL32 installation configuration files in the installs directory:
In the tests directory there are multiple auto installation command files
that do MPX/UTX installs from user distribution tapes. This replaces the
prebuilt disks from previous releases. This allows more versions to be
supplied in the minimum amount of storage space. Minimal or no user input
is required to create the bootable system. The command files are in pairs,
one to do the install and one to execute the installed system. Some MPX
systems also contain some of the NBC software environment. See the NBC
project at github.com/AZBevier/nbc for all of the NBC software.
The installs directory contains the simh command files to install and run
multiple UTX, MPX1X, and MPX3X systems. The install tape images are in
the tapes directory and created disks are in the dsk directory. The dsk
and tapes directories are initially missing but will be created during
the installation. The required tape(s) are read from the repo at
https://github.com/AZBevier/SEL32-installs when the installation
simh command file is run. The tapes are tar gzipped files that are
extracted during the installation. Only the tape(s) required for the
specific UTX or MPX installation are downloaded. A bootable disk is
created in the dsk directory. This disk can then be booted and the
installed operating system executed by using a second simh command file.
See the README.md file in the install directory for a description of the
available configurations.
# SEL32 installation configuration files in the tests directory:
# SEL32 test configuration files in the tests directory:
In the tests directory contains the machine diagnostic command file and
bootable tape. They are used by the simh makefile to test the SEL32
simulator after it built. All of the instruction set and operating modes
are validated by the diagnostic. There is a pass/failure indication from
the diagnostic. The command file sel32_test.ini is used by the makefile.
The command file diag.ini can be run at any time by the user to rerun the
diagnostics. There is also some test code used during initial development
of the SEL32 simulator. Also an example of the initial configuration file
(ICL) used by the diagnostic is provided. The machine configuration is
loaded by the diag or the UTX or MPX operating system at boot time. See
the MPX manuals at bitsavers.org/pdf/sel/sel32_mpx for using MPX 1X or 3X.
#sel32_test.ini - diag.tap; type "../sel32_test.ini" or run from makefile.
Auto run by sel32 makefile to validate build or can be run at any time
@@ -51,150 +63,8 @@ set and memory management sumulated hardware. Any errors are reported
to the terminal. Different cpu models can be configured to test various
cpu model features.
--------------------
The rest of the command files are zipped to reduce project storage space.
The software distribution tape files are also zipped in the tapes
directory. All zipped files must be unzipped to be useable. See the
MPX manuals at bitsavers.org/pdf/sel/sel32_mpx for using MPX 1X or 3X.
--------------------
#sel32load1x.ini - sel32sdt.tap; type "../sel32 sel32load1x.ini
This is a minimal MPX 1.5F installation to a UDP/DPII 300 MB disk. It
will initialize the disk and install MPX bootable software. The disk
image is in the dsk directory named sel32disk.
#sel32run1x.ini - dsk/sel32disk; type "../sel32 sel32run1x.ini" to run.
The disk is booted up to the TSM> prompt logged in as "SYSTEM". Use
@@A to log in to the system console.
--------------------
#loaddma1x67.ini - mpx1xsdt.tap; type "../sel32 loaddma1x67.ini
This is an MPX 1.5F installation to a UDP/DPII 300 MB disk. It will
initialize the disk and install MPX bootable software. The disk
image is in the dsk directory named mpx1xdma0. Once the MPX software
is loaded an MPX command file is executed that runs the SYSGEN program
to create a new MPX O/S image. That system is then restarted to
install the new image to the disk as the new bootable image. The
system reboots to the new image, logs in as SYSTEM and exits TSM.
Use @@A to relogin to the console.
#rundma1x67.ini - dsk/mpx1xdma0; type "../sel32 rundma1x67.ini" to run.
The disk is booted up to the TSM> prompt and logged in as "SYSTEM".
MPX can be accessed from a second Linux screen by using the command
"telnet localhost 4747". This will bring up the "ENTER OWNERNAME
AND KEY:". Any name is valid, but SYSTEM should be used. At the
"TSM>" prompt, type "EXIT" to exit TSM. Use ^G to get the login
prompt when the "RING IN FOR SERVICE" message is displayed.
--------------------
#loaddma21b.ini - utx21b1.tap, utx21b2.tap, utx21b3.tap;
type "../sel32 loaddma21b.ini" to install UTX 21b to UDP/DPII disk.
This is an automated installation of UTX 21b to disk. Two disks,
21bdisk0.dma and 21bdisk1.dma are initialized and then the file
systems are created and loaded. Tape 1 loads "/" and tape 2 and 3
loads "/usr.POWERNODE" filesystems. The system boots from tape and
installs the root filesystem. The system restarts and boots from
the new root filesystem where the 2nd & 3rd tapes are then loaded to
/usr.POWERNODE. A third empty file system is created and mounted
as /usr/POWERNODE/src. The second disk is one large filesystem and is
mounted under /home. Several files are modified during installation
to allow the system to be booted into multiuser mode. Only the user
"root" is created and is the only allowable user login.
#rundma21b.ini - dsk/21bdisk0.dma & dsk/21bdisk1.dma;
type "../sel32 rundma21b.ini" to run the installed UTX system.
The disk is booted up to the "login:" prompt for the user to login
as "root" in multi-user mode.
--------------------
#loadscsi21b.ini - utx21b1.tap, utx21b2.tap, utx21b3.tap;
type "../sel32 loadscsi21b.ini" to install UTX 21b to MFP SCSI disks.
This is an automated installation of UTX 21b to disk. Two disks,
scsidiska0 and scsidiska1 are initialized and then the file systems
are created and loaded. Tape 1 loads root "/" and tapes 2 and 3
loads "/usr.POWERNODE" filesystem. The system boots from tape and
installs the root filesystem. The system restarts and boots from
the new root filesystem where the 2nd & 3rd tapes are then loaded to
/usr.POWERNODE. A third empty file system is created and mounted
as /usr/POWERNODE/src. The second disk is one large filesystem and is
mounted under /home. Several files are modified during installation
to allow the system to be booted into multiuser mode. Only the user
"root" is created and is the only allowable user login.
#rundscsi21b.ini - dsk/scsidiska0 & dsk/scsidiska1;
type "../sel32 rundscsi21b.ini" to run the installed UTX system.
The disk is booted up to the "login:" prompt for the user to login
as "root" in multi-user mode.
--------------------
#loadscsi3x.ini - mpxsdt69.tap;
type "../sel32 loadscsi3x.ini" to install MPX 3.4 to MFP SCSI disks.
This is an automated installation of MPX 3.4 to disk. Two 300MB disks,
mpx3xsba0.dsk and mpx3xsbb0.dsk are initialized and then the file
systems are created and loaded. The user sdt tape contains system
and user files that are loaded to multiple directories. The second
disk is initialized and formatted and only a system directory defined.
The install is exited and @@A is used to login into MPX. The username
SYSTEM is used to login into TSM without a password.
#runscsi3x.ini - dsk/mpx3xsba0.dsk & dsk/mpx3csbb0.dsk;
- dsk/scsi35m1disk0 & dsk/scsi35m2disk0;
type "../sel32 rundscsi3x.ini" to run the installed MPX system.
The disk is booted up to the MPX message "Press Attention for TSM".
Use @@A to get login prompt. Login as SYSTEM. The WORK volume will
be mounted along with the SYSTEM volume and the system is ready for
use. MPX can be accessed from a second Linux screen by using the
command "telnet locallhost 4747". This will bring up the "Connected
to the SEL-32 simulator COMC device, line 0". Use ^G as the wakeup
character to get the "ENTER YOUR OWNERNAME:" login prompt. Any name
is valid, but SYSTEM should be used. At the "TSM>" prompt, type
"EXIT" to exit TSM. Use ^G to get the login prompt when the "RING
IN FOR SERVICE" message is displayed.
--------------------
#user36esdtp2.ini - user36esdtp2.tap;
type "../sel32 user36esdtp2.ini" to install MPX 3.6 to HSDP disks.
This is an automated installation of MPX 3.6 to disk. A 300MB system
disk volume (user36p2udp0) and a 600MB work disk volume (user36s1udp1)
are initialized and then the file systems are created and loaded using
the volmgr. The user sdt tape contains system and user files that
are loaded to multiple directories. The second disk is initialized
and formatted and only a system directory defined. The disk is mounted
as the volume "work" as the 2nd disk drive. The installed MPX system
also has 2 scsi disks configured into the system. Two 700MB SCSI disks
are created, but they are not initialized and no directories are
created. The usage of these disks is left as an exercise for the user.
A third HSDP 600MD disk is also configured in MPX, but not used. The
user can provide other data volumes that can be mounted for use on the
system. The install is exited and @@A can be used to login into MPX.
The username SYSTEM is used to login into TSM without a password. Any
username is valid until an m.key file is created for valid user login.
#user36erunp2.ini - dsk/user36p2udp0 & dsk/user36s1udp1;
type "../sel32 user36erunp2.ini" to run the installed MPX 3.6 system.
The disk is booted up to the MPX message "Press Attention for TSM".
@@A is used to get the login prompt and the user is logged in as SYSTEM.
The WORK volume will be mounted along with the SYSTEM volume and the
system is ready for use at the TSM> prompt. The install tape also has
some of the NBC development system. A complete installation tape is
available at github.com/azbevier/nbc.
--------------------
Available tap tools in taptools directory:
./taptools - set of tools to work with .tap formatted tapes. Also tools
to convert between MPX and UNIX file formats. See README
file in the taptools directory and source for descriptions.
Available Level One Diagnostic boot tape in tests directory:
diag.ini - command file to start diags. Type "./sel32 tests/diag.ini"
diag.ini - command file to start diags. Type "../sel32 diag.ini"
diag.tap - bootable level one diagnostic tape w/auto testing.
Set cpu type to 32/27, 32/67, 32/87, 32/97, V6 or V9. All
cpu models now run all diagnostics provided on the
@@ -207,13 +77,14 @@ diag.tap - bootable level one diagnostic tape w/auto testing.
CV.CP2 - CPU diag part 2 runs OK.
CV.CP3 - CPU diag part 3 runs OK.
CV.EAD - Effective address diag runs OK.
CV.BRD - Base register instruction diag runs OK, except 32/27.
CV.BRD - Base register instruction diag runs OK
Not supported on 32/27.
CV.INT - Interrupt diag runs OK.
CV.TRP - Traps diag runs OK.
CV.CMD - Cache/Shadow diag. Disabled in auto testing.
CN.MMM - Non virtual memory diag runs OK.
VM.MMM - Virtual memory diag for V6 & V9 runs OK.
CV.IPT - IPU trap diag. Disabled in auto testing.
CV.IPT - IPU trap diag. Disabled in auto testing.
CV.CSD - WCS read/write trap diag. Disabled in auto testing.
CV.CON - Operators Console runs all tests for all CPUs.
CV.DXP - Diagnostic executive for level 2 diags. OK in batch.
@@ -225,18 +96,26 @@ diag.tap - bootable level one diagnostic tape w/auto testing.
Testing is extremely difficult without any source for the
diagnostics. Updates to follow as tests are corrected.
# SEL32 tap tools available in the taptools directory:
Available tap tools in taptools directory:
./taptools - set of tools to work with .tap formatted tapes. Also tools
to convert between MPX and UNIX file formats. See README
file in the taptools directory and source for descriptions.
Other MPX versions support:
I have recently received some old MPX 3.X save tapes. Using these
I have been able to hand build a MPX3.6 SDT tape that can be used
to install MPX3.6. Once installed, the system can be used to build
a new user SDT tape and install it elsewhere. Both based and non-
based O/S images can be created. More images for installation will
be made available in the future as I work my way through the save
tapes. I still do not have a master SDT tape for any of the MPX 1.X
or MPX 3.X systems. I have a 1600/6250 BPI tape drive that can read
9 track tapes and convert them to .tap files. If you have a master
SDT, I would be very thankfull. Please keep looking.
I have recently received some old MPX 3.X save tapes. Using
these I have been able to hand build a MPX3.6 SDT tape that
can be used to install MPX3.6. Once installed, the system can
be used to build a new user SDT tape and install it elsewhere.
Both based and non-based O/S images can be created. More images
for installation will be made available in the future as I work
my way through the save tapes. I still do not have a master SDT
tape for any of the MPX 1.X or MPX 3.X systems. I have a
1600/6250 BPI tape drive that can read 9 track tapes and convert
them to .tap files. If you have a master SDT, I would be very
thankfull. Please keep looking.
James C. Bevier
02/16/2022
02/27/2022

172
SEL32/installs/README.md Normal file
View File

@@ -0,0 +1,172 @@
# SEL32 Concept/32 Simulator
The installs directory contains the simh command files to install and run
multiple UTX, MPX1X, and MPX3X systems. The install tape images are in
the tapes directory and created disks are in the dsk directory. The dsk
and tapes directories are initially missing but will be created during
the installation. The required tape(s) are read from the repo at
https://github.com/AZBevier/SEL32-installs when the installation
simh command file is run. The tapes are tar gzipped files that are
extracted during the installation. Only the tape(s) required for the
specific UTX or MPX installation are downloaded. A bootable disk is
created in the dsk directory. This disk can then be booted and the
installed operating system executed by using a second simh command file.
This method of installation replaces the prebuilt disks from previous
releases. This allows more versions to be supplied in the minimum
amount of storage space. Minimal or no user input is required to
create the bootable system. The command files are in pairs, one to do
the install and one to execute the installed system. Some MPX systems
also contain some of the NBC software environment. See the NBC project
at github.com/AZBevier/nbc for all of the NBC software. See the MPX
manuals at bitsavers.org/pdf/sel/sel32_mpx for using MPX 1X or 3X.
# SEL32 installation configuration files in the install directory:
--------------------
#sel32load1x.ini - sel32sdt.tap; type "../sel32 sel32load1x.ini
This is a minimal MPX 1.5F installation to a UDP/DPII 300 MB disk. It
will initialize the disk and install an MPX bootable system. The disk
image is in the dsk directory named sel32disk.
#sel32run1x.ini - dsk/sel32disk; type "../sel32 sel32run1x.ini" to run.
The disk is booted up to the TSM> prompt logged in as "SYSTEM". Use
@@A to log into the system console.
--------------------
#loaddma1x67.ini - mpx1xsdt.tap; type "../sel32 loaddma1x67.ini
This is an MPX 1.5F installation to a UDP/DPII 300 MB disk. It will
initialize the disk and install an MPX bootable system. The disk
image is in the dsk directory named mpx1xdma0. Once the MPX software
is loaded an MPX command file is executed that runs the SYSGEN program
to create a new MPX O/S image. That system is then restarted to
install the new image to the disk as the new bootable image. The
system reboots to the new image, logs in as SYSTEM and exits TSM.
Use @@A to relogin to the console.
#rundma1x67.ini - dsk/mpx1xdma0; type "../sel32 rundma1x67.ini" to run.
The disk is booted up to the TSM> prompt and logged in as "SYSTEM".
MPX can be accessed from a second Linux screen by using the command
"telnet localhost 4747". This will bring up the "ENTER OWNERNAME
AND KEY:". Any name is valid, but SYSTEM should be used. At the
"TSM>" prompt, type "EXIT" to exit TSM. Use ^G to get the login
prompt when the "RING IN FOR SERVICE" message is displayed.
--------------------
#loaddma21b.ini - utx21b1.tap, utx21b2.tap, utx21b3.tap;
type "../sel32 loaddma21b.ini" to install UTX 21b to UDP/DPII disk.
This is an automated installation of UTX 21b to disk. Two disks,
21bdisk0.dma and 21bdisk1.dma are initialized and then the file
systems are created and loaded. Tape 1 loads "/" and tape 2 and 3
loads "/usr.POWERNODE" filesystems. The system boots from tape and
installs the root filesystem. The system restarts and boots from
the new root filesystem where the 2nd & 3rd tapes are then loaded to
/usr.POWERNODE. A third empty file system is created and mounted
as /usr/POWERNODE/src. The second disk is one large filesystem and is
mounted under /home. Several files are modified during installation
to allow the system to be booted into multiuser mode. Only the user
"root" is created and is the only allowable user login.
#rundma21b.ini - dsk/21bdisk0.dma & dsk/21bdisk1.dma;
type "../sel32 rundma21b.ini" to run the installed UTX system.
The disk is booted up to the "login:" prompt for the user to login
as "root" in multi-user mode.
--------------------
#loadscsi21b.ini - utx21b1.tap, utx21b2.tap, utx21b3.tap;
type "../sel32 loadscsi21b.ini" to install UTX 21b to MFP SCSI disks.
This is an automated installation of UTX 21b to disk. Two disks,
scsidiska0 and scsidiska1 are initialized and then the file systems
are created and loaded. Tape 1 loads root "/" and tapes 2 and 3
loads "/usr.POWERNODE" filesystem. The system boots from tape and
installs the root filesystem. The system restarts and boots from
the new root filesystem where the 2nd & 3rd tapes are then loaded to
/usr.POWERNODE. A third empty file system is created and mounted
as /usr/POWERNODE/src. The second disk is one large filesystem and is
mounted under /home. Several files are modified during installation
to allow the system to be booted into multiuser mode. Only the user
"root" is created and is the only allowable user login.
#rundscsi21b.ini - dsk/scsidiska0 & dsk/scsidiska1;
type "../sel32 rundscsi21b.ini" to run the installed UTX system.
The disk is booted up to the "login:" prompt for the user to login
as "root" in multi-user mode.
--------------------
#loadscsi3x.ini - mpxsdt69.tap;
type "../sel32 loadscsi3x.ini" to install MPX 3.4 to MFP SCSI disks.
This is an automated installation of MPX 3.4 to disk. Two 300MB disks,
mpx3xsba0.dsk and mpx3xsbb0.dsk are initialized and then the file
systems are created and loaded. The user sdt tape contains system
and user files that are loaded to multiple directories. The second
disk is initialized and formatted and only a system directory defined.
The install is exited and @@A is used to login into MPX. The username
SYSTEM is used to login into TSM without a password.
#runscsi3x.ini - dsk/mpx3xsba0.dsk & dsk/mpx3csbb0.dsk;
- dsk/scsi35m1disk0 & dsk/scsi35m2disk0;
type "../sel32 rundscsi3x.ini" to run the installed MPX system.
The disk is booted up to the MPX message "Press Attention for TSM".
Use @@A to get login prompt. Login as SYSTEM. The WORK volume will
be mounted along with the SYSTEM volume and the system is ready for
use. MPX can be accessed from a second Linux screen by using the
command "telnet locallhost 4747". This will bring up the "Connected
to the SEL-32 simulator COMC device, line 0". Use ^G as the wakeup
character to get the "ENTER YOUR OWNERNAME:" login prompt. Any name
is valid, but SYSTEM should be used. At the "TSM>" prompt, type
"EXIT" to exit TSM. Use ^G to get the login prompt when the "RING
IN FOR SERVICE" message is displayed.
--------------------
#user36esdtp2.ini - user36esdtp2.tap;
type "../sel32 user36esdtp2.ini" to install MPX 3.6 to HSDP disks.
This is an automated installation of MPX 3.6 to disk. A 300MB system
disk volume (user36p2udp0) and a 600MB work disk volume (user36s1udp1)
are initialized and then the file systems are created and loaded using
the volmgr. The user sdt tape contains system and user files that
are loaded to multiple directories. The second disk is initialized
and formatted and only a system directory defined. The disk is mounted
as the volume "work" as the 2nd disk drive. The installed MPX system
also has 2 scsi disks configured into the system. Two 700MB SCSI disks
are created, but they are not initialized and no directories are
created. The usage of these disks is left as an exercise for the user.
A third HSDP 600MD disk is also configured in MPX, but not used. The
user can provide other data volumes that can be mounted for use on the
system. The install is exited and @@A can be used to login into MPX.
The username SYSTEM is used to login into TSM without a password. Any
username is valid until an m.key file is created for valid user logins.
#user36erunp2.ini - dsk/user36p2udp0 & dsk/user36s1udp1;
type "../sel32 user36erunp2.ini" to run the installed MPX 3.6 system.
The disk is booted up to the MPX message "Press Attention for TSM".
@@A is used to get the login prompt and the user is logged in as SYSTEM.
The WORK volume will be mounted along with the SYSTEM volume and the
system is ready for use at the TSM> prompt. The install tape also has
some of the NBC development system. A complete installation tape is
available at github.com/azbevier/nbc.
--------------------
Other MPX versions support:
I have recently received some old MPX 3.X save tapes. Using these
I have been able to hand build a MPX3.6 SDT tape that can be used
to install MPX3.6. Once installed, the system can be used to build
a new user SDT tape and install it elsewhere. Both based and non-
based O/S images can be created. More images for installation will
be made available in the future as I work my way through the save
tapes. I still do not have a master SDT tape for any of the MPX 1.X
or MPX 3.X systems. I have a 1600/6250 BPI tape drive that can read
9 track tapes and convert them to .tap files. If you have a master
SDT, I would be very thankfull. Please keep looking.
James C. Bevier
02/27/2022

View File

@@ -0,0 +1,142 @@
;======================================================
; SEL32 System Engineering Labs 32 bit computer
; MPX - Ver 1.5F hardware configuration
; CPU - 32/67 4M Sel32 Concept/32
; IOP - 7e00 Model 8001 IOP Processor Controller
; DMA - 0800 2311/2314 Disk Processor II
; dma0 MH300 Model 8127 300MB MHD
; dma0 <-> dsk/mpx1xdma0.dsk
; LPR - 7ef8/7ef9 Model 924X High Speed Line Printer
; COM - 7ec0 8512 8-line async communications
; CON - 7efc/7efd Console Terminal
; RTC - 7f06 60 HZ Real-Time clock
; ITM - 7f04 38.4MS Interval timer
; MT - 1000 8051 Buffered Tape Processor
; mta0 <- tapes/mpx1xsdt.tap
; EC - 0e00 Model 8516 Ethernet (not supported)
;======================================================
; Set hostname
set env HOST=sel32
; Set local IP address
; set env IP=192.168.1.5 (N/U)
;======================================================
; Set directory for disk images
mkdir dsk
mkdir tapes
; Set tape image filename
set env FILE=mpx1xsdt.tap
; Set github.com URL for downloading files
set env GITURL=https://github.com/AZBevier/SEL32-installs/raw/master/tapes/
if exist "tapes/%FILE%" goto exists
if not exist "tapes/%FILE%" echof "file %FILE% missing, trying %FILE%.tgz"
cd tapes
if exist "%FILE%.tgz" goto nocurl
echof "fetching %FILE%.tgz file from github.com\n"
;curl -LJO https://raw.githubusercontent.com/AZBevier/sims/master/SEL32/tests/tapes/%FILE%.tgz
curl -LJO %GITURL%/%FILE%.tgz
if not exist "%FILE%.tgz" echof "FAILED - file %FILE% not available"; exit 1
:nocurl
echof "untar %FILE%.tgz file\n"
tar -xzf %FILE%.tgz
cd ..
:exists
echof "file %FILE% present, doing install"
;
; Set debug output
; set debug -n sel.log
;
; CPU type and memory size
set CPU 32/67 4M
;
; RTC realtime clock at 7f06
set RTC 60
set RTC enable
;
; ITM interval timer at 7f04
set ITM 3840
;
; IOP at channel 7e00
set iop enable
set iop0 dev=7e00
;
; COM 8-Line at 7ec0
set coml enable
set coml0 dev=7ec0
set coml0 enable
set coml1 enable
set coml2 enable
set coml3 enable
set coml4 enable
set coml5 enable
set coml6 enable
set coml7 enable
;
; Enable telnet sessions on port 4747
set comc enable
at comc 4747
;
; LPR at 7ef8
set lpr enable
; LPR output file
at lpr lprout
;
; EC ethernet at 0e00
; Support not available yet
;set ec enable
;set ec mode=2
;set ec0 dev=0e00
;at ec tap:tap0
; set mac address to cause ec to be attached
;set ec MAC=08:00:5D:01:01:20
;
; CON Console at 7efc
; enable console
set con enable
set con0 dev=7efc
;
; MTA Buffered tape processor at 1000
set mta enable
set mta0 dev=1000
; Attach install sdt tape file
set mta0 locked
at mta0 tapes/mpx1xsdt.tap
;
; DMA disk processor II/UDP at 800
set dma enable
set dma0 dev=800
set dma0 type=MH300
; Attach diskfile
at dma0 -i dsk/mpx1xdma0.dsk
;
; set console switches
deposit CSW 0
;
; allow cpu idle
set cpu idle
; wait for expected output from simulator, then enter this text
expect "COLD OR WARM START (C OR W)?" send "C\r"; continue
; Set expect script for auto time entry on MPX at OPCOM prompt
expect "??" send " %DATE_MM%/%DATE_DD%/%DATE_YY%,%TIME_HH%:%TIME_MM%:%TIME_SS%\r@@A"; continue
;expect "" after=800000, delay=4000, send "@@A"; continue
expect "??" send "X\r"; continue
expect "TSM>" send "A4 SLO=UT\r"; continue
expect "TSM>" send "A3 IN=M91000,TAP\r"; continue
expect "TSM>" send "PAGE 0\r"; continue
expect "TSM>" send "FILEMGR\r"; continue
; restore all files
expect "FIL>" send "RESTORE\r"; continue
expect "FIL>" send "EXIT\r"; continue
; sysgen new mpx image
expect "TSM>" send "MAKSIMH1\r"; continue
; restart to new image
expect "TSM>" send "RESTART SEL32SY1,DEFAULT\r"; continue
expect " RESTART...DO YOU WANT TO REBOOT(Y/N)?" send "Y\r"; continue
expect "??" send " %DATE_MM%/%DATE_DD%/%DATE_YY%,%TIME_HH%:%TIME_MM%:%TIME_SS%\r@@A"; continue
expect "??" send "X\r"; continue
expect "TSM>" send "WHO\r"; continue
expect "TSM>" send "EXIT\r"; continue
expect "RING IN FOR SERVICE" send "\r^E"
; Boot from mag tape
bo mta0
detach all
quit

View File

@@ -0,0 +1,239 @@
;======================================================
; SEL32 System Engineering Labs 32 bit computer
; UTX - Ver 2.1B hardware configuration
; CPU - V6 8M Sel32 Powernode
; MFP - 7e00 Model 8001 IOP Processor Controller
; DMA - 0800 2311/2314 Disk Processor II
; dma0 Model 8858 340MB
; dma0 <-> dsk/21bdisk0.dma
; dma1 Model 8858 340MB
; dma1 <-> dsk/21bdisk1.dma
; LPR - 7ef8/7ef9 Model 924X High Speed Line Printer
; COM - 7ee0 8512 8-line async communications
; CON - 7efc/7efd Console Terminal
; RTC - 7f06 50 HZ Real-Time clock
; ITM - 7f04 38.4MS Interval timer
; MT - 1000 8051 Buffered Tape Processor
; mta0 <- tapes/utx21b1.tap
; EC - 0e00 Model 8516 Ethernet
;======================================================
; Set hostname
set env HOST=sel32
; Set local IP address
set env IP=192.168.1.5
;======================================================
; Set directory for disk images
mkdir dsk
mkdir tapes
; Set tape image filename
set env FILE1=utx21b1.tap
; Set github.com URL for downloading files
set env GITURL=https://github.com/AZBevier/SEL32-installs/raw/master/tapes/
if exist "tapes/%FILE1%" goto exists1
if not exist "tapes/%FILE1%" echof "file %FILE1% missing, trying %FILE1%.tgz"
cd tapes
if exist "%FILE1%.tgz" goto nocurl1
echof "fetching %FILE1%.tgz file from github.com\n"
curl -LJO %GITURL%/%FILE1%.tgz
if not exist "%FILE1%.tgz" echof "FAILED - file %FILE1% not available"; exit 1
:nocurl1
echof "untar %FILE1%.tgz file\n"
tar -xzf %FILE1%.tgz
cd ..
:exists1
echof "file %FILE1% present, doing install"
;
; Set directory for disk images
mkdir dsk
mkdir tapes
; Set tape image filename
set env FILE2=utx21b2.tap
if exist "tapes/%FILE2%" goto exists2
if not exist "tapes/%FILE2%" echof "file %FILE2% missing, trying %FILE2%.tgz"
cd tapes
if exist "%FILE2%.tgz" goto nocurl2
echof "fetching %FILE2%.tgz file from github.com\n"
curl -LJO %GITURL%/%FILE2%.tgz
if not exist "%FILE2%.tgz" echof "FAILED - file %FILE2% not available"; exit 1
:nocurl2
echof "untar %FILE2%.tgz file\n"
tar -xzf %FILE2%.tgz
cd ..
:exists2
echof "file %FILE2% present, doing install"
;
; Set directory for disk images
mkdir dsk
mkdir tapes
; Set tape image filename
set env FILE3=utx21b3.tap
if exist "tapes/%FILE3%" goto exists3
if not exist "tapes/%FILE3%" echof "file %FILE% missing, trying %FILE%.tgz"
cd tapes
if exist "%FILE3%.tgz" goto nocurl3
echof "fetching %FILE3%.tgz file from github.com\n"
curl -LJO %GITURL%/%FILE3%.tgz
if not exist "%FILE3%.tgz" echof "FAILED - file %FILE% not available"; exit 1
:nocurl3
echof "untar %FILE3%.tgz file\n"
tar -xzf %FILE3%.tgz
cd ..
:exists3
echof "file %FILE3% present, doing install"
;
set RTC 50
set CPU V6 8M
set RTC enable
set iop enable
set iop0 dev=7e00
set dma enable
set dma0 dev=800
set dma0 type=8858
set dma1 type=8858
set coml0 dev=7ee0
set coml0 enable
set coml1 enable
set coml2 enable
set coml3 enable
set coml4 enable
set coml5 enable
set coml6 enable
set coml7 enable
set con enable
set con0 dev=7efc
set mta enable
set mta0 dev=1000
set lpr enable
set comc enable
at comc 4747
set ec enable
set ec mode=2
set ec0 dev=0e00
; set mac address to cause ec to be attached
set ec MAC=08:00:5D:01:01:20
;at lpr lprout
;set cpu idle
;
deposit BOOTR[7] 42
deposit BOOTR[6] 800
set mta0 locked
at mta0 tapes/utx21b1.tap
at dma0 -i dsk/21bdisk0.dma
at dma1 -i dsk/21bdisk1.dma
at ec tap:tap0
expect "#" continue
expect "#" send "prep /dev/rdk0a\r"; continue
expect "Ready to prep /dev/rdk0a" send "yes\r"; continue
expect "Which option ?" send "2\r"; continue
expect "Warning: some data may be lost on the pack, proceed <no>?" send "yes\r"; continue
expect "Rebuild UTX flaw map from diagnostic flaw map <no>?" send "yes\r"; continue
expect "Please select a drive type:" send "8\r"; continue
expect "#" continue
expect "#" continue
expect "How many spare tracks should be allocated " send "\r"; continue
expect "Do you really want to do this <no>?" send "yes\r"; continue
expect "Which option ?" send "3\r"; continue
expect "Which option ?" send "2\r"; continue
expect "(a) Starting Cylinder <0>?" send "0\r"; continue
expect "(a) Size In Blocks <25344> or Ending Cylinder <C65>?" send "c65\r"; continue
expect "(a) Swap <no>?" send "\r"; continue
expect "(b) Starting Cylinder <66>?" send "66\r"; continue
expect "(b) Size In Blocks <20352> or Ending Cylinder <C118>?" send "c118\r"; continue
expect "(b) Swap <yes>?" send "\r"; continue
expect "(c) Starting Cylinder <0>?" send "\r"; continue
expect "(c) Size In Blocks <271488> or Ending Cylinder <C706>?" send "\r"; continue
expect "(c) Swap <no>?" send "\r"; continue
expect "(d) Starting Cylinder <119>?" send "119\r"; continue
expect "(d) Size In Blocks <70272> or Ending Cylinder <C301>?" send "c301\r"; continue
expect "(d) Swap <no>?" send "\r"; continue
expect "(e) Starting Cylinder <302>?" send "302\r"; continue
expect "(e) Size In Blocks <100224> or Ending Cylinder <C562>?" send "C706\r"; continue
expect "(e) Swap <no>?" send "\r"; continue
expect "(f) Starting Cylinder <563>?" send "0\r"; continue
expect "(f) Size In Blocks <55296> or Ending Cylinder <C143>?" send "0\r"; continue
expect "(f) Swap <no>?" send "\r"; continue
expect "(g) Starting Cylinder <0>?" send "\r"; continue
expect "(g) Size In Blocks <0> or Ending Cylinder <C0>?" send "\r"; continue
expect "(g) Swap <no>?" send "\r"; continue
expect "(h) Starting Cylinder <0>?" send "\r"; continue
expect "(h) Size In Blocks <0> or Ending Cylinder <C0>?" send "\r"; continue
expect "(h) Swap <no>?" send "\r"; continue
expect "Do you really want to do this <no>?" send "yes\r"; continue
expect "Which option ?" send "0\r"; continue
expect "Which option ?" send "0\r"; continue
expect "#" send "prep /dev/rdk1a\r"; continue
expect "Ready to prep /dev/rdk1a" send "yes\r"; continue
expect "Which option ?" send "2\r"; continue
expect "Warning: some data may be lost on the pack, proceed <no>?" send "yes\r"; continue
expect "Rebuild UTX flaw map from diagnostic flaw map <no>?" send "yes\r"; continue
expect "Please select a drive type:" send "8\r"; continue
expect "#" continue
expect "#" continue
expect "How many spare tracks should be allocated " send "\r"; continue
expect "Do you really want to do this <no>?" send "yes\r"; continue
expect "Which option ?" send "0\r"; continue
expect "#" send "newfs /dev/dk0a\r"; continue
expect "#" continue
expect "#" send "mount /dev/dk0a /mnt\r"; continue
expect "#" send "cd /mnt\r"; continue
expect "#" send "restore r\r"; continue
expect "#" send "cd /\r"; continue
expect "#" send "umount /dev/dk0a\r"; continue
expect "#" send "halt\r"; continue
bo mta0
deposit BOOTR[7] 2
at mta0 tapes/utx21b2.tap
; do not allow cpu to idle
; works around a reboot issue with UTX
; if allowed, installation will hang checking root file system
set cpu noidle
;at mta0 tapes/utx21b2-3.tap
expect "#" continue
expect "#" send "newfs /dev/dk0d\r"; continue
expect "#" continue
expect "#" send "newfs /dev/dk0e\r"; continue
expect "#" continue
expect "#" send "mount /dev/dk0d /usr.POWERNODE\r"; continue
expect "#" send "rm /restoresymtable\r"; continue
expect "#" send "cd /usr.POWERNODE\r"; continue
expect "#" send "restore rf /dev/rmt0\r"; continue
expect "then enter tape name (default: /dev/rmt0)" at mta0 tapes/utx21b3.tap; send "\r"; continue
expect "#" send "rm /usr.POWERNODE/restoresymtable\r"; continue
expect "#" send "cd /\r"; continue
expect "#" send "/ranlib.sh\r"; continue
expect "#" send 'echo "/dev/dk0e /usr.POWERNODE/src 4.3 rw,noquota 1 3" >>/etc/fstab\r'; continue
expect "echo" continue
;expect "#" send "mount /dev/dk0e /usr.POWERNODE/src\r"; at mta0 tapes/utx21b_src.tap; continue
;expect "#" send "cd /usr.POWERNODE/src\r"; continue
;expect "#" send "tar xf /dev/rmt0\r"; continue
expect "#" send "ed /etc/rc.boot\r"; continue
expect "1522" send "/preen/\r"; continue
expect "#" send "s/#/ /\r.+1\r"; continue
expect "#" continue
expect "echo" send "d\r"; 'expect "\r\n" send "/noname/\r"; continue' ; continue
expect "/bin/hostname noname" send "s/noname/%HOST%/\rw\rq\r"; continue
expect "#" send "ed /etc/hosts\r"; continue
expect "128" send "/sysname/\r"; continue
expect "sysname" continue
expect "sysname" send "d\r"; 'expect "\r\n" send "i\r%IP% %HOST%\r.\rw\rq\r"; continue'; continue
expect "#" send "ed /etc/rc.local\r" ; continue
expect "3849" send "/echo 'Setup/\r"; continue
expect "#" send "s/# //\r"; 'expect "\r\n" send "/en0 inet/\r"; continue' ; continue
expect "#" continue
expect "#" send "s/# //\r"; 'expect "\r\n" send "w\rq\r"; continue'; continue
expect "#" continue
expect "#" send "newfs /dev/dk1c\r"; continue
expect "#" continue
expect "#" send "mkdir /home\r"; continue
expect "#" send 'echo "/dev/dk1c /home 4.3 rw,noquota 2 1" >>/etc/fstab\r'; continue
expect "echo" continue
expect "#" send 'bin/echo "stty intr \003" >>/.profile\r'; continue
expect "#" send "mount /dev/dk1c /home\r"; continue
expect "#" send "df\r"; continue
;expect "#" send "reboot\r"; continue
expect "#" send "halt\r"; continue
expect "sim>" send "q\r"; continue
;Boot from disk dma0
bo dma0
;stop simh execution
quit

View File

@@ -0,0 +1,399 @@
;======================================================
; SEL32 System Engineering Labs 32 bit computer
; UTX - Ver 2.1B hardware configuration
; CPU - V6 8M Sel32 Powernode
; MFP - 7e00 Model 8002 Multi-Function Processor
; SBA - 7e00/7e08 MFP SCSI Disk controller
; sba0 Model 8821 300MB
; sba0 <-> dsk/scsidiska0
; sba1 Model 8821 300MB
; sba1 <-> dsk/scsidiska1
; LPR - 7ef8/7ef9 Model 924X High Speed Line Printer
; COM - 7ee0 8512 8-line async communications
; CON - 7efc/7efd Console Terminal
; RTC - 7f06 50 HZ Real-Time clock
; ITM - 7f04 38.4MS Interval timer
; MT - 1000 8051 Buffered Tape Processor
; mta0 <- tapes/utx21b1.tap
; EC - 0e00 Model 8516 Ethernet
;======================================================
; Set hostname
set env HOST=sel32
; Set local IP address
;set env IP=192.168.0.20
set env IP=192.168.1.5
;======================================================
; Set debug output
;set debug -n sel.log
;set debug stderr
;
; Set directory for disk images
mkdir dsk
mkdir tapes
; Set tape image filename
set env FILE1=utx21b1.tap
if exist "tapes/%FILE1%" goto exists1
; Set github.com URL for downloading files
set env GITURL=https://github.com/AZBevier/SEL32-installs/raw/master/tapes/
if not exist "tapes/%FILE1%" echof "file %FILE1% missing, trying %FILE1%.tgz"
cd tapes
if exist "%FILE1%.tgz" goto nocurl1
echof "fetching %FILE1%.tgz file from github.com\n"
curl -LJO %GITURL%/%FILE1%.tgz
if not exist "%FILE1%.tgz" echof "FAILED - file %FILE1% not available"; exit 1
:nocurl1
echof "untar %FILE1%.tgz file\n"
tar -xzf %FILE1%.tgz
cd ..
:exists1
echof "file %FILE1% present, doing install"
;
; Set tape image filename
set env FILE2=utx21b2.tap
if exist "tapes/%FILE2%" goto exists2
if not exist "tapes/%FILE2%" echof "file %FILE2% missing, trying %FILE2%.tgz"
cd tapes
if exist "%FILE2%.tgz" goto nocurl2
echof "fetching %FILE2%.tgz file from github.com\n"
curl -LJO %GITURL%/%FILE2%.tgz
if not exist "%FILE2%.tgz" echof "FAILED - file %FILE2% not available"; exit 1
:nocurl2
echof "untar %FILE2%.tgz file\n"
tar -xzf %FILE2%.tgz
cd ..
:exists2
echof "file %FILE2% present, doing install"
;
; Set tape image filename
set env FILE3=utx21b3.tap
if exist "tapes/%FILE3%" goto exists3
if not exist "tapes/%FILE3%" echof "file %FILE% missing, trying %FILE%.tgz"
cd tapes
if exist "%FILE3%.tgz" goto nocurl3
echof "fetching %FILE3%.tgz file from github.com\n"
curl -LJO %GITURL%/%FILE3%.tgz
if not exist "%FILE3%.tgz" echof "FAILED - file %FILE% not available"; exit 1
:nocurl3
echof "untar %FILE3%.tgz file\n"
tar -xzf %FILE3%.tgz
cd ..
:exists3
echof "file %FILE3% present, doing install"
;
; CPU type and memory
;set CPU 32/97 4M
;set CPU V6 4M
set CPU V6 8M
;set CPU V9 4M
;set CPU V9 8M
;
; CPU debug options
;set cpu debug=cmd;exp;inst;detail;trap;xio;irq
; Set instruction trace history size
;set cpu history=10000
; useful options
;set cpu debug=exp;irq;xio;trap;cmd
;;set cpu debug=cmd;exp;irq;trap;xio
;set cpu debug=cmd;irq;trap;exp
;;set cpu debug=irq;trap;exp;xio
;set cpu debug=irq;xio
;
; RTC realtime clock
set RTC enable
; address is 7f06
set RTC 50
;set RTC 60
; RTC debug options
;set RTC debug=cmd
;
; ITM interval timer
; address is 7f04
; set itm 3840
;set ITM debug=cmd
;
; IOP at channel 7e00
; useful options
;set iop debug=cmd;exp
;set iop debug=cmd
; make iop online
;set iop enable
; set iop channel address
;set iop0 dev=7e00
;
; MFP at channel 7e00
; useful options
;set mfp debug=cmd;exp
; make mfp online
set mfp enable
; set mfp channel address
set mfp0 dev=7e00
;set mfp0 dev=7600
;
; EC at channel 0e00
; useful options
;set ec debug=cmd;exp
; set the mode
set EC mode=1
; make ec online
set ec enable
; set ec channel address
set ec0 dev=0e00
at ec tap:tap0
;
; COM 8-Line
;set com debug=cmd;
;set coml0 enable
;set coml1 enable
;set coml2 enable
;set coml3 enable
;set coml4 enable
;set coml5 enable
;set coml6 enable
;set coml7 enable
;
; Enable telnet sessions on port 4747
;set comc enable
;at comc 4747
;
; LPR
;set lpr debug=cmd;detail
;set lpr enable
set lpr enable
; LPR output file
;at lpr lprout
at lpr lprout
;
; CON Console
; useful options
;set con debug=cmd;exp;detail
;set con debug=cmd;exp;
; enable console
set con enable
; set console address
; set con0 enable
set con0 dev=7efc
; set con1 enable
set con1 dev=7efd
;
; MTA Buffered tape processor
;set mta debug=cmd;exp;detail;data
; useful options
;set mta debug=cmd;detail;exp
;
; enable the MTA to change channel
set mta enable
; set mt channel
set mta0 dev=1000
; attach in/out tape files
;at mta0 mpxsdt.tap
;at mta0 nbctape.tap
set mta0 locked
at mta0 tapes/utx21b1.tap
;at mta0 utx21a1.tap
;at mta1 temptape.tap
;at mta1 utx21a2.tap
;at mta2 output.tap
;at mta0 sim32sdt.tap
;at mta0 diag.tap
;
; DMA disk processor II/UDP
;set dma enable
; set disk chan to 0800
;set dma0 dev=800
; set disk type to MPX MH300
;set dma0 type=MH300
; set disk type to UTX 9346
;set dma0 type=9346
;set dma0 type=8155
;set dma0 type=8887
;set dma0 type=8148
; Attach diskfile
;at dma0 utx0disk
;at dma0 utx1disk
;at dma0 sim32disk
;at dma0 diagdisk
;
;set dma debug=cmd;exp;detail;data
; useful options
;set dma debug=cmd;exp
;set dma debug=exp;cmd;detail
;
; SDA SCFI disk processor
;set sda debug=cmd;exp;data;detail
; Attach diskfiles
;at sda0 scsidisk0
;at sda1 scsidisk1
;
; SBA MFP SCSI bus 1 disk processor
set sba enable
; set disk chan to 7600
;set sba0 dev=7600
set sba0 dev=7e00
;set sba1 dev=7e08
; set disk type to MPX MH300
set sba0 type=8821
set sba1 type=8821
;set sba0 type=SD300
;set sba0 type=SD150
;set sba0 type=8820
;set sba debug=cmd;exp;data;detail
;set sba debug=cmd;exp;detail
; Attach diskfiles
at sba0 -i dsk/scsidiska0
at sba1 -i dsk/scsidiska1
;
; SBB MFP SCSI bus 2 disk processor
;;set sbb enable
; set disk chan to 7640
;set sbb0 dev=7640
;;set sbb0 dev=7e40
; set disk type to MPX MH300
;set sbb0 type=SD300
;set sbb0 type=8821
;;set sbb0 type=SD150
;set sbb0 type=8820
;set sbb debug=cmd;exp;data;detail
;;set sbb debug=cmd;exp;detail
; Attach diskfiles
;;at sbb0 scsidiskb0
;at sbb1 scsi1disk
;
; DPA high speed disk processor
; enable the HSDP to change channel
;set dpa enable
; set channel addr
;set dpa0 dev=800
; set disk type to UTX 8887
;set dpa0 type=8887
; Attach diskfiles
;at dpa0 utxdsk.dsk
;at dpa0 utx0hsdp
;at dpa1 utx1hsdp
;
;set dpa debug=cmd;detail;exp
; useful options
;set dpa debug=cmd;exp;detail
;
; set console switches
deposit CSW 0
;
;UTX boot tape options
;set GPR 7 to 0x00 to boot in multi-user mode
;set GPR 7 to 0x01 to prompt for unix filename
;set GPR 7 to 0x02 to boot in single user mode
;set GPR 7 to 0x10 to disable swapping and paging
;set GPR 7 to 0x20 to boot from device specified in GPR6
;set GPR 7 to 0x40 to allow progress messages on boot
;deposit BOOTR[7] 40
;deposit BOOTR[7] 52
deposit BOOTR[7] 42
;deposit BOOTR[7] 2
;deposit BOOTR[6] 800
;deposit BOOTR[0] ffffffff
; Set register content at boot for SEL diagnostics
; uncomment next line to get diag loader prompt
;deposit bootr[0] ffffffff
;deposit bootr[1] 0
;deposit bootr[2] 0
;
; do not allow cpu to idle
; works around a reboot issue with UTX
; if allowed, installation will hang checking root file system
set cpu noidle
;
expect "#" continue
expect "#" send "prep /dev/rsd0a\r"; continue
expect "Ready to prep /dev/rsd0a" send "yes\r"; continue
expect "Which option ?" send "2\r"; continue
expect "Please select a drive type:" send "7\r"; continue
expect "#" continue
expect "#" continue
expect "#" continue
expect "Do you really want to do this <no>?" send "yes\r"; continue
expect "Which option ?" send "0\r"; continue
;
expect "#" continue
expect "#" continue
expect "#" send "prep /dev/rsd1a\r"; continue
expect "Which option ?" send "2\r"; continue
expect "Please select a drive type:" send "7\r"; continue
expect "#" continue
expect "#" continue
expect "#" continue
expect "Do you really want to do this <no>?" send "yes\r"; continue
expect "Ready to prep /dev/rsd1a" send "yes\r"; continue
expect "Which option ?" send "0\r"; continue
expect "#" continue
expect "#" continue
expect "#" send "newfs /dev/sd0a\r"; continue
expect "#" continue
expect "#" send "newfs /dev/sd0d\r"; continue
expect "#" continue
expect "#" send "newfs /dev/sd0e\r"; continue
expect "#" continue
expect "#" send "mount /dev/sd0a /mnt\r"; continue
expect "#" send "cd /mnt\r"; continue
expect "#" send "restore r\r"; continue
expect "#" send 'bin/echo "/dev/sd0a / 4.3 rw,noquota 1 1" >etc/fstab\r'; continue
expect "#" send 'bin/echo "#/dev/sd0b is the default swap partition" >>etc/fstab\r'; continue
expect "#" send 'bin/echo "/dev/sd0d /usr.POWERNODE 4.3 rw,noquota 1 2" >>etc/fstab\r'; continue
expect "#" send "cd /\r"; continue
expect "#" send "umount /dev/sd0a\r"; continue
expect "#" send "halt\r"; continue
;expect "#" send "/mnt/etc/reboot\r"; continue
; Boot from mag tape
bo mta0
; Set expect script to load UTX 2.1B
deposit BOOTR[7] 2
at mta0 tapes/utx21b2.tap
;set sba debug=cmd;exp;data;detail
;
expect "#" continue
expect "#" send "mount /dev/sd0d /usr.POWERNODE\r"; continue
expect "#" send "rm /restoresymtable\r"; continue
expect "#" send "cd /usr.POWERNODE\r"; continue
;expect "#" send "mkdir src\r"; continue
expect "#" send "restore rf /dev/rmt0\r"; continue
expect "then enter tape name (default: /dev/rmt0)" at mta0 tapes/utx21b3.tap; send "\r"; continue
expect "#" send "rm /usr.POWERNODE/restoresymtable\r"; continue
expect "#" send "cd /\r"; continue
expect "#" send "/ranlib.sh\r"; continue
;expect "#" send 'echo "/dev/sd0d /usr.POWERNODE 4.3 rw,noquota 1 2" >>/etc/fstab\r'; continue
expect "#" send 'echo "/dev/sd0e /usr.POWERNODE/src 4.3 rw,noquota 1 3" >>/etc/fstab\r'; continue
expect "echo" continue
;expect "#" send "mount /dev/sd0e /usr.POWERNODE/src\r"; at mta0 tapes/utx21b_src.tap; continue
;expect "#" send "cd /usr.POWERNODE/src\r"; continue
;expect "#" send "tar xf /dev/rmt0\r"; continue
expect "#" send "ed /etc/rc.boot\r"; continue
expect "1522" send "/preen/\r"; continue
expect "#" send "s/#/ /\r.+1\r"; continue
expect "#" continue
expect "echo" send "d\r"; 'expect "\r\n" send "/noname/\r"; continue' ; continue
expect "/bin/hostname noname" send "s/noname/%HOST%/\rw\rq\r"; continue
expect "#" send "ed /etc/hosts\r"; continue
expect "128" send "/sysname/\r"; continue
expect "sysname" continue
expect "sysname" send "d\r"; 'expect "\r\n" send "i\r%IP% %HOST%\r.\rw\rq\r"; continue'; continue
expect "#" send "ed /etc/rc.local\r" ; continue
expect "3849" send "/echo 'Setup/\r"; continue
expect "#" send "s/# //\r"; 'expect "\r\n" send "/en0 inet/\r"; continue' ; continue
expect "#" continue
expect "#" send "s/# //\r"; 'expect "\r\n" send "w\rq\r"; continue'; continue
expect "#" continue
expect "#" send "newfs /dev/sd1c\r"; continue
expect "#" continue
expect "#" send "mkdir /home\r"; continue
expect "#" send 'echo "/dev/sd1c /home 4.3 rw,noquota 2 1" >>/etc/fstab\r'; continue
expect "echo" continue
expect "#" send "mount /dev/sd1c /home\r"; continue
expect "#" send "df\r"; continue
expect "#" send 'bin/echo "stty intr \003" >>/.profile\r'; continue
expect "#" send 'bin/echo "Run runscsi21b.ini to run installed UTX 21b"\r'; continue
;expect "#" send "reboot\r"; continue
expect "#" send "halt\r"; continue
expect "sim>" send "q\r"; continue
;Boot from disk sba0
bo sba0
;stop simh execution
quit

View File

@@ -0,0 +1,168 @@
;======================================================
; SEL32 System Engineering Labs 32 bit computer
; MPX - Ver 3.4 hardware configuration
; CPU - 32/67 8M Sel32 Concept/32
; IOP - 7e00 Model 8001 IOP Processor Controller
; MFP - 7600 Model 8002 Multi Function Processor
; SBA - 7600 MFP SCSI Disk Controller
; sba0 SD300 Model 8828 300MB MHD
; sba0 <-> dsk/mpx3xsba0.dsk
; SBA - 7640 MFP SCSI Disk Controller
; sbb0 SD300 Model 8828 300MB MHD
; sbb0 <-> dsk/mpx3xsbb0.dsk
; LPR - 7ef8/7ef9 Model 924X High Speed Line Printer
; COM - 7ec0 8512 8-line async communications
; CON - 7efc/7efd Console Terminal
; RTC - 7f06 60 HZ Real-Time clock
; ITM - 7f04 38.4MS Interval timer
; MT - 1000 8051 Buffered Tape Processor
; mta0 <- tapes/mpxsdt69.tap
; EC - 0e00 Model 8516 Ethernet (not supported)
;======================================================
; Set HOST simulator
set env HOST=sel32
; Set local IP address
; set env IP=192.168.1.5 (N/U)
;======================================================
; Set directory for disk images
mkdir dsk
mkdir tapes
; Set tape image filename
set env FILE=mpxsdt69.tap
; Set github.com URL for downloading files
set env GITURL=https://github.com/AZBevier/SEL32-installs/raw/master/tapes/
if exist "tapes/%FILE%" goto exists
if not exist "tapes/%FILE%" echof "file %FILE% missing, trying %FILE%.tgz"
cd tapes
if exist "%FILE%.tgz" goto nocurl
echof "fetching %FILE%.tgz file from github.com\n"
curl -LJO %GITURL%/%FILE%.tgz
if not exist "%FILE%.tgz" echof "FAILED - file %FILE% not available"; exit 1
:nocurl
echof "untar %FILE%.tgz file\n"
tar -xzf %FILE%.tgz
cd ..
:exists
echof "file %FILE% present, doing install"
;
; Set directory for disk
mkdir dsk
; Set debug output
; set debug -n sel.log
;
; CPU type and memory size
set CPU 32/67 8M
;set CPU 32/97 8M
;
; RTC realtime clock at 7f06
set RTC 60
set RTC enable
;
; ITM interval timer at 7f04
set ITM 3840
;
; IOP at channel 7e00
set iop enable
set iop0 dev=7e00
;
; MFP at channel 7600
set mfp enable
set mfp0 dev=7600
;
; COM 8-Line at 7ec0
set coml enable
set coml0 dev=7ec0
set coml0 enable
set coml1 enable
set coml2 enable
set coml3 enable
set coml4 enable
set coml5 enable
set coml6 enable
set coml7 enable
;
; Enable telnet sessions on port 4747
set comc enable
at comc 4747
;
; LPR0 at 7ef8
set lpr enable
; LPR output file
;at lpr lprout
;
; EC ethernet at 0e00
; Support not available yet
;set ec enable
;set ec mode=2
;set ec0 dev=0e00
;at ec tap:tap0
; set mac address to cause ec to be attached
;set ec MAC=08:00:5D:01:01:20
;
; CON Console at 7efc
set con enable
set con0 dev=7efc
;
; MTA Buffered tape processor at 1000
set mta enable
set mta0 dev=1000
; Attach install sdt tape file
set mta0 locked
at mta0 tapes/mpxsdt69.tap
;
; SBA MFP SCSI buss 1 disk processor at 7600
set sba enable
; set disk chan to 7600
set sba0 dev=7600
set sba0 type=SD300
; Attach diskfile
at sba0 -i dsk/mpx3xsba0.dsk
;
; SBB MFP SCSI buss 2 disk processor at 7640
set sbb enable
set sbb0 dev=7640
set sbb0 type=SD300
; Attach diskfile
at sbb0 -i dsk/mpx3xsbb0.dsk
;
; set console switches
deposit CSW 0
;
; allow cpu idle
set cpu idle
; wait for expected output from simulator, then enter this text
expect "ENTER" send " %DATE_MM%/%DATE_DD%/%DATE_YY%,%TIME_HH%:%TIME_MM%:%TIME_SS%\r"; continue
expect "FMT>" send "INITIALIZE DEVICE=DM7600 DEST=Y DISC=DM0300 CON=N\r"; continue
expect "FMT>" send "FORMAT DEVICE=DM7600 VOLUME=SYSTEM MAXRES=7000 CON=N\r"; continue
expect "ENTER SYSTEM VOLUME CHANNEL AND SUBADDRESS: " send "7600\r"; continue
expect "VOL>" send "CREATE D SYSTEM ENTRIES=2000\r"; continue
; restore system
expect "VOL>" send "RESTORE VOL=SYSTEM\r"; continue
; restore object, object_e, oldobj
expect "VOL>" send "RESTORE VOL=SYSTEM\r"; continue
; restore bin, doc, nblib, sample
expect "VOL>" send "RESTORE VOL=SYSTEM\r"; continue
expect "VOL>" send "REWIND\r"; continue
expect "VOL>" send "EXIT\r"; continue
; initialize 2nd disk
;expect "SYSTEM READY... PRESS ATTENTION FOR TSM..." send "@@A"; continue
expect "SYSTEM READY... PRESS ATTENTION FOR TSM..." send after=500000 delay=6000 "HIT @@A"; continue
;expect "" send after=1500000, delay=4000, " HIT @@A"; continue
expect "ENTER YOUR OWNERNAME:" send "SYSTEM\r"; continue
expect "TSM>" send "WHO\r"; continue
expect "TSM>" send "@SYSTEM(SYSTEM)J.VFMT\r"; continue
expect "FMT>" send "INITIALIZE DEV=DM7640 DES=Y DIS=DM0300 CON=N\r"; continue
expect "FMT>" send "FORMAT DEV=DM7640 VOL=WORK MAXRE=7000 CON=N\r"; continue
expect "TSM>" send "MOUNT WORK ON DM7640 OPTI=PUBLIC\r"; continue
expect "TSM>" send "VOLMGR\r"; continue
expect "VOL>" send "CREATE D @WORK^SYSTEM ENTRIES=1000\r"; continue
expect "VOL>" send "EXIT\r"; continue
expect "TSM>" send "!STAT VOL\r"; continue
;;expect "TSM>" send "WHO\r"; continue
expect "TSM>" send "EXIT\r"; continue
expect "RING IN FOR SERVICE" send "\r^E"
; Boot from mag tape
bo mta0
det all
quit

View File

@@ -0,0 +1,215 @@
;======================================================
; SEL32 System Engineering Labs 32 bit computer
; MPX - Ver 1.5F hardware configuration
; CPU - 32/67 4M Sel32 Concept/32
; IOP - 7e00 Model 8001 IOP Processor Controller
; DMA - 0800 2311/2314 Disk Processor II
; dma0 MH300 Model 8127 300MB MHD
; dma0 <-> dsk/mpx1xdma0.dsk
; LPR - 7ef8/7ef9 Model 924X High Speed Line Printer
; COM - 7ec0 8512 8-line async communications
; CON - 7efc/7efd Console Terminal
; RTC - 7f06 60 HZ Real-Time clock
; ITM - 7f04 38.4MS Interval timer
; MT - 1000 8051 Buffered Tape Processor
; mta0 <- tapes/mpx1xsdt.tap
; EC - 0e00 Model 8516 Ethernet (not supported)
;======================================================
; Set hostname
set env HOST=sel32
; Set local IP address
; set env IP=192.168.1.5 (N/U)
;======================================================
; Set directory for disk images
mkdir dsk
; Set debug output
; set debug -n sel.log
;
; CPU type and memory size
set CPU 32/67 4M
;
; RTC realtime clock at 7f06
set RTC 60
set RTC enable
;
; ITM interval timer at 7f04
set ITM 3840
;
; IOP at channel 7e00
set iop enable
set iop0 dev=7e00
;
; COM 8-Line at 7ec0
set coml enable
set coml0 dev=7ec0
; Set debug output
;set debug -n sel.log
;
; CPU type and memory size
;set CPU 32/27 4M
;set CPU 32/87 4M
set CPU 32/67 4M
;set CPU 32/97 4M
;
; CPU debug options
;set cpu debug=cmd;exp;inst;detail;trap;xio;irq
; Set instruction trace history size
;set cpu history=10000
;
; RTC realtime clock
; RTC debug options
;set RTC debug=cmd
; device address is 7f06
set RTC enable
;set RTC 50
set RTC 60
;
; ITM interval timer
; ITM debug options
;set ITM debug=cmd
; device address is 7f04
set ITM 3840
;
; IOP at channel 7e00
; IOP debug options
;set iop debug=cmd;exp
set iop enable
; set iop channel address
set iop0 dev=7e00
;
; MFP at channel 7e00
; Only supported on MPX-3X and UTX
; MFP debug options
;set mfp debug=cmd;exp
; enable MFP to change address
;set mfp enable
; set mfp channel address
;set mfp0 dev=7e00
;set mfp0 dev=7600
;
; COM 8-Line
; COM debug options
;set coml debug=cmd;exp;xio
; enable COML to change address
set coml enable
; MPX 3X wants 7ea0
; set coml0 dev=7ea0
; MPX 1X wants 7ec0
set coml0 dev=7ec0
set coml0 enable
set coml1 enable
set coml2 enable
set coml3 enable
set coml4 enable
set coml5 enable
set coml6 enable
set coml7 enable
;
; COMC 8-Line Mux
; COMC debug options
;set comc debug=cmd
; COMC has no address
set comc enable
; Enable telnet sessions on port 4747
at comc 4747
;
; LPR at 7ef8
; LPR debug options
;set lpr debug=cmd;detail
; enable LPR to change address
set lpr enable
; attach LPR output file
at lpr lprout
;
; EC ethernet 0e00
; Support not available yet
; EC debug options
;set ec debug=cmd;exp;xio;detail;irq
;set ec enable
;set ec0 dev=0e00
;set ec mode=2
;at ec tap:tap0
; set mac address to cause ec to be attached
;set ec MAC=08:00:5D:01:01:20
;
; CON Console
; CON debug options
;set con debug=cmd;exp;detail
; enable console
set con enable
; set console address
set con0 dev=7efc
;
; MTA Buffered tape processor
; MTA debug options
;set mta debug=cmd;exp;detail;data
; enable MTA to change channel
set mta enable
; set mta channel address
set mta0 dev=1000
; Attach in/out tape files
;at mta0 output.tap
;set mta0 locked
;
; DMA disk processor II/UDP
; DMA debug options
;set dma debug=cmd;exp;detail;data
; enable DMA to change channel
set dma enable
; set channel address
set dma0 dev=800
; set disk type to MPX MH300 (8887)
; must match sysgen assignment
set dma0 type=MH300
; Attach diskfile
at dma0 dsk/mpx1xdma0.dsk
;
; SDA SCFI disk processor
; Only supported on MPX-1X
; SDA debug options
;set sda debug=cmd;exp;data;detail
; enable SCFI to change channel
;set sda enable
; set channel address
;set sda0 dev=800
; set disk type to MPX SG120
; must match sysgen assignment
;set sda0 type=SG120
; Attach diskfiles
;at sda0 dsk/mpx1xsda0.dsk
;
; DPA high speed disk processor
; DPA debug options
;set dpa debug=cmd;exp;data;detail
; enable DPA to change channel
;set dpa enable
; set channel address
;set dpa0 dev=800
; set disk type to MPX MH300 (8887)
; must match sysgen assignment
;set dpa0 type=MH300
; Attach diskfiles
;at dpa0 dsk/mpx1xdpa0.dsk
;
; set console switches
deposit CSW 0
;
;SEL32 boot register options
;deposit BOOTR[7] 0
;deposit BOOTR[6] 800
;;
; allow cpu idle
set cpu idle
; Set expect script for auto time entry on MPX at OPCOM prompt
;expect haltafter=20000
; wait for expected output from simulator, then enter this text
expect " DO YOU WISH TO USE *SEL32SY1* DEFAULT IMAGE(Y/N)?" send "Y\r"; continue
expect "??" send " %DATE_MM%/%DATE_DD%/%DATE_YY%,%TIME_HH%:%TIME_MM%:%TIME_SS%\r@@A"; GO
;expect "" send "@@A"; continue
expect "" send after=400000, delay=6000, " @@A"
expect "??" send "X\r"; continue
expect "TSM>" send "WHO\r"; continue
;expect "TSM>" send "EXIT\r"; continue
;
; Boot from disk
bo dma0

View File

@@ -0,0 +1,70 @@
;======================================================
; SEL32 System Engineering Labs 32 bit computer
; UTX - Ver 2.1B hardware configuration
; CPU - V6 8M Sel32 Powernode
; MFP - 7e00 Model 8001 IOP Processor Controller
; DMA - 0800 2311/2314 Disk Processor II
; dma0 Model 8858 340MB
; dma0 <-> dsk/21bdisk0.dma
; dma1 Model 8858 340MB
; dma1 <-> dsk/21bdisk1.dma
; LPR - 7ef8/7ef9 Model 924X High Speed Line Printer
; COM - 7ee0 8512 8-line async communications
; CON - 7efc/7efd Console Terminal
; RTC - 7f06 50 HZ Real-Time clock
; ITM - 7f04 38.4MS Interval timer
; MT - 1000 8051 Buffered Tape Processor
; mta0 <-> not assigned
; EC - 0e00 Model 8516 Ethernet
;======================================================
; Set hostname
set env HOST=sel32
; Set local IP address
set env IP=192.168.1.5
;======================================================
;set debug -n sel.log
mkdir dsk
set RTC 50
set CPU V6 8M
set RTC enable
set iop enable
set iop0 dev=7e00
set dma enable
set dma0 dev=800
set dma0 type=8858
set dma1 type=8858
set coml0 dev=7ee0
set coml0 enable
set coml1 enable
set coml2 enable
set coml3 enable
set coml4 enable
set coml5 enable
set coml6 enable
set coml7 enable
set con enable
set con0 dev=7efc
set mta enable
set mta0 dev=1000
set lpr enable
set comc enable
at comc 4747
set ec enable
set ec mode=1
set ec0 dev=0e00
; set mac address to cause ec to be attached
set ec MAC=08:00:5D:01:01:20
;set ec debug=cmd;exp;xio;detail;irq
;at lpr lprout
set cpu idle
;
;deposit BOOTR[7] 42
deposit BOOTR[7] 0
deposit BOOTR[6] 800
;at mta0 tapes/temp.tap
;at mta0 tapes/src.tar.tap
;at mta0 tapes/y2k21ab.tar.tap
at dma0 dsk/21bdisk0.dma
at dma1 dsk/21bdisk1.dma
at ec tap:tap0
bo dma0

View File

@@ -0,0 +1,248 @@
;======================================================
; SEL32 System Engineering Labs 32 bit computer
; UTX - Ver 2.1B hardware configuration
; CPU - V6 8M Sel32 Powernode
; MFP - 7e00 Model 8002 Multi-Function Processor
; SBA - 7e00/7e08 MFP SCSI Disk controller
; sba0 Model 8821 300MB
; sba0 <-> dsk/scsidiska0
; sba1 Model 8821 300MB
; sba1 <-> dsk/scsidiska1
; LPR - 7ef8/7ef9 Model 924X High Speed Line Printer
; COM - 7ee0 8512 8-line async communications
; CON - 7efc/7efd Console Terminal
; RTC - 7f06 50 HZ Real-Time clock
; ITM - 7f04 38.4MS Interval timer
; MT - 1000 8051 Buffered Tape Processor
; mta0 <- tapes/utx21b1.tap
; EC - 0e00 Model 8516 Ethernet
;======================================================
; Set hostname
set env HOST=sel32
; Set local IP address
set env IP=192.168.1.5
;======================================================
; Set debug output
;set debug -n sel.log
;set debug stderr
;
;mkdir dsk
; CPU type and memory
;set CPU 32/97 4M
;set CPU V6 4M
set CPU V6 8M
;set CPU V9 4M
;set CPU V9 8M
;
; CPU debug options
;set cpu debug=cmd;exp;inst;detail;trap;xio;irq
; Set instruction trace history size
;set cpu history=10000
; useful options
;set cpu debug=exp;irq;xio;trap;cmd
;;set cpu debug=cmd;exp;irq;trap;xio
;set cpu debug=cmd;irq;trap;exp
;;set cpu debug=irq;trap;exp;xio
;;set cpu debug=irq;xio
;
; RTC realtime clock
set RTC enable
; address is 7f06
;set RTC 50
set RTC 60
; RTC debug options
;set RTC debug=cmd
;
; ITM interval timer
; address is 7f04
; set itm 3840
;set ITM debug=cmd
;
; IOP at channel 7e00
; useful options
;set iop debug=cmd;exp
;set iop debug=cmd
; make iop online
;set iop enable
; set iop channel address
;set iop0 dev=7e00
;
; MFP at channel 7e00
; useful options
;set mfp debug=cmd;exp
; make mfp online
set mfp enable
; set mfp channel address
set mfp0 dev=7e00
;set mfp0 dev=7600
;
; EC at channel 0e00
; useful options
;set ec debug=cmd;exp
; set the mode
set EC mode=1
; make ec online
set ec enable
; set ec channel address
set ec0 dev=0e00
at ec tap:tap0
;
; COM 8-Line
;set com debug=cmd;
;set coml0 enable
;set coml1 enable
;set coml2 enable
;set coml3 enable
;set coml4 enable
;set coml5 enable
;set coml6 enable
;set coml7 enable
;
; Enable telnet sessions on port 4747
;set comc enable
;at comc 4747
;
; LPR
;set lpr debug=cmd;detail
;set lpr enable
set lpr enable
; LPR output file
;at lpr lprout
;at lpr lprout
;
; CON Console
; useful options
;set con debug=cmd;exp;detail
;set con debug=cmd;exp;
; enable console
set con enable
; set console address
; set con0 enable
set con0 dev=7efc
; set con1 enable
set con1 dev=7efd
;
; MTA Buffered tape processor
;set mta debug=cmd;exp;detail;data
; useful options
;set mta debug=cmd;detail;exp
;
; enable the MTA to change channel
set mta enable
; set mt channel
set mta0 dev=1000
; attach in/out tape files
;at mta0 mpxsdt.tap
;at mta0 nbctape.tap
;at mta0 tapes/utx21b1.tap
;at mta0 utx21a1.tap
;at mta1 temptape.tap
;at mta1 utx21a2.tap
;at mta2 output.tap
;at mta0 sim32sdt.tap
;at mta0 diag.tap
;
; DMA disk processor II/UDP
;set dma enable
; set disk chan to 0800
;set dma0 dev=800
; set disk type to MPX MH300
;set dma0 type=MH300
; set disk type to UTX 9346
;set dma0 type=9346
;set dma0 type=8155
;set dma0 type=8887
;set dma0 type=8148
; Attach diskfile
;at dma0 utx0disk
;at dma0 utx1disk
;at dma0 sim32disk
;at dma0 diagdisk
;
;set dma debug=cmd;exp;detail;data
; useful options
;set dma debug=cmd;exp
;set dma debug=exp;cmd;detail
;
; SDA SCFI disk processor
;set sda debug=cmd;exp;data;detail
; Attach diskfiles
;at sda0 scsidisk0
;at sda1 scsidisk1
;
; SBA MFP SCSI bus 1 disk processor
set sba enable
; set disk chan to 7600
;set sba0 dev=7600
set sba0 dev=7e00
;set sba1 dev=7e08
; set disk type to UTX MH300
set sba0 type=8821
set sba1 type=8821
;set sba0 type=8820
;set sba debug=cmd;exp;data;detail
;set sba debug=cmd;exp;detail
; Attach diskfiles
at sba0 dsk/scsidiska0
at sba1 dsk/scsidiska1
;
; SBB MFP SCSI bus 2 disk processor
;;set sbb enable
; set disk chan to 7640
;set sbb0 dev=7640
;;set sbb0 dev=7e40
; set disk type to MPX MH300
;set sbb0 type=SD300
;set sbb0 type=8821
;;set sbb0 type=SD150
;set sbb0 type=8820
;set sbb debug=cmd;exp;data;detail
;;set sbb debug=cmd;exp;detail
; Attach diskfiles
;;at sbb0 scsidiskb0
;at sbb1 scsi1disk
;
; DPA high speed disk processor
; enable the HSDP to change channel
;set dpa enable
; set channel addr
;set dpa0 dev=800
; set disk type to UTX 8887
;set dpa0 type=8887
; Attach diskfiles
;at dpa0 utxdsk.dsk
;at dpa0 utx0hsdp
;at dpa1 utx1hsdp
;
;set dpa debug=cmd;detail;exp
; useful options
;set dpa debug=cmd;exp;detail
;
; set console switches
deposit CSW 0
;
;UTX boot tape options
;set GPR 7 to 0x00 to boot in multi-user mode
;set GPR 7 to 0x01 to prompt for unix filename
;set GPR 7 to 0x02 to boot in single user mode
;set GPR 7 to 0x10 to disable swapping and paging
;set GPR 7 to 0x20 to boot from device specified in GPR6
;set GPR 7 to 0x40 to allow progress messages on boot
;deposit BOOTR[7] 40
;deposit BOOTR[7] 52
deposit BOOTR[7] 40
;deposit BOOTR[7] 2
;deposit BOOTR[6] 800
;deposit BOOTR[0] ffffffff
; Set register content at boot for SEL diagnostics
; uncomment next line to get diag loader prompt
;deposit bootr[0] ffffffff
;deposit bootr[1] 0
;deposit bootr[2] 0
;
; allow cpu idle
set cpu idle
;
;Boot from disk
bo sba0

View File

@@ -0,0 +1,219 @@
;======================================================
; SEL32 System Engineering Labs 32 bit computer
; MPX - Ver 3.4 hardware configuration
; CPU - 32/67 8M Sel32 Concept/32
; IOP - 7e00 Model 8001 IOP Processor Controller
; MFP - 7600 Model 8002 Multi Function Processor
; SBA - 7600 MFP SCSI Disk Controller
; sba0 SD300 Model 8828 300MB MHD
; sba0 <-> dsk/mpx3xsba0.dsk
; SBA - 7640 MFP SCSI Disk Controller
; sbb0 SD300 Model 8828 300MB MHD
; sbb0 <-> dsk/mpx3xsbb0.dsk
; LPR - 7ef8/7ef9 Model 924X High Speed Line Printer
; COM - 7ec0 8512 8-line async communications
; CON - 7efc/7efd Console Terminal
; RTC - 7f06 60 HZ Real-Time clock
; ITM - 7f04 38.4MS Interval timer
; MT - 1000 8051 Buffered Tape Processor
; mta0 <- tapes/mpxsdt69.tap
; EC - 0e00 Model 8516 Ethernet (not supported)
;======================================================
; Set HOST simulator
set env HOST=sel32
; Set local IP address
; set env IP=192.168.1.5 (N/U)
;======================================================
; Set debug output
;set debug -n sel.log
;
; CPU type and memory size
set CPU 32/67 8M
;set CPU 32/97 8M
;
; CPU debug options
;set cpu debug=cmd;exp;inst;detail;trap;xio;irq
; Set instruction trace history size
;set cpu history=10000
;
; RTC realtime clock
; RTC debug options
;set RTC debug=cmd
; device address is 7f06
set RTC enable
;set RTC 50
set RTC 60
;
; ITM interval timer
; ITM debug options
;set ITM debug=cmd
; device address is 7f04
set ITM 3840
;
; IOP at channel 7e00
; IOP debug options
;set iop debug=cmd;exp
set iop enable
; set iop channel address
set iop0 dev=7e00
;
; MFP at channel 7600
; Only supported on MPX-3X and UTX
; MFP debug options
;set mfp debug=cmd;exp
; enable MFP to change address
set mfp enable
; set mfp channel address
;set mfp0 dev=7e00
set mfp0 dev=7600
;
; COM 8-Line
; COM debug options
;set coml debug=cmd;exp;xio
; enable COML to change address
set coml enable
; MPX 3X wants 7ec0
set coml0 dev=7ec0
set coml0 enable
set coml1 enable
set coml2 enable
set coml3 enable
set coml4 enable
set coml5 enable
set coml6 enable
set coml7 enable
;
; COMC 8-Line Mux
; COMC debug options
;set comc debug=cmd
; COMC has no address
set comc enable
; Enable telnet sessions on port 4747
at comc 4747
;
; LPR at 7ef8
; LPR debug options
;set lpr debug=cmd;detail
; enable LPR to change address
set lpr enable
; attach LPR output file
at lpr lprout
;
; EC ethernet 0e00
; Support not available yet
; EC debug options
;set ec debug=cmd;exp;xio;detail;irq
;set ec enable
;set ec0 dev=0e00
;set ec mode=2
;at ec tap:tap0
; set mac address to cause ec to be attached
;set ec MAC=08:00:5D:01:01:20
;
; CON Console
; CON debug options
;set con debug=cmd;exp;detail
; enable console
set con enable
; set console address
set con0 dev=7efc
;
; MTA Buffered tape processor
; MTA debug options
;set mta debug=cmd;exp;detail;data
; enable MTA to change channel
set mta enable
; set mta channel address
set mta0 dev=1000
; Attach in/out tape files
;at mta0 output.tap
;set mta0 locked
;
; DMA disk processor II/UDP
; DMA debug options
;set dma debug=cmd;exp;detail;data
; enable DMA to change channel
; set dma enable
; set channel address
; set dma0 dev=800
; set disk type to MPX MH300 (8887)
; must match sysgen assignment
; set dma0 type=MH300
; Attach diskfile
; at dma0 dsk/mpx3xdma0.dsk
;
; SDA SCFI disk processor
; Only supported on MPX-1X
; SDA debug options
;set sda debug=cmd;exp;data;detail
; enable SCFI to change channel
;set sda enable
; set channel address
;set sda0 dev=800
; set disk type to MPX SG120
; must match sysgen assignment
;set sda0 type=SG120
; Attach diskfiles
;at sda0 dsk/mpx3xsda0.dsk
;
; DPA high speed disk processor
; DPA debug options
;set dpa debug=cmd;exp;data;detail
; enable DPA to change channel
;set dpa enable
; set channel address
;set dpa0 dev=800
; set disk type to MPX MH300 (8887)
; must match sysgen assignment
;set dpa0 type=MH300
; Attach diskfiles
;at dpa0 dsk/mpx3xdpa0.dsk
;
; SBA MFP SCSI buss 1 disk processor
; SBA debug options
;set sba debug=cmd;exp;data;detail
; enable SBA to change channel
set sba enable
; set channel address
set sba0 dev=7600
; set disk type to MPX SD300 (8828)
set sba0 type=SD300
; Attach diskfiles
at sba0 dsk/mpx3xsba0.dsk
;
; SBB SCSI buss 2 disk processor
; SBB debug options
;set sbb debug=cmd;exp;data;detail
; enable SBB to change channel
set sbb enable
; set channel address
set sbb0 dev=7640
; set disk type to MPX SD300 (8828)
set sbb0 type=SD300
; Attach diskfiles
at sbb0 dsk/mpx3xsbb0.dsk
;
; set console switches
deposit CSW 0
;
;SEL32 boot register options
;deposit BOOTR[7] 0
;deposit BOOTR[6] 800
;;
; allow cpu idle
set cpu idle
; Set expect script for auto time entry on MPX at OPCOM prompt
;expect haltafter=20000
; wait for expected output from simulator, then enter this text
expect "??" send " %DATE_MM%/%DATE_DD%/%DATE_YY%,%TIME_HH%:%TIME_MM%:%TIME_SS%\r"; GO
;expect "??" send "X\r"; continue
;expect "SYSTEM READY... PRESS ATTENTION FOR TSM..." send "@@A"; continue
expect "SYSTEM READY... PRESS ATTENTION FOR TSM..." send after=500000 delay=4000 "@@A"; continue
expect "ENTER YOUR OWNERNAME:" send "SYSTEM\r"; continue
expect "TSM>" send "MOUNT WORK ON DM7640 OPTI=PUBLIC\r"; continue
expect "TSM>" send "!STAT VOL\r"; continue
expect "TSM>" send "WHO\r"; continue
;expect "TSM>" send "EXIT\r"; continue
;
; Boot from disk
bo sba0

View File

@@ -0,0 +1,245 @@
;======================================================
; SEL32 System Engineering Labs 32 bit computer
; MPX - Ver 1.5F hardware configuration
; CPU - 32/27 2M Sel32 Concept/32
; IOP - 7e00 Model 8001 IOP Processor Controller
; DMA - 0800 2311/2314 Disk Processor II
; dma0 MH300 Model 8127 300MB MHD
; dma0 <-> dsk/sel32disk
; LPR - 7ef8/7ef9 Model 924X High Speed Line Printer
; COM - 7ec0 8512 8-line async communications
; CON - 7efc/7efd Console Terminal
; RTC - 7f06 60 HZ Real-Time clock
; ITM - 7f04 38.4MS Interval timer
; MT - 1000 8051 Buffered Tape Processor
; mta0 <- tapes/mpx1xsdt.tap
; EC - 0e00 Model 8516 Ethernet (not supported)
;======================================================
; Set hostname
set env HOST=sel32
; Set local IP address
; set env IP=192.168.1.5 (N/U)
;======================================================
; Set directory for disk images
mkdir dsk
mkdir tapes
; Set tape image filename
set env FILE=mpx1xsdt.tap
; Set github.com URL for downloading files
set env GITURL=https://github.com/AZBevier/SEL32-installs/raw/master/tapes/
if exist "tapes/%FILE%" goto exists
if not exist "tapes/%FILE%" echof "file %FILE% missing, trying %FILE%.tgz"
cd tapes
if exist "%FILE%.tgz" goto nocurl
echof "fetching %FILE%.tgz file from github.com\n"
curl -LJO %GITURL%/%FILE%.tgz
if not exist "%FILE%.tgz" echof "FAILED - file %FILE% not available"; exit 1
:nocurl
echof "untar %FILE%.tgz file\n"
tar -xzf %FILE%.tgz
cd ..
:exists
echof "file %FILE% present, doing install"
;
; Set debug output
;set debug -n sel.log
;set debug stderr
;
; CPU type and memory
; Bad on UTX
set CPU 32/27 2M
;set CPU 32/27 4M
;set CPU 32/87 4M
;set CPU 32/67 4M
;End of Bad
;set CPU 32/97 4M
;set CPU V6 4M
;set CPU V6 8M
;set CPU V9 4M
;set CPU V9 8M
;
; CPU debug options
;set cpu debug=cmd;exp;inst;detail;trap;xio;irq
; Set instruction trace history size
;set cpu history=10000
; useful options
;set cpu debug=exp;xio;trap
;set cpu debug=cmd;exp;irq;trap;xio;
;set cpu debug=cmd;irq;trap;exp
;set cpu debug=irq;trap;exp;xio
;set cpu debug=irq;xio;exp;inst;cmd;trap
;set cpu debug=irq;xio;exp;cmd;trap
;
; RTC realtime clock
; address is 7f06
;set RTC 50
set RTC 60
set RTC enable
; RTC debug options
;set RTC debug=cmd
;
; ITM interval timer
; address is 7f04
; set ITM 3840
;set ITM debug=cmd
;
; IOP at channel 7e00
set iop enable
; set iop channel
set iop0 dev=7e00
;set iop debug=cmd;exp
;set iop debug=cmd
;
; COM 8-Line
set coml enable
set coml0 dev=7ec0
;set coml debug=cmd;
set coml0 enable
set coml1 enable
set coml2 enable
set coml3 enable
set coml4 enable
set coml5 enable
set coml6 enable
set coml7 enable
;
; Enable telnet sessions on port 4747
set comc enable
;set comc debug=cmd;
at comc 4747
;
; LPR
; LPR0 is at 7EF8
; LPR1 is at 7EF9
; useful options
;set lpr debug=cmd;detail
set lpr enable
; LPR output file
;at lpr lprout
;
;; CON Console
;set con debug=cmd;exp;detail
; useful options
; enable console
;;set con debug=cmd;exp
set con enable
; set console address
; set con0 enable
set con0 dev=7efc
; set con1 enable
set con1 dev=7efd
;set con debug=cmd;exp
;
; MTA Buffered tape processor
;set mta debug=cmd;exp;detail;data
; useful options
;;set mta debug=cmd;detail;exp
;set mta debug=cmd;exp
; enable MTA to change channel
set mta enable
; set mta channel
set mta0 dev=1000
;
; Attach in/out tape files
set mta0 locked
at mta0 tapes/mpx1xsdt.tap
;at mta0 nbctape.tap
;at mta0 usertape.tap
;at mta0 mpxsdt6r.tap
;at mta0 tapes/sel32sdt.tap
;at mta0 diag.tap
;at mta1 temptape.tap
;at mta2 output.tap
;
; DMA disk processor II/UDP
; enable DMA to change channel
set dma enable
; set disk chan to 0800
set dma0 dev=800
; set disk type to MPX MH300
set dma0 type=MH300
; set disk type to MPX MH080
;set dma0 type=MH080
; set disk type to UTX 9346
;set dma0 type=9346
;set dma0 type=8155
;set dma0 type=8887
;set dma0 type=8148
;
; Attach diskfile
at dma0 -i dsk/sel32disk
;
; Debug options
;set dma debug=cmd;exp;detail;data
; useful options
;set dma debug=cmd;exp
;set dma debug=exp
;
; SDA SCFI disk processor
;set sda debug=cmd;exp;data;detail
; Attach diskfiles
;at sda0 diskfile4
;at sda1 diskfile5
;
; DPA high speed disk processor
; enable HSDP to change channel
;set dpa enable
; set channel addr
;set dpa0 dev=800
; set disk type to UTX 8887
;set dpa0 type=8887
;
; Attach diskfiles
;at dpa0 utxdsk.dsk
;at dpa0 utx0hsdp
;at dpa1 utx1hsdp
;
;set dpa debug=cmd;detail;exp
; useful options
;set dpa debug=cmd;exp
;
; set console switches
deposit CSW 0
;
;UTX boot tape options
;set GPR 7 to 0x00 to boot in multi-user mode
;set GPR 7 to 0x01 to prompt for unix filename
;set GPR 7 to 0x02 to boot in single user mode
;set GPR 7 to 0x10 to disable swapping and paging
;set GPR 7 to 0x20 to boot from device specified in GPR6
;set GPR 7 to 0x40 to allow progress messages on boot
;deposit BOOTR[7] 40
;deposit BOOTR[7] 52
;deposit BOOTR[7] 42
;deposit BOOTR[7] 2
;deposit BOOTR[6] 800
;deposit BOOTR[0] ffffffff
; Set register content at boot for SEL diagnostics
; uncomment next line to get diag loader prompt
;deposit bootr[0] ffffffff
;deposit bootr[1] 0
;deposit bootr[2] 0
;
; allow cpu idle
set cpu idle
; wait for expected output from simulator, then enter this text
expect "COLD OR WARM START (C OR W)?" send "C\r"; continue
; Set expect script for auto time entry on MPX at OPCOM prompt
;expect "??" send " %DATE_MM%/%DATE_DD%/%DATE_YY%,%TIME_HH%:%TIME_MM%:%TIME_SS%\r@@A"; continue
expect "??" send " %DATE_MM%/%DATE_DD%/%DATE_YY%,%TIME_HH%:%TIME_MM%:%TIME_SS%\r@@Ax\r"; GO
expect "TSM>" send "A4 SLO=UT\r"; continue
expect "TSM>" send "A3 IN=M91000,TAP\r"; continue
expect "TSM>" send "PAGE 0\r"; continue
expect "TSM>" send "FILEMGR\r"; continue
; restore all files
expect "FIL>" send "RESTORE\r"; continue
expect "FIL>" send "EXIT\r"; continue
expect "TSM>" send "WHO\r"; continue
expect "TSM>" send "EXIT\r"; continue
expect "RING IN FOR SERVICE" send "\r^E"
; Boot from mag tape
bo mta0
detach all
quit

View File

@@ -0,0 +1,210 @@
;======================================================
; SEL32 System Engineering Labs 32 bit computer
; MPX - Ver 1.5F hardware configuration
; CPU - 32/27 2M Sel32 Concept/32
; IOP - 7e00 Model 8001 IOP Processor Controller
; DMA - 0800 2311/2314 Disk Processor II
; dma0 MH300 Model 8127 300MB MHD
; dma0 <-> dsk/sel32disk
; LPR - 7ef8/7ef9 Model 924X High Speed Line Printer
; COM - 7ec0 8512 8-line async communications
; CON - 7efc/7efd Console Terminal
; RTC - 7f06 60 HZ Real-Time clock
; ITM - 7f04 38.4MS Interval timer
; MT - 1000 8051 Buffered Tape Processor
; mta0 <-> (not assigned)
; EC - 0e00 Model 8516 Ethernet (not supported)
;======================================================
; Set hostname
set env HOST=sel32
; Set local IP address
; set env IP=192.168.1.5 (N/U)
;======================================================
; Set debug output
;set debug -n sel.log
;set debug stderr
;
; CPU type and memory
; Bad on UTX
set CPU 32/27 2M
;set CPU 32/27 4M
;set CPU 32/87 4M
;set CPU 32/67 4M
;End of Bad
;set CPU 32/97 4M
;set CPU V6 4M
;set CPU V6 8M
;set CPU V9 4M
;set CPU V9 8M
;
; CPU debug options
;set cpu debug=cmd;exp;inst;detail;trap;xio;irq
; Set instruction trace history size
;set cpu history=10000
; useful options
;set cpu debug=exp;xio;trap
;set cpu debug=cmd;exp;irq;trap;xio;
;set cpu debug=cmd;irq;trap;exp
;set cpu debug=irq;trap;exp;xio
;set cpu debug=irq;xio;exp;inst;cmd;trap
;set cpu debug=irq;xio;exp;cmd;trap
;
; RTC realtime clock
; address is 7f06
;set RTC 50
set RTC 60
set RTC enable
; RTC debug options
;set RTC debug=cmd
;
; ITM interval timer
; address is 7f04
set ITM 3840
;set ITM debug=cmd
;
; IOP at channel 7e00
set iop enable
; set iop channel
set iop0 dev=7e00
;set iop debug=cmd;exp
;set iop debug=cmd
;
; COM 8-Line
set coml enable
set coml0 dev=7ec0
;set coml debug=cmd;
set coml0 enable
set coml1 enable
set coml2 enable
set coml3 enable
set coml4 enable
set coml5 enable
set coml6 enable
set coml7 enable
;
; Enable telnet sessions on port 4747
set comc enable
;set comc debug=cmd;
at comc 4747
;
; LPR
;set lpr debug=cmd;detail
set lpr enable
; LPR output file
;at lpr lprout
;
;; CON Console
;set con debug=cmd;exp;detail
; useful options
; enable console
;;set con debug=cmd;exp
set con enable
; set console address
; set con0 enable
set con0 dev=7efc
;set con debug=cmd;exp
;
; MTA Buffered tape processor
;set mta debug=cmd;exp;detail;data
; useful options
;;set mta debug=cmd;detail;exp
;set mta debug=cmd;exp
; enable MTA to change channel
set mta enable
; set mta channel
set mta0 dev=1000
;
; Attach in/out tape files
;at mta0 tapes/mpx1xsdt.tap
;at mta0 nbctape.tap
;set mta0 locked
;at mta0 usertape.tap
;at mta0 mpxsave6.tap
;at mta0 tapes/sel32sdt.tap
;at mta0 diag.tap
;at mta1 temptape.tap
;at mta2 output.tap
;
; DMA disk processor II/UDP
; enable DMA to change channel
set dma enable
; set disk chan to 0800
set dma0 dev=800
; set disk type to MPX MH300
set dma0 type=MH300
; set disk type to MPX MH080
;set dma0 type=MH080
; set disk type to UTX 9346
;set dma0 type=9346
;set dma0 type=8155
;set dma0 type=8887
;set dma0 type=8148
;
; Attach diskfile
;at dma0 diskfile6r
at dma0 dsk/sel32disk
;at dma0 diagdisk
;
; Debug options
;set dma debug=cmd;exp;detail;data
; useful options
;set dma debug=cmd;exp
;set dma debug=exp
;
; SDA SCFI disk processor
;set sda debug=cmd;exp;data;detail
; Attach diskfiles
;at sda0 diskfile4
;at sda1 diskfile5
;
; DPA high speed disk processor
; enable HSDP to change channel
;set dpa enable
; set channel addr
;set dpa0 dev=800
; set disk type to UTX 8887
;set dpa0 type=8887
;
; Attach diskfiles
;at dpa0 utxdsk.dsk
;at dpa0 utx0hsdp
;at dpa1 utx1hsdp
;
;set dpa debug=cmd;detail;exp
; useful options
;set dpa debug=cmd;exp
;
; set console switches
deposit CSW 0
;
;UTX boot tape options
;set GPR 7 to 0x00 to boot in multi-user mode
;set GPR 7 to 0x01 to prompt for unix filename
;set GPR 7 to 0x02 to boot in single user mode
;set GPR 7 to 0x10 to disable swapping and paging
;set GPR 7 to 0x20 to boot from device specified in GPR6
;set GPR 7 to 0x40 to allow progress messages on boot
;deposit BOOTR[7] 40
;deposit BOOTR[7] 52
;deposit BOOTR[7] 42
;deposit BOOTR[7] 2
;deposit BOOTR[6] 800
;deposit BOOTR[0] ffffffff
; Set register content at boot for SEL diagnostics
; uncomment next line to get diag loader prompt
;deposit bootr[0] ffffffff
;deposit bootr[1] 0
;deposit bootr[2] 0
;
; allow cpu idle
set cpu idle
; Set expect script for auto time entry on MPX at OPCOM prompt
;expect haltafter=20000
; wait for expected output from simulator, then enter this text
expect "??" send " %DATE_MM%/%DATE_DD%/%DATE_YY%,%TIME_HH%:%TIME_MM%:%TIME_SS%\r@@Ax\r"; GO
expect "TSM>" send "WHO\r"; continue
; Boot from disk
;bo dpa0
bo dma0

View File

@@ -0,0 +1,326 @@
;======================================================
; SEL32 System Engineering Labs 32 bit computer
; MPX - Ver 3.6 extended hardware configuration
; CPU - 32/67 16M Sel32 Concept/32
; IOP - 7e00 Model 8001 IOP Processor Controller
; MFP - 7600 Model 8002 Multi Function Processor
; SBA - 7e00/7e08 MFP SCSI Disk controller
; sba0 SD700 Model 8833 700MB
; sba0 <-> dsk/scsi35m1disk0
; sba1 SD700 Model 8833 700MB
; sba1 <-> dsk/scsi35m2disk0
; DMA - 0800 DMA HSDP Disk Controller
; dma0 MD300 Model 8127 300MB MHD
; dma0 <-> dsk/user36p2udp0
; - 0802 DMA HSDP Disk Controller
; dma1 MH600 Model 8155 600MB MHD
; dma1 <-> dsk/user36s1udp1
; - 0804 DMA HSDP Disk Controller
; dma1 MH600 Model 8155 600MB MHD
; dma1 <-> dsk/user36s1udp2
; LPR - 7ef8/7ef9 Model 924X High Speed Line Printer
; COM - 7ec0 8512 8-line async communications
; CON - 7efc/7efd Console Terminal
; RTC - 7f06 60 HZ Real-Time clock
; ITM - 7f04 38.4MS Interval timer
; MT - 1000 8051 Buffered Tape Processor
; mta0 <- tapes/nbctape3x.tap
; EC - 0e00 Model 8516 Ethernet (not supported)
;======================================================
; Set HOST simulator
set env HOST=sel32
; Set local IP address
; set env IP=192.168.1.5 (N/U)
;======================================================
; Set debug output
;set debug -n sel.log
;set debug stderr
;
; CPU type and memory
; Bad on UTX
;set CPU 32/27 2M
;set CPU 32/27 4M
;set CPU 32/87 4M
;set CPU 32/87 8M
;End of Bad
;set CPU 32/67 4M
;set CPU 32/67 8M
;set CPU 32/67 12M
set CPU 32/67 16M
;set CPU 32/97 4M
;set CPU 32/97 8M
;set CPU V6 4M
;set CPU V6 8M
;set CPU V9 4M
;set CPU V9 8M
;
; CPU debug options
;set cpu debug=cmd;exp;inst;detail;trap;xio;irq
; Set instruction trace history size
;set cpu history=10000
; useful options
;set cpu debug=exp
;set cpu debug=cmd;exp;irq;trap;xio;inst
;;;;set cpu debug=cmd;exp;irq;trap;xio
;set cpu debug=cmd;irq;trap;exp
;set cpu debug=cmd;exp;xio
;;;set cpu debug=cmd;irq;trap;exp;xio
;
; RTC realtime clock
; address is 7f06
;set RTC 50
set RTC 60
; enable RTC
set RTC enable
; RTC debug options
;set RTC debug=cmd
;
; ITM interval timer
; address is 7f04
set ITM 3840
;set ITM debug=cmd
;
; IOP at channel 7e00
; useful options
;;;;set iop debug=cmd;exp
;;set iop debug=cmd
; make iop online
set iop enable
; set iop channel address
set iop0 dev=7e00
;
; MFP at channel 7e00
; useful options
;;;;set mfp debug=cmd;exp
; make mfp online
set mfp enable
; set mfp channel address
;set mfp0 dev=7e00
set mfp0 dev=7600
;
; COM 8-Line on 7ec0
; useful options
;;set com debug=cmd;
set coml enable
set coml0 dev=7ec0
set coml0 enable
set coml1 enable
set coml2 enable
set coml3 enable
set coml4 enable
set coml5 enable
set coml6 enable
set coml7 enable
;
; Enable telnet sessions on port 4747
set comc enable
at comc 4747
;
; LPR
; LPR0 is at 7EF8
; LPR1 is at 7EF9
; useful options
;;set lpr debug=cmd;detail
;set lpr debug=cmd
set lpr enable
; LPR output file
at lpr lprout
;
; CON Console
; useful options
;set con debug=cmd;exp;detail
; enable console
set con enable
; set console address
set con0 dev=7efc
;;;;set con debug=cmd;exp
;
; MTA Buffered tape processor
;set mta debug=cmd;exp;xio;data
; useful options
;set mta debug=cmd;exp;xio;data
;;set mta debug=cmd;exp;xio
;
; enable MTA to change channel
set mta enable
; set mt channel
set mta0 dev=1000
; Attach in/out tape files
;at mta0 user36sdts2.tap
;at mta0 user36sdts1.tap
set mta0 locked
at mta0 tapes/nbctape3x.tap
;at mta0 test.tap
;at mta1 output.tap
;at mta0 iscsys_dsk.tap
;
; EC at channel 0d00
; useful options
;set ec debug=cmd;exp
; set mode
;;set mode=1
; make ec online
;;set ec enable
; set ec channel address
;;set ec0 dev=0d00
; set mac address to cause ec to be attached
;set ec MAC=00:00:02:00:00:00
;;at ec tap:tap0
;
; DMA disk processor II/UDP
; enable DMA to change channel
set dma enable
; set disk chan to 0800
set dma0 dev=800
; set disk type to MPX MH300 8127
set dma0 type=MH300
; set disk type to MPX MH600 8155
;set dma0 type=MH600
; set disk chan to 0802
set dma1 dev=802
; set disk type to MPX MH300 8127
;set dma1 type=MH300
; set disk type to MPX MH600 8155
set dma1 type=MH600
; set disk chan to 0804
set dma2 dev=804
; set disk type to MPX MH300 8127
;set dma2 type=MH300
; set disk type to MPX MH600 8155
set dma2 type=MH600
;
; Attach diskfile
;at dma0 -i user36s1udp0
at dma0 dsk/user36p2udp0
;at dma1 -i user36s1udp1
at dma1 dsk/user36s1udp1
;at dma2 -i user36s1udp2
;at dma2 dsk/user36s1udp2
;;at dma0 mpx0disk
;;at dma1 mpx1disk
;
;set dma debug=cmd;exp;detail;data
; useful options
;;set dma debug=cmd;exp
;set dma debug=exp;cmd;detail
;
; SDA SCFI disk processor
;set sda debug=cmd;exp;data;detail
;set sda debug=cmd;exp
; Attach diskfiles
;at sda0 diskfile4
;at sda1 diskfile5
;
; SBA MFP SCSI buss 1 disk processor
set sba enable
; set disk chan to 7600
set sba0 dev=7600
; set disk type to MPX MH300
;set sba0 type=SD300
;set sba0 type=SD150
;;set sba0 type=SD700
set sba0 type=SD700
set sba1 type=SD700
;;;;set sba debug=cmd;exp;data;detail
;;;;set sba debug=cmd;exp;xio;exp;data
; Attach diskfiles
;;at sba0 -i scsi36m1disk0
at sba0 dsk/scsi35m1disk0
;at sba1 scsi1disk
at sba1 dsk/scsi35m2disk0
;
; SBB SCSI buss 2 disk processor
;set sbb enable
; set disk chan to 7640
;set sbb0 dev=7640
; set disk type to MPX MH300
;;;;set sbb0 type=SD150
;set sbb0 type=SD150
;set sbb0 type=SD700
;set sbb0 type=SD300
;set sbb debug=cmd;exp;data;xio;detail
;set sbb debug=cmd;exp
; Attach diskfiles
;at sbb0 scsi35m2disk0
;at sbb1 scsi1disk
;
; DPA high speed disk processor
; enable HSDP to change channel
;set dpa enable
; set channel addr
;set dpa0 dev=800
; set disk type to UTX 8887
;set dpa0 type=8887
;
; Attach diskfiles
;at dpa0 mpx0hsdp
;at dpa1 mpx1hsdp
;
; useful options
;set dpa debug=cmd;exp
;
; set console switches
deposit CSW 0
;
; Set register content at boot for SEL diagnostics
; uncomment next line to get diag loader prompt
;deposit bootr[0] ffffffff
;deposit bootr[1] 0
;deposit bootr[2] 0
;
; set Boot reg 0 1 to boot MSTRALL from master SDT
deposit bootr[0] 1
; set Boot reg 0 2 to boot MSTREXT from master SDT
;deposit bootr[0] 2
;
; allow cpu idle
set cpu idle
; Set expect script for auto time entry on MPX at OPCOM prompt
;expect haltafter=20000
;
; wait for expected output from simulator, then enter this text
;expect " >>" send "BR 31D10\r"; continue
;expect " >>" send "BR 2b4q\r"; continue
;expect " >>" send "BR 430q\r"; continue
expect " >>" send "TE\r"; continue
;expect "ENTER SYSTEM DEVICE CHANNEL AND SUBADDRESS: " send "7600\r"; continue
;expect "ENTER SYSTEM DEVICE CHANNEL AND SUBADDRESS: " send "0800\r"; continue
;expect "PLEASE ENTER THE 4 CHAR. DEVICE....." send "0800\r"; continue
;expect "PLEASE ENTER THE 4 CHAR. DEVICE....." send "7600\r"; continue
;expect "ENTER DISC CONTROLLER TYPE:" send "X\r"; continue
;expect " (OR <CR> IF SYSTEM VOLUME):" send "\r"; continue
;expect "ENTER DISC CONTROLLER TYPE:" send "M\r"; continue
expect "ENTER DATE" send " %DATE_MM%/%DATE_DD%/%DATE_YY%,%TIME_HH%:%TIME_MM%:%TIME_SS%\r"; GO
expect "ENTER SWAP DEVICE CHANNEL AND SUBADDRESS" send "0800\r"; continue
expect "TASK J.INIT , 04000002 REPLY R, H, A, OR DEVICE:" send "R\r"; continue
expect "TASK J.INIT , 04000002 REPLY R, H, A, OR DEVICE:" send "R\r"; continue
expect "TASK J.INIT , 04000002 REPLY R, H, A, OR DEVICE:" send "R\r"; continue
expect "TASK J.INIT , 04000002 REPLY R, H, A, OR DEVICE:" send "R\r"; continue
;expect "MOUNT DISK VOLUME ISCSYS ON DRIVE DM0802 ---" send "R\r"; continue
;expect "MOUNT DISK VOLUME NBCSRC ON DRIVE DM0804 ---" send "R\r"; continue
;expect "MOUNT DISK VOLUME ISCSRC ON DRIVE DM7600 ---" send "R\r"; continue
;expect "MOUNT DISK VOLUME IRELAND ON DRIVE DM7608 ---" send "R\r"; continue
;
;expect "ENTER SYSTEM VOLUME CHANNEL AND SUBADDRESS: " send "7600\r"; continue
;expect "ENTER SYSTEM VOLUME CHANNEL AND SUBADDRESS: " send "0800\r"; continue
;expect "SYSTEM READY... PRESS ATTENTION FOR TSM..."
expect "SYSTEM READY... PRESS ATTENTION FOR TSM..." send "@@A"; continue
expect "ENTER YOUR OWNERNAME:" send "SYSTEM\r"; continue
expect "TSM>" send "WHO\r"; continue
expect "TSM>" send "SYSINFO\r"; continue
expect "TSM>" send "MOUNT WORK ON DM0802 OPTI=PUBLIC\r"; continue
;expect "MOUNT DISK VOLUME WORK ON DRIVE DM0802 ---" send "R\r"; continue
expect "TASK J.TSM" send "R\r"; continue
expect "TSM>" send "!STAT VOL\r"; continue
;;;expect "TSM>" send "EXIT\r"; continue
#expect "TSM>" send "J.VFMT\r"; continue
#expect "FMT>" send "INITIALIZE DEV=DM0804 DIS=MH0600 DES=Y CON=N\r"; continue
#expect "FMT>" send "FORMAT DEV=DM0804 VOL=NBCSRC MAXRE=9000 CON=N\r"; continue
#expect "TSM>" send "VOLMGR\r"; continue
#expect "VOL>" send "CREATE D @NBCSRC^SYSTEM ENTRIES=1000\r"; continue
#expect "VOL>" send "EXIT\r"; continue
;
; Boot from disk
bo dma0
;bo sba0

View File

@@ -0,0 +1,364 @@
;======================================================
; SEL32 System Engineering Labs 32 bit computer
; MPX - Ver 3.6 extended hardware configuration
; CPU - 32/67 16M Sel32 Concept/32
; IOP - 7e00 Model 8001 IOP Processor Controller
; MFP - 7600 Model 8002 Multi Function Processor
; SBA - 7e00/7e08 MFP SCSI Disk controller
; sba0 SD700 Model 8833 700MB
; sba0 <-> dsk/scsi35m1disk0
; sba1 SD700 Model 8833 700MB
; sba1 <-> dsk/scsi35m2disk0
; DMA - 0800 DMA HSDP Disk Controller
; dma0 MD300 Model 8127 300MB MHD
; dma0 <-> dsk/user36p2udp0
; - 0802 DMA HSDP Disk Controller
; dma1 MH600 Model 8155 600MB MHD
; dma1 <-> dsk/user36s1udp1
; - 0804 DMA HSDP Disk Controller
; dma2 MH600 Model 8155 600MB MHD (N/U)
; dma2 <-> dsk/user36s1udp2 (N/U)
; LPR - 7ef8/7ef9 Model 924X High Speed Line Printer
; COM - 7ec0 8512 8-line async communications
; CON - 7efc/7efd Console Terminal
; RTC - 7f06 60 HZ Real-Time clock
; ITM - 7f04 38.4MS Interval timer
; MT - 1000 8051 Buffered Tape Processor
; mta0 <- tapes/user36esdtp2.tap
; EC - 0e00 Model 8516 Ethernet (not supported)
;======================================================
; Set HOST simulator
set env HOST=sel32
; Set local IP address
; set env IP=192.168.1.5 (N/U)
;======================================================
; Set directory for disk images
mkdir dsk
mkdir tapes
; Set tape image filename
set env FILE=user36esdtp2.tap
; Set github.com URL for downloading files
set env GITURL=https://github.com/AZBevier/SEL32-installs/raw/master/tapes/
if exist "tapes/%FILE%" goto exists
if not exist "tapes/%FILE%" echof "file %FILE% missing, trying %FILE%.tgz"
cd tapes
if exist "%FILE%.tgz" goto nocurl
echof "fetching %FILE%.tgz file from github.com\n"
curl -LJO %GITURL%/%FILE%.tgz
if not exist "%FILE%.tgz" echof "FAILED - file %FILE% not available"; exit 1
:nocurl
echof "untar %FILE%.tgz file\n"
tar -xzf %FILE%.tgz
cd ..
:exists
echof "file %FILE% present, doing install"
;
; Set NBC tape image filename
set env FILE2=nbctape3x.tap
if exist "tapes/%FILE2%" goto exists2
if not exist "tapes/%FILE2%" echof "file %FILE2% missing, trying %FILE2%.tgz"
cd tapes
if exist "%FILE2%.tgz" goto nocurl2
echof "fetching %FILE2%.tgz file from github.com\n"
curl -LJO %GITURL%/%FILE2%.tgz
if not exist "%FILE2%.tgz" echof "FAILED - file %FILE2% not available"; exit 1
:nocurl2
echof "untar %FILE2%.tgz file\n"
tar -xzf %FILE2%.tgz
cd ..
:exists2
echof "file %FILE2% present, doing install"
;
; Set debug output
;set debug -n sel.log
;set debug stderr
;
; CPU type and memory
;set CPU 32/27 2M
;set CPU 32/27 4M
;set CPU 32/87 4M
;set CPU 32/87 8M
;set CPU 32/67 4M
set CPU 32/67 8M
;set CPU 32/67 16M
;set CPU 32/97 4M
;set CPU 32/97 8M
;
; CPU debug options
;set cpu debug=cmd;exp;inst;detail;trap;xio;irq
; Set instruction trace history size
;set cpu history=10000
; useful options
;set cpu debug=exp
;set cpu debug=cmd;exp;irq;trap;xio;inst
;;;;set cpu debug=cmd;exp;irq;trap;xio
;set cpu debug=cmd;irq;trap;exp
;set cpu debug=cmd;exp;xio
;set cpu debug=irq;trap;exp;xio
;
; RTC realtime clock
; address is 7f06
;set RTC 50
set RTC 60
; enable RTC
set RTC enable
; RTC debug options
;set RTC debug=cmd
;
; ITM interval timer
; address is 7f04
set ITM 3840
;set ITM debug=cmd
;
; IOP at channel 7e00
; useful options
;;;;set iop debug=cmd;exp
;;set iop debug=cmd
; make iop online
set iop enable
; set iop channel address
set iop0 dev=7e00
;
; MFP at channel 7e00
; useful options
;;;;set mfp debug=cmd;exp
; make mfp online
set mfp enable
; set mfp channel address
;set mfp0 dev=7e00
set mfp0 dev=7600
;
; COM 8-Line on 7ec0
; useful options
;;set com debug=cmd;
set coml enable
set coml0 dev=7ec0
set coml0 enable
set coml1 enable
set coml2 enable
set coml3 enable
set coml4 enable
set coml5 enable
set coml6 enable
set coml7 enable
;
; Enable telnet sessions on port 4747
;set comc enable
;at comc 4747
;
; LPR
; LPR0 is at 7EF8
; LPR1 is at 7EF9
; useful options
;set lpr debug=cmd;detail
;;;;set lpr debug=cmd
set lpr enable
; LPR output file
;at lpr lprout
;
; CON Console
; useful options
;set con debug=cmd;exp;detail
; enable console
set con enable
; set console address
set con0 dev=7efc
;;;;set con debug=cmd;exp
;
; MTA Buffered tape processor
;set mta debug=cmd;exp;xio;data
; useful options
;set mta debug=cmd;exp;xio;data
;set mta debug=cmd;exp;xio
;
; enable MTA to change channel
set mta enable
; set mt channel
set mta0 dev=1000
; Attach in/out tape files
set mta0 locked
at mta0 tapes/user36esdtp2.tap
;at mta0 user36sdts1.tap
;at mta1 temptape.tap
;at mta2 output.tap
;
; DMA disk processor II/UDP
; enable DMA to change channel
set dma enable
; set disk chan to 0800
set dma0 dev=800
; set disk type to MPX MH300 8127
set dma0 type=MH300
; set disk type to MPX MH600 8155
;set dma0 type=MH600
; set disk chan to 0802
set dma1 dev=802
; set disk type to MPX MH300 8127
;set dma1 type=MH300
; set disk type to MPX MH600 8155
set dma1 type=MH600
;
; Attach diskfile
;at dma0 udp35disk0
at dma0 -i dsk/user36p2udp0
;at dma1 udp35disk1
; use s1 disk 2
at dma1 -i dsk/user36s1udp1
;;at dma0 mpx0disk
;;at dma1 mpx1disk
;at dma2 -i dsk/user36s1udp2
;
;set dma debug=cmd;exp;detail;data
; useful options
;;set dma debug=cmd;exp
;set dma debug=exp;cmd;detail
;
; SDA SCFI disk processor
;set sda debug=cmd;exp;data;detail
;set sda debug=cmd;exp
; Attach diskfiles
;at sda0 diskfile4
;at sda1 diskfile5
;
; SBA MFP SCSI buss 1 disk processor
set sba enable
; set disk chan to 7600
set sba0 dev=7600
; set disk type to MPX MH300
;set sba0 type=SD300
;set sba0 type=SD150
set sba0 type=SD700
set sba1 type=SD700
;;;;set sba debug=cmd;exp;data;detail
;;;;set sba debug=cmd;exp;xio;exp;data
; Attach diskfiles
;at sba0 scsia0disk
at sba0 -i dsk/scsi35m1disk0
;at sba1 scsi1disk
at sba1 -i dsk/scsi35m2disk0
;
; SBB SCSI buss 2 disk processor
;set sbb enable
; set disk chan to 7640
;set sbb0 dev=7640
; set disk type to MPX MH300
;;;;set sbb0 type=SD150
;set sbb0 type=SD150
;set sbb0 type=SD700
;set sbb0 type=SD300
;set sbb debug=cmd;exp;data;xio;detail
;set sbb debug=cmd;exp
; Attach diskfiles
;at sbb0 -i scsi35m2disk0
;at sbb1 scsi1disk
;
; DPA high speed disk processor
; enable HSDP to change channel
;set dpa enable
; set channel addr
;set dpa0 dev=800
; set disk type to UTX 8887
;set dpa0 type=8887
;
; Attach diskfiles
;at dpa0 utxdsk.dsk
;at dpa0 utx0hsdp
;at dpa1 utx1hsdp
;
; useful options
;set dpa debug=cmd;exp
;
; set console switches
deposit CSW 0
;
;UTX boot tape options
;set GPR 7 to 0x00 to boot in multi-user mode
;set GPR 7 to 0x01 to prompt for unix filename
;set GPR 7 to 0x02 to boot in single user mode
;set GPR 7 to 0x10 to disable swapping and paging
;set GPR 7 to 0x20 to boot from device specified in GPR6
;set GPR 7 to 0x40 to allow progress messages on boot
;deposit BOOTR[7] 40
;deposit BOOTR[7] 52
deposit BOOTR[7] 42
;deposit BOOTR[7] 2
;deposit BOOTR[6] 800
;deposit BOOTR[0] ffffffff
; Set register content at boot for SEL diagnostics
; uncomment next line to get diag loader prompt
;deposit bootr[0] ffffffff
;deposit bootr[1] 0
;deposit bootr[2] 0
; set Boot reg 0 1 to boot MSTRALL from master SDT
deposit bootr[0] 1
; set Boot reg 0 2 to boot MSTREXT from master SDT
;deposit bootr[0] 2
;
; allow cpu idle
set cpu idle
; Set expect script for auto time entry on MPX at OPCOM prompt
;expect haltafter=20000
;
; wait for expected output from simulator, then enter this text
;expect " >>" send "BR 31D10\r"; continue
;expect " >>" send "BR 2b4q\r"; continue
;expect " >>" send "BR 430q\r"; continue
expect " >>" send "TE\r"; continue
;expect "ENTER SYSTEM VOLUME CHANNEL AND SUBADDRESS: " send "7600\r"; continue
expect "ENTER SYSTEM DEVICE CHANNEL AND SUBADDRESS: " send "0800\r"; continue
;;expect "BOOT FROM A SCSI TAPE? (REPLY Y OR N): " send "N\r"; continue
;;expect "PLEASE ENTER THE 4 CHAR. DEVICE....." send "0800\r"; continue
;expect "PLEASE ENTER THE 4 CHAR. DEVICE....." send "7600\r"; continue
;;expect "ENTER DISC CONTROLLER TYPE:" send "X\r"; continue
;expect "ENTER DISC CONTROLLER TYPE:" send "M\r"; continue
expect "ENTER DATE" send " %DATE_MM%/%DATE_DD%/%DATE_YY%,%TIME_HH%:%TIME_MM%:%TIME_SS%\r"; GO
;
expect "FMT>" send "INITIALIZE DEV=DM0800 DIS=MH0300 DES=Y CON=N\r"; continue
;expect "FMT>" send "INITIALIZE DEV=DM7600 DIS=SD0700 DES=Y CON=N\r"; continue
;expect "FMT>" send "INITIALIZE DEV=DM7600 DIS=SD0300 DES=Y CON=N\r"; continue
expect "FMT>" send "FORMAT DEV=DM0800 VOL=SYSTEM MAXRE=8000 DES=Y CON=N\r"; continue;
;expect "FMT>" send "FORMAT DEV=DM7600 VOL=SYSTEM MAXRE=8000 CON=N\r"; continue
;expect "FMT>" send "INI DEV=DM7600 DIS=SD0150 DES=Y CON=N\r"; continue
;expect "FMT>" send "FOR DEV=DM7600 DIS=SD0700 VOL=SYSTEM MAXRE=8000 DES=Y CON=N\r"; continue
;expect "FMT>" send "INITIALIZE DEVICE=DM7600 DEST=Y DISC=SD0700 CONFIRM=N\r"; continue
;expect "FMT>" send "INITIALIZE DISC=SD0700 DEST=Y CONFIRM=N\r"; continue
;expect "FMT>" send "INITIALIZE DEST=Y CONFIRM=N\r"; continue
;;expect "FMT>" send "EXIT\r"; continue
expect "VOL>" send "CREATE D SYSTEM ENTRIES=2000\r"; continue
; restore system
expect "VOL>" send "RESTORE VOL=SYSTEM\r"; continue
; restore object, object_e, oldobj
;;expect "VOL>" send "RESTORE VOL=SYSTEM\r"; continue
; restore bin, doc, nblib, sample
;;expect "VOL>" send "RESTORE VOL=SYSTEM\r"; continue
expect "VOL>" send "REWIND\r"; continue
expect "VOL>" send "EXIT\r"; continue
;expect "SYSTEM READY... PRESS ATTENTION FOR TSM..."
expect "SYSTEM READY... PRESS ATTENTION FOR TSM..." send "@@A"; continue
expect "ENTER YOUR OWNERNAME:" send "SYSTEM\r"; continue
expect "TSM>" send "WHO\r"; continue
expect "TSM>" send "J.VFMT\r"; continue
expect "FMT>" send "INITIALIZE DEV=DM0802 DIS=MH0600 DES=Y CON=N\r"; continue
expect "CONTINUE - Y/N" send "Y\r"; continue
expect "TASK J.VFMT" send "R\r"; continue
expect "FMT>" send "FORMAT DEV=DM0802 VOL=WORK MAXRE=10000 DES=Y CON=N\r"; continue
expect "TSM>" send "MOUNT WORK ON DM0802 OPTI=PUBLIC\r"; continue
expect "TASK J.TSM" send "R\r"; continue
expect "TSM>" send "VOLMGR\r"; continue
expect "VOL>" send "CREATE D @WORK^SYSTEM ENTRIES=2000\r"; continue
expect "VOL>" send "EXIT\r"; continue
expect "TSM>" send "!STAT VOL\r"; continue
expect "TSM>" send "SYSINFO\r"; continue
;;expect "TSM>" send "WHO\r"; continue
expect "TSM>" send "SHUTDOWN 0\r"; continue
;;;expect "TSM>" send "EXIT\r"; continue
expect "sim>" send "q\r"; continue
;
; Boot from disk
;bo dma0
;
; Boot from mag tape
bo mta0
quit

View File

@@ -1,3 +1,4 @@
cd %~p0
;======================================================
; SEL32 System Engineering Labs 32 bit computer
; MPX/UTX CPU diagnostic hardware configuration
@@ -20,6 +21,15 @@ set env HOST=sel32
; Set local IP address
; set env IP=192.168.1.5 (N/U)
;======================================================
;
; Set run limit of 2 minutes
set runlimit 2 minutes
set on
on error ignore
on runtime echof "\r\n*** FAILED - SEL32 Test Runtime Limit %SIM_RUNLIMIT% %SIM_RUNLIMIT_UNITS% Exceeded ***\n"; exit 1
;
if not exist "diag.tap" echo "\n*** FAILURE diag.tap file missing ***\n"; exit 1
;
; Set debug output
;set debug -n sel.log
;set debug stderr
@@ -118,12 +128,8 @@ set mta enable
set mta0 dev=1000
; Attach in/out tape files
;at mta0 mpxsdt.tap
;at mta0 nbctape.tap
;at mta0 utx21a1.tap
;at mta0 sim32sdt.tap
at mta0 diag.tap
set mta0 locked
at mta0 diag.tap
;at mta1 temptape.tap
;at mta2 output.tap
;
@@ -208,10 +214,13 @@ set cpu idle
;bo dma0
;
; Go to simh on completion of script
expect "DOL>"
expect "DOL>" echof "\r\n*** PASSED - SEL32 Autobatch Diagnostic Successfully Completed\n"; exit 0
; Boot from mag tape
bo mta0
det all
;det all
;rm temptape.tap
;rm output.tap
quit
expect "[][]" echof "\r\n*** FAILED - SEL32 Autobatch Diagnostic Failed to Complete\n"; exit 1
echof "\r\n*** FAILED - SEL32 Autobatch Diagnostic Failed to Complete\n"
exit 1
;quit

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

View File

@@ -1,12 +1,12 @@
cd %~p0
;======================================================
; SEL32 System Engineering Labs 32 bit computer
; MPX/UTX CPU Diagnostic hardware configuration
; MPX/UTX CPU diagnostic hardware configuration
; CPU - 32/67 4M Sel32 Concept/32
; IOP - 7e00 Model 8001 IOP Processor Controller
; DMA - 0800 2311/2314 Disk Processor II
; dma0 (N/U)
; dma0 (Not Assigned)
; DMA - 0800 2311/2314 Disk Processor II (N/U)
; dma0 - N/U
; dma0 <-> detached
; LPR - 7ef8/7ef9 Model 924X High Speed Line Printer
; COM - 7ec0 8512 8-line async communications (N/U)
; CON - 7efc/7efd Console Terminal
@@ -21,17 +21,24 @@ set env HOST=sel32
; Set local IP address
; set env IP=192.168.1.5 (N/U)
;======================================================
;
; Set run limit of 2 minutes
set runlimit 2 minutes
set on
on error ignore
on runtime echof "\r\n*** FAILED - SEL32 Test Runtime Limit %SIM_RUNLIMIT% %SIM_RUNLIMIT_UNITS% Exceeded ***\n"; exit 1
;
if not exist "diag.tap" echo "\n*** FAILURE diag.tap file missing ***\n"; exit 1
;
; Set debug output
;set debug -n sel.log
;set debug stderr
;
; CPU type and memory
; Bad on UTX
;set CPU 32/27 2M
;set CPU 32/27 4M
;set CPU 32/87 4M
set CPU 32/67 4M
;End of Bad
;set CPU 32/97 4M
;set CPU V6 4M
;set CPU V6 8M
@@ -80,22 +87,22 @@ set iop0 dev=7e00
;
; COM 8-Line
;set com debug=cmd;
set coml0 enable
set coml1 enable
set coml2 enable
set coml3 enable
set coml4 enable
set coml5 enable
set coml6 enable
set coml7 enable
;set coml0 enable
;set coml1 enable
;set coml2 enable
;set coml3 enable
;set coml4 enable
;set coml5 enable
;set coml6 enable
;set coml7 enable
;
; Enable telnet sessions on port 4747
set comc enable
at comc 4747
;set comc enable
;at comc 4747
;
; LPR
;set lpr debug=cmd;detail
set lpr enable
;set lpr enable
; LPR output file
;at lpr lprout
;
@@ -121,12 +128,8 @@ set mta enable
set mta0 dev=1000
; Attach in/out tape files
;at mta0 mpxsdt.tap
;at mta0 nbctape.tap
;at mta0 utx21a1.tap
;at mta0 sim32sdt.tap
at mta0 diag.tap
set mta0 locked
at mta0 diag.tap
;at mta1 temptape.tap
;at mta2 output.tap
;
@@ -211,10 +214,13 @@ set cpu idle
;bo dma0
;
; Go to simh on completion of script
expect "DOL>"
expect "DOL>" echof "\r\n*** PASSED - SEL32 Autobatch Diagnostic Successfully Completed\n"; exit 0
; Boot from mag tape
bo mta0
det all
rm temptape.tap
rm output.tap
quit
;det all
;rm temptape.tap
;rm output.tap
expect "[][]" echof "\r\n*** FAILED - SEL32 Autobatch Diagnostic Failed to Complete\n"; exit 1
echof "\r\n*** FAILED - SEL32 Autobatch Diagnostic Failed to Complete\n"
exit 1
;quit

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.