SYSCM.MAC;2/AU=SYSCM.VGN;1 -2,2 .IDENT /15XD/ -/CS033/,, ; ; J DOWNWARD 15-MAY-79 ; JGD -- ADD LBUIC STRUCTURE, ADD GLOBAL ; SYMBOLS FOR ACCOUNTING. ; ADD WORDS FOR USE IN LATER CHANGEING SWAPING ; INTERVAL AND ROUND ROBIN SCHEDULER. % -/$CXDBL::/+1,,/; JGD/ ; ; STORAGE FOR SYSTEM ACCOUNTING INFORMATION ; .IF DF R$$PRV ; ASSEMBLE FOR KMS ACCOUNTING PACKAGE $ROBIN::.WORD R$$NDC ; ROUND ROBIN INTERVAL IN TICS $SWAP:: .WORD S$$WPC ; SWAP INTERVAL IN TICS .IF DF S$$ACC ; IF SYSTEM WIDE ACCOUNTING DESIRED $ACCHD::.WORD 0 ; ACCOUNTING NODE LIST HEADER $NODLN::.WORD 0 ; LENGTH OF ACCOUNTING NODE $ACMSK::.WORD 0 ; SYSTEM ACCOUNTING FEATURE MASK $DELTA::.WORD 0 ; SAMPLING TIME $RUNCT::.WORD 0 ; # OF TASKS RUN $RUNRQ::.WORD 0 ; # OF TASK REQUESTS TO RUN $SHFCT::.WORD 0 ; # OF TIMES SHUFFLER RUN $SHFRQ::.WORD 0 ; # OF TIMES SHUFFLER REQUESTED TO RUN $CKPCT::.WORD 0 ; # OF TASKS CHECKPOINTED $CKPRQ::.WORD 0 ; # OF TASKS CHECKPOINT REQUESTS $LDCNT::.WORD 0 ; # OF LDR RUNS $LDRQ:: .WORD 0 ; # OF LDR REQUESTS $QIOCT::.WORD 0 ; # OF QIO'S ISSUED - LOW PART .WORD 0 ; # OF QIO'S ISSUED - HIGH PART .IF DF T$$KAC ; IF SELECTIVE TASK ACCOUNTING DESIRED $TIMEX::.WORD 0 ; ABSOLUTE TIME COUNTER(LOVAL) .WORD 0 ; ABSOLUTE TIME COUNTER(HIVAL) $TKBLK::.WORD 0 ; ADDRESS OF TASK ACCOUNTING BLOCK $TABHD::.WORD 0 ; TASK ACCOUNTING BLOCK LIST HEADR $CODND::.WORD 0 ; ADDRESS OF TSKLOG'S CODE NODE $BLKSZ::.WORD 0 ; SIZE OF TASK ACCOUNTING BLOCK .ENDC ; END T$$KAC ;$SPARE::.BLKW 4 ; RESERVER 4 PLACES IN CASE WILL NEED LATER .ENDC ; END CONDITIONAL - S$$ACC ; .IF DF M$$ACC ; MEMORY UTILIZATION ACCOUNTING ; ; ONLY IMPLEMENTED VIA A MODIFIED RMDEMO ;$TKSIN::.WORD 0 ; # OF TASKS IN CORE ;$SIZIN::.WORD 0 ; MEMORY USED(nnK) BY IN CORE TASKS ;$TKSOT::.WORD 0 ; # OF TASKS CHECKPOINTED ;$SIZOT::.WORD 0 ; MEMORY USED(nnK) BY TASKS CHECKPOINTED ;$PLTOT::.WORD 0 ; TOTAL FREE POOL ;$PLLRG::.WORD 0 ; LARGEST FREE CHUNK OF POOL ;$PLFRG::.WORD 0 ; # OF FRAGMENTS POOL BROKEN INTO ; .ENDC ; END CONDITIONAL - M$$ACC $LBUIC:: ; .IF DF M$$MGE .BYTE 54,1 ;DEFAULT MAPPED LB UIC .IFF .BYTE 50,1 ;DEFAULT UNMAPPED LB UIC .ENDC .ENDC ; END CONDITIONAL - KMS FUSION ACCOUNTING /