/********************************************************************************************************************************/ /* Created: 9-Mar-2021 22:28:06 by OpenVMS SDL EV3-3 */ /* Source: 09-MAR-2021 22:28:01 $1$DGA8085:[STARLET_H.SRC]STARDEFQZ.SDI;1 */ /********************************************************************************************************************************/ /*** MODULE $UICDEF ***/ #ifndef __UICDEF_LOADED #define __UICDEF_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 /*+ */ /* */ /* Format of UIC - user identification code. May be either two part */ /* group / member identifier, or a single uniform identifier. */ /* */ /* The binary layout of the id space is as follows: */ /* */ /* ---------- Bit -------- */ /* 31 30 29 28 27 26 Description */ /* === === === === === === ======================================== */ /* */ /* 0 0 - - - - UIC form (group/member) */ /* 0 1 - - - - Unused */ /* 1 0 - - - - Identifier form */ /* 1 0 0 0 - - System identifiers */ /* 1 0 0 1 - - Facility-specific identifiers */ /* 1 0 1 0 - - Arbitrary assignment identifiers */ /* 1 0 1 0 0 0 SEVMS identifier space */ /* 1 0 1 0 0 1 Unused */ /* 1 0 1 0 1 0 Unused */ /* 1 0 1 0 1 1 Unused */ /* 1 0 1 1 - - Unused */ /* 1 1 - - - - Unused */ /*- */ #define UIC$K_MAX_UIC 1073741823 /* Highest possible UIC */ #define UIC$K_WILD_MEMBER 65535 /* Code for wild card member */ #define UIC$K_WILD_GROUP 16383 /* Code for wild card group */ #define UIC$K_UIC_FORMAT 0 /* UIC format code */ #define UIC$K_ID_FORMAT 2 /* ID format code */ #define UIC$K_TYPE_SYSTEM 8 /* system ID or UIC */ #define UIC$K_TYPE_FACILITY 9 /* facility ID or UIC */ #define UIC$K_TYPE_ARBITRARY 10 /* arbitrary assignment space */ #define UIC$K_FIRST_ID -2147418112 /* First general identifier */ #define UIC$K_LAST_ID -1879048193 /* Last general identifier */ #define UIC$K_MATCH_ALL -1 /* Match all identifiers */ #define UIC$K_ASSIGN_SEVMS 0 /* SEVMS block of identifier space */ #ifdef __NEW_STARLET typedef union _uicdef { __union { unsigned int uic$l_uic; /* Full longword */ __struct { unsigned short int uic$w_mem; /* Member number */ unsigned short int uic$w_grp; /* Group number */ } uic$r_fill_62_; } uic$r_fill_61_; __struct { /* Group / member format */ unsigned uic$v_member : 16; /* Member number */ unsigned uic$v_group : 14; /* Group number */ unsigned uic$v_format : 2; /* Format code */ } uic$r_uic_form; __struct { /* General identifier format */ unsigned uic$v_id_code : 28; /* ID code */ unsigned uic$v_id_type : 4; /* ID type */ } uic$r_id_form; __struct { /* Facility identifier format */ unsigned uic$v_fac_id_code : 16; /* ID code */ unsigned uic$v_facility : 12; /* Facility code */ unsigned uic$v_fill_1 : 4; /* space for ID type code */ } uic$r_fac_id_form; __struct { /* Arbitrary assignment format */ unsigned uic$v_arb_id_code : 26; /* ID code */ unsigned uic$v_assign_code : 2; /* Assignment code */ unsigned uic$v_fill_2 : 4; /* space for ID type code */ } uic$r_arbitrary_id_form; } UICDEF; #if !defined(__VAXC) #define uic$l_uic uic$r_fill_61_.uic$l_uic #define uic$w_mem uic$r_fill_61_.uic$r_fill_62_.uic$w_mem #define uic$w_grp uic$r_fill_61_.uic$r_fill_62_.uic$w_grp #define uic$v_member uic$r_uic_form.uic$v_member #define uic$v_group uic$r_uic_form.uic$v_group #define uic$v_format uic$r_uic_form.uic$v_format #define uic$v_id_code uic$r_id_form.uic$v_id_code #define uic$v_id_type uic$r_id_form.uic$v_id_type #define uic$v_fac_id_code uic$r_fac_id_form.uic$v_fac_id_code #define uic$v_facility uic$r_fac_id_form.uic$v_facility #define uic$v_arb_id_code uic$r_arbitrary_id_form.uic$v_arb_id_code #define uic$v_assign_code uic$r_arbitrary_id_form.uic$v_assign_code #endif /* #if !defined(__VAXC) */ #else /* __OLD_STARLET */ union uicdef { __union { unsigned int uic$l_uic; /* Full longword */ __struct { unsigned short int uic$w_mem; /* Member number */ unsigned short int uic$w_grp; /* Group number */ } uic$r_fill_62_; } uic$r_fill_61_; __struct { /* Group / member format */ unsigned uic$v_member : 16; /* Member number */ unsigned uic$v_group : 14; /* Group number */ unsigned uic$v_format : 2; /* Format code */ } uic$r_uic_form; __struct { /* General identifier format */ unsigned uic$v_id_code : 28; /* ID code */ unsigned uic$v_id_type : 4; /* ID type */ } uic$r_id_form; __struct { /* Facility identifier format */ unsigned uic$v_fac_id_code : 16; /* ID code */ unsigned uic$v_facility : 12; /* Facility code */ unsigned uic$v_fill_1 : 4; /* space for ID type code */ } uic$r_fac_id_form; __struct { /* Arbitrary assignment format */ unsigned uic$v_arb_id_code : 26; /* ID code */ unsigned uic$v_assign_code : 2; /* Assignment code */ unsigned uic$v_fill_2 : 4; /* space for ID type code */ } uic$r_arbitrary_id_form; } ; #if !defined(__VAXC) #define uic$l_uic uic$r_fill_61_.uic$l_uic #define uic$w_mem uic$r_fill_61_.uic$r_fill_62_.uic$w_mem #define uic$w_grp uic$r_fill_61_.uic$r_fill_62_.uic$w_grp #define uic$v_member uic$r_uic_form.uic$v_member #define uic$v_group uic$r_uic_form.uic$v_group #define uic$v_format uic$r_uic_form.uic$v_format #define uic$v_id_code uic$r_id_form.uic$v_id_code #define uic$v_id_type uic$r_id_form.uic$v_id_type #define uic$v_fac_id_code uic$r_fac_id_form.uic$v_fac_id_code #define uic$v_facility uic$r_fac_id_form.uic$v_facility #define uic$v_arb_id_code uic$r_arbitrary_id_form.uic$v_arb_id_code #define uic$v_assign_code uic$r_arbitrary_id_form.uic$v_assign_code #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 /* __UICDEF_LOADED */