*DECK TEXTCS PROC TEXTCS; # TITLE TEXTCS - SYMPL TEXT FOR CS. # BEGIN # TEXTCS # # ** TEXTCS - SYMPL TEXT FOR CS. * * D. G. DEPEW 81/08/12. * C. J. BRION 82/04/23. * A. LIM 82/06/10. * * THIS PROC GENERATES A SYMPL TEXT FOR COMPILING CS. * IT CONTAINS DEFINITIONS OF SYMBOLS, PARAMETERS, COMMON BLOCKS ETC. * USED THROUGHOUT THE PROGRAM. # CONTROL STEXT ; # ** GLOBAL DEFINITIONS FOR THE CS PROGRAM # DEF OCBSIZ$ # 10 #; # NUMBER OF WORDS IN OCB # DEF ACNESIZ$ # 2 #; # NUMBER WORDS PER ACN ENTRY # DEF HBFESIZ$ # 9 #; # HISTORY BUFFER ENTRY SIZE # DEF MINACN$ # 2 #; # MINIMUM ACN ALLOWED TO CS # DEF MAXACN$ # 11 #; # MAXIMUM NUMBER CONNECTIONS # DEF MXHSBLCNT$ # 90 #; # MAX NUM LINES IN HIS BUF# DEF HOPORD$ # 1 #; # HOP OCB ORDINAL # DEF DEFPL$ # 22 #; # DEFAULT HIST TERM PL # DEF HOPIPL$ # 30 #; # INTERNAL HOP PL # DEF HOPTPL$ # 32 #; # HOP TURN PAGE LENGTH # DEF NPCBSZ$ # 8 #; # NUMBER OF WORDS IN NPUCB # DEF AUDGR1$ # 1 #; # AUDIENCE GROUP 1 # DEF AUDGR2$ # 2 #; # AUDIENCE GROUP 2 # DEF AUDGR3$ # 3 #; # AUDIENCE GROUP 3 # DEF AUDGR4$ # 4 #; # AUDIENCE GROUP 4 # DEF AUDGR6$ # 6 #; # AUDIENCE GROUP 6 # DEF CSPID$ # 03 #; # CS PROGRAM I.D. FOR DUMPS # DEF DTIME$ # 30 #; # DELAY TIME FOR NEED GO MSG # DEF DEFCP$ # 100 #; # DEFAULT CP VALUE # DEF DEFBU$ # 0 #; # DEFAULT BU VALUE # DEF MINCP$ # 50 #; # MINIMUM CP VALUE # DEF MAXCP$ # 100 #; # MAXIMUM CP VALUE # DEF MINBU$ # 0 #; # MINIMUM BU VALUE # DEF MAXBU$ # 500 #; # MAXIMUM BU VALUE # # ** CSWDF - WORKLIST DEFINITIONS. * * THIS STATUS LIST DEFINES THE SYMBOLS TO BE USED IN MAKING * WORKLIST REQUESTS. * THE ORDER IN THE STATUS LIST SETS THE PRIORITY OF THE WORKLIST * REQUEST, FIRST IS HIGHEST PRIORITY, LAST IS LOWEST PRIORITY. * THE ORDER CAN BE CHANGED (REARRIANGE PRIORITIES) AND THE PROGRAM * RECOMPILIED WITHOUT ANY OTHER CHANGES. # STATUS CSWDF SCRTR, #RETURN TIMER REQUEST # SACNI, #CONTROL NETWORK INTERFACE # SOEOP, #EXECUTE OVERLAY PROGRAM # CTDNQ, CTSNR, #START NCF READ REQUEST # CSDNS, #DISPATCH NPU SUPERVISION # CSDOS, # DISPATCH OPERATOR SUPERVISION# CCDQE, # DISPATCH CONN TRAFFIC # CEDEQ, # IDENTIFY EVENT ENTRY # CSDPE, # DISPATCH PROTOCOL EVENT # CSDNR, # DETERMINE NPU REQUIREMENT # CSDRC, # DISPATCH ROUTED COMMAND # CSROC, # RECOGNIZE OPERATOR COMMAND # CSRSS, # ROUTE SOLICITED STATUS # COBOE, # BROADCAST OP EVENT # COROO, # ROUTE OP OUTPUT # COGHL, # GET HISTORY LINES # DUMMY, # DUMMY ENTRY FOR DISABLING # ; # ** CSODF - OVERLAY DEFINITIONS. * * THIS STATUS LIST DEFINES THE SYMBOLS TO BE USED AS OVERLAY NUMBERS * IN MAKING A TYPE 2 (OVERLAY ENTRY POINT CALL) WORKLIST REQUEST. * THE ORDER IN THE STATUS LIST SETS THE OVERLAY NUMBER, WITH THE * FIRST ONE BEING OVERLAY 0,0, SECOND 1,0 ETC... * THE ORDER CAN BE CHANGED IF SO DECIDED TO CHANGE THE OVERLAY * NUMBERS, AND THE PROGRAM RECOMPILED WITHOUT ANY OTHER CHANGES. # STATUS CSODF CLMAN, # 0,0- MAIN OVERLAY # CLEVT, # 1,0- EVENT PROCESSING OVERLAY # CLOIO, # 2,0- OPERATOR I/O PROCESSING OVERLAY # CLCMR, # 3,0- COMMAND RECOGNITION OVERLAY # CLCMP, # 4,0- COMMAND PREPROCESSING OVERLAY # CLOSS, # 5,0- OPERATOR SUPERVISION SM OVERLAY # ; # * THE FOLLOWING STATUS LISTS ARE ENTRY POINT DEFINITIONS FOR THE * VARIOUS OVERLAYS WE DEFINED IN THE ABOVE LIST (CSODF). * EACH STATUS LIST DEFINES THE SYMBOLS TO BE USED AS ENTRY POINT * NUMBERS WITHIN THE OVERLAY IN MAKING A WORKLIST REQUEST. * THE ORDER IN THE LIST SETS THE ENTRY POINT NUMBER, AND THE * ORDER CAN BE CHANGED, AND THE PROGRAM RECOMPILED WITHOUT * ANY OTHER CHANGES. # # * EPEVT - ENTRY POINT DEFINITIONS FOR EVENT PROCESSING OVERLAY. # STATUS EPEVT CSRSS, # ROUTE SOLICITED STATUS # CEDEQ, # IDENTIFY EVENT ENTRY # ; # * EPOIO - ENTRY POINT DEFINITIONS FOR OPERATOR I/O PROCESSING OVL. # STATUS EPOIO CCDQE, # DISPATCH CONNECTION TRAFFIC # COBOE, # BROADCAST OPERATOR EVENT # COGHL, # GENERATE HISTORY LINE # COROO, # ROUTE OPERATOR OUTPUT # ; # * EPCMR - ENTRY POINT DEFINITIONS FOR COMMAND RECOGNITION OVL. # STATUS EPCMR CSROC, # RECOGNIZE OPERATOR COMMAND # ; # * EPCMP - ENTRY POINT DEFINITIONS FOR COMMAND PREPROCESSOR OVL. # STATUS EPCMP CSDNR, # DETERMINE NPU REQUIREMENT # CSDRC, # DISPATCH ROUTED COMMAND # ; # * EPOSS - ENTRY POINT DEFINITIONS FOR OPERATOR SUPERVISION SM OVL. # STATUS EPOSS CSDPE, # DISPATCH PROTOCOL EVENT # CSDOS, # DISPATCH OPERATOR SUPERVISION # ; # ** SUPSTAT -SUPERVISION STATES OF NPU. * * THIS STATUS LIST DEFINES THE SYMBOLS TO BE USED FOR SETTING THE * SUPERVISION STATE OF THE NPUCB. # STATUS SUPSTAT SUPLOST, # SUPERVISION LOST # SUP, # SUPERVISED # NCFMIS, # NCF MISMATCH # LEVMIS; # LEVEL MISMATCH # # ** SMID - SUPERVISORY MESSAGE IDENTIFICATION LIST. * * THIS LIST DICTATES THE INTERNAL IDENTIFICATION CODES FOR ALL * SUPERVISORY MESSAGE TRAFFIC, AS WELL AS VARIOUS INTERNAL TYPED * TRAFFIC FOR THE CS PROGRAM. THIS LIST MUST MATCH THE PSFCTBL * ARRAY DEFINITION IN THE PROC *CSDDNT*. ANY CHANGE TO THIS LIST * OR TO THE PSFCTBL ARRAY DEFINITION MUST CAUSE A COMPARABLE * CHANGE TO THE OTHER. SERIOUS CIRCUMSTANCES MAY OCCUR OTHERWISE. # STATUS SMID CNFTE, # 0 # CNFRCTM, # 0.1# SUPCB, # 1 # SUPIN, # 2 # # UNSOLICITED PFCSFCS # # ******************* # ALMOP, # 3 # LOGER, # 4 # CDILI, # 5 # CDILL, # 6 # CDITE, # 7 # CDITR, # 8 # MSGOP, # 9 # STILI, # 10 # STINP, # 11 # STITR, # 12 # STIAP, # 12.1 # STITE, # 12.2 # STUTE, # 13 # STULI, # 14 # STULL, # 15 # STUTR, # 16 # STUNP, # 17 # STUCP, # 18 # STUVC, # 19 # OLDDT, # 20 # SUPGO, # 21 # # CONNECTION TRAFFIC PFCSFCS # # ************************** # SHUINS, # 22 # CONREQ, # 23 # HOPSTRT, # 24 # CONCB, # 25 # FCACK, # 26 # INTRUSR, # 27 # FCINA, # 28 # FCINIT, # 29 # FCNAK, # 30 # TCHTCH, # 31 # HOPALT, # 32 # HOPBRK, # 33 # HOPCMD, # 34 # HOPENDD, # 35 # HOPIG, # 36 # HOPPAGE, # 37 # CONENDN, # 38 # BIMARK, # 38.1 # # OPERATOR SUPERVISION PFCSFCS # # **************************** # HOPDU, # 39 # HOPTRCE, # 40 # HOPNOTR, # 41 # HOPREL, # 42 # HOPRS, # 43 # HOPDB, # 43.1 # HOPDE, # 43.2 # TRSNPN, # 44 # TRSTRN, # 45 # LISLIN, # 46 # LISNPN, # 47 # LLSLLN, # 48 # LLSNPN, # 49 # CPSCPN, # 50 # CPSNPN, # 51 # NPSNPN, # 52 # TESLIN, # 53 # TESLLN, # 54 # TESNPN, # 55 # TESTEN, # 56 # VCSLIN, # 57 # VCSNPN, # 58 # VCSVCN, # 59 # MSGLIN, # 60 # MSGLLN, # 61 # MSGNPN, # 62 # MSGTEN, # 63 # MSGLIA, # 64 # MSGLLA, # 65 # MSGTEA, # 66 # OLDINN, # 67 # OLDINA, # 68 # # SOLICITED STATUS PFCSFCS # # ************************ # STUTEN, # 69 # STULIN, # 70 # STULLN, # 71 # STUTRN, # 72 # STUNPN, # 73 # STUCPN, # 74 # STUVCN, # 74.1 # # IGNORE THESE PFCSFCS # # ******************** # CTRTCD, # 75 # CTRCCD, # 75.1 # CTRCHRN, # 75.2 # CTRCHRA, # 75.3 # CTRCTDN, # 75.4 # CTRCTDA, # 75.5 # CTRRTCA, # 75.6 # CTRRCCA, # 75.7 # # OUTGOING TRAFFIC PFCSFCS # # ************************ # CNFTEN, # 76 # CNFRCTN, # 76.1# CNFTEA, # 77 # CNFRCTA, # 77.1# SUPGON, # 78 # MSGLI, # 79 # MSGLL, # 80 # MSGNP, # 81 # MSGTE, # 82 # CPSCP, # 83 # CPSNP, # 84 # DIBLI, # 85 # DIBLL, # 86 # DIBTE, # 87 # DIBTR, # 88 # DIBVC, # 89 # ENBLI, # 90 # ENBLL, # 91 # ENBTE, # 92 # ENBTR, # 93 # ENBVC, # 94 # LISLI, # 95 # LISNP, # 96 # LLSLL, # 97 # LLSNP, # 98 # NPSNP, # 99 # OLDTM, # 100 # SUPINN, # 101 # SUPINA, # 102 # HOPDIS, # 103 # HOPLG, # 104 # TESLI, # 105 # TESLL, # 106 # TESNP, # 107 # TESTE, # 108 # TRSNP, # 109 # TRSTR, # 110 # VCSLI, # 111 # VCSNP, # 112 # VCSVC, # 113 # CONREQN, # 114 # CONENDR, # 115 # NPIIN, # 115.1 # OLDIN, # 115.2 # # INTERNAL PFCSFCS # # ********************* # STUFIN, # 115.3 # CMDTXT, # 116 # CTRLON, # 117 # CTRLOFF, # 118 # DATAIN, # 119 # HOPSRTN, # 120 # CONCBW, # 121 # TTEXT, # 122 # HIST, # 122.1 # SUPINUN, # 123 # SUPGOI, # 124 # ; # ** OVLST - STATES ALLOWED FOR THE DIAGNOSTIC PROGRAM IN NPU. # STATUS OVLST IDLE, # IDLE, NO OPERATOR CONNECTED # BUSY, # OPERATOR CONNECTED # LOADING; # AWAITING RESPONSE TO CONNECT REQUEST # # ** ACNST - STATES ALLOWED FOR AN ACN ENTRY. * * THIS STATUS LIST DEFINES THE ALLOWED STATES FOR AN ACN ENTRY. # STATUS ACNST INACT, # INACTIVE # CREATE, # CREATE IN PROGRESS # ACTIVE, # BOTH INPUT AND OUTPUT OK # COMMAND, # COMMAND IN PROGRESS # BREAK, # BREAK OUTSTANDING # ENDED, # END IN PROGRESS # BROKEN, # CONNECTION BROKEN # CLEARI; # CLEAR INPUT # # ** HCNST - STATES ALLOWED FOR THE HOP ACN ENTRY. * * THIS STATUS LIST DEFINES THE ALLOWED STATES FOR THE ACN LIST * ENTRY FOR THE HOP. BECAUSE WE COMMUNICATE WITH THE HOP VIA A * TOTALLY DIFFERENT PROTOCOL THAN THAT FOR NOPS (WHO ARE TERMINAL * USERS), A DIFFERENT SET OF STATES ARE REQUIRED. # STATUS HCNST INACT, # INACTICE, NOT ASSIGNED # CREATE, # HOP/START IN PROGRESS # ACTIVE, # BOTH INPUT AND OUTPUT ALLOWED # COMMAND, # COMMAND IN PROGRESS,ONLY OUTPUT ALLOWED # BREAK, # BREAK OUTSTANDING # ENDED, # HOP/END IN PROGRESS # RESTART, # START WHILE END IN PROGRESS # STARTEND, # END WHILE START IN PROGRESS # STARTBRK, # BREAK WHILE START IN PROGRESS # RESBREAK; # START + BREAK WHILE END IN PROGRESS # # ** OPTYP - OPERATOR TYPES. * * THIS STATUS LIST DEFINES THE TYPES OF OPERATORS SUPPORTED BY CS. # STATUS OPTYP HOP, # HOST OPERATOR # NOP, # NPU OPERATOR # DOP; # DIAGNOSTIC OPERATOR # # ** CSINTR - MONITOR ROUTINE INTERRUPT LOCATIONS. * * CSINTR IS A COMMON BLOCK CONTAINING A GROUP OF WHOLE WORD ITEMS * THAT FUNCTION AS INTERRUPT CELLS FOR THE ROUTINES THAT ARE CALLED * BY THE STATUS WORKLIST PROCESSOR TO PROCESS ONE OR MORE QUEUES. * (SOME QUEUES ARE PROCESSED BY MONITOR TYPE ROUTINES AND OTHER * QUEUES (OF LOWER PRIORITY) ARE PROCESSED BY WORKLIST ROUTINES.) * THESE CELLS PROVIDE A LINKAGE BETWEEN ONE OR MORE QUEUES AND A * SINGLE, GIVEN MONITOR ROUTINE. THIS ASSOCIATION IS MADE AT * INITIALIZATION TIME WHEN TABLES *WDF* AND *QWD* (IN SSTEXT) ARE * BUILT BY PROC CSIBWD. WHENEVER THE STATUS WORKLIST PROCESSOR IS * WATCHING A GIVEN INTERRUPT CELL AND THAT CELL BECOMES OR IS NON- * ZERO, THE CORRESPONDING MONITOR ROUTINE IS CALLED. THE MONITORS * THEMSELVES DETERMINE WHEN A GIVEN CELL WILL BE WATCHED VIA THE * FORMAL RETURN PARAMETER ARRAY *SWTESS* (COMMOM DECK). WHENEVER AN * ENTRY IS PLACED IN A GIVEN QUEUE, THE ASSOCIATED INTERRUPT WORD * IS INCREMENTED. (NOT ALL MONITOR ROUTINES ARE TRIGGERRED BY THESE * INTERRUPT CELLS. OTHERS ARE TRIGGERRED BY ,E.G., THE NSUP WORD OR * THE FIRST WORD OR IN POINTER OF THE NCF FET.) # COMMON CSINTR; BEGIN ITEM ICSTSNR I; # INTERRUPT FOR PROC CSTSNR # END # ** CSCB - CS PROGRAM CONTROL BLOCK. * * THE CS CONTROL BLOCK IS A COMMON BLOCK THAT CONTAINS PROGRAM * WIDE INFORMATION. # COMMON CSCB; BEGIN # **** # ITEM CRNT$DPN I; #CURRENT DUMP NUMBER # ITEM CRNT$NIN I; #CURRENT INVOCATION NUR # ITEM CSACNOP U; #CONTROL NOP OCB ORDINAL # ITEM CSTRACE U; #COUNT OF TRACE MSGS # ITEM CSSTATE B; #STATE OF CS PROGRAM # ITEM CSNPCNT U; #COUNT OF NPUCBS DEFINED # ITEM CSNPSUP U; #COUNT OF NPUS SUPERVISED # ITEM CSNCFVER C(20); # NCF FILE VERSION # ITEM CSNCFLEV C(3); # NCF VERSION LEVEL # ITEM DBGFLAG B; # DEBUG FLAG # ITEM CSCP U; # CS CONTROL CARD CP VALUE # ITEM CSBU U; # CS CONTROL CARD BU VALUE # # **** # END # ** *E ** TABLES - MEMORY MANAGEMENT COMMON BLOCK. * * A COMMON BLOCK OF BASED-ARRAY POINTER WORD AND LENGTH FOR TABLES/Q * USED BY THE TABLE-MANAGER. # COMMON TABLES; BEGIN # TABLES # ITEM MEMLOC I; # BEGINNING MEMORY LOC OF MANAGED AREA # ITEM FL I; # CURRENT TOTAL FIELD LENGTH # # ** *E ** LRI - LINE RECORD INDEX. * * THE LINE RECORD INDEX IS A TABLE THAT TRANSLATES AN NPU NODE ID * AND PORT NUMBER INTO THE RELATIVE PRU ADDRESS OF THE CORRESPONDING * LINE RECORD IN THE NCF. THE TABLE IS CREATED BY NDL AND USED BY * CS DURING TERMINAL CONFIGURATION, AND IS PASSED TO CS VIA THE NCF. * THE TABLE IS DESCRIBED IN APPENDIX F OF THE NDL ERS. THE ENTRY * SIZE IS FIXED AT ONE WORD PER ENTRY. THE TABLE HEADER IS NOT USED * AND IS DISCARDED BY CS. A DUMMY LAST ENTRY IS ADDED DURING * INITIALIZATION. THIS ENTRY CONTAINS AN NPU NODE ID OF 255 AND A * PORT NUMBER OF 255 (HIGHEST VALID PORT NUMBER IS 254). THIS * INSURES THAT THE SEARCH OF THE LINE RECORD INDEX ALWAYS GETS A HIT * (AT LEAST ON THE LAST ENTRY). A DUMMY FIRST ENTRY IS ALSO ADDED * DURING INITIALIZATION. THIS ENTRY IS ALL ZEROES AND ENSURES THAT * THE SEARCH OF THE LINE RECORD INDEX FOR A LARGER CONCATENATED * NPU/PORT IS NEVER SATISFIED BY THE FIRST ENTRY (ELIMINATES SOME * SPECIAL CASING). * * * THE FOLLOWING IS THE FORMAT OF A LINE RECORD INDEX ENTRY. EACH * ENTRY IS ONE WORD LONG. * * * 1 2 3 4 5 * 012345678901234567890123456789012345678901234567890123456789 *TEXT *T,8/LINID,8/LIPORT,8/LIGC,12/,24/LIRPA *ENDTEXT # BASED ARRAY LRI [00:00] S(1); BEGIN # **** # *CALL LINCF # **** # END ITEM LRIL; #LENGTH OF LINE RECORD INDEX # # ** ** OCB - OPERATOR CONTROL BLOCK. * * THE OPERATOR CONTROL BLOCK MANAGED TABLE CONTAINS AN ENTRY FOR * EACH OPERATOR THAT IS TO BE CONNECTED TO THIS CS. INITIAL IM- * PLEMENTATION OF R7 CS WILL ALLOW TEN TERMINAL OPERATORS (NOPS) * AND ONE HOST OPERATOR (HOP). * * THE FOLLOWING IS THE FORMAT OF AN OPERATOR CONTROL BLOCK. EACH * ENTRY IS THREE WORDS LONG. * * * 1 2 3 4 5 * 012345678901234567890123456789012345678901234567890123456789 *TEXT *T,WORD0,42/TNAM,12/ACN,6/ORD *T,WORD1,42/UNAM,2/O,8/NCNT,1/C,1/N,6/ *T,WORD2,18/VERB,8/CNP1,8/CNP2,8/PL,1/S,9/,8/SDCNT *ENDTEXT # BASED ARRAY OCB [01:MAXACN$] S(OCBSIZ$); BEGIN # **** # ITEM OC$WORD U(00,00,60); #FULL WORD REFERENCE # ITEM OC$WORD1 U(01,00,60); #FULL WORD 1 REF # ITEM OC$WORD2 U(02,00,60); #FULL WORD 2 REF # ITEM OC$TNAM C(00,00,07); #TERMINAL NAME # ITEM OC$SVCNAM C(00,00,05); #SVC NAME # ITEM OC$ACN U(00,42,12); #APPL CONNECTION NUMBER # ITEM OC$ORD U(00,54,06); #OCB ORDINAL VALUE # ITEM OC$UNAM C(01,00,07); #USER NAME # ITEM OC$TYPE S:OPTYP(01,42,02); #OPERATOR TYPE # ITEM OC$NCNT U(01,44,08); #AFFECTED NPU COUNT # ITEM OC$PAGEC U(01,52,02); # RIGHT K-DISPLAY PAGE NUM # ITEM OC$RPL U(01,54,06); # RIGHT K-DISPLAY LENGTH # ITEM OC$VERB C(02,00,03); #CURRENT CMD VERB # ITEM OC$UVERB U(02,00,18); ITEM OC$CNPU U(02,18,08); #CURRENT CMD FOR NPU # ITEM OC$PL U(02,26,08); #PAGE LENGTH AT TERMINAL # ITEM OC$STATE B(02,34,01); #STATE OF THE OCB # ITEM OC$WC U(02,36,06); # SM CM WORD COUNT # ITEM OC$CBPD B(02,42,01); #CB PENDING FLAG # ITEM OC$NTO B(02,43,01); #NO TIMEOUT FLAG # ITEM OC$TLC U(02,48,12); # SM TLC VALUE # ITEM OC$SM I(03,00,60); # SM FIRST WORD # # **** # END ITEM OCBL; #LENGTH OF OCB TABLE # # ** ** ACN - APPLICATION CONNECTION NUMBER LIST. * * THE ACN LIST CONTAINS AN ACN ENTRY FOR EACH OPERATOR CONNECTION * TO CS. EACH ENTRY CONTAINS INFORMATION REGARDING THE CONNECTION. * * THE FOLLOWING IS THE FORMAT OF AN ACN LIST ENTRY. EACH ENTRY * IS TWO WORDS LONG. * * * 1 2 3 4 5 * 012345678901234567890123456789012345678901234567890123456789 *TEXT *T,WORD0,1/I,4/CST,7/,18/ABN,12/DBZ,18/ACN *T,WORD1,3/,6/BKCNT,6/BLCNT,6/ABL,9/,6/PCHAR,3/,1/G,2/,9/WBCNT,9/PL *ENDTEXT * * # BASED ARRAY ACN [01:MAXACN$] S(ACNESIZ$); BEGIN # **** # ITEM ACN$WORD0 U(00,00,60); # FULL WORD0 REFERENCE # ITEM ACN$INIT B(00,00,01); # INIT SEEN FLAG # ITEM ACN$HOPST S:HCNST(00,02,04); # HOP PSEUDO ACN STATE # ITEM ACN$NOPST S:ACNST(00,02,04); # NOP ACN STATE # ITEM ACN$ABN U(00,12,18); # APPL BLOCK NUMBER # ITEM ACN$DBZ U(00,30,12); # DOWNLINE BLK SIZE # ITEM ACN$ACN U(00,42,18); # CONNECTION NUMBER # ITEM ACN$WORD1 U(01,00,60); # FULL WORD1 REFERENCE # ITEM ACN$BKCNT U(01,03,06); # NUMBER OF BREAKS COUNT # ITEM ACN$BLCNT U(01,09,06); # OUTSTANDING BLK COUNT # ITEM ACN$ABL U(01,15,06); # APPL BLOCK LIMIT # ITEM ACN$PCHAR C(01,30,01); # HOP PAGE CHARACTER # ITEM ACN$PWAIT B(01,35,01); # PAGE WAIT FLAG # ITEM ACN$IGNOR B(01,39,01); # HOP IGNORE FLAG # ITEM ACN$WBCNT U(01,42,09); # WAITING BLK COUNT # ITEM ACN$PL U(01,51,09); # PAGE LENGTH # # **** # END ITEM ACNL; # LENGTH OF ACN TABLE # # ** * * LLXREF - LOGICAL LINK XREF TABLE. * * THE LOGICAL LINK XREF TABLE WILL RESIDE INITIALLY IN A MANAGED * TABLE. IT CONTAINS A TWO WORD ENTRY FOR EACH LOGICAL LINK * DEFINED IN THE NCF. IT IS EVENTUALLY WRITTEN OUT TO THE OVERLAYS * THAT NEED IT. # BASED ARRAY LLXRS [00:00] S(2); BEGIN ITEM LXS$WORD U(00,00,60); #FULL WORD REFERENCE # END ITEM LLXREFLS; #LENGTH OF LLXREF TABLE # # ** PLXREFS - PHYSICAL LINK CROSS REFERENCE TABLE. * * THE PHYSICAL LINK XREF TABLE CONTAINS A TWO-WORD ENTRY FOR EACH * COUPLER OR TRUNK DEFINED FOR THE NETWORK. THIS TABLE WILL INITIAL- * LY RESIDE IN A MANAGED TABLE. IT IS INITIALIZED BY CSIBXT FROM THE * NCF. IT IS EVENTUALLY WRITTEN OUT TO THE OVERLAYS THAT NEED IT. # BASED ARRAY PLXREFS [00:00] S(2); BEGIN ITEM PXS$WORD U(00,00,60); #FULL WORD REFERENCE # END ITEM PLXREFLS; #LENGTH OF PLXREF TABLE # # ** LIXS - LINE CROSS REFERENCE TABLE . * * THE LINE CROSS REFERENCE TABLE CONTAINS INFORMATION ABOUT EACH * LINE DEFINED IN THE NCF. THIS MANAGED TABLE IS BUILT AT INITIALI- * ZATION TIME BY THE CSIBXT PROC. IT IS EVENTUALLY MADE A PART OF * THE OVERLAYS WHICH REQUIRES THE INFORMATION IN THE TABLE. # BASED ARRAY LIXS [00:00] S(1); BEGIN ITEM LIXS$WORD U(00,00,60); # FULL WORD REFERENCE # END ITEM LIXLS; #LENGTH OF LIX TABLE # # ** DEXS - DEVICE CROSS REFERENCE TABLE. * * THE DEVICE CROSS REFERENCE TABLE CONTAINS AN ENTRY FOR EACH DEVICE * OR TERMDEV STATEMENT IN THE NDL SOURCE. THIS TABLE IS BUILT BY * PROC CSIBXT AT INITIALIZATION TIME. THE TABLE IS WRITTEN TO THE * OVERLAYS WHICH REQUIRES ITS INFORMATION. # BASED ARRAY DEXS [00:00] S(1); BEGIN ITEM DXS$WORD U(00,00,60); # FULL WORD REFERENCE # END ITEM DEXLS; # LENGTH OF DEX TABLE # # ** *E ** NPUCB - NPU CONTROL BLOCK ARRAY. * * THE NPUCB ARRAY WILL RESIDE IN A MANAGED TABLE. THERE EXISTS AN * ENTRY FOR EACH NPU DEFINED IN THE NETWORK CONFIGURATION FILE. * THE MANAGED TABLE IS INITIAILIZED BY CSIBNP FROM INFORMATION * THAT IS READ FROM THE NPU CROSS REFERENCE TABLE ON THE NCF. * * THE FOLLOWING IS THE FORMAT OF AN NPU CONTROL BLOCK. EACH BLOCK * IS FOUR WORDS LONG. * * * 1 2 3 4 5 * 012345678901234567890123456789012345678901234567890123456789 *TEXT *T,WORD,42/NAME,8/NID,8/HID,1/R,1/D *T,WORD1,16/CSUM,12/OPSD,12/OPST,12/OPOV,8/STAT *T,WORD2,1/L,5/,36/VAR,18/DNID *T,WORD3,8/OVSTATE,52/ *ENDTEXT # BASED ARRAY NPUCB [00:00] S(NPCBSZ$); BEGIN # **** # ITEM NPU$WORD U(00,00,60); #FULL WORD REFERENCE # ITEM NPU$WORD1 U(01,00,60); #FULL WORD 1 REF # ITEM NPU$WORD2 U(02,00,60); #FULL WORD 2 REF # ITEM NPU$WORD3 U(03,00,60); #FULL WORD 3 REF # ITEM NPU$WORD4 U(04,00,60); ITEM NPU$WORD5 U(05,00,60); ITEM NPU$WORD6 U(06,00,60); ITEM NPU$WORD7 U(07,00,60); ITEM NPU$NAME C(00,00,07); #NAME OF NPU # ITEM NPU$NID U(00,42,08); #NODE NUMBER OF NPU # ITEM NPU$HID U(00,50,08); #HOST NODE NUMBER # ITEM NPU$RIND B(00,58,01); #REMOTE INDICATOR,1=REMOTE # ITEM NPU$DMPF B(00,59,01); #LONG TERM DMP FLAG # ITEM NPU$CSUM U(01,00,16); #NPUCHECKSUM FOR SUPER- # #VISION COMPARE OF NCF # ITEM NPU$OPSD U(01,16,12); #CURRENT SEND OPERATOR OCB # #ORDINAL # ITEM NPU$OPST U(01,28,12); #CURRENT STATUS OPERATOR # #OCB ORDINAL # ITEM NPU$OPOV U(01,40,12); #CURRENT OVERLAY OPERATOR # #OCB ORDINAL # ITEM NPU$STAT U(01,52,08); #NPUSTATE # ITEM NPU$LRF B(02,00,01); #LOAD REQUEST FLAG # ITEM NPU$VAR C(02,06,06); # NPU VARIENT NAME # ITEM NPU$DNID C(02,42,03); # DISPLAY CODED NODE NUM # ITEM NPU$CNID U(02,42,18); # DCD INTEGER NID # ITEM NPU$OVSTATE U(03,00,08); # OVERLAY STATE # ITEM NPU$CP U(03,08,09); # CPU UTILIZATION # ITEM NPU$BU U(03,17,09); # BUFFER AVAILABILITY # ITEM NPU$GFLAG B(03,27,01); # NEED GO FLAG # ITEM NPU$CNUM U(03,30,18); # TIMER CANCEL NUMBER # ITEM NPU$CNOP U(03,48,12); # CONTROLLING NOP FOR NPU # ITEM NPU$RFLGS U(04,12,48); # REPORT BIT MAP # ITEM NPU$STFLGS U(05,12,48); # PENDING STATUS REQ BIT MAP# ITEM NPU$SDFLGS U(06,12,48); # PENDING SEND REQ BIT MAP # ITEM NPU$OVFLGS U(07,12,48); # DIAG OPERATOR BIT MAP # # **** # END ITEM NPUCBL; #LENGTH OF NPUCB # # ** NPXREF - NPU CROSS REFERENCE TABLE. * * THE NPU XREF TABLE CONTAINS INFORMATION ABOUT EACH NPU DEFINED IN * THE NCF. THE TABLE IS READ INTO CS AT INITIALIZATION TIME AND * EACH ENTRY'S INFORMATION IS TRANSFERRED INTO THE APPROPRIATE * NPUCB MANAGED TABLE ENTRY. # BASED ARRAY NPXREF [00:00] S(2); BEGIN ITEM NPX$WORD U(00,00,60); #FULL WORD REFERENCE # ITEM NPX$NAME C(00,00,07); #NAME OF NPU # ITEM NPX$NID U(00,52,08); #NODE NUMBER OF NPU # ITEM NPX$VAR C(01,00,06); #NPU VARIENT NAME # ITEM NPX$CSUM U(01,44,16); #NPU SUPERVISION CHECKSUM # END ITEM NPXREFL; #LENGTH OF NPXREF TABLE # # ** TRQ - TIMER REQUEST QUEUE. * * THIS QUEUE IS USED FOR TIMER REQUEST BLOCKS. CURRENTLY THE ONLY * USE FOR THIS QUEUE IS THE REPETITION OF *GO NEEDED* MESSAGE. * IT IS ONLY USED BY THE EVENT PROCESSOR. (SEE SERVICES AND * SCHEDULING OVERVIEW FOR THE FORMAT OF THE TIMER REQUEST BLOCK.) * # BASED ARRAY TRQ [00:00] S(1); BEGIN ITEM TRQ$WORD I(00,00,60); # FULL WORD DEFINITION # END ITEM TRQL; # NUMBER OF WORDS ALLOCATED TO TRQ # # ** EVQ - EVENT QUEUE. * * THE EVENT QUEUE IS THE MAIN INPUT QUEUE FOR THE EVENT PROCESSOR. * IT RESIDES IN A MANAGED TABLE. THIS QUEUE RECEIVES UNSOLICITED * STATUS SM-S, SUPERVISION EVENTS, AND ROUTED SOLICITED STATUS SM-S. # BASED ARRAY EVQ[00:00] S(1); BEGIN ITEM EVQ$WORD U(00,00,60); # FULL WORD REFERENCE # ITEM EVQ$CODE U(00,00,12); # EVENT CODE, ALIAS SMID # ITEM EVQ$WC U(00,48,12); # WORD CNT OF ENTRY # END ITEM EVQL; # LENGTH OF EVENT QUEUE # # ** CNQ - CONNECTION TRAFFIC QUEUE. * * THE CONNECTION TRAFFIC QUEUE IS THE MAIN INPUT QUEUE FOR THE * CONNECTION LAYER. IT CONTAINS CONNECTION SMS, FLOW CONTROL SMS, * SPECIAL HOP SMS, INBOUND DATA BLOCKS, OUTBOUND TERMINAL TEXT, * AND PROTOCOL RESPONSES. # BASED ARRAY CNQ[00:00] S(1); BEGIN ITEM CNQ$WORD U(00,00,60); # FULL WORD REFERENCE # ITEM CNQ$ID U(00,00,12); # CONNECTION TRAFFIC ID # ITEM CNQ$WC U(00,48,12); # WORD CNT OF ENTRY # END ITEM CNQL; # LENGTH OF CONN TRAFFIC Q # # ** OPTQ - OPERATOR TYPEIN QUEUE * * OPTQ RECEIVES ALL INCOMING COMMANDS (TYPEINS) FROM ALL OPERATORS * (REGARDLESS OF TYPE) THAT THIS CS IS CURRENTLY SUPPORTING. AN * ENTRY IN THIS CONTAINS THREE PARTS. THE FIRST PART IS THE ENTRY * SIZE WORD (AS PER ALL OTHER VARIABLE ENTRY SIZE QUEUES). THE * SECOND PART IS A SINGLE WORD CONTAINING THE ACN (EQUALS ACN LIST * ORDINAL, EQUALS OCB ORDINAL) OF THE OPERATOR, A BREAK OCCURRED * FLAG (INDICATES THIS TYPEIN IS A USER BREAK) AND THE COUNT OF * CHARACTERS IN THE TYPEIN (ZERO FOR A BREAK), ALL IN ABH FORMAT. * THE THIRD PART IS THE TEXT STRING OF THE TYPEIN IN DISPLAY CODE. # BASED ARRAY OPTQ [00:00] S(1); BEGIN ITEM OPQ$WORD U(00,00,60); #WHOLE WORD REFERENCE # END ITEM OPQL; #LENGTH OF OPERATOR TYPEIN QUEUE # # ** VCQ - VALID COMMAND QUEUE. * * THE VALID COMMAND QUEUE CONTAINS THE VALIDATED COMMAND FROM THE * COMMAND RECOGNIZER. THE ORIGINAL OPERATOR TYPE-IN ALSO IS APPEND- * ED TO THE ENTRY. # BASED ARRAY VCQ [00:00] S(1); BEGIN ITEM VCQ$WORD U(00,00,60); END ITEM VCQL; # LENGTH OF VCQ TABLE # # ** HRQ - HISTORY REQUEST QUEUE * * THE HISTORY REQUEST QUEUE CONTAINS REQUESTS MADE BY * OPERATORS TO SEE THE CS HISTORY BUFFER. EACH ENTRY HAS THE * SAME FORMAT AS THE VALID COMMAND QUEUE. IT HAS A WORD * COUNT WORD, A HEADER WORD WITH INFORMATION ABOUT THE * COMMAND, THE ORIGINAL OPERATOR TYPE-IN, AND A STRUCTURED * VERSION OF THE COMMAND AS GENERATED BY THE COMMAND RECOGNIZER. # BASED ARRAY HRQ [00:00] S(1); BEGIN ITEM HRQ$WORD U(00,00,60); END ITEM HRQL; # LENGTH ALLOCATED TO HRQ TABLE # # ** ORQ - OPERATOR RESPONSE QUEUE. * * THE OPERATOR RESPONSE QUEUE RECEIVES ALL THE MESSAGES SENT TO A * GROUP OF OPERATORS. EACH ENTRY CONTAINS A WORD COUNT WORD, AN * ABH WORD WHICH CONTAINS THE AUDIENCE GROUP NUMBER IN THE ABH * ADDRESS FIELD AND THE TEXT LENGTH, AND THE ACTUAL TEXT TO BE SENT * TO THE OPERATORS IDENTIFIED BY THE GROUP NUMBER. # BASED ARRAY ORQ [00:00] S(1); BEGIN ITEM ORQ$WORD U(00,00,60); END ITEM ORQL; # LENGTH ALLOCATED TO THE ORQ # # ** RCQ - ROUTED COMMAND QUEUE. * * THE ROUTED COMMAND QUEUE CONTAINS THE COMMANDS THAT HAVE HAD THE * PHYSICAL ADDRESSES RESOLVED FROM THE CROSS REFERENCE TABLES. * # BASED ARRAY RCQ [00:00] S(1); BEGIN ITEM RCQ$WORD U(00,00,60); END ITEM RCQL; # LENGTH OF RCQ TABLE # # ** PEQ - PROTOCOL EVENT QUEUE * * PEQ RECEIVES ALL CONNECTION/OPERATOR RELATED ASYNCHRONOUS * SUPERVISORY MESSAGES THAT MUST BE PROCESSED BY THE INNER LAYER * EXCEPT FOR THE FC/BRK SM, WHICH IS PASSED TO THE INNER LAYER AS * AN OPERATOR TYPEIN (THE FC/BRK IS USED AS A PIPE CLEANER BETWEEN * THE CONNECTION AND INNER LAYERS AND HENCE MUST BE PROCESSED AFTER * (SYNCHRONOUS WITH) ANY TYPEINS ALREADY QUEUED FOR THE INNER * LAYER). AN ENTRY IN THIS QUEUE CONSISTS OF THREE PARTS (AS * ALWAYS, A LA *CNQ*) - THE ENTRY SIZE WORD (ALSO CONTAINS A CS * DEFINED SM DISPATCHING CODE), THE ABH OF THE INCOMING SM AND * THE SM BODY. # BASED ARRAY PEQ [00:00] S(1); BEGIN ITEM PEQ$WORD U(00,00,60); #WHOLE WORD REFERENCE # END ITEM PEQL; #LENGTH OF PROTOCOL EVENT QUEUE # # ** OSQ - OPERATOR SUPERVISIOM SM QUEUE. * * THE OPERATOR SUPERVISION SM QUEUE IS AN INPUT QUEUE TO THE INNER * LAYER (PROCESS 3) DISPATCHER. IT RESIDES IN A MANAGED TABLE. * # BASED ARRAY OSQ[00:00] S(1); BEGIN ITEM OSQ$WORD U(00,00,60); #FULL WORD REFERENCE # ITEM OSQ$ID U(00,00,12); # INTERNAL IDENTIFIER # ITEM OSQ$WC U(00,48,12); # WORD CNT OF ENTRY # END ITEM OSQL; # LENGTH OF OP SUPERVISION Q # # ** SSQ - SOLICITED STATUS QUEUE. * * THE SOLICITED STATUS SM QUEUE IS AN INPUT QUEUE INTO THE INNER * LAYER (PROCESS 3) FROM THE NETWORK DISPATCHER (CSDDNT). ALL * SOLICITED STATUS SMS ARE QUEUED HERE. # BASED ARRAY SSQ[00:00] S(1); BEGIN ITEM SSQ$WORD U(00,00,60); # FULL WORD REFERENCE # ITEM SSQ$ID U(00,00,12); # INTERNAL IDENTIFIER # ITEM SSQ$WC U(00,48,12); # WORD CNT OF ENTRY # END ITEM SSQL; # SOL STATUS Q LENGTH # # ** CTQ - CONFIGURE TERMINAL REQUEST QUEUE. * * CTQ CONTAINS ALL INCOMING CNF/TE/R SMS FROM NPUS THAT THIS CS IS * SUPERVISING. AN ENTRY IN THIS QUEUE CONSISTS OF THREE PARTS. THE * FIRST PART IS A SINGLE WORD CONTAINING THE SIZE OF THE ENTRY IN CM * WORDS (THE SIZE WORD IS INCLUDED IN THE WORD COUNT). THE SECOND * PART IS THE APPLICATION BLOCK HEADER OF THE CNF/TE/R SM. THE * THIRD PART IS THE BODY OF THE CNF/TE/R SM BEGINNING WITH THE * PFC/SFC. THE ARRAY ENTRY SIZE IS ONE WORD TO EASE STORAGE MOVING. # BASED ARRAY CTQ [00:00] S(1); BEGIN ITEM CTQ$WORD U(00,00,60); #WHOLE WORD FOR STORAGE MOVING # ITEM CTQ$ESIZE U(00,48,12); #ENTRY SIZE IN CM WORDS # ITEM CTQ$NPUID U(01,14,08); #SOURCE NODE IN ABH WORD # ITEM CTQ$PORT U(02,16,08); #PORT NUMBER IN 1ST WD OF SM BODY# END ITEM CTQL; # LENGTH OF CONFIGURE TERMINAL REQ QUEUE # # ** NRQ - NCF READ REQUESTS QUEUE. * * NRQ CONTAINS ALL CNF/TE/R SMS FOR WHICH THE READING OF THE CORRECT * LINE RECORD HAS BEEN INITIATED. AN ENTRY IN THIS QUEUE CONSISTS * OF THREE PARTS. THE FIRST PART IS A SINGLE WORD CONTAINING THE * SIZE OF THE ENTRY IN CM WORDS (THE SIZE WORD IS INCLUDED IN THE * WORD COUNT) AND THE LINE RECORD INDEX ORDINAL OF THE LINE RECORD * BEING READ. THE SECOND AND THIRD PARTS ARE THE ABH AND BODY OF * THE CNF/TE/R SM EXACTLY AS FOR THE CONFIGURE TERMINAL REQUEST * QUEUE. THE DEFINED ARRAY ENTRY SIZE IS ONE WORD TO FACILITATE * STORAGE MOVING. # BASED ARRAY NRQ [00:00] S(1); BEGIN ITEM NRQ$WORD U(00,00,60); #WHOLE WORD FOR STORAGE MOVING # ITEM NRQ$LRIORD U(00,12,12); #LINE RECORD INDEX ENTRY ORDINAL # ITEM NRQ$ESIZE U(00,48,12); #ENTRY SIZE IN CM WORDS # END ITEM NRQL; #LENGTH OF NCF READ REQUESTS QUEUE # # ** NDQ - NCF DATA QUEUE. * * NDQ CONTAINS ALL CNF/TE/R SMS AND THEIR ASSOCIATED NCF LINE * RECORDS. THE LAST ENTRY IN THIS QUEUE MAY CONTAIN ONLY PART OF * ITS LINE RECORD IF THAT LINE RECORD HAS NOT YET BEEN COMPLETELY * READ. AN ENTRY IN THIS QUEUE CONSISTS OF FOUR PARTS. THE FIRST * PART IS A SINGLE WORD CONTAINING THE FOLLOWING FIELDS: * * - A FLAG TO INDICATE IF THE ENTRY IS COMPLETE (ENTIRE LINE * RECORD HAS BEEN READ). * - THE ORDINAL OF THE LINE RECORD INDEX ENTRY. * - THE LENGTH OF THE LINE RECORD (OR OF THAT PORTION WHICH HAS * BEEN READ SO FAR) IN CM WORDS. * - THE SIZE OF THE ORIGINAL CONFIGURE TERMINAL REQUEST (INCLUDES * THIS WORD PLUS THE ABH AND BODY OF THE CNF/TE/R SM) IN CM * WORDS. I.E., THIS IS THE SAME SIZE AS THE ORIGINAL CONFIGURE * TERMINAL REQUEST AND NCF READ REQUEST QUEUE ENTRIES. * - THE TOTAL SIZE OF THIS ENTRY (INCLUDING THIS WORD) IN CM WDS. * * THE SECOND AND THIRD PARTS ARE THE ABH AND BODY OF THE CNF/TE/R SM * EXACTLY AS FOR THE CONFIGURE TERMINAL REQUEST QUEUE. THE FOURTH * PART IS THE NCF LINE RECORD (OR THAT PORTION WHICH HAS BEEN READ * SO FAR). THE DEFINED ARRAY ENTRY SIZE IS ONE WORD TO FACILITATE * STORAGE MOVING. # BASED ARRAY NDQ [00:00] S(1); BEGIN ITEM NDQ$WORD U(00,00,60); #WHOLE WORD FOR STORAGE MOVING # ITEM NDQ$CFLAG B(00,00,12); #ENTRY COMPLETE FLAG (T=COMPLETE)# ITEM NDQ$LRIORD U(00,12,12); #LINE RECORD INDEX ENTRY ORDINAL # ITEM NDQ$LRSIZE U(00,24,12); #LENGTH OF LINE RECORD # ITEM NDQ$TCSIZE U(00,36,12); #SIZE OF CONFIGURE TERMINAL REQ # ITEM NDQ$ESIZE U(00,48,12); #ENTRY SIZE IN CM WORDS # ITEM NDQ$PFSF U(0,0,16) ; # PFCSFC OF MESSAGE IN QUEUE # END ITEM NDQL; #LENGTH OF NCF DATA QUEUE # # ** NPUQ - NPU SUPERVISION SM QUEUE. * * NPUQ CONTAINS SUPERVISORY MESSAGES PERTAINING TO THE COMING * AND GOING OF NPUS. # BASED ARRAY NPUQ [00:00] S(1); BEGIN ITEM NP$WORD U(00,00,60); #WHOLE WORD FOR STORAGE MOVING # END ITEM NPUQL; #LENGTH OF THE NPU SUPERVISION SM QUEUE # # ** OTQ - OUTGOING TRAFFIC QUEUE. * * A VARIABLE LENGTH ENTRY FIFO QUEUE CONTAINING SM-S AND DATA BLOCKS * OUTGOING FROM CS TO NIP. EACH ENTRY FORMAT IS: * 1) A ONE WORD WORD-COUNT FOR THE NUMBER OF WORDS IN THE ENTRY. * 2) A ONE WORD ABH - APPLICATION BLOCK HEADER, AND * 3) SM-TEXT OR DATA-BLOCK. # BASED ARRAY OTQ [00:00] S(1); BEGIN ITEM OTQ$WORD U(00,00,60); END ITEM OTQL I; # OTQ QUEUE LENGTH # # ** WBQ - WAITING BLOCK QUEUE. * * THIS QUEUE CONTAINS BLOCKS FOR ALL ACN-S THAT CANNOT BE SENT. * THE CONNECTION MAY NOT HAVE BEEN INITIALIZED OR THE OUTSTANDING * BLOCK COUNT MAY BE AT LIMIT OR IN AN INHIBITED OR WAITING STATE. * # BASED ARRAY WBQ[00:00] S(1); BEGIN ITEM WBQ$WORD U(00,00,60); # FULL WORD REFERENCE # ITEM WBQ$LICNT U(00,12,12); # HOP LINE COUNT # ITEM WBQ$ESIZE U(00,48,12); # ENTRY SIZE IN CM WORDS # ITEM WBQ$ABT U(01,00,06); # APP. BLOCK TYPE # ITEM WBQ$ABHACN U(01,06,12); # ACN IN ABH # ITEM WBQ$ABN U(01,18,18); # APPLICATION BLOCK NUMBER # ITEM WBQ$ACT U(01,36,04); # APP. CHARACTER TYPE # ITEM WBQ$NFE U(01,44,01); # NO FORMAT EFFECTOR # ITEM WBQ$TLC U(01,48,12); # TEXT LENGTH # ITEM WBQ$PSFC U(02,00,16); # PSC/SFC IN SM # ITEM WBQ$SMACN U(02,24,12); # ACN IN SM BODY # ITEM WBQ$HIAF B(02,59,01); # HOP INPUT ALLOWED FLAG # END ITEM WBQL; # LENGTH OF WAITING BLOCK QUEUE # # ** ODEQ - OPERATOR DIRECTED EVENT QUEUE. * * THIS QUEUE CONTAINS ENTRIES THAT CONTAIN AN EVENT LINE THAT * IS INTENDED TO A SPECIFIC OPERATOR. # BASED ARRAY ODEQ [00:00] S(1); BEGIN ITEM ODE$WORD U(00,00,60); # FULL WORD REF # ITEM ODE$WC U(00,48,12); # NUM WORDS IN ENTRY # END ITEM ODEQL; # LENGTH OF ODEQ # # ** HBFQ - HISTORY BUFFER QUEUE. * * THIS QUEUE CONTAINS ONE ENTRY THAT HOLDS ALL THE TEXT LINES * INTENDED TO COMPRISE THE HISTORY BUFFER. THE PROGRAM DEFINI- * TION MXHSBLCNT$ IN TEXTCS DICTATES THE MAXIMUM NUMBER OF * LINES THAT ARE ALLOWED TO BE IN THE HISTORY BUFFER. # BASED ARRAY HBFQ [01:01] S(HBFESIZ$); BEGIN ITEM HBF$WORD U(00,00,60); # FULL WORD REF # ITEM HBF$AGRP U(08,00,03); # AUDIENCE GROUP OF MESSAGE # ITEM HBF$NORD U(08,03,09); # ORDINAL OF NPU THAT SENT MSG# ITEM HBF$LFLG B(08,53,01); # LIST FLAG # ITEM HBF$WC U(08,54,06); # MESSAGE WORD COUNT # END ITEM HBFQL; # LENGTH OF HBFQ # # ** TEND - DUMMY LAST TABLE. * * SERVES NO PURPOSE EXCEPT TO TERMINATE THE VECTOR OF * TABLE POINTERS USED BY MANAGER. * # BASED ARRAY TEND [0:0] S(1); # DUMMY END ARRAY OF MANAGER # BEGIN ITEM TEN$WORD U(00,00,60); # CONTAINS ADDRESS AT END OF FL # END ITEM TENL; # CONTAINS TOTAL STORAGE USED # ITEM V24FLAG B ; # CCP 2.4 FLAG # ITEM CCPVERS U ; # CCP VERSION # END # TABLES # DEF PAGE1 #1# ; DEF PAGE2 #2# ; DEF PAGE3 #3# ; DEF NPG #3# ; # CURRENT NUMBER OF PAGE FOR RIGHT # # K DISPLAY SCREEN # DEF RKPAGESZ #116#; # SIZE OF RIGHT K-DISPLAY IN WORD # END #TEXTCS # TERM