Trailing-Edge
-
PDP-10 Archives
-
BB-H240B-BM
-
decnet/netpar.mac
There are 6 other files named netpar.mac in the archive. Click here to see a list.
;<JENNESS.NETCON>NETPAR.MAC.4, 31-Jan-80 13:29:21, Edit by JENNESS
; Update copyright date
;<JENNESS.NETCON>NETPAR.MAC.2, 21-Jan-80 10:35:40, Edit by PLATUKIS
; Enlarge PDL to 2000(8) words .
;<JENNESS>NETPAR.MAC.3, 19-Dec-79 09:26:14, Edit by PLATUKIS
; Fix STATUS/STATE keyword value conflict for SHOW/SET commands.
;<JENNESS>NETPAR.MAC.11, 14-Nov-79 11:29:33, Edit by JENNESS
; Update edit number for some more fixes in NCU.
;<JENNESS>NETPAR.MAC.10, 31-Oct-79 13:44:10, Edit by JENNESS
; Fix LATSIZ to be the proper size.
;<JENNESS>NETPAR.MAC.9, 30-Oct-79 17:07:40, Edit by JENNESS
; A fix to NCU to make it actually conform to the NICE event logging protocol.
;<JENNESS>NETPAR.MAC.8, 30-Oct-79 10:39:22, Edit by JENNESS
; Add code to release topology table when a new one is made, or if a failure
; occurs while creating the new one.
;<JENNESS>NETPAR.MAC.7, 23-Oct-79 10:59:20, Edit by PLATUKIS
; Increase version number for lots of NCU fixes and GETFRE/RELFRE memory
; allocation recording.
;<JENNESS>NETPAR.MAC.6, 11-Oct-79 16:23:14, Edit by JENNESS
; Add symbols and structure stuff for NICE queue entry ageing.
;<JENNESS>NETPAR.MAC.5, 4-Oct-79 08:20:04, Edit by JENNESS
; Update edit number for TOPOLOGY timer, SPRIW's in NCU, ASCLIN suppressing
; station number if zero, and minor code cleanup.
;<SROBINSON.NETCON>NETPAR.MAC.9, 26-Sep-79 15:47:54, Edit by JENNESS
; Update edit number for TCOs 4.2488 and 4.2489
;<4.UTILITIES>NETPAR.MAC.85, 23-Aug-79 13:42:53, Edit by JENNESS
; Edit for change in NCU for ASGREC buffer size.
;<4.UTILITIES>NETPAR.MAC.84, 8-Aug-79 11:19:37, Edit by JENNESS
; Change all RELFRE failures to FATAL.ERROR
;<4.UTILITIES>NETPAR.MAC.83, 2-Aug-79 10:10:10, Edit by JENNESS
; Increment version number reflecting changes in NCP memory mangler.
;<4.UTILITIES>NETPAR.MAC.82, 22-Jul-79 10:08:37, Edit by SROBINSON
;Diddle the edit number
;<4.UTILITIES>NETPAR.MAC.81, 15-Jul-79 15:38:36, Edit by SROBINSON
;Update Edit Number for TCO 4.2329
;<4.UTILITIES>NETPAR.MAC.80, 10-Jul-79 10:45:27, Edit by SROBINSON
;Update Edit Number for TCO 4.2320
;<4.UTILITIES>NETPAR.MAC.79, 21-Jun-79 06:31:36, EDIT BY R.ACE
;UPDATE EDIT NUMBER
;<4.UTILITIES>NETPAR.MAC.78, 20-Jun-79 16:07:44, EDIT BY KIRSCHEN
;ADD SYMBOLS FOR EVENT LOGGING COMMANDS
;ADD KEYWORD SYMBOL FOR EVENT LOGGING (.DNEVL)
;<4.UTILITIES>NETPAR.MAC.77, 20-Apr-79 14:26:35, EDIT BY KIRSCHEN
;ADD SY%CHK
;<4.UTILITIES>NETPAR.MAC.76, 17-Mar-79 14:53:14, EDIT BY KIRSCHEN
;FIX SYSERR DEFINITIONS
;<4.UTILITIES>NETPAR.MAC.75, 12-Mar-79 14:51:49, Edit by KONEN
;UPDATE COPYRIGHT FOR RELEASE 4
;<4.UTILITIES>NETPAR.MAC.74, 30-Jan-79 09:09:01, EDIT BY KIRSCHEN
;ADD DEFINITIONS FOR STORING KDP REGISTERS ON EVENT LOG MESSAGES
;<4.UTILITIES>NETPAR.MAC.73, 12-Jan-79 21:12:26, EDIT BY KIRSCHEN
;ADD "ENTRY WAS REQUEUED" FLAG TO NICE QUEUE ENTRY DEFINITION
;<4.UTILITIES>NETPAR.MAC.72, 27-Dec-78 21:30:48, EDIT BY KIRSCHEN
;fix typo
;<4.UTILITIES>NETPAR.MAC.71, 26-Dec-78 12:26:14, EDIT BY KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.70, 25-Dec-78 21:50:10, EDIT BY KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.69, 23-Dec-78 14:38:16, EDIT BY KIRSCHEN
;ADD EVENT LOGGING DEFINITIONS
;<4.UTILITIES>NETPAR.MAC.68, 22-Dec-78 15:39:09, EDIT BY KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.67, 22-Dec-78 15:21:47, EDIT BY KIRSCHEN
;ADD SYSERR DEFINITIONS FOR HARDWARE EVENT LOGGING ENTRIES
;<4.UTILITIES>NETPAR.MAC.66, 18-Dec-78 20:58:29, EDIT BY KIRSCHEN
;ADD .DNMNT
;<4.UTILITIES>NETPAR.MAC.65, 18-Dec-78 09:03:52, EDIT BY ENGEL
;ADD NDDOK AND NDLOK
;<4.UTILITIES>NETPAR.MAC.64, 16-Dec-78 22:50:07, EDIT BY KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.63, 15-Dec-78 22:48:37, EDIT BY KIRSCHEN
;ADD PAGLEV
;<4.UTILITIES>NETPAR.MAC.62, 14-Dec-78 14:18:30, EDIT BY ENGEL
;ADD DNLIP
;<4.UTILITIES>NETPAR.MAC.61, 8-Dec-78 11:50:34, EDIT BY KIRSCHEN
;ADD EVENT LOGGING DEFINITIONS
;<4.UTILITIES>NETPAR.MAC.60, 8-Dec-78 11:33:12, EDIT BY ENGEL
;ADD AUTO-DUMP/AUTO-LOAD
;<4.UTILITIES>NETPAR.MAC.59, 6-Dec-78 14:24:03, EDIT BY ENGEL
;ADD NDDIP - AUTO DUMP/LOAD IN PROGRESS BIT
;<4.UTILITIES>NETPAR.MAC.58, 5-Dec-78 09:34:16, EDIT BY KIRSCHEN
;FIX TOPTIM DEFINITION
;<4.UTILITIES>NETPAR.MAC.57, 5-Dec-78 09:10:38, EDIT BY KIRSCHEN
;FIX .SYPTR DEFINITION
;<4.UTILITIES>NETPAR.MAC.56, 1-Dec-78 09:45:39, EDIT BY KIRSCHEN
;ADD NDTOP
;<4.UTILITIES>NETPAR.MAC.55, 30-Nov-78 14:40:18, EDIT BY ENGEL
;ADD .QTTOP
;<4.UTILITIES>NETPAR.MAC.53, 30-Nov-78 13:21:34, EDIT BY KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.52, 27-Nov-78 14:47:42, EDIT BY ENGEL
;CHANGE LENGTH OF NICE QUEUE BLOCK
;<4.UTILITIES>NETPAR.MAC.51, 27-Nov-78 10:59:18, EDIT BY ENGEL
;ADD NQXTR
;<4.UTILITIES>NETPAR.MAC.50, 22-Nov-78 10:27:48, EDIT BY ENGEL
;<4.UTILITIES>NETPAR.MAC.49, 20-Nov-78 09:14:30, EDIT BY KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.48, 7-Nov-78 16:00:40, EDIT BY KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.47, 7-Nov-78 15:58:30, EDIT BY KIRSCHEN
;ADD .DNLOG
;<4.UTILITIES>NETPAR.MAC.46, 3-Nov-78 13:35:58, EDIT BY KIRSCHEN
;EXPAND MAX NICE MESSAGE SIZE, FIX DEFAULT # OF LOCATIONS TO DUMP
;<4.UTILITIES>NETPAR.MAC.45, 2-Nov-78 14:13:01, EDIT BY KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.44, 2-Nov-78 12:05:50, EDIT BY KIRSCHEN
;ADD .LGMNT
;<4.UTILITIES>NETPAR.MAC.43, 2-Nov-78 11:20:30, EDIT BY KIRSCHEN
;ADD .MPDIA
;<4.UTILITIES>NETPAR.MAC.42, 2-Nov-78 08:46:37, EDIT BY KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.41, 1-Nov-78 13:30:02, EDIT BY KIRSCHEN
;ADD RCVMAX
;<4.UTILITIES>NETPAR.MAC.40, 1-Nov-78 08:31:34, EDIT BY KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.39, 31-Oct-78 15:41:05, EDIT BY KIRSCHEN
;ADD DEFINITIONS FOR DUMP OF DN20 USING DUMP PROGRAM
;<4.UTILITIES>NETPAR.MAC.38, 30-Oct-78 11:40:47, EDIT BY KIRSCHEN
;ADD INITIAL EVENT LOGGING DEFINITIONS
;<4.UTILITIES>NETPAR.MAC.37, 24-Oct-78 13:53:27, EDIT BY KIRSCHEN
;FIX FRELEV,NODLEV DEFINITIONS AGAIN
;<4.UTILITIES>NETPAR.MAC.36, 23-Oct-78 17:37:50, EDIT BY KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.35, 19-Oct-78 16:34:42, EDIT BY KIRSCHEN
;ADD MORE NICE PROTOCOL LINE STATE DEFINITIONS
;<4.UTILITIES>NETPAR.MAC.34, 19-Oct-78 13:06:43, EDIT BY KIRSCHEN
;CHANGE KL8J DEVICE TYPE CODE TO BE CODE FOR DMP11
;<4.UTILITIES>NETPAR.MAC.33, 18-Oct-78 12:14:17, EDIT BY KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.32, 18-Oct-78 09:22:04, EDIT BY KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.31, 17-Oct-78 16:24:54, EDIT BY KIRSCHEN
;ENHANCE LOCKING MACROS TO PERMIT ADDITION OF MORE LOCKS
;<4.UTILITIES>NETPAR.MAC.30, 16-Oct-78 10:14:09, EDIT BY KIRSCHEN
;ADD RESOURCE MASK DEFINITIONS
;<4.UTILITIES>NETPAR.MAC.29, 10-Oct-78 16:47:22, EDIT BY ENGEL
;ADD LOOP DEFINITIONS
;<4.UTILITIES>NETPAR.MAC.27, 10-Oct-78 14:37:09, EDIT BY ENGEL
;ADD WITH
;<4.UTILITIES>NETPAR.MAC.26, 6-Oct-78 13:36:48, EDIT BY ENGEL
;<4.UTILITIES>NETPAR.MAC.24, 4-Oct-78 11:03:53, EDIT BY KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.23, 3-Oct-78 10:20:20, EDIT BY KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.22, 27-Sep-78 15:38:53, EDIT BY KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.21, 21-Sep-78 15:29:38, EDIT BY KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.20, 20-Sep-78 10:54:06, EDIT BY KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.19, 19-Sep-78 11:32:22, EDIT BY KIRSCHEN
;ADD TOPOLOGY CHANGE PROTOCOL DEFINITIONS
;<4.UTILITIES>NETPAR.MAC.18, 19-Sep-78 10:32:59, EDIT BY KIRSCHEN
;ADD TOPMAX
;<4.UTILITIES>NETPAR.MAC.17, 18-Sep-78 11:38:31, EDIT BY KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.16, 18-Sep-78 10:56:03, EDIT BY KIRSCHEN
;ADD KEYTAB DEFINITION
;<4.UTILITIES>NETPAR.MAC.15, 5-Sep-78 16:37:43, EDIT BY KIRSCHEN
;CHANGE .KY SYMBOLS TO .DN SYMBOLS
;<4.UTILITIES>NETPAR.MAC.14, 5-Sep-78 16:36:26, EDIT BY KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.13, 5-Sep-78 15:26:14, EDIT BY KIRSCHEN
;REMOVE OBSOLETE ORION MESSAGE SYMBOLS
;<4.UTILITIES>NETPAR.MAC.12, 5-Sep-78 14:39:12, EDIT BY KIRSCHEN
;ADD TOPOLOGY MONITORING SYMBOLS
;<4.UTILITIES>NETPAR.MAC.11, 25-Aug-78 12:01:00, EDIT BY KIRSCHEN
;MAKE PGFIL A FULL WORD
;<4.UTILITIES>NETPAR.MAC.10, 17-Aug-78 15:27:40, EDIT BY KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.9, 16-Aug-78 09:13:20, Edit by KIRSCHEN
;ADD PBXXX DEFINITIONS
;<4.UTILITIES>NETPAR.MAC.7, 3-Aug-78 14:14:47, Edit by KIRSCHEN
;ADD TOPOLOGY CHANGE DEFINITIONS
;<4.UTILITIES>NETPAR.MAC.6, 13-Jul-78 13:28:08, Edit by KIRSCHEN
;ADD NODE STATUS SYMBOLS
;<4.UTILITIES>NETPAR.MAC.5, 12-Jul-78 08:20:52, Edit by KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.4, 12-Jul-78 08:19:48, Edit by KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.3, 12-Jul-78 08:18:25, Edit by KIRSCHEN
;<4.UTILITIES>NETPAR.MAC.2, 12-Jul-78 08:14:03, Edit by KIRSCHEN
;CHANGE NAME TO NETPAR.MAC
;<4.UTILITIES>NETCON.MAC.22, 12-Jul-78 08:11:48, Edit by KIRSCHEN
;BREAK OUT THESE DEFINITIONS FROM NETCON.MAC
;THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY ONLY BE USED
; OR COPIED IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE.
;
;COPYRIGHT (C) 1976,1977,1978,1979,1980 BY DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS.
UNIVERSAL NETPAR - PARAMETER FILE FOR NETCON
SEARCH MONSYM,MACSYM,ORNMAC,GLXMAC,MACTEN
; ACCUMULATOR DEFINITIONS
T1=1 ;TEMPORARY
T2=2 ;TEMPORARY
T3=3 ;TEMPORARY
T4=4 ;TEMPORARY
Q1=5 ;PRESERVED
Q2=6 ;PRESERVED
Q3=7 ;PRESERVED
P1=10 ;PRESERVED
P2=11 ;PRESERVED
P3=12 ;PRESERVED
P4=13 ;PRESERVED
P5=14 ;PRESERVED
P6=15 ;PRESERVED (CAUTION, USED BY SOME MACROS IN MACSYM)
CX=16 ;RESERVED FOR SUPPORT CODE
P=17 ;PUSH-DOWN POINTER
; VERSION NUMBER DEFINITIONS
VMAJOR==4 ;MAJOR VERSION OF NETCON
VMINOR==0 ;MINOR VERSION NUMBER
VEDIT==24 ;EDIT NUMBER
VWHO==0 ;GROUP WHO LAST EDITED PROGRAM (0=DEC DEVELOPMENT)
VNETCON== <VWHO>B2+<VMAJOR>B11+<VMINOR>B17+VEDIT
PGSIZ==1000 ;SIZE OF ONE PAGE
NCHPW==5 ;NUMBER OF ASCII CHARACTERS PER WORD
BUFSIZ==200 ;SIZE OF INPUT TEXT BUFFER
PDLEN==2000 ;PUSH-DOWN STACK LENGTH
SUBTTL Macro Definitions
DEFINE TB(RTN,TXT)
< [ASCIZ/TXT/] ,, RTN
>
DEFINE TXT(TEXT) <POINT 7,[ASCIZ\TEXT\]>
DEFINE LODERR (ERR)
< JSP CX,[IFNB <ERR>,<MOVX T1,ERR>
CALL RQLERR
RETBAD ()]
>
DEFINE ALLOC(DATA,LEN)
< DEFDAT(\.BASE,DATA)
IFB <LEN>,.BASE==.BASE+1
IFNB <LEN>,.BASE==.BASE+LEN
>
DEFINE DEFDAT (NUM,DATA)
< DEFINE DATA <NUM(P5)>
>
DEFINE RSP(CODE) <<-CODE>&377>
DEFINE WRNMES (A) <
JRST [ HRROI T1,[ASCIZ/
% NETCON: A
/]
PSOUT
JRST .+1]>
DEFINE RETBAD (A,B) <
IFB <B>,<
IFB <A>,< RET>
IFNB <A>,< JRST [ MOVEI T1,A
RET]>>
IFNB <B>,< JRST [ B
RETBAD (A)]>>
DEFINE RETER2 (A,B) <
IFB <B>,<
IFB <A>,< JRST STOERC>
IFNB <A>,< JRST [ MOVEI T1,A
JRST STOERC]>>
IFNB <B>,< JRST [ B
RETER2 (A)]>>
DEFINE SAVET <
JSP CX,SAVT>
DEFINE SAVEQ <
JSP CX,SAVQ>
DEFINE SAVEPQ <
JSP CX,SAVPQ>
DEFINE PION <
CALL PION.>
DEFINE PIOFF <
CALL PIOFF.>
DEFINE FATAL.ERROR (A) <
JRST [
IFNB <A>,< MOVEI T1,A>
CALL ERROR
HALTF
JRST NETCON]>
DEFINE NON.FATAL.ERROR (A) <
IFB <A>,< CALL WRNING>
IFNB <A>,<
JRST [ MOVEI T1,A
CALL WRNING
JRST .+1]>>
DEFINE ACLOCK (AC) <
MOVEI CX,(AC)
CALL ELOCK>
DEFINE ACUNLOCK (AC)<
MOVEI CX,(AC)
CALL DLOCK>
DEFINE LOCK (A) <
LOKVAL==NODLEV
IFIDN <A>, <PAGLOK>, <LOKVAL==PAGLEV>
IFIDN <A>, <FRELOK>, <LOKVAL==FRELEV>
IFIDN <A>, <TOPJFN>, <LOKVAL==TOPLEV>
MOVE CX,[LOKVAL,,A]
CALL ELOCK>
DEFINE UNLOCK (A) <
LOKVAL==NODLEV
IFIDN <A>, <PAGLOK>, <LOKVAL==PAGLEV>
IFIDN <A>, <FRELOK>, <LOKVAL==FRELEV>
IFIDN <A>, <TOPJFN>, <LOKVAL==TOPLEV>
MOVE CX,[LOKVAL,,A]
CALL DLOCK>
DEFINE SAVIAC (A) <
MOVEM T1,L'A'SAV1
MOVEM T2,L'A'SAV2
MOVEM T3,L'A'SAV3
MOVEM T4,L'A'SAV4
MOVEM CX,L'A'SAVC>
DEFINE RESIAC (A) <
MOVE T1,L'A'SAV1
MOVE T2,L'A'SAV2
MOVE T3,L'A'SAV3
MOVE T4,L'A'SAV4
MOVE CX,L'A'SAVC>
DEFINE ENTINT (A) <
SAVIAC (A)
JSP CX,[CALL 0(CX)
RESIAC (A)
DEBRK]>
SUBTTL NICE Process Data Area Offset Definitions
.BASE==0
ALLOC (ZROBEG,0) ;BEGINNING OF BLOCK ZERO'ED ON STARTUP
ALLOC (STRSIZ) ;NUMBER OF WORDS LEFT IN STRING STORAGE AREA
ALLOC (STRPTR) ;POINTER TO NEXT FREE STRING LOCATION
ALLOC (STREND) ;LAST LOCATION IN STRING AREA
ALLOC (RQLOPT) ;OPTIONS FROM DOWN-LINE LOAD REQUEST
ALLOC (RQLTGT) ;POINTER TO ASCIZ NAME OF TARGET NODE
ALLOC (RQLSRV) ;POINTER TO ASCIZ NAME OF SERVER NODE
ALLOC (RQLLIN,2) ;SERVER LINE ID (2 WORDS)
ALLOC (RQLPSW,2) ;BOOT PASSWORD TO TRIGGER TARGET'S BOOTSTRAP ROM
ALLOC (RQLLDV) ;BOOT LINE DEVICE TYPE AT TARGET NODE
ALLOC (RQLCPU) ;CPU TYPE OF TARGET SYSTEM (.CPXXX)
ALLOC (RQLPGM) ;PROGRAM TYPE BEING REQUESTED (.PTXXX)
ALLOC (RQLSID) ;SOFTWARE ID
ALLOC (RQLOPS) ;POINTER TO ASCIZ OPERATING SYSTEM FILE SPEC
ALLOC (RQLNAM) ;POINTER TO ASCIZ NAME TARGET NODE IS TO USE
ALLOC (RQLNUM) ;NUMBER OF TARGET NODE
ALLOC (RQLHST) ;POINTER TO ASCIZ NAME OF HOST FOR TASK LOADS
ALLOC (RQDTGT) ;POINTER TO TARGET NODE TO BE DUMPED
ALLOC (RQDSRV) ;POINTER TO ASCIZ SERVER NODE NAME
ALLOC (RQDLIN,2) ;SERVER NODE LINE ID
ALLOC (RQDOPT) ;OPTIONS FROM NICE DUMP REQUEST MESSAGE
ALLOC (RQDFIL) ;POINTER TO ASCIZ DUMP FILE SPEC
ALLOC (RQDADR) ;STARTING ADDRESS FOR DUMP
ALLOC (RQDCNT) ;NUMBER OF UNITS TO DUMP
ALLOC (REQLNK) ;LOGICAL LINK (JFN) FROM REQUESTING TASK
MSGSIZ==3000
ALLOC (MSGBLK,MSGSIZ) ;ALLOCATE A BLOCK FOR RECEIVING MESSAGES
ALLOC (MOPMSG,MOPSIZ) ;AREA FOR ASSEMBLING AND DECODING MOP MESSAGES
ALLOC (BTARG,BTSIZ) ;BOOT JSYS ARGUMENT BLOCK
ALLOC (RETPC1) ;RETURN PC FOR LEVEL 1 STORED HERE
ALLOC (NCUCHN,^D36) ;NCU SOFTWARE INTERRUPT CHANNEL TABLE
ALLOC (NCULEV,3) ;NCU SOFTWARE INTERRUPT LEVEL TABLE
ALLOC (TMPSTR,50) ;TEMPORARY STORAGE FOR STRINGS
VARLEN==.BASE ;OFFSET TO OF WORD FOLLOWING DATA AREA
ZROLEN==.BASE-1 ;NUMBER OF LOCATIONS TO BE CLEARED ON STARTUP
SUBTTL Symbol Definitions
; NSP MESSAGE BLOCK OFFSETS
.NMSIZ==0 ;SIZE OF NSP MESSAGE IN BYTES
.NMORN==1 ;POINTER TO ASCIZ NAME OF ORIGINATING NODE
.NMORO==2 ;NUMBER OF ORIGINATING OBJECT TYPE
.NMORD==3 ;POINTER TO DESCRIPTOR FOR ORIGINATING OBJECT
.NMMSG==4 ;START OF ACTUAL MESSAGE DATA
; MOP MESSAGE BLOCK OFFSETS
.MMSIZ==0 ;SIZE OF MOP MESSAGE IN BYTES
.MMMSG==1 ;START OF ACTUAL MESSAGE DATA
; MOP LOAD DEVICES AND CORRESPONDING CODES
; ALSO DEVICE CODES FOR NICE PROTOCOL
RADIX 5+5
.DTP11==0 ;DP11
.DTU11==2 ;DU11
.DTL1E==4 ;DL11E
.DTQ11==6 ;DQ11
.DTA11==8 ;DA11A
.DTDUP==10 ;DUP11
.DTDMC==12 ;DMC11
.DTDLV==14 ;DLV11
.DTL1A==16 ;DL11A
.DTDMP==18 ;DMP11 (FORMERLY KL8J)
.DTDTE==20 ;DTE-20
.DTDV1==22 ;DV11
.DTKDP==28 ;KMC-DUP
.DTKDZ==30 ;KMC-DZ
; MOP PROGRAM TYPE DEFINITIONS
.PTSLD==0 ;SECONDARY LOADER
.PTTLD==1 ;TERTIARY LOADER
.PTOPS==2 ;OPERATING SYSTEM (PRIMARY LOAD FILE)
.PTSDM==3 ;SECONDARY DUMP FILE
.PTTDM==4 ;TERTIARY DUMP FILE
; LINE FORMAT CODES
.LTALL==0 ;ALL LINES
.LTSTD==1 ;STANDARD NICE LINE ID
.LTSTR==2 ;STRING
; PARAMETER VALUE TYPE CODES
.PVEND==0 ;END OF PARAMETER VALUES
.PVNAM==1 ;NODE NAME
.PVNUM==2 ;NODE NUMBER
.PVHST==3 ;HOST FOR TASK LOADS
; MOP FUNCTION CODES
.MPLDT==0 ;MEMORY LOAD WITH TRANSFER ADDRESS
.MPLOD==2 ;MEMORY LOAD WITHOUT TRANSFER ADDRESS
.MPRQD==4 ;REQUEST MEMORY DUMP (OR EXAMINE DATA)
.MPMOP==6 ;ENTER MOP MODE
.MPRQP==8 ;REQUEST LOADER PROGRAM
.MPRQL==10 ;REQUEST MEMORY LOAD (ACK PREVIOUS .MPLOD)
.MPACK==0 ;ACKNOWLEDGE PREVIOUS LOAD RECORD, REQUEST NEXT
.MPNAK==1 ;ERROR ON PREVIOUS LOAD RECORD
.MPMMR==12 ;MOP MAINTENANCE MODE RUNNING
MP%DMP==1B34 ;DUMP IS SUPPORTED
.MPDMP==14 ;MEMORY DUMP DATA
.MPDAP==16 ; REMOTE-11 DAP MESSAGE ENVELOPE
.MPASC==18 ; REMOTE-11 ENTER ASCII TELETYPE MODE
.MPXFR==20 ;TRANSFER AND SET PARAMETERS
.MPCLR==22 ;CLEAR DATA BY NAME
.MPTST==24 ;LOOPBACK TEST
.MPDAT==26 ;EXAMINED DATA BY NAME
.MPDIA==28 ;DIAGNOSTIC ASCII INFORMATION
; NICE PROTOCOL FUNCTION CODES
.NCLOG==1 ;LOG DATA FUNCTION (FOR ASYNCHRONOUS EVENTS)
.LGMNT==1 ;MAINTENANCE LOG OPTION
.NCRQL==2 ;REQUEST DOWN-LINE LOAD
LO%TGT==3B35 ;TARGET NODE SPECIFICATION
.LOTGT==0 ;IDENTIFY TARGET BY NAME, DEFAULT SERVER
.LOALL==1 ;LOAD ALL KNOWN NODES
.LOPTH==2 ;BOTH TARGET AND PATH FROM SERVER INCLUDED
.LOSRV==3 ;DEFAULT TARGET TO LOAD, SERVER PATH INCLUDED
LO%ROM==3B33 ;BOOTSTRAP ROM OPTION FIELD
.LODEF==0 ;DEFAULT PROGRAM REQUEST, DO NOT TRIGGER BOOT
.LOTBD==1 ;TRIGGER BOOT, DEFAULT BOOT PASSWORD
.LOPGM==2 ;PROGRAM REQUEST INCLUDED, DO NOT TRIGGER BOOT
.LOTBP==3 ;TRIGGER BOOT, BOOT PASSWORD IS SPECIFIED
LO%OPS==1B31 ;OPERATING SYSTEM LOAD IMAGE FILE INCLUDED
LO%PAR==1B30 ;SYSTEM PARAMETERS ARE INCLUDED
.NCRQD==3 ;REQUEST DUMP
DO%TGT==3B35 ;TARGET SPECIFICATION OPTION
.DOTGT==0 ;TARGET NODE SPECIFIED, DEFAULT SERVER AND LINE
.DOPTH==2 ;TARGET NODE AND PATH FROM SERVER SPECIFIED
.DOSRV==3 ;DEFAULT TARGET NODE, SERVER AND LINE SPECIFIED
DO%FIL==1B33 ;DUMP FILESPEC INCLUDED IN MESSAGE IF 1
DO%ADR==1B32 ;ADDRESS AND COUNT IN MESSAGE IF 1
.NCTRB==4 ;TRIGGER BOOT
.NCLUP==5 ;LOOPBACK
.NCTST==6 ;TEST NETWORK OR LINE
.DONOD==0 ;NODE TYPE LOOP TEST
.DOLIN==1 ;LINE TYPE LOOP TEST
.DOZRO==0 ;SEND ALL ZEROES
.DOONS==1 ;SEND ALL ONES
.DOMXD==2 ;SEND ONES AND ZEROES
.NCSET==7 ;SET PARAMETER
.NCNLS==7 ;NODE LOGGING STATE
.NCSLN==8 ;LINE STATE
.NCLLS==10 ;LINE LOGGING STATE
.NCRED==8 ;READ INFORMATION
.RDLNC==0 ;LOCAL NODE COUNTERS
.RDLNS==1 ;LOCAL NODE STATUS
.RDRNC==2 ;REMOTE NODE COUNTERS
.RDRNS==3 ;REMOTE NODE STATUS
.NSON==:0 ;NODE IS ON
.NSOFF==:1 ;NODE IS OFF
.NSSHT==:2 ;NODE IS SHUT
.RDLCT==4 ;LINE COUNTERS
.RDLST==5 ;LINE STATUS
.LSTON==0 ;LINE IS ON
.LSTOF==1 ;LINE IS OFF
.LSTMN==4 ;MAINTENANCE
.LSTCN==5 ;CONTROLLER LOOPBACK
.LSTCB==6 ;CABLE LOOPBACK
.NCZRO==9 ;ZERO COUNTERS
.NCZLC==0 ;LOCAL NODE COUNTERS
.NCZRM==1 ;REMOTE NODE COUNTERS
.NCZLN==2 ;LINE COUNTERS
.NCLSV==14 ;LINE SERVICE
.LSLOD==0 ;ESTABLISH A LOAD DIALOG
.LMEND==0 ;END OF DIALOG
.LMBAS==1 ;SET BASE ADDRESS
.LMMEM==2 ;MEMORY IMAGE
.LMXFR==3 ;PARAMETERS AND TRANSFER ADDRESS
.LSLOP==1 ;LOOP
.LSDMP==2 ;ESTABLISH A DUMP DIALOG
.LSTBP==3 ;TRIGGER BOOTSTRAP, RETURN PROGRAM DATA
.LSTBT==4 ;TRIGGER BOOTSTRAP, DO NOT RETURN PROGRAM DATA
RADIX 8
; NICE RESPONSE CODES
RADIX 5+5
.NRSUC==1 ;GENERAL SUCCESS RESPONSE
.NRFNC==-1 ;INVALID FUNCTION CODE OR OPTION
.NRIMF==-2 ;INVALID MESSAGE FORMAT
.NRIST==-3 ;INSUFFICIENT STATUS
.NRPRO==-4 ;NICE PROTOCOL ERROR
.NRNPE==-5 ;NICE PROCESS PROGRAM ERROR (I.E. JSYS FAILURE)
.NRILN==-8 ;INVALID LINE ID
.NRILS==-9 ;INVALID LINE STATE
.NRCME==-10 ;LINE COMMUNICATIONS ERROR
.NRINI==-11 ;INVALID NODE ID
.NRISN==-12 ;INVALID SERVER NODE ID
.NRIFL==-13 ;INVALID FILE
.NRICF==-14 ;INVALID CONFIGURATION FILE
.NRRES==-15 ;RESOURCE ERROR
.NRIPV==-16 ;INVALID PARAMETER VALUE
.NRLPE==-17 ;LINE PROTOCOL ERROR
.NRIOE==-18 ;FILE I/O ERROR
.NRNCE==-19 ;NETWORK COMMUNICATIONS ERROR
.NRNRE==-20 ;NO ROOM FOR NEW ENTRY
.NRPNA==-21 ;REMOTE NCU PROCESS NOT AVAILABLE
RADIX 8
; DECNET GENERIC OBJECT TYPE DEFINITIONS
.NTTSK==0 ;GENERAL TASK
.NTFAL==1 ;FILE ACCESS
.NTURS==2 ;UNIT RECORD SERVICES
.NTATS==3 ;APPLICATIONS TERMINAL SERVICES
.NTCTS==4 ;COMMAND TERMINAL SERVICES
.NTNCU==5 ;NETWORK CONTROL UTILITIES
.NTOSI==6 ;OPERATOR SERVICES INTERFACE
.NTNRM==7 ;NODE RESOURCE MANAGER
.NT327==10 ;IBM 3270-BSC GATEWAY
.NT278==11 ;IBM 2780-BSC GATEWAY
.NT379==12 ;IBM 3790-SDLC GATEWAY
; EVENT LOGGING NICE PROTOCOL DEFINITIONS
RADIX 5+5
; EVENT TYPES
.EVTXT==1 ;ASCII TEXT
.EVASC==2 ;ASCII DATA EXTENDED
.EVHDW==3 ;HARDWARE ERROR
.EVSFT==4 ;SOFTWARE ERROR
.EVTOP==5 ;TOPOLOGY CHANGE
; EVENT LOGGING DATA TYPE CODE DEFINITIONS
.EDREG==1 ;DEVICE REGISTERS
.EDTIM==2 ;TIME OF DAY
.EDDAT==3 ;DATE
.EDUPT==4 ;NODE UPTIME
.EDDEV==5 ;DEVICE ID
.EDRSN==6 ;REASON CODE
.EDRCV==7 ;RECOVERY CODE
.EDOpS==8 ;OPERATING SYSTEM ID
.EDNOD==9 ;NODE NAME
.EDMCD==10 ;MICROCODE ID
.EDLPR==11 ;LINE PROTOCOL TYPE CODE
.EDTPR==12 ;TRANSMISSION PROTOCOL TYPE CODE
.EDTHR==13 ;THRESHOLD VALUE
.EDTXT==14 ;ASCII TEXT
; MISCELLANEOUS SYMBOLS FOR EVENT LOGGING
NKMCRG==^D8 ;NUMBER OF KMC REGISTER BYTES
RADIX 8
; RESOURCE MASKS FOR LOCKING NODES
RM%PRI==1B0 ;PRIMARY RESOURCE MASK (OS LOADS, DUMPS, ETC.)
RM%SEC==1B1 ;SECONDARY RESOURCE MASK (SECONDARY LOADERS)
; LEVEL NUMBER ASSIGNMENTS FOR LOCKS
TOPLEV==100 ;TOPOLOGY TABLE LOCK LEVEL
NODLEV==200 ;NODE LOCKING LEVEL
FRELEV==300 ;FREE SPACE LOCK LEVEL
paglev==400 ;page pool level
MAXNOD==^D50 ;MAXIMUM NUMBER OF NODES NETCON CAN HANDLE
MAXLIN==MAXNOD ;MAXIMUM NUMBER OF LINE TABLES
MAXDTE==4 ;MAX NUMBER OF PHYSICAL LINES TO ADJACENT NODES
MAXREC==<MAXMEM+BPWRD-1>/BPWRD ;SIZE OF RECORD BLOCK DATA AREAS
MAXNIC==MSGSIZ*BPWRD ;MAX NUMBER OF BYTES IN NICE MESSAGES
MAXSYE==50 ;MAX SIZE OF SYSERR ENTRIES
MXLNOD==5 ;MAX # OF LINES PER NODE
MAXPGM==10 ;MAX # OF ENTRIES IN PROGRAM TABLE (PGMTAB)
MAXMEM==^D255 ;MAX NUMBER OF BYTES IN MEMORY IMAGES SENT TO
; SERVER NODE NCU'S
BINHDR==6 ;# OF BYTES IN HEADER OF BLOCKS IN .BIN FILES
BPWRD==4 ;NUMBER OF PDP-11 8-BIT BYTES PER KL20 WORD
DEFCNT==^D128*^D1024*2 ;DUMP 128K PDP-11 WORDS AS DEFAULT
INIDMP==^D32*^D1024*2 ;DUMP FIRST 32K BYTES USING ROM
RCVMAX==2000 ;MAX NUMBER OF BYTES TO RECEIVE OVER DTE20
NNAMSZ==6 ;NUMBER OF CHARACTERS IN ASCII NODE NAMES
WPN==2 ;MAX NUMBER OF WORDS NEEDED FOR ASCII NODE NAMES
MAXSID==^D16 ;MAX LENGTH OF SOFTWARE ID FIELD
MSIDMX==6 ;MAX SIZE OF SOFTWARE ID FIELD IN MOP MESSAGES
MBPWSZ==^D8 ;MAX SIZE OF BOOT PASSWORD FIELD
MAXIMB==^D9 ;MAX # OF BYTES SUPPORTED IN BINARY IMAGE FIELDS
MAXEXT==9 ;MAX NUMBER OF BYTES IN EXTENSIBLE FIELDS
NICSIZ==100 ;SIZE OF AREA FOR ASSEMBLING NICE MESSAGES
MOPSIZ==201 ;SIZE OF AREA FOR ASSEMBLING MOP MESSAGES
EXTBIT==1B28 ;INDICATES NEXT BYTE IS IN THIS FIELD IN AN
; EXTENSIBLE FIELD IN A NICE MESSAGE.
NEGBIT==200 ;IF ONE, THIS IS A "NEGATIVE" BYTE
BTSIZ==20 ;SIZE OF BOOT JSYS ARGUMENT BLOCK
RQLCHN==1 ;DOWN LINE LOAD INTERRUPT CHANNEL
TOPMAX==2 ;MAX NUMBER OF TOPOLOGY CHANGE MONITORING TASKS
; MUST NOT EXCEED # OF AVAILABLE PSI CHANNELS
MAXTOP==20 ;MAX # OF NODES IN A LIST FOR TOPOLOGY UPDATES
TOPTIM==^D10*^D60*^D1000 ;TOPOLOGY MONITORING INTERVAL IN MS
SUBTTL Data Structure Definitions
; NODE INFORMATION BLOCK (NIB)
DEFSTR (NDNUM,0,35,18) ;NODE NUMBER
DEFSTR (NDFLG,0,17,18) ;FLAGS
DEFSTR (NDENM,0,0,1) ;MONITORING ENABLED FOR THIS NODE
DEFSTR (NDENL,0,1,1) ;LOADING ENABLED FOR THIS NODE
DEFSTR (NDEND,0,2,1) ;DUMPING ENABLED FOR THIS NODE
DEFSTR (NDFRD,0,3,1) ;FORCE DUMP ON DETECTED CRASH
DEFSTR (NDFRL,0,4,1) ;FORCE LOAD ON DETECTED CRASH
DEFSTR (NDPST,0,5,1) ;PROTOCOL-TYPE HAS BEEN SET
DEFSTR (NDTOP,0,6,1) ;TOPOLOGY MONITORING INITIATED FROM THIS NODE
DEFSTR (NDDIP,0,7,1) ;AUTO DUMP IN PROGRESS
DEFSTR (NDLIP,0,8,1) ;AUTO LOAD IN PROGRESS
DEFSTR (NDDOK,0,9,1) ;WE ARE RESPONSIBLE FOR DUMPING THIS NIB
DEFSTR (NDLOK,0,10,1) ;WE ARE RESPONSIBLE FOR LOADING THIS NIB
DEFSTR (NDBP1,1,35,36) ;BOOT PASSWORD NEEDED TO TRIGGER THE
DEFSTR (NDBP2,2,35,36) ; BOOTSTRAP ROM AT THIS NODE
DEFSTR (NDLOD,3,35,36) ;POINTER TO PRIMARY LOAD FILE SPEC
DEFSTR (NDDMP,4,35,36) ;POINTER TO PRIMARY DUMP FILE SPEC
DEFSTR (NDINT,5,17,18) ;STATUS MONITORING INTERVAL
DEFSTR (NDTMO,5,35,18) ;STATUS MONITORING REPLY TIME-OUT VALUE
DEFSTR (NDLIN,6,35,36) ;ADDRESS OF THIS NODE'S LINE ADJACENCY TABLE
DEFSTR (NDNAM,7,35,36) ;POINTER TO ASCIZ NODE NAME
DEFSTR (NDTPS,10,3,4) ;DEFAULT FORMAT OF SECONDARY LOAD FILE
DEFSTR (NDTPP,10,7,4) ;DEFAULT FORMAT OF PRIMARY LOAD FILE
DEFSTR (NDPRO,10,35,18) ;PROTOCOL VERSION TO USE (.VNXXX)
DEFSTR (NDSRV,11,35,36) ;POINTER TO DEFAULT SERVER NODE FOR THIS NODE
DEFSTR (NDSL1,12,35,36) ;FIRST WORD OF SERVER LINE ID
DEFSTR (NDSL2,13,35,36) ;SECOND WORD OF SERVER LINE ID
DEFSTR (NDPNA,14,35,36) ;PARAMETER PASSED TO NODE: NODE NAME
DEFSTR (NDPNU,15,35,36) ;PARAMETER PASSED TO NODE: NODE NUMBER
DEFSTR (NDPHT,16,35,36) ;PARAMETER PASSED TO NODE: HOST FOR TASK LOADS
DEFSTR (NDLDV,17,17,18) ;BOOT LINE DEVICE TO LOAD THIS NODE
DEFSTR (NDCPU,17,35,18) ;CPU TYPE OF THIS NODE
DEFSTR (NDCNT,20,35,36) ;DEFAULT COUNT FOR DUMPING THIS NODE
DEFSTR (NDADR,21,35,36) ;DEFAULT STARTING ADDRESS FOR DUMPS OF THIS NODE
NIBSIZ==22 ;SIZE OF A NODE INFORMATION BLOCK
; DATA STRUCTURE FOR PHYSICAL LINE TABLE (LINTAB)
DEFSTR (LNLDN,1,17,8) ;NEXT LOAD NUMBER EXPECTED OVER THIS LINE
DEFSTR (LNPGM,2,17,18) ;PROGRAM TYPE (.PTXXX)
DEFSTR (LNCNT,2,35,18) ;# OF BYTES LEFT TO DUMP IN THIS BLOCK
DEFSTR (LNPTR,3,35,36) ;POINTER TO NEXT BYTE TO BE RETURNED ON A DUMP
DEFSTR (LNDTE,4,17,18) ;DTE20 NUMBER FOR THIS LINE
DEFSTR (LNCPU,4,35,18) ;CPU TYPE OF TARGET AT END OF THIS LINE
DEFSTR (LNADR,5,35,36) ;BASE ADDRESS FOR NEXT LOAD OR DUMP
DEFSTR (LNMSG,6,35,36) ;POINTER TO MOP MESSAGE BLOCK
DEFSTR (LNDCT,7,35,36) ;TOTAL NUMBER OF BYTES TO BE DUMPED
LTBSIZ==10 ;# OF WORDS PER ENTRY IN PHYSICAL LINE TABLE
; PROGRAM TABLE DEFINITIONS
DEFSTR (PGLDV,0,17,18) ;LOAD DEVICE (.DTXXX)
.PGFRE==777777 ;THIS ENTRY IS NOT USED
DEFSTR (PGCPU,0,35,18) ;CPU TYPE (.CPXXX)
DEFSTR (PGPGM,1,17,18) ;PROGRAM TYPE (.PTXXX)
DEFSTR (PGFIL,2,35,36) ;POINTER TO FILE-SPEC
PGLEN==3 ;SIZE OF ENTRIES IN PROGRAM TABLE
; RECORD TABLE ENTRY DEFINITIONS
DEFSTR (RBJFN,1,17,18) ;JFN OF FILE BEING INPUT
DEFSTR (RBTYP,1,35,18) ;FILE TYPE:
.FTLDA==1 ; LDA (ABSOLUTE BINARY) FORMAT
.FTTSK==2 ; TASK-IMAGE FORMAT
.FTDMP==3 ; DUMP FORMAT (BINARY MEMORY IMAGE)
DEFSTR (RBBYT,2,35,36) ;NUMBER OF NEXT BYTE TO READ (0-3)
DEFSTR (RBPTR,3,35,36) ;POINTER TO DATA FOR THIS RECORD
DEFSTR (RBDAT,4,35,36) ;CURRENT DATA WORD FROM INPUT FILE
DEFSTR (RBFCT,5,17,18) ;COUNT OF REMAINING BYTES IN FILE
DEFSTR (RBCNT,5,35,18) ;NUMBER OF BYTES IN CURRENT RECORD
DEFSTR (RBNAD,6,35,36) ;BASE ADDRESS OF CURRENT RECORD
DEFSTR (RBCAD,7,35,36) ;CURRENT BASE ADDRESS
DEFSTR (RBXAD,10,35,36) ;TRANSFER ADDRESS FOR THIS LOAD
.RBDAT==11 ;OFFSET TO DATA AREA IN RECORD BLOCK
RCTSIZ==11 ;SIZE OF NON-DATA ENTRIES IN THE RECORD TABLE
; TASK-IMAGE FILE LABEL BLOCK DEFINITIONS FOR RSX-11M RELEASE 3
L$BSA== 10 ;BASE ADDRESS OF TASK IMAGE
L$BLDZ==16 ;LOAD SIZE IN 32. WORD BLOCKS
L$BFLG==30 ;FLAGS WORD:
TS$NHD==1B<35-14> ; BIT14- TASK HAS NO HEADER
L$BXFR==350 ;TRANSFER ADDRESS
L$BHRB==356 ;HEADER (OR TASK IMAGE) RELATIVE BLOCK
; CPU TYPE DEFINITIONS
.CP8==0 ;PDP-8
.CP11==1 ;PDP-11
.CP20==2 ;DECSYSTEM-10/20
;LINE ADJACENCY TABLES
DEFSTR (LTTYP,0,17,18) ;LINE DEVICE TYPE (.DTXXX)
DEFSTR (LTCTL,0,35,18) ;LINE CONTROLLER NUMBER
DEFSTR (LTUNI,1,17,18) ;LINE UNIT NUMBER
DEFSTR (LTSTN,1,35,18) ;STATION ADDRESS
DEFSTR (LTFLG,2,17,18) ;FLAGS FOR THIS ENTRY
DEFSTR (LTUSE,2,0,1) ;THIS ENTRY IS IN USE
DEFSTR (LTLOG,2,1,1) ;LOG COUNTERS FOR THIS LINE
DEFSTR (LTNIB,2,35,18) ;ADDRESS OF NIB FOR NODE AT END OF THIS LINE
DEFSTR (LTHST,3,17,18) ;ADR OF NIB FOR HOST FROM WHICH LOAD IMAGES COME
LATSIZ==4 ;SIZE OF LINE ADJACENCY TABLE ENTRIES
LINSIZ==MXLNOD*LATSIZ ;SIZE OF LINE ADJACENCY TABLE FOR EACH NODE
; = LINES/NODE * WORDS PER LINE
; SYSERR ENTRY HEADER DEFINITIONS
DEFSTR (SYCOD,0,8,9) ;EVENT CODE (SY%XXX)
DEFSTR (SYT20,0,17,1) ;ENTRY WAS CREATED BY TOPS-20
DEFSTR (SYVER,0,23,6) ;HEADER VERSION
DEFSTR (SYHLN,0,26,3) ;HEADER LENGTH
DEFSTR (SYLEN,0,35,9) ;LENGTH OF ENTRY
DEFSTR (SYDAT,1,35,36) ;DATE AND TIME OF THIS ENTRY
DEFSTR (SYUPT,2,35,36) ;SYSTEM UPTIME AT CREATION OF THIS ENTRY
DEFSTR (SYPSN,3,35,36) ;PROCESSOR SERIAL NUMBER OF RECORDING CPU
.SYDAT==4 ;OFFSET TO DATA PORTION OF SYSERR ENTRY
; DEFINITIONS FOR NETWORK HEADER PORTION OF SYSERR LOGGING ENTRIES
DEFSTR (SYMID,0,35,36) ;NODE ID'S
DEFSTR (SYNOD,1,35,36) ;OFFSET TO NODE NAME
DEFSTR (SYDST,2,35,36) ;PTR TO DESTINATION NODE NAME
DEFSTR (SYADJ,3,35,36) ;ADJACENT NODE NAME
DEFSTR (SYFCN,4,35,36) ;FUNCTION WORD
DEFSTR (SYHDW,4,35,8) ;HARDWARE OPTION TYPE
.SYDTE==15 ;DTE20
.SYKDZ==4 ;KDM/DZ
.SYKDP==3 ;KMC/DUP
.SYDUP==27 ;DUP
.SYDMC==5 ;DMC
DEFSTR (SYOPS,4,27,8) ;OPERATING SYSTEM ID
DEFSTR (SYHDT,4,17,8) ;HARDWARE SYSTEM TYPE
DEFSTR (SYNCT,5,35,36) ;NUMBER OF COUNTERS IN FOLLOWING WORDS
DEFSTR (SYSEQ,6,35,36) ;SEQUENCE NUMBER
DEFSTR (SYLID,7,35,36) ;OFFSET TO LINE ID
DEFSTR (SYLI1,10,35,36) ;SECOND PART OF LINE ID
DEFSTR (SYNTM,11,35,36) ;NODE UPTIME
DEFSTR (SYRCT,12,35,36) ;RETRY COUNT AND FLAGS
DEFSTR (SYRCV,12,3,4) ;RECOVERY CODE
DEFSTR (SYTRY,12,35,18) ;RETRY COUNT
DEFSTR (SYRSN,13,35,18) ;REASON FOR ENTRY
DEFSTR (SYTHR,13,17,18) ;THRESHOLD VALUE
DEFSTR (SYPTR,14,35,36) ;POINTER TO DATA
.SYPTR==14 ;OFFSET TO POINTER TO LOG DATA SECTION
DEFSTR (SYTYP,0,17,18) ;COUNTER TYPE
DEFSTR (SYCTR,0,35,18) ;COUNTER VALUE
.SYCTR==21 ;OFFSET TO COUNTER DATA
; NUMBER OF REGISTERS LOGGED FOR PARTICULAR HARDWARE DEVICES
NRGDMC==4 ;DMC11
; DEFINITIONS FOR LOAD/DUMP ENTRIES
DEFSTR (SYTGT,4,35,18) ;OFFSET TO NAME OF TARGET NODE
DEFSTR (SYSRV,5,35,18) ;OFFSET TO NAME OF SERVER NODE
DEFSTR (SYSVL,6,35,18) ;OFFSET TO NAME OF SERVER LINE
DEFSTR (SYFIL,7,35,18) ;OFFSET TO FILE SPEC
DEFSTR (SYRCD,10,35,36) ;NICE RETURN CODE
.SYLDD==11 ;OFFSET TO START OF DATA FOR LOAD/DUMP ENTRY
; NCU STARTED ENTRY
DEFSTR (SYNCV,4,35,36) ;NCU VERSION NUMBER (STANDARD TOPS20 FORMAT)
DEFSTR (SYNAM,5,35,36) ;OFFSET IN SYSERR BLOCK TO THIS NODE'S NAME
DEFSTR (SYPGM,6,35,36) ;PROGRAM NAME
.SYPGM==6 ;OFFSET TO PROGRAM NAME POINTER
.SYNDD==7 ;OFFSET TO DATA AREA FOR NCU STARTED ENTRY
; SYSERR EVENT CODE DEFINITIONS
SY%NCU==201 ;NCU PROGRAM HAS BEEN STARTED
SY%LOD==202 ;ENTRY TYPE CODE FOR LOADING OF A NODE
SY%DMP==203 ;ENTRY TYPE CODE FOR DUMPING A NODE
SY%MLG==210 ;MAINTENANCE LOGGING DATA
SY%OLG==220 ;OPERATOR LOGGING DATA
SY%TOP==221 ;NETWORK TOPOLOGY CHANGE
SY%CHK==222 ;CHK11 ENTRY
SY%LCT==230 ;SYSERR "LINE COUNTERS" ENTRY TYPE
SUBTTL Network Control Program (NCP)
NJFN==4 ;NUMBER OF JFNS TO KEEP OPEN FOR NCU
TOPLVL==2 ;INTERRUPT LEVEL FOR TOPOLOGY CHANGE NOTICES
PIDLVL==2 ;INTERRUPT LEVEL FOR MESSAGES
JFNLVL==2 ;INTERRUPT LEVEL FOR NCU JFNS
FKTLVL==2 ;INTERRUPT LEVEL FOR FORK TERMINATION
JFDLVL==3 ;INTERRUPT LEVEL FOR NCP DATA INTERRUPTS
HCKLVL==2 ;INTERRUPT LEVEL FOR TOPOLOGY POLLING TIMERS
NODLEN==10 ;MAX LENGTH OF NODE NAME
FILLEN==30 ;MAX LENGTH OF FILE SPEC STRING
;QUEUE ENTRY DEFINITIONS
QUEHLN==2 ;LENGTH OF QUEUE ENTRY
DEFSTR (QUEPNT,0,35,18) ;POINTER TO NEXT ELEMENT IN QUEUE
DEFSTR (QUEMES,0,17,18) ;ADDRESS OF THE MESSAGE
DEFSTR (QUETYP,1,17,18) ;TYPE OF THIS QUEUE ENTRY
.QTMES==0 ;QUEUE ENTRY IS A MESSAGE
.QTFKT==1 ;QUEUE ENTRY FOR FORK TERMINATION
.QTJFD==2 ;JFN DATA OR DISCONNECT
.QTTOP==3 ;TOPOLOGY CHANGE - DO AUTO DUMP/LOAD
DEFSTR (QUEFLG,1,35,18) ;FLAGS
QF%NOA==1 ;DO NOT ACK THIS MESSAGE YET TO ORION
QF%TXT==2 ;THERE IS TEXT IN THE MESSAGE BLOCK FOR OPR
;NICE QUEUE DEFINITIONS
RQMAX==^D15 ;Maximum number of minutes request can stay
; on queue
NQLEN==5 ;LENGTH OF NICE QUEUE HEADER
DEFSTR (NQMES,0,17,18) ;POINTER TO ORION MESSAGE
DEFSTR (NQPNT,0,35,18) ;POINTER TO NEXT ITEM ON LIST
DEFSTR (NQCHR,1,35,18) ;NUMBER OF CHARACTERS IN NICE MESSAGE
DEFSTR (NQNUM,1,17,18) ;REQUEST NUMBER
DEFSTR (NQRQT,2,17,17) ;Request entry time
DEFSTR (NQTXT,2,35,18) ;ADDRESS OF NICE MESSAGE TEXT
DEFSTR (NQFCN,3,17,18) ;NICE FUNCTION CODE
DEFSTR (NQOPT,3,35,18) ;NICE SUB-FUNCTION (OPTION) CODE
DEFSTR (NQREQ,4,00,01) ;THIS ENTRY HAS BEEN REQUEUED
NQ%REQ==1B0 ;THIS ENTRY HAS BEEN REQUEUED
DEFSTR (NQXTR,4,35,18) ;ADDRESS OF EXECUTOR STRING
;ORION MESSAGE DEFSTR'S
.PBVAL==1 ;OFFSET TO VALUE
DEFSTR (PBLEN,<(P2)>,17,18)
DEFSTR (PBTYP,<(P2)>,35,18)
DEFSTR (PBVAL,<1(P2)>,35,36)
SUBTTL DECnet-20 Topology Change Protocol Definitions
; MESSAGE TYPE CODES
.TPREQ==1 ;REQUEST NOTIFICATION
.TPACC==2 ;NOTIFICATION REQUEST ACCEPTED
.TPCHG==3 ;TOPOLOGY CHANGE
; FIELD TYPE CODES
.TPNOD==1 ;NODE NAME
.TPNUM==2 ;NODE NUMBER
.TPNST==3 ;NODE STATE
.TPLID==4 ;LINE ID (IN NICE FORMAT 1)
.TPLST==5 ;LINE STATE
.TPVER==6 ;PROTOCOL VERSION
.TPCNT==7 ;NUMBER OF NODE UNITS TO FOLLOW
SUBTTL Keyword Definitions for OPR Commands
;*** N.B. THESE KEYWORDS ARE NOT IN ALPHABETICAL ORDER ****
DEFINE KEYWORD,<
X ALL,ALL ;ALL
X <BOOT-PASSWORD>,SNB ;BOOT-PASSWORD
X COMPRESSED,LFC ;COMPRESSED
X <CORE-IMAGE>,LFI ;CORE-IMAGE
X COUNT,DRC ;COUNT
X COUNTS,SCT ;COUNTS
X DA11A,A11 ;DA11A
X <DEC-20>,D20 ;DEC-20
X DL11A,L1A ;DL11A
X DL11E,L1E ;DL11E
X DLV11,DLV ;DLV11
X DMC11,DMC ;DMC11
X DP11,D11 ;DP11
X DQ11,Q11 ;DQ11
X DTE20,DTE ;DTE-20
X DU11,U11 ;DU11
X DUP11,DUP ;DUP11
X DUMP,DMP ;DUMP
X <DUMP-FILE>,SNF ;DUMP-FILE
X <DUMP-LOAD>,DDL ;DUMP-LOAD
X DV11,DV1 ;DV11
X ENABLE,ENA ;ENABLE
X EXECUTOR,SEX ;EXECUTOR
X FILE,FIL ;FILE
X FOR,SHF ;FOR
X FORMAT,LFO ;FORMAT
X FROM,LFR ;FROM
X HOST,LPH ;HOST
X INITIATE,INI ;INITIATE
X KL8J,KL8 ;KL8J
X KDP,KDP ;KMC-DUP
X KDZ,KDZ ;KMC-DZ
X LINE,SLI ;LINE
X LINES,SKL ;LINES
X LOAD,LOA ;LOAD
X <LOAD-FILE>,SNL ;LOAD-FILE
X LOCAL,SLO ;LOCAL
X <LOGGING-INTERVAL>,LGI ;LOGGING-INTERNAL
X MONITORING,DSM ;MONITORING
X <MONITORING-INTERVAL>,SMO ;MONITORING-INTERVAL
X NAME,LPN ;NAME
X NCP,ACN ;NCP
X <NCP-REQUESTS>,NCR ;NCP REQUESTS
X(<NETWORK-SERVICES-PROTOCOL>,NSP) ;NETWORK-SERVICES-PROTOCOL
X(<NEW-FORMS-PROMPTING>,NFP) ;NEW-FORMS-PROMPTING
X NODE,NOD ;NODE
X NONE,NON ;NONE
X NUMBER,LP1 ;NUMBER
X OFF,SSF ;OFF
X ON,SSO ;ON
X OPERATOR,OPR ;OPERATOR
X PARAMETERS,PRM ;PARAMETERS
X PASSWORD,SPW ;PASSWORD
X <PDP-11>,P11 ;PDP-11
X <PDP-8>,P8 ;PDP-8
X (<PROTOCOL-TYPE>,SNT) ;PROTOCOL-TYPE
X QUEUE,QUE ;QUEUE
X RECEIVE,SPR ;RECEIVE
X(<RSX-20F-QUEUED-PROTOCOL>,RQP) ;RSX-20F-QUEUED-PROTOCOL
X SECONDARY,LVS ;SECONDARY
X <SECONDARY-DUMP-FILE>,SSD ;SECONDARY-DUMP-FILE
X <SECONDARY-LOAD-FILE>,SSL ;SECONDARY-LOAD-FILE
X SERVER,SNS ;SERVER
X SET,SET ;SET
X SHOW,SHW ;SHOW
X SHUT,SSS ;SHUT
X STARTING,DRS ;STARTING
X STATE,SST ;STATE
X STATUS,STS ;STATUS
X TAKE,TAK ;TAKE
X TELL,TEL ;TELL
X TERTIARY,LVT ;TERTIARY
X <TERTIARY-DUMP-FILE>,STD ;TERTIARY-DUMP-FILE
X <TERTIARY-LOAD-FILE>,STL ;TERTIARY-LOAD-FILE
X TO,DR2 ;TO
X TRANSMIT,SPT ;TRANSMIT
X USER,USR ;USER
X VIA,VIA ;VIA
X ERROR-INFORMATION,ERR ;ERROR-INFORMATION
X <LINE-COUNTERS>,LCT ;LINE-COUNTERS
X TERMINATE,TRM ;TERMINATE
X DISABLED,DAB ;DISABLED
X ENABLED,EAB ;ENABLED
X LOOPBACK,LPB ;LOOPBACK
X NCP,NCP ;NETWORK CONTROL PROGRAM
X ENTER,ENT ;ENTER (COMMAND SUBSET)
X RETURN,RET ;RETURN (TO OPERATOR COMMAND LEVEL)
X CONTROLLER-LOOPBACK,CNL ;CONTROLLER-LOOPBACK
X CABLE-LOOPBACK,CBL ;CABLE-LOOPBACK
X KNOWN,KNO ;KNOWN
X NODES,NDS ;NODES
X REMOTES,RMTS ;REMOTES
X NETWORK-TOPOLOGY,TOP ;NETWORK TOPOLOGY
X LENGTH,LNG ;LENGTH
X LOOP,LOP ;LOOP
X MIXED,MXD ;MIXED
X ONES,ONS ;ONES
X ZEROES,ZRO ;ZEROES
X WITH,WTH ;WITH
X LOGGING,LOG ;LOGGING
X AUTO-DUMP,ADM ;AUTO-DUMP
X AUTO-LOAD,ALD ;AUTO-LOAD
X MAINTENANCE,MNT ;MAINTENANCE
X EVENT-LOGGING,ELG ;EVENT-LOGGING
X DISABLE,DSL ;DISABLE
> ;END OF DEFINITION OF KEYWORDS
;NOW DEFINE THE X MACRO TO GENERATE THE NEEDED SYMBOLS
DEFINE X(A,B),<
IF1,<IFDEF .DN'B,< PRINTX ? DUPLICATE KEYWORD CODE -- .DN'B>>
.DN'B==..Z
..Z==..Z+1
>
;INITIALIZE THE COUNTER AND CALL KEYWORD TO GENERATE THE SYMBOLS
..Z==0
KEYWORD
DEFINE KEYTAB(NXT,KEY,CODE,FLAGS),<
IFB <FLAGS>,<
XWD [ASCIZ\KEY\],[XWD .DN'CODE,NXT]
>
IFNB <FLAGS>,<
XWD [EXP CM%FW!FLAGS
ASCIZ\KEY\],[XWD .DN'CODE,NXT]
>
> ;END OF KEYTAB MACRO
END