/********************************************************************************************************************************/
/* Created:  9-Mar-2021 22:28:05 by OpenVMS SDL EV3-3      */
/* Source:  09-MAR-2021 22:28:01 $1$DGA8085:[STARLET_H.SRC]STARDEFAE.SDI;1 */
/********************************************************************************************************************************/
/*** MODULE $DIBDEF ***/
#ifndef __DIBDEF_LOADED
#define __DIBDEF_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
 
/*+                                                                         */
/* DEVICE INFORMATION BLOCK DEFINITIONS                                     */
/*-                                                                         */
#define DIB$K_LENGTH 116                /*LENGTH OF TOTAL BUFFER            */
#define DIB$C_LENGTH 116                /*LENGTH OF TOTAL BUFFER            */
	
#ifdef __NEW_STARLET
typedef struct _dibdef {
    unsigned int dib$l_devchar;         /*DEVICE CHARACTERISTICS            */
    unsigned char dib$b_devclass;       /*DEVICE CLASS                      */
    unsigned char dib$b_devtype;        /*DEVICE TYPE                       */
    unsigned short int dib$w_devbufsiz; /*DEVICE BUFFER SIZE                */
    __union  {
        unsigned int dib$l_devdepend;   /*DEVICE DEPENDENT INFORMATION      */
        __struct  {
            unsigned char dib$b_sectors; /*(DISK ONLY) SECTORS PER TRACK    */
            unsigned char dib$b_tracks; /* " TRACKS PER CYLINDER            */
            unsigned short int dib$w_cylinders; /* " NUMBER OF CYLINDERS    */
            } dib$r_devdepend_fields;
        } dib$r_devdepend_overlay;
    unsigned short int dib$w_unit;      /*DEVICE UNIT NUMBER                */
    unsigned short int dib$w_devnamoff; /*OFFSET TO DEVICE NAME COUNTED STRING  */
    unsigned int dib$l_pid;             /*DEVICE OWNER PROCESS IDENTIFICATION  */
    unsigned int dib$l_ownuic;          /*DEVICE OWNER USER IDENTIFICATION CODE  */
    unsigned short int dib$w_vprot;     /*DEVICE PROTECTION MASK            */
    unsigned short int dib$w_errcnt;    /*DEVICE ERROR COUNT                */
    unsigned int dib$l_opcnt;           /*DEVICE OPERATIONS COUNT           */
    unsigned short int dib$w_volnamoff; /*OFFSET TO VOLUME LABEL COUNTED STRING  */
    unsigned short int dib$w_recsiz;    /*BLOCKED RECORD SIZE               */
    char dib$t_devname [76];            /*SPACE FOR DEVNAME AND LABEL (64+12)  */
    unsigned int dib$l_maxblock;        /*DISK VOLUME SIZE IN BLOCKS        */
    } DIBDEF;
 
#if !defined(__VAXC)
#define dib$l_devdepend dib$r_devdepend_overlay.dib$l_devdepend
#define dib$b_sectors dib$r_devdepend_overlay.dib$r_devdepend_fields.dib$b_sectors
#define dib$b_tracks dib$r_devdepend_overlay.dib$r_devdepend_fields.dib$b_tracks
#define dib$w_cylinders dib$r_devdepend_overlay.dib$r_devdepend_fields.dib$w_cylinders
#endif		/* #if !defined(__VAXC) */
 
#else	    /* __OLD_STARLET */
struct dibdef {
    unsigned int dib$l_devchar;         /*DEVICE CHARACTERISTICS            */
    unsigned char dib$b_devclass;       /*DEVICE CLASS                      */
    unsigned char dib$b_devtype;        /*DEVICE TYPE                       */
    unsigned short int dib$w_devbufsiz; /*DEVICE BUFFER SIZE                */
    __union  {
        unsigned int dib$l_devdepend;   /*DEVICE DEPENDENT INFORMATION      */
        __struct  {
            unsigned char dib$b_sectors; /*(DISK ONLY) SECTORS PER TRACK    */
            unsigned char dib$b_tracks; /* " TRACKS PER CYLINDER            */
            unsigned short int dib$w_cylinders; /* " NUMBER OF CYLINDERS    */
            } dib$r_devdepend_fields;
        } dib$r_devdepend_overlay;
    unsigned short int dib$w_unit;      /*DEVICE UNIT NUMBER                */
    unsigned short int dib$w_devnamoff; /*OFFSET TO DEVICE NAME COUNTED STRING  */
    unsigned int dib$l_pid;             /*DEVICE OWNER PROCESS IDENTIFICATION  */
    unsigned int dib$l_ownuic;          /*DEVICE OWNER USER IDENTIFICATION CODE  */
    unsigned short int dib$w_vprot;     /*DEVICE PROTECTION MASK            */
    unsigned short int dib$w_errcnt;    /*DEVICE ERROR COUNT                */
    unsigned int dib$l_opcnt;           /*DEVICE OPERATIONS COUNT           */
    unsigned short int dib$w_volnamoff; /*OFFSET TO VOLUME LABEL COUNTED STRING  */
    unsigned short int dib$w_recsiz;    /*BLOCKED RECORD SIZE               */
    char dib$t_devname [76];            /*SPACE FOR DEVNAME AND LABEL (64+12)  */
    unsigned int dib$l_maxblock;        /*DISK VOLUME SIZE IN BLOCKS        */
    } ;
 
#if !defined(__VAXC)
#define dib$l_devdepend dib$r_devdepend_overlay.dib$l_devdepend
#define dib$b_sectors dib$r_devdepend_overlay.dib$r_devdepend_fields.dib$b_sectors
#define dib$b_tracks dib$r_devdepend_overlay.dib$r_devdepend_fields.dib$b_tracks
#define dib$w_cylinders dib$r_devdepend_overlay.dib$r_devdepend_fields.dib$w_cylinders
#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 /* __DIBDEF_LOADED */