-+-+-+-+-+-+-+-+ START OF PART 4 -+-+-+-+-+-+-+-+ X unsigned long lkb$l_parent; /* address of parent lkb V `20 X*/ X unsigned short lkb$w_refcnt; /* sub lkb reference count V `20 X*/ X unsigned char lkb$b_tslt; /* timestamp lifetime V `20 X*/ X unsigned char lkb$b_fill; V `20 X unsigned long lkb$l_rsb; /* address of owner rsb V `20 X*/ X unsigned long lkb$l_remlkid; /* remote lock id V `20 X*/ X variant_union `7B V `20 X unsigned long lkb$l_csid; /* cluster system id (master only) V`20 X*/ X unsigned long lkb$l_oldastprm; /* old ast parameter V `20 X*/ X `7D lkb$r_csid_overlay; V `20 X unsigned long lkb$l_oldblkast; /* old blocking ast addr, V `20 X*/ X unsigned long lkb$l_lckctx; /* address of context block V `20 X*/ X`7D; V `20 V `20 X#pragma standard `20 X X X#define HM2$C_LEVEL1 257 /* 401 octal = structure level 1 V */ X#define HM2$C_LEVEL2 512 /* 1000 octal = structure level 2 V */ X#define HM2$M_READCHECK 1 X#define HM2$M_WRITCHECK 2 X#define HM2$M_ERASE 4 X#define HM2$M_NOHIGHWATER 8 X#define HM2$M_CLASS_PROT 16 X#define HM2$S_HM2DEF 512 X X#pragma nostandard Xstruct hm2 `7B X unsigned long hm2$l_homelbn; /* LBN of home (i.e., this) block V `20 X*/ X unsigned long hm2$l_alhomelbn; /* LBN of alternate home block V `20 X*/ X unsigned long hm2$l_altidxlbn; /* LBN of alternate index file header V `20 X*/ X variant_union `7B X unsigned short hm2$w_struclev; /* volume structure level V `20 X*/ X variant_struct `7B X unsigned char hm2$b_strucver; /* structure version number V `20 X*/ X unsigned char hm2$b_struclev; /* main structure level V `20 X*/ X `7D hm2$r_struclev_bytes; X `7D hm2$r_struclev_overlay; X unsigned short hm2$w_cluster; /* storage bitmap cluster factor V `20 X*/ X unsigned short hm2$w_homevbn; /* VBN of home (i.e., this) block V `20 X*/ X unsigned short hm2$w_alhomevbn; /* VBN of alternate home block V `20 X*/ X unsigned short hm2$w_altidxvbn; /* VBN of alternate index file header V `20 X*/ X unsigned short hm2$w_ibmapvbn; /* VBN of index file bitmap V `20 X*/ X unsigned long hm2$l_ibmaplbn; /* LBN of index file bitmap V `20 X*/ X unsigned long hm2$l_maxfiles; /* maximum # files on volume V `20 X*/ X unsigned short hm2$w_ibmapsize; /* index file bitmap size, blocks V `20 X*/ X unsigned short hm2$w_resfiles; /* # reserved files on volume V `20 X*/ X unsigned short hm2$w_devtype; /* disk device type V `20 X*/ X unsigned short hm2$w_rvn; /* relative volume number of this volu Vme X*/ X unsigned short hm2$w_setcount; /* count of volumes in set V `20 X*/ X variant_union `7B X unsigned short hm2$w_volchar; /* volume characteristics V `20 X*/ X variant_struct `7B X unsigned hm2$v_readcheck : 1; /* verify all read operations V `20 X*/ X unsigned hm2$v_writcheck : 1; /* verify all write operations V `20 X*/ X unsigned hm2$v_erase : 1; /* erase all files on delete V `20 X*/ X unsigned hm2$v_nohighwater : 1; /* turn off high-water marking V `20 X*/ X unsigned hm2$v_class_prot : 1; /* enable classification checks V `20 X*/ X unsigned hm2$v_fill : 11; X `7D hw2$r_volchar_bits;`20 X `7D hw2$r_volchar_overlay; X unsigned long hm2$l_volowner; /* volume owner UIC V `20 X*/ X unsigned long hm2$l_sec_mask; /* volume security mask V `20 X*/ X unsigned short hm2$w_protect; /* volume protection V `20 X*/ X unsigned short hm2$w_fileprot; /* default file protection V `20 X*/ X unsigned short hm2$w_recprot; /* default file record protecti Von X*/ X unsigned short hm2$w_checksum1; /* first checksum V `20 X*/ X unsigned long hm2$q_credate`5B2`5D; /* volume creation date V `20 X*/ X unsigned char hm2$b_window; /* default window size V `20 X*/ X unsigned char hm2$b_lru_lim; /* default LRU limit V `20 X*/ X unsigned short hm2$w_extend ; /* default file extend V `20 X*/ X unsigned long hm2$q_retainmin`5B2`5D; /* minimum file retention p Veriod`20 X*/ X unsigned long hm2$q_retainmax`5B2`5D; /* maximum file retention p Veriod`20 X*/ X unsigned long hm2$q_revdate`5B2`5D; /* volume revision date V `20 X*/ X unsigned long hm2$r_min_class`5B5`5D; /* volume minimum security V class`20 X*/ X unsigned long hm2$r_max_class`5B5`5D; /* volume maximum security V class`20 X*/ X unsigned short hm2$w_filetab_fid`5B3`5D; /* file lookup table FID V `20 X*/ X variant_union `7B X unsigned short hm2$w_lowstruclev; /* lowest struclev on volum Ve`20 X*/ X variant_struct `7B X unsigned char hm2$b_lowstrucver; /* structure version nu Vm`20 X*/ X unsigned char hm2$b_lowstruclev; /* main structure level V `20 X*/ X `7D hm2$r_lowstruclev_bytes; X `7D hm2$r_lowstruclev_overlay; X variant_union `7B X unsigned short hm2$w_highstruclev; /* highest struclev on volu Vme X*/ X variant_struct `7B X unsigned char hm2$b_highstrucver; /* structure version nu Vm`20 X*/ X unsigned char hm2$b_highstruclev; /* main structure level V `20 X*/ X `7D hm2$r_highstruclev_bytes; X `7D hm2$r_highstruclev_overlay; X unsigned short hm2$w_pad`5B155`5D; X unsigned long hm2$l_serialnum; /* pack serial number V `20 X*/ X unsigned char hm2$t_strucname`5B12`5D; /* structure (volume set na Vme) `20 X*/ X unsigned char hm2$t_volname`5B12`5D; /* volume name V `20 X*/ X unsigned char hm2$t_ownername`5B12`5D; /* volume owner name V `20 X*/ X unsigned char hm2$t_format`5B12`5D; /* volume format type V `20 X*/ X unsigned short hm2$w_pad2; X unsigned short hm2$w_checksum2; /* second checksum V `20 X*/ X`7D; X#pragma standard X X X#define FH2$C_LEVEL1 257 /* 401 octal = structure level 1 */ X#define FH2$C_LEVEL2 512 /* 1000 octal = structure level 2 */ X#define FH2$M_VCC_STATE 1792 X#define FH2$M_ALM_STATE 1835008 X#define FH2$M_WASCONTIG 1 X#define FH2$M_NOBACKUP 2 X#define FH2$M_WRITEBACK 4 X#define FH2$M_READCHECK 8 X#define FH2$M_WRITCHECK 16 X#define FH2$M_CONTIGB 32 X#define FH2$M_LOCKED 64 X#define FH2$M_CONTIG 128 X#define FH2$M_BADACL 2048 X#define FH2$M_SPOOL 4096 X#define FH2$M_DIRECTORY 8192 X#define FH2$M_BADBLOCK 16384 X#define FH2$M_MARKDEL 32768 X#define FH2$M_NOCHARGE 65536 X#define FH2$M_ERASE 131072 X#define FH2$M_ALM_AIP 262144 X#define FH2$M_ALM_ARCHIVED 524288 X#define FH2$M_ALM_DELETED 1048576 X#define FH2$M_ONLY_RU 1 X#define FH2$M_RUJNL 2 X#define FH2$M_BIJNL 4 X#define FH2$M_AIJNL 8 X#define FH2$M_ATJNL 16 X#define FH2$M_NEVER_RU 32 X#define FH2$M_JOURNAL_FILE 64 X#define FH2$C_RU_FACILITY_RMS 1 /* RMS */ X#define FH2$C_RU_FACILITY_DBMS 2 /* DBMS */ X#define FH2$C_RU_FACILITY_RDB 3 /* Rdb/VMS */ X#define FH2$C_RU_FACILITY_CHKPNT 4 /* Checkpoint/Restart */ X#define FH2$K_LENGTH 80 /* length of header area */ X#define FH2$C_LENGTH 80 /* length of header area */ X#define FH2$K_SUBSET0_LENGTH 88 /* length of header area */ X#define FH2$C_SUBSET0_LENGTH 88 /* length of header area */ X#define FH2$K_FULL_LENGTH 108 /* length of full header */ X#define FH2$C_FULL_LENGTH 108 /* length of full header */ X#define FH2$S_FH2DEF 512 X X#pragma nostandard Xstruct fh2 `7B X unsigned char fh2$b_idoffset; /* ident area offset in words V */ X unsigned char fh2$b_mpoffset; /* map area offset in words V */ X unsigned char fh2$b_acoffset; /* access control list offset in words V */ X unsigned char fh2$b_rsoffset; /* reserved area offset in words V */ X unsigned short fh2$w_seg_num; /* file segment number V */ X variant_union `7B X unsigned short fh2$w_struclev; /* file structure level V */ X variant_struct `7B X unsigned char fh2$b_strucver; /* file structure version V */ X unsigned char fh2$b_struclev; /* principal file struct level V */ X `7D fh2$r_struclev_bytes; X `7D fh2$r_struclev_overlay; X variant_union `7B X unsigned short fh2$w_fid`5B3`5D; X variant_struct `7B X unsigned short fh2$w_fid_num; X unsigned short fh2$w_fid_seq; X variant_union `7B X unsigned short fh2$w_fid_rvn; X variant_struct `7B X unsigned char fh2$b_fid_rvn; X unsigned char fh2$b_fid_nmx; X `7D fh2$r_rvn_bytes; X `7D fh2$r_rvn_overlay; X `7D fh2$r_fid_words; X `7D fh2$r_fid_overlay; X variant_union `7B X unsigned short fh2$w_ext_fid`5B3`5D; X variant_struct `7B X unsigned short fh2$w_ex_fidnum; X unsigned short fh2$w_ex_fidseq; X variant_union `7B X unsigned short fh2$w_ex_fidrvn; X variant_struct `7B X unsigned char fh2$b_ex_fidrvn; X unsigned char fh2$b_ex_fidnmx; X `7D fh2$r_ex_rvn_bytes; X `7D fh2$r_exe_rvn_overlay; X `7D fh2$r_ex_fid_words; X `7D fh2$r_ex_fid_overlay; X unsigned short fh2$w_recattr`5B16`5D; X variant_union `7B X unsigned long fh2$l_filechar; X variant_struct `7B X unsigned fh2$v_wascontig : 1; /* file was (and should be) cont Vig X*/ X unsigned fh2$v_nobackup : 1; /* file is not to be backed up V `20 X*/ X unsigned fh2$v_writeback : 1; /* file may be write-back cached V `20 X*/ X unsigned fh2$v_readcheck : 1; /* verify all read operations V `20 X*/ X unsigned fh2$v_writcheck : 1; /* verify all write operations V `20 X*/ X unsigned fh2$v_contigb : 1; /* keep file as contiguous as po Vss X*/ X unsigned fh2$v_locked : 1; /* file is deaccess locked V `20 X*/ X unsigned fh2$v_contig : 1; /* file is contiguous V `20 X*/ X unsigned fh2$v_vcc_state : 3; X unsigned fh2$v_badacl : 1; /* ACL is invalid V `20 X*/ X unsigned fh2$v_spool : 1; /* intermediate spool file V `20 X*/ X unsigned fh2$v_directory : 1; /* file is a directory V `20 X*/ X unsigned fh2$v_badblock : 1; /* file contains bad blocks V `20 X*/ X unsigned fh2$v_markdel : 1; /* file is marked for delete V `20 X*/ X unsigned fh2$v_nocharge : 1; /* file space is not to be charg Ved X*/ X unsigned fh2$v_erase : 1; /* erase file contents before de Vl`20 X*/ X unsigned fh2$v_alm_aip : 1; /* Archive in progress V `20 X*/ X unsigned fh2$v_alm_archived : 1; /* File archived V `20 X*/ X unsigned fh2$v_alm_deleted : 1; /* File contents deleted V `20 X*/ X unsigned fh2$v_fill : 11; X `7D fh2$r_filechar_bits; X `7D fh2$r_filechar_overlay; X unsigned short fh2$w_recprot; /* record protection */ X unsigned char fh2$b_map_inuse; /* number of map area words in use */ X unsigned char fh2$b_acc_mode; /* least privileged access mode */ X variant_union `7B X unsigned long fh2$l_fileowner; /* file owner UIC */ X variant_struct `7B X unsigned short fh2$w_uicmember; /* UIC member number */ X unsigned short fh2$w_uicgroup; /* UIC group number */ X `7D fh2$r_fileowner_bytes; X `7D fh2$r_fileowner_overlay; X unsigned short fh2$w_fileprot; /* file protection */ X variant_union `7B X unsigned short fh2$w_backlink`5B3`5D; X variant_struct `7B X unsigned short fh2$w_bk_fidnum; X unsigned short fh2$w_bk_fidseq; X variant_union `7B X unsigned short fh2$w_bk_fidrvn; X variant_struct `7B X unsigned char fh2$b_bk_fidrvn; X unsigned char fh2$b_bk_fidnmx; X `7D fh2$r_backlink_rvn_bytes; X `7D fh2$r_backlink_rvn_overlay; X `7D fh2$r_backlink_rvn_words; X `7D fh2$r_backlink_rvn_overlay; X variant_union `7B X unsigned char fh2$b_journal; X variant_struct `7B X unsigned fh2$v_only_ru : 1; /* file accessible only in rec un Vit X*/`20 X unsigned fh2$v_rujnl : 1; /* enable recovery unit journ Val X*/ `20 X unsigned fh2$v_bijnl : 1; /* enable before image journa Vl`20 X*/ X unsigned fh2$v_aijnl : 1; /* enable after image journal V `20 X*/ X unsigned fh2$v_atjnl : 1; /* enable audit trail journal V `20 X*/ X unsigned fh2$v_never_ru : 1; /* file never accessible in rec u +-+-+-+-+-+-+-+- END OF PART 4 +-+-+-+-+-+-+-+-