Trailing-Edge
-
PDP-10 Archives
-
decuslib10-08
-
43,50512/nodtbl.bli
There are no other files named nodtbl.bli in the archive.
!Require file for NODTBL definitions
!THIS_IS [NODTBL] VERSION [1] EDIT [5] DATE [20,NOV,78]
%(
The format of the NODTBL segment is:
Core Address Field Comments
400000-400007 Vestigial job data area Standard
400010 Length of each entry in words
400011-?????? Entries, one after another
?????? zero To mark end of table
The first entry will be for node 'DIRECT', containing all
defaults for non-dialup nodes. There should not be a real node
by that name. The second entry will be for node 'DIALUP', with the
dialup node defaults. After the last node, there is a word of 0
to terminate a search.
)%
LITERAL NODTBL$HSO=%O'400000';
LITERAL NTBL$ST=%O'400000';
!Standard TOPS-10 start of high segment
LITERAL NODTBL$ENTLEN=NODTBL$HSO+%O'10';
LITERAL NTBL$EL=NTBL$ST+%O'10';
!Note that this is the ADDRESS of the entry length!!!
LITERAL NODTBL$BASE=NODTBL$ENTLEN+1;
LITERAL NTBL$EN=NTBL$EL+1;
MACRO NODTBL_ENTRY = BLOCK [NOD_ENTRY_LEN] FIELD (NODTBL_FIELDS)%;
!Format of a node entry in NODTBL
!Offset Field Comments
FIELD NODTBL_FIELDS=SET
NOD$ID=[%O'0',0,36,0], !NODEID SIXBIT
NOD$QDEV=[%O'1',0,36,0], !SIXBIT Device requests to this node are q'd to
NOD$ROUTE=[2,0,36,0], !Route-through node to get there
NOD$DEV2=[%FIELDEXPAND(NOD$ROUTE)], !ALTERNATE DEVICE(not used)
NOD$PHN=[%O'3',0,36,0], !PHONE NUMBER ASCIZ* Telephone number for dialup node
NOD$PHN2=[%O'7',0,36,0], !ALTERNATE PHONE NUMBER ASCIZ*(NOT USED)
NOD$TIMUP=[%O'13',0,36,0], !TIME SYSTEM COMES UP PDP-10 time format
NOD$TIMDN=[%O'14',0,36,0], !TIME SYSTEM GOES DOWN PDP-10 time format
NOD$CONTO=[%O'15',18,18,0], !CONNECT-INIT TIMEOUT Seconds (halfword)
NOD$REPTO=[%O'15',0,18,0], !CONNECT-REPLY TIMEOUT Seconds (halfword)
NOD$INACTO=[%O'16',18,18,0], !INACTIVITY TIMEOUT Seconds (halfword)
NOD$REQUE=[%O'16',0,18,0], !REQUE /AFTER:+## QUEUE time format
NOD$CPPN=[%O'17',0,36,0], !PPN to connect to
NOD$OBJTYPE=[%FIELDEXPAND(NOD$CPPN,0),18,18,0], !Object type of listener
NOD$PROGNO=[%FIELDEXPAND(NOD$CPPN,0),0,18,0], !Programmer #
NOD$SON=[%FIELDEXPAND(NOD$CPPN)], !unused by netspl (signon file name)
NOD$CNAME=[%O'20',0,36,0], !Task name to connect to
NOD$SOF=[%FIELDEXPAND(NOD$CNAME)], !Unused by netspl (signoff file name)
NOD$PWD=[%O'21',0,36,0], !PASSWORD ASCIZ*
NOD$CONN=[%O'25',0,36,0], !RECONNECT INTERVAL
!QUEUE time format If we haven't heard from
! this node in this much time, try to connect.
NOD$WHERE=[%O'26',0,36,0], !GEOGRAPHICAL LOCATION ASCIZ* For user's info
NOD$SYSTEM=[%O'32',0,36,0], !OPERATING SYSTEM TYPE i.e TOPS10,RSTS,RSX11M
NOD$HELP=[%O'33',0,36,0], !CONTACT PERSON (remote) ASCIZ (up to 39 chars)
NOD$HOLD=[%O'43',0,36,0], !TIME TO HOLD UNTIL U.D.T.
! If we already tried to connect and failed,
! do not try again until this time.
! This gets set by NETSPL.
NOD$FLG=[%O'44',0,36,0], !FLAGS
!(bit 0 leftmost) IF 0 IF 1
NOD$F_TYPE=[%O'44',35,1,0], !NODE TYPE 2780 NETSPL
! The next 4 bits determine what requests we will process now
NOD$F_RSND=[%O'44',34,1,0], !REMOTE SEND refused allowed
NOD$F_RRTV=[%O'44',33,1,0], !REMOTE RECEIVE refused allowed
NOD$F_LSND=[%O'44',32,1,0], !LOCAL SEND deferred allowed
NOD$F_LRTV=[%O'44',31,1,0], !LOCAL RECEIVE deferred allowed
! The next 2 bits determine what requests are legal locally
NOD$F_QSND=[%O'44',30,1,0], !RMCOPY SEND forbidden allowed
NOD$F_QRTV=[%O'44',29,1,0], !RMCOPY RECEIVE forbidden allowed
! Some of the above bits may be modifyable by NETSPL.
NOD$TLC=[%O'45',0,36,0], !TIME OF LAST CONNECT Universal DATE/TIME
!modified by NETSPL
NOD$LIMIT=[%O'46',0,36,0], !Maximum file size for files sent to this node.
NOD$TFLG=[%O'47',0,36,0], !TEMPORARY FLAGS (SAME AS PERMANENT ONES)
NOD$TF_OVERRIDE=[%O'47',35,1,0], !Override time-of-day
NOD$TF_RSND=[%O'47',34,1,0], !REMOTE SEND REFUSED ALLOWED
NOD$TF_RRTV=[%O'47',33,1,0], !REMOTE RECEIVE REFUSED ALLOWED
NOD$TF_LSND=[%O'47',32,1,0], !LOCAL SEND DEFERRED ALLOWED
NOD$TF_LRTV=[%O'47',31,1,0], !LOCAL RECEIVE DEFERRED ALLOWED
NOD$TF_SETABLE=[%O'47',31,4,0], !THESE BITS CAN BE SET BY OPERATOR OF NETSPL
NOD$TF_CHANGED=[%O'47',28,1,0], !This has been changed by the operator
NOD$TLIMIT=[%O'50',0,36,0] !TEMPORARY MAXIMUM FILE SIZE FOR FILES SENT TO THIS NODE
!46-47 2 words of scratch space NETSPL may use this to record
! temporary information about inactive
! nodes. This is not modified by the
! NODTBL update program.
! ASCIZ strings in this table are zero-filled, 19 characters, maximum unless
! otherwise indicated
TES; !!!END OF NODTBL DEFINITONS
!!!
LITERAL NOD_ENTRY_LEN=%O'51'; !# of words in NODE entry in NODTBL