; .TITLE CNTRPRCDEF ; .IDENT /V01-001/ .MACRO CNTRPRCDEF,$GBL $DEFINI CNTRPRCDEF,$GBL ;++ ; 1 CNTRPRCDEF ; Definition file diverges from standard in a number of areas: ; Datatype designation may be X meaning value is one of Long or float. ; An A datatype means address rather than value. ; Database contains 1 of 2 possible fixed len recs ; Long and float types occupy the same space whereas Quad is longer. ; This means there are 2 defs for the same space in areas ;-- ; Calling sequence (offsets from (AP)) $EQU CTP_L_FUNC 4 ; Function code; $EQU CTP_A_SMPLE 8 ; Address of Sample (0 if CTP_V_FNCR); $EQU CTP_L_DTYPE 12 ; Data type (values below) $EQU CTP_A_CNTID 16 ; Address of record key $EQU CTP_A_OUTP 20 ; .address of 8 byte output area; $EQU CTP_A_TIME 24 ; .address of quad VMS Time Optional. If not ; ; present, Current time is used ; CTP_L_DTYPE is a bit pattern. Low Byte is datatype of the sample and may ; take on the following values: $EQU CTP_V_INT 0 ; 32 bit integer unsigned $EQU CTP_V_QAD 1 ; 64 bit integer unsigned $EQU CTP_V_FLT 2 ; F-float ; $EQU CTP_M_INT 1 ; 32 bit integer unsigned $EQU CTP_M_QAD 2 ; 64 bit integer unsigned $EQU CTP_M_FLT 4 ; F-float ; Second byte of DTYPE is processing options for this item: $EQU CTP_V_INCR 8 ; Incrementer - process increase from last sam $EQU CTP_V_GUAGE 9 ; Guage - process as presented $EQU CTP_V_ARRAY 10 ; Item is array - special processing ; $EQU CTP_M_INCR 256 ; Incrementer $EQU CTP_M_GUAGE 512 ; Guage $EQU CTP_M_ARRAY 1024 ; Array ; CTP_L_FUNC may take on the following values: $EQU CTP_C_FNCR 1 ; Create counter; $EQU CTP_C_FNPR 3 ; Process counter; $EQU CTP_C_RECA 2 ; Return address of record in OUTP $EQU CTP_C_FNDL 4 ; Delete counter; ; CTP_L_OUTP is divided into the following feilds:; $EQU CTP_W_OSTS 0 ; Additional status return; $EQU CTP_W_TRSH 4 ; Threashold that was exceeded; $EQU CTP_W_ESTS 6 ; Final error status; ; CTP_W_TRSH may take on the following values; $EQU CTP_W_STN 1 ; Short term Min; $EQU CTP_W_STX 2 ; Short term Max; $EQU CTP_W_LTN 3 ; Long term Min; $EQU CTP_W_LTX 4 ; Long term Max; $EQU CTP_W_MMN 5 ; Min ; $EQU CTP_W_MMX 6 ; Max; ; $EQU CTP_C_MAXSMPL 1728 ; 72/day for 24 days $EQU CTP_C_MAXTBL CTP_C_MAXSMPL-1 ; Record format; (float and Long) ; Record offsets:; ; Key $EQU CTP_Q_NODE 0 ; Node name (space padded) $EQU CTP_L_FAC 8 ; Facility (Below) $EQU CTP_L_CODE 12 ; RMI,QUOMON etc. Code $EQU CTP_AR_SPEC 16 ; Facility specific (96 bytes) $EQU CTP_C_KEYSIZ 112 ; Total Key Size ; Data $EQU CTP_L_DTYP CTP_C_KEYSIZ ; Data Type $EQU CTP_L_CATGRY CTP_C_KEYSIZ+4 ; Category (bit pattern) $EQU CTP_X_LTCNT CTP_C_KEYSIZ+8 ; Long term sample count ; $EQU CTP_X_LTTOT CTP_C_KEYSIZ+12 ; Long term total; $EQU CTP_X_LTRNG CTP_C_KEYSIZ+16 ; Long term range (% movement); $EQU CTP_X_STRNG CTP_C_KEYSIZ+20 ; Short term range (% movement); $EQU CTP_X_STCNT CTP_C_KEYSIZ+24 ; Short term sample count; $EQU CTP_X_MAX CTP_C_KEYSIZ+28 ; Max Value seen; $EQU CTP_X_MIN CTP_C_KEYSIZ+32 ; Min Value seen; $EQU CTP_F_SLOPE CTP_C_KEYSIZ+36 ; Calculated Slope of line $EQU CTP_Q_LASTSN CTP_C_KEYSIZ+40 ; Last time sample rec'ed (EXE$GQ_SYSTIME) ; $EQU CTP_Q_LASTSM CTP_C_KEYSIZ+48 ; Last sample rec'ed $EQU CTP_L_TBLPNT CTP_C_KEYSIZ+56 ; Index to tables ; $EQU CTP_L_SPARE CTP_C_KEYSIZ+60 ; Spare/Align ; Tables within records ; $EQU CTP_TQ_TIMTBL CTP_C_KEYSIZ+64 ; System time this sample (EXE$GQ_SYSTIME) ; $EQU CTP_TF_SAMTBL CTP_C_MAXSMPL*8+CTP_TQ_TIMTBL ; Last n samples ; $EQU CTPRECSIZE CTP_C_MAXSMPL*12+CTP_TQ_TIMTBL ; Rec size (bytes); ; ; Facility codes $EQU CTP_FAC_RMI 1 ; Performance management $EQU CTP_FAC_QUOMON 2 ; Quota Monitor $DEFEND CNTRPRCDEF,$GBL,DEF .ENDM