/********************************************************************************************************************************/ /* Created: 15-MAR-2001 23:37:35 by OpenVMS SDL EV1-33 */ /* Source: 15-MAR-2001 23:34:34 _$11$DUA933:[BUILD.SDL]OBJFMT.SDI;1 */ /********************************************************************************************************************************/ /*** MODULE $ESGPSDEF ***/ #ifndef __ESGPSDEF_LOADED #define __ESGPSDEF_LOADED 1 #pragma nostandard #ifdef __cplusplus extern "C" { #define __unknown_params ... #else #define __unknown_params #endif #if !defined(__VAXC) && !defined(VAXC) #define __struct struct #define __union union #else #define __struct variant_struct #define __union variant_union #endif /* */ /* EVAX GSD entry - P-section definition in shareable image */ /* */ #define ESGPS$M_PIC 0x1 #define ESGPS$M_LIB 0x2 #define ESGPS$M_OVR 0x4 #define ESGPS$M_REL 0x8 #define ESGPS$M_GBL 0x10 #define ESGPS$M_SHR 0x20 #define ESGPS$M_EXE 0x40 #define ESGPS$M_RD 0x80 #define ESGPS$M_WRT 0x100 #define ESGPS$M_VEC 0x200 #define ESGPS$M_NOMOD 0x400 #define ESGPS$M_COM 0x800 #define ESGPS$M_ALLOC_64BIT 0x1000 #define ESGPS$K_NAME 25 #define ESGPS$C_NAME 25 struct esgpsdef { __union { unsigned short int esgps$w_gsdtyp; /*Typ field */ __struct { #if defined(__VAXC) || defined(VAXC) char esgps$t_start[]; #else #define esgps$t_start esgpsdef$$_fill_1 #endif /* #if defined(__VAXC) || defined(VAXC) */ char esgpsdef$$_fill_1; } esgps$r_gsdtyp_fields; } esgps$r_gsdtyp_overlay; unsigned short int esgps$w_size; /*size of this ESGPS */ unsigned char esgps$b_align; /*P-sect alignment */ unsigned char esgps$b_temp; /*pad for allignment */ __union { unsigned short int esgps$w_flags; /*P-sect flags */ __struct { unsigned esgps$v_pic : 1; /*Position independent */ unsigned esgps$v_lib : 1; /*From a shareable image */ unsigned esgps$v_ovr : 1; /*Overlaid memory allocation */ unsigned esgps$v_rel : 1; /*Relocatable */ unsigned esgps$v_gbl : 1; /*Global scope */ unsigned esgps$v_shr : 1; /*Shareable */ unsigned esgps$v_exe : 1; /*Executable */ unsigned esgps$v_rd : 1; /*Readable */ unsigned esgps$v_wrt : 1; /*Writeable */ unsigned esgps$v_vec : 1; /*Vector psect */ unsigned esgps$v_nomod : 1; /*Not stored into */ unsigned esgps$v_com : 1; /*Associated with COMM sym */ unsigned esgps$v_alloc_64bit : 1; /*Load in 64-bit space */ unsigned esgps$v_fill_25 : 3; } esgps$r_flags_bits; } esgps$r_flags_overlay; unsigned int esgps$l_alloc; /*Length of this psect in shr image */ unsigned int esgps$l_base; /*Offset into img of psect, copy of symbol vector */ __union { unsigned int esgps$q_value [2]; unsigned int esgps$l_value; } esgps$r_value_overlay; unsigned char esgps$b_namlng; /*Length of p-sect name */ char esgps$t_name [31]; /*Name field */ } ; #if !defined(__VAXC) && !defined(VAXC) #define esgps$w_gsdtyp esgps$r_gsdtyp_overlay.esgps$w_gsdtyp #define esgps$w_flags esgps$r_flags_overlay.esgps$w_flags #define esgps$v_pic esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_pic #define esgps$v_lib esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_lib #define esgps$v_ovr esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_ovr #define esgps$v_rel esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_rel #define esgps$v_gbl esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_gbl #define esgps$v_shr esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_shr #define esgps$v_exe esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_exe #define esgps$v_rd esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_rd #define esgps$v_wrt esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_wrt #define esgps$v_vec esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_vec #define esgps$v_nomod esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_nomod #define esgps$v_com esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_com #define esgps$v_alloc_64bit esgps$r_flags_overlay.esgps$r_flags_bits.esgps$v_alloc_64bit #define esgps$q_value esgps$r_value_overlay.esgps$q_value #define esgps$l_value esgps$r_value_overlay.esgps$l_value #endif /* #if !defined(__VAXC) && !defined(VAXC) */ /* */ /* EVAX GSD entry - 64-Bit P-section definition in shareable image */ /* */ #define ESGPS64$M_PIC 0x1 #define ESGPS64$M_LIB 0x2 #define ESGPS64$M_OVR 0x4 #define ESGPS64$M_REL 0x8 #define ESGPS64$M_GBL 0x10 #define ESGPS64$M_SHR 0x20 #define ESGPS64$M_EXE 0x40 #define ESGPS64$M_RD 0x80 #define ESGPS64$M_WRT 0x100 #define ESGPS64$M_VEC 0x200 #define ESGPS64$M_NOMOD 0x400 #define ESGPS64$M_COM 0x800 #define ESGPS64$M_ALLOC_64BIT 0x1000 #define ESGPS64$K_NAME 33 #define ESGPS64$C_NAME 33 struct esgps64def { __union { unsigned short int esgps64$w_gsdtyp; /*Typ field */ __struct { #if defined(__VAXC) || defined(VAXC) char esgps64$t_start[]; #else #define esgps64$t_start esgps64def$$_fill_1 #endif /* #if defined(__VAXC) || defined(VAXC) */ char esgps64def$$_fill_1; } esgps64$r_gsdtyp_fields; } esgps64$r_gsdtyp_overlay; unsigned short int esgps64$w_size; /*size of this ESGPS */ unsigned char esgps64$b_align; /*P-sect alignment */ unsigned char esgps64$b_temp; /*pad for allignment */ __union { unsigned short int esgps64$w_flags; /*P-sect flags */ __struct { unsigned esgps64$v_pic : 1; /*Position independent */ unsigned esgps64$v_lib : 1; /*From a shareable image */ unsigned esgps64$v_ovr : 1; /*Overlaid memory allocation */ unsigned esgps64$v_rel : 1; /*Relocatable */ unsigned esgps64$v_gbl : 1; /*Global scope */ unsigned esgps64$v_shr : 1; /*Shareable */ unsigned esgps64$v_exe : 1; /*Executable */ unsigned esgps64$v_rd : 1; /*Readable */ unsigned esgps64$v_wrt : 1; /*Writeable */ unsigned esgps64$v_vec : 1; /*Vector psect */ unsigned esgps64$v_nomod : 1; /*Not stored into */ unsigned esgps64$v_com : 1; /*Associated with COMM sym */ unsigned esgps64$v_alloc_64bit : 1; /*Load in 64-bit space */ unsigned esgps64$v_fill_26 : 3; } esgps64$r_flags_bits; } esgps64$r_flags_overlay; __union { unsigned int esgps64$q_alloc [2]; /*Length of this psect in shr image */ unsigned int esgps64$l_alloc; /* Low Longword */ } esgps64$r_alloc_overlay; __union { unsigned int esgps64$q_base [2]; /*Offset into img of psect, copy of symbol vector */ unsigned int esgps64$l_base; /* Low Longword */ } esgps64$r_base_overlay; __union { unsigned int esgps64$q_value [2]; unsigned int esgps64$l_value; } esgps64$r_value_overlay; unsigned char esgps64$b_namlng; /*Length of p-sect name */ char esgps64$t_name [31]; /*Name field */ } ; #if !defined(__VAXC) && !defined(VAXC) #define esgps64$w_gsdtyp esgps64$r_gsdtyp_overlay.esgps64$w_gsdtyp #define esgps64$w_flags esgps64$r_flags_overlay.esgps64$w_flags #define esgps64$v_pic esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_pic #define esgps64$v_lib esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_lib #define esgps64$v_ovr esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_ovr #define esgps64$v_rel esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_rel #define esgps64$v_gbl esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_gbl #define esgps64$v_shr esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_shr #define esgps64$v_exe esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_exe #define esgps64$v_rd esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_rd #define esgps64$v_wrt esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_wrt #define esgps64$v_vec esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_vec #define esgps64$v_nomod esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_nomod #define esgps64$v_com esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_com #define esgps64$v_alloc_64bit esgps64$r_flags_overlay.esgps64$r_flags_bits.esgps64$v_alloc_64bit #define esgps64$q_alloc esgps64$r_alloc_overlay.esgps64$q_alloc #define esgps64$l_alloc esgps64$r_alloc_overlay.esgps64$l_alloc #define esgps64$q_base esgps64$r_base_overlay.esgps64$q_base #define esgps64$l_base esgps64$r_base_overlay.esgps64$l_base #define esgps64$q_value esgps64$r_value_overlay.esgps64$q_value #define esgps64$l_value esgps64$r_value_overlay.esgps64$l_value #endif /* #if !defined(__VAXC) && !defined(VAXC) */ #ifdef __cplusplus } #endif #pragma standard #endif /* __ESGPSDEF_LOADED */