*DECK NAT$NS PROC NAT$NS; # NPU ACTIVITY TABLE FORMAT # # TITLE NAT$NS - NPU ACTIVITY TABLE TEXT. # BEGIN # NAT$NS # # ** NAT$NS - NPU ACTIVITY TABLE FORMAT. * * J.C. LEE 1981 * * THIS SYMPL TEXT CONTAINS DEFS, STATUS LIST, AND * COMMON BLOCK FOR NPU ACTIVITY TABLE FORMAT. * # CONTROL STEXT; DEF NAT$IDENT # 3 #; # TABLE IDENTIFIER # DEF NAT$SIZE # 7 #; # NPU ACTIVITY TABLE SIZE # STATUS PRISTATE # NPU PRIMARY STATE # NPS$NONO, # 0 NOT USED # NPS$LSAM, # 1 LOADING SAM # NPS$DNPU, # 2 DUMPING NPU # NPS$LNPU, # 3 LOADING NPU # NPS$DNDCB, # 4 DUMPING NDCB # ; STATUS SECSTATE # NPU SECONDARY STATE # NSS$NONO, # 0 NOT USED # NSS$WLOAD, # 1 WAITING FOR LOAD RESPONSE # NSS$WDUMP, # 2 WAITING FOR DUMP RESPONSE # NSS$WSTART, # 3 WAITING FOR START RESPONSE # NSS$WNDCB, # 4 WAITING FOR LOAD NDCB RESP. # ; STATUS NWSTIM # LEGAL NETWORK STIMULI # RQ$SAMLOAD, # NPU/IN/R (SAM LOAD) # RQ$NPULOAD, # NPU/IN/R (NPU LOAD) # NR$NPUDTD, # NPU/DT/N (DUMP) # AR$NPUDTD, # NPU/DT/A (DUMP) # NR$NPUDTL, # NPU/DT/N (LOAD) # AR$NPUDTL, # NPU/DT/A (LOAD) # NR$NPUDTS, # NPU/DT/N (START) # AR$NPUDTS, # NPU/DT/A (START) # DUMMY, ; STATUS NPUSTATE # LEGAL NPU STATES # IDLE, # IDLE # DUMPNDCB, # DUMPING NDCB # LOADSUD, # LOADING SUD # STARTSUD, # STARTING SUD # DUMPSUD, # DUMPING SUD # LOADNPU, # LOADING NPU # STARTNPU, # STARTING NPU # LOADNDCB, # LOADING NDCB # DUMPNPU, # DUMPING NPU # LOADDBS, # LOADING DUMP BOOTSTRAP # STARTDBS, # STARTING DUMP BOOTSTRAP # LOADSAM, # LOADING SAM # STARTSAM, # STARTING SAM # BADSTATE, # BAD NPU STATE # ; COMMON NAT$COM; BEGIN # NAT$COM # BASED ARRAY NAT P(NAT$SIZE); BEGIN # NPU ACTIVITY TABLE # ITEM NAT$ID U(00,00,06); # NAT IDENTIFIER # ITEM NAT$BS U(00,06,12); # NPU ACTIVITY TABLE SIZE # ITEM NAT$NCTORD U(00,18,12); # NODE CONNECTION TABLE ORDINAL # ITEM NAT$DEC U(00,33,03); # XPCB DIRECTIVE ERROR COUNT # ITEM NAT$NLBP U(00,36,12); # NAT LIST BACKWARD PTR (TSBN) # ITEM NAT$NLFP U(00,48,12); # NAT LIST FORWARD PTR (TSBN) # ITEM NAT$LPATH U(01,00,16); # LOAD PATH # ITEM NAT$SN U(01,00,08); # NODE NUMBER OF LOAD REQUESTOR # ITEM NAT$HN U(01,08,08); # COUPLER NODE NUMBER # ITEM NAT$PN U(01,16,08); # PORT NUMBER # ITEM NAT$SPN U(01,24,08); # SUBPORT NUMBER # ITEM NAT$LSN U(01,32,04); # LOAD SEQUENCE NUMBER # ITEM NAT$NTORD U(01,36,08); # NPU TABLE ORDINAL # ITEM NAT$F$SNDF B(01,45,01); # SAVE NDF FLAG # ITEM NAT$F$SEFL B(01,46,01); # SELF LOADING FLAG # ITEM NAT$F$RMTL B(01,47,01); # REMOTE LOAD FLAG # ITEM NAT$RETRYS U(01,48,03); # NPU/DT/R RETRY COUNT # ITEM NAT$STATE U(01,53,07); # NPU STATE # ITEM NAT$PSTATE S:PRISTATE(01,53,03); # PRIMARY STATE # ITEM NAT$SSTATE S:SECSTATE(01,56,03); # SECONDARY STATE # ITEM NAT$SUD U(01,59,01); # SUD INDICATOR # ITEM NAT$BC U(02,04,08); # BATCH COUNT # ITEM NAT$NDTSBN U(02,12,12); # NPU DUMP TSB NUMBER # ITEM NAT$PITSBN U(02,24,12); # TSB NUMBER OF PICB # ITEM NAT$PENDI U(02,36,12); # PICB INDEX OF END DIRECTIVE # ITEM NAT$PDIRI U(02,48,12); # CURRENT XPCB DIRECTIVE INDEX # ITEM NAT$PCBDIR U(03,00,60); # CURRENT XPCB DIRECTIVE # ITEM NAT$CODE U(03,00,04); # DIRECTIVE CODE # ITEM NAT$F$DP B(03,07,01); # SET IF DIRECTIVE PROCESSED # ITEM NAT$DBT U(03,08,03); # DUMP BLOCK TYPE # ITEM NAT$F$SUD B(03,11,01); # SUD BIT # ITEM NAT$DIRP1 U(03,12,24); # DIRECTIVE PARAMETER 1 # ITEM NAT$DIRP2 U(03,36,24); # DIRECTIVE PARAMETER 2 # ITEM NAT$LMNAME C(03,12,06); # LOAD MODULE NAME # ITEM NAT$DBA U(03,12,24); # DUMP BEGINNING ADDRESS # ITEM NAT$DBA1 U(03,12,04); # DUMP BEGINNING ADDRESS 1 # ITEM NAT$DBA2 U(03,16,20); # DUMP BEGINNING ADDRESS 2 # ITEM NAT$DEA U(03,36,24); # DUMP ENDING ADDRESS # ITEM NAT$NCBSZ U(03,12,24); # MAX NCB SIZE ALLOWED # ITEM NAT$CRRI U(04,00,30); # CRI OF CURRENT RECORD # ITEM NAT$NRRI U(04,30,30); # CRI OF NEXT RECORD # ITEM NAT$LTIMER U(05,00,24); # LOCAL TIMER IN SECONDS # ITEM NAT$GTIMER U(05,24,24); # GLOBAL TIMER IN SECONDS # ITEM NAT$SMTSBN U(05,48,12); # TSB NO. OF DUMP NDCB RESPONSE # ITEM NAT$NCBFWA U(06,00,24); # NCB FWA # ITEM NAT$LPDATE U(06,00,36); # LOAD DATE/TIME IN PACKED BIN # ITEM NAT$LDATE U(06,00,18); # LOAD DATE IN PACKED BINARY # ITEM NAT$LTIME U(06,18,18); # LOAD TIME IN PACKED BINARY # ITEM NAT$NDCBA U(06,36,24); # NDCB FWA # ITEM NAT$NDCBA1 U(06,36,04); # NDCB ADDRESS PART 1 # ITEM NAT$NDCBA2 U(06,40,20); # NDCB ADDRESS PART 2 # END END # NAT$COM # END # NAT$NS # TERM