/**/ /***************************************************************************/ /** **/ /** © Copyright 2010, Hewlett-Packard Development Company, L.P. **/ /** **/ /** Confidential computer software. Valid license from HP and/or **/ /** its subsidiaries required for possession, use, or copying. **/ /** **/ /** Consistent with FAR 12.211 and 12.212, Commercial Computer Software, **/ /** Computer Software Documentation, and Technical Data for Commercial **/ /** Items are licensed to the U.S. Government under vendor's standard **/ /** commercial license. **/ /** **/ /** Neither HP nor any of its subsidiaries shall be liable for technical **/ /** or editorial errors or omissions contained herein. The information **/ /** in this document is provided "as is" without warranty of any kind and **/ /** is subject to change without notice. The warranties for HP products **/ /** are set forth in the express limited warranty statements accompanying **/ /** such products. Nothing herein should be construed as constituting an **/ /** additional warranty. **/ /** **/ /***************************************************************************/ /********************************************************************************************************************************/ /* Created: 30-Mar-2010 17:27:00 by OpenVMS SDL EV3-3 */ /* Source: 16-AUG-2000 15:14:46 $1$DGA7274:[LIB_H.SRC]CLUPBDEF.SDL;1 */ /********************************************************************************************************************************/ /*** MODULE $CLUPBDEF ***/ #ifndef __CLUPBDEF_LOADED #define __CLUPBDEF_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 /*+ */ /* CLUPB - PARALLEL CONTEXT BLOCK */ /* */ /*- */ #define CLUPB$M_BUSY 0x1 #define CLUPB$K_FIX_LENGTH 52 /* Optional extensions for user's of the service */ #define CLUPB$K_RBLD_LENGTH 88 #define CLUPB$K_LENGTH 88 /*LENGTH */ #define CLUPB$C_LENGTH 88 /*LENGTH */ #define CLUPB$S_CLUPBDEF 88 #ifdef __cplusplus /* Define structure prototypes */ struct _rsb; struct _lkb; #endif /* #ifdef __cplusplus */ typedef struct _clupb { /* This section reserved for the service itself */ char clupb$b_fork_block [32]; /* FORK BLOCK */ __union { unsigned short int clupb$w_flags; /* STATUS FLAGS */ __struct { /* FORK BLOCK IN USE */ unsigned clupb$v_busy : 1; unsigned clupb$v_fill_0_ : 7; } clupb$r_flags_bits; } clupb$r_flags_overlay; unsigned char clupb$b_threads; /* ACTIVE THREADS */ unsigned char clupb$b_max_threads; /* MAX ACTIVE THREADS */ unsigned int clupb$l_parent; /* PARENT CONTEXT BLOCK */ /* This section filled in by user of service */ int (*clupb$l_action)(); /* ACTION ROUTINE */ int (*clupb$l_cplrtn)(); /* COMPLETION ROUTINE */ unsigned int clupb$l_cplprm; /* COMPLETION PARAMETER */ char clupb$b_fill_1_ [4]; #if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */ #pragma __nomember_alignment __quadword #else #pragma __nomember_alignment #endif __union { /* Lock rebuild extensions */ #pragma __nomember_alignment __struct { unsigned int clupb$l_rtn1; /* SAVED RETURN ADDRESS */ unsigned char clupb$b_qcnt; /* QUEUE COUNTER */ char clupb$b_fill_1 [3]; /* FILL */ #if !defined(__NOBASEALIGN_SUPPORT) && !defined(__cplusplus) /* If using pre DECC V4.0 or C++ */ #pragma __nomember_alignment __quadword #else #pragma __nomember_alignment #endif #ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */ #pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ struct _rsb *clupb$q_rtrsb; /* ROOT RSB */ #else unsigned __int64 clupb$q_rtrsb; #endif #ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */ #pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ struct _rsb *clupb$q_rsb_list; /* RSB LIST ADDRESS */ #else unsigned __int64 clupb$q_rsb_list; #endif #ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */ #pragma __required_pointer_size __long /* And set ptr size default to 64-bit pointers */ struct _lkb *clupb$q_lkb_list; /* LKB LIST ADDRESS */ #else unsigned __int64 clupb$q_lkb_list; #endif } clupb$r_rbld_structure; /* Other extensions can go here */ } clupb$r_clubr_extensions; } CLUPB; #if !defined(__VAXC) #define clupb$w_flags clupb$r_flags_overlay.clupb$w_flags #define clupb$v_busy clupb$r_flags_overlay.clupb$r_flags_bits.clupb$v_busy #define clupb$l_rtn1 clupb$r_clubr_extensions.clupb$r_rbld_structure.clupb$l_rtn1 #define clupb$b_qcnt clupb$r_clubr_extensions.clupb$r_rbld_structure.clupb$b_qcnt #define clupb$q_rtrsb clupb$r_clubr_extensions.clupb$r_rbld_structure.clupb$q_rtrsb #define clupb$q_rsb_list clupb$r_clubr_extensions.clupb$r_rbld_structure.clupb$q_rsb_list #define clupb$q_lkb_list clupb$r_clubr_extensions.clupb$r_rbld_structure.clupb$q_lkb_list #endif /* #if !defined(__VAXC) */ #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 /* __CLUPBDEF_LOADED */