/********************************************************************************************************************************/ /* Created: 9-Mar-2021 22:28:04 by OpenVMS SDL EV3-3 */ /* Source: 09-MAR-2021 22:28:01 $1$DGA8085:[STARLET_H.SRC]RMSUSR.SDI;1 */ /********************************************************************************************************************************/ /*** MODULE $XABJNLDEF ***/ #ifndef __XABJNLDEF_LOADED #define __XABJNLDEF_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 /* */ /* Journal XAB definitions */ /* $xabjnldef */ /* */ #define XAB$C_JNL 34 /* xabjnl id code */ #ifdef __NEW_STARLET struct _fabdef; #else struct fabdef; #endif #define XAB$C_JNL_TYPE_NONE 0 #define XAB$C_AI 1 /* AI journal */ #define XAB$C_BI 2 /* BI journal */ #define XAB$C_AT 3 /* AT journal */ #define XAB$C_RU_DEFAULT 4 /* default RU volume */ #define XAB$M_JOURNAL_DISABLED 0x1 #define XAB$M_BACKUP_DONE 0x2 #ifdef __cplusplus /* Define structure prototypes */ struct _fabdef; #endif /* #ifdef __cplusplus */ #ifdef __NEW_STARLET #if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */ #pragma __nomember_alignment __longword #else #pragma __nomember_alignment #endif typedef struct _xabjnldef { #pragma __nomember_alignment unsigned char xab$b_cod; /* xab id code */ unsigned char xab$b_bln; /* block length */ short int xabjnldef$$_fill_1; /* (spare) */ void *xab$l_nxt; /* xab chain link */ unsigned char xab$b_xabjnl_type; /* type of $XABJNL */ char xabjnldef$$_fill_5; __union { unsigned short int xab$w_jnl_flags; /* journal flags (from ACE$W_RMSJNL_FLAGS) */ __struct { unsigned xab$v_journal_disabled : 1; /* journaling disabled by BACKUP (AI/BI/AT) */ unsigned xab$v_backup_done : 1; /* Backup done since last $OPEN */ unsigned xab$v_fill_16_ : 6; } xab$r_jnl_flags_bits; } xab$r_jnl_flags_overlay; struct _fabdef *xab$l_jnl_fab; /* address of journal file FAB ~~~ struct fabdef ~~~ */ char *xab$l_volnam_buf; /* address of journal volume name buffer */ unsigned short int xab$w_volnam_siz; /* size of journal volume name buffer */ unsigned short int xab$w_volnam_len; /* return length of journal volume name */ unsigned __int64 xab$q_jnl_verify_cdate; /* journal file creation date (from ACE$Q_CDATE) */ /* (to match with journal file's creation date) */ unsigned int xab$l_jnlidx; /* Journal stream index within journal file */ unsigned int xab$l_backup_seqno; /* Backup sequence number. */ unsigned __int64 xab$q_jnl_mod_time; /* Timestamp of last backup or last journal */ /* entry recovered. */ unsigned int xabjnldef$$_fill_7; unsigned int xabjnldef$$_fill_8; unsigned int xabjnldef$$_fill_9; unsigned int xabjnldef$$_fill_10; unsigned int xabjnldef$$_fill_11; unsigned int xabjnldef$$_fill_12; unsigned int xabjnldef$$_fill_13; unsigned int xabjnldef$$_fill_14; } XABJNLDEF; #if !defined(__VAXC) #define xab$w_jnl_flags xab$r_jnl_flags_overlay.xab$w_jnl_flags #define xab$r_jnl_flags_bits xab$r_jnl_flags_overlay.xab$r_jnl_flags_bits #define xab$v_journal_disabled xab$r_jnl_flags_bits.xab$v_journal_disabled #define xab$v_backup_done xab$r_jnl_flags_bits.xab$v_backup_done #endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */ #if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */ #pragma __nomember_alignment __longword #else #pragma __nomember_alignment #endif struct xabjnldef { #pragma __nomember_alignment unsigned char xab$b_cod; /* xab id code */ unsigned char xab$b_bln; /* block length */ short int xabjnldef$$_fill_1; /* (spare) */ void *xab$l_nxt; /* xab chain link */ unsigned char xab$b_xabjnl_type; /* type of $XABJNL */ char xabjnldef$$_fill_5; __union { unsigned short int xab$w_jnl_flags; /* journal flags (from ACE$W_RMSJNL_FLAGS) */ __struct { unsigned xab$v_journal_disabled : 1; /* journaling disabled by BACKUP (AI/BI/AT) */ unsigned xab$v_backup_done : 1; /* Backup done since last $OPEN */ unsigned xab$v_fill_16_ : 6; } xab$r_jnl_flags_bits; } xab$r_jnl_flags_overlay; struct fabdef *xab$l_jnl_fab; /* address of journal file FAB */ char *xab$l_volnam_buf; /* address of journal volume name buffer */ unsigned short int xab$w_volnam_siz; /* size of journal volume name buffer */ unsigned short int xab$w_volnam_len; /* return length of journal volume name */ unsigned int xab$q_jnl_verify_cdate [2]; /* journal file creation date (from ACE$Q_CDATE) */ /* (to match with journal file's creation date) */ unsigned int xab$l_jnlidx; /* Journal stream index within journal file */ unsigned int xab$l_backup_seqno; /* Backup sequence number. */ unsigned int xab$q_jnl_mod_time [2]; /* Timestamp of last backup or last journal */ /* entry recovered. */ unsigned int xabjnldef$$_fill_7; unsigned int xabjnldef$$_fill_8; unsigned int xabjnldef$$_fill_9; unsigned int xabjnldef$$_fill_10; unsigned int xabjnldef$$_fill_11; unsigned int xabjnldef$$_fill_12; unsigned int xabjnldef$$_fill_13; unsigned int xabjnldef$$_fill_14; } ; #if !defined(__VAXC) #define xab$w_jnl_flags xab$r_jnl_flags_overlay.xab$w_jnl_flags #define xab$v_journal_disabled xab$r_jnl_flags_overlay.xab$r_jnl_flags_bits.xab$v_journal_disabled #define xab$v_backup_done xab$r_jnl_flags_overlay.xab$r_jnl_flags_bits.xab$v_backup_done #endif /* #if !defined(__VAXC) */ #endif /* #ifdef __NEW_STARLET */ /* basealign on aggregate XABJNLDEF operates after aggregate end */ #define XAB$K_JNLLEN 80 #define XAB$C_JNLLEN 80 #ifdef __NEW_STARLET #define XABJNL _xabjnldef #else #define XABJNL xabjnldef #endif #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 /* __XABJNLDEF_LOADED */