Enter your search terms Submit search form
	Web pdp-10.trailing-edge.com

.TITLE NETMS - DEFINE NETWORK SYMBOLS FOR VNP20
;
; FIRST .MCALL ALL OF THE USEFUL MACROS FROM NETLIB.MAC
;
.MCALL CCBDF$,PDVDF$,NTLDF$,SLTDF$,TTDF$,RMDDB$
;
; CALL EACH MACRO, CAUSING SYMBOLS TO BE DEFINED GLOBALLY.
;
	.LIST	ME
;
	CCBDF$	<:>,<=>,LIST
	PDVDF$	<=>,<:>,LIST
	NTLDF$	<:>,<=>,LIST
	SLTDF$	<=>,<:>,LIST
	TTDF$	<:>,<=>
	RMDDB$	<:>,<=>
;
;
; DATA DESCRIPTOR BLOCK DEFINITIONS:
;
	.ASECT
.=0
N$ACQ::	.BLKW	2	; ACP QUEUE LISTHEAD
N$TCB::	.BLKW	1	; ACP TCB ADDRESS
N$ICF::	.BLKW	1	; INTERCEPT SWITCH  (ADDRESS OF PHYSICAL LINK BLOCK)
N$LNI::	.BLKW	1	; LOOPBACK SWITCH   (ADDRESS OF PHYSICAL LINK BLOCK)
N$TMP::	.BLKW	4	; SCRATCH STORAGE AREA
N$LVC::	.BLKW	2	; LOGICAL LINK ADDRESS TABLE (LENGTH & ADDRESS)
N$PLD::	.BLKW	2	; PHYSICAL LINK DESCRIPTOR (NUMBER & ADDRESS)
N$NOD::	.BLKW	2	; NODE NAME DESCRIPTOR  (NUMBER & ADDRESS)
N$VER::	.BLKW	2	; PASSWORD DESCRIPTOR   (NUMBER & ADDRESS)
N$STS::	.BLKW	2	; STATISTICS DESCRIPTOR (LENGTH & ADDRESS)
	.PSECT
 
;
; PHYSICAL LINK BLOCK DEFINITIONS
;
	.ASECT
.=0
P$LST::	.BLKW	1	; STATE AND FLAGS
P$LCD::	.BLKB	1	; RECOVERY FLAGS
P$TIM::	.BLKB	1	; RECOVERY TIMER
P$CHN::	.BLKB	1	; LOGICAL LINE NUMBER
P$CNT::	.BLKB	1	; NUMBER OF MESSAGES QUEUED
P$PFQ::	.BLKW	1	; PENDING CONTROL FUCTION QUEUE
P$NOD::	.BLKW	1	; POINTER TO ADJACENT NODE
P$FRQ::	.BLKB	1	; FUNCTIONS REQUESTED
P$FSP::	.BLKB	1	; FUNCTIONS REQUESTED
P$LEN::	.BLKW	0	; LENGTH OF PHYSICAL LINK TABLE
	.PSECT
 
;
; PHYSICAL LINK FLAGS AND STATES
;
; STATES::
;
PS$OFF	== 0		;OFF
PS$STR	== 1		;STARTING
PS$WT	== 2		;WAIT
PS$NTI	== 3		;NOT INITIALIZED
PS$VER	== 4		;VERIFICATION WAIT
PS$UP	== 5		;UP
;
; FLAGS::
;
PF$OFF	== 0		;OFF STATE DESIRED
PF$UP	== 1		;UP STATE DESIRED
PF$STA	== 3		;MASK TO DESIRED STATE
 
PF$ENB	== 200		;LINK HAS BEEN ENABLED
PF$EIP	== 100		;CONTROL ENABLE FUNCTION IN PROGRESS
PF$RVR	== 40		;VERIFICATION REQUESTED WHEN NODE INIT SENT
 
;
; RECOVERY FLAGS::
;
RF.CTL	== 3		;COUNT OF OUTSTANDING CONTROL REQUESTS
RF.CLN	== 0		;LOGICAL LINK CLEAN UP REQUIRED
 
RF.WTM	== 30		;MASK FOR ALLOCATION FAILURE INTO WAIT STATE
RF.WTS	== 10		;STOP FUNCTION FLAG
RF.WTD	== 20		;DISABLE FUNCTION FLAG
 
RF.TIM	== 377*400	;MASK FOR TIMEOUT VALUE
RF.TM0	== 1*400		;INITIAL TIMEOUT VALUE
 
;
; FUNCTIONS SUPPORTED BY ADJACENT NODE
;
; NOTE::	THESE DEFINTIONS ARE SYNCHRONIZED WITH THE PROTOCOL
;	DEFINITIONS.
;
PF$SRT	== 1		; ROUTE THROUGH
PF$SLI	== 2		; LINK INTERRCEPT
PF$SRI	== 4		; ROUTING INTERCEPT
PF$SUB	== 10		; MESSAGE UNBLOCKING
;
; FUNCTIONS REQUESTED FROM ADJACENT NODE
;
; NOTE:	THESE DEFINITIONS ARE SYNCHRONIZED WITH THE PROTOCOL
;	DEFINITIONS.
;
PF$RVE	== 1		;REQUEST VERIFICATION MESSAGE
PF$RLI	== 2		;REQUEST LINK INTERCEPT (MEANS THIS IS LEVEL 1 NSP)
PF$RRI	== 4		;REQUEST ROUTING INTERCEPT
 
;
; NODE DATA BASE DEFINTIONS
;
	.ASECT
.=0
D$FLG::	.BLKW	1	; NODE ENTRY FLAGS
D$CHN::	.BLKW	1	; POINTER TO PHYSICAL LINK BLOCK
D$USE::	.BLKB	1	; NUMBER OF LOGICAL LINKS
D$LNG::	.BLKB	1	; LENGTH OF NODE NAME
D$NAM::	.BLKW	3	; NODE NAME
D$LEN::	.BLKW	0	; LENGTH OF NODE ENTRY
	.PSECT
 
;
; NODE ENTRY FLAGS DEFINTIONS:
;
DF$TMP	== 100000	; THIS IS THE SCRATCH NODE NAME ENTRY
DF$LCL	==  40000	; THIS IS THE LOCAL NODE NAME
DF$ADJ	==  20000	; THIS IS AN ADJACENT NODE
DF$REM	==  10000	; THIS IS A NON ADJACENT NODE
DF$LNK	==   4000	; REMOVE ENTRY WHEN USE COUNT GOES TO ZERO
 
DF$FRE	== DF$LCL!DF$ADJ!DF$REM ; MASK TO DETECT A FREE NODE ENTRY
 
;
; PASSWORD DESCRIPTOR ENTRY DEFINITIONS
;
	.ASECT
.=0
V$FLG::	.BLKW	1	; PASSWORD VALIDITY FLAGS
V$RCV::	.BLKB	8.	; RECEIVE PASSWORD
V$XMT::	.BLKB	8.	; TRANSMIT PASSWORD
V$LEN::	.BLKW	0	; LENGTH OF PASSWORD ENTRY
	.PSECT
 
;
; VALIDITY FLAGS DEFINITIONS::
;
VF$RCV	== 100000	; RECEIVE PASSWORD IS VALID
VF$XMT	==  40000	; TRANSMIT PASSWORD IS VALID
 
 
;
; STATISTICS DESCRIPTOR ENTRY DEFINITIONS
;
	.ASECT
.=0
S$SEC::	.BLKW	1	; SECONDS SINCE LAST ZEROED
S$UMS::	.BLKW	1	; USER MESSAGES SENT
S$UMR::	.BLKW	1	; USER MESSAGE RECEIVED
S$EMR::	.BLKW	1	; EXTRANIOUS MESSAGES RECEIVED
S$NKS::	.BLKW	1	; NAKS TRANSMITTED
S$FMT::	.BLKW	1	; FORMAT ERRORS
S$RES::	.BLKW	1	; RESOURCE ALLOCATION FAILURES
S$SNI::	.BLKW	1	; SUCESSFUL NODE INITS
S$UNI::	.BLKW	1	; UNSUCCESSFUL NODE INITS
S$LNK::	.BLKW	1	; CURRENT NUMBER OF LOGICAL LINKS
S$MLK::	.BLKW	1	; MAXIMUM NUMBER OF LOGICAL LINKS
	.BLKW	5	; RESERVED STORAGE
S$LEN::	.BLKW	0	; LENGTH OF THE STATISTICS BLOCK
	.PSECT
	.END