/********************************************************************************************************************************/ /* Created: 19-JUN-1992 18:08:31 by OpenVMS SDL EV1-11 */ /* Source: 19-JUN-1992 18:04:56 CRTL$:[ROUTLEY.CRTL.SDLFIX.BLADEFIX]RMSUSR.SDI; */ /* Modified: 24-Aug-1992 for C++ compatibility. */ /********************************************************************************************************************************/ /*** MODULE $XABCXFDEF ***/ #ifndef __XABCXFDEF_LOADED #define __XABCXFDEF_LOADED 1 #if defined(__DECC) || defined(__DECCXX) #pragma __nostandard /* This file uses non-ANSI-Standard features */ #else #pragma nostandard #endif #if defined(__DECC) || defined(__DECCXX) #pragma __member_alignment __save #pragma __nomember_alignment #endif #ifdef __DECC #pragma __message __save #pragma __message __disable (__MISALGNDSTRCT) #pragma __message __disable (__MISALGNDMEM) #endif #ifdef __cplusplus extern "C" { #define __unknown_params ... #else #define __unknown_params #endif #if !defined(__VAXC) && !defined(VAXC) #define __struct struct #define __union union #else #define __struct variant_struct #define __union variant_union #endif /*** MODULE $xabcxfdef ***/ /* */ /* RMS Context XAB associated with the FAB */ /* $xabcxfdef */ /* */ /* */ #define XAB$C_CXF 32 /* XABCXF id code */ #define XAB$M_CXFRST 0x1 #define XAB$K_CXFLEN 60 /* length of xab type CXF */ #define XAB$C_CXFLEN 60 /* length of xab type CXF */ struct XABCXF { unsigned char xab$b_cod; unsigned char xab$b_bln; unsigned : 16; /* spare */ void *xab$l_nxt; /* Next XAB in chain */ /* */ /* Following in common with the CXR block, too. */ /* Do not rearrange without changing both. */ /* */ unsigned int xab$l_cxfsts; /* Status of the last file operation. */ unsigned int xab$l_cxfstv; /* Status Value of the last file operation. */ __union { unsigned int xab$l_cxfcop; /* Context Options. */ __struct { unsigned xab$v_cxfrst : 1; /* Restore file state - use context blk as input. */ unsigned xab$v_fill_13 : 7; } xab$r_cxfcop_bits; } xab$r_cxfcop_overlay; unsigned int xab$l_cxfbkp; /* Bookkeeping bits */ unsigned short int xab$w_cxfifi; /* Internal File Identifier */ unsigned char xab$b_cxfver; /* prologue version num */ char xabcxfdef$$_fill_5; /* spare to longword align commonality */ int xabcxfdef$$_fill_6; /* spare */ unsigned short int xab$w_cxfdeq; /* Default extention quantity */ unsigned char xab$b_cxffac; /* File access */ unsigned char xab$b_cxfshr; /* File Sharing */ unsigned short int xab$w_cxfrte; /* (Not used) */ char xabcxfdef$$_fill_7; /* spare */ unsigned char xab$b_cxforg; /* file organization */ unsigned short int xab$w_cxfgbc; /* global buffer count */ unsigned char xab$b_cxfrtv; /* retrieval window */ char xabcxfdef$$_fill_8; int xabcxfdef$$_fill_9 [4]; /* spares */ } ; #if !defined(__VAXC) && !defined(VAXC) #define xab$l_cxfcop xab$r_cxfcop_overlay.xab$l_cxfcop #define xab$v_cxfrst xab$r_cxfcop_overlay.xab$r_cxfcop_bits.xab$v_cxfrst #endif #if defined(__DECC) #pragma __message __restore #endif #if defined(__DECC) || defined(__DECCXX) #pragma __member_alignment __restore #endif #ifdef __cplusplus } #endif #if defined(__DECC) || defined(__DECCXX) #pragma __standard /* This file uses non-ANSI-Standard features */ #else #pragma standard #endif #endif /* __XABCXFDEF_LOADED */