github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-01-20 17:58:40 +00:00
Code Issues Releases Wiki Activity

Build DB ITS. Add CONFIG and TTYTYP definitions for it.

Browse Source
This commit is contained in:
Lars Brinkhoff 2016-11-21 08:59:45 +01:00
parent d0e026957f
commit 75028bfc61
3 changed files with 81 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
build/build.tcl
View File

@ -141,7 +141,8 @@ respond "*" ":pdump sys;atsign ddt\r"
respond "*" ":kill\r"
respond "*" ":midas .;_system;its\r"
respond "MACHINE NAME =" "AI\r"
respond "MACHINE NAME =" "DB\r"
respond "Configuration?" "RP06\r"
expect ":KILL"
respond "*" ":midas .;@ ddt_system;ddt\r"

66
src/system/config.202
View File

@ -916,6 +916,72 @@ TERMIN
TERMIN
] ;DU
IFE MCOND DB,[ ;DistriBution world
DEFOPT KS10P==1 ;DB is a KS10
IF1,[
PRINTX /Configuration? (RP06, RP07, RM03 or RM80) /
.TTYMAC CNFG
DBRP06==0 ? DBRP07==0 ? DBRM03==0 ? DBRM80==0
DB!CNFG==1
IFE DBRP06\DBRP07\DBRM03\DBRM80, .ERR "CNFG" unknown.
TERMIN
]
DEFOPT MAXJ==60. ;Max number of jobs allowed
DEFOPT NQCHN==30. ;Max number of user disk channels open in system
DEFOPT SCHBLN==10. ;Number of runnable jobs to remember
DEFOPT SWBLK==1 ;1= 1=> swap blocking, 0=> privileged user
DEFOPT SWPWSP==0 ;1= Use working-set swap scheduler
DEFOPT PAGPRE==1 ;1= Use page-in preemption
DEFOPT DMDSK==1 ;1= Use DM DSK format
DEFOPT QRSRVP==1 ;1= Has reserved disk packs (Secondary pack)
DEFOPT QAUTHP==1 ;1= Keep track of file authors
DEFOPT NQS==1 ;# of disk drive units
IFN DBRP06, DEFOPT NTUTBL==4 ;# 1K blocks in a TUT (better agree with
IFN DBRP07, DEFOPT NTUTBL==9 ; RP06 DEFS, RP07 DEFS,
IFN DBRM03, DEFOPT NTUTBL==2 ; RM03 DEFS or RM80 DEFS)
IFN DBRM80, DEFOPT NTUTBL==3
DEFSYM NUDSL==500. ;# directories in file system (better agree with
; SALV and DSKDMP)
DEFOPT RH11P==1 ; Has RH11 controller
IFN DBRP06, DEFOPT RP06P==1 ; with one RP06
IFN DBRP07, DEFOPT RP07P==1 ; with one RP07
IFN DBRM03, DEFOPT RM03P==1 ; with one RM02/3
IFN DBRM80, DEFOPT RM80P==1 ; with one RM80
DEFOPT NMTCS==1 ;Number of magtape units (so why not NMTUS?)
DEFOPT TM03S==1 ;TM03/RH11 Unibus tape controller
DEFOPT DZ11P==1 ;Has DZ11 TTY controllers
DEFOPT DZ11NB==1 ; 1 of them
DEFSYM DZ0BA=:760010
DEFOPT NKSTYS==1 ;# KS-10 8080 console 0 TTYs
DEFOPT NDZTYS==8. ;# DZ-11 TTYs
DEFOPT NSTTYS==4. ;# of STY's (Pseudo-TTY's)
DEFOPT TSYSM==512. ;Total PDP10 1K memory blocks
DEFOPT NMMP==4 ;# exec pages for MMP table (# vir pgs/512.)
;;; Next four better agree with SYSTEM;KSDEFS:
DEFSYM PMAGEM==020000 ;2.5 Age bit
DEFSYM PMCSHM==010000 ;2.4 Cache enable bit
DEFSYM PMRCM==001777 ;2.1 - 1.1 Physical page number
; (The page table supports 20 bit physical
; addresses.)
DEFSYM PMUNSD==146000 ;Unused bits
DEFINE ITSIRP BODY
IRPS ITS,,[DB]
BODY
TERMIN
TERMIN
] ;DB
; Default settings for all configuration-dependent assembly parameters.
; If a system definition has already set a value for a parameter, the
; default here will NOT be used.

13
src/system/ttytyp.317
View File

@ -500,3 +500,16 @@ MCONDX DU,{ ;;; DU
TTDPRT 10,SPEED=9600 ;T10 DZ Line 10
.ENDC ;}
MCONDX DB,{ ;;; DB
TTDLA36 0,SPEED=1200,HOR=132.,TT=%TTLCL ;T00 System Console
TTDPRT 1,SPEED=300 ;T01 DZ Line 1 (300 baud)
TTDPRT 2,SPEED=1200 ;T02 DZ Line 2 (1200 baud)
TTDPRT 3,SPEED=2400 ;T03 DZ Line 3 (2400 baud)
TTDPRT 4,SPEED=4800 ;T04 DZ Line 4 (4800 baud)
TTDPRT 5,SPEED=9600 ;T05 DZ Line 5
TTDVT 6,SPEED=9600,TT=%TTLCL ;T06 DZ Line 6 (Local VT52)
TTDVT 7,SPEED=9600 ;T07 DZ Line 7 (VT52)
TTDAAA 10,SPEED=9600 ;T10 DZ Line 10 (AAA)
.ENDC ;}