/********************************************************************************************************************************/ /* Created: 9-Mar-2021 22:28:06 by OpenVMS SDL EV3-3 */ /* Source: 09-MAR-2021 22:28:01 $1$DGA8085:[STARLET_H.SRC]STARDEFQZ.SDI;1 */ /********************************************************************************************************************************/ /*** MODULE $XKSTSDEF ***/ #ifndef __XKSTSDEF_LOADED #define __XKSTSDEF_LOADED 1 #pragma __nostandard /* This file uses non-ANSI-Standard features */ #pragma __member_alignment __save #pragma __nomember_alignment #ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */ #pragma __required_pointer_size __save /* Save the previously-defined required ptr size */ #pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */ #endif #ifdef __cplusplus extern "C" { #define __unknown_params ... #define __optional_params ... #else #define __unknown_params #define __optional_params ... #endif #ifndef __struct #if !defined(__VAXC) #define __struct struct #else #define __struct variant_struct #endif #endif #ifndef __union #if !defined(__VAXC) #define __union union #else #define __union variant_union #endif #endif /* */ /* DEFINITIONS FOR 3271 LINE STATUS BLOCK (RETURNED BY IO$_RDSTATS) */ /* */ #define XKSTS$K_LSTR 0 /* OFFSET OF BEGINNING OF DATA AREA */ #define XKSTS$C_LSTR 0 /* OFFSET OF BEGINNING OF DATA AREA */ #define XKSTS$M_ACT 0x1 #define XKSTS$M_DGN 0x2 #define XKSTS$K_DSTR 45 /* LENGTH OF THE LINE STATUS BLOCK */ #define XKSTS$C_DSTR 45 /* LENGTH OF THE LINE STATUS BLOCK */ #ifdef __NEW_STARLET typedef struct _xkstsdef { unsigned char xksts$b_cuad; /* CONTROL UNIT ADDRESS (HEX EBCDIC) */ __union { unsigned short int xksts$w_lsts; /* LINE STATUS */ __struct { unsigned xksts$v_act : 1; /* IF SET, LINE IS 'ON' (ACTIVE IN 3271 MODE) */ unsigned xksts$v_dgn : 1; /* IF SET, LINE IS EXECUTING A DIAGNOSTIC QIO */ unsigned xksts$v_fill_80_ : 6; } xksts$r_lsts_bits; } xksts$r_lsts_overlay; unsigned char xksts$b_plsz; /* POOL SIZE */ unsigned short int xksts$w_bsiz; /* MAXIMUM BLOCK TO BE RECEIVED FROM IBM */ unsigned char xksts$b_ecnt; /* ENQ THRESHOLD */ unsigned short int xksts$w_tnak; /* NUMBER OF NAKS TRANSMITTED */ unsigned short int xksts$w_rnak; /* NUMBER OF NAKS RECEIVED */ unsigned short int xksts$w_tenq; /* NUMBER OF ENQS SENT */ unsigned short int xksts$w_renq; /* NUMBER OF ENQS RECEIVED */ unsigned short int xksts$w_trvi; /* NUMBER OF RVIS TRANSMITTED */ unsigned short int xksts$w_rrvi; /* NUMBER OF RVIS RECEIVED */ unsigned short int xksts$w_rcnv; /* NUMBER OF CONVERSATIONAL MODE RESPONSES */ /* RECEIVED */ unsigned short int xksts$w_chai; /* NUMBER OF CHAINED WRITES RECEIVED */ unsigned short int xksts$w_gpol; /* NUMBER OF GENERAL POLLS RECEIVED */ unsigned short int xksts$w_xack; /* NUMBER OF INVALID ACKS RECEIVED */ unsigned short int xksts$w_habo; /* NUMBER OF HOST ABORTS ENCOUNTERED */ unsigned short int xksts$w_dabo; /* NUMBER OF DRIVER ABORTS ENCOUNTERED */ unsigned short int xksts$w_rtim; /* NUMBER OF ACK RESPONSE TIMEOUTS */ unsigned short int xksts$w_disc; /* NUMBER OF DISCONNECTS ENCOUNTERED */ unsigned short int xksts$w_hard; /* NUMBER OF HARDWARE FAILURES (INCLUDING */ /* DISCONNECTS) ENCOUNTERED */ unsigned short int xksts$w_tblk; /* NUMBER OF BLOCKS TRANSMITTED */ unsigned short int xksts$w_rblk; /* NUMBER OF BLOCKS RECEIVED */ unsigned short int xksts$w_habx; /* NUMBER OF DUBIOUS ACK OUTS */ unsigned short int xksts$w_ieot; /* NUMBER OF EOTS IMPLYING ACK */ } XKSTSDEF; #if !defined(__VAXC) #define xksts$w_lsts xksts$r_lsts_overlay.xksts$w_lsts #define xksts$v_act xksts$r_lsts_overlay.xksts$r_lsts_bits.xksts$v_act #define xksts$v_dgn xksts$r_lsts_overlay.xksts$r_lsts_bits.xksts$v_dgn #endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */ struct xkstsdef { unsigned char xksts$b_cuad; /* CONTROL UNIT ADDRESS (HEX EBCDIC) */ __union { unsigned short int xksts$w_lsts; /* LINE STATUS */ __struct { unsigned xksts$v_act : 1; /* IF SET, LINE IS 'ON' (ACTIVE IN 3271 MODE) */ unsigned xksts$v_dgn : 1; /* IF SET, LINE IS EXECUTING A DIAGNOSTIC QIO */ unsigned xksts$v_fill_80_ : 6; } xksts$r_lsts_bits; } xksts$r_lsts_overlay; unsigned char xksts$b_plsz; /* POOL SIZE */ unsigned short int xksts$w_bsiz; /* MAXIMUM BLOCK TO BE RECEIVED FROM IBM */ unsigned char xksts$b_ecnt; /* ENQ THRESHOLD */ unsigned short int xksts$w_tnak; /* NUMBER OF NAKS TRANSMITTED */ unsigned short int xksts$w_rnak; /* NUMBER OF NAKS RECEIVED */ unsigned short int xksts$w_tenq; /* NUMBER OF ENQS SENT */ unsigned short int xksts$w_renq; /* NUMBER OF ENQS RECEIVED */ unsigned short int xksts$w_trvi; /* NUMBER OF RVIS TRANSMITTED */ unsigned short int xksts$w_rrvi; /* NUMBER OF RVIS RECEIVED */ unsigned short int xksts$w_rcnv; /* NUMBER OF CONVERSATIONAL MODE RESPONSES */ /* RECEIVED */ unsigned short int xksts$w_chai; /* NUMBER OF CHAINED WRITES RECEIVED */ unsigned short int xksts$w_gpol; /* NUMBER OF GENERAL POLLS RECEIVED */ unsigned short int xksts$w_xack; /* NUMBER OF INVALID ACKS RECEIVED */ unsigned short int xksts$w_habo; /* NUMBER OF HOST ABORTS ENCOUNTERED */ unsigned short int xksts$w_dabo; /* NUMBER OF DRIVER ABORTS ENCOUNTERED */ unsigned short int xksts$w_rtim; /* NUMBER OF ACK RESPONSE TIMEOUTS */ unsigned short int xksts$w_disc; /* NUMBER OF DISCONNECTS ENCOUNTERED */ unsigned short int xksts$w_hard; /* NUMBER OF HARDWARE FAILURES (INCLUDING */ /* DISCONNECTS) ENCOUNTERED */ unsigned short int xksts$w_tblk; /* NUMBER OF BLOCKS TRANSMITTED */ unsigned short int xksts$w_rblk; /* NUMBER OF BLOCKS RECEIVED */ unsigned short int xksts$w_habx; /* NUMBER OF DUBIOUS ACK OUTS */ unsigned short int xksts$w_ieot; /* NUMBER OF EOTS IMPLYING ACK */ } ; #if !defined(__VAXC) #define xksts$w_lsts xksts$r_lsts_overlay.xksts$w_lsts #define xksts$v_act xksts$r_lsts_overlay.xksts$r_lsts_bits.xksts$v_act #define xksts$v_dgn xksts$r_lsts_overlay.xksts$r_lsts_bits.xksts$v_dgn #endif /* #if !defined(__VAXC) */ #endif /* #ifdef __NEW_STARLET */ #pragma __member_alignment __restore #ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */ #pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */ #endif #ifdef __cplusplus } #endif #pragma __standard #endif /* __XKSTSDEF_LOADED */