/********************************************************************************************************************************/
/* Created:  9-Mar-2021 22:28:02 by OpenVMS SDL EV3-3      */
/* Source:  09-MAR-2021 22:28:00 $1$DGA8085:[STARLET_H.SRC]LBRUSR.SDI;1 */
/********************************************************************************************************************************/
/*** MODULE $LHIDEF ***/
#ifndef __LHIDEF_LOADED
#define __LHIDEF_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
 
/*                                                                          */
/* Library header information array offsets                                 */
/*                                                                          */
	
#ifdef __NEW_STARLET
typedef struct _lhidef {
    unsigned int lhi$l_type;            /* Library type                     */
    unsigned int lhi$l_nindex;          /* Number of indices                */
    unsigned int lhi$l_majorid;         /* Library format major id          */
    unsigned int lhi$l_minorid;         /* Library format minor id          */
    char lhi$t_lbrver [32];             /* ASCIC version of librarian that created  */
    unsigned int lhi$l_credat;          /* Creation date/time               */
    int lhidef$$_fill_1;                /* ...                              */
    unsigned int lhi$l_updtim;          /* Date/time of last update         */
    int lhidef$$_fill_2;                /* ...                              */
    unsigned int lhi$l_updhis;          /* VBN of start of update history   */
    unsigned int lhi$l_freevbn;         /* 1st logically deleted block      */
    unsigned int lhi$l_freeblk;         /* Number of deleted blocks         */
    unsigned char lhi$b_nextrfa [6];    /* RFA of end of library            */
    unsigned short int lhi$w_rfaxtr;    /* Spare word, zeroed               */
    unsigned int lhi$l_nextvbn;         /* Next VBN to allocate at end of file  */
    unsigned int lhi$l_freidxblk;       /* Number of free pre-allocated index blocks  */
    unsigned int lhi$l_freeidx;         /* Listhead for pre-allocated index blocks  */
    unsigned int lhi$l_hipreal;         /* VBN of highest pre-allocated block  */
    unsigned int lhi$l_idxblks;         /* Number of index blocks in use    */
    unsigned int lhi$l_idxcnt;          /* Number of index entries (total)  */
    unsigned int lhi$l_modcnt;          /* Number of entries in index 1 (module names)  */
    unsigned int lhi$l_mhdusz;          /* Length of user-maintained info in module header  */
    unsigned int lhi$l_maxluhrec;       /* Maximum number of library update histories records maintained  */
    unsigned int lhi$l_numluhrec;       /* Number of LUH records in history  */
    unsigned int lhi$l_libstatus;       /* False if there was an error closing lib  */
    unsigned char lhi$b_freehdrs [6];   /* Freed list header structure in RFA structure format */
    unsigned char lhi$b_freenodes [6];  /* Freed list nodes structure in RFA struture format */
    unsigned int lhi$l_idx3heap;        /* VBN of third index block         */
    } LHIDEF;
#else	    /* __OLD_STARLET */
struct lhidef {
    unsigned int lhi$l_type;            /* Library type                     */
    unsigned int lhi$l_nindex;          /* Number of indices                */
    unsigned int lhi$l_majorid;         /* Library format major id          */
    unsigned int lhi$l_minorid;         /* Library format minor id          */
    char lhi$t_lbrver [32];             /* ASCIC version of librarian that created  */
    unsigned int lhi$l_credat;          /* Creation date/time               */
    int lhidef$$_fill_1;                /* ...                              */
    unsigned int lhi$l_updtim;          /* Date/time of last update         */
    int lhidef$$_fill_2;                /* ...                              */
    unsigned int lhi$l_updhis;          /* VBN of start of update history   */
    unsigned int lhi$l_freevbn;         /* 1st logically deleted block      */
    unsigned int lhi$l_freeblk;         /* Number of deleted blocks         */
    unsigned char lhi$b_nextrfa [6];    /* RFA of end of library            */
    unsigned short int lhi$w_rfaxtr;    /* Spare word, zeroed               */
    unsigned int lhi$l_nextvbn;         /* Next VBN to allocate at end of file  */
    unsigned int lhi$l_freidxblk;       /* Number of free pre-allocated index blocks  */
    unsigned int lhi$l_freeidx;         /* Listhead for pre-allocated index blocks  */
    unsigned int lhi$l_hipreal;         /* VBN of highest pre-allocated block  */
    unsigned int lhi$l_idxblks;         /* Number of index blocks in use    */
    unsigned int lhi$l_idxcnt;          /* Number of index entries (total)  */
    unsigned int lhi$l_modcnt;          /* Number of entries in index 1 (module names)  */
    unsigned int lhi$l_mhdusz;          /* Length of user-maintained info in module header  */
    unsigned int lhi$l_maxluhrec;       /* Maximum number of library update histories records maintained  */
    unsigned int lhi$l_numluhrec;       /* Number of LUH records in history  */
    unsigned int lhi$l_libstatus;       /* False if there was an error closing lib  */
    unsigned char lhi$b_freehdrs [6];   /* Freed list header structure in RFA structure format */
    unsigned char lhi$b_freenodes [6];  /* Freed list nodes structure in RFA struture format */
    unsigned int lhi$l_idx3heap;        /* VBN of third index block         */
    } ;
#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 /* __LHIDEF_LOADED */